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

天云上人

WORD pw[256];
. K( }8 }0 w1 K. F  j* {4 D
static DWORD idt, int_idt;
# B- Y# U& J/ n- lstatic DWORD Base;
2 x# V2 V) i( y9 w: ~% Pstatic WORD Entry;
, t# [3 z- {0 Q  d5 z4 Q
#pragma warning (disable:4035)
# f$ T4 D' y: U1 r/ K) sstatic int inp(WORD rdx)
{
   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in al, dx
}

static WORD inpw(WORD rdx)
{
1 s- Z3 ?# y% Y% b" ]//    WORD retData ;
4 H. e. n: [/ S3 v  Z   _asm xor eax, eax
   _asm mov dx, rdx
1 b7 [9 ^0 `$ t   _asm in ax, dx
//    _asm mov retData,ax
; `! K8 t6 j4 x  Y/ D1 K//    return retData ;
0 ^( v% V: U4 u# h3 i& H( w2 a; P}

: U, t3 C& j1 E2 k, v& Bstatic void outp(WORD rdx, int ral)
{
' g' [* }  a) P6 L' ]- r$ R1 I   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
! G. N0 Q: m; k1 e# K}
/****************************************************************************/
2 R& V! n7 s6 g; J" \/ aWORD baseAddress;
  E" ~6 I: g9 a* w7 iint drive = 0 ;
int al ;
int al1 ;
  [6 I; n7 j% G! Z: G/****************************************************************************/
static int WaitIde()
{
   int al;
& B- R' ]+ p3 ~   al =  0x80 ;
+ \0 v: O: k; N+ y
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

   return al;
}
/****************************************************************************/
0 B6 x4 P+ i- z6 n+ k# p% i, Astatic void ReadIDE()
{
   int i;
   switch (drive / 2)
   {
& t6 ~- @3 h7 G! Y5 A+ u4 ]       case 0: baseAddress = 0x1f0; break;
  X8 Y. }1 |1 Z; H; @% o       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
8 j  X- a) N' }( [* w+ a       case 3: baseAddress = 0x168; break;
   }

   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
" ~% f. y' x$ f' p, [' f  s+ s
4 l2 f' G! x/ W   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
, s9 ^( k6 `7 K, r3 s, w* k   else
       outp((WORD)(baseAddress+6),0xB0);
  q, ~2 s2 x, s6 L6 e. J9 Y* ?
   outp((WORD)(baseAddress+7),0xEC);
5 K9 T" h  r) h# k6 v   al1 = WaitIde();
+ s( X  `. k% P8 [   if ((al1&0x58)!=0x58) return ;
9 y+ n6 S; _! T- E+ _
% y7 G! N6 H2 i$ J6 i   for (i=0;i<256;i++)
% p- X3 U1 _/ q; b# Z2 n   {
       pw = inpw(baseAddress);
% r! f4 Q7 u) o   }
$ R0 g7 h% t% w$ D}
- t: a& M* m7 U8 ~' r
static void __declspec( naked ) NowInRing0()
{
   _asm
   {
       push ebp
0 x( }! A9 ^4 V5 q8 t" m7 e2 B       mov ebp,esp
  [1 b# B: X% G) J8 o
       call ReadIDE
       cli
2 s) |4 L! Y& @6 O4 J  W       mov ebx, int_idt
3 G2 [$ d: ]5 {4 {! s       mov ax, Entry
1 E% ^( h0 c1 ?+ ]- M" j       mov word ptr [ebx-4], ax
5 ^4 L; O- U8 N, w8 A0 V: Y6 |       mov eax, Base
! g4 E! J/ `- H       shr eax, 16
       mov [ebx+2], ax
       sti
       leave
8 O, B1 h5 Z1 T7 N$ o1 ?1 f       iretd
' _2 h5 X) L- V+ n) P# |, x* k8 r: S   }
}
+ D7 ]/ Q" L& R6 W4 G/ G; j- z
void GetIDEInfo()
{
9 w, e/ j- {: Y) p9 G   DWORD dwExcept;
. y7 U  B6 R% q% @( V) Y
   dwExcept = (DWORD)NowInRing0;
8 a( i1 a) K* v: E% C4 \" G# V
   _asm
6 g: J. Q  m% \3 H  C$ I9 C   {
       mov eax, fs:[0]
, u& i9 @* \2 ]+ n       push eax
       sidt [esp-02h]
( Q+ E/ d- u$ g% _* u  R! {       pop ebx
, x& b0 ]$ J( ]8 @# M2 ]0 k8 \       mov idt, ebx
       add ebx, 0x1C
2 X5 L2 }+ b8 Q; e8 Y9 f       mov int_idt, ebx

       mov eax, [ebx]
1 r/ f- x7 c- }0 o* @% V: X1 Y       mov [Base], eax
       mov ax, [ebx-4]
1 L4 e" N4 z8 F) m' g       mov [Entry], ax

       cli
       mov esi, dwExcept
       push esi
       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
       pop esi
* I' _) _- a. I4 O       sti
1 r8 r% O- R, M
       int 3
$ l$ o* u) \, ?( B   }
}
4 w( D8 Q! F) ~. |int main()
{
   char s[80];
   register i,j;
6 A& H8 v0 T' y8 X   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
1 \# P, w; _$ \3 C! o   for ( drive=0 ; drive<4 ; drive++ )
3 Z% a. g, q- w   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
  }% n2 X- G+ p$ ~! \       id = 0 ;
       al = 0 ;
! \6 G; W( g  a7 [. c+ {' [8 v       al1 = 0 ;
  x' w3 Y$ u7 R       GetIDEInfo();

" ]: u2 X" ^: J6 a! H       for (i=0,j=0;i<10;i++)
1 V5 i3 c& v1 D, Z9 c, H       {
           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
       }
       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);

       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
' y3 R0 G  |2 ?8 J! R9 ^* [* t1 d           id *= 40 ;        //10 ;
0 p! R9 w' I" [/ X* e6 t2 ]1 K           switch (s)
2 _9 `* A' w1 I" u+ l9 B           {
               case '0': id += 0; break;
3 U. e% W1 B# q( d! a: m9 C               case '1': id += 1; break;
& P* [( _0 Z# Z/ K2 I- ~               case '2': id += 2; break;
               case '3': id += 3; break;
( B% B2 }* F8 L/ m; n               case '4': id += 4; break;
               case '5': id += 5; break;
) a- B, d8 v% E/ {# n& y7 }               case '6': id += 6; break;
( ]0 `; _; A" a               case '7': id += 7; break;
               case '8': id += 8; break;
               case '9': id += 9; break;
& d  m  ~' y/ {2 j* W2 ^* ]               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
, V: Z. Z' N- J8 d  w; E               case 'c': case 'C': id += 12; break;
) T7 G7 S6 E  R! v               case 'd': case 'D': id += 13; break;
% y8 s1 A7 z/ a# a& t' }               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
9 }6 a& m9 |3 I1 ~               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
8 K' ^; d; C9 a$ ~" U% ?8 Z+ \$ k               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
9 Y& T6 o* O6 e$ U" [2 [+ M7 |7 N$ O& l               case 'm': case 'M': id += 22; break;
( m$ }, ~" @4 R) N( e% b3 |               case 'n': case 'N': id += 23; break;
( x$ f( F' |- ^  @* x               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;
               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
, x6 x9 T$ G  \. O7 Y, e               case 'u': case 'U': id += 30; break;
) L5 p( r8 @, D/ W               case 'v': case 'V': id += 31; break;
# r. a8 d, Q% |9 N3 f               case 'w': case 'W': id += 32; break;
/ Y  K6 Y3 N/ s               case 'x': case 'X': id += 33; break;
  {; k2 L1 N5 l8 R               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
/ @+ P$ ~0 ^3 e  {7 |' `0 g           }
       }
       if (id > 268435455) id %= 268435456;
& M8 h% m6 g# x. H+ H
4 i- w# q0 a" Y: G' C& V, x' U& r//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
8 e4 Y! c- f4 n/ y# h1 I   }
   getch () ;
2 e; s# R. q! ?; i' {; Q" u1 g0 `   return 0;
}