DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。

; m) i" d4 K6 E. E( h这是C的

1. /********************************************************************
   , J' l5 S2 |7 B
2. *    File: DOS4G.H                                                  *
   + a; d+ Z& B7 R" J- v
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   0 L! G! Y# {- I
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    3 C8 u. _1 L$ H" f) S" s. S
12. *    author: bini                                                   *
    8 j9 `+ W# s1 }  p7 `9 h
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    ! m5 Z6 R2 y$ e1 z' c- S' b
15. 
    ! U! n+ U8 m: M, Y& ~' j1 A
16. #include <conio.h>
    
17. #pragma inline
    ! I: O3 v8 B$ Z- {) y
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    ) o; ?- v( d& r1 R+ Y
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    5 u) _: {8 ~6 u4 f" C
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    ( ?3 f5 D) R" H/ t1 T+ {
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    4 k& ^7 {( j% @3 v( Q- K
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    ' l  t9 N- d$ k8 H. ?0 }
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    ' |5 n$ E9 d: u! x
29.                                          
    
30.                                          属性Attrib = 0x8F92
    9 H% k. g( r& I) H* Z" M' t
31.                                          
    $ k* W7 \: ?0 j
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    3 L7 I; k' H, b+ K6 E: D2 b8 l' {
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    ) D1 A7 {6 B# c7 q- Q
37.                                                 
    . {, Q4 Y$ ?' i; d2 m
38.                                              属性位Lowbyte低四位为段类型,值=2
    ' c. G8 Y; Z: {" N: w
39.                                                  表示为可读/写段
    ' g: n( E$ H6 }; C# ^4 k
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    - h2 n. s& \* x  H6 s
43.                                                  系统段描述符。而不是门描述符。
    3 y  {2 s+ {5 o  p
44.                                              
    1 o( I& X  Z. l* X, ]8 {0 b5 ~0 _
45.                                          */
    
46. 
    
47. /****************************************
    3 k: x3 M& y, ?8 {8 p  x( b
48. *    GDTR寄存器, 48bit=6bytes            *
    ' {9 q, Z2 P2 j7 R% I
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    * z& B! ]# o4 R' t
52. ****************************************/
    1 @6 `/ G% F6 Z- Q$ \' H6 q
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    
59. {
    
60.     asm{
    9 R0 s; b* X4 l) H' F0 `# c! Z8 y
61.         pusha
    
62.         in         al, 92H
    
63.         or         al, 0x02
    
