DOS 4G big real Mode Demo code。

bini

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

+ D! e, F' b" ?* a* f6 B$ _这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   % C! S8 F6 c( b4 Z& p4 G
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   7 k: X5 I' Y4 c
4. *                                                                   *
   6 |3 t1 [) k; ~* U, S( S; x2 u
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   7 n' d" j. c/ D0 M
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   4 N# m  r6 ^1 g' s
9. *       使用: openA20(); set4gb();                                  *
   + N# B- Y* V$ X" C" k! \
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    3 v3 P% \) |+ F( ^. q
14. ********************************************************************/
    5 ]+ x3 D  y) G1 ]
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    5 P3 E5 l1 S3 b+ M/ ^1 i. f7 y$ h
18. 
    
19. /***********************************************
    : O+ K/ w* e; E: [1 H5 X# `+ }0 r+ K
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    , v$ ]. \. u3 b+ y: `, Z3 h3 g, Q
21. *    第二个为一个数据段，没有代码段。           *
    8 B+ L9 p* F/ W' H
22. ***********************************************/
    / d( e" n- N: a6 @; h
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    ) P$ |- k3 K+ T2 h5 @- g& b7 q
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    - d6 @. l  D! K3 E
28.                                          最高字节为 base( bit 24~31 )
    ( ?3 @' m2 w# ]& I( g
29.                                          
    5 G8 b0 V: E. a4 q6 I" z& B1 f/ x
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    % i3 Z% z8 l- v$ S
37.                                                 
    0 t8 a* Q! U- t0 o0 {) L
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    4 F+ w3 I- l0 m; Z
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    5 E$ L' }" F* z  [& C/ C4 ~0 `
41.                                                  描述符对地址转换是有效的。
    ' E4 Z1 c7 x) a1 U: ?- {
42.                                                  bit0=1表示为:
    * e0 [# A! W' ~; ~0 C
43.                                                  系统段描述符。而不是门描述符。
    ) w: m( p3 V6 i2 z
44.                                              
    
45.                                          */
    9 j% z' V2 w- c3 M. B3 q8 b
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    ) Z  W1 k! d5 i* L2 D. K
49. *    +-------------------------------+   *
    1 [: Z9 A* i: ?  o4 y
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    3 R7 e1 D3 h+ }
52. ****************************************/
    4 `) W3 w. ~, H
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    
56. *    打开A20门    *
    9 g0 s3 t/ x& j# j4 X/ ?
57. ****************/
    
58. void openA20(void)
    , Q+ s5 L+ k7 Y( d% z
59. {
    ' p. L- ?. P7 B! \
60.     asm{
    
61.         pusha
    * w$ M3 Z; {5 N! P3 _! M3 U) Z1 P/ `
62.         in         al, 92H
    & f& c+ W9 p% |4 `9 i
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    * G9 u8 f% y* d3 G9 X
66.         popa
    
67.     }
    
68. }
    6 t5 d7 G( ~4 M) T, F
69. 
    
70. /***********************************************
    5 B/ x' ]6 W7 A7 {& u5 |
71. *    函数功能：进入DOS4G                       *
    9 d  b& C* b9 @; k5 G
72. *    ====================                      *
    
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    1 p  X: H2 W5 B/ i
75. *   如：                                       *
    6 i' g* r* V2 b, f
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    : x% D6 o8 y3 g$ U% \
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    
84.     asm{
    
85.         cli
    
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    % i+ g& M/ Y. C6 a
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    ; `; q# O& d6 y: W4 I
90.         *    +-------------------------------+   *
    0 X! U" {0 G2 x2 i; x9 n
91.         *****************************************/
    , i6 j( Y* A" [1 F4 z3 E" p
92.         /*********************
    + z( e9 M8 O7 b
93.         *        得出段界限       *
    ; T" S* `; O% V2 C# l1 h
94.         *********************/
    . k6 b+ ?1 t2 L4 c/ K/ h
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    ; o$ [0 R+ Y  V
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     # H8 f) V# Y# Q2 Z3 m8 V$ S0 c
102.         mov        bx, offset GDT_def
     - k4 W/ n, ]% w' J
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     * o7 d0 K" H8 E& b4 O
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     ! z' n$ H8 S0 x# X" p
107.         *   选择子偏移      *
     - K5 I& [3 P) @! x' G( H! t# ?
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     / w& p8 d* b' S8 j0 _0 m5 D, V
113.         *     进入保护模式    *
     ( L7 L5 O% d8 r' K) k3 U
114.         **********************/
     
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     3 \$ k8 F2 v, F# D& E: C( F
118. 
     ; o( @6 H) X* p; I2 N7 J. [
119.     pMod: asm{
     
120.            /************************************************************
     / t( X2 w7 V' M( X
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     5 H( v+ d& g# i/ p' M: w
122.            ************************************************************/
     
123.         mov        fs, bx
     - d  a5 c2 N& ]+ g
124.         mov        gs, bx
     $ V& u7 T& c, S+ ]$ _! A
125.         and        al, 0x0FE
     
126.         /******************
     ! [1 b+ ^; r9 s9 ]
127.         * 进入实模式      *
     
128.         ******************/
     2 m9 ~; B4 y5 Q, v
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     : l" \/ A# `5 ?( i
132. 
     
133.     rMod: asm{
     # ?3 s' N0 b; q* u- k0 Z  u
134.         /* ******************************************************************
     : q9 s. [* D1 \, d  _( o/ Z
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
     
141.     }
     # ^; @* W( W8 l' ~2 x
142. }

复制代码

这是asm的

1. ;/********************************************************************
   ) C: q2 t0 m. i
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   2 p/ o( O+ ^5 T. f: y0 w
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   % f* ^) i% j3 S% ~( P" |" T9 G
8. ;*   ===========================History==========================    *
   ' _) W1 G& N/ M$ I
9. ;*    author: bini                                                   *
   : V/ e1 F) h- G5 `0 @& U# r
10. ;*      date: 2008-10-08  Frist version.                             *
    : e8 s) e( P& o) U( l" R5 U& m
11. ;********************************************************************/
    
12. .model small
    ( m1 t5 d4 ]8 R2 {0 g- L* V
13. .586p
      m8 S$ p% a: W/ L  I- n* }
14. 
    1 c* O" ^* Q; W' P* I+ |5 @6 l
15. DSEG  SEGMENT   USE16                 ;16位数据段
    / w) u% m9 ^. Z
16. 
    ' l# n+ |9 S1 L. |
17. DESC            STRUC
    % R/ J9 P7 [6 P9 B3 k
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    ) E: o0 z0 v: O9 _( P# O) g7 i" J
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    ! T# F1 n4 t: v$ d2 @. J
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    
25. 
    0 ]7 y- z; `6 r# X% c
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    - x+ A1 O- }  ?0 y
29. PDesc           ENDS
    
30. 
    7 _+ d6 q) e- v
31. GDT_def         Label   Fword
    + T! ]& a/ }$ F! q) p
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    3 h7 {0 l" E6 U: ]' X, O  _  x
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    , r! n. s1 p' @! S% l& N
37. 
      S$ I7 g" b, {
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    - U* X7 [9 n2 L1 c  N
42. ;
    - y) @' F6 q1 I2 _% o( C" L
43. ;       fs, gs即能访问4GB空间
    # R8 F2 F7 f- h/ U  C5 ?  v2 w
44. ;       write your code in here.
    
45. ;
    2 _: ]9 m3 ?' F. h' e
46.         .exit
    4 G+ v, h- |1 I# Z0 H: P
47.         
    
48. Set4gb          PROC      NEAR
    & A; W4 E9 n  A$ U& M
49.         in        al, 92h
    ; q. r  @7 c- E8 r1 @# P, f. H
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    * r4 P( u6 A4 f% s% G6 a' w. L
53. 
    1 i8 e) _" a! c# m- s( g
54.         cli
      m2 H/ G. }. k
55. 
    " d0 E) l' H7 Y+ s" J
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    ( ?* t8 R5 [6 m- P
57. 
    3 W- Q0 d) I+ V
58.         mov       eax, ds
    9 l- m2 u6 F0 e! M8 R& X. ]
59.         shl       eax, 4
    ! W0 D0 Q* d' C
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    7 n7 W$ w! N3 T) `/ Y% ]- g$ B) v
65. 
    & q! y! \) X  y( g$ Q; g
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    ) L/ o; |2 ?8 p6 y6 Q* O
70. 
    
