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

天云上人

WORD pw[256];

static DWORD idt, int_idt;
; p" w( l- E+ A5 g! ostatic DWORD Base;
static WORD Entry;
0 u2 L- `% K; H4 N0 G% Y$ g1 {. V
#pragma warning (disable:4035)
3 ?" A+ U3 E5 m' B8 T+ F; g+ Ostatic int inp(WORD rdx)
8 q+ c$ |" H  {7 `* p+ f9 {{
   _asm xor eax, eax
# ~' L3 d5 T, M5 e; G, B   _asm mov dx, rdx
   _asm in al, dx
}

static WORD inpw(WORD rdx)
{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
" U; L, j5 @! T; `- r   _asm in ax, dx
* K5 Q% ?/ `7 P* J' _//    _asm mov retData,ax
//    return retData ;
* s# F6 d: ?# z- w# _}

. m. J. H0 N; p- r. V  Wstatic void outp(WORD rdx, int ral)
{
( T  \3 Y: t# ?8 j; O- Z0 V   _asm mov dx, rdx
2 k: C7 w( f" Z. V3 D, G   _asm mov eax, ral
. v# q5 R! m* U  V   _asm out dx, al
}
/****************************************************************************/
% \5 k0 \% C* U$ d& Y$ O" g8 r$ D! XWORD baseAddress;
int drive = 0 ;
int al ;
int al1 ;
/****************************************************************************/
2 |% A+ L0 ^7 Y- a& z/ n, f2 cstatic int WaitIde()
{
) P. Y# q7 U: y/ [  ]   int al;
   al =  0x80 ;

, q6 Q- @+ \2 ~! l* C   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

9 d7 e% a  y7 U' O% ]   return al;
( J7 [! @/ h; {1 c( {1 T; z: u0 C/ e}
/ y- _# ]6 n' h0 o! _/****************************************************************************/
6 y& t- Q( U* B3 W0 O; U& jstatic void ReadIDE()
{
3 q0 I6 K5 T0 Z5 R0 j   int i;
   switch (drive / 2)
   {
  o' _" G0 `, Q* ]       case 0: baseAddress = 0x1f0; break;
) e! x. h7 q- B( A+ H       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
- }2 P; H& j; @* D4 y  h$ s       case 3: baseAddress = 0x168; break;
$ g$ x, H7 B. K* p   }
1 a6 h( a) F* ~) m# c- {( T
* p- @+ x& p$ r7 q  r   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
4 L* E* t9 O3 v7 P
; F2 {* `3 F7 @+ d/ I- x( w9 i   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

" n$ `  P- K& }. n) {* G  l: g* U   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
   else
       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
2 w! a& i8 q6 }1 D5 d   al1 = WaitIde();
$ h. [7 h3 l- V5 ^% a" O/ F   if ((al1&0x58)!=0x58) return ;
$ |! r# T0 V+ @1 O
+ M( E1 @5 O2 |' W  I   for (i=0;i<256;i++)
* P7 B3 Y3 t, O, O" n5 w   {
$ O6 f( B, x0 G       pw = inpw(baseAddress);
   }
}

6 X. E# G3 v7 Ostatic void __declspec( naked ) NowInRing0()
, ?. Y9 L. X( o; N' G4 l{
   _asm
   {
       push ebp
       mov ebp,esp

       call ReadIDE
1 h3 A: E$ \% x0 c       cli
% F7 `) o! q( k4 W$ _0 J       mov ebx, int_idt
1 I3 p* h8 y7 H* Y3 O7 p7 c       mov ax, Entry
       mov word ptr [ebx-4], ax
) {" E4 |  u$ C3 ]       mov eax, Base
/ f" k: x# R, X2 _: N1 O, ^  m4 t       shr eax, 16
) i# T  w8 s& R8 S- p5 J; ^9 G       mov [ebx+2], ax
       sti
       leave
# U1 j) {% f; n       iretd
- f. }4 m8 w- p0 X: W# t   }
}

9 w8 d( c' H7 O# H9 Kvoid GetIDEInfo()
{
! s, p; Y8 B* G* H2 {   DWORD dwExcept;
) _: x7 j8 o; X+ h, n6 \3 J/ x' o6 T8 X
8 U5 o/ b5 R% p   dwExcept = (DWORD)NowInRing0;
! h6 Z+ w  R: z! F7 y9 F
   _asm
   {
       mov eax, fs:[0]
0 n) T% V6 p2 ?, K, j5 {* w0 |       push eax
       sidt [esp-02h]
7 b3 i4 W$ z- b5 s       pop ebx
. m6 ^; i: x8 I1 [       mov idt, ebx
0 k7 D4 J) [; A$ P       add ebx, 0x1C
       mov int_idt, ebx
- i" l& R2 a, M6 K9 {2 G: h
       mov eax, [ebx]
# W+ l4 R) B$ [  g7 i- a$ X       mov [Base], eax
, l3 T% \6 D! n8 J, N       mov ax, [ebx-4]
  G) q  z5 H1 r  M/ E' m       mov [Entry], ax

3 T2 k" o" l' h$ M2 X5 i# G       cli
       mov esi, dwExcept
2 C. q$ i( m3 n$ b- e       push esi
; ]0 E+ n: I- F0 N9 ?       mov [ebx-4], si
% w! \' F( D1 i2 F+ }4 V       shr esi, 16
       mov [ebx+2], si
$ G! }  R" d+ v4 i" Q8 v       pop esi
9 m, G" F; R  [% T       sti
6 z4 c4 L, n. n- y: U
7 U, i% ?( O2 Q  {: P+ [       int 3
   }
}
int main()
" j8 [) q. Z. D/ J, q{
% u$ d* D/ N3 g) S/ D  Y   char s[80];
   register i,j;
   unsigned long id = 0 ;

2 {+ f) c- P& m8 n3 Q* _& w//特别注意：这段程序不能 Debug
5 }4 n% s* F$ F1 S! }% K. D, p   for ( drive=0 ; drive<4 ; drive++ )
   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
/ @, {* v+ z: P! G! \: L       id = 0 ;
       al = 0 ;
6 [/ A. ?) c0 p4 U) p       al1 = 0 ;
, a. Q# I0 t) l, ~       GetIDEInfo();

       for (i=0,j=0;i<10;i++)
& t1 D# @$ `# F6 ?       {
2 @# f. I3 j, _. P+ d, e           s[j++]=(char)(pw[10+i]>>8);
  }, H! u6 {9 f0 v( f           s[j++]=(char)(pw[10+i]&0xFF);
       }
1 r4 ^) h+ C9 f' ?* c6 e# z! Y: q       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
. y5 A1 x; L6 {( @+ P3 E       printf("Serial=%s\n", s);

       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
) {" F' N1 ~- i( d$ P9 W           printf ( "%d," , s ) ;
7 \7 @9 U& ^; m; E! d: v1 r; k, g# w           id *= 40 ;        //10 ;
           switch (s)
. J) Z8 A+ g1 N0 {           {
( n* m1 q7 U: Q; x; l: b               case '0': id += 0; break;
               case '1': id += 1; break;
9 F$ [( ?' ^0 ?6 Z0 w4 v- k               case '2': id += 2; break;
8 h+ ~5 l! H2 Z, Z  r5 {               case '3': id += 3; break;
( M" E  r0 ?; H  N               case '4': id += 4; break;
; P- J: d4 `( P/ q3 O1 r7 o! X& M               case '5': id += 5; break;
" s; Y$ M# u2 K; x) Y               case '6': id += 6; break;
- o; }9 Q1 @, V               case '7': id += 7; break;
( _9 x  ?; y4 t* o2 F9 t! }               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
- n" q+ W+ U, o               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
) Q* h/ T  ?& L               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
9 w# z4 s/ t1 Z4 G& J               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
# ^! A# P& i* T* C+ R4 l               case 'k': case 'K': id += 20; break;
0 w2 \1 o0 O9 _1 k# L               case 'l': case 'L': id += 21; break;
               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
. j+ S. e/ u4 F7 J' d4 a( E               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
6 s( J6 ]$ h! F2 S, L5 x  i               case 's': case 'S': id += 28; break;
1 g3 v" Y; c7 t               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
( ~" R5 f" z# `) T' `5 V! y' q/ ?. O               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
2 A6 p) c- ?, d; X) s               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
9 d# S* N( i% v9 L9 ?! i! K               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
: D& x" e, a! m+ n+ ~+ g- O) E" i       }
       if (id > 268435455) id %= 268435456;
: c# V! v# x( X# Q0 D
- {3 A) y* V, i4 N. L//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
) e  ]3 [, j0 R   getch () ;
   return 0;
}