DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
7 j+ l3 E' t% A( z5 x0 `% D
3 `  M, `, R6 r+ u6 K- ?9 R这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   ( |* H$ N! z$ v$ x' ]
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   + V/ t& _4 X  w* Q4 M
4. *                                                                   *
   # U: q  l( V( p- t1 w- m8 r
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   ( P; W8 D# l; r5 R% m) i  \
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   ) X* O; j9 Y% q- ^9 ^% W+ @# a
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    8 B7 A0 b, \0 K) v9 W$ H
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    / B& R" F! {4 k2 b# A
15. 
    - r9 _2 m+ J: m% O: _' p2 W
16. #include <conio.h>
    * j% H' I% c* ~# C+ N
17. #pragma inline
    
18. 
    / j! L; j* E- m- U9 X) D
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    / Z" ?1 V  s4 d/ d
22. ***********************************************/
    + S- N$ T% y. `, v" B
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    ! P* g9 n6 c6 H" l
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    * }, O2 A" f7 e" b, L5 @" \8 Z
26.                                       */
    3 f2 |# I2 V% l2 q, H4 ?3 _2 L6 O7 j
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    8 H" p2 R1 G) P/ m* D
29.                                          
    ( j$ t5 i3 l" I/ C  J
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    2 J1 D" j1 n6 w) t( N+ I, b0 L
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    # J6 X& p& M: J& W7 i
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    8 l) C+ k8 b- [/ m. U! E: Z9 E
37.                                                 
    # ?) X/ H1 N9 C, Q# h( v
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    ) @3 z% P& J) F7 N$ X7 N
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    , m& d7 V; h* x, J/ Q
41.                                                  描述符对地址转换是有效的。
    ; F/ [( e  ]2 @1 T+ A: ]
42.                                                  bit0=1表示为:
    
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    * j/ y/ w+ p: L/ L2 P8 _: p8 S  K
45.                                          */
    1 e3 W9 t) [; L9 [5 {; X( m
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    1 t$ `1 Q: F$ y5 ]- f
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    ; B. ]) m  c, N$ D. m/ d9 Q* R
54. 
    # i+ B# B7 m2 J* g
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    + b: \; K8 ]6 a: Z4 a
58. void openA20(void)
    - s, ?: v) j4 y3 o# j& w) r2 T/ e
59. {
    
60.     asm{
    
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    
66.         popa
    / R) m- e! y2 c- M% M. _4 R
67.     }
    
68. }
    
