// IOCTL控制码
#define IOCTL_STORAGE_QUERY_PROPERTY   CTL_CODE(IOCTL_STORAGE_BASE, 0x0500, METHOD_BUFFERED, FILE_ANY_ACCESS)
// 存储设备的总线类型
typedef enum _STORAGE_BUS_TYPE {BusTypeUnknown = 0x00,BusTypeScsi,BusTypeAtapi,BusTypeAta,BusType1394,BusTypeSsa,BusTypeFibre,BusTypeUsb,BusTypeRAID,BusTypeMaxReserved = 0x7F
} STORAGE_BUS_TYPE, *PSTORAGE_BUS_TYPE;// 查询存储设备属性的类型
typedef enum _STORAGE_QUERY_TYPE {PropertyStandardQuery = 0,          // 读取描述PropertyExistsQuery,                // 测试是否支持PropertyMaskQuery,                  // 读取指定的描述PropertyQueryMaxDefined             // 验证数据
} STORAGE_QUERY_TYPE, *PSTORAGE_QUERY_TYPE;// 查询存储设备还是适配器属性
typedef enum _STORAGE_PROPERTY_ID {StorageDeviceProperty = 0,          // 查询设备属性StorageAdapterProperty              // 查询适配器属性
} STORAGE_PROPERTY_ID, *PSTORAGE_PROPERTY_ID;// 查询属性输入的数据结构
typedef struct _STORAGE_PROPERTY_QUERY {STORAGE_PROPERTY_ID PropertyId;     // 设备/适配器STORAGE_QUERY_TYPE QueryType;       // 查询类型 UCHAR AdditionalParameters[1];      // 额外的数据(仅定义了象征性的1个字节)
} STORAGE_PROPERTY_QUERY, *PSTORAGE_PROPERTY_QUERY;// 查询属性输出的数据结构
typedef struct _STORAGE_DEVICE_DESCRIPTOR {ULONG Version;                    // 版本ULONG Size;                       // 结构大小UCHAR DeviceType;                 // 设备类型UCHAR DeviceTypeModifier;         // SCSI-2额外的设备类型BOOLEAN RemovableMedia;           // 是否可移动BOOLEAN CommandQueueing;          // 是否支持命令队列ULONG VendorIdOffset;             // 厂家设定值的偏移ULONG ProductIdOffset;            // 产品ID的偏移ULONG ProductRevisionOffset;      // 产品版本的偏移ULONG SerialNumberOffset;         // 序列号的偏移STORAGE_BUS_TYPE BusType;         // 总线类型ULONG RawPropertiesLength;        // 额外的属性数据长度UCHAR RawDeviceProperties[1];     // 额外的属性数据(仅定义了象征性的1个字节)
} STORAGE_DEVICE_DESCRIPTOR, *PSTORAGE_DEVICE_DESCRIPTOR;// 取设备属性信息
// hDevice -- 设备句柄
// pDevDesc -- 输出的设备描述和属性信息缓冲区指针(包含连接在一起的两部分)
BOOL GetDriveProperty(HANDLE hDevice, PSTORAGE_DEVICE_DESCRIPTOR pDevDesc)
{STORAGE_PROPERTY_QUERY Query;    // 查询输入参数DWORD dwOutBytes;                // IOCTL输出数据长度BOOL bResult;                    // IOCTL返回值// 指定查询方式Query.PropertyId = StorageDeviceProperty;Query.QueryType = PropertyStandardQuery;// 用IOCTL_STORAGE_QUERY_PROPERTY取设备属性信息bResult = ::DeviceIoControl(hDevice, // 设备句柄IOCTL_STORAGE_QUERY_PROPERTY,    // 取设备属性信息&Query, sizeof(STORAGE_PROPERTY_QUERY),    // 输入数据缓冲区pDevDesc, pDevDesc->Size,        // 输出数据缓冲区&dwOutBytes,                     // 输出数据长度(LPOVERLAPPED)NULL);             // 用同步I/O    return bResult;
}

// 安装驱动并启动服务
// lpszDriverPath:  驱动程序路径
// lpszServiceName: 服务名
BOOL StartDriver(LPCTSTR lpszDriverPath, LPCTSTR lpszServiceName)
{SC_HANDLE hSCManager;        // 服务控制管理器句柄SC_HANDLE hService;          // 服务句柄DWORD dwLastError;           // 错误码BOOL bResult = FALSE;        // 返回值// 打开服务控制管理器hSCManager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);if (hSCManager){// 创建服务hService = CreateService(hSCManager,lpszServiceName,lpszServiceName,SERVICE_ALL_ACCESS,SERVICE_KERNEL_DRIVER,SERVICE_DEMAND_START,SERVICE_ERROR_NORMAL,lpszDriverPath,NULL,NULL,NULL,NULL,NULL);if (hService == NULL){if (::GetLastError() == ERROR_SERVICE_EXISTS){hService = ::OpenService(hSCManager, lpszServiceName, SERVICE_ALL_ACCESS);}}if (hService){// 启动服务bResult = StartService(hService, 0, NULL);// 关闭服务句柄CloseServiceHandle(hService);}// 关闭服务控制管理器句柄CloseServiceHandle(hSCManager);}return bResult;
}// 停止服务并卸下驱动
// lpszServiceName: 服务名
BOOL StopDriver(LPCTSTR lpszServiceName)
{SC_HANDLE hSCManager;        // 服务控制管理器句柄SC_HANDLE hService;          // 服务句柄BOOL bResult;                // 返回值SERVICE_STATUS ServiceStatus;bResult = FALSE;// 打开服务控制管理器hSCManager = OpenSCManager(NULL, NULL, SC_MANAGER_ALL_ACCESS);if (hSCManager){// 打开服务hService = OpenService(hSCManager, lpszServiceName, SERVICE_ALL_ACCESS);if (hService){// 停止服务bResult = ControlService(hService, SERVICE_CONTROL_STOP, &ServiceStatus);// 删除服务bResult = bResult && DeleteService(hService);// 关闭服务句柄CloseServiceHandle(hService);}// 关闭服务控制管理器句柄CloseServiceHandle(hSCManager);}return bResult;
}