64.         out        0x92, al
    ! n  ?* `9 C- E  r7 {1 I5 R
65.         out        0xed, al
    
66.         popa
    % J1 O# y+ l1 T+ _* k" |
67.     }
    
68. }
    
69. 
    $ V" y' }% {( M: J/ H  h6 E
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    3 X. G2 l, D1 J* l( ]8 n9 O
72. *    ====================                      *
    + v- {1 k5 V/ t1 \* A5 u
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    
77. *       表示为 2个GTD                          *
    * ?! T. |7 Z" F6 e: ?
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    # n1 l  H' q/ X8 `7 W
83. {
    
84.     asm{
    * f8 F& N+ c- o; y5 [6 p
85.         cli
    0 v( H* W4 J/ s7 K3 J) r
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    ( j0 n9 c$ o: _2 x
90.         *    +-------------------------------+   *
    5 n0 s# e: G1 u# v. P6 _, l
91.         *****************************************/
    % U2 h. D+ O% u8 O0 T& V# r# R
92.         /*********************
    
93.         *        得出段界限       *
    ; |0 P9 s9 x$ h" k
94.         *********************/
    - G- c" H( a& L. Z
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    7 c& o' t& t1 W- |( x0 Y0 t* m
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     $ X3 ^+ P6 D3 z/ ?
102.         mov        bx, offset GDT_def
     - o# f, D& d' [6 O8 }6 G% t
103.         add        eax, ebx
     : t6 g: S3 M2 ?$ s+ \
104.         mov        dword ptr GDT_Addr[2], eax
     & a8 `. J; V& J3 s. h) {: r6 A5 H
105.         lgdt       fword ptr GDT_Addr
     $ H' {! L6 {; Z) I! b5 ^
106.         /********************
     
107.         *   选择子偏移      *
     8 t: z& Z- h2 j5 W: }  I
108.         ********************/
     0 c9 L% e  F" I7 T9 U* B, i9 b* ?3 h
109.         mov        bx, 8
     + _, G  E  p: Z; ?
110.         mov        eax, cr0
     
111.         or         al, 1
     ' J/ f5 Y4 r4 u$ Z$ p  T
112.         /**********************
     
113.         *     进入保护模式    *
     4 o/ }" ~3 w8 `# D3 E( a; N) y) I7 u
114.         **********************/
     
115.         mov        cr0, eax
     3 @7 ?0 ]& w7 s" l
116.         jmp        pMod
     " z& Z9 O8 _  S( _/ R/ M
117.     }
     
118. 
     * q! \% C, @9 ^5 y, J# F  c) I
119.     pMod: asm{
     3 {( W" X- w& I0 {
120.            /************************************************************
     " k) r; C% ^; U- A$ z
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     
122.            ************************************************************/
     
123.         mov        fs, bx
     2 `" q- r1 u& f3 E( g
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     8 }8 h: B( M$ ^/ C+ Q+ A
126.         /******************
     
127.         * 进入实模式      *
     . s1 t$ k0 ~; X
128.         ******************/
     
129.         mov        cr0, eax
     
130.         jmp        rMod
     4 p7 s# p+ R$ q0 h  {( C# K
131.        }
     
132. 
     
133.     rMod: asm{
     . q: D8 s9 w* G& Q! B/ ?) T9 I
134.         /* ******************************************************************
     : Z) h8 A. Z- f0 v: k) R
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     * T) o- Y+ d2 v' k; W7 P
136.         ********************************************************************/
     2 Z+ u1 J+ n  D+ W/ g. K  E
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     . V4 |$ J, ^6 D, a! a) i" @
140.         sti
     
141.     }
     / M- y7 ]8 b" h' w
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   ) g, K2 O: A. N% z: T4 e
5. ;*    ========================Title===============================   *
   7 v7 C1 M! f2 v1 ?7 s2 t) W
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   9 M2 {% V3 Z: I" j9 z
8. ;*   ===========================History==========================    *
   1 X1 R9 l+ l" }, j  \' r/ w) f& ~/ `$ n
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    " v8 k6 m9 g) ~0 l, Z% H
11. ;********************************************************************/
    
12. .model small
    
13. .586p
    
14. 
    0 t. P1 J1 y) G5 `4 w
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    - P4 A9 h5 k3 h; \- h  }
17. DESC            STRUC
    ; u. J& d; X3 ^
18.         LimitL          DW      0 ;段界限(BIT0-15)
    
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    : ^, y5 e2 }, d9 Y( m
25. 
    * ?+ {& a+ t4 f* j' W/ U" ~; N8 N+ N
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    
30. 
    
31. GDT_def         Label   Fword
    + u( H+ V0 g; q0 R- u' q9 ^) u
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    7 f0 l3 C. Q- [* ~' L$ A
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ) d2 v1 Y9 B0 I( P) B
34. 
    8 C1 ?) j7 I# w0 S
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    2 R* v2 d; N  i$ t* [# S) _$ _
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    ) k; b  n' S" X7 f; B
42. ;
    0 x. e$ j  a. M! X$ Z
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    ( L( ^- U) b! n
47.         
    
48. Set4gb          PROC      NEAR
    2 t$ Z* }4 G3 B( Z, r! C4 J' w( k3 n( |
49.         in        al, 92h
    
50.         or        al, 002
    ( ?7 D6 P: G, M/ r, s: [
51.         out       092h, al
    4 m$ `& v$ b; l- P
52.         out       0edh, al
    
53. 
    - r5 ^1 v. W2 x, r
54.         cli
    ) m+ A2 s% w2 B
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    ; C7 M, K" }6 j! Q/ k3 D5 g
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    * ?5 O3 {; X& U: |  l
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    
66.         mov       bx, 8
    - S  N+ a  U$ z/ ~4 E3 _. a# }' t
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    . L' n* J! e6 \4 W# r5 X# O
71.         jmp       pMod
    3 G) r9 n1 o% g# u% E
72.     pMod:
    & ~6 {5 h1 ?- l7 r9 a
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    
78.         
    
79.         jmp       rMod
    ; _* O- R7 t9 f4 f2 s) x
80.     rMod:
    
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    4 {- r" e: R# T7 i1 D" t7 ]8 `
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    3 ]0 o/ V+ d' D& }' F7 F4 d4 n
87.         mov       esi, 200000h
    1 ^* J) [% d- \7 s7 Y
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    & W, l8 L0 c$ d' Q4 c$ q
93. Set4gb  ENDP
    + f! H& m0 ~  E: J. S) b, W8 Z$ ~9 D& d
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    . M* }1 F# W# a
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
. r3 L2 m' u4 J9 K9 g
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;
$ x: q5 `- P/ s. C( cData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
# k: l9 J9 E+ r* g7 b/ k- N8 V
% T* i% K0 u$ r$ _. G0 s* I! ?) Q6 w- ]GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
5 ^+ B) @* a, z% z" R" EData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
; L2 K- S8 }% s' K# _5 [# c
) A* g( M+ O  H  E" SGDT_Addr        PDesc   <$-GDT_def-1, >
/ ~4 R9 f5 I, t+ K这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
8 ^/ Q  N% U- Xoption->compiler->advanced code generation中的instruction set选 80386

- O/ r  _! B( [/ G, t; G/ ooption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

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

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

jdf

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