71.         jmp       pMod
    7 P+ V) `) \! K2 Y. w
72.     pMod:
    " Q0 @' q! ?9 n! ~
73. 
    " g8 L* J6 q  P. Q+ s3 H0 `+ U8 R* [
74.         mov       fs, bx
    - k& H- Q+ n4 U5 l6 e6 g3 K, K
75.         mov       gs, bx
    
76.         and       al, 0FEh
    8 D7 g3 J3 k. ~  a$ v$ q$ B3 V
77.         mov       cr0, eax
    * R6 _+ s0 p7 I
78.         
    ) N4 Y" I9 H7 J& Q) a
79.         jmp       rMod
    
80.     rMod:
    
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    # B+ N- ~' o. I/ d) {
84.         mov       gs, ax
    * |% Z3 K0 N! e& Y! y
85.         
    3 j( D3 z; S8 J4 ~* t1 }. j& l
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    ) v& E; i% W9 ], K6 ?3 {& |
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    1 e6 Q" E' e( z  t, E4 }
92.         ret
    9 ?0 H; o: s9 [
93. Set4gb  ENDP
    
94.       
    3 c8 z3 h2 ^2 q/ V* H, N
95. CSEG           ENDS                              ;代码段定义结束
    % B+ V1 B+ M( u# p
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
9 Z/ V2 E" n: s) [4 G
option->compiler->code generation中的option选中, [X] compile via assembler
1 U# {, t% i/ O8 M0 P( N
[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
. Z4 O: W  _3 tData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
8 h0 _  b! K0 N
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
2 M/ C# q! z" T! W* O& q& P, MNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
9 v* \0 c  h" k! IData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

. V' m% r8 A+ M% {GDT_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 K) d8 l* Y( ^0 t# d. s0 S
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! H: _9 N1 ~( f  ~
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

8 D+ S9 K; B& U8 [
4 U) M4 t: f( V5 H* {' Y, W8 a我也是相同的问题，请问哪位有解，谢了！

jdf

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