InstallRootEnumeratedDriver(argv[3], // HardwareID=mdmgen144
	argv[1], // FileName = C:\Windows\inf\mdmgen.inf
	argv[2], // Modem Port =COM25 (AttachedTo)
	&RebootRequired)


BOOL
InstallRootEnumeratedDriver(IN  LPTSTR HardwareId,
    IN  LPTSTR INFFile,
    IN	LPTSTR MdmPort,
    OUT PBOOL  RebootRequired  OPTIONAL
    )
{
    HDEVINFO DeviceInfoSet = 0;
    SP_DEVINFO_DATA DeviceInfoData;
    GUID	ClassGUID;
    TCHAR	ClassName[MAX_CLASS_NAME_LEN];
     
    // Use the INF File to extract the Class GUID. 
    SetupDiGetINFClass(INFFile,&ClassGUID,ClassName,sizeof(ClassName),0)
    // Create the container for the to-be-created Device Information Element.
    DeviceInfoSet = SetupDiCreateDeviceInfoList(&ClassGUID,0);
    // Now create the element. 
    // Use the Class GUID and Name from the INF file.
    DeviceInfoData.cbSize = sizeof(SP_DEVINFO_DATA);
    SetupDiCreateDeviceInfo(DeviceInfoSet,
			ClassName,
			&ClassGUID,
			NULL,
			0,
			DICD_GENERATE_ID,
			&DeviceInfoData)
     // Add the HardwareID to the Device's HardwareID property.
     SetupDiSetDeviceRegistryProperty(DeviceInfoSet,
			&DeviceInfoData,
			SPDRP_HARDWAREID,
			(LPBYTE)HardwareId,
			(lstrlen(HardwareId)+1+1)*sizeof(TCHAR))
     RegisterModem(DeviceInfoSet, &DeviceInfoData, MdmPort)
....
BOOL
RegisterModem(
    IN  HDEVINFO          hdi,
    IN  PSP_DEVINFO_DATA  pdevData,
    IN  LPCTSTR           pszPort)
{
...
  SetupDiRegisterDeviceInfo(hdi, pdevData, 0, NULL, NULL, NULL);
  hKeyDev = SetupDiCreateDevRegKey(hdi, pdevData, DICS_FLAG_GLOBAL, 0, DIREG_DRV, NULL, NULL);
  RegSetValueEx (hKeyDev, c_szAttachedTo, 0, REG_SZ,
		(PBYTE)pszPort, (lstrlen(pszPort)+1)*sizeof(TCHAR));
  SetupDiRegisterDeviceInfo(hdi, pdevData, 0, NULL, NULL, NULL) 
...

     if (!UpdateDriverForPlugAndPlayDevices(0, // No Window Handle
            argv[3], // Hardware ID=mdmgen144
            argv[1], // FileName=C:\Windows\inf\mdmgen.inf
            INSTALLFLAG_FORCE,
            &RebootRequired))

devcon update C:\Windows\inf\mdmgen.inf mdmgen144

  ' Install the Driver
  ' http://support.microsoft.com/kb/889763/ru
  ' первая попытка (InstallSelectedDriver) - устанавливаем драйвер только для данного девайса
  ' в расчете на то что сам драйвер уже установлен в системе
  
  ' InstallSelectedDriver works on the selected device and on the
  ' selected driver on that device. Therefore, set this device as the
  ' selected one in the device information list.
  bResult = SetupDiSetSelectedDevice(hDeviceInfoSet, m_DeviceInfoData)
  If bResult = False Then
    Debug.Print "SetupDiSetSelectedDevice Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    GoTo ForceInstall
  End If
  
  ' Build up a Driver Information List.
  ' Build a compatible driver list, meaning only include the
  ' driver nodes that match one of the hardware or compatible Ids of
  ' the device.
  bResult = SetupDiBuildDriverInfoList(hDeviceInfoSet, m_DeviceInfoData, SPDIT_COMPATDRIVER)
  If bResult = False Then
    Debug.Print "SetupDiBuildDriverInfoList Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    GoTo ForceInstall
  End If
  
  ' Pick the best driver in the list of drivers that was built.
  bResult = SetupDiCallClassInstaller(DIF_SELECTBESTCOMPATDRV, hDeviceInfoSet, m_DeviceInfoData)
  If bResult = False Then
    Debug.Print "SetupDiCallClassInstaller Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    GoTo ForceInstall
  End If
  
  ' Get the selected driver node.
  ' Note: If this list does not contain any drivers, this call
  ' will fail with ERROR_NO_DRIVER_SELECTED.
  m_DriverInfoData.cbSize = LenB(m_DriverInfoData)
  bResult = SetupDiGetSelectedDriver(hDeviceInfoSet, m_DeviceInfoData, m_DriverInfoData)
  If bResult = False Then
    Debug.Print "SetupDiGetSelectedDriver Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    GoTo ForceInstall
  End If
  
  Dim dwRebootRequired As Long
  bResult = InstallSelectedDriver(0, hDeviceInfoSet, 0&, 0&, dwRebootRequired)
  If bResult = False Then
    Debug.Print "InstallSelectedDriver Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    GoTo ForceInstall
  Else
    If dwRebootRequired = DI_NEEDREBOOT Then RebootRequired = True
    InstallModem = True
    Debug.Print "InstallSelectedDriver OK."
    GoTo Cleanup
  End If
    
ForceInstall:
  'если драйвер еще не установлен (например при первой установке такого девайса)
  'то используем UpdateDriverForPlugAndPlayDevices с явным указанием INF-файла
  'избегаем использовать этот метод, т.к. он обновляет драйвера для всех
  'ранее установленных девайсов с таким же Hardware_ID, в чем нет необходимости
  bResult = UpdateDriverForPlugAndPlayDevices(0&, Hardware_ID, INF_File, _
   INSTALLFLAG_FORCE, RebootRequired)
  If bResult = False Then
    Debug.Print "UpdateDriverForPlugAndPlayDevices Error " & RaiseAPIErrorByNumber(Err.LastDllError)
    bRemove = True
    GoTo Cleanup
  Else
    InstallModem = True
    Debug.Print "UpdateDriverForPlugAndPlayDevices OK."
    GoTo Cleanup
  End If

//
// The following is the prototype for the newdev!InstallSelectedDriver API.
//
typedef
BOOL
(*PINSTALLSELECTEDDRIVER)(
  HWND hwndParent,
  HDEVINFO DeviceInfoSet,
  LPCWSTR Reserved,
  BOOL Backup,
  PDWORD pReboot    
  );

...

    TCHAR NewDevPath[MAX_PATH];
    HMODULE hNewDev = NULL;
    PINSTALLSELECTEDDRIVER pInstallSelectedDriver = NULL;
    DWORD dwRebootRequired;

...
		//
		// Install the Driver.
		//

    // http://support.microsoft.com/kb/889763/ru
    // первая попытка (InstallSelectedDriver) - устанавливаем драйвер только для данного девайса
    // в DeviceInstallParams указываем устанавливать драйвер строго из заданного INF

    // InstallSelectedDriver works on the selected device and on the
    // selected driver on that device. Therefore, set this device as the
    // selected one in the device information list.
    if (!SetupDiSetSelectedDevice(DeviceInfoSet, &DeviceInfoData))
    {
      DisplayError(_T("SetupDiSetSelectedDevice"));
      goto ForceInstall;
    }

    //=====================================
    // You now have a SP_DEVINFO_DATA structure
    // representing your device.  Next, get a SP_DRVINFO_DATA
    // structure to install on that device.
    DeviceInstallParams.cbSize = sizeof(DeviceInstallParams);
    if (!SetupDiGetDeviceInstallParams(DeviceInfoSet,
                                       &DeviceInfoData,
                                       &DeviceInstallParams)) {
      DisplayError(_T("SetupDiGetDeviceInstallParams"));
      goto ForceInstall;
    }

    // Only build the driver list out of the passed-in INF.  
    // To do this, set the DI_ENUMSINGLEINF flag, and copy the
    // full path of the INF into the DriverPath field of the 
    // DeviceInstallParams structure.
    DeviceInstallParams.Flags |= DI_ENUMSINGLEINF;
    if (FAILED(StringCchCopy(DeviceInstallParams.DriverPath,
                             SIZECHARS(DeviceInstallParams.DriverPath),
                             INFFile))) {
      // The file path that was passed in was too big.
      SetLastError(ERROR_INVALID_PARAMETER);
      DisplayError(_T("StringCchCopy"));
      goto ForceInstall;
    }

    // Set the DI_FLAGSEX_ALLOWEXCLUDEDDRVS flag so that you can use
    // this INF even if it is marked as ExcludeFromSelect.
    // ExcludeFromSelect means do not show the INF in the legacy Add   
    // Hardware Wizard.
    DeviceInstallParams.FlagsEx |= DI_FLAGSEX_ALLOWEXCLUDEDDRVS;
    if (!SetupDiSetDeviceInstallParams(DeviceInfoSet,
                                       &DeviceInfoData,
                                       &DeviceInstallParams)) {
      DisplayError(_T("SetupDiSetDeviceInstallParams"));
      goto ForceInstall;
    }
    //=====================================

    // Build up a Driver Information List.
    // Build a compatible driver list, meaning only include the
    // driver nodes that match one of the hardware or compatible Ids of
    // the device.
    if (!SetupDiBuildDriverInfoList(DeviceInfoSet,
                                    &DeviceInfoData,
                                    SPDIT_COMPATDRIVER)) {
      DisplayError(_T("SetupDiBuildDriverInfoList"));
      goto ForceInstall;
    }

    // Pick the best driver in the list of drivers that was built.
    if (!SetupDiCallClassInstaller(DIF_SELECTBESTCOMPATDRV,
                                   DeviceInfoSet,
                                   &DeviceInfoData)) {
      DisplayError(_T("SetupDiCallClassInstaller"));
      goto ForceInstall;
    }
  
    // Get the selected driver node.
    // Note: If this list does not contain any drivers, this call
    // will fail with ERROR_NO_DRIVER_SELECTED.
    DriverInfoData.cbSize = sizeof(DriverInfoData);
    if (!SetupDiGetSelectedDriver(DeviceInfoSet,
                                  &DeviceInfoData,
                                  &DriverInfoData)) {
      DisplayError(_T("SetupDiGetSelectedDriver"));
      goto ForceInstall;
    }

    // At this point, you have a valid SP_DEVINFO_DATA structure and a
    // valid SP_DRVINFO_DATA structure.
    // Load newdev.dll, GetProcAddress(InstallSelectedDriver), and call     
    // that API.
    //
    // To be more secure, make sure to load the newdev.dll file from the
    // system 32 directory.
    if (GetSystemDirectory(NewDevPath, SIZECHARS(NewDevPath)) == 0) {
      DisplayError(_T("GetSystemDirectory"));
      goto ForceInstall;
    }

    if (FAILED(StringCchCat(NewDevPath, SIZECHARS(NewDevPath), TEXT("\\NEWDEV.DLL")))) {
      SetLastError(ERROR_INSUFFICIENT_BUFFER);
      DisplayError(_T("StringCchCat"));
      goto ForceInstall;
    }

    hNewDev = LoadLibrary(NewDevPath);
    if (!hNewDev) {
      DisplayError(_T("LoadLibrary"));
      goto ForceInstall;
    }

    pInstallSelectedDriver = (PINSTALLSELECTEDDRIVER)GetProcAddress(hNewDev, "InstallSelectedDriver");
    if (!pInstallSelectedDriver) {
      DisplayError(_T("GetProcAddress"));
      goto ForceInstall;
    }

    // Call pInstallSelectedDriver to install the selected driver on
    // the selected device.
    if (!pInstallSelectedDriver(NULL,
                           DeviceInfoSet,
                           NULL,
                           FALSE,
                           &dwRebootRequired)) {
      DisplayError(_T("InstallSelectedDriver"));
      goto ForceInstall;
    } else {
      if (dwRebootRequired & (DI_NEEDREBOOT | DI_NEEDRESTART)) {
        // A reboot is required.
        * RebootRequired = TRUE;
      }
			break;
    }

ForceInstall:
    //по сути этот код не нужен
    //используем UpdateDriverForPlugAndPlayDevices с явным указанием INF-файла
    //избегаем использовать этот метод, т.к. он обновляет драйвера для всех
    //ранее установленных девайсов с таким же Hardware_ID, в чем нет необходимости
    //чисто для подстраховки, раз уж сделано
		if (!UpdateDriverForPlugAndPlayDevices(0,
			HardwareId,
			INFFile,
			INSTALLFLAG_FORCE,
			RebootRequired))
		{
			DisplayError(_T("UpdateDriverForPlugAndPlayDevices"));
			Remove = TRUE;
    }
		break;

	} while (FALSE);

 
  if(Remove) {

		//Delete Device Instance that was registered using SetupDiRegisterDeviceInfo
		// May through an error if Device not registered -- who cares??

		SetupDiCallClassInstaller(
       	     DIF_REMOVE,
       	     DeviceInfoSet,
	            &DeviceInfoData);
	}

    //
    //  Cleanup.
    //    
    if (hNewDev) {
      FreeLibrary(hNewDev);
      hNewDev = NULL;
    }
...

        hKeyDev = SetupDiOpenDevRegKey(hDeviceInfoSet, m_DeviceInfoData, _
         DICS_FLAG_GLOBAL, 0&, DIREG_DRV, KEY_QUERY_VALUE)
...
        strAttachedTo = GetRegValue(hKeyDev, "", "AttachedTo", "", False)

  hKeyDev = SetupDiOpenDevRegKey(hDeviceInfoSet, m_DeviceInfoData, _
   DICS_FLAG_GLOBAL, 0&, DIREG_DRV, KEY_ALL_ACCESS)
  If (hKeyDev = INVALID_HANDLE_VALUE) Then 'This call fails....
    hKeyDev = SetupDiCreateDevRegKey(hDeviceInfoSet, m_DeviceInfoData, DICS_FLAG_GLOBAL, 0, DIREG_DRV, 0, vbNullString)
...
    End If
  End If
  dwRet = RegSetValueEx(hKeyDev, "AttachedTo", 0&, REG_SZ, COM_Port, CLng(Len(COM_Port) + 1))
...

mdminst.exe c:\windows\inf\mdmgen COM35 mdmgen144

	TCHAR const c_szAttachedTo[] = _T("AttachedTo");
...
	hKeyDev = SetupDiOpenDevRegKey(hdi, pdevData, DICS_FLAG_GLOBAL, 0, DIREG_DRV, KEY_ALL_ACCESS);	//// This call fails....

	if( (INVALID_HANDLE_VALUE == hKeyDev) && ( ERROR_KEY_DOES_NOT_EXIST == GetLastError()) )
	{
		hKeyDev = SetupDiCreateDevRegKey(hdi, pdevData, DICS_FLAG_GLOBAL, 0, DIREG_DRV, NULL, NULL);

		if( INVALID_HANDLE_VALUE == hKeyDev )
		{
			DisplayError(_T("SetupDi Open+Create DevRegKey failed: "));
			return FALSE;
		}
	}
	else {
			DisplayError(_T("Can not open DriverKey: "));
			return FALSE;
	}

    if (ERROR_SUCCESS != (dwRet = RegSetValueEx (hKeyDev, c_szAttachedTo, 0, REG_SZ,
		(PBYTE)pszPort, (lstrlen(pszPort)+1)*sizeof(TCHAR))))
	{
			DisplayError(_T("RegSetValueEx :"));

            SetLastError (dwRet);
            bRet = FALSE;
	}
	RegCloseKey (hKeyDev);

Public Declare Function IoGetDeviceObjectPointer Lib "Ntoskrnl.exe" _
 (ByVal ObjectName As String, ByVal DesiredAccess As Long, _
 ByRef pFileObject As Long, ByRef pDeviceObject As Long) As Long