DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。

这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
     f2 d+ I% P5 m8 ?* @
5. *    ========================Title===============================   *
   - T4 e7 w: |! B
6. *        这个函数是让系统进入DOS 4G模式                             *
   + _( A+ H+ O7 ^' ?! m+ H
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    ! b1 O/ v- r, ]) B
11. *   ===========================History==========================    *
    % B' v' ?3 F- @, ^8 L; r
12. *    author: bini                                                   *
    - S, s! J9 p+ T: I/ r9 ~+ o
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    , g$ p. H# W- A% Y- R- U
16. #include <conio.h>
    
17. #pragma inline
    2 J( H/ P/ C, I) a( z8 A
18. 
    
19. /***********************************************
    7 A8 S* q8 F' G
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    % L1 P1 O6 N5 X0 D9 S# {0 U4 r" ^
21. *    第二个为一个数据段，没有代码段。           *
    . S2 J5 b% L) `- B* i
22. ***********************************************/
    
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    9 K5 i# I* J2 c3 n& f6 B
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    ( R) |7 ]3 O" j# b; d: G9 }
26.                                       */
    ) e9 ]. C1 ^& |6 x6 l
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    7 o8 r. c' B- `
29.                                          
    
30.                                          属性Attrib = 0x8F92
    9 d9 g+ J; o8 \& n
31.                                          
    ; a( Y- ]% w" h7 O7 C1 `
32.                                              属性位Hibyte低四位为
    6 v% O5 u& Z7 h/ @
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    4 u: Q' v3 p; {" g
36.                                                  8F & 0x80 = 1
    4 V) c7 ^) B) ?  [8 i# E8 p& x
37.                                                 
    " ?6 u5 ~, j2 Y2 f' p% q
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    , t' a  \4 p5 s+ c1 H
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    5 ]  n5 R- o7 S: z
41.                                                  描述符对地址转换是有效的。
    ' p/ J: ?4 V* X6 t  R# A
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    : l7 v9 @+ H8 I( t8 ~& K
45.                                          */
    
46. 
    / v& N1 @8 v9 h3 |% ]+ a2 G! i
47. /****************************************
    3 h1 \' O9 j- B+ M- x5 a, ~
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    6 d: F; x1 J  L% V. K9 N8 Z& s
51. *    +-------------------------------+   *
    * A, `; d  v8 ?, {
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    0 [0 j) q& t5 R: ]5 Q: c
54. 
    8 B% p! G0 y" x9 F
55. /****************
    
56. *    打开A20门    *
    2 r* @' C# N- A! y5 v; `1 x* }
57. ****************/
    , o8 ^! G; s' m5 b, G$ }2 J
