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

天云上人

WORD pw[256];

static DWORD idt, int_idt;
static DWORD Base;
1 Q' f, K0 k! Qstatic WORD Entry;

#pragma warning (disable:4035)
. z6 l. {- p+ Fstatic int inp(WORD rdx)
{
   _asm xor eax, eax
   _asm mov dx, rdx
8 ?9 l6 P+ H2 l/ t+ ^   _asm in al, dx
! _. z# k# h' c: @; e' Y}
! R- F: `6 B4 M" E8 ]. x: Z' V- I4 c
9 |1 |3 S# Y- ~: M" D& h3 E1 E6 Vstatic WORD inpw(WORD rdx)
{
//    WORD retData ;
; b2 y/ w& I4 v% o* z7 T   _asm xor eax, eax
1 [! Z2 h* D8 W6 h   _asm mov dx, rdx
   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
}

static void outp(WORD rdx, int ral)
. T+ W4 D1 K! h& r! E{
   _asm mov dx, rdx
   _asm mov eax, ral
   _asm out dx, al
- G2 _3 [1 W: H}
/****************************************************************************/
- x& z* k* l& m' DWORD baseAddress;
$ S! h( T( D" C1 p1 lint drive = 0 ;
/ D" w1 Q' z* y* [4 J5 Mint al ;
int al1 ;
/****************************************************************************/
! E/ l, V/ R- {: i2 @  g. e0 Gstatic int WaitIde()
{
   int al;
   al =  0x80 ;
% \: ?% q9 @- V6 h
, |5 r% ~- @, t3 n% b   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

   return al;
7 c6 W! ~# ?: c; B$ Y( P" q+ ~+ S+ F}
/****************************************************************************/
static void ReadIDE()
{
   int i;
   switch (drive / 2)
   {
: ~4 b3 \: k8 G7 J% b       case 0: baseAddress = 0x1f0; break;
" Q8 Z9 n: ]% h       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
& v2 p7 _* F' Y3 y. U( N       case 3: baseAddress = 0x168; break;
% {6 d- x0 |9 j" v) }   }
: r$ g: E2 u( `& L
6 r9 a" a. |# H6 t. P   WaitIde();
) X  s1 K9 T" m* Z   outp((WORD)(baseAddress+6),0xA0);
  K& E2 Z8 a% z8 W   al = WaitIde();
4 h5 {" e! ?% H* d
   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
   else
  q$ C$ C+ b# l& p3 ?* w       outp((WORD)(baseAddress+6),0xB0);

   outp((WORD)(baseAddress+7),0xEC);
   al1 = WaitIde();
7 @" j' e' z! b+ V  W- v9 {8 @   if ((al1&0x58)!=0x58) return ;
6 L( _9 H- O9 h: K2 w
5 W, s% P% E0 N9 }   for (i=0;i<256;i++)
   {
5 j! q4 {/ p. [! C       pw = inpw(baseAddress);
: |  f& z" y5 R" B   }
}

3 Q0 r1 N* R( Nstatic void __declspec( naked ) NowInRing0()
6 T; k; C; u, f' h! F) G4 {% g+ j{
0 V0 d/ m8 h3 M4 T# [' j   _asm
! Q; h* N; G* C: Q4 e  X4 H! {* w   {
       push ebp
. O# w* C4 ~5 j3 ~       mov ebp,esp
. |8 z# m, [. {0 e: k& ^
       call ReadIDE
       cli
       mov ebx, int_idt
0 h) v) [/ Z, B9 Y! y: a% e       mov ax, Entry
       mov word ptr [ebx-4], ax
       mov eax, Base
       shr eax, 16
9 V2 ^1 l1 s6 H- H" V       mov [ebx+2], ax
, A4 V; k/ [* `9 R( \' c. a4 |       sti
; I* s8 C1 m4 |- Z* Q  y       leave
. S; U8 e5 r% p" O2 D  w       iretd
( `, K, B" ~  P- I/ Y: J- w   }
}

void GetIDEInfo()
" `9 I% J* i. T+ d+ ]7 J" Q$ t{
  s7 R( P% S' K( k, ~2 o' e% N$ Z   DWORD dwExcept;
# }+ \3 S) c  e- f  \# u
   dwExcept = (DWORD)NowInRing0;

   _asm
   {
       mov eax, fs:[0]
       push eax
6 X+ K* y7 y' J! G* |: J$ Y       sidt [esp-02h]
       pop ebx
       mov idt, ebx
* I7 t# B& Q  `! b, F9 O6 s; n       add ebx, 0x1C
       mov int_idt, ebx

       mov eax, [ebx]
       mov [Base], eax
: p0 }6 t& S4 k# `       mov ax, [ebx-4]
       mov [Entry], ax
; M$ c& T& ~. q: F6 u9 b; ^
. B& [2 I1 b, |8 m. v       cli
! \9 ^- }( L3 }) b+ N$ n  Y       mov esi, dwExcept
8 ]1 j, g- V+ @# j3 F9 v- }8 t5 \% Z4 u       push esi
  ]5 A- V8 Q) G% p! H       mov [ebx-4], si
* V9 z; l" v8 H& z; F1 J( W& A       shr esi, 16
       mov [ebx+2], si
4 ]' Y  g! K# f       pop esi
6 M" r) p' r% |( g8 V3 d) r       sti

/ t: K  }$ r& y6 X5 f, x$ C0 |       int 3
/ _0 v( W; G$ {; T. S5 Q3 J   }
3 X: T/ W6 d0 u6 z/ S1 A1 L0 K  ~, @}
int main()
{
4 ^* u+ [! e3 P# ^   char s[80];
2 N, j( K$ ]7 M, H9 @: E   register i,j;
   unsigned long id = 0 ;

  R3 o0 N1 h- {) D! _" ^4 M$ }//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
5 b0 i' w/ S) q, t: c+ V) ~# ?   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
) e7 N( G' g+ `! o" B. L  u5 ?       al = 0 ;
       al1 = 0 ;
: {/ e6 [( X5 `6 G       GetIDEInfo();

% Y. E' Y1 |2 O  O  J; {9 t4 G% `5 S       for (i=0,j=0;i<10;i++)
       {
3 Q/ v' \1 h* o/ U  R           s[j++]=(char)(pw[10+i]>>8);
/ P3 V/ ~3 n) J" G5 l           s[j++]=(char)(pw[10+i]&0xFF);
& c2 S7 v! D# W3 m) {- a       }
  `+ M+ |' V* D" g9 g* c       s[j] = 0;
' \, D% ]& F: Q; O
2 n9 C: z; `1 G- H8 @//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);
6 B7 L* J6 ?7 U# ?7 g* M& B$ V
4 o( {6 p% l$ I8 t6 T, F0 l       for ( i=0 ; s ; i++ )
       {
# J# O0 x7 S" Z+ b) D7 B- Y7 W           if ('-' == s || '/'==s || ' '==s) continue;
7 e8 j% y) b8 }+ d0 F3 V           printf ( "%d," , s ) ;
0 X4 i9 [, Z* G: L2 J           id *= 40 ;        //10 ;
           switch (s)
           {
4 a. o3 n& s5 j$ f( E               case '0': id += 0; break;
/ [% S  i) L( v. d               case '1': id += 1; break;
               case '2': id += 2; break;
( I! P$ q" o- R  w. h               case '3': id += 3; break;
: B8 w0 G8 X7 ]               case '4': id += 4; break;
3 l5 e1 I, B7 E* E9 k) y! Y' ?. A( Q               case '5': id += 5; break;
( @+ b6 ]8 p: [               case '6': id += 6; break;
! [1 g1 o. B8 r6 L               case '7': id += 7; break;
               case '8': id += 8; break;
" e* G  k# S! c7 v" v6 N; I               case '9': id += 9; break;
$ B  L6 v* X) ^, I' l$ b( I               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
* z4 q/ V# t, M# ~; ^/ B+ s               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;
, f7 x6 p0 x0 c0 P( P5 j               case 'g': case 'G': id += 16; break;
8 b' @3 j) K8 E: g! @3 h8 T# m               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
5 g! B, y, A% B( @               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
  b6 h' ^+ C, Z" ^; ]. e               case 'l': case 'L': id += 21; break;
6 I! g6 e- ^( v; ?% G" G               case 'm': case 'M': id += 22; break;
, k9 G1 ~9 f4 `$ `8 ?0 \6 V               case 'n': case 'N': id += 23; break;
- x2 K! }$ m2 I               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
9 z3 z3 a2 x3 `: }; d; {9 u. n               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
8 C. Z8 k$ i% c( [3 ~* B               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
5 Q3 _3 v, @0 a9 G/ r* q  r: H               case 'v': case 'V': id += 31; break;
, N' k7 q! J! \3 a6 }               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;
               default : id /= 40 ;
           }
       }
' @3 {; k/ n1 R1 t       if (id > 268435455) id %= 268435456;

0 N) K% l, Q1 F4 j& ~" e1 p% \5 C//        if ( al1 == 0x58 )
           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
' M) c2 }" a& v$ v+ ?$ p& x" U4 M1 D$ |   }
   getch () ;
9 h1 D' T( Y  `   return 0;
8 {. x" K8 M6 o  F% h* J! m}