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

天云上人

WORD pw[256];
1 D1 x8 M5 O( R: ^, A: r, B
! B, a' ]8 I5 _, d, H( Tstatic DWORD idt, int_idt;
static DWORD Base;
4 t# U) @! U0 y4 u. gstatic WORD Entry;
2 t- @# R2 N5 [/ R  y/ W
#pragma warning (disable:4035)
static int inp(WORD rdx)
9 s$ d6 y) ~' P) u0 o# z- M; q{
   _asm xor eax, eax
   _asm mov dx, rdx
9 [0 i- O: [1 f( ]0 c   _asm in al, dx
, X8 c4 S9 ^1 u  ]( `. k3 J2 e}
+ T4 |8 R: k, l+ F2 z4 E
static WORD inpw(WORD rdx)
{
" Q  s' l6 X# b9 f+ g5 t# W$ g' q//    WORD retData ;
- x' z! q, Q9 x  E$ i' [% ~+ p   _asm xor eax, eax
   _asm mov dx, rdx
8 j" ?5 R1 E( J9 O+ u. K1 S   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
  h* l7 R, ~) Y- J+ c/ i2 c* \9 x5 ~}

static void outp(WORD rdx, int ral)
{
1 K% C4 [7 U7 w9 b0 K: j   _asm mov dx, rdx
   _asm mov eax, ral
$ r* u2 s$ Q8 {& k   _asm out dx, al
( m( i+ T$ b4 u! }% K' T}
7 e' m* ~5 x8 v  t/ _& o1 ~/****************************************************************************/
! Q$ v$ V. c$ F& LWORD baseAddress;
* S8 R1 `6 i- N3 H9 w, z' nint drive = 0 ;
int al ;
int al1 ;
% K# G% P5 c* X. O/****************************************************************************/
6 n# g) p7 I; L+ f; u2 L6 d' pstatic int WaitIde()
1 m& q/ k' @% {8 Q- _{
   int al;
- h: ~* A) F7 a  ^/ @3 ~2 u   al =  0x80 ;

& D! j0 g2 G0 S" A: Q' l   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
. \8 P) T1 @6 F5 G
4 L9 [3 `, u8 c$ k4 ^+ s. Y3 G   return al;
}
/****************************************************************************/
' G' _! A7 y5 h& [+ I$ Q7 b1 R1 dstatic void ReadIDE()
{
   int i;
- s% [; `/ ~1 U9 {   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
4 O- ?. R* {; N       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
7 {9 |, K( c% ], s" G! I       case 3: baseAddress = 0x168; break;
   }
9 e+ N2 o; j' s3 Q
   WaitIde();
( _; }/ |6 t" e, a+ A3 o   outp((WORD)(baseAddress+6),0xA0);
+ N; W& }3 U3 P7 c   al = WaitIde();
, ^& j/ l) O( M  v
* F' s% Y" _- H- o" h9 q   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
$ e: |* {8 w( j/ w; ~   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
% @  D) ?# l, @- C9 [+ U       outp((WORD)(baseAddress+6),0xA0);
( ^: y. W: E2 |   else
       outp((WORD)(baseAddress+6),0xB0);
, E; Y* o" {3 R* {' D% E. z( r
   outp((WORD)(baseAddress+7),0xEC);
" [. y2 f! w* m. G  g   al1 = WaitIde();
' n; W" k6 r. _2 Y/ }3 O   if ((al1&0x58)!=0x58) return ;
4 ]5 ?/ g- R% w0 i
   for (i=0;i<256;i++)
   {
$ N4 M  C+ E/ X' D# w. \0 ]       pw = inpw(baseAddress);
   }
6 F9 a* {* @& y/ m}
9 ~& U0 d( @  A  C) ]8 m
* k9 b( Z1 `9 ~! x% e! |) r( E/ `7 Mstatic void __declspec( naked ) NowInRing0()
1 B+ J8 I% ]% Y! m% f- @{
   _asm
   {
       push ebp
5 P! [. Q* n4 u% g5 z9 U/ A$ M       mov ebp,esp

1 d+ ?9 p/ D/ l0 e, R       call ReadIDE
: f  T9 ^8 K( R. k) V& M       cli
# }, i$ A; Z0 c' z+ w) d       mov ebx, int_idt
8 _- f' G/ x2 v       mov ax, Entry
$ {3 G0 E1 W/ g& R4 U0 C7 Q! u- V       mov word ptr [ebx-4], ax
       mov eax, Base
       shr eax, 16
; f1 N/ E) y& z! s0 L( S       mov [ebx+2], ax
       sti
% Y* O* n# G% [1 P1 E       leave
       iretd
2 v, @* F; l6 @/ I   }
: I- v8 t# y) k( l! v}

void GetIDEInfo()
: |/ O  N- S4 _$ |{
   DWORD dwExcept;

7 K2 h2 O$ u* g9 k* U/ j   dwExcept = (DWORD)NowInRing0;
: h1 H6 G! u$ o; J3 N) v
   _asm
% q# D+ [. M( E, Y   {
% C- X9 }, T# V4 n' `       mov eax, fs:[0]
       push eax
; [' ^: {7 N0 ~; S5 W. l       sidt [esp-02h]
: E4 m! q  U# h0 D1 P! A! ~       pop ebx
) J. l# C% S( x$ w/ m       mov idt, ebx
, X/ v  |' s: V' o% V4 @/ P       add ebx, 0x1C
       mov int_idt, ebx

7 Z, u. t# k, e7 O$ Y' `$ A: I, o/ ~       mov eax, [ebx]
       mov [Base], eax
       mov ax, [ebx-4]
& w& F1 f% R; s6 u9 q' p       mov [Entry], ax
3 k% Q9 @  j$ ~6 u8 u
, d) J0 U" ?) B- m1 t! ~% ~3 [       cli
; s  @& W" q1 n8 ~" Y7 {6 b1 m       mov esi, dwExcept
       push esi
       mov [ebx-4], si
       shr esi, 16
2 [0 _' _3 d# _! ^# ~( ?       mov [ebx+2], si
       pop esi
       sti

       int 3
, A. a9 a' A2 q% e& p  h   }
& o# K& p3 R' O% _) @' }: g* B5 H}
' `5 G+ ?1 N3 ]3 z9 l  |$ k- Yint main()
{
& p6 H+ f! d( Z6 v3 _   char s[80];
   register i,j;
( ]6 \# E0 r/ `. {7 R/ w   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
4 D; n; }3 b5 m: ~% p. o/ W0 }   for ( drive=0 ; drive<4 ; drive++ )
   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
- `1 [# X( C4 I* a' _  k       al = 0 ;
/ J* _% D& |# u; G% e9 N. g7 ?       al1 = 0 ;
/ p9 S/ m; u* l5 f! y' `% d       GetIDEInfo();
: o8 K1 X! y+ p
, V1 q& R5 B+ ]! g       for (i=0,j=0;i<10;i++)
; K4 V% P; t! Y# P* G  R       {
           s[j++]=(char)(pw[10+i]>>8);
- J8 a/ K1 ]  i/ X: i- O; f$ u           s[j++]=(char)(pw[10+i]&0xFF);
$ o# `7 H! `2 e4 ~  x! M. D       }
       s[j] = 0;

. w% ^) b6 z5 E6 O  l//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);

       for ( i=0 ; s ; i++ )
& G' I) ~, T* [, F2 |4 ?: ]7 ]0 Y7 a$ g       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
! C- P' ^: D. D, t6 M( o+ k! {: J  e           switch (s)
8 U8 T) v' c. z6 b% {, r           {
               case '0': id += 0; break;
4 }5 U* H7 {8 A) I& E               case '1': id += 1; break;
               case '2': id += 2; break;
