DOS 4G big real Mode Demo code。

bini

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

这是C的

1. /********************************************************************
   7 x8 x! z6 ?, `. a
2. *    File: DOS4G.H                                                  *
   2 A, l1 s2 G0 y5 k6 u/ @# O  `  d( ]) p& Y) V
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   ! K! A% q/ ~+ S) u7 a2 M0 n
5. *    ========================Title===============================   *
   5 k% F0 F  e" t6 [  g6 j: z
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   - l( f4 e, P( w- K) X9 O4 U: P! x/ F3 N
10. *                                                                   *
    1 d. X1 D1 ?  W
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    7 D, @& Z& U5 S7 a% B+ ]2 N! b
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    1 ~( e4 q1 g4 G- d$ r! B
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    ' l; H( L. W2 i
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    : e" P% U, }3 U- N$ t! V3 ~
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    % R" S8 T( _: g2 F& q
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    ' ?4 _( X( T0 f
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    ; f7 b! J$ l/ ]* e! m# R- ~
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    , F+ K# g7 ?4 L8 R2 Y1 T2 \& }
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    6 _: \) Q1 N* X1 H) \1 p' y9 j
36.                                                  8F & 0x80 = 1
    
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    ; ~, f% g" ]; e6 E- q2 F  {7 {
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    : X$ u6 B2 H, R1 J- _9 @/ Q
41.                                                  描述符对地址转换是有效的。
    9 `2 s* K. S! _$ @
42.                                                  bit0=1表示为:
    ; g6 w; f) j. y, m
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    1 C* v4 e0 d) E/ A+ ~* b% g) e( U
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    7 K5 l$ `" p( f( x6 {' T
53. unsigned char GDT_Addr[6]={0};
    7 `. d( v( T4 Z/ v- g
54. 
    
55. /****************
      f. ~, a. C5 L4 Z' j+ D
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    
59. {
    # K% D1 U5 p( w. M
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    ! E, J9 K, Y% c9 x
66.         popa
    
67.     }
    ; L# }* |5 ?. D1 \- T: E
68. }
    
69. 
    
70. /***********************************************
    4 J( U3 X% l0 X3 G9 R
71. *    函数功能：进入DOS4G                       *
    8 y, `+ N3 h& v$ V% }  L+ f, ?, R
72. *    ====================                      *
    " L1 w( [  u; v! k
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    ; k% f" \5 F: ?
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    7 K8 q* Q/ ^+ [5 N6 T
77. *       表示为 2个GTD                          *
    7 x# u& G% j) l' Z- z; v
78. *                                              *
    9 X. Q" h& M" S) |) z
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    : a9 @3 B3 h- B/ [/ \; o2 k
83. {
    9 D" L& ]1 T5 T/ a& B' h( W. t
84.     asm{
    " l# O4 ?$ Z4 q$ N8 D) M& J9 B+ p3 L
85.         cli
    
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    : A- H; w, [6 |1 s/ ]
88.         *    +-------------------------------+   *
    1 p/ S& [; l1 Z0 h( ]
89.         *    |   32bit基地址       |16bit界限|   *
    7 q7 Q5 ~& e8 @
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    
92.         /*********************
      l; h) _1 y/ ~2 F+ M
93.         *        得出段界限       *
    , {% h6 \7 P3 m& o( a4 I! N
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    4 u  u6 k6 H/ K" F  r
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    7 L5 }: i- W: O2 {
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     & ]1 s: D7 Q6 j4 K
102.         mov        bx, offset GDT_def
     ' r1 [7 A) x0 n. l5 s$ Q- i
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     4 w% _/ ~7 @+ p
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     0 l% ~' R  j2 _+ h8 _/ h& B
107.         *   选择子偏移      *
     , G/ S6 ]; r: U* n# w
108.         ********************/
     5 y1 W0 Z% J2 N) x- s0 k, [
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     . n& H! @$ w9 D: v
113.         *     进入保护模式    *
     " h& j- j" t9 ]
114.         **********************/
     * w4 _+ v( x3 x
115.         mov        cr0, eax
     - ^9 m* w: k" S3 E  T- |
116.         jmp        pMod
     
117.     }
     ( w  E) t' q6 d6 A+ |6 S
118. 
     
119.     pMod: asm{
     : Y; y1 e: Y6 d  ?) b" Z
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     % a! r3 D  g$ S5 a. m
122.            ************************************************************/
     " u3 V8 l; ]! j+ j* u& J$ c; ~! O
123.         mov        fs, bx
     
124.         mov        gs, bx
     , `& _2 J- g/ U
125.         and        al, 0x0FE
     
126.         /******************
     ; I& T+ E" g0 F8 t! k* x& i" `
127.         * 进入实模式      *
     
128.         ******************/
     9 O* F0 ]. Z8 Z" \5 y/ w) }! G
129.         mov        cr0, eax
     
130.         jmp        rMod
     ' a: I' S0 Q3 A' E
