设为首页收藏本站
切换到宽版

 找回密码
 加入计匠网
搜索
热搜: BIOS ACPI CPU Windows
计匠网论坛»论坛 › Computer › BIOS › Enable or disable A20 gate through KBC demo code.
返回列表 发新帖
查看: 13290|回复: 1

Enable or disable A20 gate through KBC demo code.

[复制链接]
bini
发表于 2008-10-8 14:58:49 | 显示全部楼层 |阅读模式
反正图方便的，就拿去参照，也是之前遗留的code，整理了一下，好象其中的代码，一位Korea的同学有留下来一段code。
  1. ;A200N.ASM
    6 t7 K: _) k7 c% }8 e# F+ t
  2. ; " ]! J- v7 `2 O8 _: Q
  3. ; Trun on the line A20 through the KBC, programming by bini for debug. 2008-07-01; u/ B" f9 N" w0 \/ t
  4. ;       ml A20ON.asm 0 f; o: N8 H1 d, z8 L
  5. ;
    9 J0 q+ a- W; l+ [$ ^9 R
  6. .model tiny- O# N+ {; a- w8 O- d0 E0 }( O
  7. .code' v& {5 G8 K% F8 y5 C
  8. .486; r9 K4 B( k( I! p- i! |/ B
  9. .startup
    + I: j! G# W1 ?0 V

  10. # Z* ]; V' R) k. k7 {
  11.                 mov     dx, offset msg_author7 b9 Z: @4 s6 [$ y9 ]1 S( c4 p
  12.                 mov     ah, 09h2 Q* `' `3 J+ `- w
  13.                 int     21h( Y" M0 `* b8 [- E

  14. " K2 ]& K, g- i' F% u& r* B( R( ~
  15.                 mov     dx, offset msg_fail - x! f/ \2 V9 y& E0 Q. ^
  16.                 call    A20_ENABLE- o: z# q) U# W" s7 Q$ w
  17.                 jz      exit1
    ( x6 _7 b9 m& p2 p* S8 H; \$ w
  18.                 mov     dx, offset msg_ok
    7 _# N9 d! D4 V# j4 m
  19.   a% `) ]( T) I. V# Y: c5 J9 |( i  m
  20. exit1:          mov     ah, 09h 0 ^, h0 g9 ?' o8 p* C1 X  v0 K7 j
  21.                 int     21h
    : x& g) Q6 U1 O- W
  22.                 mov     ax, 4C00h
    7 p& F. S0 _2 g' q' B/ i
  23.                 int     21h
    3 P- a% S. }3 l" m0 Y; X9 P3 @+ U
  24.                 - O( g; B3 l- Q1 [0 P
  25. msg_author      db      "Trun on the line A20 tools through the KBC, programmin by bini", 13, 10,( j8 n/ S" T+ s! L# |
  26.                         "2008-07-01",13, 10, "$"
    6 E1 U2 [0 x& B1 M0 W
  27. msg_ok          db      "A20 Enable OK", 13, 10, "$"
    : p$ |. y) q% i8 B( X4 L
  28. msg_fail        db      "A20 Enable FAIL", 13, 10, "$"
    5 m! z( ]* {/ Q' x1 u' s8 [

  29. + S4 P% U. ~0 Q+ r% Q! U
  30. ;------------------------ follow code maybe make to lib, if you want...-------------------------------# _. k: o3 _5 e- J
  31. A20_ENABLE: ' C% P5 `' t+ H& {  J3 R
  32.                 call    A20Write 1 B4 g+ Q, z0 q) h1 W# y: L. Z
  33.                 jz      exit_enable" T' `. [9 f0 w' w* h

  34.   q, o+ z4 f& V8 b1 F( V
  35.                 cli                             ; Only need for reading value from KBC
    ! b5 n# J  E2 |2 n
  36.                 mov     al, 0D0h
    , P* Y3 o0 a& d4 ~7 g; }9 q
  37.                 out     64h, al ' x0 z* G$ a+ N/ i# n& G
  38.                 call    A20Read 5 ~2 k0 W1 [* L
  39.                 jz      enable_int   g3 U$ ?8 @0 X0 u2 b
  40. 3 D+ E) j- Q2 o4 ^  w
  41.                 in      al, 60h                 ; Get current status
    / P" F0 P/ {: k8 K' H" I& A" W
  42.                 mov     ah, al - a% s( R- P* E% c8 _
  43.                 call    A20Write
    : S- z- {: _% o, e7 X
  44. enable_int:    sti 4 \2 d" J6 A1 l0 }5 T2 c
  45.                 jz      exit_enable# J/ `5 ]7 C% Z% a8 m# ]

  46. 0 q0 \7 ?2 U6 \, |  y7 R' E
  47.                 mov     al, 0D1h                ; Tell the KBC , want to write to the
    3 j+ v9 n: [4 j* r
  48.                 out     64h, al                 ; Out Put Port next * @# @# `, F" }, A, e2 \& Q
  49.                 call    A20Write ! R4 P3 ~( J: I* t
  50.                 jz      exit_enable8 S) I6 M' p7 s' I) `# g) Z
  51. % K- ^7 u1 f2 B: \1 f
  52.                 mov     al, ah # ~" A/ e3 ^5 x7 X$ ~; P# u
  53.                 or      al, 2                   ; Enable line A20 + o# f' A% |7 A2 W* n; s( M
  54.                 out     60h, al
    ' j1 `1 K6 n, T% H6 f/ u/ a) B: V5 ?
  55.                 call    A20Write
    8 K  N+ d4 s% E5 n" z
  56.                 jz      exit_enable3 H) i0 `7 [. C9 T' j0 R

  57. 3 S6 j) E( v( l, }9 F
  58.                 mov     al, 0FFh                ; NOP 6 H+ m8 s2 F1 I
  59.                 out     64h, al & j# R% Q5 q+ \8 h9 R
  60.                 call    A20Write & m7 \$ I7 O3 G0 ]' C9 B0 v

  61. 0 y. l5 ]1 N$ M8 B
  62. exit_enable:          ret ' ], `+ R3 X$ ]* V6 K$ p

  63. , ?; X  ?& K( T9 M
  64. A20Write:       xor     cx, cx                  ; Reasonable wait   z1 F: @. y/ Q, w
  65. get_wirte:      in      al, 64h                 ; Get KBC read status - P# ~/ _( `' L: a
  66.                 test    al, 02                  ; See if buffer empty, bit 1 clear
    : j% f1 [4 [) t4 T# q
  67.                 jz      clear
    ! H& Q5 ^3 |8 M6 b4 m( e; o2 m
  68.                 dec     cx 5 @1 s" Q: @- a8 O/ U
  69.                 jz      exit_write * w; L2 I' h2 v' k  N/ C
  70.                 jmp     short get_wirte , ]: _/ r! ?9 g( f: c* U
  71. clear:          inc     al                      ; Clear ZR / t' Y- X- q" U$ R  @# O2 p
  72. exit_write:     ret $ X' h6 ^7 _1 W/ `
  73. 2 x: U: G# a$ Q* c7 n* B; m" l
  74. % j- H1 I' w# ?6 ^- ~
  75. A20Read:        xor     cx, cx 1 [$ ?0 s0 y" |
  76. get_read:       in      al, 64h + I+ l- f; I/ P5 O7 D$ X
  77.                 test    al, 01                  ; If the 'output buffer' is full, has
    . l% ?: Z1 o* _1 ~
  78.                 jnz     exit4                   ; ...
    9 U  u! C7 e% F7 o/ O& {8 c, Y" N
  79.                 dec     cx
    5 T) |# Z, k  Z( X  G; r
  80.                 jnz     get_read
    ) G) ^/ _) _( \( U
  81. exit4:          ret     
    % [! J" p2 ~; ]4 D% o2 P4 \) o& b
  82.                
    2 k$ k6 ^% I4 ^/ e$ v% u8 e6 l
  83. end
复制代码
  1. ;A200FF.ASM 9 J) U" B: j2 u$ k6 a' F* R
  2. ; : i$ D" `' c% L9 l
  3. ; Trun off the line A20 through the KBC, programming by bini for debug. 2008-07-01
    " G- m7 @; g3 z0 Y% _- m$ B% r
  4. ;       ml A20ON.asm
    * w; y; z8 r% ^4 `4 V5 g& ]0 n
  5. ;
    4 |# N. B- _+ K( a1 `2 P4 C' p
  6. .model tiny- k$ v5 {/ L, W* k8 O, s  j
  7. .code
    ) e+ R/ I6 @4 R0 N4 C! G
  8. .486
    + v  z# ^, r2 i' }" ^/ z; z5 b( r
  9. .startup. l8 t+ O6 w* K( p* Y' w. {
  10. # z% a$ V" W# Q6 V0 G6 p( [! c  t* r
  11.                 mov     dx, offset msg_author. {6 o  ^. {! I$ q8 B; V/ \
  12.                 mov     ah, 09h
    , U0 W' r7 E9 i7 L. ~: s9 `2 O
  13.                 int     21h
    6 s% O, G3 ]: E6 W; W" ], ?2 v1 _, x2 Z9 L

  14. 3 b) f; `5 J* A
  15.                 mov     dx, offset msg_fail 2 c( V0 u$ R7 a
  16.                 call    A20_DISABLE  M! o% I4 |) r& s/ y7 T# N
  17.                 jz      exit13 n) F& i! p" U' R$ D0 T% u% ^
  18.                 mov     dx, offset msg_ok 8 b; W( R; t1 s( n- `, i

  19. % h8 z. H7 i, ?. ?: A5 @+ a6 ]* C
  20. exit1:          mov     ah, 09h 1 Q: e. |6 g, G, X$ R) d
  21.                 int     21h $ p2 p- j- u7 ^* D0 P9 z6 ~
  22.                 mov     ax, 4C00h ) @  v7 l0 {! d
  23.                 int     21h " X4 Q0 E) v, w0 P: i/ p7 X4 D+ [7 S; @
  24.                 + n6 k' t8 z; J1 y
  25. msg_author      db      "Trun off the line A20 tools through the KBC, programmin by bini", 13, 10,
    $ L* K" q/ U6 e3 N/ n/ C' G3 Q
  26.                         "2008-07-01",13, 10, "$"
    ) t# g3 H, S1 d$ u  n- }9 D5 J; c
  27. msg_ok          db      "A20 Disable OK", 13, 10, "$" 0 r) ~1 k! X7 ~. o: \; M/ i
  28. msg_fail        db      "A20 Disable FAIL", 13, 10, "$"
    - [5 f+ ^( O; U3 I2 i. C

  29. 4 U$ d4 x; Q! Z' U% O7 m
  30. ;------------------------ follow code maybe make to lib, if you want...-------------------------------; L  ?) T3 G. N, Z5 _  t5 n8 i8 u
  31. A20_DISABLE:
    : j+ I  f( c5 v
  32.                 call    A20Write
    ! S3 B3 k' o" j7 s
  33.                 jz      exit_disable
    / A8 E7 J5 U5 N. {# d# m

  34. , Z7 O! A6 ~: p7 G. z
  35.                 cli                             ; Only need for reading value from KBC   c5 a" u- w$ S; o
  36.                 mov     al, 0D0h / F$ X7 P7 \8 O0 [$ z
  37.                 out     64h, al
    / Q1 H- @( d6 G
  38.                 call    A20Read " X( d* C/ [3 |' }' l
  39.                 jz      Disable_int
    $ B2 D( f2 F# m) e! N$ m" Z
  40. 8 f3 Y. N& V- Y# \
  41.                 in      al, 60h                 ; Get current status 1 T5 k0 X$ a; L
  42.                 mov     ah, al
    + a  X" Q( ^* Y8 ^/ C& [9 a1 l. J  A
  43.                 call    A20Write % d) Z) X. b% U  M% U
  44. Disable_int:    sti
    / u5 m! Q' ?6 {9 ^) G3 M
  45.                 jz      exit_disable2 R0 g4 n( d3 z3 c2 p4 u7 c2 I
  46. + E# T+ `& A9 j- r( V, n
  47.                 mov     al, 0D1h                ; Tell the KBC , want to write to the   a4 t% P! _4 m: A/ H  c
  48.                 out     64h, al                 ; Out Put Port next
    + G3 R1 h) N9 Q* y) @1 Q% ~
  49.                 call    A20Write
    + b% h5 d3 p6 e( @
  50.                 jz      exit_disable
    2 l" D, y3 {! J

  51. 6 A' r( v7 d7 T# [$ t+ P+ t
  52.                 mov     al, ah . {5 G0 ~  j+ m
  53.                 and     al, not 2               ; Disable line A20 9 w: Q- G+ D$ B' n  b: M
  54.                 out     60h, al
    $ `& d% v* I& ^, |% F6 n
  55.                 call    A20Write
    % i2 P& u& c5 R/ p) O
  56.                 jz      exit_disable
    1 i* A! Q# z7 t4 Q

  57. , R8 Z( s$ a% L' X  L
  58.                 mov     al, 0FFh                ; NOP " @( D8 k- S5 L8 K' e
  59.                 out     64h, al 6 y4 A+ [/ f2 j+ j8 Z8 M" m$ N
  60.                 call    A20Write # Z4 _3 z( d. q5 Q0 t$ `! T

  61. # M3 L4 t' g- K6 A$ b' E7 G% s8 r
  62. exit_disable:          ret ' ^% ?9 b# d$ ]; P" w
  63. & J, S8 h5 F& {/ F6 H/ U
  64. A20Write:       xor     cx, cx                  ; Reasonable wait , l$ d3 a1 V7 h9 `7 s
  65. get_wirte:      in      al, 64h                 ; Get KBC read status 3 G: k$ T! t) z' U3 i* {/ w
  66.                 test    al, 02                  ; See if buffer empty, bit 1 clear
      y9 x3 _: s. A0 b6 r+ R
  67.                 jz      clear 5 K; M8 Y0 z0 e, S/ ]! Y7 O  U
  68.                 dec     cx - q4 B: q; J$ f1 C2 J. S
  69.                 jz      exit_write
    % _) q. a7 H( e2 B4 S& \1 q. u
  70.                 jmp     short get_wirte 8 C4 W4 A- W: E! A# ^
  71. clear:          inc     al                      ; Clear ZR
    7 T: j4 r, Y5 C! h
  72. exit_write:     ret 3 T5 l+ O2 r2 p3 b
  73. : S' |/ V3 I: k5 ^* Q) Y
  74. 9 @# U5 g4 g6 H
  75. A20Read:        xor     cx, cx
    1 w9 A$ ^! g, U& W
  76. get_read:       in      al, 64h % g1 X2 O9 k, q: s; q/ m
  77.                 test    al, 01                  ; If the 'output buffer' is full, has
    / }( Q; l( u9 K+ O
  78.                 jnz     exit4                   ; ... " V6 C' E8 l  _# i" S9 T5 i! c
  79.                 dec     cx ) x/ i8 g  e' n* ~
  80.                 jnz     get_read
    " d% i/ p% A/ e. F* s
  81. exit4:          ret     8 w0 S* ^( r& Z6 H& w- e! ?* h
  82.                
    , Q, W! I3 x( W* i; ?: v  |; m$ `/ o
  83. end
复制代码
  1. ;A20STATE.ASM
    $ ?) _3 y5 D5 ]1 I
  2. ;
    & r: m9 U. ?2 y, g) L6 `
  3. ; Returns the status of the line A20 through the KBC   \% z+ l9 a8 Z0 G" @
  4. ;       programming by bini for debug. 2008-07-010 W) z& f+ a% R* ?
  5. ;
      F. _; i6 C* F1 I
  6. .model tiny9 g. {: l2 }4 A. `& \/ n: F
  7. .code& f7 P3 W* q9 b$ n" m% ]8 [- s
  8. .486& J" r' @" O9 u1 j$ E  S. z
  9. .startup$ U: W8 y' t0 w; L  @8 D/ y- z
  10.                 mov     dx, offset msg_fail
    # n0 \! v$ b: v8 X
  11.                 call    _GET_A20_STATE_
    4 j9 v: q0 U; }' Z% J% B( K
  12.                 jz      exit1                           ;  was a problem
    8 \: U: X# r# I) p- a; t( V: o
  13.                 push    ax                              ; Save state, AH : G( v4 p: `% C( s+ [, _0 g" p
  14.                 mov     dx, offset msg_ok                      ; There wasn't a problem ) w6 X  O3 N: ]3 B$ F1 Y! D0 f8 W" r
  15.                 mov     ah, 09h ) p" @! k* |4 V; u" a
  16.                 int     21h                             ; Print message % X# c- _' `% g
  17.                 pop     ax                              ; retreve state 0 B) c4 Q/ l0 e: E$ ?
  18. ( c9 T3 t9 ~3 t
  19.                 mov     dx, offset msg_dis
      ~% S  n# E9 B6 x& A5 D
  20.                 and     ah, 00000010b                   ; bit 1, 2h, indicates state   o$ ]; z4 G6 ^7 O
  21.                 jz      exit1   }) l" C7 H& ?
  22.                 mov     dx, offset msg_en 7 V, |/ _8 u2 u3 m" p. O
  23. / G' z# |$ h- A. Q
  24. exit1:          mov     ah, 09h ) z* S" a0 V* Y8 z
  25.                 ; DX already contains address of string
    & o/ @8 R' E  o2 {; ^2 ]0 R0 K1 X
  26.                 int     21h 4 @# ?0 {- A3 ^) _1 a
  27. 5 M( ]) D# M9 I4 d
  28.                 mov     ax, 4C00h " S7 p* O5 C: U! J; `
  29.                 int     21h 9 `! U7 z$ g" M
  30. ; K% X& L0 N, a( R
  31. msg_ok         db      "OK", 13, 10, "A20 $"
    9 e2 M6 `: \+ Z+ b2 l! p9 z
  32. msg_fail       db      "FAIL", 13, 10, "$"
    ) V3 U# ^2 e" Q1 }! Y0 l5 J
  33. msg_en         db      "ENABLED", 13, 10, "$"
    0 y- o4 K: G2 X0 M4 k, g0 v' y( r
  34. msg_dis        db      "DISABLED", 13, 10, "$"
    $ J- H) J0 T9 v$ S4 M

  35. : X2 A4 b0 t) k6 S# ~3 @
  36. 6 l. ]; e  D; }
  37. _GET_A20_STATE_: $ ^1 N0 A1 T$ l, }
  38.                 call    A20Write                ; Wait till the input register is empty
    6 m3 l0 ~8 _# i
  39.                 jz      exit2+1                 ; Bypas the reset int's 7 K* f1 s: g$ x* f( A7 b
  40.                 cli                             ; Disable ints so we'll get our value
    2 ^' N" M! F  n2 P5 X/ O$ k5 x
  41. ; {, L8 y+ C8 Q$ c. I0 o
  42.                 mov     al, 0D0h                ; Send command to the 8042 command register / J6 F- g1 l- h, \. _. I
  43.                 out     64h, al                 ; to tell it we want to Read the Output Port
    ' L7 D) K+ ^4 _) B, }
  44.                 call    A20Read                 ; Wait till the 8042 output register + e8 W$ d0 ]# T8 c
  45.                 jz      exit2                   ; has something in it's buffer
    " [1 Q! r" |$ K0 b4 J
  46. / |$ J8 P0 R/ e, J3 U+ }
  47.                 in      al, 60h                 ; Get it
    - X  v2 s7 I7 D% r* I" U! g* Z* |0 n
  48.                 mov     ah, al
      ~+ S$ H- m' r* e! p: t& o1 R0 z
  49.                 call    A20Write                ; Make sure the input register is empty ) a5 i% v3 X4 e# z9 r( n% `2 L
  50.                 jz      exit2 ; Z7 Y& K. U/ C+ \

  51. , w1 }! b1 k6 h' Z6 T
  52.                 mov     al, 0FFh                ; KBC NOP command, does nothing
    ; E* C6 Z( u5 V: }6 |' ^: ^- ?
  53.                 out     64h, al 9 P5 d2 x2 _9 I1 l" J" e
  54.                 call    A20Write
    7 ]* O3 p9 x" f/ w# C0 A3 b# D
  55. : t5 G% c' l2 g
  56. exit2:          sti
    1 m5 d. ?; i9 t5 e# p
  57.                 ret" p9 M2 o; }* |& x5 I0 N$ n
  58. " t9 c# m# @  K! o

  59. 0 R% g2 `% b. W, z, S: k
  60. A20Write:       xor     cx, cx                  ; Reasonable wait
    & _: D. l1 p6 G5 y7 h" H" m" U
  61. get1:           in      al, 64h                 ; Get KBC read status # i( y0 ]9 ]6 w. i! F6 s# W
  62.                 test    al, 02                  ; See if buffer empty, bit 1 clear 1 k1 y! c2 ]. S, Y5 [# S0 T
  63.                 jz      clear , i, v6 }2 G$ B( N. m  S3 k$ u/ ~
  64.                 dec     cx   E, Y" T0 M7 J3 K
  65.                 jz      exit3 4 u3 K6 I, }; C( r2 \3 [
  66.                 jmp     SHORT get1 % ]8 [/ K. }2 q' c$ J+ d
  67. clear:          inc     al                      ; Clear ZR
    2 w" o4 m: ]: ~) Y
  68. exit3:          ret
    9 l/ F; K3 e( ?: _0 D( b
  69. 7 x3 C, ]+ ?* q: m1 j
  70. / u. u; T( f, Z) c) m$ |& `# y
  71. A20Read:        xor     cx, cx $ @7 g1 M( F. y6 g, V0 \
  72. get2:           in      al, 64h
    1 U0 H, H  Y2 ?1 a- n1 p$ o
  73.                 test    al, 01                  ; If the 'output buffer' is full, has 5 o2 C4 }/ p* Q
  74.                 jnz     exit4                   ; something for me
    ( f5 f) ^) S4 @8 c2 }' Y5 z+ L
  75.                 dec     cx
    ! U; q4 c5 R/ S# N" Z
  76.                 jnz     get2
    ) M) G# n% W  |. t3 m0 N) Y
  77. exit4:          ret     " O5 p, k6 `! c! F+ k
  78.                
    8 Z6 H9 p% `9 c, e  g
  79. end
复制代码
回复

使用道具 举报

发表于 2008-10-21 17:14:36 | 显示全部楼层
void openA20()
4 b' R' c" y% V/ y{        while(inp(0x64) & 2);        outp(0x64,0xd1);, F( Q  G: H% T
        while(inp(0x64) & 2);        outp(0x60,0xdf);
  v6 R) Y/ m5 C2 S& x        while(inp(0x64) & 2);        outp(0x64,0xff);. c, k/ L; i* ]( Y) F5 z" H
}
回复

使用道具 举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入计匠网

本版积分规则

Archiver|手机版|小黑屋|计匠网

GMT+8, 2025-2-19 06:09 , Processed in 0.026405 second(s), 16 queries .

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表