DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
& m, |* ]2 |! B  l  Z9 o
+ \: S7 ^4 ?% D' K# H& p这是C的

1. /********************************************************************
   * s; t) k$ g  A6 ~1 Z0 b' l9 {
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   , b! ^# m' T  q7 T& J
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    % C- W6 C: d- d- L6 j0 y+ a
11. *   ===========================History==========================    *
    5 D" {- O' Q' l, F6 _
12. *    author: bini                                                   *
    1 l! i* n1 D) N" `2 p# b) @0 f
13. *      date: 2004-11-30  Frist version.                             *
    5 X& c* ]8 f. q0 Z5 f8 \6 [
14. ********************************************************************/
    
15. 
    ( }  N* d. ~' B6 k
16. #include <conio.h>
    
17. #pragma inline
    4 W: Y; K% f  Z
18. 
    - k. p. B8 x; n9 G
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    8 t! t9 {' H! h# _  ]7 S
21. *    第二个为一个数据段，没有代码段。           *
    / x) n+ Q+ |4 T& X
22. ***********************************************/
    / H# q( R! U! |4 J$ [
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    9 t) }+ f) X9 O) A, @9 h: u# c$ B
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    8 K6 c$ c- o' ?" B, l( U
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    1 \1 g* J9 @, J
33.                                                  Limit( 16~19 )=F
    : P) v9 |2 h- O0 [) [- [  L
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    $ @) @1 ~) D- d5 p% e& Z& h( ?1 `
36.                                                  8F & 0x80 = 1
    : V3 J3 a1 o+ Q+ Y. \& I+ r
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    1 e+ [) p# {' @7 ]6 b" b
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    2 j# i, m/ E5 M4 m
42.                                                  bit0=1表示为:
    9 a' o/ g( R8 x" A" H
43.                                                  系统段描述符。而不是门描述符。
    % f- ^; m' O* |% L, x
44.                                              
    
45.                                          */
    
46. 
    # h1 `0 m: e; x$ U, ^
47. /****************************************
    + X( s7 k$ o/ [4 B6 {
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    ( |4 Z! W. X( f( _3 g- q( N* ?
53. unsigned char GDT_Addr[6]={0};
    
54. 
    % m! v& l, _+ e$ D$ e5 j
55. /****************
    - t2 }$ K+ P" @" M
56. *    打开A20门    *
    7 w* [8 h9 Y6 T  W# B+ L
57. ****************/
    1 v& T: g; }1 z! C
58. void openA20(void)
    . P% t/ j+ P/ T7 D
59. {
    0 F* M$ u3 n, \7 h" ?
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    4 q; D% i$ G1 a2 m* C! Z
64.         out        0x92, al
    + c  s* G! n% Z0 _% ]" o" I% y
65.         out        0xed, al
    ' v5 h% E/ L5 J; V8 R
