[solved] Help with event notifications for IMbnPinManagerEvents interface

Inververs · July 19, 2015

Hello. I try to register event handler for for IMbnPinManagerEvents interface.

All goes well, but when event triggered i have in params strange data.

For example in OnGetPinStateComplete in $iRequestID i expect same id, but getting 0 all the time, in $pPinInfo i expect pointer to the structure, but when i fills the structure on this pointer, i have incorrect data in results, and so on...

This is a very specific API and work only whith usb modems, so if you do not have a modem, example does not work, but I hope that the skilled person will be able to find and show where the error in the code.

I hope for your help. Thanks.

https://msdn.microsoft.com/en-us/library/windows/desktop/dd323268(v=vs.85).aspx

#include <WinAPI.au3>
#include 'SafeArray.au3'
#Region Const
Global Const $sIID_IUnknown = "{00000000-0000-0000-C000-000000000046}"

Global Const $sIID_IMbnPinManager = '{DCBBBAB6-2005-4BBB-AAEE-338E368AF6FA}'
Global Const $dtag_IMbnPinManager = _
        'GetPinList hresult();' & _
        'GetPin hresult();' & _
        'GetPinState hresult(ulong*);' ;            /* [out] */ __RPC__out ULONG *requestID

Global Const $sIID_IMbnPinManagerEvents = '{DCBBBAB6-2006-4BBB-AAEE-338E368AF6FA}'
Global Const $dtag_IMbnPinManagerEvents = _
        'OnPinListAvailable hresult();' & _
        'OnGetPinStateComplete hresult(' & _
        'ptr;' & _                              ; /* [in] */ __RPC__in_opt  IMbnPinManager *pinManager
        'struct;' & _                           ; /* [in] */ MBN_PIN_INFO   pinInfo
        'ulong;' & _                            ; /* [in] */ ULONG          requestID
        'hresult;)' ;                             /* [in] */ HRESULT        status
Global Const $tRIID_IMbnPinManagerEvents = _WinAPI_GUIDFromString($sIID_IMbnPinManagerEvents)


Global Const $sIID_IConnectionPointContainer = '{B196B284-BAB4-101A-B69C-00AA00341D07}'
Global Const $dtag_IConnectionPointContainer = _
        'EnumConnectionPoints hresult();' & _
        'FindConnectionPoint hresult(clsid;ptr*;);'; /* [in] */ __RPC__in REFIID riid | /* [out] */ __RPC__deref_out_opt IConnectionPoint **ppCP


Global Const $sIID_IConnectionPoint = '{B196B286-BAB4-101A-B69C-00AA00341D07}'
Global Const $dtag_IConnectionPoint = _
        'GetConnectionInterface hresult();' & _
        'GetConnectionPointContainer hresult();' & _
        'Advise hresult(ptr;dword*;);' & _ ;      /* [in] */ __RPC__in_opt IUnknown *pUnkSink,  /* [out] */ __RPC__out DWORD *pdwCookie
        'Unadvise hresult(dword);' & _
        'EnumConnections hresult();'

Global Const $CLSID_MbnInterfaceManager = '{BDFEE05B-4418-11DD-90ED-001C257CCFF1}' ;MbnInterfaceManager
Global Const $sIID_IMbnInterfaceManager = '{DCBBBAB6-201B-4BBB-AAEE-338E368AF6FA}'
Global Const $dtag_IMbnInterfaceManager = _
        'GetInterface hresult();' & _
        'GetInterfaces hresult(ptr*);' ;            /* [retval][ref][out] */ __RPC__deref_out_opt SAFEARRAY * *mbnInterfaces

#EndRegion Const


;~ https://msdn.microsoft.com/en-us/library/windows/desktop/dd430416(v=vs.85).aspx
Local $oMbnInterfaceManager = ObjCreateInterface($CLSID_MbnInterfaceManager, $sIID_IMbnInterfaceManager, $dtag_IMbnInterfaceManager)
If @error Then Exit -@ScriptLineNumber

;https://msdn.microsoft.com/en-us/library/windows/desktop/dd430421%28v=vs.85%29.aspx
Local $p_mbnInterfaces
$oMbnInterfaceManager.GetInterfaces($p_mbnInterfaces)
If @error Or Not $p_mbnInterfaces Then Exit -@ScriptLineNumber

