DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
$ r5 n9 z) k9 v4 x. N  W
这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   % A0 F" F" I! h5 _% R5 G
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   6 A7 |4 d9 X9 c* j5 w/ o% N
6. *        这个函数是让系统进入DOS 4G模式                             *
   ) _  Y  d( D$ K2 @) b
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   $ i% t/ \' G- N8 v: D
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    / V2 A( K: c) ^+ ~
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    ; c3 E. b- b5 @7 Y# f
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    / c4 s( P0 N1 i6 o" y, l
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    + j9 d' m. L6 f) l2 S$ m! Y
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    - u$ {+ l6 d7 \' m5 n; j. i& a7 @. \
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    8 `" ]# Z  e7 c7 L
36.                                                  8F & 0x80 = 1
    # `( m/ e8 P. `) N" o* K
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    ; y/ m% y/ W0 a7 z0 s, N$ x9 T/ k
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    # M( f! m1 D* G/ U1 W
43.                                                  系统段描述符。而不是门描述符。
      n, g$ w2 T2 `. w; Z
44.                                              
    1 h5 A( `' ~, Q" f+ [
45.                                          */
    9 s4 E/ S- L0 F! x
46. 
    
47. /****************************************
    3 p, L% Z. r' h$ |; T
48. *    GDTR寄存器, 48bit=6bytes            *
    & B3 d& |8 Z7 ^$ Q- b' y
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
      X) q/ q3 I5 Y1 n5 k; n  E
51. *    +-------------------------------+   *
    ; w7 T" l3 n, z9 o- m+ E3 w: B2 J
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    9 I% \8 i0 Z7 u1 S  j5 H$ L
54. 
    
55. /****************
    
56. *    打开A20门    *
    $ K5 I2 R9 u, D9 p
57. ****************/
    8 d1 g, x6 t, b
58. void openA20(void)
    3 H/ ]# v2 r& t- m+ y7 k6 G7 k0 ~
59. {
    ) u7 V! a2 m: w$ H4 @
60.     asm{
    
61.         pusha
    + y+ x9 w, I! a* ?9 I/ P: r0 U. I
62.         in         al, 92H
    & l  e: F5 R" r5 k! R1 v4 F9 t* G# Q
63.         or         al, 0x02
      f1 R' o/ O) \5 o: s0 K
64.         out        0x92, al
    
65.         out        0xed, al
    ; {" G5 G4 u7 }" a0 n, F4 x' }
66.         popa
    % L  C2 w9 k$ i) q- z* v. d0 T
67.     }
    
68. }
    
69. 
    & o" y+ {% V: ]  p& O5 T
70. /***********************************************
    
71. *    函数功能：进入DOS4G                       *
    0 m. Z7 D* G3 M  m& l
72. *    ====================                      *
    / i: L9 \0 _+ w1 U4 l8 S% O) y# A4 O
73. *                                              *
    ! G: P) R6 |1 H
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    * X+ w+ M  l' d, b7 T' C$ q
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    " k' s! z/ H, y) V: N# S: b
77. *       表示为 2个GTD                          *
    
78. *                                              *
    5 C; Q/ ^  g8 K. O/ a' W% W" }9 S
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    
81. ***********************************************/
    % r; Y9 @2 r8 I6 f, }
82. void set4gb(void)
    
83. {
    
84.     asm{
    
85.         cli
    9 y4 ]4 J$ O4 P* w  s
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    3 L7 V. r  f; z, S( }1 D' P
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    * n  M- J' V, o5 J  w0 n2 P1 f5 w: o
90.         *    +-------------------------------+   *
    ( p1 C+ l" s/ [  n$ Y
91.         *****************************************/
    8 r. s  i* ~1 m' v, b+ S, o, L  v' B
92.         /*********************
    % Y: u6 ]' g. R
93.         *        得出段界限       *
    
94.         *********************/
    3 _0 G. [8 O% r" R+ l
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    % ]- h9 m0 G# w2 o
96.         /********************************************
    , O* i8 `7 j0 \  b& j$ G
97.         *    计算GDT表的32位基地址，存入GDTR        *
    # G& _6 O! V% ]0 Q: |
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     : X& Y- q  r) Y. f
101.         xor        ebx, ebx
     2 F5 a7 a. P1 Z/ L  g& D! {
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     + X* x. L6 A1 f- d9 I- C1 L
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     : u9 W4 l1 J5 S, ?. B8 J: M
107.         *   选择子偏移      *
     
108.         ********************/
     
109.         mov        bx, 8
     ) ?& G$ |, I; r# T: u
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     + |' {3 h, z( R& w8 }3 _0 f. [
113.         *     进入保护模式    *
     8 [# x+ {" F* v# N% y
114.         **********************/
     
115.         mov        cr0, eax
     9 i; F3 t2 N; d6 F
116.         jmp        pMod
     
117.     }
     + w: S! _- W' K( r9 N
118. 
     
119.     pMod: asm{
     ) _* P' p' j. L' z; N' G
120.            /************************************************************
     - U1 K4 F* t: J. S
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     ' k: d6 t  Z& v9 F* a; f" ~$ ?, _
122.            ************************************************************/
     
123.         mov        fs, bx
     : ~- }) Z9 z% `4 F5 }
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     / Y. B6 s/ R) H- }4 Z
128.         ******************/
     
129.         mov        cr0, eax
     6 _" Y% F! O4 h1 y1 x: F
130.         jmp        rMod
     4 w* o$ |5 H2 j8 A; f
131.        }
     3 g" l6 `) ~7 h9 b+ T- U
