DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
; O: M( }; S2 ^, X& v: Q. m
# s3 j' |7 G+ k) O这是C的

1. /********************************************************************
   # Y* K# u8 d% q3 |8 y' n
2. *    File: DOS4G.H                                                  *
   " ^+ @0 S, T% R7 Q! e; m% n/ w
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   # t- k) X- k, z8 c! `( {4 t7 P7 X& \
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    # s8 A. S; l7 @/ D8 m
12. *    author: bini                                                   *
    & T: m1 w- W. V4 H
13. *      date: 2004-11-30  Frist version.                             *
    % B) ?( y6 o+ h$ c$ D
14. ********************************************************************/
    5 X" R' O: k. L4 N  \7 E
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    1 j" _5 q6 Z( E0 B; A7 J8 r# `. y9 W
19. /***********************************************
    5 Q" l3 g" C" {5 Z; y
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    6 F5 a$ T2 D2 d2 Q; m
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    + _& r7 l; e+ X4 O- h3 q/ |3 V
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    4 b5 B6 ~# P; g  j( c
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    7 ~' {/ ?5 `, p3 k
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    0 t3 r3 z: T3 N! h* {' e  _- s/ B: i
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
      C$ c+ _* ]! B: ~7 ^8 b
30.                                          属性Attrib = 0x8F92
    8 |! b2 v8 i. l$ F
31.                                          
    
32.                                              属性位Hibyte低四位为
      W5 O3 h- z3 F* |* R: x  b6 N
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    , Q5 N- E8 I  N; w& ^! B$ F$ V
36.                                                  8F & 0x80 = 1
    
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    3 J- d/ F1 F2 y5 @: H
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    : E, g- b2 D6 C
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    * c* _0 m2 W( W3 _- l
46. 
    $ u5 V1 i1 O' w5 Y# W, V
47. /****************************************
    ( p6 l" C% n# ~8 t6 f
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    ; N- N+ ]3 t3 n; U$ s( d
56. *    打开A20门    *
    ( U- [# I7 D* Y+ l$ ]  X
57. ****************/
    
58. void openA20(void)
    
