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

天云上人

WORD pw[256];

static DWORD idt, int_idt;
0 T7 X4 L% w5 S/ p* i7 M$ }static DWORD Base;
static WORD Entry;
1 f( `/ X8 G3 G) K
4 B2 C: e. O' A# T: O8 c$ V#pragma warning (disable:4035)
9 e! j9 r6 [2 w8 mstatic int inp(WORD rdx)
4 V: Z2 _1 Y& b5 q{
$ b) M" `+ z9 @6 L5 a( B2 ^' I   _asm xor eax, eax
   _asm mov dx, rdx
   _asm in al, dx
3 s- D* b- F% r3 f4 o) t}
7 z* R: E" e% `) R- e" j
  B* L3 y4 g! q1 f6 Ystatic WORD inpw(WORD rdx)
7 t' S! B- r" J7 r{
//    WORD retData ;
   _asm xor eax, eax
   _asm mov dx, rdx
+ `% z  x- x, B* H4 ^   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
! R6 P& U) r+ m4 R7 g0 Q+ L" I}

  I- {1 P9 g& y# Tstatic void outp(WORD rdx, int ral)
9 K- b6 t1 r' h: r4 Z% H) M{
   _asm mov dx, rdx
   _asm mov eax, ral
( R  Y+ r% T/ h   _asm out dx, al
}
/****************************************************************************/
WORD baseAddress;
int drive = 0 ;
& r' m2 R, H9 y5 ]% u% y# n. `int al ;
int al1 ;
/****************************************************************************/
static int WaitIde()
{
   int al;
3 L, ]: U, e4 }+ e   al =  0x80 ;
/ j- P3 S  r6 m" r4 w+ q
5 }4 J& a. l2 {1 f   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;
" O3 S7 v# d! z- d# b  n+ L* \/ A
   return al;
}
/****************************************************************************/
static void ReadIDE()
' s, N% w* f) e$ g{
   int i;
, M8 ^. e, m2 \5 J7 N! v( E$ S( l   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
1 Q3 T2 g; y% c       case 1: baseAddress = 0x170; break;
9 S: t# ^" q! q( s) y9 R8 V       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
   }

+ u6 \% f4 T  X7 ^   WaitIde();
8 x& k  j" |. x2 y5 W   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
8 U, g& U# ^( Z
   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
( Q/ p9 p* e* X' Z- ]6 q5 A   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
) [5 w% m, b  \. g
6 t1 z" A  {! L7 K   if ( 0==(drive%2) )
' q% A6 v5 L4 S$ o       outp((WORD)(baseAddress+6),0xA0);
% [# q5 g* s0 C( |, q6 c   else
' v. Z; ?5 W4 Q! {3 `       outp((WORD)(baseAddress+6),0xB0);
7 E* Y: b3 r& D3 D1 o
   outp((WORD)(baseAddress+7),0xEC);
; y% E8 L6 {6 a   al1 = WaitIde();
9 P2 H3 ]; ]+ m7 \1 Z/ }   if ((al1&0x58)!=0x58) return ;
- l; E& P( x( W1 s
/ P5 Y% P) d& x- l   for (i=0;i<256;i++)
. U: s9 T& j) X" `3 D, V9 r   {
       pw = inpw(baseAddress);
   }
}
7 m" y/ j$ u. |1 N, @4 i
5 f, a# j$ k! k/ K9 xstatic void __declspec( naked ) NowInRing0()
) t/ O" a$ `3 Z" }8 {: S. l{
   _asm
   {
       push ebp
& ?; {$ B" u' [! d       mov ebp,esp

% j& P/ h  _' q3 Z       call ReadIDE
6 S9 W8 R+ `8 F$ k       cli
2 u3 [2 [7 X' X5 c  G9 t       mov ebx, int_idt
( m7 y6 w# I4 Y       mov ax, Entry
5 U) ], H! d1 p* f* e# \       mov word ptr [ebx-4], ax
  }- \) P2 `- v# s       mov eax, Base
       shr eax, 16
- B6 R  e4 |* K3 h! k) {       mov [ebx+2], ax
       sti
, u4 o8 I) ?+ p9 B       leave
1 a1 |) N' f! ?8 @       iretd
+ Y4 b: C8 Q  L  e+ T   }
}
2 }% ]! F$ Q0 N' U
: y2 F' A2 k; @void GetIDEInfo()
{
/ y5 U3 O7 w1 I) Q+ l. K   DWORD dwExcept;
" k: I4 F: C' U8 J7 ]. t1 H# m
   dwExcept = (DWORD)NowInRing0;