Local $iBound
SafeArrayGetUBound($p_mbnInterfaces, $iBound)
If @error Or $iBound < 0 Then Exit -@ScriptLineNumber

;Get first
Local $p_mbnInterface, $iIndex = 0
SafeArrayGetElement($p_mbnInterfaces, $iIndex, $p_mbnInterface)
If @error Or Not $p_mbnInterface Then Exit -@ScriptLineNumber

;~ https://msdn.microsoft.com/en-us/library/windows/desktop/dd323117(v=vs.85).aspx
Local $oIMbnPinManager = ObjCreateInterface($p_mbnInterface, $sIID_IMbnPinManager, $dtag_IMbnPinManager)
If @error Then Exit -@ScriptLineNumber


;Prepare Events
;~ https://msdn.microsoft.com/en-us/library/windows/desktop/dd323118(v=vs.85).aspx

;~ 1) Get an IConnectionPointContainer interface by calling QueryInterface on an IMbnInterfaceManager object.
;~ 2) Call FindConnectionPoint on the returned interface and pass IID_IMbnPinManagerEvents to riid.
;~ 3) Call Advise on the returned connection point and pass a pointer to an IUnknown interface on an object that implements IMbnPinManagerEvents to pUnk.

;1 STEP
Local $oIConnectionPointContainer = ObjCreateInterface($CLSID_MbnInterfaceManager, $sIID_IConnectionPointContainer, $dtag_IConnectionPointContainer)
If @error Then Exit -@ScriptLineNumber

;2 STEP
Local $p_IConnectionPoint
$oIConnectionPointContainer.FindConnectionPoint($tRIID_IMbnPinManagerEvents, $p_IConnectionPoint)
If @error Or Not $p_IConnectionPoint Then Exit -@ScriptLineNumber

Local $oIConnectionPoint = ObjCreateInterface($p_IConnectionPoint, $sIID_IConnectionPoint, $dtag_IConnectionPoint)
If @error Then Exit -@ScriptLineNumber

;3 STEP
;~ https://msdn.microsoft.com/en-us/library/windows/desktop/dd323119%28v=vs.85%29.aspx
Local $tIMbnPinManagerEvents
Local $oIMbnPinManagerEvents = ObjectFromTag("oIMbnPinManagerEvents_", $dtag_IMbnPinManagerEvents, $tIMbnPinManagerEvents)
If @error Then Exit -@ScriptLineNumber

Local $p_IUnknown = $oIMbnPinManagerEvents()

;~ https://msdn.microsoft.com/en-us/library/windows/desktop/ms678815(v=vs.85).aspx
Local $pdwCookie
$oIConnectionPoint.Advise($p_IUnknown, $pdwCookie)
If @error Or Not $pdwCookie Then
    ConsoleWrite('! Connection was not successfully established' & @CRLF)
    Exit -@ScriptLineNumber
EndIf

;~ 4 STEP
;~ https://msdn.microsoft.com/en-us/library/windows/desktop/dd323117%28v=vs.85%29.aspx
;Call GetPinState and wait events
Local $iRequestID
$oIMbnPinManager.GetPinState($iRequestID)
If @error Or Not $iRequestID Then Exit -@ScriptLineNumber

ConsoleWrite('> Wait events for request: ' & $iRequestID & @CRLF)

AdlibRegister('_exit', 5000)

While 1
    Sleep(250)
WEnd

;Console Output


;~ QueryInterface {0000013D-0000-0000-C000-000000000046}    ;IClientSecurity
;~ QueryInterface {0000001B-0000-0000-C000-000000000046}    ;?
;~ QueryInterface {00000003-0000-0000-C000-000000000046}    ;IMarshal
;~ > Wait events for request: 152
;~ QueryInterface {0000001B-0000-0000-C000-000000000046}    ;?
;~ QueryInterface {00000018-0000-0000-C000-000000000046}    ;IStdMarshalInfo
;~ QueryInterface {00000019-0000-0000-C000-000000000046}    ;IExternalConnection
;~ QueryInterface {4C1E39E1-E3E3-4296-AA86-EC938D896E92}    ;?
;~ QueryInterface {1C733A30-2A1C-11CE-ADE5-00AA0044773D}    ;ICallFactory

