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

天云上人

WORD pw[256];

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

! P2 L4 n% l% {#pragma warning (disable:4035)
! x0 S' @$ e$ u% C% u9 Xstatic int inp(WORD rdx)
{
   _asm xor eax, eax
   _asm mov dx, rdx
* ?" _: \8 Q- N4 f% r" s/ ^   _asm in al, dx
% i7 k  S2 z) ]6 V}

2 ~# i4 f5 U+ m! W) X1 n+ m% ustatic WORD inpw(WORD rdx)
4 u" `8 P8 I: S3 a{
4 U" p9 @8 X; q+ D//    WORD retData ;
2 N3 U+ t# E: ?+ o, A# F! @; G  u4 f' @& V   _asm xor eax, eax
' y: R$ |5 `" I0 E. A3 r: X   _asm mov dx, rdx
9 d" {! Q( ~* P- b3 V% A   _asm in ax, dx
9 F0 ^; T/ t/ |( f: |/ Y- q//    _asm mov retData,ax
//    return retData ;
}
8 J  ^; x, I5 C4 j) f- e6 k
. F5 E$ ]8 Y1 Q0 d6 q, }static void outp(WORD rdx, int ral)
. h2 y3 A/ @! j7 y5 V% Z5 d{
   _asm mov dx, rdx
   _asm mov eax, ral
, Z) ^0 g) L5 y   _asm out dx, al
}
, x! Y* @7 w* K' P3 ?; B' |! M/****************************************************************************/
8 j: s+ O# \) p* U' P0 qWORD baseAddress;
+ t$ Z" e: K: u  Z6 ]1 `& [int drive = 0 ;
int al ;
% D4 j/ E8 k# @! |int al1 ;
0 M( ~1 U2 R: A( }/ `/****************************************************************************/
static int WaitIde()
9 H' b6 `! \" n0 T6 H; ~{
, `2 k/ N# u* L/ W   int al;
   al =  0x80 ;
, r- B1 A5 \/ U! X6 O
   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

   return al;
9 E7 T  A+ U3 u4 N- p/ {}
/****************************************************************************/
static void ReadIDE()
{
   int i;
7 ?$ q/ A. m: Z; D* H   switch (drive / 2)
% r4 q7 n* X& {# i   {
; v9 d5 x# N" p$ m4 U       case 0: baseAddress = 0x1f0; break;
       case 1: baseAddress = 0x170; break;
6 C/ C$ ~$ I7 F$ M, {, h       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
2 X  ]7 b( N* O% f8 M: _" L5 M5 E   }
" H7 Q7 m! ^0 z: x; d/ \
- D& A: U0 _5 D" p$ N$ w) _   WaitIde();
% z* d1 |/ h0 ?   outp((WORD)(baseAddress+6),0xA0);
/ r5 T2 N3 v6 t" z  g% u; O7 r0 S   al = WaitIde();
( h: g6 @  T" z- y4 m% M" R
   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;
9 x4 S7 c# h8 s$ a
   if ( 0==(drive%2) )
       outp((WORD)(baseAddress+6),0xA0);
   else
; {5 K& D2 V. U! Z  d       outp((WORD)(baseAddress+6),0xB0);
$ {9 _1 S2 N* g* l7 m' m5 m
4 \/ @4 ~. B# d   outp((WORD)(baseAddress+7),0xEC);
, n7 U6 @9 F, Y* u" U# ]   al1 = WaitIde();
   if ((al1&0x58)!=0x58) return ;
0 K/ b9 h9 A4 a
/ U% A5 }' g9 v) J& x   for (i=0;i<256;i++)
   {
, D: y% N, G" X       pw = inpw(baseAddress);
   }
0 G: j' c& t+ h& z; }# i7 v! s}

  {. Z; u- \$ J! G2 c& P$ astatic void __declspec( naked ) NowInRing0()
3 \6 @8 [" `/ m( z) C* |6 b{
   _asm
   {
) D# }7 M- J; H       push ebp
% Q( g0 x" g$ m9 |# J       mov ebp,esp
# h4 C$ X: ?1 r1 F3 U$ p
% P6 G& y. ^' t0 w       call ReadIDE
1 S; }4 Q6 @# I; |+ a       cli
       mov ebx, int_idt
0 g' U# x: z. ]       mov ax, Entry
! {- I2 p8 Z" N' c% r       mov word ptr [ebx-4], ax
/ C* u& J8 X& ?, a& F+ C) S9 |       mov eax, Base
" l' X" }/ U% [9 [       shr eax, 16
- }0 B$ }* d& [, u       mov [ebx+2], ax
. A' @' J" [! @       sti
       leave
       iretd
: R% L1 z" R* F' T' H. T   }
* v1 [% b* W" M, A, h/ }}
# z+ x! M' ~# g" n4 R
void GetIDEInfo()
. n  s- N1 p3 x{
   DWORD dwExcept;

4 I1 _/ M$ y2 Z1 b& o) o   dwExcept = (DWORD)NowInRing0;

   _asm
   {
) v& g6 V2 V/ ]8 J7 }$ L       mov eax, fs:[0]
, X  F, u( O( M) P       push eax
' s/ ~- {% A2 R; J       sidt [esp-02h]
       pop ebx
: b5 R1 z0 g5 x       mov idt, ebx
7 j- J6 P( K) o       add ebx, 0x1C
( c2 P+ b6 z5 s, ~7 n/ v6 Z1 `       mov int_idt, ebx

  l* u* `# u' t       mov eax, [ebx]
- j% s* I3 S8 ~- x7 t6 `0 [       mov [Base], eax
. ?' ~$ X8 X# T0 k       mov ax, [ebx-4]
       mov [Entry], ax

3 I! @% a2 ^% q0 }4 ?( [6 c       cli
       mov esi, dwExcept
       push esi
       mov [ebx-4], si
       shr esi, 16
       mov [ebx+2], si
       pop esi
       sti

/ B0 Z! @; r/ L       int 3
. f* x! w' N9 T: J. t  P- X   }
' I# B# }3 e. l7 q4 Y$ N7 C}
! H+ y/ q( Y: @) [& B* Kint main()
- f$ Q- }" F6 P+ x{
   char s[80];
# E. s% u' n/ t* \# ~  ^5 d3 `   register i,j;
6 ?: C; `( V% {. a   unsigned long id = 0 ;
# Z2 K" b  p5 V; t4 ^! G
//特别注意：这段程序不能 Debug
, I1 r) D9 q  a- v: x( W& ^: T   for ( drive=0 ; drive<4 ; drive++ )
  I9 L8 X7 J* T; [, A$ i0 e7 R* t   {
       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
7 y/ Q9 C. \+ E+ U! A       id = 0 ;
) B, L- K( R* k       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();

; U3 Q1 `# S3 _       for (i=0,j=0;i<10;i++)
  t! M0 j# ^' M3 {7 u- k       {
           s[j++]=(char)(pw[10+i]>>8);
* W9 A9 `- H% Z0 r# o# J5 ?+ r5 z           s[j++]=(char)(pw[10+i]&0xFF);
# s/ G$ ~- F) l; c       }
$ L& W2 A4 ]# x( A, X9 @& k: M       s[j] = 0;
  C* Z* [7 H4 S5 E- x
//        for (i=0;s;i++)printf("%d,",s);printf("\n");
       printf("Serial=%s\n", s);

8 t8 q0 k3 ?3 ^" ]& y/ d       for ( i=0 ; s ; i++ )
       {
           if ('-' == s || '/'==s || ' '==s) continue;
, @- n$ L, g; u3 k           printf ( "%d," , s ) ;
5 e( x- B: [" h' z8 z" g           id *= 40 ;        //10 ;
           switch (s)
" C- W  F  ^$ ^( G% c0 s7 W6 b& }           {
               case '0': id += 0; break;
               case '1': id += 1; break;
, g# @6 ?0 y7 }/ e) Y( G6 ]2 W               case '2': id += 2; break;
( X0 a! `* ~2 z5 E) |, j               case '3': id += 3; break;
               case '4': id += 4; break;
               case '5': id += 5; break;
               case '6': id += 6; break;
. U! q# [- y  ?% c/ _               case '7': id += 7; break;
               case '8': id += 8; break;
" _4 u4 i, n! R" [6 T               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
- X* P. X  Z- _4 t6 z+ Q               case 'b': case 'B': id += 11; break;
" y; F2 o1 |! o6 x3 d               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
7 T) J1 y) p3 G: j/ G, u- `+ p               case 'e': case 'E': id += 14; break;
* W0 B% V1 u9 a% M7 s4 y/ D               case 'f': case 'F': id += 15; break;
, }" c! }, H0 E5 `: Y0 q- y               case 'g': case 'G': id += 16; break;
& j1 l* ]3 a' I& K- M% V               case 'h': case 'H': id += 17; break;
  V2 v' A+ j. e, K2 h. ^# `               case 'i': case 'I': id += 18; break;
               case 'j': case 'J': id += 19; break;
8 v4 Q9 P8 z8 z* m4 y' v               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
, _5 P! Q5 F4 p. C- A2 n               case 'm': case 'M': id += 22; break;
8 @/ s  d$ E- C: H               case 'n': case 'N': id += 23; break;
               case 'o': case 'O': id += 24; break;
4 F" @& w9 {" R: t# o+ t$ g4 A" m: u4 {# b               case 'p': case ';P': id += 25; break;
7 N/ p4 }7 _9 W% Y3 P0 Z               case 'q': case 'Q': id += 26; break;
               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
" k3 P) `# P8 R               case 'u': case 'U': id += 30; break;
! Q3 W$ j( s; ^2 l* J; H9 V               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
+ I- f1 c8 z4 |; g8 {               case 'x': case 'X': id += 33; break;
               case 'y': case 'Y': id += 34; break;
               case 'z': case 'Z': id += 35; break;
               default : id /= 40 ;
           }
       }
       if (id > 268435455) id %= 268435456;

//        if ( al1 == 0x58 )
# z0 O% }5 u; S9 E# l           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
' T7 S4 F+ q0 ~* s   }
   getch () ;
+ a1 u4 g3 o. J( {0 {   return 0;
}