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

天云上人

WORD pw[256];

static DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

#pragma warning (disable:4035)
$ R: O4 n% F( istatic int inp(WORD rdx)
; C; }# g2 h  {0 W7 ]9 _# {4 h  V; X{
   _asm xor eax, eax
   _asm mov dx, rdx
( Z& B. u# P$ C9 k- P   _asm in al, dx
4 e  N; a! I2 ~0 r6 T3 N}
! S, k6 c; D/ A# b( ?- o
static WORD inpw(WORD rdx)
/ s* K2 \1 q, }# y; d. [- |{
//    WORD retData ;
9 E( K0 M& ?& q   _asm xor eax, eax
* w# U/ a2 k$ n$ V, d' Q3 F  H" A   _asm mov dx, rdx
# p+ t. `' Q6 w; L, B3 j' t$ n" b) p$ y   _asm in ax, dx
//    _asm mov retData,ax
' [5 s) x: F0 j" d. b) W+ j+ X% q//    return retData ;
}

9 u. n/ ]  E! O  estatic void outp(WORD rdx, int ral)
{
% J9 B. ]' T9 q   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
}
, _/ R+ s4 P* I% v3 p/****************************************************************************/
$ j% t  b" _# l7 d# x. g% KWORD baseAddress;
int drive = 0 ;
int al ;
# v+ I9 O/ k3 G  p& h! U' s( X( K0 Bint al1 ;
/****************************************************************************/
+ F% d; R- R1 i6 ]! ^2 l+ Jstatic int WaitIde()
{
   int al;
   al =  0x80 ;

% \0 t. f7 n( @5 H8 h1 `   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

5 `8 C" W3 f- }' R' e3 N! x* N7 h% M   return al;
}
, T' Q7 H6 N8 a! z/ Q( S& m/****************************************************************************/
static void ReadIDE()
9 ?# e- [* L6 R5 n- ?$ s5 v- H{
   int i;
% a' W5 E5 R+ N9 z   switch (drive / 2)
, T9 c0 g3 z' E* F   {
* ~: I# _6 ]) _4 V! ]       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
% O) z( F) L( K& c$ V6 \0 p9 b       case 3: baseAddress = 0x168; break;
1 L! u) s. D3 x% V1 }* }   }

" N) z2 u1 \+ }$ D+ z5 i  i   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

   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);
7 I2 W* l1 A9 F8 |' k# `   else
- I/ y& D6 h" v1 W& y$ C7 l       outp((WORD)(baseAddress+6),0xB0);
3 p( \# ?$ Z8 x. X# M; ]* |
   outp((WORD)(baseAddress+7),0xEC);
5 G$ ^: t1 M* ?2 R( N0 f   al1 = WaitIde();
9 M( N( x$ m4 j: o   if ((al1&0x58)!=0x58) return ;

   for (i=0;i<256;i++)
6 a0 B4 \4 O3 ?8 j   {
       pw = inpw(baseAddress);
. T5 g; p, u' B2 W# \& f   }
}
" h6 F. P$ l8 X
- U2 ]+ J2 v# s9 Z+ x. Cstatic void __declspec( naked ) NowInRing0()
{
   _asm
  g! M+ |% V% F& \   {
, U1 y. z: D/ X# t8 G2 P       push ebp
) v9 x3 M% _$ U- o       mov ebp,esp

: y* M' [# h# n+ c( f7 t5 N       call ReadIDE
       cli
. I  f. P5 i9 g9 l* ?6 i! r5 m- V       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
$ x4 p- n) u1 |       mov eax, Base
       shr eax, 16
       mov [ebx+2], ax
, s' P- d9 h$ H) `: N       sti
       leave
, Q! I$ z$ m; r5 k       iretd
: T+ R; b5 i+ H& W9 i: o   }
}
/ o- s* J, B2 d7 m% ~4 b
void GetIDEInfo()
{
   DWORD dwExcept;
" j1 ~) H4 x2 K0 P' E, n) e
   dwExcept = (DWORD)NowInRing0;

   _asm
! ]# x1 e( n2 k# P( f2 w, }& k   {
; w- c: @! E2 q& Z       mov eax, fs:[0]
" u8 w) W# h8 q7 a  q       push eax
       sidt [esp-02h]
6 a1 ~" q) V6 W" x       pop ebx
       mov idt, ebx
       add ebx, 0x1C
       mov int_idt, ebx

       mov eax, [ebx]
       mov [Base], eax
) w) Q" q8 [0 _% T2 M% N) @       mov ax, [ebx-4]
4 A/ T% i& F* s" h9 m7 e/ F) X       mov [Entry], ax

