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

天云上人

WORD pw[256];
2 h: @9 Y  r$ F8 L& Y; T$ [' O
static DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

" m3 D" S, r3 b- x+ ^#pragma warning (disable:4035)
! P6 ~6 I+ R5 @static int inp(WORD rdx)
{
   _asm xor eax, eax
7 I7 w; Z7 B1 D* k' d2 }- g8 V* d   _asm mov dx, rdx
   _asm in al, dx
( W/ _  y4 n7 F0 i) Y+ a}
, _3 f! V, V/ m# _3 d! C4 V0 v
static WORD inpw(WORD rdx)
7 [0 T; q$ s6 I* O{
" c' @( w) n: Y/ \9 A//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
; V# L+ F( Z( y$ c) U+ ?   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
" o' S) \6 z3 s, A- J$ o}

) X1 |: G- {4 v4 X/ [# s5 hstatic void outp(WORD rdx, int ral)
6 W5 R, Q- |+ K# O  f4 ?/ g{
9 r. A* P9 g, s2 x   _asm mov dx, rdx
: @1 `8 [) Z! T3 P# V5 b6 s9 n4 u7 ]! b   _asm mov eax, ral
5 v& M% c* ]: ~& E   _asm out dx, al
+ S/ I' @+ j% b' d}
- F6 `6 P* J) l. @" I0 O3 c/****************************************************************************/
" w7 \* K5 D; x# P1 `& d& OWORD baseAddress;
& g2 I& N5 i) E+ c7 @int drive = 0 ;
int al ;
int al1 ;
/****************************************************************************/
4 a0 i! l1 X# M! ]* g) I& Y3 dstatic int WaitIde()
8 T* L- N' y+ z. e{
4 `4 b, @6 d/ [5 s; l2 m   int al;
7 w1 @* B; O, k  |: T5 e: a   al =  0x80 ;

   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

+ A) b1 C' G! @7 C! j   return al;
}
  @( V$ x8 ~' y+ w& q8 X3 }/****************************************************************************/
static void ReadIDE()
7 x+ ]( J# }6 {$ S9 \' N' X{
   int i;
   switch (drive / 2)
" j# G! e- w& A. [! W7 Y2 ^+ ^0 z1 }   {
, [- n8 _! r# B+ q; V, F       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
; u* ]" R, g- h' C6 n       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
; P* D9 V. b5 z0 }- ^  N   }

/ L! S" X  w" }: {0 ]# S4 S* p   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
0 F  E( |7 r. `- z  K' b4 L0 \   al = WaitIde();

1 |% A) D7 P1 K   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
0 r$ c. |" d0 l, ~% a' |       outp((WORD)(baseAddress+6),0xA0);
* C8 d# g5 z+ K( F   else
+ f4 ~; s0 y4 }$ O: @8 f: d- B       outp((WORD)(baseAddress+6),0xB0);

5 d2 w) h+ C7 v$ c# O/ L/ ?, `* k* X   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

& Y2 P# b. {( c- ?/ g* B; [   for (i=0;i<256;i++)
7 V% ^. t  X) m- q, i  @3 B4 \   {
; z$ ^* |) L4 c9 C8 d6 k- q- M       pw = inpw(baseAddress);
   }
}

8 M3 i  z& w+ Astatic void __declspec( naked ) NowInRing0()
{
   _asm
   {
# l( ]9 B; D+ r% p3 O       push ebp
       mov ebp,esp

       call ReadIDE
; J' w' a7 ~; q! t       cli
4 R9 g6 y' S* @) ]! j       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
, U) g8 q5 V5 ]" p       mov eax, Base
       shr eax, 16
7 r- |3 E$ c) v( |8 }; u% y       mov [ebx+2], ax
8 ~/ x$ g' u6 h4 X: [       sti
       leave
       iretd
