DOS 4G big real Mode Demo code。

bini

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

这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   6 c/ b! g) h# r2 T; E3 j$ g- Q; {
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   1 W  l- q8 a8 U$ `5 a/ P# G4 t
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   ! D% |- \1 F3 }/ L2 D8 _
10. *                                                                   *
    
11. *   ===========================History==========================    *
    $ \. M  Z9 G$ @
12. *    author: bini                                                   *
    2 Q* X3 n" I4 t- b  P% v9 C: Q7 v
13. *      date: 2004-11-30  Frist version.                             *
    " h2 c4 c) m9 S+ ?+ Z
14. ********************************************************************/
    1 l! P8 I1 r$ ?% ?- f
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    3 ]; l" ~/ p6 X7 L+ C' d* v# v* O
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    4 l, {9 `9 k- k6 |9 Z
21. *    第二个为一个数据段，没有代码段。           *
    % r+ {$ A1 H$ n
22. ***********************************************/
    
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.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    ) A9 O# r+ ^$ M* e. h- u) X3 E( S3 R
29.                                          
    
30.                                          属性Attrib = 0x8F92
    
31.                                          
    2 u- ?$ y' h3 D6 {4 f1 D0 d% J& o
32.                                              属性位Hibyte低四位为
    - h( r3 C  r0 W9 B$ W5 P, A
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    $ \3 u0 U. w/ _/ U
35.                                                  (值1=4KB粒度)
    ( z: P; K" Y* Z1 c) x' a7 V
36.                                                  8F & 0x80 = 1
    
37.                                                 
    5 m! t8 l' f( Z4 v! h* C
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    7 T0 ]. `% W' |7 J- Z; }
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    : T4 {/ _& Q) a: {5 r$ x7 y% D
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    ; ~) Q6 j- M% B+ T
45.                                          */
    ( \+ [+ u0 l) K/ P- N+ G% X6 |
46. 
    6 p' N# ]/ u' S
47. /****************************************
    % J+ }7 ^9 r3 G) {4 ?8 @
48. *    GDTR寄存器, 48bit=6bytes            *
    5 ?/ z" {. ?; s$ o# W% T) H
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    6 E" c! e- D+ |! Z7 y) [: s
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    4 ~6 S& [. W" ~3 ?* U- {! N
56. *    打开A20门    *
    ( r% }! t9 H9 T6 g: `, V
57. ****************/
    " X% f& s/ c; V6 j% O! I4 H
58. void openA20(void)
    7 T  }( }$ d6 w# H/ H0 v
59. {
    
60.     asm{
    
61.         pusha
    4 P& U5 J* K" Z, q- g; ?
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    5 g- H+ P5 `; h& }5 r
65.         out        0xed, al
    
66.         popa
    4 h7 _9 l7 L( t8 g1 r7 ]- J* H
67.     }
    ! ?1 j- G. r8 }: _6 b7 J
68. }
    
69. 
    + E, x1 `! `3 E0 \5 C. U
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    8 x4 X( E; i) `4 k3 V' M. x4 O  g
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    9 R1 x) V9 v+ n4 {
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
      K" z) ]  Z8 m* b' U4 {
77. *       表示为 2个GTD                          *
    2 t) J! `9 \' O4 a6 Z0 C
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    5 E; Y- B9 K/ s% f& `4 ?+ V0 y
80. *                                              *
    5 y6 c1 h' n: R$ x  E+ B3 R) j% R
81. ***********************************************/
    
82. void set4gb(void)
    - l) D' x' c/ w
83. {
    
84.     asm{
    2 R" }' w. Y: |
85.         cli
    
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    2 k  x8 S; W1 e1 C3 s" z
90.         *    +-------------------------------+   *
    - ]% S0 X( R4 c5 ^
91.         *****************************************/
    
92.         /*********************
    ' }% [; |8 @5 a% S7 v
93.         *        得出段界限       *
    $ b3 G9 @) _* J  M# f
94.         *********************/
    : Q' Z6 U4 t, p1 ]6 Q" s
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     6 T* V( @+ C' N  u$ f+ g
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     ' [2 o# m4 Y$ z2 C' u
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     $ u, U$ E0 S# L  T* A! Z
106.         /********************
     
107.         *   选择子偏移      *
     : V  U4 I$ P7 i' s$ ?3 H2 Z
108.         ********************/
     - r% W* O4 Z) N+ k+ `: S
109.         mov        bx, 8
     
110.         mov        eax, cr0
     ' ?, m3 W1 `" P5 J4 K
111.         or         al, 1
       p4 W2 W; `. E
112.         /**********************
     8 k/ |4 }# {) u  `* \
113.         *     进入保护模式    *
     3 G) a& m/ t. L1 Q' F: V
114.         **********************/
     3 d- W( A2 W, o: L/ B) I
115.         mov        cr0, eax
     
116.         jmp        pMod
     1 r2 ^2 ]: h( k1 b* C9 c& M
117.     }
     
118. 
     6 I6 X: u" O5 Q" B  \
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     6 U, ^- V! x! V0 b1 m
129.         mov        cr0, eax
     
130.         jmp        rMod
     , Q6 ]/ q# W6 x
131.        }
     
