DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
3 X7 f' x. b9 H# D% ^
这是C的

1. /********************************************************************
   * l4 I! ^4 ~4 y& Q$ k
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   3 S" N5 o. a3 H7 q. V
4. *                                                                   *
   
5. *    ========================Title===============================   *
   - q- K1 j/ R5 Z8 z: q& L( y" f
6. *        这个函数是让系统进入DOS 4G模式                             *
   1 C9 g7 j: z$ A! ^! k; O& x: @
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   ! N7 R  [& J  C# d  C' d
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    6 C) }! x6 T, Q4 _- Z8 S
18. 
    ' Q( f- {2 C! _
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    ) ]% h, ?) s8 @- G# D+ P
22. ***********************************************/
    
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    & {0 w8 p) ~, T0 |) h
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    ; }  E# g* {9 d: J
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    8 n0 \; }* Q  j4 T* j2 |. d
31.                                          
    8 A- ^5 k$ ], E* B% O2 Y+ h% M
32.                                              属性位Hibyte低四位为
    & }! |  p! ?5 m$ y/ v: ^/ K
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    $ [" y. d4 S8 T! q5 W* T
36.                                                  8F & 0x80 = 1
    8 c: n# Y: Z$ V3 |; I- A( z& p5 p2 T
37.                                                 
    4 ?8 L/ r8 A$ D9 L& \' R
38.                                              属性位Lowbyte低四位为段类型,值=2
    % G! M. ]  M; J  f: n* ^
39.                                                  表示为可读/写段
    ( O: X- u! E! ?+ Y( E6 L
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    % i, c  }; M. `4 y% f/ }' H, A
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    $ m) E: [( }* Q, c  Y. o, i
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    : u9 x/ Z3 q$ ]4 G
45.                                          */
    
46. 
    
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    ! {( O( h: {% A* `) e& p
50. *    |   32bit基地址       |16bit界限|   *
    * f7 O6 K& n  y
51. *    +-------------------------------+   *
    , I% z# r* \9 M8 ?$ Y/ A
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    ! {2 }2 \/ O7 i! I
54. 
    / z5 F) {4 z3 h* n: S6 ~" t- g
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    . P! @: K* m9 k2 v2 C3 k1 m
59. {
    
60.     asm{
    - ~) b" S, x7 `4 v) d' _- E8 w. C5 |
61.         pusha
    
62.         in         al, 92H
    ( j4 t+ ?$ p8 z& }
63.         or         al, 0x02
    , R: C; L1 X& r# s$ U$ ~
64.         out        0x92, al
    ( y8 m1 g: ^. W/ |2 M  D  r
65.         out        0xed, al
    
66.         popa
    
67.     }
    
68. }
    
69. 
    
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    * K" Z9 Q# I" c0 d0 ~
72. *    ====================                      *
    
73. *                                              *
    ( @, l  h/ F6 G) o
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    % a7 V1 [: I! h6 }
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    1 o1 W% A) M, W
82. void set4gb(void)
    ) N* m7 n& f4 J+ b  Z
83. {
    0 ^& M! z: @+ W  o
84.     asm{
    
85.         cli
    
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    : }, k- ?. E) S; i* O3 e7 d6 G# d
88.         *    +-------------------------------+   *
    & G; V% Z6 ^% A. L* B! w, v7 b
89.         *    |   32bit基地址       |16bit界限|   *
      K( L7 \+ {8 v: B
90.         *    +-------------------------------+   *
    8 c) f; P  W2 F  V5 N5 r6 b
91.         *****************************************/
    
92.         /*********************
      t: |) \  h5 j' n; k$ E$ _
93.         *        得出段界限       *
    * }/ H" w7 t  U* G! m
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    ( b  ^# g  L+ V+ y( x
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    4 P# D+ D1 t& \4 f' M
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     - C; Z  u# y' e% ^
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
     ' B! h' r, _. H0 f8 m
110.         mov        eax, cr0
     # q3 h6 Y8 N0 l2 Y! }! p
111.         or         al, 1
     # R& \1 n- k$ \2 r2 H. w
112.         /**********************
     
113.         *     进入保护模式    *
     4 R$ G, h% C6 {$ _3 @
114.         **********************/
     + v$ g$ S9 V. `+ _4 c, [
115.         mov        cr0, eax
     
116.         jmp        pMod
     
117.     }
     & u* K# l4 f+ \. b" [9 A
118. 
     
119.     pMod: asm{
     ; ?& b4 G' M8 j. ?- l+ W& \
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     6 ~$ e0 M" {, @) I
122.            ************************************************************/
     / ]4 b' }+ [2 Y
123.         mov        fs, bx
     
124.         mov        gs, bx
     
125.         and        al, 0x0FE
       b/ v/ F( R5 x0 T2 W& L
126.         /******************
     & E5 v3 i  ~) Y/ c, o5 \
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     & C5 a! V/ O' I0 T& I3 z
130.         jmp        rMod
     9 F+ [& Z- J$ W' W: \; l) i# H
131.        }
     
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     % D5 \: n, [  Y3 V% Z% q' I, Y
137.         mov        ax, 0
     
138.         mov        fs, ax
     ( o6 p- S; |$ T9 q! V
139.         mov        gs, ax
     
140.         sti
     
141.     }
     + @, d* Z4 P# }6 T
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   , t% D7 t! p, `
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   " p+ I1 |- G) W
7. ;*                                                                   *
   7 Q6 ]4 ^- C" q( P) h% W+ R  l! S