66.         popa
    & g: P& x6 k0 Y( `
67.     }
    $ y/ W7 Z6 x0 V" M3 c" s3 A" z
68. }
    
69. 
    
70. /***********************************************
    , o" G* z+ \& _1 T, H
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    6 R" D# h/ v+ ?* O8 N
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    " n* n0 G% @; l3 _9 J
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    . B1 {% e; a$ d/ z# l/ W" Y
77. *       表示为 2个GTD                          *
    ( I9 z) U; f- {& U% C
78. *                                              *
    ; A/ g; X5 p" C1 D
79. *    选择子为所在描述符内的字节偏移。          *
      x0 W3 y  _1 ?" N  U
80. *                                              *
    
81. ***********************************************/
    7 Q- z2 `/ {4 h1 Q3 A( G* W- _
82. void set4gb(void)
    ) A7 N. j2 l9 R2 a. O
83. {
    
84.     asm{
    - T7 z) K/ O. x$ \9 m
85.         cli
    / H# k6 Z# A9 v* X
86.         /****************************************
    4 \/ u- t0 s$ h
87.         *    GDTR寄存器                          *
    . o, `6 M2 u# n+ W1 m
88.         *    +-------------------------------+   *
    3 n! z+ g2 ?3 G) D
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    
92.         /*********************
    
93.         *        得出段界限       *
    
94.         *********************/
    5 E0 X$ U# i7 C8 k. \
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    ( G8 f. U: Y# s
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    $ u5 E" ?& T7 ~$ ^" k& j
100.         shl        eax, 4
     # X* D3 g, _* }7 q5 V* i$ _+ d
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     5 I; [: X$ W% u/ M( K
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     7 w3 t  O" E0 @4 s3 L: F  k3 ]
107.         *   选择子偏移      *
     9 y/ _  ]/ ~$ B* `, x
108.         ********************/
     7 S1 a+ d* J" K+ g2 L" [
109.         mov        bx, 8
     
110.         mov        eax, cr0
     2 z% F+ b+ j; F; X! U
111.         or         al, 1
     - A! h7 ~& i4 z0 [) i8 E! q
112.         /**********************
     , O; \6 D! [4 b* X$ r7 Z
113.         *     进入保护模式    *
     ! X' F. N# p9 S: f  }" p  l
114.         **********************/
     # V, c, D  Y2 U- W0 a
115.         mov        cr0, eax
     8 f6 ^" ]  ]* U* i
116.         jmp        pMod
     1 C) W% I# Y$ }& \  l# T7 r4 N
117.     }
     
118. 
     
119.     pMod: asm{
     ' b) y: Z3 L4 o8 m, C, h! ?
120.            /************************************************************
     : r9 E% F5 Q3 n/ @' ~8 o& x: h; K& ]
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     . c4 r' s3 `% e& u
123.         mov        fs, bx
     / P8 o" b7 K( j% E3 O. U6 p, O0 ]
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     ' ~* N+ U( i- P. i
127.         * 进入实模式      *
     
128.         ******************/
     6 Q5 r: L) s6 ?( P
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     
132. 
     ; j9 a4 R6 [7 p: Q& {
133.     rMod: asm{
     
134.         /* ******************************************************************
     8 r! v7 i0 `3 m* N* s  W( H9 D- C4 ?
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     $ E) p& g" f8 B$ H6 [7 i
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
     9 N- ]# T( I& I6 ]7 H4 z
141.     }
     / k0 L& V. C2 ~) l; J0 U6 c
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   0 Z; z1 C& ]) p% c8 Z/ S
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   & H# w$ U% J$ P9 t
8. ;*   ===========================History==========================    *
   ( S) T) F. G' A
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    + ]! R: A0 j% Q  }& |1 `
11. ;********************************************************************/
    5 m9 R9 U' o2 o, p* S3 k
12. .model small
    2 v; Z" \; T% V7 b& g0 Z
13. .586p
    
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    4 h8 Q/ `. |  M* J1 Y
16. 
    * `6 }5 J! U$ E
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位)
    - F6 b* e  a9 L5 F5 R
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    / i. p* R' \& `' }6 |
29. PDesc           ENDS
    
30. 
    - t3 o) D; |' j- \( @, m" \! [
31. GDT_def         Label   Fword
    
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, >
    " ?! F- b9 s0 e+ H$ {) p9 Z
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    9 n) T' j, N7 _$ V/ f5 r+ e
38. CSEG            SEGMENT USE16                 ;16位代码段
    5 P1 ?8 b& T% o% @3 t4 i4 f
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    
42. ;
    : g/ ^0 m; W6 S0 R/ O2 l3 K9 F
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    6 `( ^" R% J: ^* K  O4 Z
46.         .exit
    
47.         
    , j6 t6 J8 D( }; N
48. Set4gb          PROC      NEAR
    ( f8 w% [& U. \6 p2 O" X
49.         in        al, 92h
    0 K5 P8 }- b& g  _4 q3 i
50.         or        al, 002
    5 ^4 d3 x& |- Z7 P5 p9 j
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    7 Y- S5 X2 @# w" {* h
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
      B0 k& y6 i' Z2 l3 [  S; W" N% M8 K/ m0 F
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    ) t9 G- E+ ?* x
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
    
65. 
    7 X: c5 H5 s& a$ x" D
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    * H& K* P; m6 b+ _* z
70. 
    & F- W& M' V! g- G! g! A
71.         jmp       pMod
    
72.     pMod:
    * V0 M8 s; n% A3 c
73. 
    " c- x! K7 u0 J  E( @  |
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    ' f4 O, {0 T. ^+ p8 L9 \
78.         
    
79.         jmp       rMod
    ( i5 u$ Q1 F! w# s! Y; V! `0 n5 p3 K
80.     rMod:
    
81. 
    0 |* M3 C+ k/ c: j' q. y
82.         mov       ax, 0
    4 b! D0 r) f  {5 `# g! x3 g
83.         mov       fs, ax
    
84.         mov       gs, ax
    
85.         
    & B' ?, a" o" [+ o8 A
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    & Q/ D" Q7 x5 p8 h: f0 M6 y* ?
88.         mov       dword ptr fs:[esi], 055aa55aah
    & L/ ?+ E) T+ u1 F/ M
89.         ; 用RU去看看200000h的位置是否是此数据....
    : Y' C9 C* Y! C
90. 
    ! @1 B2 G. X( q
91.         sti
    $ S% N. ~: W4 \$ {
92.         ret
    
93. Set4gb  ENDP
    8 h: r: l) `0 ]- j
94.       
    ; Q( k' a; S* v# R, Z0 h
95. CSEG           ENDS                              ;代码段定义结束
    ! K6 |( H: ?# F7 r3 z7 L5 S2 h* W" d
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
6 i! Q! ~' J, x/ B
option->compiler->code generation中的option选中, [X] compile via assembler

2 n& V8 q1 k3 `[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
$ k4 X7 K, o5 PData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
9 l1 }, `# o3 ?* z, O
GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
5 P+ h8 ~% }4 F1 a% ZData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
, a$ I! m) S# \; W
GDT_Addr        PDesc   <$-GDT_def-1, >
# k4 q2 ?3 H3 p: d  _- D这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
% U* O  e) A! B  toption->compiler->advanced code generation中的instruction set选 80386
1 U& W$ `- a1 H
- u  d: c- E, l3 g& O9 n  R6 voption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

7 j' V$ v* Z& Y( U) s* M) Z
+ e. ?3 l( e5 ?' u9 \0 E! z9 j$ L我也是相同的问题，请问哪位有解，谢了！

jdf

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