DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
6 D# k. Z3 G6 H; ?6 W3 q
这是C的

1. /********************************************************************
   7 D: F. K' @% g+ Z( i/ \7 w' I
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   - v" f+ n: {' i3 f( m
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   ) P& r* h( K9 r0 w5 q" Q
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
     I3 r- i* p+ ^2 E7 [
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   / z( F/ p$ v% j( |' x% ]
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    + R1 ?! K. Z- F8 m: H/ L
14. ********************************************************************/
    
15. 
    - G0 {1 J2 W! L4 L5 R  L
16. #include <conio.h>
    1 g; j0 N3 b/ e6 I& G
17. #pragma inline
    
18. 
    
19. /***********************************************
    $ q" y4 }+ z5 w% ^
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    : i- L5 P, U. R: r
21. *    第二个为一个数据段，没有代码段。           *
    3 C2 @4 [) m1 z: w7 k- o1 N% I( _' W: m
22. ***********************************************/
    
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    : v! ^7 D( ?. ~: A* v4 _! c
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    * U' }: A2 s" p$ M
28.                                          最高字节为 base( bit 24~31 )
    & F3 h& ^/ G/ g: y2 M( ]
29.                                          
    
30.                                          属性Attrib = 0x8F92
    7 N6 A' u; }$ w
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    9 V- q+ Z" p  Y/ P! H
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    & I6 t( V- l9 g5 E$ e$ V
37.                                                 
    ( i8 _9 e3 \1 Y5 m
38.                                              属性位Lowbyte低四位为段类型,值=2
    2 ], ~0 K0 i2 d; [6 |4 C
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    ( n# P) W# [: y4 _5 b
44.                                              
    
45.                                          */
    
46. 
    ; N& C! u4 G& M' ]2 b
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    8 O! M( S+ h$ L8 u. p5 o
51. *    +-------------------------------+   *
    - l5 x, q* p. G) h
52. ****************************************/
    " j& s5 n% h0 [5 d
53. unsigned char GDT_Addr[6]={0};
    
54. 
    1 i: }- ]+ Z$ {  R  q1 n
55. /****************
    
56. *    打开A20门    *
    . I/ s* \- y( O' X$ r+ P
57. ****************/
    1 y. b5 D" U  `5 T# @3 m
58. void openA20(void)
    
59. {
    
60.     asm{
    
61.         pusha
    1 u$ `: O6 g) d+ d
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    * ]& z6 }* j' N7 [, J" D" {
65.         out        0xed, al
    
66.         popa
    
67.     }
    
68. }
    8 d& o; x) M* ]5 L1 e& G& U' C
69. 
    
70. /***********************************************
    ; \9 f! r. B& |) s0 F
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    ( n9 N% t4 @8 u  C+ z
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    % U& b7 S, ]6 [4 P, W! O
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    , S3 A7 H& W5 y1 S4 ~6 H9 u/ O! A
77. *       表示为 2个GTD                          *
    
78. *                                              *
    1 ]; w2 D8 P( o
79. *    选择子为所在描述符内的字节偏移。          *
    2 E$ r- J) x  i# Z6 Z* P
80. *                                              *
    % a- Z$ w  z: v. W: [  P1 f2 T
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    
84.     asm{
    + O# Y2 V1 d. R8 f! Q
85.         cli
    
86.         /****************************************
    3 }: z+ s1 \8 K
87.         *    GDTR寄存器                          *
    . g) ]3 D, W, |8 e1 k
88.         *    +-------------------------------+   *
    9 H/ f$ Y$ m: `4 F& e( @
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    ! P2 l$ e5 u0 o+ ?4 I' }
92.         /*********************
    8 P5 k: I& d/ F/ C7 t% t3 [* H1 w! |
93.         *        得出段界限       *
    5 l6 k* D0 {# Z# {; |6 w
94.         *********************/
    9 W; I( _; }  l0 Z( ?5 |
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    5 l' q. f& R; T: B+ c
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    5 T3 A, B, O7 x% O/ ]: a
100.         shl        eax, 4
     4 w' L) h; N! H# j1 ?
101.         xor        ebx, ebx
     " s3 h) e3 ~/ k. M. L, @" e# W
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     4 b& J. l/ y( e/ ~8 I( r4 c
106.         /********************
     1 g: ^* m4 [7 `; N3 S
107.         *   选择子偏移      *
     
108.         ********************/
     , t. H+ f( K# P" R; T1 y9 f+ y
109.         mov        bx, 8
     
110.         mov        eax, cr0
     ; k; d  e, _) p3 F
111.         or         al, 1
     
112.         /**********************
     % l+ c$ v" Y. g
113.         *     进入保护模式    *
     
114.         **********************/
     
115.         mov        cr0, eax
     
116.         jmp        pMod
     $ D  W$ d) M; `  h9 y
117.     }
     ' `2 H: }6 j& n, t
118. 
     & \% n' S4 r6 O1 L( M
119.     pMod: asm{
     : y* T; }6 ]6 y
120.            /************************************************************
     1 {: d/ K. W1 q* r; U# ]0 E+ _( G
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     3 b1 y5 G/ R( Q
127.         * 进入实模式      *
     - X2 G5 [7 d' V8 M9 a! O! C
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     . ~3 A: E- k+ g+ H* V0 R
131.        }
     * L+ @" k* i9 T# S. @  J
132. 
     1 |! A0 x: O, q" B6 H
133.     rMod: asm{
     3 `: u) H. t+ S0 g  c
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     " ~; A3 q6 b5 g; h
137.         mov        ax, 0
     . ?4 Q) y( U7 t4 m$ B0 `# q
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
     8 ]: `4 b) |2 h. Z1 p
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   6 f, X9 [1 v/ Y" L0 B' T
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ; ]. B. x& ]# I' ^
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   * d5 @% ]0 R  c! _
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   : D9 C* a& T) I1 w' `4 B
9. ;*    author: bini                                                   *
   / q2 f5 ~% x2 Z
10. ;*      date: 2008-10-08  Frist version.                             *
    6 z, ~. N( K. B8 ~, g
11. ;********************************************************************/
    : x; G( N% ~4 `+ F3 Y9 x& v
12. .model small
    9 G2 R: D9 c8 I7 [. `. |
13. .586p
    ' B9 Z4 ]" n  R. V
14. 
    & W4 y8 q9 a8 r, a
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    % c) B- b# K9 O7 k# y
17. DESC            STRUC
    
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)
    
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    - h; A" {" P! [$ N. M
28.         Base            DD      0 ;32位基地址
    - {# x: I( }8 |+ b
29. PDesc           ENDS
    + y4 V' C& L4 y# j$ Z- S$ @! Z
30. 
    8 B0 c+ ]! o* K2 i7 \7 X' V
31. GDT_def         Label   Fword
    " {$ ]5 e4 V" Z6 r
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    1 ]0 }: D8 S3 Q" L8 R# U8 R
34. 
    ) |3 k! c  t3 L# q* G
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    ; t# G. ]$ r3 n& D# k: e% d
36. DSEG            ENDS                          ;数据段定义结束
    ( E. e4 ?4 e' Q; J$ [) J4 E6 T
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    ! {" h1 S2 \& j( D
40. .Startup
    
41.         call      Set4gb
    
42. ;
    5 X/ V' V( A; ~5 y
43. ;       fs, gs即能访问4GB空间
      c3 G- A% [2 p5 y8 R, o7 A
44. ;       write your code in here.
    
45. ;
    9 V  _7 O! _, s, c
46.         .exit
    
47.         
    % B2 ~* m8 M% `4 U
48. Set4gb          PROC      NEAR
    # h/ v  `9 Z+ d5 W  v8 O
49.         in        al, 92h
    ! c; d- T; N* W
50.         or        al, 002
    ; g5 L$ H9 O' h1 t: v1 }
51.         out       092h, al
    / R* }5 T" Y( z, p
52.         out       0edh, al
    
53. 
    
54.         cli
    # ^1 t; w2 X' n. e
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    ; u& i& j2 t  y1 e8 ]% x
58.         mov       eax, ds
    9 T/ F' G$ z& M1 n6 `9 k* X9 k
59.         shl       eax, 4
    * p: x; q5 C$ \2 }$ h  p- n: S4 I
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    ' p" ^8 L( j8 B# U* ]
63.         mov       dword ptr GDT_Addr.Base, eax
    4 f& D; I% I- R
64.         lgdt      fword ptr GDT_Addr
    
65. 
    ) U$ @0 L  e, I* i2 M) F
66.         mov       bx, 8
    / G* B& y+ W& u0 _! Q
67.         mov       eax, cr0
    % c, S/ v: T4 t$ m# E* T
68.         or        al, 1
    5 J+ U; [! ?7 L8 p( o! K, _) m/ ^# \9 l
69.         mov       cr0, eax
    
70. 
    " h: d# F6 q; C  [
71.         jmp       pMod
    5 K! o2 ]; h% f, D$ i
72.     pMod:
      x* N: r6 z) q9 |  f
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    : _% I( I$ H" e2 I8 P8 {* j
77.         mov       cr0, eax
    
78.         
    / g7 N! O# v1 s1 e- Y8 c
79.         jmp       rMod
    , c3 \2 u( o% F) S
80.     rMod:
    1 Q! ~; N4 ]$ B! ]$ b* B2 ], N
