DOS 4G big real Mode Demo code。

bini

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

6 V% z) f, e; g这是C的

1. /********************************************************************
   ( {2 _3 b. h7 t  @" A
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   5 v, b4 H" v% I
4. *                                                                   *
   ! l: h% _% m+ w0 C" t( e
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   ! r8 o, X: ^' H% H: a7 t" D
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   / M) h/ |' {0 T
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    6 w" v2 Q) L) K$ {) Z( ~
14. ********************************************************************/
    
15. 
    1 K4 e( n4 I  B" \/ Q- l
16. #include <conio.h>
    & T( G$ n, I3 I: R
17. #pragma inline
    $ e7 Y# V6 `7 {, s+ W
18. 
      ]. F/ G. X* G! E5 V8 Z( J( H
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    6 r4 {1 z5 H! L3 u. W3 ^7 f, k$ D
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    6 C, W& Z! m4 |' ?' j, o3 l: _; |
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    0 H5 k; n; b1 |: }& R9 `0 L1 w  k
26.                                       */
    9 G) ]3 q  ~( U0 P
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    ! t! B# L; C' ~) M" Q& M8 s+ `
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    - d. }- A) e) n! u# r
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    / s& S' Y; o) v9 n" @8 c* K
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    4 _2 x6 P7 A. X7 f$ A3 l
37.                                                 
    - J$ p% x7 @6 P: p! v& u
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    ) T/ |$ l) v* @; ?' l1 M+ q9 ?9 ], O2 c
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    " i6 R" s  N& \
41.                                                  描述符对地址转换是有效的。
    : k' @+ t( x9 W8 X% o
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    
46. 
    
