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

天云上人

WORD pw[256];
: e" |, i; W4 H+ X; g
static DWORD idt, int_idt;
- z7 D0 M0 @: c9 ^. ystatic DWORD Base;
! ?+ }; |- p* w( S' @; w. bstatic WORD Entry;

#pragma warning (disable:4035)
static int inp(WORD rdx)
: |8 z) d* x* V' |3 t{
   _asm xor eax, eax
/ a( w( C0 g+ I2 ]   _asm mov dx, rdx
   _asm in al, dx
}

static WORD inpw(WORD rdx)
/ W6 l* x/ a$ p{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
6 Q+ T  C  w. w; ?% @$ F}

- I& @- C; A" \8 x0 H$ j8 {, gstatic void outp(WORD rdx, int ral)
{
5 ~& l( C, H; [' {/ }   _asm mov dx, rdx
   _asm mov eax, ral
2 K, E7 x. S9 `% ^  L" @   _asm out dx, al
) I+ }( i# P4 B6 V5 F- V+ p( f7 O}
/****************************************************************************/
* J4 z% d5 y: ?WORD baseAddress;
int drive = 0 ;
int al ;
# I; j/ ~; C. x/ ^! U$ Sint al1 ;
/****************************************************************************/
; v! Q$ ?1 y! J" fstatic int WaitIde()
. ^' N3 I: K/ V7 L' a( s0 |% h{
1 O' J& T" H! f7 s) s) r! D" {   int al;
   al =  0x80 ;
# H. X, D* Z) e2 T: h; O
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

- J2 Q+ V% @8 h' a! E( m# v   return al;
2 G1 U4 T( i4 S% H3 {; Z0 {7 j}
8 e! H; E' c* `4 {' I5 C! [, r/****************************************************************************/
static void ReadIDE()
{
   int i;
! W3 O' L0 f' |) d   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
4 l7 b3 S# v: h8 e; S  n4 M0 [       case 1: baseAddress = 0x170; break;
4 E& E, n7 Q& i, G       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
! T6 a& u9 x5 f' C5 I   }

- O6 E8 \% p9 o   WaitIde();
* ?. ^) ?6 h$ j: ]+ _* n   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
) h+ |3 l/ S# d4 T* `
2 r/ N8 O. B, Z* y% M   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
. K# k" H3 I; J9 N) z       outp((WORD)(baseAddress+6),0xA0);
   else
       outp((WORD)(baseAddress+6),0xB0);
! T( U7 ?# ?; ?! l  c# @
   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;

" X& c8 @/ a5 @   for (i=0;i<256;i++)
   {
5 V  r5 z! }+ I% E1 L" w+ p       pw = inpw(baseAddress);
1 H5 w# s2 _  W, `5 g! E2 S   }
$ O6 d* }6 q* q- Y' r}

static void __declspec( naked ) NowInRing0()
{
   _asm
: H. I- }% b# v   {
       push ebp
       mov ebp,esp

       call ReadIDE
       cli
3 ^7 b2 u4 A) O  u5 p) D       mov ebx, int_idt
       mov ax, Entry
, V2 @: F2 L3 n       mov word ptr [ebx-4], ax
       mov eax, Base
0 c+ n2 |. Q1 c1 G       shr eax, 16
       mov [ebx+2], ax
! t2 O$ x; J/ n3 i       sti
       leave
       iretd
   }
& L; I, Q$ T. E2 a}

