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

天云上人

WORD pw[256];

- @; X1 D. M- |* S9 `+ m. kstatic DWORD idt, int_idt;
static DWORD Base;
/ r! F" Z2 \* H7 f, estatic WORD Entry;

#pragma warning (disable:4035)
static int inp(WORD rdx)
{
   _asm xor eax, eax
) l4 C$ U- A* V( J4 N   _asm mov dx, rdx
* `4 o. t1 w) e+ o. t9 g$ W" {# c8 \   _asm in al, dx
$ F9 K1 \& Z4 P5 U& p}

static WORD inpw(WORD rdx)
{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
9 P* g  z. g' {- l3 L8 f   _asm in ax, dx
//    _asm mov retData,ax
& |3 \" e* C3 {' i  f2 Y//    return retData ;
2 X! t( \9 W  N}
( m+ M) X# X  G! w
static void outp(WORD rdx, int ral)
; @& c: o+ n- c% c0 |{
   _asm mov dx, rdx
   _asm mov eax, ral
# o( `% j9 F0 N* _; d   _asm out dx, al
}
2 G! P! ]4 l3 n7 y9 r/****************************************************************************/
! i$ l5 _) o3 l9 f9 t8 LWORD baseAddress;
int drive = 0 ;
int al ;
int al1 ;
/****************************************************************************/
6 ]! b+ l* D5 P  k8 f1 cstatic int WaitIde()
{
* q/ v! S+ F5 T6 W   int al;
   al =  0x80 ;
/ P3 F& |' X/ M; \) A& m
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
/ p4 z1 ]4 ^" A2 }
1 }  [' w3 ?/ w8 c: ?4 |! [' t, c   return al;
}
7 x0 ?, Y+ a$ L- V/****************************************************************************/
/ w$ Q9 E* q" A7 _& M1 Gstatic void ReadIDE()
{
5 s7 k! a6 K3 m& o* d3 l4 j   int i;
   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
8 D) X( U! f& [" c  Q       case 2: baseAddress = 0x1e8; break;
$ f( j# s* [  D' i: H. H       case 3: baseAddress = 0x168; break;
/ D7 D+ I( m8 A6 l   }

   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
8 [1 `+ g4 m9 t- A' V5 L   al = WaitIde();
- B6 d# ]' T) i
/ M, K# B0 J5 ]6 F* e   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
) \% D$ F, ?; E  U* z" g. u7 _
   if ( 0==(drive%2) )
; g+ V  _/ w0 }       outp((WORD)(baseAddress+6),0xA0);
   else
! j! P" N9 Y, w6 J/ e/ {3 h/ x6 F8 }       outp((WORD)(baseAddress+6),0xB0);

: ?4 c& L3 u+ W( }8 `/ e( K2 k% @   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;
  z7 K/ K( {5 o: a! F) H$ N
- [9 E5 C' }& l) V   for (i=0;i<256;i++)
& U# g$ x9 u. f8 \, V   {
       pw = inpw(baseAddress);
; ~: f* d4 X) {% K& B3 p! R   }
. U% R+ o: X0 B) b# l}
0 d8 R& m' q$ t
5 X  }4 a2 }1 A6 q0 y, ~, N  D" dstatic void __declspec( naked ) NowInRing0()
/ a! j7 M( J. M' S3 _; M# A{
   _asm
" @* i9 u( j+ r/ ?& @  U   {
, p. J; r0 U6 `# [       push ebp
       mov ebp,esp
2 u8 z% B2 u# P% i
       call ReadIDE
       cli
       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
       mov eax, Base
       shr eax, 16
6 {; X" ?- T# e# B/ d$ D       mov [ebx+2], ax
       sti
       leave
7 J$ \. q# `3 b0 d5 S       iretd
( E. _1 Q- D* Y; A0 Z   }
}
- u) t' n8 n6 o# E
2 u# ^7 O0 A% zvoid GetIDEInfo()
7 K# ^7 q7 W$ I6 }1 N{
4 ?0 d  P; X5 a+ u7 p   DWORD dwExcept;

9 o) }7 R' L" k" Z/ `& C   dwExcept = (DWORD)NowInRing0;