8. ;*   ===========================History==========================    *
   3 u6 e1 W* A6 N- K: p
9. ;*    author: bini                                                   *
   8 O/ ?% g' s( L% o
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    & w. n/ y3 |' t& N$ m7 D8 u% T
13. .586p
    1 e3 e- N& T" _, W& l& Y
14. 
    0 Q2 T" p  X! x, U* v7 a9 B! b$ D
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
      J7 e- T7 C! I4 O  f: f
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    " a! K7 T$ F6 S3 q) [9 \
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    1 v' w; A* h6 k# R
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    # E) s( w6 D2 A1 _0 {- p$ N
25. 
    ; m. Z' A9 ~  ?  d
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    : n2 W" s$ P" L
30. 
    
31. GDT_def         Label   Fword
    # C9 y% I  {" r' Z
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    9 a6 f. G3 H: D" ~8 i$ u  k4 K- k
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    9 f/ S+ q7 j% H, P0 O3 e) f
36. DSEG            ENDS                          ;数据段定义结束
    8 u% o# F: R1 T9 }: D- q
37. 
    : y! m" \3 y" o* C5 L
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    , m8 I) |+ a7 Z; q2 |- U
40. .Startup
    " O3 x3 o7 n3 K3 G! h( Q6 D
41.         call      Set4gb
    7 R% H+ j/ ^2 F/ e8 S& K
42. ;
    / ^( F: b/ P) M4 c( w" F
43. ;       fs, gs即能访问4GB空间
    - `2 A" J" f' s; j7 {
44. ;       write your code in here.
    3 j5 o. e: v) s% o, N0 F+ j  [# K
45. ;
    
46.         .exit
    0 q% ~, q# ~+ j$ B& e$ M2 X. ]& b
47.         
    2 G4 |$ Z4 _) F! k/ ?
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    9 U# h3 }6 w% v% n
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    3 |$ X4 `, U- N3 H' Z1 C$ n
53. 
    ) h3 f% S5 ]. |) C( B9 T3 f) a
54.         cli
    ' c2 l" R( u( d2 Y) f4 t7 \+ b
55. 
    , V  [, X1 }9 |- e, O. r+ G- ]
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    2 Y0 ^3 M" C+ M5 i" q! V9 Z
60.         xor       ebx, ebx
    % E8 z2 P. H- }1 k
61.         mov       bx, offset GDT_def
    5 z6 T; z" P' G4 I  H
62.         add       eax, ebx
    ) O( A8 R! z# @. m3 F! U. p- Y0 Y
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
      ]! e6 U* n% S0 m+ ^5 S
65. 
    , [, R5 O% k; h
66.         mov       bx, 8
    . ]8 S& K! Q, e$ [: ~4 t8 r5 [" h5 |
67.         mov       eax, cr0
    , D: R0 i) p1 {- m$ z
68.         or        al, 1
    
69.         mov       cr0, eax
    ( w' @; _7 [1 `4 T
70. 
    ! k+ d$ k. Y- Z( |2 G2 E: W) x9 s
71.         jmp       pMod
    6 c1 @- U3 D( C! A$ X8 ~
72.     pMod:
    ! m1 ~  ], g: o& z
73. 
    
74.         mov       fs, bx
    & C7 H- C! q$ _" h
75.         mov       gs, bx
    
76.         and       al, 0FEh
    $ E' }  e4 b+ a$ k1 Z6 X7 o( B
77.         mov       cr0, eax
    0 {" K) K+ p5 ~  ?
78.         
    8 {% t9 F1 a! v  k7 A+ b
79.         jmp       rMod
    2 ^8 d% ]! o: x4 Y5 E  }3 C& g/ y
80.     rMod:
    
81. 
    ; ?' h% N: g! y/ v5 P' a; J3 y
82.         mov       ax, 0
    2 ~8 L7 ~7 [9 C. f
83.         mov       fs, ax
    
84.         mov       gs, ax
    " l! b- e. o" Z: z+ D1 Y
85.         
    , j: B' k6 \1 j# `3 @! y
86.         ; 在2M的位置测试写一下数据
    7 l- q. X* p  u8 n
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    5 ]9 U# l' }/ }. A$ Z& \
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    4 y8 Y1 S* m" R, o! K
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    4 E2 h( Z+ J6 f) W4 L6 ^
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

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

[ 本帖最后由 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;
+ n  ?% v/ ~; M4 d& s
& r- \& v4 \7 M: ?# OGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
; @% g: S5 e2 {7 y" {4 P5 c, C1 a 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
6 s) U9 u, b4 @- ]- AData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
3 f) h+ z& w- h- F5 o
- p$ U$ b" H/ e- V  J  P; ?4 w( YGDT_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
1 q6 t0 z7 p' Q2 S( I7 @+ H
option->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
0 A. A. l+ c( V6 X7 w  S
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

3 {7 K6 z% `; \
我也是相同的问题，请问哪位有解，谢了！

jdf

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