;~ + OnGetPinStateComplete event            ;Event fired
;~ > $pIMbnPinManager: 0x00BB9684           ;WHY THE SAME?
;~ > $pPinInfo: 0x00BB9684                  ;WHY THE SAME?
;~ > $iRequestID: 0                         ;0 ?
;~ > $iStatus: 3                            ;3 ?
;~ > pinState: 12208352                     ;bla
;~ > pinType: 1                             ;bla
;~ > attemptsRemaining: 12194924            ;bla

Exit


Func _exit()
    AdlibUnRegister('_exit')
    $oIConnectionPoint.Unadvise($pdwCookie)
    Exit
EndFunc   ;==>_exit


Func oIMbnPinManagerEvents_OnGetPinStateComplete($pSelf, $pIMbnPinManager, $pPinInfo, $iRequestID, $iStatus) ; Ret: long  Par: ptr;struct;ulong;long
;~  https://msdn.microsoft.com/en-us/library/windows/desktop/dd323119%28v=vs.85%29.aspx
    ConsoleWrite('+ OnGetPinStateComplete event' & @CRLF)

    ConsoleWrite('> $pIMbnPinManager: ' & $pIMbnPinManager & @CRLF)
    ConsoleWrite('> $pPinInfo: ' & $pPinInfo & @CRLF)
    ConsoleWrite('> $iRequestID: ' & $iRequestID & @CRLF)
    ConsoleWrite('> $iStatus: ' & $iStatus & @CRLF)

    ;Ok. Now create a MBN_PIN_INFO struct
;~  https://msdn.microsoft.com/en-us/library/windows/desktop/dd323226(v=vs.85).aspx
    Local Static $tagMBN_PIN_INFO = 'struct;dword pinState;dword pinType;ulong attemptsRemaining;endstruct'
    Local $tMBN_PIN_INFO = DllStructCreate($tagMBN_PIN_INFO, $pPinInfo)
    If Not @error Then
        ConsoleWrite('> pinState: ' & DllStructGetData($tMBN_PIN_INFO, 'pinState') & @CRLF)
        ConsoleWrite('> pinType: ' & DllStructGetData($tMBN_PIN_INFO, 'pinType') & @CRLF)
        ConsoleWrite('> attemptsRemaining: ' & DllStructGetData($tMBN_PIN_INFO, 'attemptsRemaining') & @CRLF)
    EndIf

    Return $S_OK
EndFunc   ;==>oIMbnPinManagerEvents_OnGetPinStateComplete


Func oIMbnPinManagerEvents_OnPinListAvailable($pSelf) ; Ret: long
    Return $S_OK
EndFunc   ;==>oIMbnPinManagerEvents_OnPinListAvailable
Func oIMbnPinManagerEvents_QueryInterface($pSelf, $pRIID, $pObj) ; Ret: long  Par: ptr;ptr
    Local $sIID = StringFromGUID($pRIID)
    If $sIID = $sIID_IUnknown Then
        DllStructSetData(DllStructCreate("ptr", $pObj), 1, $pSelf)
        Return $S_OK
    ElseIf $sIID = $sIID_IMbnPinManagerEvents Then
        DllStructSetData(DllStructCreate("ptr", $pObj), 1, $pSelf)
        Return $S_OK
    Else
        ConsoleWrite('QueryInterface ' & $sIID & @CRLF)
        Return $E_NOINTERFACE
    EndIf
EndFunc   ;==>oIMbnPinManagerEvents_QueryInterface
Func oIMbnPinManagerEvents_AddRef($pSelf) ; Ret: dword
    Return 1
EndFunc   ;==>oIMbnPinManagerEvents_AddRef
Func oIMbnPinManagerEvents_Release($pSelf) ; Ret: dword
    Return 1
EndFunc   ;==>oIMbnPinManagerEvents_Release

Func StringFromGUID($pGUID)
    Local $aResult = DllCall("ole32.dll", "int", "StringFromGUID2", "struct*", $pGUID, "wstr", "", "int", 40)
    If @error Then Return SetError(@error, @extended, "")
    Return SetExtended($aResult[0], $aResult[2])
