DOS 4G big real Mode Demo code。

bini

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

这是C的

1. /********************************************************************
   + W2 c2 h* T/ O0 A
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   ! `6 e# E- o  ?* |/ R
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   & C; N, l" B! b% O
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    1 u% B# U+ [& {
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    & h1 \+ O, D" p$ A' s' ]( F+ Q
14. ********************************************************************/
    , h  j; ]) m$ s1 \$ ^7 H$ A( Z* v
15. 
    % l- w9 I& K# v; Q* m
16. #include <conio.h>
    6 }  a' s) D( _: j
17. #pragma inline
    
18. 
    0 h; x9 |: V1 y9 q  g
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    
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
    3 Z0 T! @/ D" c2 a
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    ( _1 p) i7 j( L
29.                                          
    , h, w) f1 g/ s! x* U8 i6 @
30.                                          属性Attrib = 0x8F92
    3 h, W0 x4 ~3 T+ |: h
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    - U  G5 n- Q* b, \; r: [) h
35.                                                  (值1=4KB粒度)
    ! g7 }2 y) S* _. G( O6 t
36.                                                  8F & 0x80 = 1
    
37.                                                 
    7 ~) u$ _! p0 e) \8 c+ ~5 i# Y1 O3 @9 g
38.                                              属性位Lowbyte低四位为段类型,值=2
    ) f+ |: ~. B- W+ J( p% u
39.                                                  表示为可读/写段
    1 r" y, Y* h  a# k. @, x
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    " M5 }5 V" R  m, z# L
45.                                          */
      C+ R! M3 t4 E. l1 h, v; r) T
46. 
    / a; h% }) w8 w- ~5 w8 n
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    8 ]# ]3 {" P; ]% B8 q( g. _
49. *    +-------------------------------+   *
    , ~0 y/ X  s; O  a
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    3 F' I. Q% j& _2 R& @- L" T& D& e
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    ' m5 d2 O( N" q9 l
54. 
    
55. /****************
    + [, K) ~( y) l( |7 W) l6 v
56. *    打开A20门    *
    - i) @( }1 w* u6 T4 i. h
57. ****************/
    + L/ a0 a# x6 W7 t0 M
