在Win9x/NT下获取硬盘物理序列号

　　本文代码经ccrun(老妖)在Win2k下试验成功.

#include

#include

#pragma inline

//---------------------------------------------------------------------------

// IDE NT/2000/XP专用变量

#define GETVERSIONOUTPARAMS GETVERSIONINPARAMS

#define DFP_GET_VERSION SMART_GET_VERSION

#define DFP_SEND_DRIVE_COMMAND SMART_SEND_DRIVE_COMMAND

#define DFP_RCV_DRIVE_DATA SMART_RCV_DRIVE_DATA

const Word IDE_ATAPI_IDENTIFY = 0xA1; // 读取ATAPI设备的命令

const WORD IDE_ATA_IDENTIFY = 0xEC; // 读取ATA设备的命令

const int MAX_IDE_DRIVES = 4;

// SCSI专用变量

const DWORD FILE_DEVICE_SCSI = 0x0000001B;

const DWORD IOCTL_SCSI_MINIPORT_IDENTIFY = ((FILE_DEVICE_SCSI << 16) + 0x0501);

const DWORD IOCTL_SCSI_MINIPORT = 0x0004D008; // see NTDDSCSI.H for definition

const DWORD SENDIDLENGTH = sizeof(SENDCMDOUTPARAMS) + IDENTIFY_BUFFER_SIZE;

typedef strUCt _SRB_IO_CONTROL

{

ULONG HeaderLength;

UCHAR Signature[8];

ULONG Timeout;

ULONG ControlCode;

ULONG ReturnCode;

ULONG Length;

}SRB_IO_CONTROL, *PSRB_IO_CONTROL;

// 读取的主函数

void __fastcall ReadPhysicalDrive(TStrings *pSerList, TStrings *pModeList);

// 辅助函数

char *__fastcall ConvertToString(DWORD dwDiskData[256], int nFirstIndex, int nLastIndex);

// NT/2000/XP函数

void __fastcall ReadPhysicalDriveOnNT(TStrings *pSerList, TStrings *pModeList);

bool __fastcall DoIdentify(HANDLE hPhysicalDriveIOCTL, PSENDCMDINPARAMS pSCIP,

PSENDCMDOUTPARAMS pSCOP, BYTE BTIDCmd,

BYTE btDriveNum, PDWORD lpcbBYTEsReturned);

// Windows 9X函数

void __fastcall ReadPhysicalDriveOnW9X(TStrings *pSerList, TStrings *pModeList);

void __fastcall ReadPhysicalDriveOnW9X_Ring0(bool IsFirst, WORD BaseAddress,

BYTE MoS, bool &IsIDEExist, bool &IsDiskExist, WORD *OutData);

// SCSI读取函数(for NT/2000/XP)

String __fastcall ReadIDEDriveAsScsiDriveOnNT();

//---------------------------------------------------------------------------

// ReadPhysicalDrive

void __fastcall ReadPhysicalDrive(TStrings *pSerList, TStrings *pModeList)

{

switch(Win32Platform)

{

case VER_PLATFORM_WIN32_WINDOWS:

ReadPhysicalDriveOnW9X(pSerList, pModeList);

break;

case VER_PLATFORM_WIN32_NT:

ReadPhysicalDriveOnNT(pSerList, pModeList);

break;

default:

break;

}

}

//---------------------------------------------------------------------------

// ConvertToString

char *__fastcall ConvertToString(DWORD dwDiskData[256], int nFirstIndex, int nLastIndex)

{

static char szResBuf[1024];

int nIndex = 0;

int nPosition = 0;

// Each integer has two characters stored in it backwards

for(nIndex = nFirstIndex; nIndex <= nLastIndex; nIndex++)

{

// Get high BYTE for 1st character

szResBuf[nPosition] = (char)(dwDiskData[nIndex] / 256);

nPosition++;

// Get low BYTE for 2nd character

szResBuf[nPosition] = (char)(dwDiskData[nIndex] % 256);

nPosition++;

}

// End the string

szResBuf[nPosition] = '\0';

// Cut off the trailing blanks

for(nIndex = nPosition - 1; nIndex > 0 && ' ' == szResBuf[nIndex]; nIndex--)

szResBuf[nIndex] = '\0';

return szResBuf;

}

//---------------------------------------------------------------------------

// Winndows NT4/2000/XP 代码

//---------------------------------------------------------------------------

// ReadPhysicalDriveOnNT

void __fastcall ReadPhysicalDriveOnNT(TStrings *pSerList, TStrings *pModeList)

{

// 输出参数

BYTE btIDOutCmd[sizeof(SENDCMDOUTPARAMS) + IDENTIFY_BUFFER_SIZE - 1];

for(int nDrive=0; nDrive < MAX_IDE_DRIVES; nDrive++)

{

HANDLE hPhysicalDriveIOCTL;

char szDriveName[32];

sprintf(szDriveName, ".PhysicalDrive%d", nDrive);

hPhysicalDriveIOCTL = CreateFile(szDriveName,

GENERIC_READ GENERIC_WR99vE,

FILE_SHARE_READ FILE_SHARE_WR99vE, NULL,

OPEN_EXISTING, 0, NULL);

if(hPhysicalDriveIOCTL != INVALID_HANDLE_VALUE)

{

DWORD dwBytesReturned = 0;

GETVERSIONOUTPARAMS gvopVersionParams;

// Get the version, etc of PhysicalDrive IOCTL

ZeroMemory(&gvopVersionParams, sizeof(GETVERSIONOUTPARAMS));

if(!DeviceIoControl(hPhysicalDriveIOCTL, DFP_GET_VERSION,

&nb