DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
5 j: l$ a3 z7 s
0 }2 q* ~' F- T: D0 g. a& \这是C的

1. /********************************************************************
   ; f" u" ?& H2 v7 Q
2. *    File: DOS4G.H                                                  *
   8 J1 c# q  b0 _: A( \: Y0 a. E5 i
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   1 ?; {& T$ e( w* B0 U4 V
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    % G* Q, ]) H8 G$ ~7 S
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
      O: A4 Y" z- ^
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    * ?: R& ^3 {& V; `2 x
15. 
    ! g, R. `( K7 x, f) V+ k: O% w/ ]  i
16. #include <conio.h>
    % N4 U- a- g  M1 r
17. #pragma inline
    
18. 
    
19. /***********************************************
    $ J. E% h* I5 f% a8 l
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
      F  }6 R2 E+ ?8 S
21. *    第二个为一个数据段，没有代码段。           *
    3 C! U; e+ s1 T1 a/ M, O6 z+ y# _+ d
22. ***********************************************/
    8 N# }; a3 \8 Q- O) F4 z1 c. W& r6 K
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    4 I% ~; S/ R# E/ j1 a8 U6 c9 A& t2 T
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    ( g: w2 j4 Q; b$ }7 c, ]
26.                                       */
    - s" C3 u9 E( e
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    , O1 P  `$ u2 @1 j- A
30.                                          属性Attrib = 0x8F92
    
31.                                          
    ( J0 e4 X8 l6 m4 V* u
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    " z3 B7 x/ H  z, U5 J
35.                                                  (值1=4KB粒度)
    ! i2 a. y6 ]7 v
36.                                                  8F & 0x80 = 1
    
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    1 t' k' n4 t& [) B2 c# h. o
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    2 Z! v0 m4 e/ N1 j/ E  L
42.                                                  bit0=1表示为:
    8 j2 b5 e! R8 k
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    
46. 
    8 H1 B' q' F" j7 U# a: i2 k
47. /****************************************
    
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    ' A" a9 ~- K1 |' T
50. *    |   32bit基地址       |16bit界限|   *
    , f- I$ c# S" W/ x( [
51. *    +-------------------------------+   *
    $ \, j0 |2 [5 [8 w6 e
52. ****************************************/
    8 l" e, p( @6 G# r2 R
53. unsigned char GDT_Addr[6]={0};
    
54. 
    ) c: z' E" H6 _& V3 z
55. /****************
    " O4 P5 E! \8 o
56. *    打开A20门    *
    
57. ****************/
    + y0 V" `, j6 V. G4 o' R
58. void openA20(void)
    
59. {
    
60.     asm{
    
61.         pusha
    ; i& N( _0 P" t/ o+ G9 G
62.         in         al, 92H
    ( @/ Z# o) a( f/ D
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    / R( p& x- }$ t; f
66.         popa
    % M  S# C" u; `- O0 S
67.     }
    # M, e# u# j& Z+ h! \) {. d$ t- T' c8 _
68. }
    
69. 
    6 O- ~2 P8 s* J  g
70. /***********************************************
    " h) t/ ?( H8 w) N  L" t  P4 R
71. *    函数功能：进入DOS4G                       *
    6 I# H4 A2 g3 D; v
72. *    ====================                      *
    
73. *                                              *
    8 f) o/ ?- U& K8 T
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    : g+ o# v* a& w3 E
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    9 S/ e9 A5 p3 I5 L
80. *                                              *
    ! \$ v% E8 C, L7 P& D
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    # F0 [( E! ~/ V4 T! D% ~
84.     asm{
    
85.         cli
    
86.         /****************************************
    2 b. R; l) Q) t. }! _" [% H
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    1 k( K/ G" _- R+ p
90.         *    +-------------------------------+   *
    ; P% |: Y) c0 R+ p9 t
91.         *****************************************/
    
92.         /*********************
    
93.         *        得出段界限       *
    
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    5 j5 n3 D; ^' P/ ~% v% X# b
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    ! R4 w9 k2 d. c# l+ {
99.         mov        eax, ds
    ( F. O, ^' ]4 F' ^; E. E
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     2 R4 O9 b$ d9 E3 r3 n3 q
103.         add        eax, ebx
     ! L! [% {+ }7 @; \$ I# i
104.         mov        dword ptr GDT_Addr[2], eax
     + C0 I/ W! L2 g
105.         lgdt       fword ptr GDT_Addr
     5 ^' J1 u3 B- b4 w
106.         /********************
     9 o( R/ S4 }2 E" S# p
107.         *   选择子偏移      *
     
108.         ********************/
     8 }$ ?% j. G8 P& l$ M
109.         mov        bx, 8
     7 n& K  c7 f/ k$ M9 O" n5 g, h
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     " H  l" x7 [! C& P$ H' f
113.         *     进入保护模式    *
     
114.         **********************/
     4 |1 V; g+ |( j& Y+ o' h
115.         mov        cr0, eax
     , O: ^+ V; h1 u5 O
116.         jmp        pMod
     
117.     }
     
118. 
     
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     : i& i9 _, }: L. B
123.         mov        fs, bx
     " L; o& v+ j3 h. e4 c
124.         mov        gs, bx
     3 P% ?% z* L5 h2 N) ^
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     
131.        }
     2 N8 V  h' n) u* _, }4 x* O
132. 
     
