DOS 4G big real Mode Demo code。

bini

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

( d$ F( s0 [4 Y这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   3 T# U2 U1 r( |( M! P+ Y
6. *        这个函数是让系统进入DOS 4G模式                             *
   ! \' `0 P" m3 q+ Q$ A4 m) W
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   , F$ o% Q4 x" @: `0 ^) |8 h7 T
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    , X  g9 V& G2 [( J( A/ S. z9 Z
12. *    author: bini                                                   *
    % Q. D- s' C( ^2 k9 R/ N" b) v
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    8 G+ f, S5 A& m7 o0 u
17. #pragma inline
    2 d5 \# k  L7 p* b; u
18. 
    - \4 R% S9 T* v: V0 T) A3 b
19. /***********************************************
    # c1 L5 F  V* h
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    & W- n, w0 y: v+ l- J% N2 r
21. *    第二个为一个数据段，没有代码段。           *
    * t+ n/ I* v6 C' x- b9 D
22. ***********************************************/
    - z. r, j# i" |) _: [
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    - \9 {3 B0 x. {: s) ?' p
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    . i- V- M! s8 o- @" O
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    1 _+ P$ ]+ W4 f
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    1 h/ H' ?) f4 c& e/ ?, X' h' i. S
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    1 y. ?5 ]/ o  z+ Y/ m
31.                                          
    7 [" a8 h1 S- x- A
32.                                              属性位Hibyte低四位为
    8 a% o# b/ w; c
33.                                                  Limit( 16~19 )=F
    " s6 T7 o) s: C" _$ m, ~
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    $ z2 f) t2 Z1 j4 ~4 q7 y8 p; B6 b
37.                                                 
    - a+ @' E/ S; p; _. s
38.                                              属性位Lowbyte低四位为段类型,值=2
    # ~8 P" I3 _; h( d# e2 o
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    # ~% i3 A% ^$ S$ ]+ H9 Q4 x
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
      Y; W6 q3 z% ]# a, X- s5 q
44.                                              
    
45.                                          */
    ' l% J5 f1 K: B7 q
46. 
    
47. /****************************************
    0 p# Y% [% i, w) O
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    9 J$ M6 D9 `# ]' g
51. *    +-------------------------------+   *
    
52. ****************************************/
    1 a0 v5 t) o3 G
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    8 M1 v6 W8 m) N: x5 U) \9 T/ r
56. *    打开A20门    *
    / r+ P9 A% w2 x, U
57. ****************/
    
58. void openA20(void)
    
59. {
    
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    ' K) u4 I+ y4 ]: i% S
65.         out        0xed, al
    ! U. L9 P5 g2 G! F$ O2 I
66.         popa
    " s4 |  Q+ |/ B* [/ F
67.     }
    * }# V9 l+ f+ B% l: W  v
68. }
    
69. 
    
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    1 ^7 o' ^6 \5 Z9 E' r! @: I
72. *    ====================                      *
    2 H8 h: q' J1 f: V0 i( }3 s4 J
