Enable or disable A20 gate through KBC demo code.

bini

反正图方便的，就拿去参照，也是之前遗留的code，整理了一下，好象其中的代码，一位Korea的同学有留下来一段code。

1. ;A200N.ASM
   % @6 ~# r; c  {: t. p/ n, s
2. ;
   
3. ; Trun on the line A20 through the KBC, programming by bini for debug. 2008-07-01
   0 N6 o! s4 ^, O* T4 V4 |
4. ;       ml A20ON.asm
   - {) j- b# N+ m! b" d. O$ T
5. ;
   % m3 J+ U6 E2 O7 O
6. .model tiny
   ( E2 g1 q- _- A" n  \8 S
7. .code
   
8. .486
   $ [/ r3 R) O% M5 W: C, a- k
9. .startup
   
10. 
    " Q) e& N- w! J3 h: s
11.                 mov     dx, offset msg_author
    
12.                 mov     ah, 09h
    1 d  W5 q0 Z& g
13.                 int     21h
    
14. 
    9 z6 r& T! D; X6 ?4 O: A6 w1 K; C$ T) q
15.                 mov     dx, offset msg_fail
    " J  B- N* [: }
16.                 call    A20_ENABLE
    
17.                 jz      exit1
    5 y) O9 Z* {6 D. d4 D
18.                 mov     dx, offset msg_ok
    5 R  j6 ^$ v2 i  s& c
19. 
    
20. exit1:          mov     ah, 09h
    $ e' d6 O$ L& _3 f
21.                 int     21h
    . O4 A$ c% \2 X+ S) ?- w
22.                 mov     ax, 4C00h
    - v9 w- L7 e+ q# F0 f4 \# n
23.                 int     21h
    
24.                
    
25. msg_author      db      "Trun on the line A20 tools through the KBC, programmin by bini", 13, 10,
    
26.                         "2008-07-01",13, 10, "$"
    ' Z" U; |# y. c  W9 _7 E
27. msg_ok          db      "A20 Enable OK", 13, 10, "$"
    
28. msg_fail        db      "A20 Enable FAIL", 13, 10, "$"
    
29. 
    
30. ;------------------------ follow code maybe make to lib, if you want...-------------------------------
    
31. A20_ENABLE:
    " X% b) n" W' O7 k4 A
32.                 call    A20Write
    + j7 w1 F: K/ N3 ^2 p7 D
33.                 jz      exit_enable
    
34. 
    
35.                 cli                             ; Only need for reading value from KBC
    * G* Y  A# E! E, u% M2 d; ]# Q4 B
36.                 mov     al, 0D0h
    
37.                 out     64h, al
    
38.                 call    A20Read
    ! S& c$ l1 u, s3 ]# S' r% Q
39.                 jz      enable_int
    
40. 
    
41.                 in      al, 60h                 ; Get current status
    7 ^6 G) _  G9 K, _* x  E# I
42.                 mov     ah, al
    
43.                 call    A20Write
    . r% [5 I; t  ^8 A
44. enable_int:    sti
    
45.                 jz      exit_enable
    
46. 
    
47.                 mov     al, 0D1h                ; Tell the KBC , want to write to the
    + i4 y- h! V; w4 F* Y$ j
48.                 out     64h, al                 ; Out Put Port next
    ' ~! q0 g6 d: Z  b5 N
49.                 call    A20Write
    
50.                 jz      exit_enable
    - ?" F4 m; {8 k% K' z
51. 
    + d7 o+ n- M9 o, ^- q- n7 r
52.                 mov     al, ah
    
53.                 or      al, 2                   ; Enable line A20
    ( ~: ?1 A1 p5 P1 o
54.                 out     60h, al
    ; s0 b6 n4 l9 b) C
55.                 call    A20Write
    
56.                 jz      exit_enable
    
57. 
    
58.                 mov     al, 0FFh                ; NOP
    % ?$ y" ~/ N3 L. x* T
59.                 out     64h, al
    
60.                 call    A20Write
    
61. 
    2 {& H+ T/ J2 N3 l/ q9 @' M
62. exit_enable:          ret
    
63. 
    
64. A20Write:       xor     cx, cx                  ; Reasonable wait
    9 ]- E& w& h( ^/ B8 B0 }' k
65. get_wirte:      in      al, 64h                 ; Get KBC read status
    
66.                 test    al, 02                  ; See if buffer empty, bit 1 clear
    
67.                 jz      clear
    
68.                 dec     cx
    
69.                 jz      exit_write
    
70.                 jmp     short get_wirte
    
71. clear:          inc     al                      ; Clear ZR
    7 P' X: Q# J9 [4 v3 M+ a3 [! j
72. exit_write:     ret
    7 R2 X' g0 k2 m4 j0 D" x6 s1 d
73. 
    $ n: B) |  g! b/ K" @( v
