ホーム › Security.Cryptography.Certificates › PstGetCertificates

PstGetCertificates

関数

指定条件に一致する証明書チェーンの一覧を取得する。

DLLcertpoleng.dll呼出規約winapi対応OSWindows 7 以降

シグネチャ

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

NTSTATUS PstGetCertificates(
    UNICODE_STRING* pTargetName,
    DWORD cCriteria,
    CERT_SELECT_CRITERIA* rgpCriteria,   // optional
    BOOL bIsClient,
    DWORD* pdwCertChainContextCount,
    CERT_CHAIN_CONTEXT*** ppCertChainContexts
);

パラメーター

名前	型	方向
pTargetName	UNICODE_STRING*	in
cCriteria	DWORD	in
rgpCriteria	CERT_SELECT_CRITERIA*	inoptional
bIsClient	BOOL	in
pdwCertChainContextCount	DWORD*	out
ppCertChainContexts	CERT_CHAIN_CONTEXT***	out

戻り値の型: NTSTATUS

各言語での呼び出し定義

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

NTSTATUS PstGetCertificates(
    UNICODE_STRING* pTargetName,
    DWORD cCriteria,
    CERT_SELECT_CRITERIA* rgpCriteria,   // optional
    BOOL bIsClient,
    DWORD* pdwCertChainContextCount,
    CERT_CHAIN_CONTEXT*** ppCertChainContexts
);

[DllImport("certpoleng.dll", ExactSpelling = true)]
static extern int PstGetCertificates(
    IntPtr pTargetName,   // UNICODE_STRING*
    uint cCriteria,   // DWORD
    IntPtr rgpCriteria,   // CERT_SELECT_CRITERIA* optional
    bool bIsClient,   // BOOL
    out uint pdwCertChainContextCount,   // DWORD* out
    IntPtr ppCertChainContexts   // CERT_CHAIN_CONTEXT*** out
);

<DllImport("certpoleng.dll", ExactSpelling:=True)>
Public Shared Function PstGetCertificates(
    pTargetName As IntPtr,   ' UNICODE_STRING*
    cCriteria As UInteger,   ' DWORD
    rgpCriteria As IntPtr,   ' CERT_SELECT_CRITERIA* optional
    bIsClient As Boolean,   ' BOOL
    <Out> ByRef pdwCertChainContextCount As UInteger,   ' DWORD* out
    ppCertChainContexts As IntPtr   ' CERT_CHAIN_CONTEXT*** out
) As Integer
End Function

' pTargetName : UNICODE_STRING*
' cCriteria : DWORD
' rgpCriteria : CERT_SELECT_CRITERIA* optional
' bIsClient : BOOL
' pdwCertChainContextCount : DWORD* out
' ppCertChainContexts : CERT_CHAIN_CONTEXT*** out
Declare PtrSafe Function PstGetCertificates Lib "certpoleng" ( _
    ByVal pTargetName As LongPtr, _
    ByVal cCriteria As Long, _
    ByVal rgpCriteria As LongPtr, _
    ByVal bIsClient As Long, _
    ByRef pdwCertChainContextCount As Long, _
    ByVal ppCertChainContexts As LongPtr) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。

import ctypes
from ctypes import wintypes

PstGetCertificates = ctypes.windll.certpoleng.PstGetCertificates
PstGetCertificates.restype = ctypes.c_int
PstGetCertificates.argtypes = [
    ctypes.c_void_p,  # pTargetName : UNICODE_STRING*
    wintypes.DWORD,  # cCriteria : DWORD
    ctypes.c_void_p,  # rgpCriteria : CERT_SELECT_CRITERIA* optional
    wintypes.BOOL,  # bIsClient : BOOL
    ctypes.POINTER(wintypes.DWORD),  # pdwCertChainContextCount : DWORD* out
    ctypes.c_void_p,  # ppCertChainContexts : CERT_CHAIN_CONTEXT*** out
]