// 全局的设备句柄
HANDLE hMyPort;// 打开设备
// lpszDevicePath: 设备的路径
HANDLE OpenDevice(LPCTSTR lpszDevicePath)
{HANDLE hDevice;// 打开设备hDevice = ::CreateFile(lpszDevicePath,    // 设备路径GENERIC_READ | GENERIC_WRITE,        // 读写方式FILE_SHARE_READ | FILE_SHARE_WRITE,  // 共享方式NULL,                    // 默认的安全描述符OPEN_EXISTING,           // 创建方式0,                       // 不需设置文件属性NULL);                   // 不需参照模板文件return hDevice;
}// 打开端口驱动
BOOL OpenMyPort()
{BOOL bResult;// 设备名为"MyPort"，驱动程序位于Windows的"system32\drivers"目录中bResult = StartDriver("system32\\drivers\\MyPort.sys", "MyPort");// 设备路径为"\\.\MyPort"if (bResult){hMyPort = OpenDevice("\\\\.\\MyPort");}return (bResult && (hMyPort != INVALID_HANDLE_VALUE));
}// 关闭端口驱动
BOOL CloseMyPort()
{return (CloseHandle(hMyPort) && StopDriver("MyPort"));
}// 从指定端口读一个字节
// port: 端口
BYTE ReadPortByte(WORD port)
{DWORD buf[2];            // 输入输出缓冲区            DWORD dwOutBytes;        // IOCTL输出数据长度buf[0] = port;           // 第一个DWORD是端口
//  buf[1] = 0;              // 第二个DWORD是数据// 用IOCTL_MYPORT_READ_BYTE读端口::DeviceIoControl(hMyPort,   // 设备句柄IOCTL_MYPORT_READ_BYTE,  // 取设备属性信息buf, sizeof(buf),        // 输入数据缓冲区buf, sizeof(buf),        // 输出数据缓冲区&dwOutBytes,             // 输出数据长度(LPOVERLAPPED)NULL);     // 用同步I/O    return (BYTE)buf[1];
}
// 将一个字节写到指定端口
// port: 端口
// data: 字节数据
void WritePortByte(WORD port, BYTE data)
{DWORD buf[2];            // 输入输出缓冲区            DWORD dwOutBytes;        // IOCTL输出数据长度buf[0] = port;           // 第一个DWORD是端口buf[1] = data;           // 第二个DWORD是数据// 用IOCTL_MYPORT_WRITE_BYTE写端口::DeviceIoControl(hMyPort,   // 设备句柄IOCTL_MYPORT_WRITE_BYTE, // 取设备属性信息buf, sizeof(buf),        // 输入数据缓冲区buf, sizeof(buf),        // 输出数据缓冲区&dwOutBytes,             // 输出数据长度(LPOVERLAPPED)NULL);     // 用同步I/O
}

// 0x70是CMOS索引端口(只写)
// 0x71是CMOS数据端口
BYTE ReadCmos(BYTE index)
{BYTE data;::WritePortByte(0x70, index);data = ::ReadPortByte(0x71);return data;
}// 0x61是speaker控制端口
// 0x43是8253/8254定时器控制端口
// 0x42是8253/8254定时器通道2的端口
void Sound(DWORD freq)
{BYTE data;if ((freq >= 20) && (freq <= 20000)){freq = 1193181 / freq;data = ::ReadPortByte(0x61);if ((data & 3) == 0){::WritePortByte(0x61, data | 3);::WritePortByte(0x43, 0xb6);}::WritePortByte(0x42, (BYTE)(freq % 256));::WritePortByte(0x42, (BYTE)(freq / 256));}
}void NoSound(void)
{BYTE data;data = ::ReadPortByte(0x61);::WritePortByte(0x61, data & 0xfc);
}

// 以下读出CMOS 128个字节for (int i = 0; i < 128; i++){BYTE data = ::ReadCmos(i);... ...}// 以下用C调演奏“多-来-米”// 1 = 262 Hz::Sound(262);::Sleep(200);::NoSound();// 2 = 288 Hz::Sound(288);::Sleep(200);::NoSound();// 3 = 320 Hz::Sound(320);::Sleep(200);::NoSound();