DOS 4G big real Mode Demo code。

bini

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

( w, z# W$ [3 {3 {( R这是C的

1. /********************************************************************
   9 z% y% c+ C, W/ {
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
     Q# F, W3 P6 \/ m8 r
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    4 N) |5 w, A' ]8 L. m2 U
12. *    author: bini                                                   *
    4 D, h; E5 h3 a# [$ R  a7 ]
13. *      date: 2004-11-30  Frist version.                             *
    : u& G$ i, S* a' W  i/ S
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    , I* C% ^, n/ R/ R4 K8 s# @
17. #pragma inline
    
18. 
      D# J7 N" D; J* {
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    # Q' D* \7 E' f" d+ N
21. *    第二个为一个数据段，没有代码段。           *
    . P, P: |& X% I1 G4 L( c8 f2 j
22. ***********************************************/
    8 l! A. a) M2 H
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
      g. ~( I% l! r$ x9 i5 A9 Y
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    0 ?7 L& ^* x5 }7 \5 d' R* ^
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    7 g/ w% v) n3 B: Q1 w9 i
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    & P" Y- K* A. f3 j% r1 X
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    
37.                                                 
    ' r( N  W0 s/ h3 G  G$ j
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    ' x5 {4 u2 L# o% _+ B4 w% a
40.                                              属性位Hibyte高四位=9,bit3=1表示:
      s7 x  Q# a; v( n) w1 n
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    
46. 
    8 u6 [) u1 P* X1 C! }: w
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    ' ~- E: N" R0 m
50. *    |   32bit基地址       |16bit界限|   *
    " Y7 c0 _; y& u7 q0 g* _! v+ `8 S3 W0 p
51. *    +-------------------------------+   *
    * W" L: ?+ I3 v' c" o+ x9 N3 Q. V" A
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    ( n4 l4 ?8 h8 J* L& A( W3 w" ?
54. 
    ' |6 h6 \( D& x7 C
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    ( C' x/ m9 X+ Y# ?: n6 X4 L
58. void openA20(void)
      b/ o8 n" F- R$ @2 q0 C4 Z# ~/ {
59. {
    & U' @6 m. H# s( q. K/ x
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    ! E9 x: M5 `, d+ I
65.         out        0xed, al
    
66.         popa
    
67.     }
    
68. }
    
69. 
    8 \( l" i, N- A/ h* g! d
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    ! V: |# Z' ~5 G" C: v
72. *    ====================                      *
    
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    8 V( P4 ?3 i* f; Z1 |3 ]1 V* ]: ^
75. *   如：                                       *
    - j, Y/ W% u  G4 ~
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    7 I+ }) [: i: X) ?, X
77. *       表示为 2个GTD                          *
    
78. *                                              *
      o/ W& R/ G* p( ?
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    % L/ d$ ~- c- {
81. ***********************************************/
    
82. void set4gb(void)
    " U7 q* T1 V$ v! e( a& c
83. {
    
84.     asm{
    ) O+ R3 Q+ _& w2 h
85.         cli
    
86.         /****************************************
    $ ^3 I$ ?2 O! V, R# H1 w) z
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    / i# Q6 |1 W, X! [* r: |
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    * j' j1 g$ B" N1 f/ ^/ s. w; \: g8 B0 ~
91.         *****************************************/
    + {" i; z. m. M! `
92.         /*********************
    
93.         *        得出段界限       *
    
94.         *********************/
    1 u# R) l, ^$ @: E; Y) S
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    4 h( l2 k, o! p  h; N# t2 N
99.         mov        eax, ds
    
100.         shl        eax, 4
     7 ]6 A5 W* r. s; X+ I* K
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     + f9 Q" L5 w$ O- M: F4 j5 I) q
103.         add        eax, ebx
     ) T5 n8 R, q, x% a% f
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     $ r, k5 X# a! z, n8 l
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     1 F1 o; P9 n% g) @9 J( k( j  ~, _
113.         *     进入保护模式    *
     ) j" Z$ G$ J) q( q- k" n- L
114.         **********************/
     : y0 u- L. K$ s8 Y1 B
115.         mov        cr0, eax
     
116.         jmp        pMod
     & ?5 x8 t5 x0 o- J2 n: B+ k/ l, E
117.     }
     4 K& `- Y* E; d9 N  ]
118. 
     
119.     pMod: asm{
     
120.            /************************************************************
     & V* [% ^# s9 p) V" I; @" a4 x5 S
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     " M+ @9 L8 m! c- r4 G3 P
125.         and        al, 0x0FE
     0 K# h5 |: f6 p# y
126.         /******************
     & a$ |$ R  {  G9 h/ i# H- T* v$ l& q
127.         * 进入实模式      *
     
128.         ******************/
     % N: k" I! B+ ~$ \% l+ W6 Y
129.         mov        cr0, eax
     , H7 i2 f6 n2 |% L& c3 ~% d
130.         jmp        rMod
     ( \+ _1 i7 `9 D9 d, y
131.        }
     ; B! p, [' p9 K, t. u1 X0 E" W
132. 
     5 [) Q& ]- u: k
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     ; S1 \/ E) C! q
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
     
141.     }
     $ O, t$ i& G/ H$ e; w
142. }

