DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
) h" ^" O+ V" r& r1 g
这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   ' X1 j/ [  G) _' a
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   7 O" g5 ]2 R* A# C
4. *                                                                   *
   : B! v1 V2 `" Q) H) B; }2 y
5. *    ========================Title===============================   *
   + u& @, `9 v* G4 z3 ^( t6 d4 m
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   6 l4 }2 b( \7 }
8. *                                                                   *
   & ~- \6 w* n  N# y: h4 d3 v1 R
9. *       使用: openA20(); set4gb();                                  *
   . o; F2 W( C& x9 d. Q) e5 r. B$ x
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    : H1 E  b2 k- y: ^4 `) K
13. *      date: 2004-11-30  Frist version.                             *
    7 W4 }5 i1 }/ O8 M0 k0 [: ]
14. ********************************************************************/
    2 W+ ^6 u3 q+ S9 Y& Q
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
      u7 q$ I8 {4 ]% i, r
19. /***********************************************
    & {' B) E: L" k0 o
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    $ V& G" C9 G, K1 m7 _, b6 `8 Z
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    . \8 e8 S( p/ T4 d: y
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    4 L% J7 w1 J! {' s$ d' H
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    0 J( x1 O# y3 z4 \  S
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    9 \2 a/ c! I9 C2 @( Z
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    * @2 E6 A! N* v$ p+ `# B2 q, i
28.                                          最高字节为 base( bit 24~31 )
    % ?; b8 B# j2 g
29.                                          
    , R- P# z* {3 u
30.                                          属性Attrib = 0x8F92
    & J8 W0 a3 n5 R, m; T' l, o, y
31.                                          
    0 m7 J1 `+ E* y4 K1 k6 l7 N* o# j9 s, W
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    / w% n! Q4 J& M
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
      Y2 a, U4 ^* W
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    4 f/ h! J3 e: y& A9 W1 P. S
41.                                                  描述符对地址转换是有效的。
    4 L7 m' c9 ^( R7 M
42.                                                  bit0=1表示为:
    * O2 G' E5 y5 K
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    
46. 
    
47. /****************************************
    6 ?3 j4 G& @5 e2 q2 M* B
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    : Z" S2 h, z  F% C: Q
52. ****************************************/
    + S2 h- U; F7 u( h1 r+ D" u/ B1 r
53. unsigned char GDT_Addr[6]={0};
    
54. 
    ' C/ l; J  y5 U4 k
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    
59. {
    0 a$ j6 d4 R; G8 T9 a
60.     asm{
    2 n2 Q6 h5 S) u5 K% |% Q
61.         pusha
      ~( r/ y4 n( V4 U# H
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    
66.         popa
    6 k. i0 A  l+ x* l* D" M1 O( ]1 I
67.     }
    
68. }
    . S) i# h% h3 q6 s
69. 
    
70. /***********************************************
    2 _/ }* u& z- _' L
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    ; Q2 {) o7 c' N" O
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
      B2 k' [" o) Z2 M4 Z$ k0 I3 t: F' m1 w) P+ R
77. *       表示为 2个GTD                          *
    8 R6 T2 P$ F& {9 q! J& ~  Q' x
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    
84.     asm{
    * g$ M) X/ \) \; {  d' P
85.         cli
    % w+ k, A% L) Z  b
86.         /****************************************
    ; r! N+ Q& N) i% [( {, @& S
87.         *    GDTR寄存器                          *
    - c9 J! d! l* Y
88.         *    +-------------------------------+   *
    1 e: ~2 X/ \9 U( m, F2 g# I# ?- l
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    2 _2 W7 e5 }7 Z# o: h* F4 j: ~
91.         *****************************************/
    
92.         /*********************
    ) b6 f$ A8 c# `1 l9 G6 J
93.         *        得出段界限       *
    
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    6 J9 h* H5 z0 N! C6 ^
98.         ********************************************/
    
99.         mov        eax, ds
    + g8 t0 N. d+ \: X" L" v: T
100.         shl        eax, 4
     % b' {3 `$ T* `5 `% m8 ]
101.         xor        ebx, ebx
     % M/ G5 T$ {. j8 p
102.         mov        bx, offset GDT_def
     # L. V4 ]9 y5 N
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
     8 k; t+ I  n! F* q7 _- T+ j
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     
114.         **********************/
     * {& }* D& T5 O& R4 N7 w
115.         mov        cr0, eax
     " G; U& Q8 B' Y) `/ P! o: A, ]
116.         jmp        pMod
     0 U$ H' ~9 O- i$ e% P) I/ G3 G( h
117.     }
     
118. 
     
119.     pMod: asm{
     $ l( [7 s" R+ P8 L7 e2 I) w: T) x
120.            /************************************************************
     5 E) K4 `) j* c, x* v, ?
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     - z' L/ K1 e( l$ D- i1 `; l7 v* S
122.            ************************************************************/
     
123.         mov        fs, bx
     
124.         mov        gs, bx
     1 [9 c& C" o) ?8 Q" ?
125.         and        al, 0x0FE
     - K- i/ |4 r/ Y: D8 ^
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     5 ^3 Y& p% {+ y, a
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     
132. 
     2 `. Z9 V$ a$ \+ v$ }' i  d7 K$ ?
133.     rMod: asm{
     + i3 D: I# @& I  ?
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     # g! [. `# k8 T" A3 q4 w
136.         ********************************************************************/
     . j1 }& X# m8 ?  i. c/ f
137.         mov        ax, 0
     & {! r7 _9 h: S' ?5 I1 i
138.         mov        fs, ax
     
139.         mov        gs, ax
     ( h7 K! R! q8 v2 M6 K7 }
140.         sti
     
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   8 c5 M; D% p- v! q
2. ;*    File: DOS4G.asm                                                *
   * N4 |. l3 {: Q, G6 V2 ^! g
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ) G. t7 o9 w$ P" _% i: x8 I0 F4 }
4. ;*                                                                   *
   * E1 I2 W$ n/ z- q- [
5. ;*    ========================Title===============================   *
   4 u# ?  W* i3 ^, E" n1 g
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   , S# X) R  R' }2 P/ w' ]* E8 M
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    7 T: O( K$ v" H8 Y0 n5 h6 l! O. q
13. .586p
    $ U8 ?/ g2 x# q& Z
14. 
    ' Q& Z5 f: ]2 m2 Z( }/ G/ z& n0 j3 J3 \
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    0 d" O1 _; W  y! Z. F
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    " _$ l  ]% j5 W3 }$ E
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    9 A  c  O, U) G  _* ~5 X7 _
25. 
    ' I, k* d1 O2 n; |
26. PDesc           STRUC
    # k6 F& ?8 B+ @/ K
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    2 K: `3 T* n- h8 v9 ~! I; X5 ~% |* Q
29. PDesc           ENDS
    0 _6 w% d3 I- D! S' a  a
30. 
    
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>
    9 v/ v$ w/ T' `9 y- w; D
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    2 A& Z, w2 }* P5 `5 S
36. DSEG            ENDS                          ;数据段定义结束
    + X7 p" W: u" ]  U# M6 b) I) g# P) [
37. 
    6 d3 P# D: _- u" T4 e9 D
38. CSEG            SEGMENT USE16                 ;16位代码段
    5 q% {) {( W* N
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    ; w3 G& p! B% p4 |$ z& E2 y7 P
45. ;
    
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    . [! S! s' c2 ^7 X
49.         in        al, 92h
    . c: D% N3 Q& M. m8 L5 \7 P; {( ~
50.         or        al, 002
    ) d6 l7 P# f* H- r5 }3 d: [
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    5 ~: Y( ^6 [8 E! N
54.         cli
    
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    - y3 m" e# U8 c8 z
58.         mov       eax, ds
    - K' V5 J" _/ P3 m$ T
59.         shl       eax, 4
    * m% H9 u6 y: y& _' G& k
60.         xor       ebx, ebx
    3 P& e6 d: J2 O: i3 Z' k
61.         mov       bx, offset GDT_def
    5 o. [' n7 q3 Z5 J! I; f
62.         add       eax, ebx
    5 A1 C; Y4 r( c9 ~8 _  t5 [, w$ r1 T0 m
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    2 q+ `6 Y* G* K# z& C
66.         mov       bx, 8
    1 j+ T2 n$ `' ~- A* q- o
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    . B% f& R# C. g$ _) B
71.         jmp       pMod
    2 d- U; h; ^3 E5 X" M3 e  o4 T
72.     pMod:
    # M4 \4 F; S" J9 f- s0 W% E& K
73. 
    " r' `- [  h% j4 r. h9 @
74.         mov       fs, bx
    ( a- k& H, M4 A
75.         mov       gs, bx
    
76.         and       al, 0FEh
    + g- n3 F7 d/ n: i4 H# w9 Z
77.         mov       cr0, eax
    : q& [4 C! ^4 B/ X4 a3 M9 r3 i
78.         
    / n2 D0 Y; q3 U/ `* H1 D$ r
79.         jmp       rMod
    
80.     rMod:
    % ~& n1 m2 h' H3 B" Z
81. 
    : `- |- p! z  ~, e( r3 F
82.         mov       ax, 0
    
83.         mov       fs, ax
    6 l4 I) N' O7 t& E: X/ k. c
84.         mov       gs, ax
    / q; D, v+ |4 {$ m" A% _% b
85.         
    
86.         ; 在2M的位置测试写一下数据
    & S& k6 k9 V  P; J9 X
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    7 p* l3 a. v8 F( j0 h
91.         sti
    # h; t, V; u. ]+ U/ d
92.         ret
    
93. Set4gb  ENDP
    
94.       
    2 Y/ Q" V- W$ h  q
95. CSEG           ENDS                              ;代码段定义结束
    $ T; o/ r2 F4 r6 A
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
/ _+ @2 ~: q( |1 ^1 K: d' ?$ U2 A
$ m) A+ U5 z6 N1 X. B! Z, voption->compiler->code generation中的option选中, [X] compile via assembler

9 ^' p& H) k% q9 F8 j: `& S[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
4 G$ g" ]" h' k5 B( O4 m5 NData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

  D6 y- B" W; ]GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
  A9 b6 l- O+ v 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

* t1 k/ Z& Y. k1 Z: D/ lGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

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
) U0 y) J$ c  \. U' `
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才行。这个是什么原因，请各位大侠多多指教 ...

我也是相同的问题，请问哪位有解，谢了！

jdf

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