& g( i; B6 T2 g7 P$ B8 g& W( Q               case '3': id += 3; break;
+ ]+ X* _" i2 |( e" u4 Z  Y               case '4': id += 4; break;
               case '5': id += 5; break;
% B1 \9 N0 R9 ?; [, ?2 T               case '6': id += 6; break;
               case '7': id += 7; break;
( A" A- G3 w- ~# j4 u$ }               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
! f+ n1 A  g* `2 S               case 'd': case 'D': id += 13; break;
5 E. A* A- ~. C. Z               case 'e': case 'E': id += 14; break;
: j; X* V1 Z; Y, A* ^3 M               case 'f': case 'F': id += 15; break;
1 I' s7 U2 B- n4 u2 p* Q               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
( p* O/ B& a1 ~2 ^& n. U1 r               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
5 V  q# s  N6 n* t               case 'l': case 'L': id += 21; break;
! \$ G6 j9 s" V6 R               case 'm': case 'M': id += 22; break;
% B- X  n2 b' }( V7 ~; ^               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
8 y, x) Q% ^7 b# y' `2 d! e. [               case 'u': case 'U': id += 30; break;
4 z8 j8 |7 f9 a& R; c" N               case 'v': case 'V': id += 31; break;
1 s. c3 {; A1 B, z- _, E               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
  r: e1 d) b5 J; o) H, t" n               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
- c1 d7 Q% Q% @- ~               default : id /= 40 ;
           }
       }
6 Q7 y% D/ S- |. J3 |       if (id > 268435455) id %= 268435456;
+ O4 o" _. L- ~! w- ~8 @! R
//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
* J1 e$ v* C! d3 ]! n   }
   getch () ;
   return 0;
}