DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
+ `' }" C, d. k6 f
这是C的

1. /********************************************************************
     M8 e; u7 o9 l2 t& r% n7 ?7 [
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   / M" [) T  `4 U4 b
4. *                                                                   *
   
5. *    ========================Title===============================   *
   # F: |9 f) u; N8 g/ f. i. W4 B
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   8 K3 N% [0 r7 `
9. *       使用: openA20(); set4gb();                                  *
   + _0 a1 k' J0 r" }) Q
10. *                                                                   *
    
11. *   ===========================History==========================    *
    & B3 {- s6 I4 q. g
12. *    author: bini                                                   *
    ! L# j- @" h3 ^* ?! a# _
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    8 I* G" W2 `, k" z
17. #pragma inline
    % T; O. j5 A* L4 _
18. 
    " C$ s; A8 `- ]+ z* I7 c9 x
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    - f; D& F7 |; S& \
21. *    第二个为一个数据段，没有代码段。           *
    ; o; V" v. b; ^/ c
22. ***********************************************/
    0 [' ^& V5 l/ N0 ^# r2 d
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    2 d$ G9 M- h! K+ C
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    8 v, A* E9 C1 }5 F; [
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    % W+ i# {7 i9 a) {, B7 U4 r* i( }8 k
26.                                       */
    " ~2 H/ Z, u. Q* H/ G
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    * j2 T+ z4 ^9 Q) B9 W4 P# w% E
34.                                              属性位Hibyte bit7 为粒度
    $ r( \" b, K$ q! I; h& b
35.                                                  (值1=4KB粒度)
    ; w' ~# _( u0 |6 |, E
36.                                                  8F & 0x80 = 1
    
37.                                                 
    % ?# a- |3 N( {5 o+ H$ M
38.                                              属性位Lowbyte低四位为段类型,值=2
    % i- R+ C; b% S0 [) f. b
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    5 i! s- @* Q5 J) c2 f# q7 R5 D
42.                                                  bit0=1表示为:
    : }! e, k- U  m. K! J: }- ?6 P
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    7 }/ I# `& b9 e7 E, V6 v: D+ p
45.                                          */
    
46. 
    
47. /****************************************
    # e' u, b; A" v5 Z; x2 j. X
48. *    GDTR寄存器, 48bit=6bytes            *
    + E, O4 {( `# `' d2 o' S. N  y# o
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    / K# i. p, H2 |! Q  y
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    % ^. |8 L! }( K" w/ G$ p
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    6 o/ v: K- ^3 P: M1 A% X$ R3 s5 Q
59. {
    . N( h# n. _( E& v
60.     asm{
    
61.         pusha
    . H+ O+ l" a$ w) r1 O" d( B
62.         in         al, 92H
    
63.         or         al, 0x02
    4 O/ @: W2 W% M) j$ K$ A* b* Z& Z
64.         out        0x92, al
      U, j: O, l/ J+ u' E
65.         out        0xed, al
    
66.         popa
    
67.     }
    
68. }
    
69. 
    : T+ b, r% `. ~9 ^
70. /***********************************************
    % D& _! }$ H* b. F) N
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    ) @0 S2 [( u. Y. R- N, Q
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    - W' I( b/ [5 f: z5 Q$ r" S
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    4 K  J- {9 a; h- m7 F  p4 G; O
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    & [: B6 z$ x& t  g2 K
81. ***********************************************/
    / B0 \8 e# i  G
