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

天云上人

WORD pw[256];
, b6 l3 Q, X5 ?& B* \
static DWORD idt, int_idt;
. R: g& t5 n1 P+ S0 M! q5 B/ tstatic DWORD Base;
static WORD Entry;
" x, f& J+ H  N2 U% ^& u
#pragma warning (disable:4035)
1 u1 y7 ?" u! x$ h9 Y) y; Ystatic int inp(WORD rdx)
{
   _asm xor eax, eax
' U: |4 \& u- y) V   _asm mov dx, rdx
   _asm in al, dx
: Q2 w% g1 |# Z  K8 Y8 c}
/ w  Q# a( N4 r6 v4 T9 P
8 g% g/ F, z* i. `* I( c, B  Nstatic WORD inpw(WORD rdx)
% v5 x% |8 }! \; L0 i, b$ E{
//    WORD retData ;
: O7 S$ Z: b' V4 O* j' N8 H  J   _asm xor eax, eax
- V1 ^% v1 P- W/ T/ |" Y   _asm mov dx, rdx
   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
8 a6 w/ r- k. z- Y9 c1 B0 m}

" f1 m$ b, ^8 k+ ^' K8 e1 {1 Fstatic void outp(WORD rdx, int ral)
{
4 I; x$ B5 F9 f5 S+ W) G4 H   _asm mov dx, rdx
   _asm mov eax, ral
# w$ a7 ]* h% e   _asm out dx, al
0 k% ~* S, R6 z6 T* O0 ~6 E- _" b}
- O. d/ P' N& [: j) G: g8 u+ [' v1 M/ D/****************************************************************************/
WORD baseAddress;
, J8 v! G3 }5 q+ X% _( [int drive = 0 ;
7 X% e% Q7 i: A3 h) qint al ;
int al1 ;
/****************************************************************************/
3 l4 E# z! b, I' a) r' |6 Qstatic int WaitIde()
{
$ E! @! T- @6 |6 I   int al;
   al =  0x80 ;

8 O4 O3 _  A0 |2 `3 u5 I: a- G. {   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

. T- W! a$ i& `( M/ w( I# D   return al;
$ V" A& O( ?; B' i: _  Y}
0 I5 ?  `: h' L+ x$ Y/****************************************************************************/
static void ReadIDE()
5 l1 s: B, p+ c5 G2 a{
1 L* C8 L, ?( i; X5 ]   int i;
   switch (drive / 2)
$ O: ?( G/ h6 Y7 Y: E   {
       case 0: baseAddress = 0x1f0; break;
0 i2 K4 |; O& J- W7 c' d       case 1: baseAddress = 0x170; break;
       case 2: baseAddress = 0x1e8; break;
# S+ L) w# W7 z! [9 F       case 3: baseAddress = 0x168; break;
  ?, L% K+ }& L: f5 P. d4 T   }

2 j; h- o- p* w+ B, c2 |4 V   WaitIde();
# M0 ]- H& g" |5 H" J   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();
# i; r" x1 v) f+ H# I9 f) ]
   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
3 e4 h4 d" u6 h) D# k% p1 |. E   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

% M0 g5 Y# C$ c/ ?2 k   if ( 0==(drive%2) )
$ z! Q/ u$ P5 t5 d       outp((WORD)(baseAddress+6),0xA0);
6 e+ J2 Q  H7 N, e: b% ~5 Z   else
       outp((WORD)(baseAddress+6),0xB0);
; V- ?( f; ~6 M1 d" w
/ K# P* I- x5 d8 o1 s( H1 z% V   outp((WORD)(baseAddress+7),0xEC);
. C$ k. i" c; Z/ ]0 \+ }   al1 = WaitIde();
, Z: x3 _3 A; m/ N+ p! }4 N* W$ t   if ((al1&0x58)!=0x58) return ;

$ T, }+ s3 d6 y9 t7 x   for (i=0;i<256;i++)
   {
       pw = inpw(baseAddress);
   }
}

static void __declspec( naked ) NowInRing0()
1 W' _& |, V7 c! I1 F- A/ K{
) {& u+ u, h5 L  z& M7 X3 A- X   _asm
   {
       push ebp
       mov ebp,esp
6 H+ u" W4 |9 n. f: g0 J
       call ReadIDE
8 W2 }* |* r& f       cli
0 f  C% C$ H0 w       mov ebx, int_idt
       mov ax, Entry
       mov word ptr [ebx-4], ax
       mov eax, Base
3 W" p6 i. M4 ?3 |7 N, L       shr eax, 16
       mov [ebx+2], ax
% L: n# T! R: U5 C8 k       sti
       leave
* u) j6 z1 s( p: x* i       iretd
   }
