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

天云上人

WORD pw[256];

' u* t/ ?8 B" `" D6 T0 F  Astatic DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

. q3 {- {7 |/ q5 C, ~) P9 z#pragma warning (disable:4035)
static int inp(WORD rdx)
/ V; \7 g+ E+ G! ^/ o( l4 j{
   _asm xor eax, eax
) q2 s2 a( S2 K, b+ y& b7 h   _asm mov dx, rdx
9 V9 O/ L# G3 U$ E* ^  O   _asm in al, dx
}

7 M. u' B( N' ^% J8 Dstatic WORD inpw(WORD rdx)
$ j- A* a! q/ S+ q( j8 d8 [6 A{
& }# G  R7 {2 ?//    WORD retData ;
   _asm xor eax, eax
( [, C* E, s$ d, E* y% H/ n   _asm mov dx, rdx
9 `7 p8 E& G$ g! ^) O( E% D3 [% g  D   _asm in ax, dx
/ D9 x# _8 `  q: `, G  P' S//    _asm mov retData,ax
//    return retData ;
}
5 Q2 C4 }) |; }5 B: V
static void outp(WORD rdx, int ral)
1 ^' K8 ~0 @1 Q4 X) _( v{
   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
}
/****************************************************************************/
3 W8 x* E/ a- I! R6 M. FWORD baseAddress;
int drive = 0 ;
int al ;
) a5 O- L% ]! aint al1 ;
/****************************************************************************/
1 H2 z4 P( b4 e  @/ ?static int WaitIde()
- [* t  g2 w; v# q{
   int al;
; w* U( _8 Y+ S% ~1 j. Q9 T  h+ A   al =  0x80 ;
6 ?) H. j) r, ~4 ^% a1 k. z) U
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
) j6 ^, F. O7 z& I
9 ]2 Q+ \" Y& m  L1 o2 B9 g   return al;
& }# q+ V. z7 l# J$ Q}
/****************************************************************************/
" @. r. X0 d5 x1 Lstatic void ReadIDE()
+ V) I7 I9 e; v2 M0 I7 K5 r{
   int i;
   switch (drive / 2)
   {
9 I3 `! H7 q1 n% ]' S3 T( h4 P+ X       case 0: baseAddress = 0x1f0; break;
2 I0 N- a- C& ]% |4 E" E8 u       case 1: baseAddress = 0x170; break;
: M8 S: k: R7 |, o7 l       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
8 e( U+ @- t; M% q/ ?& ]
   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
6 c" L5 T; i0 _. l2 q   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

& I$ Y* l7 w2 c: y   if ( 0==(drive%2) )
9 Y. s- s- n+ r       outp((WORD)(baseAddress+6),0xA0);
   else
# p: A5 j, `2 W' J+ G/ G' n& W       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
3 }8 @& g7 E7 z5 C' ^   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;
0 z$ O3 V; L  v+ |# H/ s
   for (i=0;i<256;i++)
9 D4 K& t, Z% \$ Y) Q% K   {
       pw = inpw(baseAddress);
2 V; r' y5 A. F; d& ^/ x5 |( X   }
}

! F6 a& X; M4 ]7 astatic void __declspec( naked ) NowInRing0()
+ \, D' S: ^0 o/ J3 e{
( o& m" Q, Q( {   _asm
   {
; d8 o# \8 W% j) l1 B/ Y! r  X       push ebp
# h0 P9 h- Y; }8 j       mov ebp,esp
" K: m  w1 e; r6 }* g( Q& B9 q
1 @% m; f" c5 e5 j. N3 [/ X       call ReadIDE
# X2 V8 B7 B' M: X. `7 l       cli
       mov ebx, int_idt
       mov ax, Entry
& f6 i& L; U# N$ l       mov word ptr [ebx-4], ax
2 D/ r6 t8 b& v' D* I1 [0 n       mov eax, Base
1 Z. P0 e( z$ S       shr eax, 16
       mov [ebx+2], ax
       sti
) `& ~: @$ o6 a+ U$ O$ z       leave
- @  q1 v# C; g# H8 I6 i4 y       iretd
   }
}

void GetIDEInfo()
7 \8 f! h( b' P7 k{
   DWORD dwExcept;
* W8 N+ P; A" w6 ]' Y' s
" ?# R/ Y& p/ t* K# [   dwExcept = (DWORD)NowInRing0;
) @9 q# P2 |( U6 @
   _asm
   {
       mov eax, fs:[0]
       push eax
       sidt [esp-02h]
9 I2 B& k: m! N" E5 B4 K5 {       pop ebx
       mov idt, ebx
" }/ V; `/ S/ L% |( ~: l7 }       add ebx, 0x1C
       mov int_idt, ebx

       mov eax, [ebx]
+ L' i$ O! x  }       mov [Base], eax
       mov ax, [ebx-4]
* ]/ a4 j* ]3 O# B& a8 F       mov [Entry], ax
/ L1 S5 c& j$ k& s4 Z7 j8 i2 I
       cli
       mov esi, dwExcept
8 w7 a  P+ t/ {8 M5 y* F* P       push esi
       mov [ebx-4], si
, t0 s6 v* t) y7 f: S% e       shr esi, 16
       mov [ebx+2], si
! o- q# b1 e( U) f6 l; j       pop esi
       sti

" T+ O( R* ^& e3 l3 q+ A       int 3
   }
