CryptCATCDFEnumMembersByCDFTagEx

// WINTRUST.dll
#include <windows.h>

LPWSTR CryptCATCDFEnumMembersByCDFTagEx(
    CRYPTCATCDF* pCDF,
    LPWSTR pwszPrevCDFTag,
    PFN_CDF_PARSE_ERROR_CALLBACK pfnParseError,
    CRYPTCATMEMBER** ppMember,
    BOOL fContinueOnError,
    void* pvReserved
);

<DllImport("WINTRUST.dll", ExactSpelling:=True)>
Public Shared Function CryptCATCDFEnumMembersByCDFTagEx(
    pCDF As IntPtr,   ' CRYPTCATCDF*
    <MarshalAs(UnmanagedType.LPWStr)> pwszPrevCDFTag As System.Text.StringBuilder,   ' LPWSTR in/out
    pfnParseError As IntPtr,   ' PFN_CDF_PARSE_ERROR_CALLBACK
    ppMember As IntPtr,   ' CRYPTCATMEMBER**
    fContinueOnError As Boolean,   ' BOOL
    pvReserved As IntPtr   ' void*
) As IntPtr
End Function

' pCDF : CRYPTCATCDF*
' pwszPrevCDFTag : LPWSTR in/out
' pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK
' ppMember : CRYPTCATMEMBER**
' fContinueOnError : BOOL
' pvReserved : void*
Declare PtrSafe Function CryptCATCDFEnumMembersByCDFTagEx Lib "wintrust" ( _
    ByVal pCDF As LongPtr, _
    ByVal pwszPrevCDFTag As LongPtr, _
    ByVal pfnParseError As LongPtr, _
    ByVal ppMember As LongPtr, _
    ByVal fContinueOnError As Long, _
    ByVal pvReserved As LongPtr) As LongPtr
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

CryptCATCDFEnumMembersByCDFTagEx = ctypes.windll.wintrust.CryptCATCDFEnumMembersByCDFTagEx
CryptCATCDFEnumMembersByCDFTagEx.restype = wintypes.LPWSTR
CryptCATCDFEnumMembersByCDFTagEx.argtypes = [
    ctypes.c_void_p,  # pCDF : CRYPTCATCDF*
    wintypes.LPWSTR,  # pwszPrevCDFTag : LPWSTR in/out
    ctypes.c_void_p,  # pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK
    ctypes.c_void_p,  # ppMember : CRYPTCATMEMBER**
    wintypes.BOOL,  # fContinueOnError : BOOL
    ctypes.POINTER(None),  # pvReserved : void*
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('WINTRUST.dll')
CryptCATCDFEnumMembersByCDFTagEx = Fiddle::Function.new(
  lib['CryptCATCDFEnumMembersByCDFTagEx'],
  [
    Fiddle::TYPE_VOIDP,  # pCDF : CRYPTCATCDF*
    Fiddle::TYPE_VOIDP,  # pwszPrevCDFTag : LPWSTR in/out
    Fiddle::TYPE_VOIDP,  # pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK
    Fiddle::TYPE_VOIDP,  # ppMember : CRYPTCATMEMBER**
    Fiddle::TYPE_INT,  # fContinueOnError : BOOL
    Fiddle::TYPE_VOIDP,  # pvReserved : void*
  ],
  Fiddle::TYPE_VOIDP)

#[link(name = "wintrust")]
extern "system" {
    fn CryptCATCDFEnumMembersByCDFTagEx(
        pCDF: *mut CRYPTCATCDF,  // CRYPTCATCDF*
        pwszPrevCDFTag: *mut u16,  // LPWSTR in/out
        pfnParseError: *const core::ffi::c_void,  // PFN_CDF_PARSE_ERROR_CALLBACK
        ppMember: *mut *mut CRYPTCATMEMBER,  // CRYPTCATMEMBER**
        fContinueOnError: i32,  // BOOL
        pvReserved: *mut ()  // void*
    ) -> *mut u16;
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("WINTRUST.dll")]
public static extern IntPtr CryptCATCDFEnumMembersByCDFTagEx(IntPtr pCDF, [MarshalAs(UnmanagedType.LPWStr)] System.Text.StringBuilder pwszPrevCDFTag, IntPtr pfnParseError, IntPtr ppMember, bool fContinueOnError, IntPtr pvReserved);
"@
$api = Add-Type -MemberDefinition $sig -Name 'WINTRUST_CryptCATCDFEnumMembersByCDFTagEx' -Namespace Win32 -PassThru
# $api::CryptCATCDFEnumMembersByCDFTagEx(pCDF, pwszPrevCDFTag, pfnParseError, ppMember, fContinueOnError, pvReserved)

#uselib "WINTRUST.dll"
#func global CryptCATCDFEnumMembersByCDFTagEx "CryptCATCDFEnumMembersByCDFTagEx" sptr, sptr, sptr, sptr, sptr, sptr
; CryptCATCDFEnumMembersByCDFTagEx varptr(pCDF), varptr(pwszPrevCDFTag), pfnParseError, varptr(ppMember), fContinueOnError, pvReserved   ; 戻り値は stat
; pCDF : CRYPTCATCDF* -> "sptr"
; pwszPrevCDFTag : LPWSTR in/out -> "sptr"
; pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK -> "sptr"
; ppMember : CRYPTCATMEMBER** -> "sptr"
; fContinueOnError : BOOL -> "sptr"
; pvReserved : void* -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。

#uselib "WINTRUST.dll"
#cfunc global CryptCATCDFEnumMembersByCDFTagEx "CryptCATCDFEnumMembersByCDFTagEx" var, var, sptr, var, int, sptr
; res = CryptCATCDFEnumMembersByCDFTagEx(pCDF, pwszPrevCDFTag, pfnParseError, ppMember, fContinueOnError, pvReserved)
; pCDF : CRYPTCATCDF* -> "var"
; pwszPrevCDFTag : LPWSTR in/out -> "var"
; pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK -> "sptr"
; ppMember : CRYPTCATMEMBER** -> "var"
; fContinueOnError : BOOL -> "int"
; pvReserved : void* -> "sptr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。

; LPWSTR CryptCATCDFEnumMembersByCDFTagEx(CRYPTCATCDF* pCDF, LPWSTR pwszPrevCDFTag, PFN_CDF_PARSE_ERROR_CALLBACK pfnParseError, CRYPTCATMEMBER** ppMember, BOOL fContinueOnError, void* pvReserved)
#uselib "WINTRUST.dll"
#cfunc global CryptCATCDFEnumMembersByCDFTagEx "CryptCATCDFEnumMembersByCDFTagEx" var, var, intptr, var, int, intptr
; res = CryptCATCDFEnumMembersByCDFTagEx(pCDF, pwszPrevCDFTag, pfnParseError, ppMember, fContinueOnError, pvReserved)
; pCDF : CRYPTCATCDF* -> "var"
; pwszPrevCDFTag : LPWSTR in/out -> "var"
; pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK -> "intptr"
; ppMember : CRYPTCATMEMBER** -> "var"
; fContinueOnError : BOOL -> "int"
; pvReserved : void* -> "intptr"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。

import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	wintrust = windows.NewLazySystemDLL("WINTRUST.dll")
	procCryptCATCDFEnumMembersByCDFTagEx = wintrust.NewProc("CryptCATCDFEnumMembersByCDFTagEx")
)

