在windows下怎么获得本机得硬盘序列号

天云上人

WORD pw[256];

* t  l% u4 x8 H/ t) ~static DWORD idt, int_idt;
" r  z9 H4 ~9 n+ Kstatic DWORD Base;
static WORD Entry;
4 t5 ?. p% I( A, t1 ?
" m: e: t9 [! X& |" n#pragma warning (disable:4035)
/ H" `/ a6 |2 j/ `- i" b! bstatic int inp(WORD rdx)
{
1 X  @3 D. c8 a/ K+ @" p5 |. T   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in al, dx
}

static WORD inpw(WORD rdx)
+ v( h) f7 T2 p{
//    WORD retData ;
9 `' X; d; ~8 Y5 }1 a0 h4 f   _asm xor eax, eax
   _asm mov dx, rdx
2 T8 ~; r- @3 O/ C' q   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
; q0 P! z3 u3 V3 j  l9 f}
" x& @+ `3 }4 M1 H
: [. S  t$ T, c) O% Sstatic void outp(WORD rdx, int ral)
& F5 r8 y, c1 {1 s4 d/ g{
, i# z( T& z* P1 L; `   _asm mov dx, rdx
7 k6 G+ Y' O5 A) W   _asm mov eax, ral
   _asm out dx, al
}
/****************************************************************************/
+ G' u% }$ f' l% F" {6 |) C. _- xWORD baseAddress;
0 x! W8 @4 a% ]: k3 |" xint drive = 0 ;
* F# g# q. J  t! `5 u% zint al ;
int al1 ;
/****************************************************************************/
, h5 X' l) Z( w2 l% X( X* t+ S* Gstatic int WaitIde()
' {- f; A; s( [* [( Y{
   int al;
" O, ^5 e* e! q   al =  0x80 ;
: x  _- h# [# l$ t1 K
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
0 b1 l% v1 k) ]1 R
( N' g5 K) |" G   return al;
}
6 l' D6 e% X! k% a# J6 H/****************************************************************************/
5 X% `) ?  n- q- I& Jstatic void ReadIDE()
- H) W: O! U5 X% ^2 ~; P{
+ W0 H+ G2 C7 x1 v   int i;
; ?! ?# j) L& r& X   switch (drive / 2)
% u8 n& O" J/ |   {
9 V: f$ f6 J7 l# I       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
9 \" _( f2 u5 Q0 {3 A4 r. I5 X       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }
. ]4 p+ A0 G; W: X; E* b
   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
- i2 j  U9 c, _9 M
# B- c! N& s9 |   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
! L& J) W- `2 i- i# `+ m   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
  C! {" J9 L5 x3 z" o9 W8 a
5 a, T9 B. x  g: [. s1 n6 H. Q   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
: ]1 e! p8 ^2 j& b8 k4 Q9 C5 ?4 ?# ?   else
       outp((WORD)(baseAddress+6),0xB0);

. `4 A$ X6 t* t: ^: L" ]8 ^   outp((WORD)(baseAddress+7),0xEC);
: o8 F3 j9 ?! y5 v5 \   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

) J. y* V  W* P" p/ C) Q/ p4 Z/ G) F. f# |   for (i=0;i<256;i++)
) A% I/ U& v7 h; q   {
       pw = inpw(baseAddress);
  t+ ~' E& R% K6 s: Y   }
0 n; ^$ O, |# g8 {* S( F* }5 Y}

, b) w- Q: o! X! |* K) P1 istatic void __declspec( naked ) NowInRing0()
) V1 }* |/ |% U. Z, y; V{
   _asm
   {
: V8 v. Q' g' E  `5 ^% B* L       push ebp
       mov ebp,esp

* |& E  r  M+ w* u7 l3 A8 G       call ReadIDE
+ k) B8 T" L2 {. I2 c: Y3 ?       cli
% V7 t9 o1 t- @, `       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
4 n2 y6 T8 i' v+ K0 X; D4 n2 q       mov eax, Base
% O- {. n- u1 e$ ^# S: b3 W       shr eax, 16
       mov [ebx+2], ax
8 B3 Y7 I" v7 {7 Z0 R6 ^0 ~  P       sti
( Y+ y9 Q# Y% i  K4 A; G' T9 D       leave
# T7 ^" {' Z# L1 T$ M& P       iretd
- \6 }* t/ t- ?2 z: k, W8 h- R; R   }
}

void GetIDEInfo()
{
   DWORD dwExcept;

   dwExcept = (DWORD)NowInRing0;
) j* Z7 P; Q- A& r) q# d/ {
, M2 \/ a& R2 C6 E$ a6 J   _asm
   {
3 H+ f! p& E2 _( t  Z; K       mov eax, fs:[0]
       push eax
# ~0 h0 ]/ C  a       sidt [esp-02h]
       pop ebx
       mov idt, ebx
) G+ K1 n' O( R+ _       add ebx, 0x1C
7 T/ n6 ^; _: N9 q* u       mov int_idt, ebx
& x; V: Y# T/ B3 d4 e+ D& ]) D  z
0 X5 x9 ~0 H' Q. ~& g. ~) @% o       mov eax, [ebx]
       mov [Base], eax
       mov ax, [ebx-4]
5 J2 S. ?, J# u/ V       mov [Entry], ax

5 w' `- V- W7 E$ M2 P; l4 R       cli
       mov esi, dwExcept
       push esi
