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

天云上人

WORD pw[256];
6 r, S; w. }- \6 Y+ Q  ~% A
' p- V  ~4 ^# M: k7 Ustatic DWORD idt, int_idt;
# q( L' _" {, o: I& r7 L1 rstatic DWORD Base;
static WORD Entry;
: O5 {. h2 ^, U! x
; ~6 ]5 Z4 |- z+ S#pragma warning (disable:4035)
static int inp(WORD rdx)
: a% w7 h& b4 R{
   _asm xor eax, eax
4 C6 m% i+ g! |- N" Y   _asm mov dx, rdx
   _asm in al, dx
. P7 ]; a( Q  F$ p! w}
9 @: Y* A2 L+ ?% c
% o! r6 a. J4 C/ h2 [% Z1 kstatic WORD inpw(WORD rdx)
{
//    WORD retData ;
   _asm xor eax, eax
8 ?0 O# {! W6 _" s   _asm mov dx, rdx
   _asm in ax, dx
//    _asm mov retData,ax
0 b6 B- c+ F, q//    return retData ;
- ]2 z3 a0 d( |% K8 c' L# }7 u) I8 u}

7 T; c& ?+ ?" t' \' gstatic void outp(WORD rdx, int ral)
{
" Y2 M9 f9 T# ?5 N0 \* K7 v   _asm mov dx, rdx
   _asm mov eax, ral
$ p. D6 Y# |8 B$ w3 W! [   _asm out dx, al
}
" n% a! ~2 P$ d  @% n2 F9 @/****************************************************************************/
5 P2 z' `% |, Y( [4 V8 i- i" M/ f/ XWORD baseAddress;
# [% z( [: K) [int drive = 0 ;
int al ;
' n3 e% u' V2 i2 D/ }int al1 ;
  ]7 V" c" u6 _' x3 _/ U8 |/****************************************************************************/
! a1 e5 Y; ~3 X) [static int WaitIde()
9 Z' t) |, T+ ]3 C& @{
   int al;
% G% P! J" Y9 e, }. P7 f   al =  0x80 ;
3 `6 ]: o$ |3 r3 J" f5 d
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
% z# i5 m, L" v! H' b4 g; M4 N) [
   return al;
( e  a' {+ n) y. L8 q$ Y' c}
/****************************************************************************/
static void ReadIDE()
# |. e  G9 S! d0 ~: T{
& d( c- E+ v  M* w! A7 w   int i;
& H3 M" O4 ^* s- ?   switch (drive / 2)
   {
% h  F3 }9 {! k9 N- }! w. A, d       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
7 X( r" ]$ ~& P/ S$ V       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }
4 I/ O1 m; c  o7 e7 N) D; X
" D- ?- v1 o( J- l2 [   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
% w  G9 B& B# r8 ?   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
; e# V+ v# x8 v* Y( D8 l/ ~
   if ( 0==(drive%2) )
# J# Y9 d* V* c+ _: s& x       outp((WORD)(baseAddress+6),0xA0);
5 C4 @* ?& P% M1 o6 s6 h   else
       outp((WORD)(baseAddress+6),0xB0);
& ?0 W; b7 _8 q( ]6 \/ H
" W1 p) z) J$ b& d* L* d   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
5 F! m" ]1 a, F   if ((al1&0x58)!=0x58) return ;

& D& I% l& l7 f" u5 a; y* ^4 f$ G   for (i=0;i<256;i++)
  a' z7 }1 y) S# \$ r   {
       pw = inpw(baseAddress);
% d, ~8 S& _5 A( l7 c7 c   }
}
- R4 A0 z/ Y% \* g' p
static void __declspec( naked ) NowInRing0()
* {( W+ [: v: W* ]{
6 j! e* K, T0 n) t0 p   _asm
; L9 j( o1 b, U6 h, `6 ]6 c   {
& z; r1 s0 Q: W! j' [' h       push ebp
1 o0 D0 ]/ D0 }% H: E) J       mov ebp,esp

       call ReadIDE
' w$ b% U8 x( a9 G, M; y/ F       cli
       mov ebx, int_idt
       mov ax, Entry
