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

天云上人

WORD pw[256];

static DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

+ `6 I. h, D4 ^# {6 s1 g* k: W- H#pragma warning (disable:4035)
# d; X( J0 E- c8 c' F+ Mstatic int inp(WORD rdx)
& Y. B! F0 W9 j$ T$ }{
   _asm xor eax, eax
   _asm mov dx, rdx
' s! y: M# O0 D   _asm in al, dx
. ^! ]3 O3 X0 A. E; ^6 ?( u4 S}

! F: `4 Y+ T0 |, L, y. o7 f& ]static WORD inpw(WORD rdx)
{
//    WORD retData ;
+ g+ T- t$ T' q6 |1 G   _asm xor eax, eax
- j- B7 Y5 h* n   _asm mov dx, rdx
" m6 G* b6 I% G" s5 N   _asm in ax, dx
0 z% d* A' j$ j  Q) x$ |# k' A//    _asm mov retData,ax
! b4 o+ Y; q' r) ^# j  {//    return retData ;
}

static void outp(WORD rdx, int ral)
; U2 p* W0 D( w/ y. Z4 t" o* g{
  d' d- g: d5 B   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
}
+ s( ?. z  K6 |( _/****************************************************************************/
" H# f9 Z  c7 qWORD baseAddress;
, U  D" @* H  }* [- x) f8 `- pint drive = 0 ;
; G% O: L/ Z( ]( C+ U/ Nint al ;
int al1 ;
/****************************************************************************/
. H" ~! n7 d* \7 Xstatic int WaitIde()
{
   int al;
   al =  0x80 ;

2 v' e, C7 x& a4 ?8 v: b6 ~   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
; c; |6 [# c) {) W/ z4 y0 G
4 m$ u7 W0 _7 s$ M   return al;
}
# ^" j5 a) Q& t/ O* U/****************************************************************************/
static void ReadIDE()
* f% |. u9 Q% Q{
   int i;
   switch (drive / 2)
! }& K& H, Y4 {% \2 z; r2 q   {
) r* [* b+ y9 o) V       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

   WaitIde();
, t& _" s- Z* l& J8 ?) G+ z% ^: `6 ?! D   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
' w1 q& I& w$ ~   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
" v7 n7 [: V5 w+ M7 C# F; K
   if ( 0==(drive%2) )
- n% D3 @! d7 E       outp((WORD)(baseAddress+6),0xA0);
8 p6 m; ?0 c& ~  j; |: r   else
* O- K' c( J7 w  G! h* ~; F3 H. F9 Q) z       outp((WORD)(baseAddress+6),0xB0);

: V4 d, g/ S7 S' W9 [   outp((WORD)(baseAddress+7),0xEC);
2 K+ \9 J* n1 I1 ?   al1 = WaitIde();
% q+ q* \2 k+ G, J' q- P" h   if ((al1&0x58)!=0x58) return ;

   for (i=0;i<256;i++)
" V& l% T- @$ V. A6 q/ H: H5 p   {
* [& R* H6 c8 j" O       pw = inpw(baseAddress);
6 _) i- C& W+ A* \9 T( I/ L) M   }
+ J% o9 x; x; ?/ _- \9 t}
( L7 o1 t7 ?' h5 A! @
static void __declspec( naked ) NowInRing0()
5 l* x- C2 y# p6 y{
5 c4 T* a- g3 ^, h- S  f   _asm
   {
. m  V& _  d6 @/ `       push ebp
       mov ebp,esp

       call ReadIDE
       cli
       mov ebx, int_idt
       mov ax, Entry
: ?, q- B3 f7 x/ e4 E$ R! Y       mov word ptr [ebx-4], ax
$ d# a# A4 W( \  y+ ?       mov eax, Base
) u: l, N* C1 _# T( s& a9 |       shr eax, 16
! [% H/ Y9 U9 @+ t+ E. t+ {8 S       mov [ebx+2], ax
# ?0 ?: k5 n! m       sti
       leave
0 D& ?& t% {. M, V: \0 `- @       iretd
- E# k' j% E. C# t- o8 \   }
3 w( V* Y# y' k}
* H! \! h! q8 h4 e- \( N7 {
void GetIDEInfo()
5 _: Z0 C& d; L$ \" |- a9 E{
7 \! \+ q6 j/ ^' a4 b3 Y   DWORD dwExcept;

9 E# f/ p- U9 R* c5 f; i) N: n   dwExcept = (DWORD)NowInRing0;

' ^' j( M* P% X! R$ E" `- D. N   _asm
   {
       mov eax, fs:[0]
7 ]6 C" S! w- r$ y* J4 ?       push eax
       sidt [esp-02h]
       pop ebx
       mov idt, ebx
& s1 Q8 b' F) t$ m2 A4 q       add ebx, 0x1C
2 Z9 ^2 ?$ z0 m2 k       mov int_idt, ebx
+ Y, L7 p3 [7 A8 i* d- e
8 U, O; s5 M0 R9 k       mov eax, [ebx]
       mov [Base], eax
$ T) n6 E3 d4 `" c9 i: A       mov ax, [ebx-4]
: n. O4 k+ V1 |5 Q+ {+ B  s# d       mov [Entry], ax
8 b' \$ v& h$ `6 x- s+ G) ?6 g
* m, ]/ }! p! U$ l% l( E1 f5 S       cli
3 E5 X, }+ w. L+ D; I       mov esi, dwExcept
       push esi
( y) x5 N( e; m* `1 C; T7 C       mov [ebx-4], si
! k& {- H$ f- a6 S, t& s       shr esi, 16
       mov [ebx+2], si
       pop esi
: ^/ v0 H0 G7 h" ?- B2 ~       sti
+ [7 E- m- L  F/ o; ~0 Q0 J- n
1 ?9 B& P8 r* V; p$ _       int 3
& }, k) p8 z0 \  d3 x   }
6 x# y0 t' z1 I* i* e}
1 V2 \4 H5 j: t* ~4 c9 |. s1 Uint main()
! s$ U: x. \7 `( x) G% [{
   char s[80];
   register i,j;
   unsigned long id = 0 ;
4 y# |" \+ S- J7 V
//特别注意：这段程序不能 Debug
9 E2 S/ [. I( W: S, C' s/ q. d. _   for ( drive=0 ; drive<4 ; drive++ )
   {
$ ^+ j3 o9 r+ j+ F  {/ A+ ]! h       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
* N. u0 r+ {/ r: P% O       al = 0 ;
       al1 = 0 ;
- d9 h/ `/ b  q! j3 X2 [# y& `       GetIDEInfo();
' T* w6 @3 L- o7 d2 t# b" c
       for (i=0,j=0;i<10;i++)
       {
           s[j++]=(char)(pw[10+i]>>8);
3 i, p# P6 u" P+ C$ K! O  a           s[j++]=(char)(pw[10+i]&0xFF);
       }
- W" q! ~. t. m       s[j] = 0;
2 A; J8 C; c/ K/ d, }: g* l; k+ m# ~2 i3 c
* C" ~* ]6 H- l//        for (i=0;s;i++)printf("%d,",s);printf("\n");
  f# b8 {) l- A* `2 O       printf("Serial=%s\n", s);

       for ( i=0 ; s ; i++ )
8 B" }1 I# o# ]3 U9 i3 u: Z       {
( X5 U; ~/ S+ h           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
9 P+ c' n/ Z' d; E) F           id *= 40 ;        //10 ;
5 F7 }4 p* T* J* K( E4 D( x           switch (s)
           {
& m4 ^/ ~$ Y3 ?               case '0': id += 0; break;
# |( K$ a, B2 w) J3 c               case '1': id += 1; break;
' P& Q! L) a9 I: @               case '2': id += 2; break;
& B: K5 M0 E5 w" o4 b               case '3': id += 3; break;
               case '4': id += 4; break;
               case '5': id += 5; break;
! }4 ~7 u: Q) p. {+ u. e               case '6': id += 6; break;
               case '7': id += 7; break;
               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
6 M9 D' s8 M. t, H) C; U               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
* v% T" f0 O  y( Q; v               case 'e': case 'E': id += 14; break;
7 k& A7 P5 z# u1 t9 ^               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
  l+ a- E9 H7 J. k6 A               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
  D1 m+ S& v( ~- _; ^               case 'l': case 'L': id += 21; break;
1 y; k; A2 c% N) Q* ?               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
/ N1 K; {3 v9 O/ L! ]% w/ q3 m, L5 p               case 'p': case ';P': id += 25; break;
# u9 B- B6 ?5 H               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
( u" |+ G* z+ m' _# H% z' |/ w               case 's': case 'S': id += 28; break;
9 D% T7 [  D5 u' l! @               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
* }# ]& S5 a/ K# F0 A& G               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
# Y$ M/ S0 a, ~' g; T3 r       }
; i) r, z( S' U# e5 L2 S" o, P+ S       if (id > 268435455) id %= 268435456;
9 l, E) a( k' O
//        if ( al1 == 0x58 )
/ y& z4 Q! g( I6 u( l' T( D           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
   }
& T# {: l  A) b( d4 m! B   getch () ;
   return 0;
$ [& m0 `9 o8 ~: n# Y# l}