DOS 4G big real Mode Demo code。

bini

刚学习的同学，有些还不会，我这里贴点C和asm的代码。只供参考。
. u9 |: l: X; D# B, d6 R
: C2 D: O; C7 |# i这是C的

1. /********************************************************************
   
2. *    File: DOS4G.H                                                  *
   
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   8 ]8 h$ \& S. H2 N" p* g
5. *    ========================Title===============================   *
   ( Q( @: v$ u0 ^# ^
6. *        这个函数是让系统进入DOS 4G模式                             *
   / j2 h# i; I/ d2 T" N. q; _% L
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   , K; d; O  }8 j2 [" ^# W
8. *                                                                   *
   
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    " W. P% d% R" _: ?- S
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    + h! n+ D8 y+ @+ E7 K6 Q- H
13. *      date: 2004-11-30  Frist version.                             *
    
14. ********************************************************************/
    
15. 
    9 T5 o( v1 f+ d! ]( G6 z+ C
16. #include <conio.h>
    " g1 D* Y0 j) J) @5 C2 N
17. #pragma inline
    4 d% z, J3 m. J4 [4 ?. \: w
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    $ t& S( g& x7 e2 I8 ?& W
22. ***********************************************/
    , Z9 A/ ?2 k7 i: j
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    2 f: v5 K8 i; b/ l# k0 [. [
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    9 Z0 ~" e+ b0 \2 l6 d2 z
31.                                          
    & N' ]7 W) s5 \; q% `
32.                                              属性位Hibyte低四位为
    1 K& R1 y" u8 R% _7 P9 X) `* D( d
33.                                                  Limit( 16~19 )=F
    
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    
36.                                                  8F & 0x80 = 1
    
37.                                                 
    8 c$ m( P+ H1 q9 F- n, @
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    # n: }; E! k' A
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    - V- J1 L$ f0 p+ N
41.                                                  描述符对地址转换是有效的。
    
42.                                                  bit0=1表示为:
    6 G1 A. x+ P3 T* G! o5 `
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    
45.                                          */
    
46. 
    ( a- H; e* |+ _* Q8 p) d
47. /****************************************
    - X( V5 `, t& Q' T8 J) w' g
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    9 i9 ^0 ]7 U- q( k; e0 T  r7 C
50. *    |   32bit基地址       |16bit界限|   *
    
51. *    +-------------------------------+   *
    
52. ****************************************/
    
53. unsigned char GDT_Addr[6]={0};
    
54. 
    
55. /****************
    ; w9 G3 \- c6 {3 h9 ?6 E6 j
56. *    打开A20门    *
    6 q5 _! @) v1 J4 F  L
57. ****************/
    * M5 l7 g" G  v0 M+ p4 q6 Y
58. void openA20(void)
    
59. {
    9 b  s7 x! {. |. @: r
60.     asm{
    ! D: R1 i# S; m9 M
61.         pusha
    - c/ Q5 d6 l6 U6 ]- l' v
62.         in         al, 92H
    * o/ R) {1 [1 M; v1 k. q  z' E  [
63.         or         al, 0x02
    
64.         out        0x92, al
    
65.         out        0xed, al
    
66.         popa
    
67.     }
    3 \; K$ k: Q9 r1 u
68. }
    . I- ]! r$ e7 B( y( F) X5 |; B
69. 
    8 T; q: @0 y) |% K7 @
70. /***********************************************
      p8 D3 b! B, l! b  D, n" T# r* K
71. *    函数功能：进入DOS4G                       *
    7 g0 R2 D* z) U4 P! [; d  B$ Z
72. *    ====================                      *
    ; [- F) }4 E, _6 `3 H6 M& ~* m$ O
73. *                                              *
    
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    $ z$ `) k( L% T4 d6 n
75. *   如：                                       *
    9 S% q" y' k$ |! K$ k
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    $ O- J( g+ Q* P; m9 B
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    9 x; s5 @) d" f2 u$ J- c" P6 ~
80. *                                              *
    
81. ***********************************************/
    
82. void set4gb(void)
    
83. {
    . V) C! K! ~1 K6 {3 m3 E4 }; @2 S+ U
84.     asm{
    
85.         cli
    
86.         /****************************************
    6 V7 d& ^; m* E
87.         *    GDTR寄存器                          *
    , N; R2 r; _& D2 e& g4 ]
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    5 z" I/ s6 ?2 L. b1 T
90.         *    +-------------------------------+   *
    
91.         *****************************************/
    8 y4 {; D) p9 a( v* k& u2 }9 |7 s
92.         /*********************
    
93.         *        得出段界限       *
    9 t/ k" D0 F+ D! ]/ H# C4 l. ?0 w
94.         *********************/
    $ X: r; j6 `* f) S$ H7 H
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    9 F6 c+ `$ B+ y4 r; o9 p9 Y5 P/ \1 L
97.         *    计算GDT表的32位基地址，存入GDTR        *
    
98.         ********************************************/
    
99.         mov        eax, ds
    - i1 E7 x7 ]  P
100.         shl        eax, 4
     ! A, G8 x  }5 W* a- i% r
101.         xor        ebx, ebx
     - ?( X* s" {5 k$ b
102.         mov        bx, offset GDT_def
     
103.         add        eax, ebx
       S8 D  Q3 D5 O! Q
104.         mov        dword ptr GDT_Addr[2], eax
     
105.         lgdt       fword ptr GDT_Addr
     : M0 E4 u! N! X7 F/ `
106.         /********************
     
107.         *   选择子偏移      *
     6 `5 H8 s* ?" ~1 R6 G7 p
108.         ********************/
     
109.         mov        bx, 8
     
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     
113.         *     进入保护模式    *
     ' M& D( u" F3 N8 B% |& K
114.         **********************/
     6 c. E" E" W/ Q
115.         mov        cr0, eax
     * [% D- q. B3 `
116.         jmp        pMod
       p" }& A9 e3 h
117.     }
     % t6 ?0 v1 U# C5 h9 `5 u8 C
118. 
     # P0 |3 r% t- W/ O* q% X& s
119.     pMod: asm{
     
120.            /************************************************************
     3 S% H) @. K* r
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     & T" h% [) `- C* Y# d% `
122.            ************************************************************/
     
123.         mov        fs, bx
     3 T( j# Q) z& C# r5 z! L& B
124.         mov        gs, bx
     + B. J4 O2 ~  \
125.         and        al, 0x0FE
     
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     * r0 H, \: n' n2 M
130.         jmp        rMod
     
131.        }
     2 k* K% T6 u& d* b* N$ z4 J
132. 
     $ V9 m* T) q; d% T% A
133.     rMod: asm{
     $ M# O6 |7 M6 a) m
134.         /* ******************************************************************
     
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     4 s1 L0 F' o$ H6 c4 ~7 N
136.         ********************************************************************/
     1 e0 D7 F/ q  x
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
       k. u1 ^9 G* L* u' [3 J4 ~
140.         sti
     
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   6 q9 N7 f, g/ I- J2 X" P( P- F
2. ;*    File: DOS4G.asm                                                *
   / O+ W7 }' c& p) R. o
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   
4. ;*                                                                   *
   
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   ' P9 H4 X) X7 u, F) k$ u- x
7. ;*                                                                   *
   , N  [9 G7 g4 T) a
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    5 u) ?" C+ v; [  U/ X8 m3 n
11. ;********************************************************************/
    
12. .model small
    - @: Q9 C1 R! _; W8 q& L$ B9 }* Z
13. .586p
    5 U* o" P* z  ]: R+ c# ~
14. 
    
15. DSEG  SEGMENT   USE16                 ;16位数据段
    : z% [( y6 r4 V7 ~' ?0 x, X5 z6 c1 q
16. 
    
17. DESC            STRUC
    
18.         LimitL          DW      0 ;段界限(BIT0-15)
    ) Y4 I5 R2 p9 ~9 \5 X
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    
20.         BaseM           DB      0 ;段基地址(BIT16-23)
    
21.         Attributes      DB      0 ;段属性
    9 v3 O8 ~$ D* n7 ?% R# ^
22.         LimitH          DB      0 ;段界限(BIT16-19)(含段属性的高4位)
    
23.         BaseH           DB      0 ;段基地址(BIT24-31)
    2 K% M1 u3 \' r) j- a1 L" w  o
24. DESC            ENDS
    
25. 
    0 e: A! ], M$ |5 {* g. F4 y# V
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    7 _9 |0 u5 n9 E8 _
28.         Base            DD      0 ;32位基地址
    7 k' Q! y" ~. Q2 _
29. PDesc           ENDS
    9 E8 V0 _. ?$ k# k# y
30. 
    0 {  L, T7 S* _7 `$ G$ R6 N3 K6 g
31. GDT_def         Label   Fword
    7 `* o) m# t1 w8 z2 U5 H7 z6 c. u
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    ( m; f" S. f% [# _) ?
34. 
    
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    
36. DSEG            ENDS                          ;数据段定义结束
    5 f+ a+ e' _" E4 P3 g* h% P. e
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    6 E0 S! S3 N* M9 f5 ?8 |' u1 a
39.                 ASSUME  CS:CSEG,DS:DSEG
    : v2 ~. L7 q& @/ \. {+ U" x" X$ Q: S
40. .Startup
    # M& J4 x* G1 Y, a8 A4 r# Q
41.         call      Set4gb
      k8 O* V4 p0 \* R$ Y# C
42. ;
    , N- G" f! l! p3 D
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    
45. ;
    ! y$ i" W! G# }- N. v4 R
46.         .exit
    , R8 _/ F: X, Q' R" _* J
47.         
    7 w' T( R. E) p" J1 s( ]7 r5 H$ `
48. Set4gb          PROC      NEAR
    
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    0 L8 q# J" f; o6 q  K) ]' `
52.         out       0edh, al
    
53. 
    ! W  g- r  |0 O, N% n6 M: z. W
54.         cli
    
55. 
    0 R. J8 J$ I' \0 e) u  o0 J
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    
58.         mov       eax, ds
    
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    8 X9 n! _. g# Z( ^
61.         mov       bx, offset GDT_def
    * e5 Q+ e+ e* f* Y7 k
62.         add       eax, ebx
    
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    4 C9 }7 A% D4 `! X7 D( T6 L  L0 {
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    # w: T: U2 i8 r; Q1 W
68.         or        al, 1
    ) e: _- ]% j7 s0 F% I# D# G5 a. q1 z
69.         mov       cr0, eax
    
70. 
    
71.         jmp       pMod
    . ^/ C8 ^8 {! u: i6 J: U
72.     pMod:
    " ^; G  s- p* t& w4 Q
73. 
    5 t& J4 I/ u# {: u! Q! C' R' q
74.         mov       fs, bx
    6 l% [8 `- `* u# B3 D4 ?
75.         mov       gs, bx
    
76.         and       al, 0FEh
    8 Y8 u; \9 x: \& _
77.         mov       cr0, eax
    $ B6 o9 t4 L: b6 J! Z! @. N* m
78.         
    
79.         jmp       rMod
    
80.     rMod:
    
81. 
      E8 `. x# v- @1 p/ n
82.         mov       ax, 0
    
83.         mov       fs, ax
    / u0 ?# A" O9 R# T' `" @
84.         mov       gs, ax
    . p- O8 t7 y1 P% |) y- M
85.         
    7 C1 z3 @1 g( q1 k
86.         ; 在2M的位置测试写一下数据
    $ _, t) A7 t! L# X: ^1 X
87.         mov       esi, 200000h
    
88.         mov       dword ptr fs:[esi], 055aa55aah
    + T; l- M& o' m1 q# V
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    
91.         sti
    
92.         ret
    
93. Set4gb  ENDP
    0 m2 ?# b; z& V& J# c
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    " p4 C$ J7 y3 @9 z( X* v
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;

GDT_Addr        PDesc   &lt;$-GDT_def-1, &gt;
1 T  T0 [( w( t+ }& _3 h! T 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>

# }! W* @* y1 [: uGDT_Addr        PDesc   <$-GDT_def-1, >
, W5 e- R- p, u6 `这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
4 o* `# h. L; i5 u: koption->compiler->advanced code generation中的instruction set选 80386

" `+ J7 w3 R; x3 b6 y& loption->compiler->code generation中的option选中, [X] compile via assembler

+ a+ n) [, q$ K; ?1 o9 a7 L$ ]5 B; Q   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教

beervista

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

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

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

jdf

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