74. 
    
75. A20Read:        xor     cx, cx
    $ h+ [0 U1 c2 Y0 @
76. get_read:       in      al, 64h
    / _/ U9 ?7 H* a: }: H  @* D# v6 ?
77.                 test    al, 01                  ; If the 'output buffer' is full, has
    6 {% ]8 D. ~4 ?
78.                 jnz     exit4                   ; ...
    
79.                 dec     cx
    
80.                 jnz     get_read
    
81. exit4:          ret     
    3 o$ m: ]$ R8 j; }- U
82.                
    7 Y) J+ a4 _" B& Z9 ~
83. end

复制代码

1. ;A200FF.ASM
   
2. ;
   7 _) z- |7 E5 k8 f" u5 ]
3. ; Trun off the line A20 through the KBC, programming by bini for debug. 2008-07-01
   
4. ;       ml A20ON.asm
   
5. ;
   
6. .model tiny
   ) ^, H& y4 ~+ G" E& \. E4 @
7. .code
   - [* W0 |0 u: ?  P6 ]
8. .486
   4 D5 S& U; w) T$ C' p- m7 h
9. .startup
   . b- O% ~0 P" D- }
10. 
    ! ^4 y7 L5 z: S! \0 O3 s
11.                 mov     dx, offset msg_author
    ( a- c' k/ c) J- d% L( H
12.                 mov     ah, 09h
    ) V& y$ Z8 H# G