% i  r% V- z( {" Z   }
}

void GetIDEInfo()
{
3 t  _; ?$ }9 g( N" l# }   DWORD dwExcept;

1 g, L$ s3 p% Z" @* F$ h   dwExcept = (DWORD)NowInRing0;

0 L  O3 \% O0 t  k/ Y% ^7 y   _asm
2 X% G1 G6 S/ q% l5 M4 Z   {
- c4 X- P2 w# s. @       mov eax, fs:[0]
       push eax
8 u# a3 ^& F/ Q2 Y( w( a0 `       sidt [esp-02h]
4 @! N4 ^' k+ |" s       pop ebx
       mov idt, ebx
       add ebx, 0x1C
       mov int_idt, ebx

2 A) f- R/ ]+ m$ U4 F- [7 g8 r       mov eax, [ebx]
       mov [Base], eax
       mov ax, [ebx-4]
       mov [Entry], ax

" r; u: ^* {. i       cli
0 s% |% \; S2 [- g       mov esi, dwExcept
       push esi
       mov [ebx-4], si
3 f. W' ^' D, m, @       shr esi, 16
       mov [ebx+2], si
       pop esi
) `, v. p" I2 F7 }       sti

0 V% |0 @% m4 F" e' Q  g       int 3
   }
: b9 V( p8 c, a' f/ _/ ^}
int main()
{
  V  T9 P9 l1 u: o% }- n# b7 {" ^$ X   char s[80];
3 H  }* {" ~2 n8 p% C+ G) K   register i,j;
, i) ~( D' D# j   unsigned long id = 0 ;
. d( l5 a& b/ T; r2 Z
//特别注意：这段程序不能 Debug
9 D# P& {  ~7 Q% V+ v* @   for ( drive=0 ; drive<4 ; drive++ )
9 i2 G; Z* B; j9 w0 c3 r" k7 B   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
' d8 L, w  ~* o. f       al = 0 ;
5 Q4 w9 A" v' t. s% \       al1 = 0 ;
       GetIDEInfo();

       for (i=0,j=0;i<10;i++)
       {
# k  F% T# p4 u% }. B# j0 `) B           s[j++]=(char)(pw[10+i]>>8);
: P3 I  z* v3 ?1 s- T' l0 N           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( m  w0 t2 g* O( r8 f- v
' l; b: w0 b5 j+ Q; [       for ( i=0 ; s ; i++ )
8 n+ @$ B3 m4 L. i- m# ?% j8 N       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
/ }) t/ K% W! C           id *= 40 ;        //10 ;
           switch (s)
9 z" P8 y3 D7 v/ \4 U; v           {
               case '0': id += 0; break;
, |) _* ~2 m, j: u- h& j% z               case '1': id += 1; break;
0 [8 s+ |3 D3 j+ W3 a9 B6 b               case '2': id += 2; break;
               case '3': id += 3; break;
  H: f! E9 {* q8 J3 f" ?$ O9 ^               case '4': id += 4; break;
               case '5': id += 5; break;
               case '6': id += 6; break;
               case '7': id += 7; break;
               case '8': id += 8; break;
- j% x: G5 Z: @+ E! i4 h0 v               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;
! E) Z# w- W0 B               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
4 [% h$ A0 `8 v8 X: k- F0 _               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
% {0 k' M4 i; Y+ R- p) n               case 'i': case 'I': id += 18; break;
9 W: @6 Q5 T5 V; ?% O               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;
4 J) \! |6 c( b) p2 }2 e               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
/ q! L8 L  ^* @$ v               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
8 N* P+ E$ g6 M( i) O7 t% o( o               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
8 I  Z8 ]9 F8 t$ l9 ~/ U/ C' J8 A               case 'v': case 'V': id += 31; break;
# c3 b( j3 H  K$ m! F% N8 N& q               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;
& t1 [' |% A, y  D0 \; G' c- L               default : id /= 40 ;
( m5 j2 Y: o1 u8 A1 |) M6 ?0 z           }
* _7 K6 z9 b/ _6 K       }
" K$ S2 g, ]5 V. [# F       if (id > 268435455) id %= 268435456;
# \. S" {5 k7 [5 g
2 j2 @( X( y; i6 H//        if ( al1 == 0x58 )
* P* A2 ]5 d. `9 U' Z           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
6 g! g4 T; g4 z: q5 \& H0 R' s   }
   getch () ;
   return 0;
3 R% M6 E; z- F}