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

天云上人

WORD pw[256];
6 M! Z5 T  F$ S6 a& u7 C
static DWORD idt, int_idt;
static DWORD Base;
static WORD Entry;

5 }( r" L7 _6 n#pragma warning (disable:4035)
static int inp(WORD rdx)
* O- N" ^8 Y2 @3 ?1 s# s8 C( u{
   _asm xor eax, eax
+ \; m* T6 |5 \   _asm mov dx, rdx
" p2 N0 u: J" i, Q* W: Z   _asm in al, dx
, _3 A, \6 \. t}

static WORD inpw(WORD rdx)
: f$ `1 [1 g* ?+ U% a. G{
//    WORD retData ;
   _asm xor eax, eax
% w" \* y7 A0 `0 w; O2 B3 r   _asm mov dx, rdx
, ?& P" q" O  G) c( o   _asm in ax, dx
//    _asm mov retData,ax
//    return retData ;
}
. S: \- M! h* V% p: W& a3 }
( H( D9 M3 I4 `& V. N& Vstatic void outp(WORD rdx, int ral)
% d$ Z8 d1 {4 m+ w{
4 j" l2 z& p! \0 o* T* O: |   _asm mov dx, rdx
   _asm mov eax, ral
% [' @3 H  B, V/ Y. {. z   _asm out dx, al
}
/****************************************************************************/
2 T" o% y$ C) q8 @WORD baseAddress;
- h( R( A9 ~9 R7 Vint drive = 0 ;
int al ;
) J0 \4 K* [. F1 n: B& Zint al1 ;
/****************************************************************************/
  m/ l. b$ b6 Astatic int WaitIde()
7 n) z" p- r1 v) l' L# f: n3 Z{
   int al;
   al =  0x80 ;
8 V: `2 I$ i, f
! H" i  U( }7 N# A   while (  al & 0x80 ) al = inp ( (WORD)(baseAddress+7) ) ;

% I5 j3 ?' |# X* ^+ n' `$ S3 L   return al;
/ R: C$ A8 g4 U}
  g" c$ I0 a7 i# Z& J8 e8 I/****************************************************************************/
- m% ^% J/ l) z: ?static void ReadIDE()
, N/ Q4 n+ Y* I* ^; y{
   int i;
   switch (drive / 2)
   {
       case 0: baseAddress = 0x1f0; break;
& W7 ]9 ?3 X8 t, ~0 _0 V       case 1: baseAddress = 0x170; break;
( T' s0 E% I) y+ c, M       case 2: baseAddress = 0x1e8; break;
       case 3: baseAddress = 0x168; break;
, i& F8 L7 H7 H   }

! ~$ u; g3 t8 Z* }- g" w8 G   WaitIde();
   outp((WORD)(baseAddress+6),0xA0);
   al = WaitIde();

- l" n3 S' H* S. S6 b  M   if ( 0==(drive%2) && (al&0x50)!=0x50) return;
   if ( 1==(drive%2) && (al&0x20)!=0x20) return;

   if ( 0==(drive%2) )
. d9 ~0 A1 c* j       outp((WORD)(baseAddress+6),0xA0);
   else
       outp((WORD)(baseAddress+6),0xB0);

+ J" U- a) U. l  u, J; M- O( H   outp((WORD)(baseAddress+7),0xEC);
" B5 |2 R3 s* b   al1 = WaitIde();
( S, s2 S* L( o0 K# [   if ((al1&0x58)!=0x58) return ;

   for (i=0;i<256;i++)
1 M5 U0 e+ a5 b   {
1 a  [+ Z- N, L1 ?. ^       pw = inpw(baseAddress);
: P  b# D5 {  Q9 o# q' Z   }
}

static void __declspec( naked ) NowInRing0()
{
, }) w) H4 f/ {  f" X4 \3 D   _asm
   {
& r) X  ~1 E8 @; s       push ebp
       mov ebp,esp

  c3 i, N: L5 [  L       call ReadIDE
       cli
6 j4 n: ~. r) h) z       mov ebx, int_idt
$ [. k% I) r3 O* E+ Z       mov ax, Entry
       mov word ptr [ebx-4], ax
6 J# K$ i! M8 R( v$ Y       mov eax, Base
       shr eax, 16
       mov [ebx+2], ax
7 B: ^5 f- v2 ?$ _# I       sti
2 r% _9 Y4 [. a0 U2 m       leave
       iretd
8 b" T) v8 H2 `" u! w+ n   }
}

void GetIDEInfo()
3 W7 X2 b+ X8 N# h) z( F9 t) b{
   DWORD dwExcept;

: J; I2 X5 X; ^; c; l, L   dwExcept = (DWORD)NowInRing0;
  y* \/ R0 f. d" B) Y: n9 `
   _asm
   {
       mov eax, fs:[0]
" ~  @2 C2 J5 w  j* L       push eax
       sidt [esp-02h]
       pop ebx
       mov idt, ebx
* I+ ]; f: I$ l; ?9 ?       add ebx, 0x1C
0 F2 c: f  f% y! U- [7 A7 o       mov int_idt, ebx
5 X; s4 h: E3 k, M# E+ ?
9 m9 L8 i1 f, ^" ^5 h& L" S: Q       mov eax, [ebx]
       mov [Base], eax
0 D7 P" n* f7 `( \       mov ax, [ebx-4]
       mov [Entry], ax
) N# q# K$ K- Y, I) k) P6 ~" j
       cli
  |4 S, o; r6 @+ v" ~4 e       mov esi, dwExcept
       push esi
% f" u9 Q/ X! w1 H- z       mov [ebx-4], si
6 u1 n3 I! R" `& y1 ?! U  u- G       shr esi, 16
+ u! Q8 R9 y" k9 q  e; c  J       mov [ebx+2], si
( f/ J9 a% z. l2 e7 V+ s" ]( v       pop esi
- m; n& O5 `* X( X       sti

       int 3
   }
}
int main()
* P0 d, `# `! d5 ~{
   char s[80];
: _( W; ?2 g) ^" E' c5 V6 u8 s- U   register i,j;
   unsigned long id = 0 ;

" g& U' k7 }9 V2 _% @$ b" G* q- Q//特别注意：这段程序不能 Debug
   for ( drive=0 ; drive<4 ; drive++ )
   {
4 h% b4 q5 E( X+ x       memset ( pw , 0 , 256*sizeof( WORD ) ) ;
       id = 0 ;
       al = 0 ;
       al1 = 0 ;
       GetIDEInfo();
% ^; Q' w8 H- O7 ^
8 w, c1 b1 h4 r3 |# Q5 c7 l4 S' `       for (i=0,j=0;i<10;i++)
       {
2 J  p9 f/ t0 l0 {; V4 S           s[j++]=(char)(pw[10+i]>>8);
           s[j++]=(char)(pw[10+i]&0xFF);
       }
       s[j] = 0;

//        for (i=0;s;i++)printf("%d,",s);printf("\n");
* I+ v/ ?: h# k2 z$ r% n% n  ~       printf("Serial=%s\n", s);
& w( Q: F8 g4 O
       for ( i=0 ; s ; i++ )
       {
5 L! g8 p8 G% C& k! i) |) ?+ E: n           if ('-' == s || '/'==s || ' '==s) continue;
, v6 [( ]2 u, Z           printf ( "%d," , s ) ;
4 K; o" {' J! p8 z           id *= 40 ;        //10 ;
           switch (s)
4 x5 s/ T: v; _. h( n+ d           {
               case '0': id += 0; break;
7 R' d! W" g0 I, `( d5 I" `( o9 y               case '1': id += 1; break;
' j% q: t& h6 {$ G5 k               case '2': id += 2; break;
) `0 Y; V1 W( y3 v9 q               case '3': id += 3; break;
% ?2 o* u/ u1 }( t               case '4': id += 4; break;
0 M( Q$ S! S: \, `( `% I) |               case '5': id += 5; break;
9 l0 B& p# o2 `; `" L7 d               case '6': id += 6; break;
               case '7': id += 7; break;
( H- X. X  F. F" H               case '8': id += 8; break;
               case '9': id += 9; break;
               case 'a': case 'A': id += 10; break;
               case 'b': case 'B': id += 11; break;
               case 'c': case 'C': id += 12; break;
               case 'd': case 'D': id += 13; break;
) f: R) c$ |8 e0 J4 Y4 a5 C" o( x2 A               case 'e': case 'E': id += 14; break;
% d: L& V+ C5 g# z               case 'f': case 'F': id += 15; break;
               case 'g': case 'G': id += 16; break;
/ J+ U4 M/ S$ P# z- @9 F               case 'h': case 'H': id += 17; break;
               case 'i': case 'I': id += 18; break;
2 H: F3 ^+ l* n5 S! ~9 V               case 'j': case 'J': id += 19; break;
               case 'k': case 'K': id += 20; break;
               case 'l': case 'L': id += 21; break;
               case 'm': case 'M': id += 22; break;
               case 'n': case 'N': id += 23; break;
+ M  O7 }5 Q. Q  R               case 'o': case 'O': id += 24; break;
               case 'p': case ';P': id += 25; break;
$ D/ ]: e4 _' c# m) ]               case 'q': case 'Q': id += 26; break;
* v0 S1 o! p. Q+ Q' `               case 'r': case 'R': id += 27; break;
               case 's': case 'S': id += 28; break;
               case 't': case 'T': id += 29; break;
               case 'u': case 'U': id += 30; break;
% z+ J# q8 f3 ]$ U2 h2 \) f               case 'v': case 'V': id += 31; break;
               case 'w': case 'W': id += 32; break;
               case 'x': case 'X': id += 33; break;
* T/ a. ~% v. b               case 'y': case 'Y': id += 34; break;
& B/ l6 Y% D- w  D/ M$ B, i               case 'z': case 'Z': id += 35; break;
* s; G1 e/ B; d( W6 o9 |               default : id /= 40 ;
0 a. m2 W& R. x           }
" _5 b, \+ S$ B5 j1 o- Y3 ]       }
       if (id > 268435455) id %= 268435456;

6 `# U8 P# }$ v& P. Z+ n4 Z//        if ( al1 == 0x58 )
# t, G7 W1 {! t* R2 c" U& _+ C) A7 W           printf ( "i=%d ID=%d al=%x,%x\n" , i , id , al , al1 ) ;
8 l7 L& W" z/ Z' X  b( p- b   }
   getch () ;
: L* g7 C/ V) E+ X1 r   return 0;
" W0 v7 B5 A) g) M- @: |% |}