DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
5 f+ d% Q* @% v, j
这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   5 p& X) Z' m+ g8 G+ t: k6 e# f
4. *                                                                   *
   8 T' x+ ]+ n) t
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   + }* {  I) {2 \: t1 ?
9. *       使用: openA20(); set4gb();                                  *
   - I4 y& ~4 o% W0 R
10. *                                                                   *
    6 B# Z$ s9 X, ]6 g$ ~8 B' l
11. *   ===========================History==========================    *
    , n2 o3 R% y5 u0 a
12. *    author: bini                                                   *
    . H0 g3 q8 l' P5 U# [5 l
13. *      date: 2004-11-30  Frist version.                             *
    5 w8 C1 h& u. ?: l  J. H7 z. e
14. ********************************************************************/
    4 o! T9 K! |: K  L" i4 p
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    
19. /***********************************************
    8 }0 U! c2 V% K2 Z
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    3 J! ^) V2 f7 ?& x8 \8 \- P
21. *    第二个为一个数据段，没有代码段。           *
    : O  ^& z3 i& {7 r6 u  @
22. ***********************************************/
    3 H$ j( \+ Z8 ?8 P
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    % S/ R/ ]( f& B
26.                                       */
    + x1 h% e9 V6 _' m3 J5 X
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    1 L* ]+ H  g7 k; d8 \  X
28.                                          最高字节为 base( bit 24~31 )
    & s1 i( X; w$ \% |' Q
29.                                          
    
30.                                          属性Attrib = 0x8F92
    $ g! y: ?' Y- I
31.                                          
    $ R/ N4 o' N8 X' D5 R% y
32.                                              属性位Hibyte低四位为
    2 z. o6 v! u3 W2 J( N
33.                                                  Limit( 16~19 )=F
    6 u' {+ [2 D7 L* @
34.                                              属性位Hibyte bit7 为粒度
    + m) a/ C$ n8 w( n
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    
37.                                                 
    2 ]4 [" o# P$ K% V9 D
38.                                              属性位Lowbyte低四位为段类型,值=2
    ' U2 k1 P/ s; O5 x
39.                                                  表示为可读/写段
    $ ?+ S- R3 J" Q+ w, @3 Q/ P& m+ A
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    & @5 D+ k/ r% T: J" N3 J  y
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    # v4 P! A4 U2 v
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    + E4 s# F" y' l6 g: H
45.                                          */
    4 j3 C  r& Y  P" z6 }7 _
46. 
    
47. /****************************************
    6 j4 D0 w& Z, B# a
48. *    GDTR寄存器, 48bit=6bytes            *
    % ]8 `0 f5 H+ x# Y" N5 w
49. *    +-------------------------------+   *
    + b7 V& L- C& v! t% K
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    * Q7 l; o+ ~- i- e6 W
54. 
    + t; T0 V0 x- m- q/ O
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    8 W* g3 K5 B* i2 C8 t. T/ W
58. void openA20(void)
    ! `1 J7 C  ^1 c% Y, x( i& n
59. {
    / k; w3 a) _: x! T
60.     asm{
    
61.         pusha
    2 r+ K3 g& \, y. W' T7 i: p5 a2 E
62.         in         al, 92H
    
63.         or         al, 0x02
    - w2 P, s+ X- g
64.         out        0x92, al
    , N! `! G7 j4 w1 o, N, i' ~
65.         out        0xed, al
    " o) V9 C9 ]6 P
66.         popa
    
67.     }
    
68. }
    . z/ [1 Z# u' b+ G3 x
69. 
    ! V7 l0 Z  Q% a6 S; P
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    , b4 U3 G* J: G. `( a& c- \
72. *    ====================                      *
    
73. *                                              *
    " g. Q( w( w' F. Y* \
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    ! c. A; ?2 n5 W" E) ^- D2 S1 R; ]
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    5 [* Q$ o) H" K8 i9 ]- q$ l
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    & g* @2 i: M3 |" K+ a' f( D
80. *                                              *
    
81. ***********************************************/
    ( p/ U& y, Q6 k" k
82. void set4gb(void)
    
83. {
    
84.     asm{
    
85.         cli
    / i1 b! Q$ e( [  x
86.         /****************************************
    ( g: W3 G: w% J+ O9 T% p+ i" K1 T
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    0 L0 e4 P/ l  B. C, D6 b* X( D
91.         *****************************************/
    
92.         /*********************
    2 N/ Z0 \. z0 i$ U
93.         *        得出段界限       *
    
94.         *********************/
    ; E( S( I$ ~( P, o& a/ \. _
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    $ R. p2 t4 j  ^, c
98.         ********************************************/
    * ^4 {/ T+ c4 o9 y
99.         mov        eax, ds
    % K9 y' Z2 _, z. v& C2 E
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     & t2 |  U; u+ b* l- l
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     ) a; Y3 C  y/ c+ T- I2 H" H
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     . }' h# U' z, m, N+ K* R3 n
111.         or         al, 1
     + N7 }& ~4 |3 P: h
112.         /**********************
     
113.         *     进入保护模式    *
     $ K9 i! J+ w; q- E! E7 n- J
114.         **********************/
     4 L& k! \6 K+ g" k" P
115.         mov        cr0, eax
     
116.         jmp        pMod
     - w8 I. B$ P$ ~2 X) ^; Q. \& T
117.     }
     4 `  N$ I6 K- X  @3 I( U, L
118. 
     " M# _7 k2 h% g8 k4 ~5 Q
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     ; K. o3 V7 _2 ]+ w( W. s
122.            ************************************************************/
     ! U3 Z( }' X3 R/ t, ]% p9 ^
123.         mov        fs, bx
     ( r! N7 M! Q# ?
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     ) n3 Q8 ]1 E( b# {# t$ Z
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     / }2 _' w; {* c+ ~: h* w- p
129.         mov        cr0, eax
     7 q$ \- q: h( r4 f& c+ y! m
130.         jmp        rMod
     : I! y) }" l2 }+ t$ G4 S! U
131.        }
     ( D, C& n' G, r3 S
132. 
     6 A  d# ^7 J  T
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     ) k) O2 m6 p; m
136.         ********************************************************************/
     
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
     
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   ( m8 ^8 y3 Y. [3 `0 U6 c
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ) w6 I% H) b, E
4. ;*                                                                   *
   2 O) o. x# w7 P0 R7 f
5. ;*    ========================Title===============================   *
     y  m) @3 _" z
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   & j" Q' p5 ^, q- s/ X
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    $ P* h  A( `1 Z/ q6 e. c9 ~9 I2 {
12. .model small
    
13. .586p
      b6 f: W& Y1 E7 i
14. 
    , o/ a) o& G& M5 L0 }" v& P( O4 v
15. DSEG  SEGMENT   USE16                 ;16位数据段
    ; W0 \4 L4 a0 }7 }5 s
16. 
    : C: c, V# s5 R* Y7 Y1 D
17. DESC            STRUC
    * {" Y3 w" P8 s6 z& ], C
18.         LimitL          DW      0 ;段界限(BIT0-15)
    ! B8 Z& W. s. s9 L- G
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    6 }. y9 ~2 F) [, i) h( u% [
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    % ?% L+ h8 y( f4 |1 |+ V. w2 m+ K# v- ^
24. DESC            ENDS
    $ I* u5 C4 |# N$ e: D% w
25. 
    # g' d3 F! p2 `- ]
26. PDesc           STRUC
    # T3 d" `# }; Z
27.         Limit           DW      0 ;16位界限
    . o4 I& B" L  X/ P/ R4 Q' Z9 M% q
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
      }4 f2 U0 d0 y! c( l' u& v9 V
30. 
    0 ]0 ]+ p8 ^% P; k& h5 ^
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    / A$ x3 k, }% R! W1 q9 m
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    ! E0 a) W, H3 {, N  O) a
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    * |9 M( x+ @0 Q% g7 ]5 m3 O3 m5 K" T2 L
36. DSEG            ENDS                          ;数据段定义结束
    5 L* s( E  v# n& Y5 u
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    2 d* C' Y1 |9 W6 v9 ]
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    + H+ D2 E4 ?& v. b# t" e
41.         call      Set4gb
    # R2 N! G% f# k& r2 p
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    " p( K$ F- l4 L# H2 k  ^
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    
50.         or        al, 002
    4 n7 _! O- x. [+ e) l
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    / l% o5 R: K+ P% s' s+ Q/ ?4 [
54.         cli
    
55. 
    ( r0 c# T5 S9 z) D8 u
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    2 K8 C. h- c  L1 v( _1 }7 k. w
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
      e  A/ \0 h1 u1 f5 Z5 [: J
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    $ z. k' g' o& K! r2 z9 ]
63.         mov       dword ptr GDT_Addr.Base, eax
    7 u: \" P8 n& m* X# N
64.         lgdt      fword ptr GDT_Addr
    # L) [6 E9 C; T7 e/ K7 |- I. s- o+ p( {
65. 
    + @8 m: d6 A# a
66.         mov       bx, 8
    4 S8 @, I! M: n. `' |$ Q
67.         mov       eax, cr0
    
68.         or        al, 1
    + S8 [2 e5 U1 g7 O+ |5 |
69.         mov       cr0, eax
    # |! d4 R- Z+ k6 }8 }; [
70. 
    
71.         jmp       pMod
    7 m- X: s5 m4 k1 e7 w
72.     pMod:
    
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
      J7 \" ~/ p9 E: B1 c, ]+ H0 u, V
76.         and       al, 0FEh
    * e& \) P- O4 d9 J
77.         mov       cr0, eax
    
78.         
    ) X" t& `0 k0 K% E
79.         jmp       rMod
    1 ^' `- V8 I) a% M2 o+ Q
80.     rMod:
    
81. 
    , J: [3 _  [) i* p
82.         mov       ax, 0
    7 i, Q* H& C- j3 G/ x. y$ `8 G
83.         mov       fs, ax
      X7 @5 N) C% E3 x1 L" T8 L7 W- X0 c
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    9 @, _# x& C2 q5 Y
87.         mov       esi, 200000h
    / T; s$ f/ x$ H
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    - L, O: ]# @* t+ E. k3 U
90. 
    
91.         sti
    
92.         ret
    7 v; {, R; l" b* Q$ G) u5 [
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    + T1 x7 x* z! w
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
7 p4 t0 E  R& {- H
option->compiler->code generation中的option选中, [X] compile via assembler

[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
* t3 n+ p$ H* a8 \. ?Data_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
' t1 R# M% V, F( x, W% a, B. w
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
; ^6 [- z8 ?( \6 h 替换如下，
9 ]9 i$ o" R$ E; J6 U! sNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
& c" e9 C9 }( y6 |3 W8 S$ YData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
  Y/ k1 u# j/ q9 @" ?+ F8 x3 x2 ^
GDT_Addr        PDesc   <$-GDT_def-1, >
4 M8 W% C6 j& x7 w' Z这样你就能编译通过并且可以运行

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

( o. E, O. @. A% d4 hoption->compiler->code generation中的option选中, [X] compile via assembler

8 N6 P9 q8 s" K( }3 L+ i0 w& H. d   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
& B& b" {: y4 [4 e! f, Y
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

3 k6 Y! [) M* i5 q
2 N. R- U( K8 V5 n8 @我也是相同的问题，请问哪位有解，谢了！

jdf

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