& ?8 [6 P( p6 a( B2 D3 _! R6 y
$ d' A* _) F1 s4 W: e. _' i7 J9 e   _asm
   {
       mov eax, fs:[0]
       push eax
0 s; \  d* _0 H% {) d       sidt [esp-02h]
       pop ebx
       mov idt, ebx
1 M% O* p! b# s+ ^; @       add ebx, 0x1C
       mov int_idt, ebx
4 X6 D% V9 _8 V$ i4 v
: f& `' |" B8 U% ?2 ^" r       mov eax, [ebx]
0 A. ]; ~. |' _7 A# l1 v! T7 Y5 x       mov [Base], eax
) ^2 _+ H7 l7 E7 v  E; M# M       mov ax, [ebx-4]
9 g- x3 E$ g& |" @* N       mov [Entry], ax
5 v& V  x, o* g& g8 E
1 l! P2 P4 i0 @( h% G       cli
       mov esi, dwExcept
       push esi
       mov [ebx-4], si
5 y! l. D3 u( M3 J+ g2 x( H' r       shr esi, 16
       mov [ebx+2], si
       pop esi
' s* D( l7 B! |( [+ _1 z: {       sti
  X; _4 U' Q5 t1 L( }1 ?" }, s
       int 3
: P- }8 d* _$ V* {- R# l" \   }
}
, z- t+ ]2 U$ g% u; eint main()
{
   char s[80];
! x# x! K6 @4 m. x5 {   register i,j;
   unsigned long id = 0 ;
& j2 D2 a! S$ x% ~# Q3 {. L
" D7 P- I2 u  H, P8 u//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
  n* {! P4 L8 Q# v/ ^       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
) L9 U/ y1 |8 x2 z$ |       id = 0 ;
       al = 0 ;
       al1 = 0 ;
8 S' q/ }' g4 w* a       GetIDEInfo();

       for (i=0,j=0;i<10;i++)
9 I0 w/ e& \' M       {
: h' z" S# q2 k4 e7 w1 M9 c0 ?           s[j++]=(char)(pw[10+i]>>8);
' W. Y0 t' e2 I8 ?, r4 O: _0 F9 f$ P           s[j++]=(char)(pw[10+i]&0xFF);
$ i/ _/ ~$ w9 E9 U! k& K       }
       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
; m. [6 C' F! ]8 y! ^+ ~0 {3 Y0 F       printf("Serial=%s\n", s);
+ g5 K% i# A! g+ i. F
* S; F+ ]& s2 K  Q       for ( i=0 ; s ; i++ )
4 i4 m) l% V& N* F5 W- P       {
, o& B6 r, y2 \; {/ R           if ('-' == s || '/'==s || ' '==s) continue;
           printf ( "%d," , s ) ;
- P6 }: U5 o, O, `           id *= 40 ;        //10 ;
5 \& S, E6 |% S6 S4 r           switch (s)
           {
" D$ k2 h% V) D" s3 T1 \/ R               case '0': id += 0; break;
# ?1 t$ {- p4 Y8 g* P( \$ Z, Z               case '1': id += 1; break;
               case '2': id += 2; break;
* Y7 ?/ L! r- E. S1 ?7 P5 H               case '3': id += 3; break;
9 P, X% J: |& p2 y" s               case '4': id += 4; break;
0 f: y8 W1 K# v6 M               case '5': id += 5; break;
               case '6': id += 6; break;
               case '7': id += 7; break;
               case '8': id += 8; break;
) {9 b1 I3 L% v/ r% P/ V( o               case '9': id += 9; break;
# ?3 E. |8 w4 v0 \5 [               case 'a': case 'A': id += 10; break;
9 f7 K/ V! V4 e4 y5 f               case 'b': case 'B': id += 11; break;
% a; s9 N% E; J. B4 f( {  Z1 {               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
( U* n) @  c, @9 o               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
2 o9 O! A/ A  C0 e! v' }& I' b; \               case 'h': case 'H': id += 17; break;
; c- L; ?% l8 q+ {0 o  v& x: j               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
. b2 l2 x% A, \6 k& p, p               case 'k': case 'K': id += 20; break;
& K. N" F0 u. Z' d+ d  I5 d               case 'l': case 'L': id += 21; break;
  e6 S; S( `! E6 i- `2 u               case 'm': case 'M': id += 22; break;
# d5 }2 V4 M/ t3 I" M1 ^: V               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;
               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
) [) N& `$ [9 `3 j% B1 l7 W               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
               case 'v': case 'V': id += 31; break;
! Z! N4 d; s9 l$ ~$ x               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
. L$ m+ C7 W" J& |- `& s0 c/ O               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
3 A8 _" v  m- Z! _           }
% k0 _$ C% f  M       }
- A' i& H) A( _% b! M       if (id > 268435455) id %= 268435456;
2 t' ^! ]5 T. v7 q
5 c) F' r) k. t! R: z2 L3 i$ x//        if ( al1 == 0x58 )
4 _0 L, G: x/ |; a% f/ {5 y           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
4 P  j4 b2 k6 I' P   }
7 j! X; R9 ?! p+ T  s8 E: ?   getch () ;
   return 0;
9 ^4 E0 `" L+ }}