133.     rMod: asm{
     
134.         /* ******************************************************************
     1 i2 V3 ], @& K+ _; w4 v- l( d
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     , t" |* p8 J% P2 x4 v" Z- y! t
137.         mov        ax, 0
     ! }% D# I/ s, j1 K( S: \0 B4 B% N
138.         mov        fs, ax
     
139.         mov        gs, ax
     
140.         sti
       f' [) _% d' i. ~! l; l9 l3 r& Y8 z
141.     }
     : u$ [( t6 E! a0 L) i- ]' W1 x
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   1 U- E  G% Z) ~0 f/ I
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   7 ~9 i2 c& }9 C, |
5. ;*    ========================Title===============================   *
   0 S3 i. [: s) N2 \9 B
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   . K+ j9 l1 a' B4 M4 g' T0 u! O
8. ;*   ===========================History==========================    *
   9 E7 V9 v& y; x5 J0 x
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    " c8 T! N! S- A; {7 w4 G  _  `8 P
13. .586p
    
14. 
      Y4 z+ P7 \2 n2 a9 B' o
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    # o; y7 ]$ b6 `) e( K6 y
17. DESC            STRUC
    6 @7 ], Q; ^7 f8 k
18.         LimitL          DW      0 ;段界限(BIT0-15)
    6 X+ E3 U3 f3 S& m
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    6 O: m% Z9 s4 ^
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    7 V1 N9 j2 c% g* v3 v/ a
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    - U6 R6 j. |2 I. v) [+ ?$ m
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    % F4 t4 ~# Y4 p1 L. y
24. DESC            ENDS
    
25. 
    
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    8 T% r8 ^+ |1 D9 f1 B/ F/ q
28.         Base            DD      0 ;32位基地址
    ' G% G4 C( i3 H+ ^/ I; ?) ]4 M7 \' t
29. PDesc           ENDS
    ; J* A  X) l* v; T4 i8 a; x  h
30. 
    
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    ( J1 c& _9 V! B( Q
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    3 i) @' B% y) I) I
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    ( W) g8 y3 y0 V3 ~/ g- s+ E" L- |
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    & `" {0 w% |) |. a4 r9 V
41.         call      Set4gb
    ( e$ o0 x+ [( _
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    
47.         
    9 w7 X7 [; Y, m& [1 A! O
48. Set4gb          PROC      NEAR
    : i- g9 a4 x/ j7 @
49.         in        al, 92h
    8 I2 j4 [- J6 H7 M! M8 h3 e: {
50.         or        al, 002
    
51.         out       092h, al
    ! a; I. }. Y+ }' J$ K, G
52.         out       0edh, al
    0 z0 c/ d; m5 M# y" C; \
53. 
    
54.         cli
    
55. 
    ; R, A$ l$ B$ n% p8 n9 r
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    3 [$ F6 ]& U6 K- m. C: }, e! }. C
57. 
    
58.         mov       eax, ds
    6 M% t6 L0 R8 x+ c* F# k3 c
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    , W8 A' l9 m% a8 Y
61.         mov       bx, offset GDT_def
    + b& @, L. w* {6 w4 f" c' s
62.         add       eax, ebx
    : l/ E* `3 Y9 o2 A8 U
63.         mov       dword ptr GDT_Addr.Base, eax
    ' G& }4 s# R; i* k
64.         lgdt      fword ptr GDT_Addr
    7 x% d! c& N; d" S# h- n  S" V
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    , S6 t' e8 `! L+ D
68.         or        al, 1
    + n( ?# t* `  @1 ^" k6 B) d# b  _
69.         mov       cr0, eax
    
70. 
    " ^  l8 f# u4 L! t
71.         jmp       pMod
    $ N& E( G+ W6 U  G
72.     pMod:
    # A; d, e1 z7 d0 }
73. 
    % o- X' Q, Q2 ]! X! \( X( h5 \
74.         mov       fs, bx
    2 ?' `. d  h! ]6 y  H3 B5 F  ~
75.         mov       gs, bx
    7 E* d4 e2 |0 Y% v* x
76.         and       al, 0FEh
    ! W/ v/ Q& z1 g: d9 J$ T
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    ! T# d, T& b$ D8 \
80.     rMod:
    , J( f8 p. f0 \! C
81. 
    ( o( ?' k% s' ~8 b+ z- Z
82.         mov       ax, 0
    & K. L3 R* X4 U( F/ e
83.         mov       fs, ax
    
84.         mov       gs, ax
    - t( @  m9 A/ A
85.         
    
86.         ; 在2M的位置测试写一下数据
    & H$ q2 G' h+ L, l, ?; w
87.         mov       esi, 200000h
    - d6 @! _( L- x8 a
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    / ~; D. M' H6 T, k* r' f- g+ b
90. 
    / f1 i1 J2 K) q& K9 z. I
91.         sti
    
92.         ret
    1 V* T" Z0 a" {) x6 _
93. Set4gb  ENDP
    
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    8 o$ s- T+ H4 O2 A. G
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

/ L2 z6 f+ w4 g4 A. Voption->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;
6 T! q8 J' X* ~6 [/ ^# B4 eData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;

- _  f) }/ S% x2 G: o9 Z8 }GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
+ j8 i+ q! N8 X9 k- i" @/ wNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
* }$ T. X. F' UData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

5 T; F) Y) v! g" J+ EGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
4 ^2 g) ~! Z7 T9 w& q# s& z9 z1 `option->compiler->advanced code generation中的instruction set选 80386
1 h. Z% ]1 u) Y5 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 发表
. Z9 c, x) o9 a7 Z1 Q. j
   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

; v  N/ o0 G& B* P9 F% y我也是相同的问题，请问哪位有解，谢了！

jdf

option->compiler->Transfer 设置TASM的路径，就不会提示找不到TASM;
* c( l+ u. z* I. k0 ^$ V. Y; U* b还要把TASMMSG.exe拷贝到源代码(工程目录),就可以编译完成了。