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

天云上人

WORD pw[256];
1 P3 x5 ]  {- v6 V" h+ E
static DWORD idt, int_idt;
; p' I+ z$ q- P& astatic DWORD Base;
* I+ D! z0 v+ b/ J$ V- F; P4 A1 _static WORD Entry;

0 Y/ P  w9 H1 U+ f' }#pragma warning (disable:4035)
% U7 r& g( C2 z- X- I3 J0 ~static int inp(WORD rdx)
{
   _asm xor eax, eax
9 W9 y/ k0 `0 t& T   _asm mov dx, rdx
4 S$ B2 w  p0 r3 @: Q$ ]8 T, g   _asm in al, dx
}
6 t4 }1 D1 i/ n% W) K
- H) _) L' `' Cstatic WORD inpw(WORD rdx)
{
! g" Z2 s% v+ z//    WORD retData ;
5 l4 K6 e9 D* t+ g1 m   _asm xor eax, eax
   _asm mov dx, rdx
6 j9 {' X7 ?9 @! K3 Z   _asm in ax, dx
//    _asm mov retData,ax
4 ]. ^. G, t8 F8 ?: F6 ]//    return retData ;
}

static void outp(WORD rdx, int ral)
0 {$ J6 ?, X2 c{
   _asm mov dx, rdx
1 b. g, D8 ?- N9 i# A% e   _asm mov eax, ral
   _asm out dx, al
}
/****************************************************************************/
WORD baseAddress;
int drive = 0 ;
int al ;
( z" Y& K5 d$ ^2 V1 C* Q- }int al1 ;
& o9 T8 s: G6 P1 @/****************************************************************************/
static int WaitIde()
{
   int al;
, h# E) n7 o, R   al =  0x80 ;
% H' Z4 y; M. L6 c7 n- L: p3 B% R
& O# _$ U. J  n3 H; |& v3 ]   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

" D0 Z( D2 z9 P. Y9 f( b   return al;
5 t$ m  ~+ k. ^9 D8 d4 {* |}
6 V; C1 j4 a' O" H0 N) ^1 o6 \/****************************************************************************/
3 u) I* @8 M7 N; G) ?static void ReadIDE()
% w$ j1 ?# m# B, {6 ^{
   int i;
& h! N2 {; D$ ^) t   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

1 `+ Q* f7 c3 a3 F4 b- h6 L   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

3 i: q1 s9 P# B& }' r   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
9 X% E2 ?2 e9 y   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
1 o: M5 E: w8 T       outp((WORD)(baseAddress+6),0xA0);
, v* s, h# @0 w$ {- g, G$ ~  ~   else
       outp((WORD)(baseAddress+6),0xB0);

; f5 i0 a( F0 l   outp((WORD)(baseAddress+7),0xEC);
/ D- T5 s: [% e( _! [   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

, U2 c2 P, _( l( R   for (i=0;i<256;i++)
& l4 I" Y! \4 s% Q9 f   {
/ k: p9 i4 u) b7 ?9 I+ F       pw = inpw(baseAddress);
   }
6 Y9 L: ?$ L& S}
9 J$ y- b2 [  f+ E5 g+ x
static void __declspec( naked ) NowInRing0()
9 v  `/ M  M+ [% m{
   _asm
7 n) L- @0 r& e' {( ]: v" K   {
       push ebp
       mov ebp,esp

3 e" s) y, a6 [! s       call ReadIDE
/ k* n0 C* [- q6 K- _       cli
       mov ebx, int_idt
       mov ax, Entry
& b2 [# a: a; k+ ~       mov word ptr [ebx-4], ax
% E, ]% c3 n6 a( S% Q       mov eax, Base
       shr eax, 16
       mov [ebx+2], ax
       sti
       leave
8 H& E4 p1 G5 P# T: i/ W       iretd
9 `$ {8 I% S) ]   }
}

void GetIDEInfo()
{
   DWORD dwExcept;

   dwExcept = (DWORD)NowInRing0;

   _asm
* a$ o$ u/ _1 E* b, C2 F, Y1 o   {
       mov eax, fs:[0]
' x& P* ~. w- d' x3 b, @' k       push eax
: [' K: V8 h! g* R' H       sidt [esp-02h]
9 w; w/ _2 {6 `7 [4 ~- `/ K; x       pop ebx
( t% p. z" d3 A9 o+ H0 k5 P, X       mov idt, ebx
       add ebx, 0x1C
, A9 |* ~# _- k7 A       mov int_idt, ebx

       mov eax, [ebx]
$ O# e" n5 o; Y2 `% V4 f3 y       mov [Base], eax
8 s& Y# Z# s; a* \       mov ax, [ebx-4]
       mov [Entry], ax
$ l, Y6 E6 f' j2 W( j4 U; g/ x
       cli
/ j: g8 }7 H& E6 a       mov esi, dwExcept
       push esi
: T! W+ `' j! ]* E1 W3 V       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
       pop esi
       sti
4 e5 l8 ^. a' E( P+ u5 {
       int 3
4 J) g; L% s! V- T8 F, w) {   }
+ c( m/ \3 G8 [}
- j( A/ \. M  M& A4 g- R3 s: qint main()
{
6 x) l- ~4 f" g- e# V, A   char s[80];
   register i,j;
$ i4 l( O: h7 W# m- I4 K. o7 o   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
$ ^% ]( E" r6 M1 z   for ( drive=0 ; drive<4 ; drive++ )
8 A' m% i! C% `! u7 n  r8 |9 a   {
/ V1 Y8 t5 |# t; i# n! t       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
: r' N8 h. E5 ?9 X- Q) y. q% Q       id = 0 ;
       al = 0 ;
       al1 = 0 ;
8 b  M# F8 x# q: n1 r       GetIDEInfo();
2 E% A7 a; D  S7 B5 ]3 C4 }
       for (i=0,j=0;i<10;i++)
  k+ j/ h" z1 C       {
: t: G8 Q  u% e; J/ \7 S! @" O           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
       }
6 s$ L, N) g8 m" C5 R       s[j] = 0;

1 m0 Z# g& H2 U" s( O. e/ i1 h2 S//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);
3 i3 [3 F3 l# a; ?6 L# i. w9 x, j
       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
! D! F% F% h; q2 c* v           printf ( "%d," , s ) ;
4 Z, |# i" i! I" ~           id *= 40 ;        //10 ;
1 Q5 u) w9 W8 b6 }3 ^           switch (s)
9 j" u7 z5 s0 Q" M. F! c           {
! e( s# C% f; X8 O! `               case '0': id += 0; break;
               case '1': id += 1; break;
               case '2': id += 2; break;
               case '3': id += 3; break;
               case '4': id += 4; break;
. n2 E6 T# h' l2 G               case '5': id += 5; break;
9 J+ R5 p* g8 D7 _' `2 O               case '6': id += 6; break;
; D7 g7 W( ~4 g9 \               case '7': id += 7; break;
2 g* H, U0 Y  ], d               case '8': id += 8; break;
               case '9': id += 9; break;
, N" T) L) w/ g- R' i: Q               case 'a': case 'A': id += 10; break;
               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;
+ U( E* D$ @1 f               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
4 V6 Y# d& t) s1 M               case 'h': case 'H': id += 17; break;
, h% [6 q* ?. O0 H               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;
# b& m, d( M* o0 d! k: v               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
; E' H* S" t& ]" A               case 'r': case 'R': id += 27; break;
: P! f+ F$ c! M0 Q               case 's': case 'S': id += 28; break;
4 [( ~) V: R/ o" L& n! z               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
* d+ Q7 K4 m' H, c3 g6 o2 K  ~               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;
) @2 d3 t+ x9 S7 S( G               case 'z': case 'Z': id += 35; break;
3 s2 y& J- O8 P  M               default : id /= 40 ;
           }
       }
       if (id > 268435455) id %= 268435456;
6 p/ _( O1 u  J! F! X: A1 ?# t8 Z  K
7 t1 x! q7 d& R5 o! V# k  z9 ]//        if ( al1 == 0x58 )
* G; f5 B7 h; L$ N1 p7 a3 k           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
   getch () ;
   return 0;
, o( g. V; N  p2 ]: q) t: R}