EndFunc   ;==>StringFromGUID

Func ObjectFromTag($sFunctionPrefix, $tagInterface, ByRef $tInterface, $fPrint = False, $bIsUnknown = Default, $sIID = "{00000000-0000-0000-C000-000000000046}") ; last param is IID_IUnknown by default
    If $bIsUnknown = Default Then $bIsUnknown = True
    Local $sInterface = $tagInterface ; copy interface description
    Local $tagIUnknown = "QueryInterface hresult(ptr;ptr*);" & _
            "AddRef dword();" & _
            "Release dword();"
    ; Adding IUnknown methods
    If $bIsUnknown Then $tagInterface = $tagIUnknown & $tagInterface
    ; Below line is really simple even though it looks super complex. It's just written weird to fit in one line, not to steal your attention
    Local $aMethods = StringSplit(StringReplace(StringReplace(StringReplace(StringReplace(StringTrimRight(StringReplace(StringRegExpReplace(StringRegExpReplace($tagInterface, "\w+\*", "ptr"), "\h*(\w+)\h*(\w+\*?)\h*(\((.*?)\))\h*(;|;*\z)", "$1\|$2;$4" & @LF), ";" & @LF, @LF), 1), "object", "idispatch"), "hresult", "long"), "bstr", "ptr"), "variant", "ptr"), @LF, 3)
    Local $iUbound = UBound($aMethods)
    Local $sMethod, $aSplit, $sNamePart, $aTagPart, $sTagPart, $sRet, $sParams, $hCallback
    ; Allocation
    $tInterface = DllStructCreate("int RefCount;int Size;ptr Object;ptr Methods[" & $iUbound & "];int_ptr Callbacks[" & $iUbound & "];ulong_ptr Slots[16]") ; 16 pointer sized elements more to create space for possible private props
    If @error Then Return SetError(1, 0, 0)
    For $i = 0 To $iUbound - 1
        $aSplit = StringSplit($aMethods[$i], "|", 2)
        If UBound($aSplit) <> 2 Then ReDim $aSplit[2]
        $sNamePart = $aSplit[0]
        $sTagPart = $aSplit[1]
        $sMethod = $sFunctionPrefix & $sNamePart
        If $fPrint Then
            Local $iPar = StringInStr($sTagPart, ";", 2), $t
            If $iPar Then
                $t = "Ret: " & StringLeft($sTagPart, $iPar - 1) & "  " & _
                        "Par: " & StringRight($sTagPart, StringLen($sTagPart) - $iPar)
            Else
                $t = "Ret: " & $sTagPart
            EndIf
            Local $s = "Func " & $sMethod & _
                    "( $pSelf ) ; " & $t & @CRLF & _
                    "EndFunc" & @CRLF
            ConsoleWrite($s)
        EndIf
        $aTagPart = StringSplit($sTagPart, ";", 2)
        $sRet = $aTagPart[0]
        $sParams = StringReplace($sTagPart, $sRet, "", 1)
        $sParams = "ptr" & $sParams
        $hCallback = DllCallbackRegister($sMethod, $sRet, $sParams)
        If @error Then
            ConsoleWrite('! ' & @error & ' ' & $sMethod & @CRLF & @CRLF)
        EndIf

        DllStructSetData($tInterface, "Methods", DllCallbackGetPtr($hCallback), $i + 1) ; save callback pointer
        DllStructSetData($tInterface, "Callbacks", $hCallback, $i + 1) ; save callback handle
    Next
    DllStructSetData($tInterface, "RefCount", 1) ; initial ref count is 1
    DllStructSetData($tInterface, "Size", $iUbound) ; number of interface methods
    DllStructSetData($tInterface, "Object", DllStructGetPtr($tInterface, "Methods")) ; Interface method pointers
    Return ObjCreateInterface(DllStructGetPtr($tInterface, "Object"), $sIID, $sInterface, $bIsUnknown) ; pointer that's wrapped into object
EndFunc   ;==>ObjectFromTag

Edited July 19, 2015 by Inververs
solved

LarsJ · July 19, 2015

After a quick look at the code, I can see a little mistake. "struct" in definition of IMbnPinManagerEvents interface must be "struct*":

