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

天云上人

WORD pw[256];
4 P; \0 b/ A" }; ~
static DWORD idt, int_idt;
static DWORD Base;
" s+ o+ g! w$ f5 h; hstatic WORD Entry;

( _" s: F" _: W#pragma warning (disable:4035)
* r3 ]. t3 ?3 Y2 astatic int inp(WORD rdx)
{
   _asm xor eax, eax
   _asm mov dx, rdx
0 a7 j3 j0 g0 T8 ^+ e   _asm in al, dx
}

7 S7 ?, U( q" J7 u. Y) fstatic WORD inpw(WORD rdx)
{
. X7 }- }+ P5 F3 C//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
}

static void outp(WORD rdx, int ral)
, b2 U& ^6 W+ c{
; z6 K: w3 h' [# [   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
: T3 N4 E( S2 Z2 I# r# x5 U5 I}
/****************************************************************************/
! ]4 W2 d2 T7 X8 Y9 WWORD baseAddress;
/ m, U6 b4 G# Cint drive = 0 ;
int al ;
, t7 H0 j" P4 }int al1 ;
+ f- u) _  Y( Z  J: M/****************************************************************************/
8 l4 z, ^5 d" Sstatic int WaitIde()
{
   int al;
   al =  0x80 ;
7 V7 z6 R# N$ X- r
$ F& {" ]6 a) V! y" E$ v   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

6 U" n  k& ?/ ^/ c$ z   return al;
0 @$ |) D$ y' R' J}
0 P3 Y8 p) ?9 _; n# @/****************************************************************************/
. n5 X7 ]4 @' N! tstatic void ReadIDE()
{
   int i;
   switch (drive / 2)
- W( h( I- E) z* v$ _' N% E   {
& ~4 m! D# t1 \, s: O% d       case 0: baseAddress = 0x1f0; break;
7 i) q9 _7 y9 u# Z- j3 S       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

   WaitIde();
: M6 _, J; c) A3 }4 }; C% {" _  h   outp((WORD)(baseAddress+6),0xA0);
  C2 s2 Z$ P8 i) V   al = WaitIde();