69. 
    6 E% M% [' x. w. t
70. /***********************************************
    6 H! }7 {  ]1 ]8 @1 v3 D7 q. B4 L
71. *    函数功能：进入DOS4G                       *
    ! P1 c: n1 X' d/ x
72. *    ====================                      *
    ( h8 s% G/ z, s) _% l7 |& _1 R
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    9 n& f; q& }( `0 z3 a
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
      I9 I1 m( G( w: W) X
81. ***********************************************/
    
82. void set4gb(void)
    3 ?( e4 b- [# W+ G9 Q; @( z
83. {
    
84.     asm{
    0 `- e: j/ V# B* u# l3 Q
85.         cli
    ' e/ r: ^9 f/ N$ a3 [
86.         /****************************************
    - T6 t0 _9 {8 A" }* {; D& a
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    
90.         *    +-------------------------------+   *
    ) K! U3 |! E7 t  m$ ^( K) R' i
91.         *****************************************/
    
92.         /*********************
    
93.         *        得出段界限       *
    5 F' _; N. C9 k
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    ! |, Z- y" n6 _' p1 ?3 G# `: F
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    / x, A* F, p: L+ b& \8 M' y: J' V  M; u
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     # L5 ]7 T# L" I, [. V/ j) b
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
       `% A5 \. [; D& a4 R2 K- u9 G! E
110.         mov        eax, cr0
     % m- W, Q/ |. j3 ^. Z- n+ t- F
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     
114.         **********************/
     3 \3 P8 {  i8 l2 H
115.         mov        cr0, eax
     8 E$ l9 r' G9 ~$ X8 n/ `7 X
116.         jmp        pMod
     & g' G% E' ^* m, i" ^
117.     }
     5 Y6 r) y& u$ L1 D$ f9 q4 x6 e* ?. {
118. 
     : y, w' }8 k; F1 b  `' ^
119.     pMod: asm{
     
120.            /************************************************************
     7 U3 D7 r3 U1 H9 @- ~
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     $ j: m/ w$ s# Z: O, f2 b
123.         mov        fs, bx
     
124.         mov        gs, bx
     * i/ j; D* O1 ~6 J: e' O
125.         and        al, 0x0FE
     1 I, k- v: h8 `
126.         /******************
       U" j& f) q3 K: A# G- r
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     + R' r6 O1 G+ ]7 w. M$ p
130.         jmp        rMod
     
131.        }
     
132. 
     1 J- N' Z) W# K- z5 }3 R, \
133.     rMod: asm{
     
134.         /* ******************************************************************
     0 b8 c$ I3 T2 k4 B* k+ f
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     7 c* |& M# J0 O6 f7 X6 I
137.         mov        ax, 0
     ! ~6 a: b4 C5 P  ]# D
138.         mov        fs, ax
     , L. X4 c7 U1 ~$ a/ E9 Z' i
139.         mov        gs, ax
     0 o" c& i; d$ O
140.         sti
     % T+ ?) t/ O8 ?) J# m4 W
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   " I0 t* ~1 m  l4 U6 V
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   * |# J4 A; s8 W  b
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   ; U9 n+ v( F3 ^3 f' j
7. ;*                                                                   *
   " O! t% J8 b+ Y/ D* w2 x. a+ f
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    * S0 `7 k+ o$ s9 B* U
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    
14. 
    " y+ Y5 Q: Z, {6 O/ y1 [
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    $ b  z9 {! h8 e+ x4 n# @, J8 M
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    5 V6 k2 I3 \0 k% C0 _) f& R
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    ' c5 u# b1 U4 h) x( N
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    % \. d  G: F( T# D! \* [# X  L" v
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    ( M2 o$ n3 X6 Y" S8 A7 k
27.         Limit           DW      0 ;16位界限
      x9 M9 [1 l( l5 |% Z5 E0 y
28.         Base            DD      0 ;32位基地址
    # }0 i0 _- S6 k5 ^7 Y' K7 X- z
29. PDesc           ENDS
    
30. 
    5 m2 Q# A' E3 c0 l
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>
    
34. 
    3 \; c" b% V1 Z: l
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    ( `/ {3 I3 ?7 F/ y
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    - s7 t: D: z% i! w
40. .Startup
    
41.         call      Set4gb
    , ]4 b/ r! m9 r+ ?
42. ;
    # ^3 A9 L- ^7 k2 }: V
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    , f( Z9 C0 v, E7 S4 O3 `5 h
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    & O) g# s; w# }2 S
49.         in        al, 92h
    2 ?) U3 Y4 I# O
50.         or        al, 002
    4 O6 {) }3 {3 W1 m
51.         out       092h, al
    
52.         out       0edh, al
      y  c& i/ j2 H) E0 R) w- A& u
53. 
    ( Q: l* T. q5 j) Z- G9 W2 v. L2 D
54.         cli
    
55. 
    + @# y/ |8 J: c; @9 Y
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    2 d, W4 v1 p& d' r0 n
57. 
    
58.         mov       eax, ds
    2 r) J3 D) j1 G: g
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    * L) L% g2 P( f$ F7 ~  e
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    + U) P! c- S' q  C% V; c! p: k
64.         lgdt      fword ptr GDT_Addr
    
65. 
    - a" \$ I( p& l7 a( i; f
66.         mov       bx, 8
    
67.         mov       eax, cr0
    * R6 a( L7 w5 r( I! M
68.         or        al, 1
    
69.         mov       cr0, eax
    " ?1 u/ R* `) K' ~- S' a
70. 
    $ x) K; Y0 h! p' I5 k
71.         jmp       pMod
    % g' y% n  T8 J$ S& @' j
72.     pMod:
    " l9 k6 l0 ^; Q3 m7 E
73. 
    
74.         mov       fs, bx
    9 H1 I& A" T# b6 B$ i1 ?6 V
75.         mov       gs, bx
    % W* t* Z4 g. p% B( R
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    % U( f; h( f- M
78.         
    ' V% E, m$ b" q$ J5 e  k
79.         jmp       rMod
    
80.     rMod:
    - C$ v+ ?( p; l: I1 y
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    ! T7 j' t) n+ o; D
84.         mov       gs, ax
    ; {: W/ C' I+ c6 D3 n+ h8 v
85.         
    1 N" T! ^, H/ @6 b( b4 ~; e
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    4 \. e; L+ x7 a5 \
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    # y/ Z0 m! y+ H3 d, F0 I) F4 i( u
92.         ret
    
93. Set4gb  ENDP
    , G+ c' w+ Z  U3 A
94.       
    ; ]) i( |, p' L/ u* U
95. CSEG           ENDS                              ;代码段定义结束
    
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

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

- h# g: ~; H( h; i9 ~0 Y- M[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
& O% Z4 j) |. _0 v7 u! {" @Data_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
) [, }  j. O+ Z: r7 M+ R5 l4 YNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
5 G9 ^& f# c/ ?1 C- SData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
6 F1 g+ c" c$ Z" _. t' u3 i
GDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
, y" o1 W3 T& U# w4 O* E$ Voption->compiler->advanced code generation中的instruction set选 80386
- S. C/ Z$ U  {0 q  U
3 h4 W# j2 Z1 ]1 _option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

6 [2 ~8 S# h& E2 X, o% C
我也是相同的问题，请问哪位有解，谢了！

jdf

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