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

天云上人

WORD pw[256];
, k% i1 ]( z) j
% Z2 |( R7 A% I( ?" _9 a% Vstatic DWORD idt, int_idt;
% h& I" x( {  ^( q+ astatic DWORD Base;
static WORD Entry;

#pragma warning (disable:4035)
static int inp(WORD rdx)
% b, H8 H: f6 @1 F: I6 M) E{
/ v; f; r( E9 h0 n" g9 T4 n   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in al, dx
}
2 ]; @! Q1 S2 k+ `+ {; h' e# D9 [5 K
static WORD inpw(WORD rdx)
{
//    WORD retData ;
   _asm xor eax, eax
: S+ H0 W* O# @3 k$ x, I3 E- c   _asm mov dx, rdx
, u6 w$ x: ?6 k   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
}

3 X4 a: r( X( f& M( S# rstatic void outp(WORD rdx, int ral)
: x0 C5 G1 C& P( _{
   _asm mov dx, rdx
   _asm mov eax, ral
* X8 b( \; d) g" Q/ j: P   _asm out dx, al
}
/****************************************************************************/
& \/ S/ l2 M, @, J$ h" @/ vWORD baseAddress;
int drive = 0 ;
  M) C/ U+ p/ Z+ {5 j# \int al ;
2 T8 W6 h2 e" jint al1 ;
: {7 W+ @. h' a/****************************************************************************/
static int WaitIde()
5 c" ?+ i3 H% W+ d& `( \2 }{
8 g) x# E9 v, M# Z8 D- O, ~   int al;
   al =  0x80 ;
, e* ]; M8 C2 p% y* \
. S9 Z9 y8 c1 q8 i& z, a; [7 ^) U. F! c   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
6 b' ?: M0 l' u4 M
2 J: ^0 z: M9 y/ ]0 y) H( {0 {   return al;
}
0 _& |! ~. H' X. ]% ]3 }7 a. V, D/****************************************************************************/
. J( y& F$ [' i. y: j5 h- gstatic void ReadIDE()
{
& M3 o" k& b" S) z; v   int i;
   switch (drive / 2)
   {
; B/ G$ U1 R4 d9 B0 E) \# s; x, V       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }
$ A+ M- n4 Y" O& x
8 D$ J! M7 p+ U5 P$ Q   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

4 {+ W1 t  A0 h8 {# w# @   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
: a+ F- W3 W0 P9 E
   if ( 0==(drive%2) )
7 v* a9 E' {/ ~$ z5 R       outp((WORD)(baseAddress+6),0xA0);
   else
       outp((WORD)(baseAddress+6),0xB0);
( v  k& X5 e% V4 |
   outp((WORD)(baseAddress+7),0xEC);
6 c* @, H5 _0 M: r5 s: |* R( Y   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

2 J$ W4 e. q* k& c; z7 `   for (i=0;i<256;i++)
9 d9 V; [% i1 }# }6 P0 `$ J. e   {
1 W9 z2 n/ [5 X4 W& ^5 _' z       pw = inpw(baseAddress);
   }
. D: R/ v* `/ t}
6 _; e+ c3 ^8 v7 |! n8 L" x
1 T  _+ s1 z" A1 L& V+ G8 ostatic void __declspec( naked ) NowInRing0()
1 H6 U' _8 y8 t6 ]{
   _asm
1 D( ?% {/ k! J   {
1 D# w7 Q6 ]7 [, t# p       push ebp
       mov ebp,esp

       call ReadIDE
       cli
6 P( S" W" N5 u. v4 w7 A       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
, {9 ]! Z- r* s% w' n       mov eax, Base
5 b% |5 `( Z3 k2 [4 J       shr eax, 16
       mov [ebx+2], ax
       sti
4 R' C8 O  t7 V       leave
  S; C; z% _# V. O/ L! r5 C       iretd
   }
}

void GetIDEInfo()
{
   DWORD dwExcept;

- @1 J* Y2 j$ [; k" g$ J   dwExcept = (DWORD)NowInRing0;

   _asm
   {
. I7 m& \4 Y1 D9 |7 Y/ S/ [- {       mov eax, fs:[0]
       push eax
+ ?% M6 c) x' V# ~* Y       sidt [esp-02h]
       pop ebx
) f' \1 k$ u* `. F! i, [1 L, W       mov idt, ebx
# u# m: a  p8 q. h       add ebx, 0x1C
3 ^3 P5 M6 X; B2 u8 [5 [       mov int_idt, ebx
  Q* k) r5 O8 g2 P7 ^8 J( L
( Y/ I/ l# i# u- h# @8 n! f' T" G       mov eax, [ebx]
       mov [Base], eax
+ ^4 {' S/ f0 g9 o" B; P       mov ax, [ebx-4]
       mov [Entry], ax
3 c) ?4 B% \+ P. j- i8 d
       cli
       mov esi, dwExcept
: s. v% a9 c. U4 S6 s2 W' X       push esi
& M' _7 ~" {. i( b7 c       mov [ebx-4], si
3 J$ h! e0 x  Y; z' J1 x       shr esi, 16
       mov [ebx+2], si
8 y  p4 b  w( D; L5 y7 i       pop esi
5 [% V; H' j/ k  p6 U/ c% ?       sti

1 m# _1 u* o- D4 L* D1 E$ L) N% Q5 Y       int 3
   }
}
int main()
{
" R7 s7 [5 m6 n   char s[80];
  O- M2 x8 l+ F1 @* J   register i,j;
   unsigned long id = 0 ;

8 u! c: E1 p" ^; e# K: P//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
7 ]2 N* W: r2 G1 j; }  ^/ }" b       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
. o4 t# ]" y) F* h% l& }6 h1 h       id = 0 ;
/ u% Q- G: [' a, d       al = 0 ;
! p/ p/ q+ B1 G8 ^& W       al1 = 0 ;
       GetIDEInfo();

* t! n9 w9 Q; w0 v% |0 o) S4 b% `       for (i=0,j=0;i<10;i++)
       {
$ @; f8 }3 w, Z/ u; L; N: i           s[j++]=(char)(pw[10+i]>>8);
4 o% a& n7 g. d- N6 k( d           s[j++]=(char)(pw[10+i]&0xFF);
       }
       s[j] = 0;

$ w5 G' Q/ `% U5 I# [//        for (i=0;s;i++)printf("%d,",s);printf("\n");
& ]: D) s: V& m( a7 k2 Y/ u8 g       printf("Serial=%s\n", s);

" p% e" ^$ h/ e8 |/ s$ \       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
1 Y! b1 C7 c2 g, o+ o6 c/ U, y           printf ( "%d," , s ) ;
9 u) v* S) J5 E2 Y3 u6 g4 P           id *= 40 ;        //10 ;
           switch (s)
           {
               case '0': id += 0; break;
5 w  `( r3 l/ |2 l2 ^               case '1': id += 1; break;
               case '2': id += 2; break;
+ V( i0 L; a( S6 C               case '3': id += 3; break;
, u5 E  q1 x% O! `( j& l+ C" d               case '4': id += 4; break;
               case '5': id += 5; break;
0 j# |3 t9 X4 M( P               case '6': id += 6; break;
1 k# _  }3 m: A9 m3 G3 |# E7 @               case '7': id += 7; break;
               case '8': id += 8; break;
) F( K( A7 K) A, \: B1 N               case '9': id += 9; break;
* w& l7 r, f6 y" a# a6 ^               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
. w# I6 r) Z# \, S- V) H               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
6 P( o7 i& I, r3 n1 a               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
, z" t3 M5 k5 l3 Z0 c: x               case 'g': case 'G': id += 16; break;
( Y* c' p) [3 a4 A7 S9 g               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
6 L0 R& w& ?" {: N               case 'k': case 'K': id += 20; break;
0 a1 o/ g) }$ K+ d0 t               case 'l': case 'L': id += 21; break;
6 k9 V+ F; o1 m& w               case 'm': case 'M': id += 22; break;
0 q2 j; _+ {3 r6 \+ i               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
& u6 r) Z6 H, {8 P               case 'q': case 'Q': id += 26; break;
1 \% q6 v7 [/ l8 Y               case 'r': case 'R': id += 27; break;
0 [" O; U" H" c! W               case 's': case 'S': id += 28; break;
7 W2 [+ l( F, M# o. ^# T! y               case 't': case 'T': id += 29; break;
' M9 v  M. j0 ]  X               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
4 m  V7 s5 Z- D( ?2 ~" D. H! J               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
# K. t+ F/ j3 y% n" c               default : id /= 40 ;
           }
$ `0 Z. Z  c; w  n5 |1 W  H9 u       }
       if (id > 268435455) id %= 268435456;

0 s, n$ T9 U# Q- s' G1 k//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
9 w& m' @( z; s: r# y# A9 S  I# i   getch () ;
   return 0;
# j( b/ c5 k0 U: X1 P6 o# C' d}