Раскрытие тайны USB-устройств: как узнать производителя и модель по VID и PID в Windows

Delphi , ОС и Железо , Windows

Введение

Вопрос о получении информации о производителе и модели USB-устройства по его Vendor ID (VID) и Product ID (PID) является актуальным для разработчиков программного обеспечения, особенно в контексте работы с устройствами в операционной системе Windows. В данной статье мы рассмотрим, как можно программно получить эти данные, используя примеры на языке Object Pascal, который часто используется в среде разработки Delphi.

Основная часть

Понимание VID и PID

VID и PID являются уникальными идентификаторами, присвоенными каждому USB-устройству. VID определяет производителя устройства, а PID — конкретную модель. Эти идентификаторы используются для идентификации устройств в операционных системах, включая Windows.

Использование реестра Windows

Один из способов получения информации о производителе и модели устройства — использование реестра Windows. Однако, как указано в вопросе, информация может быть не всегда доступна в стандартных разделах реестра, таких как HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Enum\USB.

Программное получение информации

Для программного получения данных о USB-устройствах можно использовать Win32 API функции, такие как SetupDiGetDeviceInterfaceDetail и SetupDiEnumDeviceInterfaces. Эти функции позволяют перечислить устройства и получить информацию о них, включая производителя и модель.

Пример кода на Object Pascal

uses
  SetupAPI;

function GetDeviceFriendlyName(DeviceID: TSetupDiDeviceInterfaceData; out FriendlyName: string): Boolean;
var
  DeviceDesc: PChar;
  RequiredSize: DWORD;
begin
  // Получение размера необходимой памяти для строки
  if SetupDiGetDeviceInterfaceDetailW(0, DeviceID, nil, 0, RequiredSize, nil) then
    Exit(False);

  SetLength(DeviceDesc, RequiredSize);

  // Получение строки с дескриптором устройства
  if not SetupDiGetDeviceInterfaceDetailW(0, DeviceID, DeviceDesc, RequiredSize, nil, nil) then
    Exit(False);

  // Извлечение дружелюбного имени устройства из дескриптора
  FriendlyName := PChar(DeviceDesc + StrLen(DeviceDesc) - StrLen('\\#\\'));

  if FriendlyName[0] = '#' then
    FriendlyName := Copy(FriendlyName, 2, Length(FriendlyName) - 3);
end;

var
  DeviceInterfaceData: TSetupDiDeviceInterfaceData;
  DeviceList: array of TSetupDiDeviceInterfaceDetail;
  i, j: Integer;
  DeviceID, FriendlyName: string;
begin
  // Инициализация данных для перебора устройств
  DeviceInterfaceData.cbSize := SizeOf(TSetupDiDeviceInterfaceData);
  DeviceInterfaceData.InterfaceClassGuid := IID_IClass_Installer;

  // Перебор устройств
  if SetupDiEnumDeviceInterfaces(0, 0, DeviceInterfaceData.InterfaceClassGuid, 0, DeviceInterfaceData) then
  begin
    // Предполагаем, что у нас есть достаточный буфер для деталей устройства
    SetLength(DeviceList, 1, SizeOf(TSetupDiDeviceInterfaceDetail));
    DeviceList[0].cbSize := SizeOf(TSetupDiDeviceInterfaceDetail);

    // Получение деталей устройства
    if SetupDiGetDeviceInterfaceDetail(0, DeviceInterfaceData, DeviceList[0], SizeOf(DeviceList), nil, nil) then
    begin
      // Получение DeviceID
      DeviceID := DeviceList[0].DevicePath;
      // Обрезание начальной части пути
      DeviceID := DeviceID.Substring(DeviceID.Length - DeviceID.LastDelimiter(0, '\'));
      // Обработка DeviceID
      if DeviceID.StartsWith('\Device\') then
      begin
        // Получение дружелюбного имени устройства
        if GetDeviceFriendlyName(DeviceInterfaceData, FriendlyName) then
        begin
          // Вывод дружелюбного имени
          writeln(FriendlyName);
        end;
      end;
    end;
    // Обработка всех найденных устройств
    for i := 0 to GetNumberOfDevices() - 1 do
    begin
      if SetupDiEnumDeviceInterfaces(0, 0, DeviceInterfaceData.InterfaceClassGuid, i, DeviceInterfaceData) then
      begin
        if SetupDiGetDeviceInterfaceDetail(0, DeviceInterfaceData, @DeviceList[0], SizeOf(DeviceList), nil, nil) then
        begin
          // Обработка каждого устройства в цикле for j
          // Это примерный код, здесь должна быть логика для поиска нужного PID и VID
          // Найти PID и VID можно, например, с помощью сравнения с известной базой данных
        end
        // Программа для получения PID и VID, и сопоставления их с их описаниями
        // Сюда вы можете интегрировать дополнительные API, например, PnPUtil.dll для получения дополнительных инфо
      end;
    end;
  end;
end;

Этот пример демонстрирует базовый способ перебора устройств и получения их дружелюбных имен. Для сопоставления PID и VID с описанием производителя и модели потребуется дополнительно интегрировать информацию из базы данных USB-производителей.

Подтвержденный ответ

Используя приведенный пример кода, разработчики могут программно получать информацию о USB-устройствах, аналогичную той, что отображается в Диспетчере устройств Windows, избегая необходимости поддерживать собственную базу данных.

Заключение

В данной статье мы рассмотрели, как можно программно получить информацию о производителе и модели USB-устройства по его VID и PID в операционной системе Windows, используя Win32 API и примеры кода на Object Pascal для среды разработки Delphi.

Примечание

Статья не содержит полный код для решения задачи полностью, так как требуется интеграция с базой данных USB-идентификаторов, что может быть реализовано с использованием внешних источников данных, таких как сайт http://www.linux-usb.org/usb.ids, однако использование внешних источников противоречит условиям задачи о создании устойчивого решения, не требующего постоянного обслуживания. Вместо этого, необходимо использовать специализированные библиотеки или базы данных, которые могут быть интегрированы в ваше приложение один раз и затем обновляться реже.

Создано по материалам из источника по ссылке.

В статье рассматривается программный способ получения информации о производителе и модели USB-устройства по Vendor ID и Product ID в операционной системе Windows с использованием примера кода на Object Pascal для разработчиков, исполь

Комментарии и вопросы

Получайте свежие новости и обновления по Object Pascal, Delphi и Lazarus прямо в свой смартфон. Подпишитесь на наш Telegram-канал delphi_kansoftware и будьте в курсе последних тенденций в разработке под Linux, Windows, Android и iOS

:: Главная :: Windows ::