13.                 int     21h
    8 M. ]! K6 `5 ^5 j, i) B& t9 x; z
14. 
    
15.                 mov     dx, offset msg_fail
      @- D# @" S3 p$ _3 P4 \
16.                 call    A20_DISABLE
    ; Y; [+ y# C$ j( l- E
17.                 jz      exit1
    
18.                 mov     dx, offset msg_ok
    5 R8 R3 ?; ^$ x: s) K9 Z4 ?
19. 
    : ]5 k6 V5 g! D8 [3 B5 f7 v
20. exit1:          mov     ah, 09h
    
21.                 int     21h
    . x5 t) X# Q. k" i
22.                 mov     ax, 4C00h
    
23.                 int     21h
    
24.                
    
25. msg_author      db      "Trun off the line A20 tools through the KBC, programmin by bini", 13, 10,
    , b" L6 U: S3 s8 Y: g
26.                         "2008-07-01",13, 10, "$"
    # q7 y! O1 P* n; D1 H, ?1 O6 i/ g
27. msg_ok          db      "A20 Disable OK", 13, 10, "$"
    6 q4 k4 K7 P. A) ^! x& T
28. msg_fail        db      "A20 Disable FAIL", 13, 10, "$"
    
29. 
    . y" W+ t0 h* X/ \/ o
30. ;------------------------ follow code maybe make to lib, if you want...-------------------------------
    # e8 a. F) a# l! T/ m1 e, }7 m
31. A20_DISABLE:
    
32.                 call    A20Write
    
33.                 jz      exit_disable
    $ F, W% @9 N* d0 d! D7 y' u
34. 
    7 ~- ?5 a6 ?' S! e1 S
35.                 cli                             ; Only need for reading value from KBC
    . e0 O! d9 Y6 H/ M! ?+ @* u
36.                 mov     al, 0D0h
    / u( y* x8 Z. [( ~0 j2 n
37.                 out     64h, al
    
38.                 call    A20Read
    
39.                 jz      Disable_int
    4 Y! Q5 Z2 @! a; ]7 s
40. 
    
41.                 in      al, 60h                 ; Get current status
    $ K% V- ^1 [* P* k) _7 p& @$ w
42.                 mov     ah, al
    4 x. P: \/ F! \
43.                 call    A20Write
    % [" i- C( y0 ^; C2 N/ I+ |
44. Disable_int:    sti
    
45.                 jz      exit_disable
    
46. 
    6 G1 N, ?2 H  A  r1 c4 T
47.                 mov     al, 0D1h                ; Tell the KBC , want to write to the
    
48.                 out     64h, al                 ; Out Put Port next
    7 k; O: V' v% G" ]
49.                 call    A20Write
    : K7 u2 t2 F; f: Q
50.                 jz      exit_disable
    " K  z4 D( e/ \( m, S
51. 
    5 f3 I" ]) @" |
52.                 mov     al, ah
    1 N% n6 ~  _6 ^7 d. d+ \
53.                 and     al, not 2               ; Disable line A20
    
54.                 out     60h, al
    
55.                 call    A20Write
    " y9 O6 ~4 t3 b3 O& j3 b) x: c
56.                 jz      exit_disable
    
57. 
    # l& j7 Z+ ]  |$ _1 y
58.                 mov     al, 0FFh                ; NOP
    
59.                 out     64h, al
    ! r$ O. f) U- A
60.                 call    A20Write
    
61. 
    
62. exit_disable:          ret
    3 u" i& L# H- F3 \2 O
63. 
    & O' p9 D! y$ b2 G6 X* \
64. A20Write:       xor     cx, cx                  ; Reasonable wait
    5 k5 v$ i* z; k; M$ e
65. get_wirte:      in      al, 64h                 ; Get KBC read status
    ( t( t- U2 b& U
66.                 test    al, 02                  ; See if buffer empty, bit 1 clear
    
67.                 jz      clear
    
68.                 dec     cx
    3 d7 p6 }: D+ q9 F
69.                 jz      exit_write
    ) j* j) N  }. w! g. e0 _
70.                 jmp     short get_wirte
    
71. clear:          inc     al                      ; Clear ZR
    - w4 }8 l7 `! y$ `1 ]7 a
72. exit_write:     ret
    , T- h7 }" |8 f& r0 n2 T
73. 
    / m0 T6 k% x6 v7 a, c) L+ t
74. 
    
75. A20Read:        xor     cx, cx
    
76. get_read:       in      al, 64h
    
77.                 test    al, 01                  ; If the 'output buffer' is full, has
    2 P* K2 @! F5 d9 V) U! ]. E& k& Z
78.                 jnz     exit4                   ; ...
    ( M2 i8 K4 W) s( s4 h! S
79.                 dec     cx
    
80.                 jnz     get_read
    8 d3 e* m3 B1 o& k  H
81. exit4:          ret     
    
82.                
    ( ]4 h, }1 C# Y! f
83. end

复制代码

1. ;A20STATE.ASM
   
2. ;
   ! p- V- o8 P' V! O% N
3. ; Returns the status of the line A20 through the KBC
   
4. ;       programming by bini for debug. 2008-07-01
   
5. ;
   
6. .model tiny
   : w6 Y- k2 u* O, M4 |! ^+ K
7. .code
   0 V: u5 v/ }9 L5 }7 o
8. .486
   ( e+ j5 |. {' U+ Q" ^6 P: h0 C
9. .startup
   
10.                 mov     dx, offset msg_fail
    - `' ~$ a9 J' z& {5 r9 ~
11.                 call    _GET_A20_STATE_
    ) w+ ?) f" B& k+ X; @
12.                 jz      exit1                           ;  was a problem
    
13.                 push    ax                              ; Save state, AH
    
14.                 mov     dx, offset msg_ok                      ; There wasn't a problem
    
15.                 mov     ah, 09h
    
16.                 int     21h                             ; Print message
    
17.                 pop     ax                              ; retreve state
    
18. 
    
19.                 mov     dx, offset msg_dis
    
20.                 and     ah, 00000010b                   ; bit 1, 2h, indicates state
    : D  S# S! A. K0 v6 z