void GetIDEInfo()
( s$ ~- G! d: d0 a+ `; y$ E{
   DWORD dwExcept;

   dwExcept = (DWORD)NowInRing0;

9 Q, H5 ?6 u: K4 O' M* H$ d   _asm
   {
" r# N6 G( n6 U2 G8 c; e       mov eax, fs:[0]
2 F1 Z% A4 L7 \0 G       push eax
       sidt [esp-02h]
       pop ebx
2 u$ L! \) P& \* ^       mov idt, ebx
6 r6 B" Q+ n$ I" b. g       add ebx, 0x1C
: W# J7 g; r3 ]' ?2 y( A, N       mov int_idt, ebx
3 @4 @9 a) E2 c
       mov eax, [ebx]
  j+ ^+ T5 I: J* J5 ?$ d       mov [Base], eax
       mov ax, [ebx-4]
       mov [Entry], ax

       cli
7 C: L* }0 m* E8 O7 {; i9 w: g       mov esi, dwExcept
       push esi
       mov [ebx-4], si
( |. j  |9 g  I( M$ z: k, M: r+ q       shr esi, 16
4 w: C4 K7 o8 F- A; i       mov [ebx+2], si
- A9 g7 j( z: e7 F2 t4 `       pop esi
3 Z( k! f3 e! ~0 b4 A( A       sti
) L: K: T( _/ q# \  B: U9 Y. A* d& R
       int 3
* d; J" o0 w/ ?* H6 G   }
}
: |; Z% u/ |  K7 d& O# U# A/ ?int main()
/ a6 Q6 W2 `/ j) c{
" c  |) r" [4 U0 Y  N; G+ l   char s[80];
) k, B# H% B2 f; y   register i,j;
   unsigned long id = 0 ;
; ~) K+ |. m4 C/ y/ k" M* F
- C, ~# S  J' L, Z0 R5 y//特别注意：这段程序不能 Debug
4 L. K4 d  @; Q; I( R" i9 R" Z6 ?, p   for ( drive=0 ; drive<4 ; drive++ )
" V8 z  z$ q; k5 e+ R* v( @, C   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
- b- [0 x9 z4 y/ H: C% U       id = 0 ;
) k0 c4 D5 @; ]/ ^& \       al = 0 ;
* j, v: p4 s4 o& E7 Y       al1 = 0 ;
# Q) y; w- `  y2 p+ K$ @/ q, x       GetIDEInfo();
  k( N' j: V: x
' v2 h9 D" `. p9 ~  E" j       for (i=0,j=0;i<10;i++)
       {
           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
  t  s" f4 J* d$ F7 q0 f6 @5 Q; X3 q       }
4 U5 g+ o3 s3 Y       s[j] = 0;
$ P7 t. B1 {$ n: c
//        for (i=0;s;i++)printf("%d,",s);printf("\n");
) Z! L% y( |: ?       printf("Serial=%s\n", s);
1 x+ h0 |& y# Q
       for ( i=0 ; s ; i++ )
2 n1 B, u( U2 g; c9 w4 K; K/ m       {
           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
% @' O* {& T: ^5 D% E' z- T3 J           switch (s)
& m6 I/ R3 F1 d) ~; F3 w6 c           {
               case '0': id += 0; break;
               case '1': id += 1; break;
               case '2': id += 2; break;
               case '3': id += 3; break;
               case '4': id += 4; break;
               case '5': id += 5; break;
               case '6': id += 6; break;
4 Z3 C  p, m2 _7 Y4 ^9 I               case '7': id += 7; break;
               case '8': id += 8; break;
) y5 m$ u% [6 L5 k               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
! j; W: B0 @' _1 ?4 z' C" i5 z               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
6 z+ w: C5 m* O               case 'd': case 'D': id += 13; break;
* {9 S; c8 {% p" `               case 'e': case 'E': id += 14; break;
, Z+ k/ n2 o2 c1 i0 E7 {               case 'f': case 'F': id += 15; break;
! ~) ^9 R- h8 l; F% y, t+ c$ H               case 'g': case 'G': id += 16; break;
, ?0 k$ t: J" T; {1 B1 Q, b               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
$ i( q! H, I" t" H3 A/ t: \7 u               case 'j': case 'J': id += 19; break;
: \* }  {6 y( P2 O1 H6 s               case 'k': case 'K': id += 20; break;
8 u6 Q% w2 T9 o7 ^               case 'l': case 'L': id += 21; break;
0 \3 l9 ~# v- H. V/ R' }: h1 f2 B               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
8 F6 P& t( a. ~               case 'p': case ';P': id += 25; break;
               case 'q': case 'Q': id += 26; break;
' R/ O- Y( d, V1 J4 e9 _               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
0 z. g8 z& }. W# j) u- {6 i. b               case 't': case 'T': id += 29; break;
1 |7 O2 N! ^. S/ P               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
% a0 P. G1 ?# i. g               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
8 ^: a$ t- Y) H1 ?- ?/ g) `% l               default : id /= 40 ;
; U. V; i; v2 k7 A6 f( T+ f           }
$ N" K3 R: S' C! X4 R6 R( a" i       }
/ Y) Q: F" _; T       if (id > 268435455) id %= 268435456;
5 D& ]2 ^" `" h  _6 o- B
( j$ r+ X. _6 K( P//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
* p# Y0 T- Y. b, b/ L' F, m   getch () ;
, @+ q9 c, j( I  T, s9 D* p$ c2 Y1 z   return 0;
}