131.        }
     2 [8 U: Z7 \3 K. o! Y
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     * x8 Q% N1 o% F" r* M
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     
138.         mov        fs, ax
     8 f8 ?  o3 @5 J2 N
139.         mov        gs, ax
     
140.         sti
     ' j( m8 U" I2 H* k: G9 J1 N5 o4 i3 R
141.     }
     $ E# O/ F$ e. W' O
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   9 m  A5 T9 f7 P; W0 n" @5 t5 z, ?9 e1 F
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ! b4 W  c0 Y$ `( A( l- r! q
4. ;*                                                                   *
   ; D& [% @. ~5 f# {4 g3 }, e$ F
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   2 P- h8 i9 ]) y: n; _4 c- x
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   3 Y0 K3 E! a1 o/ h1 d9 N& r4 P
10. ;*      date: 2008-10-08  Frist version.                             *
    / p6 ^/ p0 i! t% j* b# V" ?
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    * {0 b% S% @/ x4 w( a
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    2 {( l* H, h' J/ S0 K
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    4 g+ _3 j- U' e2 X5 |* U; D4 G
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    8 @% s) a5 ~+ j! n2 C$ R
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    / K0 e! u1 y$ y8 y7 r
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    4 s3 P5 U' u' x0 ~, j
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    
25. 
    5 F/ P/ G4 ?  n/ H/ r! R, t  X
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    
30. 
    
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    3 ]' i4 z- C1 V# s3 d, K
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    / H1 R; v* F7 E" Q
36. DSEG            ENDS                          ;数据段定义结束
    + U( T  }) E  t- A* g! }+ X1 K; e
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    / }  i9 z4 g' o4 p- h, y
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    % V0 P3 @1 p- d
41.         call      Set4gb
    * L- U1 n$ N! K+ m
42. ;
    $ G3 T" a2 I$ x! e  W9 v- q3 C3 k& z
43. ;       fs, gs即能访问4GB空间
    6 E4 Q* m" q& o# Y
44. ;       write your code in here.
    4 A2 [+ G, w2 e8 ?2 E% h2 K, u
45. ;
    
46.         .exit
    3 R% c2 x9 T$ n# U2 Y% \
47.         
      P% ]% d; G' k% W! A; K7 |
48. Set4gb          PROC      NEAR
    - m% E+ C% q3 A6 e1 @$ B4 G* ~/ E0 X
49.         in        al, 92h
    ( v. C+ h7 F* g
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    9 W$ L7 I- A3 C- ], d
53. 
    ! v6 \, C, Y) q
54.         cli
    6 u. ]. [' Q& L
55. 
    % y& k1 u6 \3 H7 P2 p6 A
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    8 Q4 _- K$ c$ i  n- @; L: T6 Z* \
58.         mov       eax, ds
    - ^7 j5 k# j7 k) l% o1 }
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    - H" }. i4 Q% P- b# e
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
      g9 {8 m( b, a  F5 t# [% s
64.         lgdt      fword ptr GDT_Addr
    * k# I1 L0 k7 G4 e
65. 
    2 |4 z  K6 ~/ C2 A$ o
66.         mov       bx, 8
    , W. N, E! I3 ~$ w
67.         mov       eax, cr0
    & p9 A0 ~1 A+ a% U
68.         or        al, 1
    1 L9 f* ^& @8 l! S  L4 ]1 U% L
69.         mov       cr0, eax
    
70. 
    6 h- L+ B# x) u( t
71.         jmp       pMod
    5 _( U0 P7 e) n$ y' R( i4 V
72.     pMod:
    
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    ( V6 U% x% e! w) V: Z. D. z: ?
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    
80.     rMod:
    # i# [5 K9 @% K, W
81. 
    
82.         mov       ax, 0
    7 c2 \  f$ d4 o# x  \; `
83.         mov       fs, ax
    ! N' i- L; M2 L6 k: `
84.         mov       gs, ax
    
85.         
    # |+ `/ r+ }; w% k+ E
86.         ; 在2M的位置测试写一下数据
    % K2 l3 O7 r& G" M
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    ( W* ^2 Q0 K9 o: F; C% u! b9 R
89.         ; 用RU去看看200000h的位置是否是此数据....
    ( r5 f: S1 t. a
90. 
    ; O  t/ x8 a, A8 Q! e/ u
91.         sti
    
92.         ret
    % {4 B) |8 u: D6 o7 B* t7 A
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    / e5 f7 \/ O2 \8 p
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

option->compiler->code generation中的option选中, [X] compile via assembler

' B/ ^( @9 }  i, K3 a5 l6 a- ?[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
Data_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
3 T( b5 ~, g. P5 v2 u* o- ^% ? 替换如下，
( u9 ^! y8 i3 fNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
. C& u0 F; J5 |$ i: nData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

" U  N! n' [3 n9 |9 x+ D5 aGDT_Addr        PDesc   <$-GDT_def-1, >
, D; X; r  P( E3 ^3 j0 |# h这样你就能编译通过并且可以运行

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

option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
5 R8 {2 T7 u: T  N, E, Q
4 M- @6 q7 ]& f9 T2 h5 O   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

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

jdf

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