DOS 4G big real Mode Demo code。

bini

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

9 q/ _+ W9 `/ D) F, X2 v. |% d这是C的

1. /********************************************************************
   2 C! O# @  f* w2 H, ?. R
2. *    File: DOS4G.H                                                  *
   3 D1 }0 M; u; t# J2 V  @& _7 p
3. *       Compile with BC 3.1 ( Editor: Tab size = 4 )                *
   
4. *                                                                   *
   
5. *    ========================Title===============================   *
   + Z. y' \6 [0 q- [. ?1 H
6. *        这个函数是让系统进入DOS 4G模式                             *
   ; |8 Z6 M. G( a! Y; z" f* u
7. *       程序参考了：陈家琪《DOS实方式下直接访问4GB》                *
   
8. *                                                                   *
   # [( D4 P3 F/ X3 B3 d+ y
9. *       使用: openA20(); set4gb();                                  *
   
10. *                                                                   *
    
11. *   ===========================History==========================    *
    
12. *    author: bini                                                   *
    , j! I* k: R* Y( v$ |4 t% P
13. *      date: 2004-11-30  Frist version.                             *
    ( f9 G) ?, u+ t( o
14. ********************************************************************/
    
15. 
    
16. #include <conio.h>
    4 i' a/ m9 q; M% U$ Z  S
17. #pragma inline
    - W( k9 w1 n) Q7 D
18. 
    
19. /***********************************************
    
20. *    两个GDT，第一个为系统使用，不管，默认为0   *
    
21. *    第二个为一个数据段，没有代码段。           *
    # D4 p5 {5 z8 }$ x
22. ***********************************************/
    
23. unsigned long GDT_def[ ]={0,0,      /*系统使用*/
    ; w# d7 t+ s0 H; Q2 v( g; f
24.                           0x0000FFFF, /* hi16bit( 0~15 ) is base low=0,
    
25.                                          low16bit( 0~15 ) is limit low=0xFFFF
    $ w1 B3 I. B, M9 S& y- ^- ^
26.                                       */
    
27.                           0x008F9200};/* 最低字节为 base( bit 16~23 )
    
28.                                          最高字节为 base( bit 24~31 )
    
29.                                          
    
30.                                          属性Attrib = 0x8F92
    0 }' X; z* g7 @: ?/ T
31.                                          
    # S3 B. Y2 A1 n, G
32.                                              属性位Hibyte低四位为
    ' ^6 ?" Y0 Z8 x2 K: _
33.                                                  Limit( 16~19 )=F
    . f8 i6 }. D4 c3 z" F) l
34.                                              属性位Hibyte bit7 为粒度
    
35.                                                  (值1=4KB粒度)
    8 \  r+ l' m3 ^+ V: d, G# Z1 E3 Z
36.                                                  8F & 0x80 = 1
    
37.                                                 
    
38.                                              属性位Lowbyte低四位为段类型,值=2
    
39.                                                  表示为可读/写段
    ; [# [, o" S( ?2 k: [
40.                                              属性位Hibyte高四位=9,bit3=1表示:
    
41.                                                  描述符对地址转换是有效的。
    & i+ [6 p# f3 _) W- A0 Q5 R- K
42.                                                  bit0=1表示为:
    : ?, t# `- D+ m  @
43.                                                  系统段描述符。而不是门描述符。
    