0 H7 A- f* q. p  N) Z; O       cli
       mov esi, dwExcept
7 |( J) G$ J  m       push esi
       mov [ebx-4], si
0 l6 E# Y2 n3 [       shr esi, 16
: l6 e$ A+ [# F0 L- Q       mov [ebx+2], si
" |- Q, k9 y% l+ R       pop esi
       sti

       int 3
8 l2 n4 ~: l+ F5 d2 w   }
1 C4 H% ^0 L0 P% o8 b}
int main()
{
' l7 D- y5 d* u   char s[80];
   register i,j;
   unsigned long id = 0 ;
% b* @% ~7 w6 _# e( s" u6 l9 c
//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
5 }9 x; Z8 S" I9 n: o' ^" m9 e       id = 0 ;
       al = 0 ;
       al1 = 0 ;
6 h2 n  z9 s# J/ t+ [' J       GetIDEInfo();
9 H+ k) l/ l: C' ]8 ?" m
       for (i=0,j=0;i<10;i++)
       {
! m1 h7 `& F. v+ N           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
8 J# r3 s3 j9 `8 L. L       }
       s[j] = 0;
9 j9 D) {! B+ |  G( `2 A% d% A- M' J
//        for (i=0;s;i++)printf("%d,",s);printf("\n");
, ]9 J# V4 ]0 [1 p6 J. W* X/ g       printf("Serial=%s\n", s);
& B$ S/ t' a# p5 Z1 I8 c
       for ( i=0 ; s ; i++ )
8 G; i6 R; ?/ R# O6 ]6 y& R4 N9 g1 M       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
3 f/ \6 [9 j* v: K+ f           switch (s)
) G. ^0 s. V8 b; \3 {% {           {
+ G% @0 t/ M$ r5 c  Q# q% ]               case '0': id += 0; break;
               case '1': id += 1; break;
               case '2': id += 2; break;
1 m5 J# M* k, o* J" k               case '3': id += 3; break;
4 j- R, T+ F& g8 e4 U) m! R               case '4': id += 4; break;
               case '5': id += 5; break;
. F6 f4 g1 o6 p               case '6': id += 6; break;
. E( v, p" E  W$ F3 }% t1 Q7 H               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;
2 ?8 @  {: v5 v3 A$ K( D               case 'c': case 'C': id += 12; break;
               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;
               case 'h': case 'H': id += 17; break;
. H& F0 d  h# w               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;
               case 'm': case 'M': id += 22; break;
  G- h( n5 R; V* v* G               case 'n': case 'N': id += 23; break;
7 F* g% X; I0 }: G/ M! N               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
8 r4 w! ~6 q' q) r  w( E$ `0 Q) }- f               case 'q': case 'Q': id += 26; break;
# [5 q8 k( T% C               case 'r': case 'R': id += 27; break;
" H$ S$ Z  I. }3 Q               case 's': case 'S': id += 28; break;
' X: G8 x" x- O# k3 h2 L( v  n               case 't': case 'T': id += 29; break;
" ?5 |4 |2 E( n% |8 ^               case 'u': case 'U': id += 30; break;
" N! e- b0 _* a3 {1 [4 M               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
- G& b/ T- P& k) L               case 'x': case 'X': id += 33; break;
' X8 j* Y  V0 n9 W6 [* |9 u               case 'y': case 'Y': id += 34; break;
) a9 i3 V. c% X( U) ^               case 'z': case 'Z': id += 35; break;
3 z0 k' W: ?% O               default : id /= 40 ;
! z+ M$ |2 Y. C           }
       }
       if (id > 268435455) id %= 268435456;
2 F. C- N" [! D1 L$ C- n( C
: ^  @! E1 I; w5 v& `+ d: e2 ^//        if ( al1 == 0x58 )
: v5 ~) E; T% p7 V% N           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
# W+ l5 m) |9 W4 s% ^# a# V( B8 P   getch () ;
3 S0 O: M" M+ ?" Z   return 0;
- L) m- n  j/ R- G; c" k! Z}