复制代码

这是asm的

1. ;/********************************************************************
   : P, s( m( h  q6 j
2. ;*    File: DOS4G.asm                                                *
   0 B) n8 y3 e" \5 S; T1 K
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   : K5 s$ X" i# y0 p" r
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
     N# K; U$ ~3 J  N: y/ i& D- p
9. ;*    author: bini                                                   *
   % R! b# [1 ^0 O
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    2 h6 u4 N$ L* b; H$ v3 m; K
16. 
    
17. DESC            STRUC
    + l+ a/ z# [& t  [) i! P% ~  l( O
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    * n, b$ O: x4 \  P( A7 c7 G
21.         Attributes      DB      0 ;段属性
    # U  `* O9 ]* [0 t
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    9 \1 i7 U* C7 ?, K  b
25. 
      T1 ?0 j* g  ~1 d2 Z3 u, ^
26. PDesc           STRUC
    8 V% V% @$ r9 Y4 e
27.         Limit           DW      0 ;16位界限
    4 L0 }6 T7 S' C  Z, k+ L
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    
30. 
    ) a8 h& R- `1 R/ ?1 C/ v
31. GDT_def         Label   Fword
    2 R. j/ T7 F- A4 B
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    . [) [; M& a: F( E
37. 
    " r" h9 F" T# C: q* h+ h
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    0 y( I; ]1 h3 r. N7 a
40. .Startup
    & j$ e* I) H4 y: z( _- K& R
41.         call      Set4gb
    
42. ;
    
43. ;       fs, gs即能访问4GB空间
    , t/ x$ O8 B6 ^9 G0 U, G+ s
44. ;       write your code in here.
    % u, \* C. s. ~( Q4 V  T
45. ;
    ; }- u0 l/ U3 N1 b% l4 `. i
46.         .exit
    9 W4 D# w7 _: }
47.         
    
48. Set4gb          PROC      NEAR
    0 H$ E; g, x6 \" Q3 ?. O3 e9 g7 I
49.         in        al, 92h
    7 \0 ^& W- {- C: M. x  N
50.         or        al, 002
    
51.         out       092h, al
    * V4 `. C" g8 G8 e/ Y$ m- ^: t( R
52.         out       0edh, al
      g6 Q: k$ _  U$ c+ r/ r
53. 
    
54.         cli
    * G8 u# ]( S, [4 O' K, o
55. 
    % ]2 w. E1 [/ c8 n/ _" q
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    * U- i5 f7 [% B  R+ g
57. 
    
58.         mov       eax, ds
    + d- f5 O( H: s) Z; I# H
59.         shl       eax, 4
    4 p& B) P6 {* {6 m! ^0 p
60.         xor       ebx, ebx
    ; F3 k) R( i6 p8 b! I
61.         mov       bx, offset GDT_def
    * X- S( L6 O6 ~8 A
62.         add       eax, ebx
    ) W1 M* \! h' u1 G% ^
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    ! J& l6 V8 A7 }
66.         mov       bx, 8
    
67.         mov       eax, cr0
    % y) e" @* e3 {9 q/ e( w& |+ }
68.         or        al, 1
    " ^- \* g; |- v4 o& y+ \# C, l
69.         mov       cr0, eax
    6 n& @+ U  _0 Z! q: l( T1 M' X/ Z2 l# O
70. 
    . t5 K5 q3 I8 p4 Z: p
71.         jmp       pMod
    
72.     pMod:
    
73. 
    7 j! F7 C5 v, W% Y
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    8 x* _+ r7 T9 @. n7 @- L! c
78.         
    
79.         jmp       rMod
    7 G5 A' r) H9 M
80.     rMod:
    
81. 
    ; k( H# Z9 I: k2 {& K$ y* a: r, b
82.         mov       ax, 0
    , b% v2 ^1 L; f
83.         mov       fs, ax
    
84.         mov       gs, ax
    & j% ^& B2 h$ Y7 n1 T* e1 P, b$ ^& u
85.         
    ( Y, Q7 D( Z" l. r# a
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    $ v- w+ ^2 q5 }% D1 J, V
89.         ; 用RU去看看200000h的位置是否是此数据....
    : Q0 R( K( p- ~5 R' N
90. 
    
91.         sti
    5 _0 J; ]. b$ o: N$ P
92.         ret
    / F# }/ ]2 U/ Q8 f+ H2 {3 y
93. Set4gb  ENDP
    % O, G" y7 w7 _4 m5 u* F
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    1 j9 f" m% N1 ^3 Q( e9 c; Q
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
) S: e3 B7 N' S8 S
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;
% M6 B( ?, v5 J1 Z& `2 o( XData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

+ w  K9 [0 P# GGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
8 d% i5 y& g) b+ { 替换如下，
* C" V" v, s/ k( ?! T5 yNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
. ~' f. R/ D  `1 `5 o% }
6 _* A& _5 |7 m  m- o% TGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

这个是Discuz的Bug.有空翻出来改改看。发代码<>符号被Discuz 在[ code ]里变成HTML的东西.

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
' Z( d6 H' S! O3 Woption->compiler->advanced code generation中的instruction set选 80386

7 C5 ~! v5 \3 P6 R' Xoption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

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

jdf

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