44.                                              
    . D! z0 U  c! b' d' E  T+ [- a
45.                                          */
    2 j! z* P, \- L. e# H8 H, o
46. 
    / `3 p2 h% M, M. r! |/ j
47. /****************************************
    2 P9 E* ^' d1 d& J6 i, d
48. *    GDTR寄存器, 48bit=6bytes            *
    
49. *    +-------------------------------+   *
    
50. *    |   32bit基地址       |16bit界限|   *
    / N" P# e2 h1 n
51. *    +-------------------------------+   *
    1 z- Q0 ^5 y/ f2 z
52. ****************************************/
    / X; l, z9 A0 m3 O! ?/ t
53. unsigned char GDT_Addr[6]={0};
    ' g4 L! b+ P3 y. {" p) p
54. 
    ( P+ y' K) h. O  ?; |0 a
55. /****************
    
56. *    打开A20门    *
    2 ~0 i1 V# I' e1 k
57. ****************/
    ) ^8 ]- L; Y4 T0 l# d
58. void openA20(void)
    3 w) \& i5 M/ U- C" j1 N& R& D5 J4 L
59. {
    
60.     asm{
    + C, h9 F" B* I2 r! E# Q& J
61.         pusha
    " K. E! X- y' n) d
62.         in         al, 92H
    2 u( k; S& L5 ~3 `3 C
63.         or         al, 0x02
    
64.         out        0x92, al
    1 Z; @( L( r) u( i( m7 e0 n
65.         out        0xed, al
    
66.         popa
    - i5 {; O# U& p% J& {5 _! D0 T3 {
67.     }
    ! X8 E4 Y8 w9 I1 G
68. }
    
69. 
    0 \* ~* t2 I$ l  ?2 P9 g+ l9 `/ ^1 v
70. /***********************************************
    3 K. E! U( E/ I% f( V: x* a- ^
71. *    函数功能：进入DOS4G                       *
    
72. *    ====================                      *
    2 D& ~/ D% L6 t# _$ M
73. *                                              *
    6 |$ D# O' E4 O! A4 ^3 U/ l; E% ~
74. *    GDT描述符界限计算方式：描述符个数*8-1     *
    % Q$ q  u3 C, C/ S( [2 b& A. p
75. *   如：                                       *
    
76. *        mov    word ptr GDT_Addr[0], (2*8-1); *
    2 P: l8 ~# l3 g; N. j
77. *       表示为 2个GTD                          *
    
78. *                                              *
    
79. *    选择子为所在描述符内的字节偏移。          *
    
80. *                                              *
    * n+ C" [+ `" y! v7 U7 l. Z
81. ***********************************************/
    # M& t( J, [7 {2 z: [* V
82. void set4gb(void)
    
83. {
    : n' Z6 h9 }& H
84.     asm{
    5 K. x8 c: I% n. I
85.         cli
    ( r- \5 U( M; y  a8 o7 F
86.         /****************************************
    
87.         *    GDTR寄存器                          *
    0 k8 |. Z# M; R  D" X
88.         *    +-------------------------------+   *
    
89.         *    |   32bit基地址       |16bit界限|   *
    + w' ^5 V+ F7 Y$ z* F; A. [
90.         *    +-------------------------------+   *
    2 c  q! g- K9 U0 e9 X: {
91.         *****************************************/
    
92.         /*********************
    0 ^9 H6 A, w0 Q2 K( H
93.         *        得出段界限       *
    
94.         *********************/
    
95.         mov        word ptr GDT_Addr[0], (2*8-1);
    
96.         /********************************************
    
97.         *    计算GDT表的32位基地址，存入GDTR        *
    6 b1 g6 @/ h( H6 Q3 P& J
98.         ********************************************/
    
99.         mov        eax, ds
    & C& [' d! b- E0 X
100.         shl        eax, 4
     
101.         xor        ebx, ebx
     6 C+ W1 P. Z$ f% w/ X
102.         mov        bx, offset GDT_def
     9 L. D, v3 r4 f, C
103.         add        eax, ebx
     
104.         mov        dword ptr GDT_Addr[2], eax
     9 Z. I' d- c6 ^/ T: u, v
105.         lgdt       fword ptr GDT_Addr
     
106.         /********************
     ; n; y4 L7 ^6 M8 {, O; @2 X
107.         *   选择子偏移      *
     ' c& `/ J( G. Y0 b$ y+ N
108.         ********************/
     
109.         mov        bx, 8
     ( O# I( ]9 `+ |, V) J
110.         mov        eax, cr0
     
111.         or         al, 1
     
112.         /**********************
     4 r/ \" G+ Z+ y$ I1 ]- J! e
113.         *     进入保护模式    *
     
114.         **********************/
     
115.         mov        cr0, eax
     / o) G' z1 g+ l5 Q
116.         jmp        pMod
     
117.     }
     ; u) z2 M; w5 {0 B% @  ]6 W
118. 
     9 P# E: ?6 w  }' g
119.     pMod: asm{
     
120.            /************************************************************
     
121.            * 让fs与gs加载选择子，使其能访问 0xFFFFF * 4K (4GB) 空间    *
     + i7 T) [* y. @' Z
122.            ************************************************************/
     
123.         mov        fs, bx
     / z& B9 a' w" S# [- e6 u
124.         mov        gs, bx
     
125.         and        al, 0x0FE
     ' v2 ^$ \/ B. T2 F) N9 x7 o
126.         /******************
     
127.         * 进入实模式      *
     
128.         ******************/
     
129.         mov        cr0, eax
     ! w5 F0 v: k% K: f" _' r% C1 I
130.         jmp        rMod
     9 c+ A) ~+ W3 w0 l+ o! Q' V" n3 J
131.        }
     
132. 
     # r1 X% ?0 {+ L+ ^% C
133.     rMod: asm{
     
134.         /* ******************************************************************
     ; R5 E7 d. x: F9 c- Q) @8 a
135.         * 退出，fs、gs清0，访问系统内存可用: gs[32位,相对于0的偏移地址]     *
     
136.         ********************************************************************/
     
137.         mov        ax, 0
     
138.         mov        fs, ax
     
139.         mov        gs, ax
     3 ?* Q; \2 i/ z" `  G
140.         sti
     - k' ^0 E8 v) W/ j; y" E
141.     }
     
142. }

复制代码

这是asm的

1. ;/********************************************************************
   
2. ;*    File: DOS4G.asm                                                *
   / O9 q: l0 x/ C+ c: y' @! Q' J
3. ;*       Compile with masm ( Editor: Tab size = 4 )                  *
   ; T( i, Y1 E0 C3 k
4. ;*                                                                   *
   6 \, p& Q! u* Y. X
5. ;*    ========================Title===============================   *
   
6. ;*        这个demo是让系统进入DOS 4G模式，进行数据访问               *
   
7. ;*                                                                   *
   + s8 {) q& ?3 a% V! y
8. ;*   ===========================History==========================    *
   
9. ;*    author: bini                                                   *
   
10. ;*      date: 2008-10-08  Frist version.                             *
    
11. ;********************************************************************/
    : Y% U. u) `( d7 W/ i: s
12. .model small
    " \" \/ h) L5 d, P& W
13. .586p
    
14. 
    7 U7 P7 n2 t6 V- C( t/ {" ]7 p
15. DSEG  SEGMENT   USE16                 ;16位数据段
    ) }9 }, c6 _" G
16. 
    9 l$ F  f+ H$ `+ h- @  `$ Y. C& V
17. DESC            STRUC
    , w# e+ E' Z7 S2 ~9 D
18.         LimitL          DW      0 ;段界限(BIT0-15)
    - x3 h: c/ p1 l
19.         BaseL           DW      0 ;段基地址(BIT0-15)
    ! g& \: m; Q0 X! H. h% J4 K! Z
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. 
    ; o" v- w7 `, f( q
26. PDesc           STRUC
    
27.         Limit           DW      0 ;16位界限
    
28.         Base            DD      0 ;32位基地址
    ! U8 H# p- x  c- i# n4 ~/ H
29. PDesc           ENDS
    4 p1 m% D9 G- C( p6 H7 _
30. 
    
31. GDT_def         Label   Fword
    2 @1 S. m3 c4 V3 k; K% C
32. Null_Desc       DESC    <     0h,  0h, 00h, 00h, 000h, 0>
    
33. Data_Desc       DESC    < 0FFFFh,  0h, 00h, 92h, 08Fh, 0>
    5 @9 j7 Z# u: T( `9 g
34. 
    , M( k; I8 h4 r9 R6 x
35. GDT_Addr        PDesc   <$-GDT_def-1, >
    ; j! e& T0 ?4 t9 V( s: k
36. DSEG            ENDS                          ;数据段定义结束
    4 X( v3 e( z# V& B, N; _
37. 
    
38. CSEG            SEGMENT USE16                 ;16位代码段
    
39.                 ASSUME  CS:CSEG,DS:DSEG
    5 a4 f- }, T# C$ Y3 s
40. .Startup
    + [- g/ |1 F2 P9 Y8 O8 O. k4 j( ?) K
41.         call      Set4gb
    
42. ;
    % B2 Z: L2 k+ C& \0 x( Y* e! v: z& V
43. ;       fs, gs即能访问4GB空间
    
44. ;       write your code in here.
    7 K  W- L; C2 A' a
45. ;
    
46.         .exit
    7 \8 z. C6 k3 y# L4 e
47.         
    
48. Set4gb          PROC      NEAR
    ) F6 F. R" w/ I8 Y9 @! _# k
49.         in        al, 92h
    
50.         or        al, 002
    
51.         out       092h, al
    ) o, J) X0 B0 ]2 E
52.         out       0edh, al
    * r0 R/ {2 z+ L7 u0 x& H; D# x  n* r$ h
53. 
    " f! Z1 f0 j" X  W2 r7 `
54.         cli
    + V8 [- n' A1 Y2 Q
55. 
    
56. ;        mov      word ptr GDT_Addr, (2*8-1);
    
57. 
    $ d& W# Y0 K, y+ B3 v8 z
58.         mov       eax, ds
    8 h/ A' p. T& I- H
59.         shl       eax, 4
    
60.         xor       ebx, ebx
    ) U4 B4 o5 C- E. S2 l
61.         mov       bx, offset GDT_def
    ! \5 Y6 k5 X. K+ Q. S" v$ `4 ?
62.         add       eax, ebx
    : }, S8 W$ P3 y; J% W
63.         mov       dword ptr GDT_Addr.Base, eax
    
64.         lgdt      fword ptr GDT_Addr
    
65. 
    
66.         mov       bx, 8
    
67.         mov       eax, cr0
    
68.         or        al, 1
    + C& }. o! K. }  |- p
69.         mov       cr0, eax
    
70. 
    ) v; q5 W* l$ G' e
71.         jmp       pMod
    2 G9 ~+ |1 F2 ?# `* u+ u- y! Y
72.     pMod:
    + g1 g: I3 e! P
73. 
    . v+ e5 U6 m% ]! J8 r$ Y6 b
74.         mov       fs, bx
    
75.         mov       gs, bx
    
76.         and       al, 0FEh
    
77.         mov       cr0, eax
    
78.         
    5 ]- W# b) C0 w) l
79.         jmp       rMod
    
80.     rMod:
    ; S& c+ e" w$ F- |7 K5 O+ n+ Y
81. 
    % Q) }' E0 {8 `