58. void openA20(void)
    8 c( i% B. j# N# P2 D- D
59. {
    
60.     asm{
    8 ?; P0 k8 r6 X
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    + z/ P3 K( O/ @( P& g4 P$ l2 r/ _( A
65.         out        0xed, al
    " a- O+ o3 m0 O1 t
66.         popa
    
67.     }
    
68. }
    / J  I' y2 \# A
69. 
    * y! r' }* s+ {3 @
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    0 o/ ~6 {0 V# Y7 a' C
73. *                                              *
    6 o2 W2 b9 c( N) J8 _( e
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    ! Q* k8 q9 J6 m
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    3 G' W7 J) D$ z8 f7 ^" E
77. *       表示为 2个GTD                          *
    
78. *                                              *
    " W6 _8 F9 D: R4 D& {1 L. _& `3 l
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    / N- w9 ^' w  T, z% w2 n
81. ***********************************************/
    0 Y+ z# A3 {+ `; l, |+ T
82. void set4gb(void)
    : ~+ F. R6 j: f5 a5 \
83. {
    9 S9 E3 R1 w6 G/ n* L+ V7 o9 K
84.     asm{
    
85.         cli
    7 G+ @" a3 v' X/ t9 o* T. e
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    : O5 p/ L. I' U0 K+ F& G& X3 `* x
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    - e6 i7 {2 n; Y
91.         *****************************************/
    8 J- B  B( P! o
92.         /*********************
    
93.         *        得出段界限       *
    : a7 j" i% I' v8 _* \; X. \- H
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    % N% Y* e; _1 ?8 X2 j1 I
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     - e0 J* s6 n# a
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     8 F/ |) d2 G) H3 b2 H
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     / L# n3 o9 a+ |& `; O
107.         *   选择子偏移      *
     
108.         ********************/
     9 |* k6 i% O; u5 x
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     ; Z, H1 r; Q* W; [9 E1 j4 V2 e
113.         *     进入保护模式    *
     
114.         **********************/
     
115.         mov        cr0, eax
     
116.         jmp        pMod
     ( W: S$ C" c/ f, d6 h4 F
117.     }
     
118. 
     ; E& ]& z. k. _
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     ) y' t$ }+ X7 M4 v- ^1 w
123.         mov        fs, bx
     
124.         mov        gs, bx
       v2 O5 u. b( ~& l& k- f5 ], i
125.         and        al, 0x0FE
     5 m( A, ]2 l' W( y1 J/ h
126.         /******************
     ' i: o9 A% h* b' ?1 I
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     3 F4 v- u# X3 U
131.        }
     2 u. z" ^+ D" @% v5 o# w, I
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     # l+ k2 Z) g: W: C6 [
136.         ********************************************************************/
     4 o& \3 c4 h6 R5 s# N' U# t. H
137.         mov        ax, 0
     
138.         mov        fs, ax
     4 e) Z7 i  t* `7 J$ t
139.         mov        gs, ax
     
140.         sti
     ) H8 k2 r' b" [+ ~2 i0 D& |* ^7 d/ h
141.     }
     / x& K2 N+ n& B0 F
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   9 U1 {+ i/ w" m& t
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   3 m  H$ L& i0 O1 P2 v. B
4. ;*                                                                   *
   5 @$ [: X) Y/ @1 p
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   9 ~0 X/ r- _7 Y2 I, P; X; Q
8. ;*   ===========================History==========================    *
   3 P0 T- C/ i% L. V
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    ; u3 c. x7 n& w9 J+ s5 c' S( I
12. .model small
    
13. .586p
    
14. 
    7 d% A; h' V( E& Y
15. DSEG  SEGMENT   USE16                 ;16位数据段
    ( m0 w7 ~  b- e3 O- C
16. 
    
17. DESC            STRUC
    " ~" B3 R. b5 |, b# \0 }9 j/ T
18.         LimitL          DW      0 ;段界限(BIT0-15)
    8 X4 Z! M( o. R2 O8 {1 H0 A
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    * ^$ T4 G5 d7 g' P$ _
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    ' t+ k4 Y# K" o' Y: W
30. 
    4 v3 j$ z! d6 [1 _' S' m# i
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    ( S* u4 g4 l, L' Z
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    $ S2 R2 H4 G7 L, Q) _) e
34. 
    : i* W. @! b* i4 H( a* Q# C
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    ; g: |+ b# P  o! F9 T7 N+ x6 {
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    . q, N. E+ y+ F
39.                 ASSUME  CS:CSEG,DS:DSEG
    0 m6 c( ?: D$ v& a9 C# A$ V
40. .Startup
    + }6 C5 K8 Z$ g) L7 W1 n7 x/ V; s
41.         call      Set4gb
    
42. ;
    5 C  o) R' |# _/ P$ }9 U$ @
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    7 S( n+ i: ]! P% T" D+ k0 e7 F0 m
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
      V6 E+ Z1 X- `
53. 
    7 [! m7 L& V- ^; w
54.         cli
    - o+ A; A% U* f0 A) f( T$ Y
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    5 f3 j- c2 d. U  j1 |4 \
57. 
    
58.         mov       eax, ds
    : ^" s+ {) D( W9 Q  v, G
59.         shl       eax, 4
    - o4 N7 `7 l! q+ f% R0 Q0 A- I+ ^
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    ) D( y+ c# i8 C6 E! @3 o
62.         add       eax, ebx
    3 T6 y$ F  \' U5 _1 x
63.         mov       dword ptr GDT_Addr.Base, eax
    7 d% X" H: `; P. `$ f
64.         lgdt      fword ptr GDT_Addr
    7 H! O. L* u5 ^
65. 
    
66.         mov       bx, 8
    : @8 F$ \9 |9 f* j; k% p6 D7 y
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    1 g; N3 N4 m2 K  B6 B
70. 
    7 a, `: N& I( y& ~3 ^' H
71.         jmp       pMod
    7 C  r1 L) u7 |: P/ ~
72.     pMod:
    5 u  w) I4 Q( L6 ?
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    
80.     rMod:
    
81. 
    5 I4 N4 i7 K( a# _3 B7 a) ?
82.         mov       ax, 0
    & [3 ~/ x( K* i9 k- T
83.         mov       fs, ax
    & V/ Z: A0 J, I; X
84.         mov       gs, ax
    
85.         
    9 v% u; e- P$ r. G! U) o8 Q" [
86.         ; 在2M的位置测试写一下数据
    * @& P8 x* T) K; Y/ D2 L
87.         mov       esi, 200000h
    6 V6 l' m) A* m2 }- b& Q
88.         mov       dword ptr fs:[esi], 055aa55aah
    0 J- x4 z: p3 Y9 f5 G
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    # J( H  N+ i% \
91.         sti
    ; h' f. S- s: g' r& C1 E3 z
92.         ret
    5 R0 D3 A9 `2 O" T
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    + n2 R8 j1 m# d  {7 _3 v$ v  _
96.         end

复制代码

laoshumice

学习，学习了，楼主辛苦了

beervista

有一个问题，我用BC31为什么没法编译32位的汇编指令呢？要设置哪儿吗？

happybasic

option->compiler->advanced code generation中的instruction set选 80386

option->compiler->code generation中的option选中, [X] compile via assembler
! w3 O/ j" n) L
[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

太强了 学习 只是更新的比较慢哈 谢谢了

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
7 T( k  J$ i. E2 O. e8 ?4 TData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
3 S1 e  {7 b7 _, {; |/ _: S
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
% b& N7 P0 N- J0 i8 `Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
  M" b; C7 c: r
GDT_Addr        PDesc   <$-GDT_def-1, >
4 ?% _; U  G; ~  _2 E+ i这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

这个是Discuz的Bug.有空翻出来改改看。发代码<>符号被Discuz 在[ code ]里变成HTML的东西.

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
option->compiler->advanced code generation中的instruction set选 80386
* E3 V8 U; V* }8 k1 h' d- C
! t$ ^" Y! S0 F! k+ ^+ boption->compiler->code generation中的option选中, [X] compile via assembler

   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
+ T8 {. q3 b: t
9 f) r/ S. ]6 h6 w7 Y1 q   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

我也是相同的问题，请问哪位有解，谢了！

jdf

option->compiler->Transfer 设置TASM的路径，就不会提示找不到TASM;
还要把TASMMSG.exe拷贝到源代码(工程目录),就可以编译完成了。