# n. {! i! {/ \: w   _asm
   {
# d! E2 e& j- ]3 o$ W       mov eax, fs:[0]
4 l+ s! m5 @# y8 O# F+ N' C- i       push eax
6 Z# S7 F" h) n: W5 g  W       sidt [esp-02h]
       pop ebx
! |. W- m3 u$ R/ U       mov idt, ebx
       add ebx, 0x1C
       mov int_idt, ebx
/ z" v) v# X4 u: [3 x7 R
) J# V( ?: Z' X- m. B       mov eax, [ebx]
       mov [Base], eax
/ S! r- D& U; ]* A) ?' O3 q       mov ax, [ebx-4]
0 E3 Q, A6 W7 S% ?       mov [Entry], ax

3 S2 ~& k- B( P* c+ u& ~/ I       cli
       mov esi, dwExcept
  E- n3 |# G  B2 @, s       push esi
, M- n3 J, z+ N- v2 |2 X# }& J       mov [ebx-4], si
       shr esi, 16
/ r* L) d* ~- T9 @3 S1 q+ E       mov [ebx+2], si
       pop esi
, N6 W$ p. S4 A8 E' B* ~       sti
5 A' k6 d! b( Q* f
* x% Y0 E% J: S) n" @5 n, u# T# v       int 3
   }
  a3 C. i% ]% D, @}
int main()
{
   char s[80];
   register i,j;
' F4 A5 j. M/ z. Y/ Q   unsigned long id = 0 ;
& O/ H* z4 w+ n' [9 n
  `0 X0 @9 h: s# D4 g' G//特别注意：这段程序不能 Debug
: ^5 S$ l6 d% Z7 B$ m) q   for ( drive=0 ; drive<4 ; drive++ )
0 g' {* \" s7 K   {
4 v! v6 j3 e* m$ q$ B, L# R1 `& ~       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
( C4 P+ g2 _2 d1 T       id = 0 ;
* U% i* [; w6 y       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();
& b- f  }: ?* A
       for (i=0,j=0;i<10;i++)
3 w9 i+ o) A/ T8 |' `( w; \       {
           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
6 J0 |9 o" l2 E; }       }
       s[j] = 0;
9 F; c+ n  z. p" ]5 u0 Q2 t
( `# m, K: N0 S+ _//        for (i=0;s;i++)printf("%d,",s);printf("\n");
  \, \, e. y6 t& }       printf("Serial=%s\n", s);

5 `+ {2 e* r2 h' c3 W; j* @       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
/ X0 J, h2 a# q- \$ m# y# Q           switch (s)
           {
               case '0': id += 0; break;
               case '1': id += 1; break;
; o8 r3 y3 o9 K7 P& J               case '2': id += 2; break;
               case '3': id += 3; break;
               case '4': id += 4; break;
" }/ `7 v# ~  D  k/ c$ D. m6 a               case '5': id += 5; break;
               case '6': id += 6; break;
               case '7': id += 7; break;
- w9 |( V- _% w: u. ?               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
# Z( E. a- m, V& L8 y               case 'c': case 'C': id += 12; break;
9 m: u+ j0 F, T. ~- H7 b               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
( ~; |1 r7 R) \  u$ o+ W* O               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
1 W, L+ Y- d' U2 _- J) P( m2 k7 \               case 'k': case 'K': id += 20; break;
- r) P. ~0 P8 d0 @! _7 x" L               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;
               case 'p': case ';P': id += 25; break;
9 D4 ]# ]8 N) N6 P  y; j4 N* P- H9 w               case 'q': case 'Q': id += 26; break;
1 p' h4 n8 o) k9 y0 g- h! @6 B               case 'r': case 'R': id += 27; break;
! G$ T# ?( _4 J! j1 y+ O2 g" ]               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
: h/ _* h, s! b6 {               case 'u': case 'U': id += 30; break;
; y1 ?# i5 H9 p/ W               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
; O: Z3 [" \# J$ t1 c2 M9 d* c7 @               case 'y': case 'Y': id += 34; break;
1 B3 [  A! p- E, W5 Q4 F' D& U               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
" E+ R1 [; X+ d           }
- |" a7 w; E6 d# g3 Z       }
3 N3 E, L$ K% V$ C: V6 |, c       if (id > 268435455) id %= 268435456;

  `- b& h/ ~- ~+ X) n//        if ( al1 == 0x58 )
3 @6 a+ G7 f+ X  h% s8 G8 l! o           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
) i6 Q5 Y2 S' `2 g: }1 W, J( A   }
   getch () ;
   return 0;
3 U2 n2 W7 r* d# w}