DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
# s4 ^- M4 y# h
( B0 l8 V% ^  v7 B这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   $ G% N/ D! F  E4 f( z
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    7 r3 T, `- x: g0 U, R' D
11. *   ===========================History==========================    *
    - a$ g- L! J/ }, U3 s" I
12. *    author: bini                                                   *
    : m  ?! ~3 O# e$ Z8 P
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
      H3 v) p4 Z2 k. C) n
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    : r" T+ c; I. _1 T3 ], a0 O
21. *    第二个为一个数据段，没有代码段。           *
    ) F, }& U: p4 q$ J9 v  i
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
    % T, Y& d. W1 p
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    % n& _6 Q- |% _  E
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    ' ?% i! c3 o5 D& a
30.                                          属性Attrib = 0x8F92
    $ m) ^2 m# C, k# h# L9 k5 [
31.                                          
    1 y3 }- P1 K* c8 u! i
32.                                              属性位Hibyte低四位为
    % n0 k& q* @0 S5 U
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    
37.                                                 
    8 l- j: I( e0 S$ s& N* d
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    / w5 A" b4 _( x3 @5 k
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    ( c& I9 E5 A" C9 O$ w$ s
42.                                                  bit0=1表示为:
    4 ~+ }- ?- _/ J1 |9 w6 ]5 u0 v/ O
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    3 L8 f6 I0 e% p4 {8 ?5 e
45.                                          */
    
46. 
    ! Q8 D2 s/ U: A7 M" Q  ?! k
47. /****************************************
    8 E8 o9 y: O4 g3 w+ S
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    0 u" ]  @1 h0 s1 Y6 I& E
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    # c9 I8 D" ^( T$ @, g
52. ****************************************/
    0 \! R: s0 e, Q5 M. o
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    ; J- y1 ^& _$ P7 W8 h7 {0 i; d
56. *    打开A20门    *
    # u7 h! ~! T; ?* r1 Y
57. ****************/
    ( l" p+ c' r# n* a% [6 m/ u
58. void openA20(void)
    : q, j3 ^$ c3 E4 ]8 i; ]& U
59. {
    3 T5 ]5 ^7 B* Z# B; k2 t
60.     asm{
    + d4 j6 Q' E/ P! F) G! b2 ]6 i. ]3 _
61.         pusha
    
62.         in         al, 92H
    - p) _* S; x; E: d
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    . Y! R% V( P7 G, q& ?
66.         popa
    8 E# B0 n( W* @. _* c, V. e
67.     }
    # e8 Z. `+ r4 e. X. N( c
68. }
    
69. 
    ; m! [7 g9 p0 {/ v
70. /***********************************************
    9 r3 f2 w  U4 R1 S& `
71. *    函数功能：进入DOS4G                       *
    ; g% s2 U! m2 R! R6 S. X: L, g  G
72. *    ====================                      *
    , Y8 P/ p8 c& f
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    * e+ A7 d; D2 `. H; V6 c% A
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
      A/ _% n) ?4 v- r7 ]' g% |+ s6 h
77. *       表示为 2个GTD                          *
    
78. *                                              *
    6 R, J' l2 e7 Y" Q' R, i- \" X, u
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    % H7 c9 m& u3 z2 n. t8 e  u$ e5 e
81. ***********************************************/
    
82. void set4gb(void)
    7 w5 S: u8 b: ?: J8 H8 h! Y
83. {
    
84.     asm{
    ( y8 P3 T+ p5 r0 P2 q+ W1 L9 r  g8 i! n
85.         cli
    : j9 a. B; Z8 M4 m5 j  l! T5 n
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    % J6 x) ]1 G  s7 L6 o: ^0 x* ]+ W
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    
92.         /*********************
    / N: y7 Q1 p' q
93.         *        得出段界限       *
    $ i# Q! x; O/ ~% y/ c6 y
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    - p1 F" X, R6 j7 J% p
98.         ********************************************/
    $ Z% M- T7 a7 M6 |& E( q) q
99.         mov        eax, ds
    
100.         shl        eax, 4
     4 D& p7 G4 r7 p8 f4 ^  U
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     $ [# H$ m1 F% |  g( p
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     
108.         ********************/
     1 ~8 Y1 n: f. c
109.         mov        bx, 8
     # N8 W$ z* s, S* n4 h) S7 A8 x
110.         mov        eax, cr0
     
111.         or         al, 1
     ( V3 F! N$ |+ S1 \( Q
112.         /**********************
     
113.         *     进入保护模式    *
     8 F7 v1 g4 {/ g0 [: [4 w
114.         **********************/
     2 f' r' Z9 K- C
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     
118. 
     
119.     pMod: asm{
     
120.            /************************************************************
     % G* E+ V5 f1 Q" u
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     0 _6 }3 l6 d' M* o
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
       g' M5 a, B5 \- N
125.         and        al, 0x0FE
     + r# i$ U6 t' }6 r6 Y9 o, d6 q1 ^
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     
132. 
     * a3 O" h% @  j7 P- F7 v
133.     rMod: asm{
     
134.         /* ******************************************************************
     ! j4 l8 y& l5 o6 t( c
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     9 a; Y8 n7 b' `1 a' V+ I! c( E
136.         ********************************************************************/
     + }( T) v4 p  J  N$ O% g
137.         mov        ax, 0
     ) o6 C, G8 Y( H: a* [( V4 X
138.         mov        fs, ax
     9 t. L& W  |8 E, g; n
139.         mov        gs, ax
     7 h5 j, ]9 ]/ k9 O3 ~1 P7 ~# C& m
140.         sti
     ' u- A5 r! `9 z6 `1 K, X
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   / G& R% |# Q9 C
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   ) f1 K3 D; V7 S! S
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   4 N6 M" Q; R& t
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    2 N& o( T/ |0 j- a% K. N
11. ;********************************************************************/
      h1 p: v) X  d. R
12. .model small
    ! e1 u, R# G$ ]" g# ?: R
13. .586p
    / j1 c7 B( I  N) n& L  n
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    ( X) {+ Y' k) w2 I
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    8 }( l' h, r$ Q9 d( A
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    $ R/ p4 i4 a# E" |
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    % P+ G* [7 s- A& Z8 W, u& m
25. 
    - |) x/ X- [3 Z8 k
26. PDesc           STRUC
    + V% v5 z, ?; \7 v
27.         Limit           DW      0 ;16位界限
    6 z6 W' S( E$ X  J8 ^
28.         Base            DD      0 ;32位基地址
    # C" R3 ]: ~- `) r4 T, Q5 t
29. PDesc           ENDS
    & u+ S4 `! f) z+ ]) O8 J( Z
30. 
    0 @8 Q* u( `  W$ r5 j. ^7 |
31. GDT_def         Label   Fword
    - N& H" K/ h3 m' i4 J
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    : w: M3 x% l8 i, n$ P
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    % {! h) F3 g1 {4 B$ G
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    
42. ;
    
43. ;       fs, gs即能访问4GB空间
    5 t/ q$ c2 W6 Z1 G; a
44. ;       write your code in here.
    2 h( x" G$ J1 ]$ u  D
45. ;
    . q6 C; D8 v8 u  v& V9 B; {/ ^
46.         .exit
    0 Z2 {; g' j! h7 D
47.         
    : P6 R# Z, o; l5 s+ ?0 k$ w
48. Set4gb          PROC      NEAR
    : J2 R  p9 O$ j; S/ Q/ d
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    ( ]5 D* R- G4 l1 r  j9 C
52.         out       0edh, al
    
53. 
    % T4 R- t5 @* _% ]& |2 h) T+ c
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    & V+ G' A' g. x2 [+ G/ L9 V
57. 
    3 B3 x- R2 \8 c' ^
58.         mov       eax, ds
    ; b# N" ?2 k, V! X9 s$ b0 k' x" {
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    * m+ F+ c& ]- h3 U; V
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    . L# p1 d( P6 H- w- z3 u
63.         mov       dword ptr GDT_Addr.Base, eax
    3 ~# g( H9 a1 C5 M: w' N  J
64.         lgdt      fword ptr GDT_Addr
    7 R1 Q5 C, e, k. Q& v5 k" u( ]! f
65. 
    
66.         mov       bx, 8
    + P. s0 h+ H' \9 j& B
67.         mov       eax, cr0
    0 g' K% F* ]3 }6 n* _
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    1 p! d3 o# E$ l8 N5 u) u# r
71.         jmp       pMod
    ! }& [0 Y% }, K& ~+ O
72.     pMod:
    
73. 
    2 m* p7 s3 M/ o0 c+ _
74.         mov       fs, bx
    . q" ], e8 _) k5 K
75.         mov       gs, bx
    
76.         and       al, 0FEh
    3 p! a* p! g3 c& I5 L& p5 l% S& u
77.         mov       cr0, eax
    0 M, ^# y7 q3 i& B6 v
78.         
    
79.         jmp       rMod
    
80.     rMod:
    
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    , X. N. p: e) {, C, p
84.         mov       gs, ax
    
85.         
    . `8 R; c# ]& p) Z+ d
86.         ; 在2M的位置测试写一下数据
    $ ~9 L5 y* C  ~
87.         mov       esi, 200000h
    ' H$ J# Q0 b/ G! E& j
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    , s3 h4 a4 u. q- U7 R- `
90. 
    ; P) f% H: I; F
91.         sti
      d! t/ ]8 N3 e
92.         ret
    # i: q; [& h# r: X/ r
93. Set4gb  ENDP
    
94.       
    3 s# W' Q; a1 E! B4 {& D' V! Z  G/ t
95. CSEG           ENDS                              ;代码段定义结束
    " a2 D5 l5 p, D
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
5 m+ K, s  Y, ?$ `5 [( M6 d9 A
7 ]- x7 P  q3 J; joption->compiler->code generation中的option选中, [X] compile via assembler
" Y" h- ]% p$ ^1 J* M* A1 r
[ 本帖最后由 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;
/ t  K: A; N3 ], |/ F! m
2 O4 s2 g+ w2 ^- _9 XGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
2 T, k/ |( c: n5 i+ h7 D" _ 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

GDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
* A$ |+ [( C7 w+ |option->compiler->advanced code generation中的instruction set选 80386

& J) `$ o) l3 }, Y* Loption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

) \) [/ }+ I6 g& v  E
我也是相同的问题，请问哪位有解，谢了！

jdf

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