DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
3 r, n5 H8 n: f+ x  Q6 {  D
这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   4 Q1 u$ ]* n, W( b/ e1 r
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   7 T" e# p9 m# t7 O' A
4. *                                                                   *
   0 B7 Q; |0 s$ Q: W3 a
5. *    ========================Title===============================   *
   
6. *        这个函数是让系统进入DOS 4G模式                             *
   
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   2 i) a) U2 J# @+ p. T
8. *                                                                   *
   & n- g  }0 S8 U% Z: H. q- D, F
9. *       使用: openA20(); set4gb();                                  *
   3 G' r# q$ K$ \/ J: E8 ?  P
10. *                                                                   *
    5 c8 @5 i  B( r6 Y* B0 ~  X5 k7 S( O
11. *   ===========================History==========================    *
    * o* y+ @8 b% e  L: e. U# k
12. *    author: bini                                                   *
    
13. *      date: 2004-11-30  Frist version.                             *
    ! U9 n9 x( v7 w
14. ********************************************************************/
    % k. A% j  W0 \/ U' m/ T. T) r. Y
15. 
    
16. #include <conio.h>
    
17. #pragma inline
    
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    $ @: H# f$ Z4 _3 N2 J# o, |
21. *    第二个为一个数据段，没有代码段。           *
    
22. ***********************************************/
    " R3 _' m2 D/ t7 C" X3 s) F  }
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    8 ^% d% d2 `8 J3 Q
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    & \8 C* [- t1 z; A9 _3 [6 _3 m
26.                                       */
    9 @3 b4 O5 j4 r' A/ Y$ p! |% p+ J
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    2 Z9 q9 F) E/ t9 R
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    
31.                                          
    
32.                                              属性位Hibyte低四位为
    
33.                                                  Limit( 16~19 )=F
    ( E8 Y! ~* s1 w2 A6 d2 E# F6 u
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    5 y& E4 K# M: W: E$ K! O
36.                                                  8F & 0x80 = 1
    * n. l: G2 i% H2 r% M
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    ' a' m. [$ v7 l( _/ H
41.                                                  描述符对地址转换是有效的。
    ' K" S, m; P0 X
42.                                                  bit0=1表示为:
    0 K/ F. w' x: R5 D  P' @
43.                                                  系统段描述符。而不是门描述符。
    - w" j/ S4 O) V$ j
44.                                              
    
45.                                          */
    ! b( ~# \0 J4 B. h. m7 q
46. 
    ' m$ _4 b  F4 v$ G) P8 `8 C+ [& r
47. /****************************************
    & V/ l" H0 F1 U8 S, V) @: c  g
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    " ?/ r5 U6 M/ `# ?. y& Y9 ?
50. *    |   32bit基地址       |16bit界限|   *
    3 v/ j* V' A! i4 R
51. *    +-------------------------------+   *
    
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    $ W. k. L3 b+ G0 i  l1 E& Q
54. 
    
55. /****************
    
56. *    打开A20门    *
    
57. ****************/
    
58. void openA20(void)
    ( P8 v& I. l9 G: t- l3 f' K
59. {
    4 ?3 h, H& q+ j" O( |
60.     asm{
    
61.         pusha
    # B. ?" v6 @& K: G
62.         in         al, 92H
    ; n; `( ]4 J. \* U
63.         or         al, 0x02
    
64.         out        0x92, al
    ; d' Q2 ^6 ?/ r) A: o
65.         out        0xed, al
    / N( b1 @6 X+ c6 ~/ h, J4 W
66.         popa
    ) Z) x: W+ w1 }" o. Q: t
67.     }
    
68. }
    7 ^! g" B9 u) P* m! {, v2 q5 Q+ s
69. 
    
70. /***********************************************
    ' }8 @/ A) j* |
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    ! v- e; o! W" M8 i( `
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    
75. *   如：                                       *
    : T3 V+ ]6 q& @1 s+ r
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    7 E8 u3 @0 e. {$ C
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    " x. [# t% v7 t  _' G) J
80. *                                              *
    - O, c& y, I2 u, K5 h% ~- E
81. ***********************************************/
    ! U: D# a1 `/ ?. l
82. void set4gb(void)
    
83. {
    & {  F1 F$ A% L# G2 U& s/ j
84.     asm{
    ) c$ q7 X. Z( w: G; d1 V1 ^
85.         cli
    
86.         /****************************************
    + y7 z+ W4 E; }: K4 q6 j" _* \
87.         *    GDTR寄存器                          *
    6 K4 c1 v  T* @  h" h- {9 p
88.         *    +-------------------------------+   *
    7 S; O' D, U- b) c
89.         *    |   32bit基地址       |16bit界限|   *
      Y# T: F  u- i* b3 E7 t, @$ R8 r1 A
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    7 _" y5 Y: }9 V3 J# Q7 G' m- F
92.         /*********************
    
93.         *        得出段界限       *
    ; I9 ^4 k2 o6 E0 V( {
94.         *********************/
      r5 \, \5 p, n6 o' c- p3 t
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    ! R5 j$ [$ Z, m
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    
100.         shl        eax, 4
     0 m. w  w4 o  Y) s9 l6 F: o  p& M1 l
101.         xor        ebx, ebx
     
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
     5 y& {  z0 q* ]$ M, b. F- a
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     
107.         *   选择子偏移      *
     & p9 {, P# W1 n' C
108.         ********************/
     
109.         mov        bx, 8
     . R9 x: `/ Y. g2 D
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     
114.         **********************/
     ) _0 f/ r. G# B7 q
115.         mov        cr0, eax
     * x! t; u, ?- q# X1 o
116.         jmp        pMod
     
117.     }
     9 M# G; b: }5 g2 j' w1 V5 K7 g- n$ G
118. 
     
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     6 k5 B$ n5 w: u
122.            ************************************************************/
     $ Z- @0 A$ r+ A; ~- [
123.         mov        fs, bx
     7 |5 {* Q* Q) p6 W
124.         mov        gs, bx
     ! y0 t0 @; u# J% Q/ w8 e+ L
125.         and        al, 0x0FE
     
126.         /******************
     7 k- L+ U" L, W; i
127.         * 进入实模式      *
     % M, J5 D' S& H/ Q+ E
128.         ******************/
     
129.         mov        cr0, eax
     & r% S+ b) a' F; X6 p9 j! w0 [
130.         jmp        rMod
     ; p5 N- j8 C# J
131.        }
     ) Z9 V$ ^' P: _8 Z+ g
132. 
     
133.     rMod: asm{
     : Q& W$ E5 l$ R
134.         /* ******************************************************************
     4 _3 z* v* g" D( y: ^+ k' ?6 a
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     9 f! }9 v( k" X7 Q) T7 g7 l) a$ s5 o+ n, X
137.         mov        ax, 0
     3 l- e$ b' _- z8 A4 V) b
138.         mov        fs, ax
     6 L, `) }# y' Q. j, k
139.         mov        gs, ax
     . x: k5 `- d2 a! s6 e  c5 [/ ~
140.         sti
     
141.     }
     9 Y# K: g- x! @( j  w' {: w* X& \
142. }

复制代码

这是asm的

1. ;/********************************************************************
   # }3 Z& D0 t3 }6 R. [! q4 s. M
2. ;*    File: DOS4G.asm                                                *
   
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   / r9 Z" [6 P; l/ [& P6 u
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   9 m( _- H9 [5 y% Z) A
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   
8. ;*   ===========================History==========================    *
   3 ~% b; c2 N/ O
9. ;*    author: bini                                                   *
   5 M5 i( v* Z& F7 W& _7 g8 X% {
10. ;*      date: 2008-10-08  Frist version.                             *
    7 z: p( c" V& `& e, u7 E
11. ;********************************************************************/
    
12. .model small
    3 j9 {& f" Y: n2 R) \+ \
13. .586p
    
14. 
    ! ?  U0 u  n: d$ z+ i6 S
15. DSEG  SEGMENT   USE16                 ;16位数据段
    0 B4 m& x5 y+ x* V
16. 
    
17. DESC            STRUC
    - }  V! P1 Q- t, l
18.         LimitL          DW      0 ;段界限(BIT0-15)
    . p/ W- j0 L4 }* Z1 R
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    / P; H5 N$ o: C& U' ^
21.         Attributes      DB      0 ;段属性
    
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    . H/ @, B$ p& R- I
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    
24. DESC            ENDS
    
25. 
    6 w) _0 V7 n9 z6 a
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    6 g* }' P7 N" U3 K& ?
29. PDesc           ENDS
    ) Y8 k/ e/ {5 A; S! j
30. 
    
31. GDT_def         Label   Fword
    
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    , |7 c4 f$ R+ \1 L
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ' O/ W0 A! _( c# R/ n5 _
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
      P: D9 W! @& j0 L! S7 {
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    ! K2 P5 I; ~6 R3 w' J* U3 f! h
39.                 ASSUME  CS:CSEG,DS:DSEG
    ; Y) r% I* E" r: f1 e
40. .Startup
    
41.         call      Set4gb
    7 h: Z+ Y- `0 m$ }; Q3 e( g
42. ;
    
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    8 N5 B2 g% W5 L
45. ;
    8 }6 `& m! S/ [/ f4 s
46.         .exit
    
47.         
    
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    
52.         out       0edh, al
    
53. 
    
54.         cli
    ! @# q8 ?# i3 I# c7 S% u
55. 
    4 V: X9 {0 v: L) ?  V+ S1 H% U2 I$ J
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    ( c/ |: O+ G+ e# W9 P6 X
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    6 t. d7 s* a' f
60.         xor       ebx, ebx
    5 w5 V6 x" u3 P: R! [  u
61.         mov       bx, offset GDT_def
    
62.         add       eax, ebx
    ' g) G- O3 d5 x' i$ V3 S& H# V
63.         mov       dword ptr GDT_Addr.Base, eax
    1 X! a) f9 i( O. S
64.         lgdt      fword ptr GDT_Addr
    
65. 
    * a, Q" o& q. n
66.         mov       bx, 8
    5 v4 n' j  n- K; Y
67.         mov       eax, cr0
    % `' c5 G3 i, y5 S+ L2 W8 v5 f
68.         or        al, 1
    
69.         mov       cr0, eax
    
70. 
    ' f! {& M& Q8 q, L- _
71.         jmp       pMod
    
72.     pMod:
    9 \+ C$ Y! r& P, u  e# Y0 ^
73. 
    9 g# B+ O$ l; w
74.         mov       fs, bx
    ; A1 n. u8 X) c5 `+ S
75.         mov       gs, bx
    2 G9 v" Y( f; j  ~. T+ `
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    / W6 Y3 v0 g# _
78.         
      x9 v5 P& z( S) j6 @- J" T
79.         jmp       rMod
    " Y' F  j+ B! S& f, i$ @8 h
80.     rMod:
    
81. 
    # `* N0 C" R" ]' q% n
82.         mov       ax, 0
    
83.         mov       fs, ax
    . R% I) H! q) k/ M
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    
87.         mov       esi, 200000h
    , t% u4 w1 o8 S" N0 X7 D3 ?  _
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    ! ^2 L. {3 y# [2 v
90. 
    $ E/ e+ v* W( X; {+ d# H
91.         sti
    ' Z- O) W$ L1 q; J( v# Q
92.         ret
    
93. Set4gb  ENDP
    , m4 b8 z, \1 i
94.       
    ! e- j" {0 x6 X% R: a
95. CSEG           ENDS                              ;代码段定义结束
    - R( ?: w% z' c4 |  S% n- R
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

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

  J5 P9 U1 K) q& N  B4 X3 eoption->compiler->code generation中的option选中, [X] compile via assembler
) Q6 W3 A. Q, ?9 `
" n+ C" u6 l8 u- V: g[ 本帖最后由 happybasic 于 2008-12-20 15:41 编辑 ]

aioliy

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

Faintsnow

Undefined symbol: &LT

charles

Null_Desc       DESC    &lt;     0h,  0h, 00h, 00h, 000h, 0&gt;
, B9 c3 Q4 d7 r1 P* x: YData_Desc       DESC    &lt; 0FFFFh,  0h, 00h, 92h, 08Fh, 0&gt;
% k( X. ?. s0 J7 z( r: B
- y9 g% X7 w1 }9 r9 ]# k" u, lGDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
0 o$ K- Y; y- d* a- h9 O# @ 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
: e. L7 h% f7 IData_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
% q) W& E% B- a
9 J7 [( L" i$ J  f6 sGDT_Addr        PDesc   <$-GDT_def-1, >
这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
6 h+ v4 L& x& P( Q6 o& foption->compiler->advanced code generation中的instruction set选 80386

; Q& i% W9 U* uoption->compiler->code generation中的option选中, [X] compile via assembler

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

beervista

原帖由 A_jack 于 2010-2-26 10:47 发表
; r& z. L, U. O/ \/ \. G
: N8 T* K1 \0 s* V2 L& g8 p. _   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

% n3 n0 ~8 g$ `; Y' M
' ^5 _! w  M! c+ B& C我也是相同的问题，请问哪位有解，谢了！

jdf

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