DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
" j* x* s. W: X( W8 d3 u9 `6 h
这是C的

1. /********************************************************************
   ' S; {& J( X3 ?; `1 j# n" h  Q
2. *    File: DOS4G.H                                                  *
   / h) B; t6 A; i+ M
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   3 A9 c) n4 E; j. h/ i; a( T' J
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   " l2 P2 y4 X- S# R
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   ( ^5 Z6 I' t* y# d
8. *                                                                   *
   6 ?  K# B0 h6 E6 G
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    0 ~- k! J# _) J, U9 M
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    . _9 ]; P3 ~# e* c
17. #pragma inline
    ' \- l- b0 f8 \6 i' ^$ H+ Z
18. 
    2 S8 V* E( X& g9 u
19. /***********************************************
    8 B- R8 {- v! {1 p9 j1 [! s/ W
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    ( ^* W: S* U3 d0 o
22. ***********************************************/
    6 [. q/ U; ?* F/ o/ G7 q& I
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    7 U4 X; _; f, |6 x$ v$ ^; l
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    : \( d" f* l- h/ I4 C% t8 P7 E
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    ' [: c3 ^. F% M% f& t$ I6 V
29.                                          
    ; S. s3 S! X0 f, X/ {
30.                                          属性Attrib = 0x8F92
    * L9 Y6 l0 `- a; I" V: [7 X+ \' [8 Z
31.                                          
    
32.                                              属性位Hibyte低四位为
    7 H8 I  U. S, _7 A; V# s
33.                                                  Limit( 16~19 )=F
    / Z6 R0 T! f/ Q" ?9 g, Y' V$ r( z
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    / B$ X2 z; [! Q, ?# t: ]+ A7 D' o
36.                                                  8F & 0x80 = 1
    3 b! ^# M- }9 ^' r3 d
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    * F% R9 b0 ~8 n
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    ! j! E( H6 H) Y4 d
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    ; i; S; ]0 V* B! @
44.                                              
    9 l2 V. b/ ~  L  m* \7 F+ D0 g2 z
45.                                          */
    
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    ; S3 F! R/ e# h6 J# Q9 v5 h
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
      o- g4 p; e" m# \# J: s
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    
59. {
    
60.     asm{
    " g) D5 x: I( h7 V
61.         pusha
    
62.         in         al, 92H
    & }1 H& ?( q1 c& K' d
63.         or         al, 0x02
    
64.         out        0x92, al
    3 ^9 ^, f- |- u$ l* ?6 F: Z$ \* W' Z
65.         out        0xed, al
      x- o, K0 O8 F, N' x7 s$ n* a4 p8 x
66.         popa
    % g% W7 ^' h: j9 ~
67.     }
    ) {) N4 U7 h, `4 v% Y& h% g4 ]
68. }
    
69. 
    ! s5 i6 L' |5 a7 J* T0 w
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    , M% p5 _& B9 s$ s+ Z1 w2 y' x2 Q+ L# ?
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    3 L" w! u9 |& C: L4 ~
77. *       表示为 2个GTD                          *
    
78. *                                              *
    % `& B, S* D1 ~. _% N
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    % Z; V8 z  X! |
84.     asm{
    ' m9 j1 s0 H1 ?3 G9 q1 S5 ^
85.         cli
    
86.         /****************************************
    & \6 F6 G7 R9 U* f7 T- W
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    3 T% M6 E# B2 J+ d1 \1 r6 A% |
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    / b- r- L1 ~1 M/ g, A
92.         /*********************
    
93.         *        得出段界限       *
    
94.         *********************/
    ( v) ]9 \0 ^/ y$ g0 b- K
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    ; ]4 [7 O1 n2 n/ [+ Z- h
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    % F- W! ^& O  E" {
99.         mov        eax, ds
    
100.         shl        eax, 4
     1 a/ F( s/ Z9 O+ `+ Z+ v
101.         xor        ebx, ebx
     , z6 h" Q6 m) `
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     5 y& Z6 b6 K5 g- g- i
104.         mov        dword ptr GDT_Addr[2], eax
     ( L1 I' l+ I" s# o
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     % k/ K& i6 @( p, \; F) w) o
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
       c: T! N6 s. q: T$ ?! `
111.         or         al, 1
     
112.         /**********************
     ( y6 n2 Y0 X. P) o
113.         *     进入保护模式    *
     
114.         **********************/
     * I' g# `. y" t. _7 A- s5 G# T& |
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     
118. 
     5 o% v, y1 g: I* |
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     , M' L; L* _( t5 `
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     2 |! P# D$ [, K# G3 G
125.         and        al, 0x0FE
     
126.         /******************
     * @+ R* y4 i% y1 L* r2 A1 Q* ~
127.         * 进入实模式      *
     3 R; }/ a4 ~) V. D! R# h- T+ `2 X. p- S
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     ; V" ]: E+ S2 Z" m4 l* N
132. 
     , E" L/ g4 {  u( g# @
133.     rMod: asm{
     . {4 l+ C$ s, y2 u2 j; Q& W
134.         /* ******************************************************************
     3 d: h1 p8 J$ i) V' ^
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
       ~: z  D6 {# Z6 p
136.         ********************************************************************/
     + |' v1 ~" B& w" c, \* D
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     4 |6 B& O4 B5 B
140.         sti
     ! B! b0 Q" c% W# Z, n* ~
141.     }
     - H$ n- |, ^& E2 J; V
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   ( ?- x% b+ ^( u, e) m5 s
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   : X, B1 u+ e) I& Y' R
4. ;*                                                                   *
   ; \+ U4 d& K( A
5. ;*    ========================Title===============================   *
   6 b' `4 l. l4 @3 P5 q6 y
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   . a+ v- d$ b1 E% }3 ~/ i
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   ( J) y1 W2 j1 I" I$ f
10. ;*      date: 2008-10-08  Frist version.                             *
    $ U) N& {2 s  T* R) P* A' u