82. void set4gb(void)
    + V: Z  K6 P$ s! s( P- m5 Z0 V
83. {
    - V2 ]1 l% L$ t& N8 U
84.     asm{
    
85.         cli
    
86.         /****************************************
    # k- D$ \: w; k* B3 L1 s& I9 E
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    ! E/ Z( C  N4 |! ]1 T
90.         *    +-------------------------------+   *
    - S0 L" h; J) e7 r9 j1 Z4 p
91.         *****************************************/
    
92.         /*********************
    ) R: z# O4 p* i
93.         *        得出段界限       *
    
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    : ~$ r# E; n# t) O! O! v
99.         mov        eax, ds
    8 ]: u6 c7 y& s9 d: [! j. E+ ^6 ^
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     + m4 [; ?  A! i  w" h! ?: s
102.         mov        bx, offset GDT_def
     # m& u: a$ j0 P1 T
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     ( u6 A/ ^0 e" I. R& \8 T+ c: y
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     6 V' e8 H1 A) G$ m( _7 _4 z
111.         or         al, 1
     0 _0 f* a; h5 @) t* q4 T: I
112.         /**********************
     
113.         *     进入保护模式    *
     
114.         **********************/
     
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     
118. 
     
119.     pMod: asm{
     0 ^6 R* r# M6 R/ f7 [/ |5 J2 h
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     & l4 q' X1 `: \1 n6 i
123.         mov        fs, bx
     + l/ n  T6 L) j5 E) ~: f; ~
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     8 Y2 p( k! Z5 e0 y0 u1 g0 p8 S8 l
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     ; t5 M3 J, k2 I6 v
129.         mov        cr0, eax
     4 A9 j, j$ p' }& _9 R: l$ {
130.         jmp        rMod
     
131.        }
     
132. 
     
133.     rMod: asm{
     ( |: R8 F6 e  ~6 _0 p0 |
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     ( h& Q$ d3 K: w+ x
136.         ********************************************************************/
     ( _: L+ a* ^2 E0 U- q
137.         mov        ax, 0
     
138.         mov        fs, ax
     ! t, u6 S& G: p; c& }
139.         mov        gs, ax
     ( ?1 j6 c+ z4 G$ K5 y2 N' f. l
140.         sti
     8 d8 C* G  y7 [) ^, N5 f8 X0 m
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   : Q) Q1 t! T$ S2 u
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ! |7 g$ |+ T4 ^1 r1 Z" l
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   6 j: {% k3 p( C" |. i
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   + X0 ~3 W7 p* ?& [/ M# N  D/ v
7. ;*                                                                   *
   + D- _& ]5 v' T+ V- K$ l8 X
8. ;*   ===========================History==========================    *
   * J* V6 l# I- M( s, p& m* B' p
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    - s" c; z% b7 S8 t
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
      |% Q' L4 Q' i' A9 m* w
16. 
    
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    . \9 [6 z# y& K/ V7 j. b
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    ! J% x: I" T7 k! p0 }  n! J( ^: ^
25. 
    
26. PDesc           STRUC
    + f8 t% F8 v3 k# O5 G  I- b$ k
27.         Limit           DW      0 ;16位界限
    0 q% P# w- M" \+ H! U& i
28.         Base            DD      0 ;32位基地址
    9 w3 _5 |- k9 e; F2 [5 P
29. PDesc           ENDS
    ) P2 f- {8 R; N# Q& }. e
30. 
    * N  h( o# z2 L) X+ j  U% [
31. GDT_def         Label   Fword
    % I2 F* o, g% ~% ~" e
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    1 c5 n9 K6 U2 y( o! |: F- B8 L) g
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ! s/ Y/ B' a1 G, e) \( y8 d
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    2 P5 y" x( N. \& N8 V7 h
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    0 N! ?. I. }4 s+ s1 w) L
40. .Startup
    5 _3 P" [. p9 C/ A# M/ j  m
41.         call      Set4gb
    
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    ( a2 R+ I5 A1 l+ Q3 H7 E
45. ;
    2 s9 \. C) z  w4 _- r9 |: y
46.         .exit
    : y) U* p9 \+ H2 U4 n# n
47.         
    6 r7 I6 R1 ?0 L
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    % }/ u0 O( W+ U/ n3 O
50.         or        al, 002
    # r3 r' U! e- X- V8 Y! h
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    $ k8 i" Q  M" j: o0 [7 X
54.         cli
    
55. 
    ' @* v. t# g) D
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    ( V% R+ g8 a- A/ a$ d1 x* \
58.         mov       eax, ds
    1 P$ m- o( H' O' i
59.         shl       eax, 4
    ' D$ x- e1 I/ t7 y& f: [9 L
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    6 j+ A+ Y! G0 D: e+ h! ?/ Z
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    * {+ ?! X: P8 V& D! F1 K% S5 e1 _
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    7 ^: k( O$ r/ D# }. ^# C
70. 
    0 a6 A$ h7 `$ g5 Q% @
71.         jmp       pMod
    
72.     pMod:
    
73. 
    
74.         mov       fs, bx
    2 \7 Q8 l  m4 O9 E. G4 }
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
      D  z7 O/ ?$ q) q
78.         
    - z' v9 D& k" X/ b) s
79.         jmp       rMod
    
80.     rMod:
    ; t  J7 u+ X* D! q
81. 
    ! \- d3 @+ ^' `- Y$ O
82.         mov       ax, 0
    $ d. H7 a! A6 K' s. K
83.         mov       fs, ax
    
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    * l: G/ A; b2 {6 e' ^/ q: T
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    $ f$ ]5 P: N( j/ W
90. 
    - a6 x1 M6 R# u% h
91.         sti
    
92.         ret
    ( r; r1 T+ h7 i) j
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    % g# t+ E$ A" O" B1 H. e1 n
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

, Y, l; M) q( B2 X( [. Y+ m# woption->compiler->code generation中的option选中, [X] compile via assembler

4 I4 n0 C4 ~; i: B$ n5 o  E[ 本帖最后由 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;
( d( `3 s) I5 T/ i' }6 k
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
1 ]* o. a, |( k" [  H* A 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
( h8 j8 E9 j9 N& WData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
  S  V# t9 |. S1 e' C. b
: ]5 [6 B8 Y* q+ w0 S! b% B' FGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

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
+ {3 \- z3 P) M) Y1 y( }
5 w0 O3 B2 u  Y8 @. V+ Aoption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表

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

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

jdf

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