73. *                                              *
    . _- R2 D/ {" h
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
      k/ R( L' M" d: X# `% P" q
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    & o7 Y$ n7 }7 O' f6 z! @
77. *       表示为 2个GTD                          *
    
78. *                                              *
    8 ]( Y7 d% a1 j
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    2 C8 F3 a! @! u% H" D) N2 a
81. ***********************************************/
    5 b! ^  S5 f' @+ D% O
82. void set4gb(void)
    
83. {
    
84.     asm{
    , Z$ w, T: a& k# F7 h6 h0 A8 U
85.         cli
    
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    9 A- q$ \* }; e
88.         *    +-------------------------------+   *
    ; k- K0 H$ J( u, m& X3 R& n. I# h. m
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    
92.         /*********************
    2 L* N5 y0 ~' S0 D, F4 ]
93.         *        得出段界限       *
    0 ~2 _( b$ ?7 s" n
94.         *********************/
    7 g: q4 G( I% c
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    5 c3 U  ~  s1 f2 @' A* q
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    $ H  j! ^# b( I$ d# [
99.         mov        eax, ds
    7 o) x  R7 T0 G. G- m
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     5 D1 }  L6 E8 f/ m1 r
105.         lgdt       fword ptr GDT_Addr
     ) b: a$ K/ [$ m' W+ P/ F9 W
106.         /********************
     
107.         *   选择子偏移      *
     0 Y- T. f( ^0 _3 `8 O! v+ S
108.         ********************/
     ' ~9 n2 ]& i" M; V1 {& g
109.         mov        bx, 8
     0 f6 G5 r% Z9 x5 e5 @. `
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     + a, F6 y8 h. `
114.         **********************/
     ' E  e/ \  T' ~: u% A! w
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     
118. 
     & p# F& G. \- c1 X
119.     pMod: asm{
     
120.            /************************************************************
     6 T3 h# Q& b0 n3 n3 f( d; T2 ^' F. f
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     
123.         mov        fs, bx
     / a3 [* D7 ?% p& M- p4 d  i! f
124.         mov        gs, bx
     ! F  C1 U2 a- g
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     ! E3 V2 [# s5 C* q  _6 x5 l, ~
128.         ******************/
     
129.         mov        cr0, eax
     " ]6 s# s9 w8 c, k1 i. A" q# x8 k
130.         jmp        rMod
     
131.        }
       b2 \0 [; P& p
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     8 H- \4 C9 B: {" P/ ~, `: [
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     3 Y$ `# p: J, M) y" e6 P3 J. ~
136.         ********************************************************************/
     2 C0 i. s( L% r9 j/ k& r) C
137.         mov        ax, 0
     - `; G5 B( d! V' d
138.         mov        fs, ax
     
139.         mov        gs, ax
     ; ~# \* {! `, C
140.         sti
     
141.     }
     / ?" L9 s; }, J" h/ a4 e! a
142. }

复制代码

这是asm的

1. ;/********************************************************************
     ~! y& K2 r. T1 l; T2 A% z, N$ G
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   , N" r9 A1 s- _: Q
4. ;*                                                                   *
   . J9 x1 I% }- S1 T: T
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   # E& G7 S( d$ @: n9 Q: A% W
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   . q( }7 m: y$ L" T
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
      h& v# d; X' s7 q
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    
14. 
    3 |& q2 K* [: z( Z  j& J1 g2 f
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
      h5 d/ o" A% g# B+ {
17. DESC            STRUC
    / V7 i5 i, A9 s
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    ; F+ U' a2 O* d' i$ |
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    ) s, K& x4 _: w) l1 p+ {% M5 T# p8 V
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    2 I6 K" M5 Y# @- j% P; c  F+ s
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    + w1 \6 H; W3 h
27.         Limit           DW      0 ;16位界限
    3 O* }, u9 l& F1 [7 y7 u( S
28.         Base            DD      0 ;32位基地址
    : g# Y- A3 t$ L" l
29. PDesc           ENDS
    ! p, a. d" ^- r2 ?8 j: q
30. 
    3 y6 r! @( A! ?" m0 q
31. GDT_def         Label   Fword
    7 v* [4 ~- V7 E! A% a- n
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    ' s7 Z$ j* n0 d9 c3 t& _( L
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    2 S* r- k6 u7 G+ t- Y3 P- X! ~( Z
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    7 p- A9 w# R* d+ t2 H3 u, Z
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
      x+ @# t) d2 A' s" S% m
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    4 n. s" |$ M9 A* q  E! \+ h* c* f
41.         call      Set4gb
    7 q6 x  |  m5 H: F* ]
42. ;
    
43. ;       fs, gs即能访问4GB空间
    % c  R' O* _7 F& K1 G# k
44. ;       write your code in here.
    
45. ;
    " q4 d$ U( S/ V( @" B
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    ) C7 }' ~3 p# h6 O) h+ D. Q
50.         or        al, 002
    6 j$ K* E( x! ?9 |6 r9 S
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    
54.         cli
    2 f# }5 C4 L/ o* j# \
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    
58.         mov       eax, ds
    + q- v5 Q' @1 R: ^6 S8 W
59.         shl       eax, 4
    5 u1 N) w6 ~9 `) S6 d: ^, [0 b0 w
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    ; X- H5 u' P$ a9 C6 m, ]  F. a) E
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    4 o6 p' A/ b* K
65. 
    & L( N% u# j/ p& b, S  x
66.         mov       bx, 8
    
67.         mov       eax, cr0
    . W4 F6 R. K1 V9 w9 Y6 R5 D
68.         or        al, 1
    + Y9 I! e. @  W4 E* H9 A
69.         mov       cr0, eax
    
70. 
    
71.         jmp       pMod
    ; M; x& U5 e) |) n3 \( O& _
72.     pMod:
    8 K/ v- O+ J" ~1 _
73. 
    $ n8 `/ ^4 d* y+ ]0 t2 ^
74.         mov       fs, bx
    $ W% v( U6 }* ?' A% v
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    7 ^3 |5 U. m+ k* d& c' |3 i/ z+ p
80.     rMod:
    
81. 
    % r5 t* i; m0 U, s3 H1 T% ^
82.         mov       ax, 0
    1 v" j0 N; g  O
83.         mov       fs, ax
    & E8 c3 @6 Q2 z' e7 g
84.         mov       gs, ax
    - U* ?/ T9 n4 ^9 ~
85.         
    
86.         ; 在2M的位置测试写一下数据
    ) _" e" @7 \6 L
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    
94.       
    " s1 d; P1 A) c4 I3 |' F) u7 ]
95. CSEG           ENDS                              ;代码段定义结束
    2 a" D5 g; B4 o8 j4 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

/ i7 r, P& v) t, y3 y[ 本帖最后由 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;
% @% Z: x; P9 I
/ r# O& H' [0 S! V* }3 s1 H& pGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
/ H1 R; L  ^  d 替换如下，
3 ]! g* X2 e) x" j& c- LNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
! }, d/ Q( D/ s* zData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

GDT_Addr        PDesc   <$-GDT_def-1, >
6 E3 L+ T, p! B这样你就能编译通过并且可以运行

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
$ b6 e  j2 @+ i
option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
; H$ C* t+ [" z* G  n
5 a% Y3 i! W& ^9 E8 ~; m, k   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

# M9 d1 x# M6 B/ l. q% C( Q3 }+ A
我也是相同的问题，请问哪位有解，谢了！

jdf

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