require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('certpoleng.dll')
PstGetCertificates = Fiddle::Function.new(
  lib['PstGetCertificates'],
  [
    Fiddle::TYPE_VOIDP,  # pTargetName : UNICODE_STRING*
    -Fiddle::TYPE_INT,  # cCriteria : DWORD
    Fiddle::TYPE_VOIDP,  # rgpCriteria : CERT_SELECT_CRITERIA* optional
    Fiddle::TYPE_INT,  # bIsClient : BOOL
    Fiddle::TYPE_VOIDP,  # pdwCertChainContextCount : DWORD* out
    Fiddle::TYPE_VOIDP,  # ppCertChainContexts : CERT_CHAIN_CONTEXT*** out
  ],
  Fiddle::TYPE_INT)

#[link(name = "certpoleng")]
extern "system" {
    fn PstGetCertificates(
        pTargetName: *mut UNICODE_STRING,  // UNICODE_STRING*
        cCriteria: u32,  // DWORD
        rgpCriteria: *mut CERT_SELECT_CRITERIA,  // CERT_SELECT_CRITERIA* optional
        bIsClient: i32,  // BOOL
        pdwCertChainContextCount: *mut u32,  // DWORD* out
        ppCertChainContexts: *mut *mut *mut CERT_CHAIN_CONTEXT  // CERT_CHAIN_CONTEXT*** out
    ) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.

$sig = @"
[DllImport("certpoleng.dll")]
public static extern int PstGetCertificates(IntPtr pTargetName, uint cCriteria, IntPtr rgpCriteria, bool bIsClient, out uint pdwCertChainContextCount, IntPtr ppCertChainContexts);
"@
$api = Add-Type -MemberDefinition $sig -Name 'certpoleng_PstGetCertificates' -Namespace Win32 -PassThru
# $api::PstGetCertificates(pTargetName, cCriteria, rgpCriteria, bIsClient, pdwCertChainContextCount, ppCertChainContexts)

#uselib "certpoleng.dll"
#func global PstGetCertificates "PstGetCertificates" sptr, sptr, sptr, sptr, sptr, sptr
; PstGetCertificates varptr(pTargetName), cCriteria, varptr(rgpCriteria), bIsClient, varptr(pdwCertChainContextCount), varptr(ppCertChainContexts)   ; 戻り値は stat
; pTargetName : UNICODE_STRING* -> "sptr"
; cCriteria : DWORD -> "sptr"
; rgpCriteria : CERT_SELECT_CRITERIA* optional -> "sptr"
; bIsClient : BOOL -> "sptr"
; pdwCertChainContextCount : DWORD* out -> "sptr"
; ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。

出力引数:

#uselib "certpoleng.dll"
#cfunc global PstGetCertificates "PstGetCertificates" var, int, var, int, var, var
; res = PstGetCertificates(pTargetName, cCriteria, rgpCriteria, bIsClient, pdwCertChainContextCount, ppCertChainContexts)
; pTargetName : UNICODE_STRING* -> "var"
; cCriteria : DWORD -> "int"
; rgpCriteria : CERT_SELECT_CRITERIA* optional -> "var"
; bIsClient : BOOL -> "int"
; pdwCertChainContextCount : DWORD* out -> "var"
; ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "certpoleng.dll"
#cfunc global PstGetCertificates "PstGetCertificates" sptr, int, sptr, int, sptr, sptr
; res = PstGetCertificates(varptr(pTargetName), cCriteria, varptr(rgpCriteria), bIsClient, varptr(pdwCertChainContextCount), varptr(ppCertChainContexts))
; pTargetName : UNICODE_STRING* -> "sptr"
; cCriteria : DWORD -> "int"
; rgpCriteria : CERT_SELECT_CRITERIA* optional -> "sptr"
; bIsClient : BOOL -> "int"
; pdwCertChainContextCount : DWORD* out -> "sptr"
; ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "sptr"
; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。

出力引数:

; NTSTATUS PstGetCertificates(UNICODE_STRING* pTargetName, DWORD cCriteria, CERT_SELECT_CRITERIA* rgpCriteria, BOOL bIsClient, DWORD* pdwCertChainContextCount, CERT_CHAIN_CONTEXT*** ppCertChainContexts)
#uselib "certpoleng.dll"
#cfunc global PstGetCertificates "PstGetCertificates" var, int, var, int, var, var
; res = PstGetCertificates(pTargetName, cCriteria, rgpCriteria, bIsClient, pdwCertChainContextCount, ppCertChainContexts)
; pTargetName : UNICODE_STRING* -> "var"
; cCriteria : DWORD -> "int"
; rgpCriteria : CERT_SELECT_CRITERIA* optional -> "var"
; bIsClient : BOOL -> "int"
; pdwCertChainContextCount : DWORD* out -> "var"
; ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; NTSTATUS PstGetCertificates(UNICODE_STRING* pTargetName, DWORD cCriteria, CERT_SELECT_CRITERIA* rgpCriteria, BOOL bIsClient, DWORD* pdwCertChainContextCount, CERT_CHAIN_CONTEXT*** ppCertChainContexts)
#uselib "certpoleng.dll"
#cfunc global PstGetCertificates "PstGetCertificates" intptr, int, intptr, int, intptr, intptr
; res = PstGetCertificates(varptr(pTargetName), cCriteria, varptr(rgpCriteria), bIsClient, varptr(pdwCertChainContextCount), varptr(ppCertChainContexts))
; pTargetName : UNICODE_STRING* -> "intptr"
; cCriteria : DWORD -> "int"
; rgpCriteria : CERT_SELECT_CRITERIA* optional -> "intptr"
; bIsClient : BOOL -> "int"
; pdwCertChainContextCount : DWORD* out -> "intptr"
; ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "intptr"
; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。

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

var (
	certpoleng = windows.NewLazySystemDLL("certpoleng.dll")
	procPstGetCertificates = certpoleng.NewProc("PstGetCertificates")
)

// pTargetName (UNICODE_STRING*), cCriteria (DWORD), rgpCriteria (CERT_SELECT_CRITERIA* optional), bIsClient (BOOL), pdwCertChainContextCount (DWORD* out), ppCertChainContexts (CERT_CHAIN_CONTEXT*** out)
r1, _, err := procPstGetCertificates.Call(
	uintptr(pTargetName),
	uintptr(cCriteria),
	uintptr(rgpCriteria),
	uintptr(bIsClient),
	uintptr(pdwCertChainContextCount),
	uintptr(ppCertChainContexts),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // NTSTATUS

function PstGetCertificates(
  pTargetName: Pointer;   // UNICODE_STRING*
  cCriteria: DWORD;   // DWORD
  rgpCriteria: Pointer;   // CERT_SELECT_CRITERIA* optional
  bIsClient: BOOL;   // BOOL
  pdwCertChainContextCount: Pointer;   // DWORD* out
  ppCertChainContexts: Pointer   // CERT_CHAIN_CONTEXT*** out
): Integer; stdcall;
  external 'certpoleng.dll' name 'PstGetCertificates';

result := DllCall("certpoleng\PstGetCertificates"
    , "Ptr", pTargetName   ; UNICODE_STRING*
    , "UInt", cCriteria   ; DWORD
    , "Ptr", rgpCriteria   ; CERT_SELECT_CRITERIA* optional
    , "Int", bIsClient   ; BOOL
    , "Ptr", pdwCertChainContextCount   ; DWORD* out
    , "Ptr", ppCertChainContexts   ; CERT_CHAIN_CONTEXT*** out
    , "Int")   ; return: NTSTATUS

●PstGetCertificates(pTargetName, cCriteria, rgpCriteria, bIsClient, pdwCertChainContextCount, ppCertChainContexts) = DLL("certpoleng.dll", "int PstGetCertificates(void*, dword, void*, bool, void*, void*)")
# 呼び出し: PstGetCertificates(pTargetName, cCriteria, rgpCriteria, bIsClient, pdwCertChainContextCount, ppCertChainContexts)
# pTargetName : UNICODE_STRING* -> "void*"
# cCriteria : DWORD -> "dword"
# rgpCriteria : CERT_SELECT_CRITERIA* optional -> "void*"
# bIsClient : BOOL -> "bool"
# pdwCertChainContextCount : DWORD* out -> "void*"
# ppCertChainContexts : CERT_CHAIN_CONTEXT*** out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。