// pCDF (CRYPTCATCDF*), pwszPrevCDFTag (LPWSTR in/out), pfnParseError (PFN_CDF_PARSE_ERROR_CALLBACK), ppMember (CRYPTCATMEMBER**), fContinueOnError (BOOL), pvReserved (void*)
r1, _, err := procCryptCATCDFEnumMembersByCDFTagEx.Call(
	uintptr(pCDF),
	uintptr(pwszPrevCDFTag),
	uintptr(pfnParseError),
	uintptr(ppMember),
	uintptr(fContinueOnError),
	uintptr(pvReserved),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // LPWSTR

function CryptCATCDFEnumMembersByCDFTagEx(
  pCDF: Pointer;   // CRYPTCATCDF*
  pwszPrevCDFTag: PWideChar;   // LPWSTR in/out
  pfnParseError: Pointer;   // PFN_CDF_PARSE_ERROR_CALLBACK
  ppMember: Pointer;   // CRYPTCATMEMBER**
  fContinueOnError: BOOL;   // BOOL
  pvReserved: Pointer   // void*
): PWideChar; stdcall;
  external 'WINTRUST.dll' name 'CryptCATCDFEnumMembersByCDFTagEx';

result := DllCall("WINTRUST\CryptCATCDFEnumMembersByCDFTagEx"
    , "Ptr", pCDF   ; CRYPTCATCDF*
    , "Ptr", pwszPrevCDFTag   ; LPWSTR in/out
    , "Ptr", pfnParseError   ; PFN_CDF_PARSE_ERROR_CALLBACK
    , "Ptr", ppMember   ; CRYPTCATMEMBER**
    , "Int", fContinueOnError   ; BOOL
    , "Ptr", pvReserved   ; void*
    , "Ptr")   ; return: LPWSTR

●CryptCATCDFEnumMembersByCDFTagEx(pCDF, pwszPrevCDFTag, pfnParseError, ppMember, fContinueOnError, pvReserved) = DLL("WINTRUST.dll", "char* CryptCATCDFEnumMembersByCDFTagEx(void*, char*, void*, void*, bool, void*)")
# 呼び出し: CryptCATCDFEnumMembersByCDFTagEx(pCDF, pwszPrevCDFTag, pfnParseError, ppMember, fContinueOnError, pvReserved)
# pCDF : CRYPTCATCDF* -> "void*"
# pwszPrevCDFTag : LPWSTR in/out -> "char*"
# pfnParseError : PFN_CDF_PARSE_ERROR_CALLBACK -> "void*"
# ppMember : CRYPTCATMEMBER** -> "void*"
# fContinueOnError : BOOL -> "bool"
# pvReserved : void* -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。