132. 
     - E9 b1 {" O7 q" r4 X1 ^
133.     rMod: asm{
     * c# k* {* a1 c! v9 [' }
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     % i* A- o( M2 u, w) _
138.         mov        fs, ax
     $ [% h8 ^% X$ k# T
139.         mov        gs, ax
     
140.         sti
     , n5 S* P4 m3 ~- e5 ?; o
141.     }
     ! \! J/ Y& I$ [0 f9 u3 n
142. }

复制代码

这是asm的

1. ;/********************************************************************
   7 B. X( o" Y; b. b2 y
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   5 `4 Q" f% r& [6 J" b- w3 g
5. ;*    ========================Title===============================   *
   4 T7 _5 {: `) ?4 k1 l
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   4 K  o/ T% X/ X- v4 Z* c
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   $ W8 A3 t& r6 E! l3 J8 L5 h+ H* r
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    ; d, ?6 t9 u# V3 c5 `! o$ u" @
12. .model small
    
13. .586p
    * N4 L0 ]' ~' m: j' A  }
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    , d/ w% E+ z" m+ q) b1 n
17. DESC            STRUC
    * I5 e, E5 k* Z9 G. {8 L
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    - O' n! w7 d- ?5 _* `8 y
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    3 a3 V" r8 ]) Q% |4 _9 H$ _
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    1 J1 D1 J. X( h" h) C$ B$ q
30. 
    
31. GDT_def         Label   Fword
    7 i) ^; L; W: F0 J
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
      @  f" y# M9 A  A& R" z2 e
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    ( _1 z" @1 `" z+ |* a
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    ' x- B, R4 R# ^3 r
39.                 ASSUME  CS:CSEG,DS:DSEG
    7 ^+ V0 Y/ z" `' V0 h. P- h
40. .Startup
    3 G7 j. ]" k5 x6 Z
41.         call      Set4gb
    ! J0 d* ?3 {4 k% c+ T/ ]9 [
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    0 h* r4 j' T; V8 T) X: d
47.         
    : \% J& x  Y: R& A8 `
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    - u0 u1 M6 m: n% m7 O8 n) i* n
50.         or        al, 002
    ! H0 W. Q( U5 y% T8 @2 V, Z8 `" u5 @) }
51.         out       092h, al
    ) m. i5 h" m7 e6 r8 a! D; {4 I
52.         out       0edh, al
    : _2 r; d  M# u- A9 M
53. 
    5 {) Q0 @4 t3 f/ ~+ \! L
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    - s% Q* \9 n: _
57. 
    / c2 [6 ~9 M# ^
58.         mov       eax, ds
    5 j, M; v: M: q" V) P
59.         shl       eax, 4
    / J7 Y4 s; j' y+ C
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    & C" C+ e- b. Y+ g! c, S1 m
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    0 _( D0 R$ o# E. W6 I( s% c' `
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    0 S" ^% u9 _2 B& D
70. 
    
71.         jmp       pMod
    
72.     pMod:
    
73. 
    " L8 S7 K5 n% y2 ?
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    7 I+ G9 Q  q; A7 T, |& Q3 y
78.         
    ' Q% o, D; J: T5 r& z2 m$ E  d' y
79.         jmp       rMod
    ! U- ~: f& h+ i
80.     rMod:
    8 M; d+ O2 ~- [2 f& [, I
81. 
    1 \* ]9 |9 m9 O+ \  d- O
82.         mov       ax, 0
    " Y( A( j( g" N& R  ]3 D) b
83.         mov       fs, ax
    ; @0 m; w- O3 k' x' a3 b" M
84.         mov       gs, ax
    8 B" K: w+ t, H! i- ]! F6 l
85.         
    , C% x4 R. @  r- X1 K. D
86.         ; 在2M的位置测试写一下数据
    5 [0 l" j" ~; f/ q, r
87.         mov       esi, 200000h
    + o' X( `8 p- {7 x5 K
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    * a; ~. a+ E% }) L6 `" C
93. Set4gb  ENDP
    4 g, m1 f, u. _4 a8 A0 @6 y/ y
94.       
    6 f- s8 D# w! X& M
95. CSEG           ENDS                              ;代码段定义结束
      U. d3 |4 C' k/ j$ \
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

8 s  L! B/ `' D& I6 ~( H) Z6 hoption->compiler->code generation中的option选中, [X] compile via assembler
7 ~& \4 {1 n8 J2 |2 l& P* Q
[ 本帖最后由 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;
8 n% C" F9 p# K+ v+ K# m
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
; w$ w, H9 P2 y" B( c2 s6 i 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
7 Y9 u: P$ c4 z+ RData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
0 a. w) U* A8 g! ]  ^0 q+ t; v
GDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
/ E) l; L, [6 R: `( boption->compiler->advanced code generation中的instruction set选 80386

option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
+ u. E! l/ i8 d% h+ `5 _+ [  r& c
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

( O4 x" O8 |6 S* E4 y3 x1 W
我也是相同的问题，请问哪位有解，谢了！

jdf

option->compiler->Transfer 设置TASM的路径，就不会提示找不到TASM;
2 ~. B( }4 Q1 S! t  }" X! L, x还要把TASMMSG.exe拷贝到源代码(工程目录),就可以编译完成了。