; h) d1 l2 b; j- T  `& H* Z       mov word ptr [ebx-4], ax
       mov eax, Base
4 A+ @2 T+ Y$ U! t       shr eax, 16
& n: U1 F3 ~. I8 U4 T: p       mov [ebx+2], ax
       sti
' O, h) {- O& d6 a7 g8 B( m       leave
       iretd
   }
0 y/ d1 T4 d2 Z! Z}
0 t* ^: {3 T! d  |8 O
void GetIDEInfo()
{
: @( E3 Z( u; p6 V& S) u   DWORD dwExcept;
4 l) G) {/ {+ b' b/ [" T& e
   dwExcept = (DWORD)NowInRing0;
8 c( w3 `0 T' Z, a4 D9 c
   _asm
   {
       mov eax, fs:[0]
       push eax
6 B3 }- D# |9 |$ ~3 e9 F5 _       sidt [esp-02h]
       pop ebx
+ m# n; O% o' S       mov idt, ebx
       add ebx, 0x1C
       mov int_idt, ebx

       mov eax, [ebx]
: ]4 o+ {0 E) t5 O% d) ^: K       mov [Base], eax
       mov ax, [ebx-4]
       mov [Entry], ax
* K7 k; U5 b0 e0 N1 z
       cli
       mov esi, dwExcept
       push esi
; d% n5 W9 D6 g8 u& J       mov [ebx-4], si
( d, A# x+ y, W- `+ O, V: A% s       shr esi, 16
       mov [ebx+2], si
       pop esi
       sti
- O4 N, m% ]/ G
       int 3
9 W- v/ X. l; z0 n! U   }
; f( `& H$ O+ d) f/ ]  W3 y}
int main()
+ E2 G2 ^: v* X6 j7 ^: s, _' ?{
6 X1 H6 X! S3 O   char s[80];
+ j( H" v* d4 U3 X4 k   register i,j;
# V2 a' G; |( L, q+ T   unsigned long id = 0 ;

//特别注意：这段程序不能 Debug
( Q7 S8 p7 _% x! a1 x( D7 _( N' A   for ( drive=0 ; drive<4 ; drive++ )
   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();
# j% n8 l6 s: o4 ?/ Q
3 ~8 E( l5 {% s       for (i=0,j=0;i<10;i++)
       {
+ P( k3 ~4 [* y' h           s[j++]=(char)(pw[10+i]>>8);
1 }; Z; y9 q1 J2 v; I7 f& }           s[j++]=(char)(pw[10+i]&0xFF);
       }
       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);

, E. W4 C. o7 T. w/ q  _       for ( i=0 ; s ; i++ )
- M" a9 N( e' ^% V9 \2 Z0 ~       {
           if ('-' == s || '/'==s || ' '==s) continue;
$ i; a# N- b2 I           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
           switch (s)
           {
! Q/ t6 s% q6 M2 H. W               case '0': id += 0; break;
               case '1': id += 1; break;
/ j  w5 m3 H" j  u3 \; w- S               case '2': id += 2; break;
7 H5 k' r& K+ _5 ~# k               case '3': id += 3; break;
$ x" j% e6 \" r; K               case '4': id += 4; break;
+ x( i4 B  ~+ P3 B1 P               case '5': id += 5; break;
               case '6': id += 6; break;
* `9 K: R4 Q( R) h' z               case '7': id += 7; break;
               case '8': id += 8; break;
1 x% V- E2 |  P: _$ O3 j% |               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
/ C! _. F3 s6 ]6 R               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;
               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
5 u" A/ [" ?/ S/ x4 \               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;
               case 'n': case 'N': id += 23; break;
7 L1 r; }  E3 G" z/ V7 J, I/ J               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
# D* v& I( `3 V               case 'q': case 'Q': id += 26; break;
, [% E. c1 _' l" d- i               case 'r': case 'R': id += 27; break;
6 B% @2 @9 y2 k+ D& H               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
4 |: K; K8 @# m# P7 Q6 `8 ]               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
+ P+ L( Q# O6 j$ o7 |% j/ G               default : id /= 40 ;
           }
, r* z% ~, q" T( m5 x& r       }
       if (id > 268435455) id %= 268435456;

) E+ g6 D: [# I& ?//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
- _. }! h. z: e- J4 p" Q   }
, X3 B+ F9 F* J# r  u   getch () ;
, V: [; U& T' p! o5 S5 o; V   return 0;
}