- I5 {* ]; h% I}
/ z( E, A, L# x+ w. N, e. x, S' y
void GetIDEInfo()
{
1 F& q) Z  B7 m; d& h1 q7 [   DWORD dwExcept;
& \3 X# y+ \7 o+ w& z
! f$ Y3 p5 ?" T" H! U+ U- S7 Q   dwExcept = (DWORD)NowInRing0;

' H. j( T# k& D6 j   _asm
- ]# i5 t4 n6 b2 S, m   {
       mov eax, fs:[0]
" a" H; C+ W& ~2 h       push eax
       sidt [esp-02h]
4 g5 @6 {" ~( `; B9 E# ^4 R       pop ebx
. n' O; T0 D# A- w; O; X8 p       mov idt, ebx
       add ebx, 0x1C
7 B' L; R' F. a- R; @! ]       mov int_idt, ebx

       mov eax, [ebx]
8 u* y) ^6 T. K/ h       mov [Base], eax
5 T' D4 @- N, ^7 W8 A& `6 [       mov ax, [ebx-4]
6 [5 S, R" B# h" N2 F, o       mov [Entry], ax

       cli
       mov esi, dwExcept
) y' b/ i+ j# S. i. ^       push esi
7 N& ]& i9 b: h$ s# J- `2 k       mov [ebx-4], si
/ J" O! a3 U  |; _. r$ R       shr esi, 16
       mov [ebx+2], si
       pop esi
       sti

       int 3
   }
}
8 C" M& u8 e) b, F5 Iint main()
. s6 x8 F; w) d4 U) k2 R8 J{
   char s[80];
   register i,j;
   unsigned long id = 0 ;

; ~0 q& V$ |5 {8 `( G//特别注意：这段程序不能 Debug
. c0 N2 }2 n; Y- v' M$ c: a; g   for ( drive=0 ; drive<4 ; drive++ )
   {
  h& w6 o( i+ G' ?! u% a$ T       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
, K: `2 H# b! N       id = 0 ;
       al = 0 ;
       al1 = 0 ;
$ O/ s2 H# S+ R9 D$ ]       GetIDEInfo();

- k5 t4 t5 |# Y7 k       for (i=0,j=0;i<10;i++)
       {
           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
# Z( H6 D* {6 x& J0 G1 f       }
       s[j] = 0;
6 M8 \# _% x6 r3 M- @* n
//        for (i=0;s;i++)printf("%d,",s);printf("\n");
+ `: n! U1 g6 A$ E9 }5 N( F* p4 \2 @       printf("Serial=%s\n", s);
% d2 P$ i# P: ]# p
- v7 ^+ s% P3 b0 a! h! L       for ( i=0 ; s ; i++ )
( G9 q5 @: W) A. F: L       {
  m) a' L# }0 M, ^4 g           if ('-' == s || '/'==s || ' '==s) continue;
3 C: o9 a# _' T7 E! Y# p" `           printf ( "%d," , s ) ;
           id *= 40 ;        //10 ;
           switch (s)
           {
               case '0': id += 0; break;
- X( A. A/ j" g1 Z' T0 j               case '1': id += 1; break;
$ ]) C: k1 @- ~               case '2': id += 2; break;
# q# [8 N) L- B- p               case '3': id += 3; break;
7 h7 F+ y2 s- i/ j, _  B               case '4': id += 4; break;
3 r7 o& ?7 P! T) `- N4 N' Z, w               case '5': id += 5; break;
) t4 Y4 {+ k/ j               case '6': id += 6; break;
               case '7': id += 7; break;
2 _) x- K$ S( w. Z) D5 n5 S+ _; ^               case '8': id += 8; break;
               case '9': id += 9; break;
% W4 g& c' v. I& g! q$ Z               case 'a': case 'A': id += 10; break;
$ Y' U# b0 Q. \0 g" P- `4 S  f               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
6 ~3 z8 g: n" Y# n" B8 _               case 'd': case 'D': id += 13; break;
               case 'e': case 'E': id += 14; break;
               case 'f': case 'F': id += 15; break;
5 v; ?( q5 k% j               case 'g': case 'G': id += 16; break;
               case 'h': case 'H': id += 17; break;
) ?% a( O" j: A1 n5 J* r               case 'i': case 'I': id += 18; break;
. I5 H  {' ^7 X$ n  D               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
6 U* F" h! q% r9 ~6 ^! G& l) {               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
5 t+ I% s" B' J, E5 R/ G: ?! y               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;
  M$ E6 T$ g6 x               case 't': case 'T': id += 29; break;
1 C( E/ N) {, d: i' t               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;
0 K0 z9 R' c3 e! K6 `4 V- R& i& q               case 'y': case 'Y': id += 34; break;
- J, }" ]* A: |! f5 S               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
, D) T% e% t: l6 C3 p0 o" f           }
' y; o) P* B; U1 t5 O' b8 k. Z* Z1 `       }
       if (id > 268435455) id %= 268435456;

& b1 F* [3 `+ l0 e//        if ( al1 == 0x58 )
4 Y1 y6 e' D5 x$ t# _& f5 I& I% w           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
4 u, x% x# I' A' U   }
   getch () ;
   return 0;
}