DOS 4G big real Mode Demo code。

bini

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

这是C的

1. /********************************************************************
   9 I+ s- h7 }; t8 W
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   % E% `: a7 J& z$ g
4. *                                                                   *
   : m  y6 p9 a6 ?2 k
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   + f# a' O  L" T6 b, D
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   ! p/ k8 ~9 e# i, n# E4 G
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   % }( w1 b: x8 `; f4 z' J
10. *                                                                   *
    , g0 w) p: O! A( t/ K# J
11. *   ===========================History==========================    *
    $ Z+ }* r3 }/ z7 g$ S
12. *    author: bini                                                   *
    1 S) K  I) E7 l' @  w
13. *      date: 2004-11-30  Frist version.                             *
      _- M& P( b7 `
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    3 k  K: t- m1 Z0 ~8 _  s
17. #pragma inline
    ( G  r; X' V+ W, p2 o9 _$ _3 _. V
18. 
    
19. /***********************************************
    3 L8 L5 d0 G% b6 t
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    9 B8 r2 A) _* z# w
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    ! ~! ]" o0 ^7 p' K. O
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    ; v- }! M+ s+ q5 r) {6 j5 s
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    * p- n. Z1 k+ O! I
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    * M4 {" K, [& F: {! G
26.                                       */
      ]9 K- e6 Q2 Y2 b: V6 S) d6 j0 Y) ?
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    5 r$ t( a+ L# _
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    ( u  F& T5 h4 Z  T. d$ l
30.                                          属性Attrib = 0x8F92
    6 _; g* }8 A! s/ ?' _1 s
31.                                          
    , `- m4 s- L$ O  f2 x& B
32.                                              属性位Hibyte低四位为
    8 J6 z1 `* U" n) q5 M
33.                                                  Limit( 16~19 )=F
    $ [: m5 y& r% f! {
34.                                              属性位Hibyte bit7 为粒度
    " `# k7 m8 S5 X- e/ L% ?
35.                                                  (值1=4KB粒度)
    & l# O# K4 v! W" `
36.                                                  8F & 0x80 = 1
    
37.                                                 
    0 ]4 p1 ?/ l; H/ p5 N" s
38.                                              属性位Lowbyte低四位为段类型,值=2
    ( N7 A/ {2 a4 z) Q- x- w7 k
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
      o1 ?% G8 o8 Z# g+ w
43.                                                  系统段描述符。而不是门描述符。
      j9 O8 C2 p$ b5 l) Z8 Q8 j7 ^
44.                                              
    
45.                                          */
    & z& }/ q# H# z% f
46. 
    
47. /****************************************
    3 c- E  G7 v6 @7 }6 F2 W
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    6 p  f9 P$ F! t) C/ ~  o
52. ****************************************/
    2 m" S) M3 d3 ]. T: U
53. unsigned char GDT_Addr[6]={0};
    
54. 
    ! y$ v2 Y: I% Y+ E" Z' \
55. /****************
    1 u: R4 q3 |& E1 t6 D; j8 \1 e  f
56. *    打开A20门    *
    
57. ****************/
    # ~% R" e. R5 S  z/ _/ w
58. void openA20(void)
    
59. {
    
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    0 h5 h( G8 S+ s0 a7 v
64.         out        0x92, al
    
65.         out        0xed, al
    6 m* }  d2 m+ L% `5 ?
66.         popa
    
67.     }
    ) O; Q6 S1 r) w
68. }
    6 K* r$ n6 f% f" V/ e
69. 
    & _; z1 e: j9 V8 l
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    ) b* N9 A( ?5 [5 O( j
72. *    ====================                      *
    $ l6 p+ k/ a7 c# _! q$ c% j
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    . ?" F. C$ s* f$ i& c7 J6 A' R
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    ) R2 t; O* X/ X5 ~
83. {
      {5 P6 }: A3 y$ F7 F
84.     asm{
    , ~+ Z1 \! Z- A! Q' x0 \
85.         cli
    # T2 r8 ~; p: H( c" S& Z' d6 d, ~
86.         /****************************************
    8 o5 [9 k/ U! }9 [# f1 O8 a
87.         *    GDTR寄存器                          *
    7 m& Z" z9 m) L# t: `3 f* Q$ N
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    2 ~9 c$ N( z3 S8 A
90.         *    +-------------------------------+   *
    0 T0 {- |6 n+ b1 B8 n: ^
91.         *****************************************/
    . O& C; Q9 u3 a4 w5 `8 M0 V# c. p% P
92.         /*********************
    
93.         *        得出段界限       *
    + s" s0 \+ \# {& \0 K
94.         *********************/
    0 T- S7 f4 H: j! |7 v( Y
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    2 D4 D4 r1 H# i; b: f# a* P
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    $ {) k$ z$ K/ b9 @% K3 Q( B# P
98.         ********************************************/
    
99.         mov        eax, ds
    1 y) n% t% Q3 Q9 Y# t- a6 S
100.         shl        eax, 4
     4 w- J6 v: v( _5 U& d, q
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     , A! h: V& M# q8 _/ T/ Q# n; D, e
104.         mov        dword ptr GDT_Addr[2], eax
     / y& z( ?4 b, N, j$ j. b4 `" ]
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     ; ^+ Y) D6 B5 q& j+ |
107.         *   选择子偏移      *
     . ?" ?5 o3 f" E* _. P
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     ) S3 k# [1 j8 C; i7 t% i. T
111.         or         al, 1
     6 M# c6 {: u, f4 V8 M" h
112.         /**********************
     / \* V/ W/ R. x
113.         *     进入保护模式    *
     
114.         **********************/
     
115.         mov        cr0, eax
     : Q& `- Z2 A* D! Y8 g
116.         jmp        pMod
     
117.     }
     
118. 
     
119.     pMod: asm{
     2 ]/ K, ~; T- o9 |* s+ M4 {+ A. v
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     6 N# C  P$ C+ M& C+ R% x( A
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     , Z5 V; U* k. L# I6 O/ x
126.         /******************
     
127.         * 进入实模式      *
     : y3 t4 Z# [. h* Q5 _2 V
128.         ******************/
     
129.         mov        cr0, eax
     ' b7 S0 I" X0 a( T. `' ?; j) U
130.         jmp        rMod
     
131.        }
     : A* c0 o: p7 L; M
132. 
     5 X# S; b3 a5 J7 y
133.     rMod: asm{
     
134.         /* ******************************************************************
     ' e% \# z7 ~8 @1 u
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     , P$ n: J. y5 |+ b
138.         mov        fs, ax
     " ^* f' R1 h/ @! s, Z
139.         mov        gs, ax
     7 \/ U. Y" S8 r# J9 Y
140.         sti
     3 j( ?* @% x+ x0 d8 F
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   % o( F2 R) L' `/ J+ }+ q
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   : a/ o( {7 e# Y4 ?
4. ;*                                                                   *
   " j( {  E2 K1 t2 A/ Z
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   2 M7 n1 T0 o' w( |3 s( ?
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   - L) A" m9 W4 G6 s9 x, b
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    9 c* ]) }6 U! [3 Q, j! i
12. .model small
    * W5 Q; z1 n) h+ F% F5 V
13. .586p
    
14. 
    3 i# S/ @8 Y, s0 A% U* p
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    0 f3 j4 R+ h+ e1 w9 J1 X4 P' q
17. DESC            STRUC
    # y; y  T6 o* M
18.         LimitL          DW      0 ;段界限(BIT0-15)
    / X. ^0 O: M8 Z  R
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    6 A2 |3 |$ N& Y( q) X+ h0 t
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    ' f, s! _4 @- w* B) R
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    ) s& E- y( a& c3 p% S. M, q, H
24. DESC            ENDS
    ; z$ u1 K! K6 Z& H7 ]
25. 
    1 T" S7 Z1 ?4 U* x5 C
26. PDesc           STRUC
    0 {3 [/ W" I( J2 M$ }5 f% W
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    , v7 R& q; W6 q  d4 e3 l4 o) [
29. PDesc           ENDS
    $ [) [# L, d7 x/ g# M: L- B4 ]
30. 
    
31. GDT_def         Label   Fword
    8 L' d/ E1 ^/ _! B4 O5 @
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    0 ]# S8 R; C; o9 I3 Y( @
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ! ^/ O9 U$ N5 L/ ]  x2 ]; h
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    5 N4 R) q1 V5 F2 o% w
36. DSEG            ENDS                          ;数据段定义结束
    % N. W% ^$ V1 e8 M+ q/ A: m1 }
37. 
    9 j6 A& x1 T5 V- Y
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    8 g- s' b, ?3 K$ \
40. .Startup
    
41.         call      Set4gb
    + O9 j8 L' S' y! e, C8 b! p
42. ;
    : ^& a/ s. x9 U# W8 |/ Z7 J
43. ;       fs, gs即能访问4GB空间
    2 M( [2 p) [9 U4 a& b! s) \+ S
44. ;       write your code in here.
    
45. ;
    # B4 y' K& I/ A, K. c' Z/ O
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    3 l* o* B  f, o4 z" v& S- b
49.         in        al, 92h
    0 K: O, L, ?8 E3 r( F9 d7 H
50.         or        al, 002
    
51.         out       092h, al
    : ]: ^+ N5 D+ a; @- M. t7 x
52.         out       0edh, al
    ( P8 Q. m" X5 z4 f! y4 @
53. 
    , O5 t3 i% `# {: t
54.         cli
    4 R" @6 Y, n( `- b2 b
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    2 n6 [3 ]+ l; `7 }7 l4 s$ @) _
58.         mov       eax, ds
    
59.         shl       eax, 4
    9 U$ O( y2 @( W6 a
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    8 F0 Y# T* `3 ]
63.         mov       dword ptr GDT_Addr.Base, eax
    6 D- o, I: l1 @- k- u0 s
64.         lgdt      fword ptr GDT_Addr
    9 M, w8 [; T2 `, \5 _
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    
71.         jmp       pMod
    
72.     pMod:
    
73. 
    , x3 M+ ^0 K; a9 f) m
74.         mov       fs, bx
    
75.         mov       gs, bx
      `: ?5 N, O6 ^. @& R1 _4 n6 T% q5 T
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    
78.         
    4 @5 |1 M: o1 G; I. [7 k* f1 f+ B
79.         jmp       rMod
    
80.     rMod:
    7 m+ ~8 ]- U8 m( x9 G' u+ ]6 @( u
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    
84.         mov       gs, ax
    9 T" u+ q: K' R6 r: ~+ X
85.         
    
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    ; c6 A; |5 U- g! y
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    . T0 y% f) L4 Q9 C$ o" B7 H
90. 
    
91.         sti
    3 S5 I* R1 D. E: t! r; @0 ~* s: l0 U/ M
92.         ret
    
93. Set4gb  ENDP
    
94.       
    $ z8 F% y/ y  w
95. CSEG           ENDS                              ;代码段定义结束
    % h; X1 R4 ^) r- p
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
+ P7 @# A3 @3 ~
2 {  B( K. d, ~5 Y5 k* doption->compiler->code generation中的option选中, [X] compile via assembler

' f- z  p7 b0 p5 R9 P[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
8 X# U# @; x5 I" UData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

1 V7 P/ ]; }# \* vGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
5 _- A7 \: j, V3 f0 T) N4 VNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
4 V# z5 D  M& C! ]
GDT_Addr        PDesc   <$-GDT_def-1, >
7 I2 i- I  P; Q5 C8 S6 i/ K* |这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
/ G# z3 m0 ^/ m% m7 }* y& Goption->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 发表
( N- _. n/ R$ U/ C% _' m# l
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

# M  z: a% [! U$ _我也是相同的问题，请问哪位有解，谢了！

jdf

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