; Replace
'struct;' & _                           ; /* [in] */ MBN_PIN_INFO   pinInfo
; with
'struct*;' & _                           ; /* [in] */ MBN_PIN_INFO   pinInfo

You can try to correct this for a start.

Inververs · July 19, 2015

If change to struct*, than i get this in OnGetPinStateComplete event:

+ OnGetPinStateComplete event
> $pIMbnPinManager: 0x00933D44
> $pPinInfo: 0x00000000
> $iRequestID: 0
> $iStatus: 3

$pPinInfo became null.

So It did not help

LarsJ · July 19, 2015

What does $iStatus = 3 mean? Since $iStatus <> 0 the operation failed, and that's probably the reason why $pPinInfo and $iRequestID are not set.

As you have managed to create all the interface objects, there seems not to be any obvious errors.

Do you know if this code works? Do you have some C++ code to verify that the code works. If the C++ code works, it's usually possible to get the AutoIt code to work too. On the other hand. If it's not possible to get the C++ code to work, then it's also not possible to have the AutoIt code to work.

Danyfirex · July 19, 2015

When you create the callback in the parameters you do this. ptr;ptr;struct;ulong;long. Don't use struct, use ptr instead.

dllcallbackregister remarks says: Uses all DllCall() types except "struct". for that reason you get $pIMbnPinManager same as $pPinInfo. So if you use ptr;ptr;ptr;ulong;long you should get correct pointer to MBN_PIN_INFO structure.

Saludos

Edited July 19, 2015 by Danyfirex
write more

Inververs · July 19, 2015

Honestly, i have no idea what is the status 3
If msdn on this page said, https://msdn.microsoft.com/en-us/library/windows/desktop/dd323119(v=vs.85).aspx
that status can expect one of the following values:
S_OK
HRESULT_FROM_WIN32(ERROR_NOT_SUPPORTED)
E_MBN_SIM_NOT_INSERTED
E_MBN_BAD_SIM

in sdk i can find this constants
E_MBN_SIM_NOT_INSERTED _HRESULT_TYPEDEF_(0x8054820AL)
E_MBN_BAD_SIM _HRESULT_TYPEDEF_(0x80548202L)

but what 3 meen, i dont know.
I am inclined to believe that callback is not working properly.

No working code in C++. I'm trying to make it from scratch, using only the information from the site
But, i have working command in netsh which is able to determine the status of the pin,
and I can not say it uses an this API, or something else.

netsh mbn show pin interface=*
result is:
    Тип ПИН-кода           : Pin1
    Состояние ПИН-кода          : Ввод
    Количество оставшихся попыток: 3

What can be translated as:
   Type PIN: Pin1
    Status PIN: Input
    The number of remaining attempts: 3

This is very similar to the data that are located in the structure MBN_PIN_INFO

typedef struct MBN_PIN_INFO {
  MBN_PIN_STATE pinState;
  MBN_PIN_TYPE  pinType;
  ULONG         attemptsRemaining;
} MBN_PIN_INFO;

, but as you can see, the access to which I can not get.

Edited July 19, 2015 by Inververs

Danyfirex · July 19, 2015

¿did you read? what I wrote...

Inververs · July 19, 2015

Danyfirex, so read, did not have time to answer, I'm sorry.

I change to this

Global Const $dtag_IMbnPinManagerEvents = _
        'OnPinListAvailable hresult();' & _
        'OnGetPinStateComplete hresult(' & _
        'ptr;' & _                              ; /* [in] */ __RPC__in_opt  IMbnPinManager *pinManager
        'ptr;' & _                              ; /* [in] */ MBN_PIN_INFO   pinInfo
        'ulong;' & _                            ; /* [in] */ ULONG          requestID
        'hresult;)' ;                             /* [in] */ HRESULT        status

but it still does not work

Inververs · July 19, 2015

Global Const $dtag_IMbnPinManagerEvents = _
        'OnPinListAvailable hresult();' & _
        'OnGetPinStateComplete hresult(' & _
        'ptr;' & _                              ; /* [in] */ __RPC__in_opt  IMbnPinManager *pinManager
        'ptr;' & _                              ; /* [in] */ MBN_PIN_INFO   pinInfo
        'ulong;' & _                            ; /* [in] */ ULONG          requestID
        'long;)' ;                              /* [in] */ HRESULT      status