11. ;********************************************************************/
    
12. .model small
    " a8 O0 [' n6 z+ F
13. .586p
    5 d$ C3 O5 D9 A9 T, F* K1 ]8 d
14. 
    , y( ^4 t" }8 }7 o4 u% o. l1 a5 _
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    " W- K. g7 f1 f$ a! _/ J6 u
17. DESC            STRUC
    ) E+ N1 W/ V0 q! c5 V1 k
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    ) Z- \1 V( ^9 ?. S# T6 [
21.         Attributes      DB      0 ;段属性
    $ `  L9 N  g+ p) B/ C  C" M+ x7 _, i
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    2 N+ j3 Q) h4 h
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    ; ?4 ~) C. p" k' O4 G) ]
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    9 w% Q2 ^" W1 @+ l* u2 u+ x& h
30. 
    4 z! G0 ^3 ~) O
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    + d& b  H% M/ {  O; x; d$ T% p) P% |
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ! l6 s# B& {) Y  W. ^6 m- G4 v/ q$ z
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    ) R) n, L* R7 M5 Q+ S  p
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    , U# X4 Q& c) j3 h  {! E3 d
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    5 X, p- ~7 F& V$ Z& y
41.         call      Set4gb
    * Y7 \6 Z' e% I9 P1 [# ?  u  v1 J
42. ;
    . i: t; q7 d& h7 E* a" M
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    - y7 g- x  w/ b
45. ;
    
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    % X3 q' M8 f( r9 t6 ]8 m, |. w
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    - V2 g! B7 K* N7 D/ K  H
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    ' Y  A8 P* i% Q* ?! x7 u% K
61.         mov       bx, offset GDT_def
    ; ~+ x5 H4 ]. u9 K- q  S
62.         add       eax, ebx
    ; ^5 o! k+ O* R' E
63.         mov       dword ptr GDT_Addr.Base, eax
    9 Z7 P" @0 Y0 [- `( i7 D
64.         lgdt      fword ptr GDT_Addr
    ) M* z$ B! K) T+ _+ ]! J
65. 
    1 _7 P: r9 v1 t; T4 W% X8 B
66.         mov       bx, 8
      q2 Y3 X% I$ I2 p8 `( m
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    0 ?9 t1 i+ o; G8 h
70. 
    
71.         jmp       pMod
    : ^: T& B5 ]: l; V2 J* E/ _
72.     pMod:
      D5 [4 Z  i% P9 X
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    3 U/ a" _* H3 _2 `6 y5 [- L- ]
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    , @- s; m  L2 ^8 L
78.         
    5 V  A8 Q! a* s* f1 E
79.         jmp       rMod
    
80.     rMod:
    
81. 
    
82.         mov       ax, 0
    - \7 D- U0 q. H8 `% D: Y
83.         mov       fs, ax
    2 G# q- t" y: p( r  \3 h
84.         mov       gs, ax
    
85.         
    % I6 f7 _) c, J% C0 S( {
86.         ; 在2M的位置测试写一下数据
    1 W/ P/ |8 {+ y$ h6 L! q* [
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    7 p+ u, ?: M% d+ A8 V
89.         ; 用RU去看看200000h的位置是否是此数据....
    9 p9 p) `; l! |+ f3 l. x
90. 
    
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    7 _$ }% R1 g+ Q& \$ B8 J, q
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
      N# d! ?% R8 c  \
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 J+ {5 ~8 u7 V8 y# ~8 ], ?/ V
1 J' R! M5 s4 w+ e. W$ y[ 本帖最后由 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;

# r. c! i) J4 W  \- n, `  ?GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
0 M8 D+ N9 r+ \ 替换如下，
' F1 K$ c& S( |/ A) `9 YNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

4 ?/ D- o' B" pGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
; q& _7 Y/ b  [" joption->compiler->advanced code generation中的instruction set选 80386
1 w& N/ r1 n& H0 r8 o
option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

! D# O7 c4 {0 q
我也是相同的问题，请问哪位有解，谢了！

jdf

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