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

天云上人

WORD pw[256];
0 g. O9 x  F6 C. n
static DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;
: Q+ z9 U. ^# @( e" w; {
#pragma warning (disable:4035)
% ^5 a* v: }- t1 ^) V- o! Lstatic int inp(WORD rdx)
{
2 C/ [; l* C" {" i   _asm xor eax, eax
( V& d5 Q$ o. N9 Z! ^   _asm mov dx, rdx
   _asm in al, dx
+ S8 r# n) S" y' z& F3 _$ ~- f}
* D& ~' v" W) V. G0 x
% j. e8 _# Z6 ?static WORD inpw(WORD rdx)
' N3 m. d( L% T; R- C. f{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
, w) K% p- P1 r5 x' L2 m: g   _asm in ax, dx
! _5 J$ |1 X9 f  u) ^7 e5 D+ H* |* M//    _asm mov retData,ax
. S7 r7 D( |, C& {  c; F/ u. u//    return retData ;
% p; t/ j, N( @* d2 M3 u  u! e}
: {3 Q; z3 r$ }* F. A
static void outp(WORD rdx, int ral)
{
9 X: p; W8 \& M) [   _asm mov dx, rdx
   _asm mov eax, ral
3 Z; H+ O2 I/ d' S3 A" y0 I- x' A   _asm out dx, al
}
* D& j0 R$ F% a4 h! o/****************************************************************************/
/ I/ p$ Y1 f9 L6 |& C7 t* b8 LWORD baseAddress;
int drive = 0 ;
9 Q1 |- V! J* C# N2 Zint al ;
6 p6 j' P: b. X  W# L! nint al1 ;
/****************************************************************************/
4 d; x& A8 _( P0 Qstatic int WaitIde()
: a2 c0 l  _$ ]# y6 I* R! j3 K{
   int al;
   al =  0x80 ;

4 i6 r1 m8 X3 O; O   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

   return al;
}
' y& r9 y- v6 F/****************************************************************************/
static void ReadIDE()
{
& ?* ]( J0 l/ t8 f# m1 L9 f   int i;
   switch (drive / 2)
   {
; d) @/ g. a  n5 p5 A* b       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
8 P9 m% y" ?8 o3 V       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

   WaitIde();
: b1 {2 a4 `. ?4 b* J; q   outp((WORD)(baseAddress+6),0xA0);
- G! V" m3 P* z# u   al = WaitIde();

2 N0 l; }; W; @( G* Q3 z   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
# I1 i; M8 `4 U2 h( d7 T; N   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
  N7 u9 ]2 P4 [0 r9 @+ l   else
       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
! l: L' x' d% i* n, s   if ((al1&0x58)!=0x58) return ;
/ X& ^2 o/ [6 }% H$ I
   for (i=0;i<256;i++)
; L9 n/ n9 v2 ]   {
       pw = inpw(baseAddress);
8 p6 ]- F: J( v( j  h1 D   }
}
$ [: K% _2 ]" n, {' O0 a
static void __declspec( naked ) NowInRing0()
{
6 {8 I. n! c4 t7 ~5 k" F8 ^$ r   _asm
   {
       push ebp
2 B3 \" o: ~: U. k       mov ebp,esp
. a+ d. ?$ L  T. Y/ i
% J: R7 i+ e9 `0 {+ }& S       call ReadIDE
. T: \. s. `/ r/ c: m9 Q       cli
       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
3 }; P0 W& E- f       mov eax, Base
       shr eax, 16
6 t  _: z/ g# z! z; V2 V; w       mov [ebx+2], ax
       sti
6 F: H. t+ J: x" X. [" j       leave
       iretd
   }
! D) h9 @! e$ Z' q# o: t. X* ~}

void GetIDEInfo()
{
" Q$ ^. m/ ^9 g/ `- I' K; I% s3 u   DWORD dwExcept;

$ s7 L% q1 {) x: V. O   dwExcept = (DWORD)NowInRing0;

; \! Q0 A( o5 T6 K+ Q) p   _asm
   {
       mov eax, fs:[0]
       push eax
       sidt [esp-02h]
/ f( o0 X: O1 g/ @4 J. j' ^4 z       pop ebx
       mov idt, ebx
       add ebx, 0x1C
8 u3 ^" [/ ~4 M& \       mov int_idt, ebx

7 |1 g0 R* Z& @( N( d: s+ D" z       mov eax, [ebx]
5 N9 s+ G! W; ^* E       mov [Base], eax
       mov ax, [ebx-4]
0 U9 X0 }5 b6 D       mov [Entry], ax

- L0 h: b9 D/ u       cli
       mov esi, dwExcept
7 I  M+ A4 z% b  j8 ?) ^       push esi
+ ]+ Z5 O3 `" A" d6 u       mov [ebx-4], si
       shr esi, 16
  u; g. s( E/ h0 R4 _       mov [ebx+2], si
       pop esi
2 Y. v" t. ~( `& o( g+ l  a: P       sti

: Q3 r/ M% z8 B3 S- t       int 3
   }
}
5 C% U$ z/ \; ^9 ~( k9 z0 s; nint main()
) D3 y' W& A6 ^; U8 q6 Q{
   char s[80];
: N/ y0 S. x" e  B   register i,j;
   unsigned long id = 0 ;
4 B6 \; m0 }. J% y
. _* S  O: K* p3 y) l: |* _0 g' q//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
7 p  r7 e4 d, B; m- u       al = 0 ;
4 m$ V9 V1 ]; q! S; T* [. {7 L       al1 = 0 ;
5 a1 d4 s1 V/ H, X5 g. c4 |& C       GetIDEInfo();
7 J* e- y8 _8 Z& o
       for (i=0,j=0;i<10;i++)
! ?* R( A: i1 P5 C' r0 P( ?       {
           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
- a6 o7 p- Q# t4 I$ ?$ R       }
6 P  C: G( d7 F! j( z       s[j] = 0;
* C9 j3 S! C) K3 f: u
+ o5 w4 x: T% r* u- h, E//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);
- M, K+ c! d# r- P
, g+ P2 p; I% P# l& Q) u+ i) w       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
! K$ Y! |( l3 N, @  w* z           switch (s)
* i. h" V7 s/ c/ r5 \" Y           {
               case '0': id += 0; break;
) q4 o. r4 }4 g5 H7 r               case '1': id += 1; break;
               case '2': id += 2; break;
1 Y- w; n4 }1 O" ]               case '3': id += 3; break;
5 N3 L: R$ K+ D  C# t* A. Z               case '4': id += 4; break;
               case '5': id += 5; break;
               case '6': id += 6; break;
               case '7': id += 7; break;
( [5 o" B3 ^# [1 M$ c               case '8': id += 8; break;
6 f& l& d% U5 |! X  q( w               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
* ~- \* W6 Q& P. T+ Y               case 'b': case 'B': id += 11; break;
8 S* Z/ c- N( q- a. K8 Y4 v               case 'c': case 'C': id += 12; break;
+ ?) s1 K+ W, T$ F- C               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
7 t* C. j, s& g% ^( t. Z/ j               case 'h': case 'H': id += 17; break;
+ c( \1 B4 ~) m1 u. `6 P! t               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
( ^. V7 h4 _  \, ~( n! I               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
               case 'm': case 'M': id += 22; break;
& }' k- {3 T5 r               case 'n': case 'N': id += 23; break;
1 m1 G/ S8 z* t2 {% u5 q               case 'o': case 'O': id += 24; break;
8 O3 J6 v) V" w) l/ x               case 'p': case ';P': id += 25; break;
1 s% `" T6 |/ B/ p; E! ~               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
3 D+ v* a- i' y7 X) I2 Y               case 's': case 'S': id += 28; break;
5 b$ k! r" u" N8 g1 _               case 't': case 'T': id += 29; break;
- L/ I& S5 W) A1 _% {               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
& p3 Z' l* a& v) J. h. V$ ^! j               case 'x': case 'X': id += 33; break;
9 z3 h5 Q6 O+ P3 @               case 'y': case 'Y': id += 34; break;
, G8 @8 |( s/ z6 x" k$ ~               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
' [' p1 t7 F# t3 r       }
( j& V  V* A+ c* I       if (id > 268435455) id %= 268435456;

$ P& E) S3 V$ \  y# x//        if ( al1 == 0x58 )
. `3 @; h4 A* l; Y3 v0 B           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
   getch () ;
0 `7 _0 }" z5 J4 N: m   return 0;
}