82.         mov       ax, 0
    
83.         mov       fs, ax
    
84.         mov       gs, ax
    
85.         
    
86.         ; 在2M的位置测试写一下数据
    0 r% P  l" [: D5 g% \" H1 h- W
87.         mov       esi, 200000h
    4 n4 l. ^9 B; C
88.         mov       dword ptr fs:[esi], 055aa55aah
    
89.         ; 用RU去看看200000h的位置是否是此数据....
    
90. 
    - s7 W" R  Q% D3 k
91.         sti
    
92.         ret
    8 k! ~. X! G  a
93. Set4gb  ENDP
    : i6 L) e% |9 w6 g
94.       
    
95. CSEG           ENDS                              ;代码段定义结束
    2 H: S3 O0 b5 ~. b- S1 L6 }
96.         end

复制代码

laoshumice

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

beervista

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

happybasic

option->compiler->advanced code generation中的instruction set选 80386
/ ?5 e* j7 q$ o+ N; W- O$ F
& \; r: I4 p# I" q4 J! ]. [1 loption->compiler->code generation中的option选中, [X] compile via assembler
, z& \/ q+ ?; N" n0 j: p
  T0 G6 A" T4 a/ s[ 本帖最后由 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;
; c4 w, p" t6 W, `/ C 替换如下，
Null_Desc       DESC    < 0h,  0h, 00h, 00h, 000h, 0>
% ?- F% G0 q7 _/ _0 \Data_Desc       DESC   <0FFFFh,  0h, 00h, 92h, 08Fh, 0>
( h) L0 \$ ]. L5 Z
# m# v6 y4 x5 U1 B5 F$ nGDT_Addr        PDesc   <$-GDT_def-1, >
. L0 G1 g5 }  R8 `这样你就能编译通过并且可以运行

Faintsnow

替换了就OK.Thanks

bini

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

A_jack

原帖由 happybasic 于 2008-12-18 17:11 发表
$ a% z$ z  y# I: R% ^option->compiler->advanced code generation中的instruction set选 80386

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

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

beervista

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

4 g) r9 `7 p! O4 T- S0 S( k' m7 J5 M* f   作了上述设置之后还是不行，编译的时候提示： cannot find executable: TASM. 我换了几个版本的TASM还是没用，除非拿掉含有32位寄存器的那些code才行。这个是什么原因，请各位大侠多多指教 ...

2 s# U; ]+ E! D; k4 p2 H我也是相同的问题，请问哪位有解，谢了！

jdf

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