; H/ @9 n3 m) M/ \& e+ a9 W       mov [ebx-4], si
6 q# A& |2 Q( q: `6 N9 f/ W       shr esi, 16
& C0 O" t' m1 r/ h: W       mov [ebx+2], si
. W5 z, j+ o9 q       pop esi
* \% M# s2 K8 C% q8 I( A4 Q: X% w       sti

       int 3
   }
. j) _6 P' s% Y( @6 S}
0 B" Q, e& N4 u6 S( u4 s6 r6 Dint main()
: H- m' R1 }" L% \1 |$ v{
9 r9 {3 h( W2 a* {3 B" Y5 A   char s[80];
   register i,j;
  n' ^8 `" J% g+ [- U! L2 b& e1 E   unsigned long id = 0 ;

+ J- V0 P4 }1 w& H: G2 ]" `0 d: w//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
8 T0 e* I: C8 ]: g# Q2 ?       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
: k: l& i  r/ V$ F, Y# v0 g       al = 0 ;
       al1 = 0 ;
! {1 W1 f1 Z& W" f2 i7 o( Q2 A       GetIDEInfo();

6 M  z( l3 G2 z. p1 u) r% |' b       for (i=0,j=0;i<10;i++)
" S+ c8 L: x9 W# l+ A( Q       {
, f, d; d. s- C4 u4 f           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
3 R" O$ t% [6 A0 I1 ^; H6 U       }
5 y& t2 D! N4 ~7 l       s[j] = 0;

* @7 J+ B6 ~( e, j9 R: n- M; h2 |//        for (i=0;s;i++)printf("%d,",s);printf("\n");
9 U6 \: X4 _4 ~0 q0 E& B( Y9 h) v) q       printf("Serial=%s\n", s);
8 A3 l9 x& U  p  E  [! |" _
       for ( i=0 ; s ; i++ )
9 M) f: |7 r$ K  g3 _       {
           if ('-' == s || '/'==s || ' '==s) continue;
; V3 }4 {$ Y5 N           printf ( "%d," , s ) ;
6 w. O+ y) i2 d' f% T) ~           id *= 40 ;        //10 ;
$ H  ?# [$ Y) h. H4 z           switch (s)
           {
/ x. @- x  r0 {) O) d5 \) R! S               case '0': id += 0; break;
* a2 g' |0 ^' h' C. x0 _               case '1': id += 1; break;
               case '2': id += 2; break;
               case '3': id += 3; break;
! f* d/ @0 H0 H, d0 A               case '4': id += 4; break;
               case '5': id += 5; break;
: n9 I8 b, y" K) a; y               case '6': id += 6; break;
               case '7': id += 7; break;
% v4 L1 F8 X! {( e3 d$ d               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
- \$ V5 F& N8 i: j  }& j               case 'c': case 'C': id += 12; break;
* Y7 J5 Z# x7 N9 w               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
2 ~5 P& Q# ~2 r: T" ~               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
2 m! d  X2 I) d2 z9 r7 }# _               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
7 d9 j. D2 b" J7 K' U$ g+ {0 K               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
) ~; m& }' H6 b5 D6 u               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
+ \# _5 F, l% M- {6 C, |% f               default : id /= 40 ;
           }
' @+ S, \1 M0 w* m$ M& ^9 B       }
       if (id > 268435455) id %= 268435456;

- ~' q5 @. p+ P2 j- H$ F& _//        if ( al1 == 0x58 )
# w5 V% r1 A# L4 p( f           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
   getch () ;
* ^3 z0 M( |0 b+ I& z" F$ G   return 0;
: w( u2 l/ J- x1 v$ T( J3 F5 ^}