21.                 jz      exit1
    " y" F( r' ~0 ~8 g+ \
22.                 mov     dx, offset msg_en
    
23. 
    
24. exit1:          mov     ah, 09h
    
25.                 ; DX already contains address of string
    & q, G" W% o/ n, @
26.                 int     21h
    ( V3 u( M4 x# r0 d  p
27. 
    ! R2 U- o9 g6 l/ U( K
28.                 mov     ax, 4C00h
    
29.                 int     21h
    3 Q' a0 p( l8 `) f% T/ Q$ t
30. 
    
31. msg_ok         db      "OK", 13, 10, "A20 $"
    
32. msg_fail       db      "FAIL", 13, 10, "$"
    
33. msg_en         db      "ENABLED", 13, 10, "$"
    0 m* P& T5 T4 [# n
34. msg_dis        db      "DISABLED", 13, 10, "$"
    
35. 
    
36. 
    
37. _GET_A20_STATE_:
    4 K3 n1 t  n" t& d- y' C
38.                 call    A20Write                ; Wait till the input register is empty
    
39.                 jz      exit2+1                 ; Bypas the reset int's
    
40.                 cli                             ; Disable ints so we'll get our value
    
41. 
    & k$ l% w! Q- d8 r5 n
42.                 mov     al, 0D0h                ; Send command to the 8042 command register
    
43.                 out     64h, al                 ; to tell it we want to Read the Output Port
    
44.                 call    A20Read                 ; Wait till the 8042 output register
    
45.                 jz      exit2                   ; has something in it's buffer
    
46. 
    
47.                 in      al, 60h                 ; Get it
    
48.                 mov     ah, al
    3 l- }* o2 ~1 s* y4 y7 z
49.                 call    A20Write                ; Make sure the input register is empty
    
50.                 jz      exit2
    
51. 
    
52.                 mov     al, 0FFh                ; KBC NOP command, does nothing
    " I, d$ R0 r# l, T4 m1 I3 y
53.                 out     64h, al
    
54.                 call    A20Write
    1 \: ~) @5 r! M6 p% G
55. 
    3 _. m& {: i5 W- G# S7 i) v# f
56. exit2:          sti
      ?0 _, T$ X# t8 q# N5 |; }; E
57.                 ret
    : k7 ^8 E: h# T9 n/ i# A
58. 
    5 _1 c/ ?8 d( v, c0 Q9 n
59. 
    . a' t2 j" N0 z% I( o! F
60. A20Write:       xor     cx, cx                  ; Reasonable wait
    
61. get1:           in      al, 64h                 ; Get KBC read status
    
62.                 test    al, 02                  ; See if buffer empty, bit 1 clear
    
63.                 jz      clear
    " ?* o: \. F+ e8 s
64.                 dec     cx
    
65.                 jz      exit3
    ) J/ }6 ~5 w/ s# C4 [1 @/ _3 a
66.                 jmp     SHORT get1
    . u9 Z- a0 i8 {# y
67. clear:          inc     al                      ; Clear ZR
      s6 w! b) `9 x6 I
68. exit3:          ret
    0 H+ _4 a; P8 G' L0 P
69. 
    9 \1 K8 O) i+ T3 R: R+ R' W
70. 
    
71. A20Read:        xor     cx, cx
    
72. get2:           in      al, 64h
    
73.                 test    al, 01                  ; If the 'output buffer' is full, has
    : \! R3 d% Q2 ]3 W- x. [7 I- A
74.                 jnz     exit4                   ; something for me
    
75.                 dec     cx
    ' M1 g1 o+ x0 z4 U: J' S
76.                 jnz     get2
    " n; c. S- N2 p. `& S
77. exit4:          ret     
    1 ~4 L* `1 z$ l* G$ u3 S
78.                
    . n6 A6 J; Z7 d- |+ C- A3 H  K
79. end

复制代码

Tangailiu

void openA20()
{        while(inp(0x64) & 2);        outp(0x64,0xd1);
        while(inp(0x64) & 2);        outp(0x60,0xdf);
) O' Y$ b2 D+ i. h% H! A  {" n        while(inp(0x64) & 2);        outp(0x64,0xff);
}