DOS 4G big real Mode Demo code。

bini

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

这是C的

1. /********************************************************************
   . f/ E3 X5 i- R# B
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   1 q5 p; K# ?# w8 s
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   : _6 @* F- P8 a% w
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   ; a4 L  C" K2 f0 L4 v# x
10. *                                                                   *
    . j0 q8 q& c, c( l: S% O* ?
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    $ U( X' @& g: |) D$ s% `
13. *      date: 2004-11-30  Frist version.                             *
    9 K% I7 C# I& \+ v6 Q1 ]0 s9 p
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    ' Q  Q3 }5 G5 V6 N! a$ v! _0 c
17. #pragma inline
    
18. 
    
19. /***********************************************
    . d4 P; D, U7 n9 @3 Q
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    2 I4 m1 G' l$ M3 S
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    ) C! e8 ?$ j7 F- s0 g# W+ {1 k
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    / M4 n' i. I1 n# H1 ?
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    $ @2 Z$ H' o8 D+ A2 @6 [
29.                                          
    ' E7 g  e3 w. H. N6 f
30.                                          属性Attrib = 0x8F92
    
31.                                          
    & g' j0 z( u% w7 d$ p, c5 Y3 i& b
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    + W6 Y* |8 Y5 D1 ]- R% D; A8 e
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    ! o+ n* F  u2 c
36.                                                  8F & 0x80 = 1
    * N: ]9 i$ n$ `/ H  p- L9 y) N4 h
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    * ?0 p5 f( g! K* D3 J2 }
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    ' F( i" d4 n5 }1 I6 \: H
45.                                          */
    
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
      A+ G$ O/ `2 c- \: E7 k: m
49. *    +-------------------------------+   *
    # l. a+ p) N. f& @/ Y9 z
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    9 s; k+ p1 E1 \( R6 `0 ?0 W
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    . \" x7 Q2 u' _! U; v" q+ A
54. 
    
55. /****************
    
56. *    打开A20门    *
      t+ k3 E' u! n. [  q5 D
57. ****************/
    # @) H5 b' p% Z7 Q
