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

天云上人

WORD pw[256];
1 m% h% B4 p* O( b' P6 Y7 w
% ^- B/ \$ r; Y9 M6 @% k$ ~) Ostatic DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

/ L$ A1 L0 {% F) C# Y6 o/ C. }#pragma warning (disable:4035)
4 q2 R) D+ n. H) ystatic int inp(WORD rdx)
4 c0 G: R5 q# t8 c4 R% _% k{
   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in al, dx
}
% F. ~" n: D; s0 x) ?
- |! j$ {  q. A- j( {" O0 wstatic WORD inpw(WORD rdx)
{
/ g; T; [) ^. M0 I& F/ V//    WORD retData ;
   _asm xor eax, eax
. ^% y+ i: s$ k5 w+ h   _asm mov dx, rdx
   _asm in ax, dx
+ }6 `9 X7 ]  ]* O' c0 I& r( S5 z//    _asm mov retData,ax
//    return retData ;
}

  v; w8 s" t( S4 f( E4 K/ estatic void outp(WORD rdx, int ral)
: i5 h. k' i+ D. @* L9 y- Q{
   _asm mov dx, rdx
   _asm mov eax, ral
. ~2 o6 T3 `. N$ j   _asm out dx, al
}
& t' D4 J* Q& w4 _+ {/****************************************************************************/
2 M3 v# O4 Q6 ^; |! e# @& |WORD baseAddress;
6 S" Q9 {; K7 X% nint drive = 0 ;
3 i# c9 q1 I# M9 |! Q+ R2 Eint al ;
int al1 ;
/****************************************************************************/
7 ^5 S+ j  b6 F5 {0 j( Dstatic int WaitIde()
* s* k$ M1 |0 M{
   int al;
   al =  0x80 ;

# n6 G; w, s4 ~  w+ |4 b   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

   return al;
}
/****************************************************************************/
6 a$ V' ], w; R/ Jstatic void ReadIDE()
* ^! Z+ a$ U9 [1 W/ t{
. T- @; M; y- D   int i;
$ B) Z1 @+ [8 R! g* A. g/ m   switch (drive / 2)
7 L3 Y  r0 d+ v, j   {
  _: u2 M1 T; B- g! _+ x       case 0: baseAddress = 0x1f0; break;
; O4 P, s0 b, [* [       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
6 h/ Z# B* }* F( D# J2 L% M   }

9 x& A6 n; K5 t2 }8 d) a   WaitIde();
) Z) F  ~' \8 D, d" M! R$ Y  j   outp((WORD)(baseAddress+6),0xA0);
. q6 t+ ?" `5 W1 d+ F. B   al = WaitIde();
! |# s/ L" R( ^1 ?
! q& M. v: t  g( I9 t- ~   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

4 W4 a' Z, o; k   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
2 M7 F3 m: U4 X   else
) |1 V) j# B% h: K, `       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
: B+ M0 q1 ~. P- H- ^; g6 D( @   if ((al1&0x58)!=0x58) return ;

$ B% }- v) k- k! J% h7 z& \5 g1 f   for (i=0;i<256;i++)
" ^$ J/ V! s" G. ?/ t   {
       pw = inpw(baseAddress);
   }
. t" m9 [2 i' ~) j+ b}

  R6 D9 I3 I2 Z3 w+ q' D! Lstatic void __declspec( naked ) NowInRing0()
{
6 j+ m6 a! @  a2 k5 ~   _asm
7 c) Y. C0 w- k# R   {
( i  D$ F! \) ]' }% O4 x6 a; v       push ebp
6 ?# c# R1 n  h       mov ebp,esp
$ E$ s& B1 T: C  R
8 ~1 m0 |& X4 ~       call ReadIDE
       cli
       mov ebx, int_idt
       mov ax, Entry
4 k& b0 z$ T4 t! C+ w       mov word ptr [ebx-4], ax
; `+ ], ^: m3 ]( p       mov eax, Base
% [) O6 s7 ?8 ]. L6 e       shr eax, 16
       mov [ebx+2], ax
       sti
       leave
       iretd
   }
. M- U6 Z; [& y/ j. d! K- S* E}

% ~5 E2 [* g! b: lvoid GetIDEInfo()
6 [. _- q( A% W2 q+ {0 r1 A; d- t$ @{
   DWORD dwExcept;

& O4 c! v4 k) Y& B8 F/ I   dwExcept = (DWORD)NowInRing0;

   _asm
   {
       mov eax, fs:[0]
       push eax
       sidt [esp-02h]
6 F2 X6 ~$ X$ P       pop ebx
       mov idt, ebx
: j, ?8 v7 U. E* P9 Z* W6 F, J, u0 A       add ebx, 0x1C
  C3 v0 b* H, \2 {0 z/ h" D3 o       mov int_idt, ebx
! h$ |& r5 ^7 \% k& a
       mov eax, [ebx]
8 d7 T8 O8 v' B% f$ M       mov [Base], eax
  |; b+ H+ i: T' v       mov ax, [ebx-4]
4 u3 f3 g8 S% W! S! G       mov [Entry], ax
0 {; o( p& L  v7 g% X0 F9 v
  P  ^, Y: e& y4 b( ?2 Q4 U       cli
- ^9 F( w* P8 H+ o4 i9 U8 @2 h       mov esi, dwExcept
$ \7 X1 h) J- D7 E2 l       push esi
       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
) i% }3 e! D# K3 I1 N       pop esi
       sti

  T1 N7 v* J5 d0 [       int 3
   }
}
int main()
{
" k4 A8 U! z; e; S   char s[80];
. @' D, z3 {1 R/ I7 L6 s% {/ H* O   register i,j;
   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
" }! G: J9 H$ m% m% _   for ( drive=0 ; drive<4 ; drive++ )
' |% D( E8 b1 y' g* _- O5 J   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
       al = 0 ;
       al1 = 0 ;
) R" x2 i. c7 B9 S       GetIDEInfo();
: {9 n4 P" i: R! O
       for (i=0,j=0;i<10;i++)
8 \% _3 X  z5 t       {
+ C+ U( w; d6 u7 k1 o6 G           s[j++]=(char)(pw[10+i]>>8);
& F6 P) |/ K0 x( \0 M( q: y* J           s[j++]=(char)(pw[10+i]&0xFF);
. S5 ~/ e3 _- D& ]       }
       s[j] = 0;

$ v+ [, H$ w, V- {5 Z7 E* ?; E+ i//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);
$ K) y- g7 R4 d* q2 h( c
5 c( ^: Z" H; r4 H       for ( i=0 ; s ; i++ )
       {
1 E& h' ^; r; _' M  s- L           if ('-' == s || '/'==s || ' '==s) continue;
& S" ], i/ ~  C1 p$ O& b           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
           switch (s)
           {
               case '0': id += 0; break;
               case '1': id += 1; break;
9 }7 k3 T0 ]4 S" i( v: P               case '2': id += 2; break;
               case '3': id += 3; break;
               case '4': id += 4; break;
$ R) ~) @+ l- h9 @& }9 N5 p               case '5': id += 5; break;
2 j8 O: M2 g$ @/ {! V               case '6': id += 6; break;
               case '7': id += 7; break;
               case '8': id += 8; break;
1 {1 L9 w8 h0 v4 t$ F7 y$ G" X4 i- }               case '9': id += 9; break;
3 {. ~2 K: V% i! }+ i7 _1 d               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
* }; g) a  j4 x) Y5 l               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
/ d0 i! @  O/ m! E               case 'f': case 'F': id += 15; break;
- ~9 P: y% G1 R" @/ G3 f               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
               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;
# O; h; J9 J- e, B' K9 z! j! T; b& H               case 'm': case 'M': id += 22; break;
$ w9 c# F. Q# D0 o+ ]) |1 N4 l8 G               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;
6 b# z" F; e: ?4 e               case 'r': case 'R': id += 27; break;
, y: U, e4 R- [, d               case 's': case 'S': id += 28; break;
. @7 v- @& U( Y' @) ~- Q% G               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
6 ^! j( _9 H8 e% |; z               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
7 C! `$ f) G" C/ g2 @               case 'x': case 'X': id += 33; break;
; J. N7 L8 G5 K* z) c               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
5 z: i& i$ O$ b               default : id /= 40 ;
           }
       }
       if (id > 268435455) id %= 268435456;
7 Y! r2 M" H2 [7 n4 Q5 `: e3 x- S
//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
   getch () ;
   return 0;
}