132. 
     ) z/ h2 {1 w& h0 E  A) V
133.     rMod: asm{
     $ K; ]! m6 j; ~  S- o& P
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     + }+ ~0 ]9 |8 E  r5 ^6 v. P
137.         mov        ax, 0
     
138.         mov        fs, ax
     ! B& D" J# F6 ?
139.         mov        gs, ax
     / \' |+ O3 ?, I8 t& t! n8 ~* i
140.         sti
     
141.     }
     % `1 f& r5 c; e! J" A, K  G
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ; U/ o( D9 k- `# `3 p( L& Y
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   1 t/ v/ a9 h# A( P. l/ ?, [
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   ; l, `; J: `: ~) }
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   5 v$ `. p+ M4 X6 q: W# m  _
9. ;*    author: bini                                                   *
   9 f% i. T. n* ?2 q
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    
12. .model small
    " C& h# l- [4 @( m/ z3 W
13. .586p
    ) G" J2 e& P! N+ U/ Z+ U
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    
16. 
    
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    * |/ _0 Y4 S; `. r6 U7 \
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
    
25. 
    
26. PDesc           STRUC
    ; V1 J( N6 C& Q5 S+ k7 Q8 c# W
27.         Limit           DW      0 ;16位界限
    / m5 f! v* H4 v" N4 b/ X8 [: t5 T
28.         Base            DD      0 ;32位基地址
    
29. PDesc           ENDS
    ! Z7 z+ {% ^+ j% g
30. 
    1 j- G9 D3 Z" x+ W: M  J
31. GDT_def         Label   Fword
    4 N& x1 ?* b* e; H( B# r/ X% g
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    ; {( g3 E' E* Y. W& ~1 s- h( b* n  x
36. DSEG            ENDS                          ;数据段定义结束
    
37. 
    * n2 l% P* q+ F, ]: a- ~
38. CSEG            SEGMENT USE16                 ;16位代码段
    . M" E' N2 h3 i1 I5 J7 K3 N" a
39.                 ASSUME  CS:CSEG,DS:DSEG
    
40. .Startup
    
41.         call      Set4gb
    
42. ;
    6 |: e9 Z1 v$ g0 R* s
43. ;       fs, gs即能访问4GB空间
    9 C1 d5 `  U$ R" G, O
44. ;       write your code in here.
    
45. ;
    
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    7 o6 Q! x* N# v( c- L
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
      l% e) s( L, z& }+ r0 w, u
54.         cli
    0 k7 P( B! s0 l7 E$ y
55. 
    & j- j5 Z+ F& p( [: B
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
      W1 Q+ k& N; d' \
58.         mov       eax, ds
    
59.         shl       eax, 4
    . A* h5 R( O/ N, T# a! A. N
60.         xor       ebx, ebx
    
61.         mov       bx, offset GDT_def
    / B5 |4 u4 N8 R# G
62.         add       eax, ebx
    + ]0 T: E, t8 A/ t4 g+ |
63.         mov       dword ptr GDT_Addr.Base, eax
    6 y9 q6 i! D# Y1 L7 N) W
64.         lgdt      fword ptr GDT_Addr
    
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    
69.         mov       cr0, eax
    7 {: q/ `+ p8 J  F* i1 j' j* c" {
70. 
    % [, ?: J" v- I. Q
71.         jmp       pMod
    
72.     pMod:
    , \, J9 j, T, R$ Y- r8 s2 V
73. 
    
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    2 A3 r2 L* q" E2 _+ E
77.         mov       cr0, eax
    ( C( L! p6 B  j7 B) y; D  I* A" d
78.         
    7 Z  Y+ Y: q4 O/ L- Y
79.         jmp       rMod
      w: F3 k9 Y% k: Y
80.     rMod:
    
81. 
    
82.         mov       ax, 0
    
83.         mov       fs, ax
    ( I( Q3 _2 G0 m& h
84.         mov       gs, ax
    
85.         
    0 A+ A8 c) p/ w! e
86.         ; 在2M的位置测试写一下数据
    2 ]; V7 _: E  P+ y# A/ \
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    " X, m6 R/ ~9 y2 E
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    
94.       
    
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
0 V" }! g+ z0 a6 n) v9 m7 P
$ p  V; F1 v0 _- x- K6 K- a[ 本帖最后由 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;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
3 k; S5 ]1 k8 n: w' B0 H 替换如下，
: W; v3 ]4 z5 W9 o- M( O/ `5 Z: f! hNull_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
8 m3 l- l* q  @% g) ^Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

) {. D/ Z1 _0 ]" jGDT_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

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

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

beervista

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

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

+ H2 L* l" x7 p. S0 u& g
我也是相同的问题，请问哪位有解，谢了！

jdf

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