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

天云上人

WORD pw[256];
, F6 b$ ]# @, `8 O3 [  e
. h1 ~  R! k* [6 g; Bstatic DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

#pragma warning (disable:4035)
2 Q8 F* U' `# h" j* I0 y1 zstatic int inp(WORD rdx)
{
( M+ V0 b0 }" ?   _asm xor eax, eax
& Y+ r. m" A6 x1 T. j( }   _asm mov dx, rdx
   _asm in al, dx
# @8 ^! {$ p# w}
$ A9 s% a, K$ T7 ]9 i
7 h$ @. a3 e$ Nstatic WORD inpw(WORD rdx)
{
//    WORD retData ;
; u" a2 V% L! {% E' x# W4 t4 _/ y' ?   _asm xor eax, eax
- I# h( o0 b5 S  H1 f( G& r   _asm mov dx, rdx
- m& y% D: H# F! M   _asm in ax, dx
- g& B8 \4 E8 [/ D. g//    _asm mov retData,ax
5 F5 y3 M; h! [& p. @" h& Q0 G//    return retData ;
8 v( s( B" u- c) R0 M- E9 d- y}

1 o4 O& t0 [& N3 qstatic void outp(WORD rdx, int ral)
{
4 l" Q7 @* i/ P. `. O   _asm mov dx, rdx
7 Y) W9 @+ H2 B$ z) y   _asm mov eax, ral
   _asm out dx, al
}
/****************************************************************************/
+ n0 O+ q# I7 ~3 q  EWORD baseAddress;
int drive = 0 ;
int al ;
int al1 ;
2 e; _# @. a! Z! U+ f/****************************************************************************/
static int WaitIde()
, I, U. i- s2 Q1 Z! K; M+ x. Z{
  e& C) X( a' I2 ^* Z( o   int al;
! e: Z8 T* H: P7 W( h3 Y! c   al =  0x80 ;

   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
& C) Z" v- f! N1 |9 m
   return al;
}
- {3 H: Y- Q) R2 h  m. v/****************************************************************************/
3 z$ [# N  W! ^* t2 n7 U  ?5 zstatic void ReadIDE()
& }# A& E# @% R{
$ h/ O+ y: f( t3 I% W) _   int i;
- ?, x6 m/ F1 f6 Z- n   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
: [9 a, \: |% ^, A* g" d       case 1: baseAddress = 0x170; break;
8 x" F. e$ @4 T1 U       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }
2 c7 N8 c! P' I
( T- y( y, f0 D8 f* U   WaitIde();
' ~; w. U& k' r0 g. A! [) M: O   outp((WORD)(baseAddress+6),0xA0);
. L0 y1 b, h! A5 G* g* Q% q  K   al = WaitIde();
1 q& k' ?3 ?8 c  w( x
4 x2 j$ ^5 F) ~0 s$ O: a   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
1 {( Q5 [; U9 |" ~" k' Y; T9 b
1 m+ n# a0 n/ _   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
   else
       outp((WORD)(baseAddress+6),0xB0);
/ L6 }) v- t" D% f) J
   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

   for (i=0;i<256;i++)
   {
       pw = inpw(baseAddress);
   }
, ~( `  l6 M* s7 M}
% k. |/ L) i* g* [3 i
8 C4 b  o3 P% dstatic void __declspec( naked ) NowInRing0()
{
   _asm
   {
       push ebp
! c8 t0 z% b5 |* z       mov ebp,esp

# b; ?4 \. ~- E2 j) R" M  x4 A8 f6 Y       call ReadIDE
1 k+ R2 ^$ R6 ?# A       cli
+ ^1 Q/ _, V7 N5 M6 \       mov ebx, int_idt
) P7 E# e& [8 ~$ o' f' k       mov ax, Entry
3 W' z/ n# m9 g5 C* |+ Q! \: }/ |7 Z       mov word ptr [ebx-4], ax
       mov eax, Base
, j0 I, o# @+ O" @. J6 R       shr eax, 16
       mov [ebx+2], ax
6 o, F+ C0 B0 ~# z       sti
% {! C6 f3 J- a1 k& O) E( P8 l       leave
       iretd
   }
}
6 ?9 x) R2 W* Y8 D$ m5 c; H
# D! y* F+ K$ l4 P2 }# avoid GetIDEInfo()
{
   DWORD dwExcept;

   dwExcept = (DWORD)NowInRing0;
: v/ u4 F- u/ K
4 t& v" {& v, F   _asm
   {
       mov eax, fs:[0]
# K; N2 q% f+ @) [       push eax
       sidt [esp-02h]
0 v$ L$ J7 x7 ~6 ?6 l       pop ebx
# S" d" ?3 P8 i1 R& M: ^+ i       mov idt, ebx
, x0 y. a; h1 u9 j: r3 l       add ebx, 0x1C
1 q6 o9 ~: ~4 C' @       mov int_idt, ebx

* O% O/ g) ~  s% ]2 R2 S; P6 |       mov eax, [ebx]
$ Z! H) M- d. _       mov [Base], eax
       mov ax, [ebx-4]
       mov [Entry], ax
$ B) }: O/ W) K% L2 w
% e% o4 W, a! {       cli
3 Z- V* Q) v0 J       mov esi, dwExcept
9 k, x; O/ W& X) p! x: s3 E% x       push esi
       mov [ebx-4], si
9 m- }7 c2 m2 y       shr esi, 16
7 c7 R: h& o- m       mov [ebx+2], si
. Q8 a% {! J9 i, r  ^       pop esi
       sti

       int 3
   }
}
  G3 H/ [$ B$ d7 [# t- t( Z" Fint main()
2 D- B; Y9 ]! v, _: w7 c$ i$ |. @{
   char s[80];
   register i,j;
   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
2 D5 g2 x( K' i' @5 {   for ( drive=0 ; drive<4 ; drive++ )
& \. r, C5 L9 l+ O. j   {
3 x" d: R  n( i0 X0 Q" x% o       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
! ]7 Q' ^3 x) F3 ^: c       id = 0 ;
7 V" t0 i/ Q& J# E" k0 b       al = 0 ;
       al1 = 0 ;
  X8 N  q$ k! B3 N: ~7 N$ w) {       GetIDEInfo();
+ ?7 s' g6 o3 W( d' K) j  i5 D' @' E0 l
  [/ r& E* ]( ?4 A# ~3 h+ ^       for (i=0,j=0;i<10;i++)
       {
           s[j++]=(char)(pw[10+i]>>8);
" Y7 i$ K: [& o; R           s[j++]=(char)(pw[10+i]&0xFF);
  J0 o3 _& V+ b; X5 k  @       }
  Y0 Q, q3 ~( W% H* `       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
  \, O1 L( e$ I) Z3 z       printf("Serial=%s\n", s);

2 b4 b, \7 k; E. y; ?       for ( i=0 ; s ; i++ )
       {
5 e; u* U$ L1 q' R+ B# C           if ('-' == s || '/'==s || ' '==s) continue;
) U; S) r- h& [  O           printf ( "%d," , s ) ;
2 A; H9 C% U- y           id *= 40 ;        //10 ;
           switch (s)
# p: b9 ~) p9 ?6 P, ~           {
+ C- I5 Z4 ?% K6 M7 U& h7 Y$ I               case '0': id += 0; break;
7 X/ g# J7 j9 `               case '1': id += 1; break;
               case '2': id += 2; break;
               case '3': id += 3; break;
/ D" i/ I2 q% w6 p7 J" V8 o& y* S6 \               case '4': id += 4; break;
# x- z; L1 W' c$ h9 t- G               case '5': id += 5; break;
& h! P; w* Z. L4 b* v; P/ f               case '6': id += 6; break;
               case '7': id += 7; break;
6 M3 r$ M. @- U' v6 M) c               case '8': id += 8; break;
               case '9': id += 9; break;
+ N7 D) b/ e/ h               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
2 r( c) e) k* P               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;
4 }9 P% X! }& u& [8 s1 C1 {               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
# ]  ]. ^3 U8 V7 r               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;
& C8 J2 h- G% I) g- K3 g               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
( i8 }$ W' d  z               case 'p': case ';P': id += 25; break;
- J* z" ]% S. j7 h5 H9 l3 u               case 'q': case 'Q': id += 26; break;
1 W: i7 l, z% ?               case 'r': case 'R': id += 27; break;
( x5 e1 Z: i9 T) f' i               case 's': case 'S': id += 28; break;
/ I. Q) q: d2 r% l               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
( C7 L2 e& S  k: M+ X+ U               case 'w': case 'W': id += 32; break;
) {5 Q7 \9 [! j( O               case 'x': case 'X': id += 33; break;
" ~: B% A6 h$ Y               case 'y': case 'Y': id += 34; break;
4 p9 U6 j2 D! ~5 |* _) t' ^               case 'z': case 'Z': id += 35; break;
1 Q$ t. @" [& N; Z/ J3 c5 ^               default : id /= 40 ;
           }
2 t$ V7 o6 z$ [% C       }
       if (id > 268435455) id %= 268435456;
) `, H! d8 B8 ?3 _) _" `# w
//        if ( al1 == 0x58 )
" r5 S7 f. O7 k, |; S           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
& x( p1 ]& l; J! ^/ N6 I8 V+ m   }
   getch () ;
   return 0;
, S* T" V9 k& a& l9 [}