59. {
    ; p0 W: ]( h5 [
60.     asm{
    
61.         pusha
    # ^; k& c* m. F0 f* t7 K9 v
62.         in         al, 92H
    & Q) ^1 H1 F  _" O9 w
63.         or         al, 0x02
    & f- G+ {% @" ^  n% p2 ^- j( `# l& [0 }
64.         out        0x92, al
    % H: b- C+ m1 _4 m1 b& H0 m
65.         out        0xed, al
    
66.         popa
    / K' s0 E0 o: q7 v- @* m; S
67.     }
    . {$ z% t4 A$ W. h+ {; s
68. }
    
69. 
    2 S3 A9 r' d# x& e
70. /***********************************************
    0 N: h5 i9 U1 h/ Q
71. *    函数功能：进入DOS4G                       *
    ' d' y5 |; M1 p3 H! ?+ |/ E
72. *    ====================                      *
    7 S3 ?% H$ H* I; {" k+ h; k
73. *                                              *
    ) |- Y* L+ Q5 h
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    4 I2 J' @5 e7 o$ T5 y; d, |! `( M3 o
75. *   如：                                       *
    6 N( t  W2 y. ]2 i6 H
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    " {8 e/ {1 f* c  d3 `
80. *                                              *
    * ~, Z: O+ e. Q3 |
81. ***********************************************/
    8 T3 m6 z7 D" k$ l+ g% K7 H  C
82. void set4gb(void)
    ! D; B5 A1 j# n
83. {
    
84.     asm{
    ; i# L  M3 l2 b6 m/ L0 Q
85.         cli
    ( N; ]* J1 ~& Q9 F- a
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    0 H: L7 z2 K( E0 p' ~4 z
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    0 F) Q$ v* n2 P1 `. H- @# q9 m
92.         /*********************
    
93.         *        得出段界限       *
    
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    " z4 j/ ~- z( x# l2 Z9 G
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     + a* T# j- Z7 w, k1 f6 {9 ]& V
102.         mov        bx, offset GDT_def
     6 [2 J# Z9 i# M1 \! U- e* ^5 w
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     $ c! o7 U" |# Z5 b1 L5 N
113.         *     进入保护模式    *
     # ?: n6 h" b; g$ ]+ [- l
114.         **********************/
     
115.         mov        cr0, eax
     : j! c( e  v$ n* E5 l& E  l) ?* U
116.         jmp        pMod
     ! d. u, B+ c6 v
117.     }
     2 T; J2 T* M% q  h1 F
118. 
     3 \. P! ^& O3 k" z1 S" U2 u0 Q
119.     pMod: asm{
     - G5 e1 S5 v. K$ |4 l) |
120.            /************************************************************
     " r) h! }( U3 `3 V$ n
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     : {- M- B3 r3 D$ B* Z4 \6 O/ n
123.         mov        fs, bx
     1 W$ S! k/ @! o' n# p" j* i
124.         mov        gs, bx
     + |  |3 c: i. ~
125.         and        al, 0x0FE
     ) b. U; G% A9 u) n, B! A) u
126.         /******************
     7 G5 Z- F7 Z5 l- V
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     ; j. d& ~- }. k; t8 k+ T/ I
132. 
     
133.     rMod: asm{
     5 F( i( H  `# l- y
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     : r) D1 Y# U; n9 H  X7 u
136.         ********************************************************************/
     
137.         mov        ax, 0
     ( ?+ W8 V8 A! W" T" A/ N: _. Y2 y) A
138.         mov        fs, ax
     3 ]  A( @. \4 p* D/ T& X6 C4 b: B  r
139.         mov        gs, ax
     
140.         sti
     ; p6 q  ?0 [/ p" F. z
141.     }
     5 O7 g( Z/ S- C) L" j; G
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    . z' l$ U1 c% Q) _( ]
13. .586p
    
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    ( Q5 R  @0 c2 W; T$ t: w& T
16. 
    
17. DESC            STRUC
    1 u! A1 O7 R6 T  z
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    0 \( U* q) A! V7 N( Z$ Z  r+ z
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    ( U* i- \$ J9 O. d. D2 @, s
21.         Attributes      DB      0 ;段属性
    4 z% j: n# F, x7 y
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    3 Y+ `6 |+ h$ X$ j$ W# H
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    * v: Z, S& H6 \6 D5 @" I5 D
24. DESC            ENDS
    
25. 
    0 X3 V; J' N; s$ G; |
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
      o4 f- l0 n0 x9 M! c
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    # `/ `( }6 v& H# u! W/ t2 e
30. 
    
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    4 V7 C4 N( @, Q! f" L, a4 n! P
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    2 Z% P* ^- \- q/ b: `
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    ( R# }. F' T7 w  R. k, W
42. ;
    
43. ;       fs, gs即能访问4GB空间
    * ?+ f% Z; _# o+ `4 _
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    # f, n2 Y/ h+ P1 ?* i/ ~
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    * B. X7 K) E1 y1 @! n1 T; v- U
50.         or        al, 002
    1 ?' z, q1 M, Q
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    
54.         cli
    8 t4 I2 c$ {5 i; b0 G
55. 
    $ i8 n+ z: r8 v! A0 L- G- a4 m
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    % @$ M3 y0 C# y' m5 h
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    9 k' d2 [" }1 K; o" `2 f, ^
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    4 \% K3 i& h& \6 Y
68.         or        al, 1
    $ x- R" Q/ P  u9 w/ P
69.         mov       cr0, eax
    
70. 
    6 S9 V4 ~" \+ P6 E9 c
71.         jmp       pMod
    2 |* u# j8 t9 O, r, }, `
72.     pMod:
    
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    , A2 f0 ?# N& N6 O$ E
76.         and       al, 0FEh
    3 `* @% R3 n; y, J% K& d; i# j8 e" ~
77.         mov       cr0, eax
    
78.         
    7 v1 m) Q/ ?; Y. Q  S& q
79.         jmp       rMod
    / ]) P- K$ \4 v8 K6 X! J6 v
80.     rMod:
    
81. 
    . _7 I6 f. J6 f( m; \$ C, S9 r
82.         mov       ax, 0
    & P' u9 I* a( H. D
83.         mov       fs, ax
    
84.         mov       gs, ax
    / o- [5 {4 o5 E/ N2 `6 b
85.         
    : g. q1 w7 i8 q, @+ S, C
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    % A+ b: U$ F2 d3 P  H
88.         mov       dword ptr fs:[esi], 055aa55aah
    $ K1 A% u- [  r) w% K7 N6 _5 X
89.         ; 用RU去看看200000h的位置是否是此数据....
    : d3 a3 F; u, X$ ?
90. 
    
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    * e& b0 j) M8 C+ {6 M
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
% |% t) P3 n3 U) A2 o
" Q& ~/ Q, w& [* W# joption->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;
Data_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
  F( ~5 Q4 j* @9 ~; N9 \$ T 替换如下，
& ], D& r+ D; S1 p0 LNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
# M& w; O+ X8 l$ ?7 v! x
1 u7 Y0 T6 k& D7 [& d" b, vGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
+ M& T& _# F$ Q  z( |: f  y1 r3 Z, Loption->compiler->advanced code generation中的instruction set选 80386
% X( L, I9 w# I, h
option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
8 g: y5 H# N. h7 F. J0 }
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

9 W' \* f$ S: v* V. _+ m- T' c- r6 q我也是相同的问题，请问哪位有解，谢了！

jdf

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