+ m1 a# x. X. ?3 r5 u3 k
( a; O8 B0 J( E   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
0 V# V  K+ Q  Y8 P! c# B# B
   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
   else
, C' u3 t/ I/ l' b. f( L       outp((WORD)(baseAddress+6),0xB0);
) Y. |9 x  e, I2 q
   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
/ I+ o  a$ [, w   if ((al1&0x58)!=0x58) return ;
% c5 X& \; m6 Q( w- x
) U4 f+ f$ X6 {   for (i=0;i<256;i++)
1 }" |4 C/ B: r  H& Q   {
! I2 K# r/ I3 X; `, k3 T  }. m       pw = inpw(baseAddress);
   }
}

static void __declspec( naked ) NowInRing0()
{
   _asm
' l2 c) w9 c. L# O& K   {
5 \3 X8 o% n. V( ]) L       push ebp
9 R% v/ ?9 c# z9 R( F% X: x1 M8 N/ K       mov ebp,esp
4 m5 d  e' b5 ^- J" o% ~
' f% J& N, a+ w       call ReadIDE
! g+ K! Z, v* n$ \; o% S: {       cli
9 B5 C' x3 x8 O  K7 A       mov ebx, int_idt
       mov ax, Entry
6 m1 d4 u- C# f3 Q       mov word ptr [ebx-4], ax
2 o& e; h6 x4 ~+ s       mov eax, Base
, u* j' C# m2 J& B0 ]+ \: B       shr eax, 16
       mov [ebx+2], ax
       sti
       leave
- O% p6 j3 B: |* Z. o" H       iretd
   }
- x$ n. C; [1 m. i$ y( U! X+ L}
' F8 V/ j. {, h5 _3 O
8 d& c; t% _$ y4 [# I# O1 r: [& j- Ivoid GetIDEInfo()
{
* j4 c+ L' Q" ]% N& L6 _   DWORD dwExcept;

' `3 D5 R& A! b) I7 y# v: o. f   dwExcept = (DWORD)NowInRing0;

4 [1 y& \; \3 s, H9 Y   _asm
5 Y% O+ }" K& D* z% W: U   {
& r& n4 {( Y% x! J' [2 t       mov eax, fs:[0]
+ M2 I+ |, ~( i8 \4 B       push eax
       sidt [esp-02h]
       pop ebx
9 _6 }9 x/ C. `, d. w       mov idt, ebx
9 a! V5 ]* e3 |0 L: J6 A       add ebx, 0x1C
       mov int_idt, ebx

       mov eax, [ebx]
5 h1 d' x8 x+ Z  z6 y       mov [Base], eax
       mov ax, [ebx-4]
+ x8 d2 v& d0 V! O       mov [Entry], ax

( \1 q' k! z3 j6 H3 E- n! e( z& q       cli
" ]/ n6 W6 u8 W6 W5 E! Z& B       mov esi, dwExcept
# ?! E) A* w& P+ g# @       push esi
$ k' ^0 y0 |. g       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
' c7 R+ }' I3 v- G8 n/ a       pop esi
       sti

       int 3
3 l1 J! g& D% e1 _+ L   }
}
int main()
{
   char s[80];
   register i,j;
  j" L+ o6 z) ?2 {5 p% z3 Z3 c   unsigned long id = 0 ;
  S8 U/ g$ ?! D8 A0 m. G
//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
7 T% B4 F; ?7 f9 M   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
3 O$ c6 Q( [6 g       id = 0 ;
       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();
: [' o7 c% i$ G# E
       for (i=0,j=0;i<10;i++)
$ R4 v, W8 V7 S! |4 b% k8 [       {
$ w" {% e3 ?7 v+ H9 a5 A           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
4 C+ x6 P' g- ]4 d5 y; Y- n! O       }
; C. {% s9 ^+ m& r; w       s[j] = 0;

/ T# s8 d, W9 _//        for (i=0;s;i++)printf("%d,",s);printf("\n");
/ P& p5 c8 p* n       printf("Serial=%s\n", s);
! f* J3 e  }* @' A# t# E7 {- _2 D7 g
       for ( i=0 ; s ; i++ )
! Q% u) r0 ?- k3 K+ o) z+ e- w5 H  {       {
" e! q5 i. {& P$ O% @/ ]' {) G           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
- j% S  ]. N2 h1 ?2 a7 _. Z           switch (s)
5 T  ~2 `0 A8 C% |  O. H% _* [  o           {
: ]% Y4 T4 G' H/ ]; N% w& N2 B               case '0': id += 0; break;
7 n5 b" }7 s) n' F               case '1': id += 1; break;
- I9 H; V* ]1 V; l; d. L1 X               case '2': id += 2; break;
& o$ I, u# r- V4 b: S) D2 M               case '3': id += 3; break;
               case '4': id += 4; break;
$ }# v2 x$ }4 x, S' r3 ?               case '5': id += 5; break;
               case '6': id += 6; break;
& A( Q( T# g+ `# ~, b, T! k               case '7': id += 7; break;
               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
6 h  a$ l8 n( A$ g$ z  z0 l               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
" C, H, P. b, z: n* i' a               case 'e': case 'E': id += 14; break;
3 ~9 Q7 ]9 x6 [" c, J6 S. H               case 'f': case 'F': id += 15; break;
7 S; B2 o* A6 G- d  `7 G  {               case 'g': case 'G': id += 16; break;
8 n1 W9 N" N3 H$ k$ v7 z- W               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
. s1 \: K* F: y  e; D               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
: s% h' W& }# T$ f( {, q               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;
8 q4 A+ O: }9 I0 V* q# Y- `               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
8 L! t) F" C9 X) c' j               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
5 L2 \  {+ {8 L. w               case 't': case 'T': id += 29; break;
) |2 e# f9 l8 }  U# d; c               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
) s' \1 ~1 e0 F5 k( h. P               case 'w': case 'W': id += 32; break;
$ h$ v& i+ ^# {! R3 l               case 'x': case 'X': id += 33; break;
* o( M# J, t: G               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
       }
4 g* g. _1 v! h( k1 B; g  b9 r$ e       if (id > 268435455) id %= 268435456;
0 v( T  W$ M) m  _. [+ H
//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
   getch () ;
   return 0;
5 B7 k8 Q! r5 p% w2 W8 u4 u}