It does not work to

Danyfirex · July 19, 2015

why you use 5 parameters in oIMbnPinManagerEvents_OnGetPinStateComplete($pSelf, $pIMbnPinManager, $pPinInfo, $iRequestID, $iStatus).? it just say 4 as far I see.

Inververs · July 19, 2015

someone wrote that

methods for objects created with ObjectFromTag allways have $pSelf as first parameter

LarsJ · July 19, 2015

ObjectFromTag is a function coded by trancexx. There are several versions of this function. It is important to use the latest. But as far as I can see, it is the latest version.

Danyfirex · July 19, 2015

I did not know it. making that I said. You till got $pIMbnPinManager: 0x00BB9684 $pPinInfo: 0x00BB9684 ?

Saludos

Inververs · July 19, 2015

Global Const $dtag_IMbnPinManagerEvents = _
        'OnPinListAvailable hresult();' & _
        'OnGetPinStateComplete hresult(' & _
        'ptr;' & _                              ; /* [in] */ __RPC__in_opt  IMbnPinManager *pinManager
        'ptr;' & _                              ; /* [in] */ MBN_PIN_INFO   pinInfo
        'ulong;' & _                            ; /* [in] */ ULONG          requestID
        'long;)' ;                              ; /* [in] */ HRESULT        status

> Wait events for request: 250

This when device pin1 require:
+ OnGetPinStateComplete event
> $pIMbnPinManager: 0x0076A0AC
> $pPinInfo: 0x00000001
> $iRequestID: 2
> $iStatus: 3

Then when device unblocked(pin entered)

> Wait events for request: 251

+ OnGetPinStateComplete event
> $pIMbnPinManager: 0x00B2D09C
> $pPinInfo: 0x00000000
> $iRequestID: 0
> $iStatus: 3

Inververs · July 19, 2015

These events do not work as expected.
If you take other functions, then everything is OK
This code provides:
> Pin format: MBN_PIN_FORMAT_NUMERIC
> Pin type: MBN_PIN_TYPE_PIN1
> $oIMbnPin.get_PinLengthMin 4
> $oIMbnPin.get_PinLengthMax 8

Local Const $MBN_PIN_TYPE_CUSTOM = 0x1, $MBN_PIN_TYPE_PIN1 = 0x2
Local $p_IMbnPin

$oIMbnPinManager.GetPin($MBN_PIN_TYPE_PIN1, $p_IMbnPin)

Local $oIMbnPin = ObjCreateInterface($p_IMbnPin, $sIID_IMbnPin, $dtag_IMbnPin)
If @error Then Exit -@ScriptLineNumber

Local $iPinFormat
$oIMbnPin.get_PinFormat($iPinFormat)

Switch $iPinFormat
    Case 0x0
        ConsoleWrite('> Pin format: ' & 'MBN_PIN_FORMAT_NONE' & @CRLF)
    Case 0x1
        ConsoleWrite('> Pin format: ' & 'MBN_PIN_FORMAT_NUMERIC' & @CRLF)
    Case 0x2
        ConsoleWrite('> Pin format: ' & 'MBN_PIN_FORMAT_ALPHANUMERIC' & @CRLF)
EndSwitch

Local $iPinType
$oIMbnPin.get_PinType($iPinType)
ConsoleWrite('> Pin type: ')
Switch $iPinType
    Case 0x00
        ConsoleWrite('MBN_PIN_TYPE_NONE' & @CRLF)
    Case 0x1
        ConsoleWrite('MBN_PIN_TYPE_CUSTOM' & @CRLF)
    Case 0x2
        ConsoleWrite('MBN_PIN_TYPE_PIN1' & @CRLF)
    Case 0x3
        ConsoleWrite('MBN_PIN_TYPE_PIN2' & @CRLF)
    Case 0x4
        ConsoleWrite('MBN_PIN_TYPE_DEVICE_SIM_PIN' & @CRLF)
    Case 0x5
        ConsoleWrite('MBN_PIN_TYPE_DEVICE_FIRST_SIM_PIN' & @CRLF)
    Case 0x6
        ConsoleWrite('MBN_PIN_TYPE_NETWORK_PIN' & @CRLF)
    Case 0x7
        ConsoleWrite('MBN_PIN_TYPE_NETWORK_SUBSET_PIN' & @CRLF)
    Case 0x8
        ConsoleWrite('MBN_PIN_TYPE_SVC_PROVIDER_PIN' & @CRLF)
    Case 0x9
        ConsoleWrite('MBN_PIN_TYPE_CORPORATE_PIN' & @CRLF)
    Case 0xA
        ConsoleWrite('MBN_PIN_TYPE_SUBSIDY_LOCK' & @CRLF)