47. /****************************************
    , |" G( y3 a6 Z% _0 t
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    6 K! e- x7 S2 B5 {9 N
50. *    |   32bit基地址       |16bit界限|   *
    0 M8 M) w% z% e* K/ p
51. *    +-------------------------------+   *
    3 b$ E, u9 q+ Z% p
52. ****************************************/
    ! [4 |, K" H" H, e8 M- m
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    . w" g( w' L% k3 r1 R
56. *    打开A20门    *
    8 V5 q( H8 G9 p
57. ****************/
    
58. void openA20(void)
    3 }9 o- f' e8 w, _3 A( s
59. {
    
60.     asm{
    2 O5 ?, u# v# O0 E. ^3 o5 ^' \
61.         pusha
    
62.         in         al, 92H
    : q4 |7 K5 F6 `/ N
63.         or         al, 0x02
    1 R7 Y) S0 j. n$ D+ l. l& U
64.         out        0x92, al
    3 B. o2 u% B: Z2 K* [/ f9 J7 }
65.         out        0xed, al
    + F/ l( u: K. ]# w2 @
66.         popa
    3 q- R7 [* a; v, |: V$ g7 m# F5 @
67.     }
    
68. }
    , t, q+ g) v3 z/ n  L  n/ Z& a2 o
69. 
    
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    8 Y% s! C: B8 U! W& S2 d! K
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    + Q6 K/ R) `  [" `  \3 h9 g' a# c
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    ' p  f0 `# F4 O
77. *       表示为 2个GTD                          *
    * @& I8 \, i: ?4 T" z( \0 ?
78. *                                              *
    ; O$ P" _; L6 ~! y$ A
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
      U0 v3 R+ T' a& r0 Z& E
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    
84.     asm{
    2 [9 K2 o! E$ I9 t6 |
85.         cli
    5 c2 z4 ]* \) \( O# i
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    ' u1 _1 v( q& K2 N0 g  W5 O/ a
88.         *    +-------------------------------+   *
    9 C' `/ N) X0 _1 W2 r
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    1 P4 ]+ ~* v0 r' P7 W4 c0 k
91.         *****************************************/
    
92.         /*********************
    
93.         *        得出段界限       *
    ! g7 @# t( ]9 k* J4 x' _4 }
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     5 t7 H1 O/ G  S& U4 M/ q" z
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     $ ~- s( F. f  d  R% @- |; u3 m
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     6 V9 h& X" T& M) v
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
     1 {- u( D, j  U; d5 V
110.         mov        eax, cr0
     8 g. o" D9 M% s( d; w
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     
114.         **********************/
     5 D& C: u* o# t) n
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     # r! U# p" f" w$ W8 ]6 v1 \
118. 
     : i, c2 `' J/ M  [, q2 j
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     : ?8 `; x2 S" o9 e
122.            ************************************************************/
     
123.         mov        fs, bx
     6 ^  Q' }7 o9 Q0 ?3 b
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     , H6 N3 y- D& ?6 x; ?
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     7 I# K0 d. Q1 v; B: t
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     : i0 h( `1 K0 d+ u/ \( k3 c1 p+ b
136.         ********************************************************************/
     " a3 }" E2 n2 F5 _
137.         mov        ax, 0
     * U$ q  r9 h8 h* H! s
138.         mov        fs, ax
     
139.         mov        gs, ax
     . l6 z, Y' J4 n6 `( c0 T
140.         sti
     
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   & e6 x! u1 _. a9 o% Q
4. ;*                                                                   *
   0 d5 c2 o' s5 r+ A$ U, D4 e' f
5. ;*    ========================Title===============================   *
   & A4 H& o0 I4 v( b  g% Z4 ?1 o
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   " }6 f& _) e4 P, I9 p& t
7. ;*                                                                   *
   / E+ F* ?- _% d  G) N) z
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   1 A1 K6 o+ z! o: I  a
10. ;*      date: 2008-10-08  Frist version.                             *
    * s: N  k2 \2 f( U( _6 G
11. ;********************************************************************/
    
12. .model small
    2 m- M* w7 o% h' Y
13. .586p
    
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    ; c, t8 p" o* \. q. w
16. 
    
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    8 i9 y- K0 K5 L. F' F) N/ X7 t
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    1 P* j9 i7 Q: }' C2 I; t; r5 Y
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    * Y+ U" Z/ [" Q/ y6 r
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    5 Z  ?& x3 o7 f6 K6 @8 [* E0 {2 x% o
25. 
    8 F) P7 Q! V7 q& V% M8 P
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    4 O/ K; m! [/ L+ m0 d# v7 U
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    
30. 
    , ~. J8 c5 f) u2 E' x4 n% ]3 ~
31. GDT_def         Label   Fword
    / H$ }- i2 J4 A% o, M- Q
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    / Y4 w+ Y: o& d
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    # @3 S) C8 w& V9 U5 x0 D6 W  R& J
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    ; k7 p4 n! w: W& B. N! [
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    + l3 B" k0 f% x/ U. b  D# G% a
39.                 ASSUME  CS:CSEG,DS:DSEG
    & m* T, g' J" d) ^( y' l- r
40. .Startup
    ) k1 V$ |9 p5 H( t
41.         call      Set4gb
    
42. ;
    2 Q# g; P/ q" a" r1 L8 U! G
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    & D4 n2 Z  ]: _2 X# u
47.         
    9 ~. l+ A' r9 J. {
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    3 b! u' J* K0 M4 P6 {- F: W7 C
50.         or        al, 002
    
51.         out       092h, al
    1 s8 b/ z: S- x( ~( K) L% X9 Q
52.         out       0edh, al
    
53. 
    ; D* D& |9 [1 ~, r# R' u8 M
54.         cli
    
55. 
    , x' Q' n8 y8 v& r$ o* h  S
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    ) ^  t' S5 W) [0 O
57. 
    # t" W8 g% b  X9 U4 b% K0 g' Q
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    3 k( i, l* c$ x
62.         add       eax, ebx
    & `2 s% Z2 g. j
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    8 M4 @$ k4 [3 _
68.         or        al, 1
    1 l+ s7 `' t% `3 c' g$ S8 m
69.         mov       cr0, eax
    
70. 
    2 J0 v- X+ E/ v! e% M  x
71.         jmp       pMod
    
72.     pMod:
    $ ?) f. s. o9 U3 G% c+ t  `% k
73. 
    . f/ l, T/ t+ {2 k7 F3 h
74.         mov       fs, bx
    1 X& c( d% ?1 b1 P2 A1 S/ X' w
75.         mov       gs, bx
    
76.         and       al, 0FEh
    $ H: e1 U' B0 u$ }/ \  x' P
77.         mov       cr0, eax
    
78.         
    0 k6 s5 n  u# Q, H" |/ r4 k
79.         jmp       rMod
    
80.     rMod:
    
81. 
    . v1 w) v' Q& F. b! H8 l+ I$ g
82.         mov       ax, 0
    
83.         mov       fs, ax
    
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    # L& ?; ?& i. V
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    & f7 Y# m" J& v* E, G/ }# e8 \  F0 r
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    & b# d5 K; K; N5 t, ]& M5 b
92.         ret
    + U4 S- T& m, A4 R) I9 Y# s
93. Set4gb  ENDP
    
94.       
    5 Y. i( W  C# D. P
95. CSEG           ENDS                              ;代码段定义结束
    
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

option->compiler->code generation中的option选中, [X] compile via assembler
2 D2 `9 B; K+ \8 N8 j! l
[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
0 G5 I7 N8 X, W3 o+ {Data_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
: K& b9 [' h. {9 m* f; w& A% l: WData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
5 L2 }+ t4 m0 ~1 U- l
. @# ^0 e: ~# zGDT_Addr        PDesc   <$-GDT_def-1, >
3 j9 B5 d/ R" R9 a这样你就能编译通过并且可以运行

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

& K" J" t: J" Q$ B$ R8 ^# xoption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
+ b% k7 H5 D7 P7 K1 h
0 ?4 m3 w, i8 P: |   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

. b+ D9 x% ~$ J2 s5 n. Z
# \( H$ E6 j1 o  q我也是相同的问题，请问哪位有解，谢了！

jdf

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