2 j) R8 _4 [$ g" S}
% p2 o! l8 J7 d% n9 gint main()
% T: M  g+ C, u5 [# f* N. t{
* ?* d+ b3 |9 o7 A* K. Q0 ~* ?9 i; x* q   char s[80];
. }/ R+ X, T0 C' q" q* B1 {4 c# c  i   register i,j;
   unsigned long id = 0 ;
2 O& O6 N& D, @% Z- X  E: e2 |/ x
0 y' c: [) \- x5 v. X. c//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
5 V" }" V) ?* N$ N8 ~1 ~" A2 w- ?   {
6 T7 F* B* y. h3 }, `2 Q       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
       al = 0 ;
9 ?. Z3 z" T5 h3 j7 J       al1 = 0 ;
       GetIDEInfo();
+ I$ c* Y3 B4 Z2 @; A2 _: C
9 c* c' b1 k) S/ G5 L/ y1 D$ x       for (i=0,j=0;i<10;i++)
       {
  }2 h+ v8 @- ^! s           s[j++]=(char)(pw[10+i]>>8);
1 b6 c. g/ {9 S           s[j++]=(char)(pw[10+i]&0xFF);
       }
       s[j] = 0;
8 z+ h" n7 _' V. N, P
4 O4 g8 C) l1 g1 b% t//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);
7 J5 d0 G+ J# s; C3 L, [+ W
       for ( i=0 ; s ; i++ )
3 C/ b- L* P5 E; c8 ?( c4 j       {
( v# X' C- Y8 f           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
0 Z: O1 l1 n& v8 N3 I2 W1 ~           switch (s)
7 }8 a/ {- `9 P8 B           {
               case '0': id += 0; break;
               case '1': id += 1; break;
2 w6 ~$ N6 d+ }- r) F               case '2': id += 2; break;
               case '3': id += 3; break;
$ k% [# j+ Z* l  Z* w2 }0 t' y               case '4': id += 4; break;
               case '5': id += 5; break;
  n% a1 t2 n0 ^               case '6': id += 6; break;
               case '7': id += 7; break;
               case '8': id += 8; break;
               case '9': id += 9; break;
. U$ m  e; k, F- s& F: D               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
. r9 T( C9 U3 M" z6 U4 p               case 'c': case 'C': id += 12; break;
! E9 y* K4 k* K+ S               case 'd': case 'D': id += 13; break;
0 I/ w8 ^( w" m7 K0 U9 l6 V" J( M               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
7 `0 m8 C# h3 a               case 'h': case 'H': id += 17; break;
. L" i6 T* f: N6 a! I- J7 m! @4 D               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
- e! I3 j7 i+ J5 Q( C7 }3 m7 I2 v               case 'l': case 'L': id += 21; break;
; Y' K9 M+ g6 d$ n               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
2 }2 Q3 s0 D) v/ e               case 'o': case 'O': id += 24; break;
7 ~1 N2 o! V2 V  e$ e% o2 x3 N( _               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
: |" U* j+ P* X& v3 H, k               case 'r': case 'R': id += 27; break;
- U; K( _& I6 B" e               case 's': case 'S': id += 28; break;
; f0 X6 }$ U- C7 c               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
0 T- o& e! ^- f               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
$ O3 P& J/ n! C$ n/ u" I               case 'x': case 'X': id += 33; break;
8 C7 W8 O7 D9 J( X               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
3 h0 z+ N, A* i& z. y       }
$ }6 P: M' X1 r+ z- Q9 @0 {       if (id > 268435455) id %= 268435456;

  y5 C% E* q. V8 ~//        if ( al1 == 0x58 )
; g/ N" W- y4 E           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
) y& d& j4 K7 v: Y1 q- i   getch () ;
   return 0;
}