81. 
    5 x# U- ?+ @0 L. Q
82.         mov       ax, 0
    
83.         mov       fs, ax
    
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    : g, W$ z, x" O" e8 R
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    * G$ Z; H, _" ^* E  e
93. Set4gb  ENDP
    
94.       
    * v( t9 m) X5 m% x* m1 i
95. CSEG           ENDS                              ;代码段定义结束
    
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
0 ^! o2 _& f: w5 O: ^
7 b0 x1 B+ g1 B/ y4 Y4 o$ [' Voption->compiler->code generation中的option选中, [X] compile via assembler
. {( ?1 e3 o$ s) T
[ 本帖最后由 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 W& ?$ \" q. k( _  H4 X4 r
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
; m0 t3 p; e3 z! {1 g$ L# k) RNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

  E- R& n: Q: N, Q5 \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
1 g9 d0 s0 P7 I8 R5 l( U
+ M' a1 K* E4 G  t7 Goption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
* e  |4 J; W) d. g) p6 }) _
$ y! P2 ~- F3 a   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

7 I; |) Y! x, H8 S4 ^8 y' c
# i# k" ^+ b$ [( K# O5 V我也是相同的问题，请问哪位有解，谢了！

jdf

option->compiler->Transfer 设置TASM的路径，就不会提示找不到TASM;
  b% m/ }1 v* o! d) e! F# x还要把TASMMSG.exe拷贝到源代码(工程目录),就可以编译完成了。