EndSwitch

Local $iPinLengthMin, $iPinLengthMax
$oIMbnPin.get_PinLengthMin($iPinLengthMin)
$oIMbnPin.get_PinLengthMax($iPinLengthMax)

ConsoleWrite('> $oIMbnPin.get_PinLengthMin ' & $iPinLengthMin & @CRLF)
ConsoleWrite('> $oIMbnPin.get_PinLengthMax ' & $iPinLengthMax & @CRLF)

Inververs · July 19, 2015

ObjectFromTag is a function coded by trancexx. There are several versions of this function. It is important to use the latest. But as far as I can see, it is the latest version.

yes, correct. and she said this phrase.

Inververs · July 19, 2015

funnily, 1 2 3 in the parameters

trancexx · July 19, 2015

Wait, that's exactly what netsh shows. Right?

Then maybe try it like this:

Global Const $dtag_IMbnPinManagerEvents = _
        'OnPinListAvailable hresult();' & _
        'OnGetPinStateComplete hresult(' & _
        'ptr;' & _                              ; /* [in] */ __RPC__in_opt  IMbnPinManager *pinManager

        'int;int;ulong;' & _                           ; /* [in] */ MBN_PIN_INFO   pinInfo

        'ulong;' & _                            ; /* [in] */ ULONG          requestID

        'hresult;)' ;                             /* [in] */ HRESULT        status
        
;...

Func oIMbnPinManagerEvents_OnGetPinStateComplete($pSelf, $pIMbnPinManager, $pinState, $pinType, $attemptsRemaining, $iRequestID, $iStatus)
;~  https://msdn.microsoft.com/en-us/library/windows/desktop/dd323119%28v=vs.85%29.aspx

    ConsoleWrite('+ OnGetPinStateComplete event' & @CRLF)

    ConsoleWrite('> $pIMbnPinManager: ' & $pIMbnPinManager & @CRLF)

    ConsoleWrite('> $pinState: ' & $pinState & @CRLF)
    ConsoleWrite('> $pinType: ' & $pinType & @CRLF)
    ConsoleWrite('> $attemptsRemaining: ' & $attemptsRemaining & @CRLF)

    ConsoleWrite('> $iRequestID: ' & $iRequestID & @CRLF)
    ConsoleWrite('> $iStatus: ' & $iStatus & @CRLF)

    Return $S_OK
EndFunc

Inververs · July 19, 2015

ingenious, it works!

Pin entered:

> Wait events for request: 274

+ OnGetPinStateComplete event
> $pIMbnPinManager: 0x00A2CBEC
> $pinState: 0
> $pinType: 0
> $attemptsRemaining: 3
> $iRequestID: 274
> $iStatus: 0

Pin required:

> Wait events for request: 275
+ OnGetPinStateComplete event
> $pIMbnPinManager: 0x0099AC74
> $pinState: 1
> $pinType: 2
> $attemptsRemaining: 3
> $iRequestID: 275
> $iStatus: 0

trancexx, thanks a lot!

As I understand it, the structure should be expand in dtag...?

Danyfirex · July 19, 2015

MSDN play us a joke. nowhere says pointer to MBN_PIN_INFO just add the parameter as nested way. another Great one Trancexx.

@Inververs could you pass SafeArray.au3. I would like to play a little with your code.

Saludos

[solved] Help with event notifications for IMbnPinManagerEvents interface

Recommended Posts

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Link to comment

Share on other sites

Create an account or sign in to comment

Create an account

Sign in

Recently Browsing 0 members

Similar Content