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

天云上人

WORD pw[256];

0 {* V' L! I3 {, Qstatic DWORD idt, int_idt;
8 x, n% f' K/ A  l+ _2 W* Pstatic DWORD Base;
static WORD Entry;

#pragma warning (disable:4035)
8 V. F, J! D4 c  j& E% estatic int inp(WORD rdx)
{
   _asm xor eax, eax
; y3 q; ]  _# S0 e+ W   _asm mov dx, rdx
" v# k. @3 ?: V; S7 _   _asm in al, dx
}

, Y+ Q, o, E; O" m# H/ j  jstatic WORD inpw(WORD rdx)
  H& Q. i: _* i$ z) y0 f* ^3 h, y{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
; F9 ?8 H2 e2 v. h5 L   _asm in ax, dx
( o! [$ T4 W% C//    _asm mov retData,ax
$ d1 O2 z0 {, D' b4 w* @$ a//    return retData ;
}
' B0 r* M# D1 r9 U  ~, W
static void outp(WORD rdx, int ral)
9 K9 D* E$ R4 x! Z- x9 ~{
   _asm mov dx, rdx
8 e( o; ]7 j$ R1 v   _asm mov eax, ral
) m- V7 s8 m2 U! K. F' x" K/ V( A0 W   _asm out dx, al
$ p& y$ @! [- e: q( X# |}
# u, D! B8 O. O2 t/****************************************************************************/
! @: |1 L9 N* ?9 xWORD baseAddress;
int drive = 0 ;
. q4 B6 N# a" a- [0 t9 e1 _2 Jint al ;
int al1 ;
; C+ w& ^; u  |& B9 q2 C4 l3 k/****************************************************************************/
static int WaitIde()
{
   int al;
! _8 |+ M( @6 i) \" |1 ]   al =  0x80 ;

   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
  V- W$ L# @* ]% }3 i/ u
. i0 k: g; Z! C   return al;
}
/****************************************************************************/
static void ReadIDE()
/ f3 A- ^3 A' [$ ^0 Q0 H7 c{
& e+ l% y5 ^9 L4 O+ e& r   int i;
$ @* Y/ R1 e4 X' h" \# q   switch (drive / 2)
1 |5 {' W4 Y6 ?) x: X   {
       case 0: baseAddress = 0x1f0; break;
9 R' Y8 I& ~: G( i       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
, _$ ^: c6 X/ I/ l3 ^       case 3: baseAddress = 0x168; break;
   }

% n& ?# X: B( F   WaitIde();
0 E* o' Z% ^' Y! x) p   outp((WORD)(baseAddress+6),0xA0);
0 K: A) M+ Q8 g! X+ O# u6 R, q7 e   al = WaitIde();

   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
; b5 g: j- m5 y1 m( V   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
" _8 |! O. S$ _# a  q2 B- Q* Z8 L. ~
   if ( 0==(drive%2) )
$ B  N' Q& H9 R% h5 k; W       outp((WORD)(baseAddress+6),0xA0);
3 X- e% u/ }+ O/ W   else
! i& g* e5 ~8 L0 B1 @       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

6 \+ E4 @- e2 H6 [+ B3 G   for (i=0;i<256;i++)
0 J! {: E' {( w6 P0 ^6 |. d5 l0 \   {
       pw = inpw(baseAddress);
   }
7 z! d; T# y* A! o0 L5 x4 _9 P/ g}

4 Z6 l" W" t  I/ q; Xstatic void __declspec( naked ) NowInRing0()
{
# u+ x2 u2 x& y2 Z7 n+ r   _asm
7 f; E, f3 g8 f' ]6 c! G   {
       push ebp
0 z1 f; T- y" f       mov ebp,esp
; V, c) j' e! p* k$ x/ d
; v2 d9 C9 X. y# J       call ReadIDE
       cli
       mov ebx, int_idt
* @6 ]/ s  h, _& P       mov ax, Entry
- r8 k1 j' a2 a' w( c* u+ R0 J+ e       mov word ptr [ebx-4], ax
       mov eax, Base
4 x! e# \& {& h6 V; ~: k6 p       shr eax, 16
       mov [ebx+2], ax
) t; K2 d& s7 J  _       sti
       leave
       iretd
" ~1 V0 m) h5 }& Q) `; n   }
  L) U# [9 b! I4 c  G" D* Q: E}
' p" y# x) H0 O; N; H/ Y6 M, ^
0 h* g! m# b; x0 P. O8 |void GetIDEInfo()
5 }4 `8 o* L- a+ D1 B8 T; B; r  ~{
   DWORD dwExcept;
- ~9 L! o0 X& y# F0 b
* w& l  n" u8 N   dwExcept = (DWORD)NowInRing0;
9 M' h9 a# W/ Y( H
; l3 n# q$ d8 i   _asm
   {
       mov eax, fs:[0]
3 i$ b2 L1 B/ Z- Z0 D       push eax
       sidt [esp-02h]
       pop ebx
       mov idt, ebx
       add ebx, 0x1C
       mov int_idt, ebx
% n2 c0 v5 \8 }4 f$ i
% ?8 @$ u7 y% U) O       mov eax, [ebx]
       mov [Base], eax
       mov ax, [ebx-4]
, S0 Y+ T0 D) v- h5 R; T       mov [Entry], ax

: @' I7 P8 s+ ?2 ]$ f+ W       cli
; O8 g! S+ M* J0 `7 ?( I9 f       mov esi, dwExcept
       push esi
" e" D% l- ^' J- E- t( z* w4 W4 F       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
       pop esi
       sti
4 ~. z* x; |& H( K. ?3 N$ @
       int 3
   }
/ L& r, M( H5 H: G4 {  i5 i}
int main()
{
$ \* g# i3 @! g( p  n7 |   char s[80];
/ [' w7 I/ R; c, Q6 B- a   register i,j;
   unsigned long id = 0 ;
' I! D+ t( }5 k
//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
" t2 O6 b/ f7 B- W; r   {
( C9 Y3 m* y* i       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
+ w- e% Y# z$ k% F       id = 0 ;
' l7 p  x9 Q3 i, V: d  |3 e4 i       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();
) }+ X1 k9 ~% a, m* h5 a" W
4 N6 R' k- u% G% k       for (i=0,j=0;i<10;i++)
       {
           s[j++]=(char)(pw[10+i]>>8);
  t8 `+ L: l. h8 U# _* {, ]" A; i1 s           s[j++]=(char)(pw[10+i]&0xFF);
; h& A& k3 }, t: @       }
2 A" v( m$ k, a" \; p2 R' J       s[j] = 0;
  S* ~/ Q+ d( n4 i( ?* q5 V# |! p2 E
//        for (i=0;s;i++)printf("%d,",s);printf("\n");
. C8 k6 P, Z3 g# V) E       printf("Serial=%s\n", s);

       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
( a+ ~8 Q+ i- T9 f           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
           switch (s)
           {
               case '0': id += 0; break;
( Q3 [" D' j& R; H               case '1': id += 1; break;
               case '2': id += 2; break;
+ A5 n4 t# T8 Y# k# `# s' l3 H               case '3': id += 3; break;
               case '4': id += 4; break;
               case '5': id += 5; break;
               case '6': id += 6; break;
               case '7': id += 7; break;
5 O& @5 x5 [9 e. ?( r8 |7 d               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
6 H& R$ s* y; D# r- ~. M               case 'b': case 'B': id += 11; break;
               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;
0 ^# a- F; n- x6 y. g6 B) ?               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
/ Y% z$ a4 Y1 C) o3 Y+ S8 H               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
5 {& m( y+ F/ M: n  x               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
               case 'm': case 'M': id += 22; break;
1 q" b) k7 F: {1 [               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
- l3 u" y9 Z9 R4 V3 w               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
# `/ i1 S' f" u! G) A9 y9 x8 I$ h               case 't': case 'T': id += 29; break;
" I( I3 V. l; u               case 'u': case 'U': id += 30; break;
+ [9 J* u- x& ]  [7 h               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
% ?) s) \; Y+ E               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
0 N3 z; q/ _% X$ |* B               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
5 P8 B* j& o9 m3 ?           }
       }
' w# H  Z6 F# i3 Q( l       if (id > 268435455) id %= 268435456;
0 z# t+ \& P! Z$ S) p1 p
3 D- J9 G) h2 p) L//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
3 E7 H- d. ^# E- E   getch () ;
( B- P" e( C, m4 O; O   return 0;
}