58. void openA20(void)
    ! ]5 O2 s$ W( k
59. {
    . W2 W4 g* \4 `# A& P
60.     asm{
    ; [3 P+ [- h2 e
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    - V' u# \) C1 s: n. q9 a6 L- F: S8 t
65.         out        0xed, al
    
66.         popa
    
67.     }
    
68. }
      {$ B, u- v6 n
69. 
    
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    ; T1 X5 [3 y( Z; @' G1 p
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    # ]; h: T- R% d5 n) K! g2 g
77. *       表示为 2个GTD                          *
    
78. *                                              *
    ( S2 }$ O1 k. _9 E
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    . P0 l" x1 j0 q! ]6 q( L7 n' ~
81. ***********************************************/
    0 ~# s) v; c$ B  j+ ]
82. void set4gb(void)
    
83. {
    2 G2 ?$ G+ K% I4 G" T$ w$ X: T* K$ X
84.     asm{
    
85.         cli
    
86.         /****************************************
    : l9 |# X9 `7 }0 ~+ J% g0 p
87.         *    GDTR寄存器                          *
    / `; w8 N/ i: Z# h9 ]; T
88.         *    +-------------------------------+   *
    ' H6 i$ p2 [/ b" w/ S
89.         *    |   32bit基地址       |16bit界限|   *
    ) D' _6 c( E( `; H3 z
90.         *    +-------------------------------+   *
    6 K( Q8 T4 j. {) ?: M# A0 M& m
91.         *****************************************/
    
92.         /*********************
    4 I9 [- ^% `7 M
93.         *        得出段界限       *
    
94.         *********************/
    4 f8 n; J; q+ O4 e3 E' p
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    ! e. Q0 f$ M) j+ K+ R1 [+ I
96.         /********************************************
    % M6 v! w+ n" Q7 ?2 ]
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    * R8 F" B8 R  F% v/ S
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     % U6 A/ x) f+ }" W7 V
102.         mov        bx, offset GDT_def
     ' m9 o% z+ ^/ q1 P7 H, G) U2 {& _' I
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     5 \2 j/ ]  Q1 y% ]8 _, i
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     0 h& G; `/ V0 O: Y
107.         *   选择子偏移      *
     . o8 B1 a& \; A" p8 ~, g9 f, g( v
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     4 @, h# }6 T4 b( T" P) c
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     3 r" ^; c* C) L2 m* g6 T) q, R
114.         **********************/
     - {( B8 s. c+ F7 u* p: ?; [9 J- a$ u% h
115.         mov        cr0, eax
     0 d2 a: d. U; m" h- n1 d5 p4 ~
116.         jmp        pMod
     5 A$ I7 a9 V0 z. e# V) Y5 R
117.     }
     
118. 
     + @5 T; b- E9 D
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     5 N7 `- V) F) V2 L; ~/ Z- k3 p
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     / V$ m, w1 `* t+ {7 W
127.         * 进入实模式      *
     ( t% r. l/ d9 q8 V7 w
128.         ******************/
     
129.         mov        cr0, eax
     5 k0 o. [# F8 l3 [+ W) M
130.         jmp        rMod
     
131.        }
     
132. 
     
133.     rMod: asm{
     5 v7 ~; d* T( `8 N: T
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     8 |! y! \: k: ]7 T
137.         mov        ax, 0
     
138.         mov        fs, ax
       _6 M" ^4 C4 A8 w' k8 Y& u2 \
139.         mov        gs, ax
     : G) q" n. e! E( V3 A( T
140.         sti
     ( i! Q4 V+ w2 a& B" e
141.     }
     % Z" M( @; E! o) m, `6 w4 P7 X
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   * T- B( c, G' Z; o; `, f: p& r5 n
4. ;*                                                                   *
   / h: \9 q8 h) h9 e$ @
5. ;*    ========================Title===============================   *
   ! o* d  y3 Y3 s. K" b( O
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   3 M& B* J  C# ^& H% t5 H5 X
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   . f6 }6 g* q( j7 P4 V& z) S: O
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    5 k9 {4 X# ^6 y6 V& V. ?
12. .model small
    
13. .586p
    3 g/ P4 u4 z: T# n
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    
17. DESC            STRUC
    9 l( G5 v+ _% m0 }+ C
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    5 F0 D% H/ s( s& M( d
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    ; ?/ e- ^2 [! s& y7 r" u
24. DESC            ENDS
    
25. 
    & y6 p9 O3 w4 V1 B
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    : n- f' u! L: b+ k- Q8 f
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    / F& B7 o% U! _6 Y. R
30. 
    * b9 `0 y7 P8 n9 K4 B# _- U# k$ r
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    9 s1 `( O0 x- z- t$ @' b
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    7 D' z: Y+ x4 P. S- \  w' K7 }
34. 
    8 r: |1 }. n, S8 m5 S
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    ) h! \& I/ N% a5 s
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
      ?& N' \. J" z
40. .Startup
    
41.         call      Set4gb
    
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    * h+ M  O7 d' C, l6 Y% @0 J# _5 z! S
45. ;
    
46.         .exit
    7 M  R+ ?* J0 A# y8 S  l& F
47.         
    8 D! f+ T8 Y7 {' L
48. Set4gb          PROC      NEAR
    3 g2 N9 O0 ^* J- M" q- P
49.         in        al, 92h
    & D2 e: j0 w4 r- f
50.         or        al, 002
    . Q0 V! I$ S/ W( K, O* V  o( e' @/ T
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
      }8 |0 a) Z' P8 }- t, a
57. 
    7 m- e9 i9 ~8 m9 }& M7 w2 [" N
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    % S& P/ L( g7 ?/ w( v9 e2 G/ \: i$ y
64.         lgdt      fword ptr GDT_Addr
    
65. 
    ( z* {* m* r* k. S) z) x3 f
66.         mov       bx, 8
    / l  ~+ I% x/ D( t  }; V
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    8 n0 ?# S' ]; K) K
71.         jmp       pMod
    . T/ t2 v. j7 m+ T9 F6 H
72.     pMod:
    
73. 
    7 X# u& Z0 g  V( J0 D$ p
74.         mov       fs, bx
    1 Z% K5 e4 V% O/ F, I6 U* q6 A
75.         mov       gs, bx
    
76.         and       al, 0FEh
    $ V! |/ B  c" K
77.         mov       cr0, eax
    * Y+ S$ M4 `3 K
78.         
    * S" w+ Q% E' E( l5 b) @
79.         jmp       rMod
    
80.     rMod:
    2 p: |2 c. p- w9 H8 T; M# p  i
81. 
    % \/ h8 F6 y. t" j
82.         mov       ax, 0
    
83.         mov       fs, ax
    & C0 f. c7 y2 q3 E
84.         mov       gs, ax
    - [- e/ S- f& Z/ P
85.         
    
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    2 C0 h+ h; ~8 Q4 W% ]1 o
88.         mov       dword ptr fs:[esi], 055aa55aah
    # S$ N0 N, B) q6 k; F3 I: d) q
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    ; ?+ W/ c& g1 b1 Q6 [8 F. ]: n0 \. N
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    # a; a" a& |' k3 f0 f
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
# P" e% k: A" D5 P/ Z2 l8 e
option->compiler->code generation中的option选中, [X] compile via assembler
9 U& c1 @8 Q4 l) G( h+ d' W
[ 本帖最后由 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;

' u" h  B  S5 E$ kGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
' T% ]6 @; I! m 替换如下，
* v* |4 H" a2 ?$ T+ M; rNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
. z& l( v0 W3 @7 d* ~- r* sData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
# i: I3 w6 L) J4 |( m, n- Q7 J
- {: Q! {' ~% ?; GGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
+ b/ m3 Z' o% |, @  e: ]option->compiler->advanced code generation中的instruction set选 80386

* b" O4 t0 |( I" \, u3 x. p+ yoption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
8 H  V5 n+ E/ o8 N1 q! c" `
9 B8 [& T7 M8 [5 `6 G5 T   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

5 b1 S  I) d0 i
我也是相同的问题，请问哪位有解，谢了！

jdf

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