58. void openA20(void)
    / T( _/ {& v2 q2 J3 b1 P
59. {
    
60.     asm{
    - A2 H2 w+ [# P  ]9 f
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    ' [; q( r4 j# l* Z, g9 q
64.         out        0x92, al
    $ V/ F8 e1 ]& Z8 k- `, ~
65.         out        0xed, al
    
66.         popa
    3 t3 Q5 {1 _5 g! v& y
67.     }
    
68. }
    
69. 
    
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    , F' e' m8 \; r. C) u
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    5 F0 o: X6 E5 ~* I6 q1 n
77. *       表示为 2个GTD                          *
    
78. *                                              *
    + t$ s, g" ~2 f/ c% D7 {
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    ) J4 t2 _; q1 e/ K1 ^
83. {
    2 B: K, w/ I: V
84.     asm{
    
85.         cli
    
86.         /****************************************
    0 S5 ?% h4 e) T' V% w
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    : F0 ^" x) h  `6 w0 W4 E3 j# Z: o# m, }
89.         *    |   32bit基地址       |16bit界限|   *
    $ g2 T! E3 _% ?) t; G" q( ~
90.         *    +-------------------------------+   *
    ! H: q; F1 l: ?. l* l, P
91.         *****************************************/
    
92.         /*********************
    9 M5 p5 t9 a- ?% Q5 B3 N
93.         *        得出段界限       *
    , i- M. ^6 K  a, |7 B) j
94.         *********************/
    9 D+ f6 |* y" P7 B
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    , r- P8 [9 V9 E0 C
97.         *    计算GDT表的32位基地址，存入GDTR        *
    " b/ U) K) ]  [& W8 J
98.         ********************************************/
    % [2 t0 g1 `: X* d! M( V, Z
99.         mov        eax, ds
    5 U- q# E0 E4 t
100.         shl        eax, 4
     0 C8 o) S+ e3 W" e) N% o1 l0 R
101.         xor        ebx, ebx
     8 B. y0 N9 ^) P$ B
102.         mov        bx, offset GDT_def
       a) a+ }: t0 W8 h( a) G7 Y
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     ( x1 @  o1 i/ c! a3 h0 [4 q  [
107.         *   选择子偏移      *
     9 C) |' k# T& ^+ {+ F: a& z+ K3 H, N& Y
108.         ********************/
     ( t9 ~; x+ I4 c$ q
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
       R2 ~% }' n  E6 }
112.         /**********************
     * a% y  `3 `% _1 e( |
113.         *     进入保护模式    *
     
114.         **********************/
     2 J0 o9 ~$ k4 \$ ^/ u! |% {/ T2 X
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     . Q% u. p0 u% X/ K1 d9 a# ^
118. 
     $ X! l: m- w/ E7 j: @" G/ _3 k
119.     pMod: asm{
     
120.            /************************************************************
     / T  T: y. c0 w- ]/ T1 _
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     " a( R2 Y. s4 G% c* b" f
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     2 j0 P7 N2 X( S9 E
128.         ******************/
     
129.         mov        cr0, eax
     + S1 M$ R$ ~8 X
130.         jmp        rMod
     : s+ S. x% O/ Q# H: O, E- T
131.        }
     7 L% `# Z( Y: Q' f/ a( x. t
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     - B! n3 \9 k' J7 U' f
137.         mov        ax, 0
     ; A) Q1 X5 [, b1 K0 M2 y: O
138.         mov        fs, ax
     
139.         mov        gs, ax
     2 R# S2 b" M0 c) ~
140.         sti
     
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   4 O$ W( `" P4 x" s- H
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   0 }: J2 P' O) L3 @; a
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   " @6 t' w) N9 J# V' e
7. ;*                                                                   *
   ) x" r& d% H5 [$ n! x$ h  ~- ?# a
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   0 j$ o8 {2 W9 U1 C. }1 K. q
10. ;*      date: 2008-10-08  Frist version.                             *
    5 J7 ~3 m1 l( Y: _- e' Q2 {# ]
11. ;********************************************************************/
    ( Q# C" L' h/ B
12. .model small
      h5 o' L/ S" J
13. .586p
    
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    2 I6 I! p1 V- _
16. 
    
17. DESC            STRUC
    2 {7 w# s- U9 w; M% z& G
18.         LimitL          DW      0 ;段界限(BIT0-15)
    ! q9 Y: D' e: O9 Q# L7 x
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    / k  U7 l2 u- Q4 I' @( h6 r
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    8 M) e3 Y6 `' p$ B  w5 s
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    9 P/ ?, t7 V1 r. k0 L0 ^& Y# K
25. 
    ( p2 X& W( P# D) Y1 `8 J1 n
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    
30. 
    
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    $ S% R, r) f5 q( F4 e
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    4 l/ w" t0 E# v% F3 F( _* s
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    ; d& |( b, d- F* K
38. CSEG            SEGMENT USE16                 ;16位代码段
    + w& h; |9 b- p- ^5 p6 S; X# f
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    & @! P1 E; b5 V: w: s, Y, o! d
41.         call      Set4gb
    0 b/ W3 I8 t1 c* b& P' D
42. ;
    4 _! X" _3 D5 T. T7 t& b# V( K; c: A
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    5 D& V7 z+ ^4 v
46.         .exit
    8 I% k/ }( V3 h$ }$ G9 a( ]
47.         
    
48. Set4gb          PROC      NEAR
    4 W0 \. m& @% Z5 f( X
49.         in        al, 92h
    1 F% y5 G& y0 l
50.         or        al, 002
    
51.         out       092h, al
    ! w) i# X: i1 `% I. _" o! j& J
52.         out       0edh, al
    
53. 
    5 c- p& m1 s6 v
54.         cli
    ! e. v$ d" u- A
55. 
    ' d4 f, s* h. m# P0 ^
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    * N, b, A, g( S& ~- H5 U
58.         mov       eax, ds
    1 q/ k+ s; w5 i* p/ N) Z
59.         shl       eax, 4
    4 T/ i. b9 g$ F# }" d' c
60.         xor       ebx, ebx
    ) L8 C7 l1 n" l; E$ w$ c
61.         mov       bx, offset GDT_def
    : n% v9 E  I* }7 P
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    0 W; p$ `9 c" e* I# \7 m
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    9 i5 q) @! Q2 Q6 B8 |- w+ N
70. 
    
71.         jmp       pMod
    $ j; C! g' W: U7 e, j2 ^4 k* S
72.     pMod:
    7 d' ~4 y: K+ v2 q
73. 
      N$ l! @! c2 k5 T. ?+ I& b, @
74.         mov       fs, bx
    
75.         mov       gs, bx
    7 p  h: B% b/ H
76.         and       al, 0FEh
    2 J8 H( R  r2 f9 t" }
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    , Q3 p' u0 X; k3 A( w
80.     rMod:
    . l& N  u  \, l$ I
81. 
    & G) |3 V6 M5 T' P. K
82.         mov       ax, 0
    
83.         mov       fs, ax
    2 ?' Q7 Y( K  R: u4 c
84.         mov       gs, ax
    2 @0 S/ M0 D* k8 p1 X' Z3 F( X
85.         
    
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    - S" X5 m6 w8 G0 ^
91.         sti
    
92.         ret
    + {7 b8 @' h! v' l' |- M
93. Set4gb  ENDP
    - B* _9 o8 M/ u3 R4 {* t. [
94.       
    ! h% N0 J! k4 L9 E
95. CSEG           ENDS                              ;代码段定义结束
    ( v2 p- C8 U% Y. M/ D4 l  l
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386

option->compiler->code generation中的option选中, [X] compile via assembler
7 L+ c! |7 g. v8 W' J9 @
, L4 O6 a) B. M% C[ 本帖最后由 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;
替换如下，
/ h- i! X! D7 x- K9 H% ^Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
6 n" Q  ~. S" F  J/ \
GDT_Addr        PDesc   <$-GDT_def-1, >
* M& c/ c: d/ C' ^0 X. C  l2 i. L这样你就能编译通过并且可以运行

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

option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

6 F! Z0 u, P+ E; j% n/ z
我也是相同的问题，请问哪位有解，谢了！

jdf

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