Win32 API 日本語リファレンス
ホームSecurity.Cryptography › CryptDecodeMessage

CryptDecodeMessage

関数
暗号化や署名付きメッセージをデコードして内容を取得する。
DLLCRYPT32.dll呼出規約winapiSetLastErrorあり対応OSWindows XP 以降

シグネチャ

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

BOOL CryptDecodeMessage(
    DWORD dwMsgTypeFlags,
    CRYPT_DECRYPT_MESSAGE_PARA* pDecryptPara,   // optional
    CRYPT_VERIFY_MESSAGE_PARA* pVerifyPara,   // optional
    DWORD dwSignerIndex,
    const BYTE* pbEncodedBlob,
    DWORD cbEncodedBlob,
    DWORD dwPrevInnerContentType,
    DWORD* pdwMsgType,   // optional
    DWORD* pdwInnerContentType,   // optional
    BYTE* pbDecoded,   // optional
    DWORD* pcbDecoded,   // optional
    CERT_CONTEXT** ppXchgCert,   // optional
    CERT_CONTEXT** ppSignerCert   // optional
);

パラメーター

名前方向説明
dwMsgTypeFlagsDWORDin

メッセージの種類を示します。メッセージの種類はビット単位の OR 演算子で組み合わせることができます。このパラメーターには次のいずれかのメッセージの種類を指定できます。

  • CMSG_DATA_FLAG
  • CMSG_SIGNED_FLAG
  • CMSG_ENVELOPED_FLAG
  • CMSG_SIGNED_AND_ENVELOPED_FLAG
  • CMSG_HASHED_FLAG
注意 関数から戻った後、pdwMsgType が指す DWORD には、メッセージの種類が設定されます。
pDecryptParaCRYPT_DECRYPT_MESSAGE_PARA*inoptional復号パラメーターを格納する CRYPT_DECRYPT_MESSAGE_PARA 構造体へのポインターです。
pVerifyParaCRYPT_VERIFY_MESSAGE_PARA*inoptional検証パラメーターを格納する CRYPT_VERIFY_MESSAGE_PARA 構造体へのポインターです。
dwSignerIndexDWORDin

メッセージに存在しうる複数の署名者のうち、どの署名者を検証するかを示します。このインデックスを変えながら関数を複数回呼び出すことで、追加の署名者を検証できます。

最初の署名者では dwSignerIndex を 0 に設定します。関数が FALSE を返し、かつ GetLastErrorCRYPT_E_NO_SIGNER を返した場合、直前の呼び出しでメッセージの最後の署名者が返されたことを意味します。このパラメーターは CMSG_SIGNED_AND_ENVELOPED 型または CMSG_SIGNED 型のメッセージでのみ使用します。その他のメッセージの種類では 0 に設定してください。

pbEncodedBlobBYTE*inデコード対象となるエンコードされた BLOB へのポインターです。
cbEncodedBlobDWORDinエンコードされた BLOB のサイズ (バイト単位) です。
dwPrevInnerContentTypeDWORDin入れ子になった暗号化メッセージを処理する場合にのみ適用されます。外側の暗号化メッセージを処理する場合は 0 に設定する必要があります。入れ子になった暗号化メッセージをデコードする場合は、外側のメッセージに対する以前の CryptDecodeMessage の呼び出しで pdwInnerContentType に返された値を設定します。pdwMsgType に一覧表示されている任意の CMSG 型を指定できます。下位互換性のため、dwPrevInnerContentType は 0 に設定してください。
pdwMsgTypeDWORD*outoptional

返されるメッセージの種類を指定する DWORD へのポインターです。このパラメーターには次のいずれかのメッセージの種類を指定できます。

pdwInnerContentTypeDWORD*outoptional

内側のメッセージの種類を指定する DWORD へのポインターです。pdwMsgType で使用されるメッセージの種類のコードがここでも使用されます。

暗号化の入れ子がない場合は CMSG_DATA が返されます。

pbDecodedBYTE*outoptional

デコードされたメッセージを受け取るバッファーへのポインターです。

デコードされたメッセージが不要な場合、またはメモリ割り当てのためにデコードされたメッセージのサイズを取得する場合は、このパラメーターを NULL にできます。このパラメーターが NULL の場合、デコードされたメッセージは返されません。詳細については、 Retrieving Data of Unknown Length を参照してください。

pcbDecodedDWORD*inoutoptional

pbDecoded パラメーターが指すバッファーのサイズ (バイト単位) を指定する変数へのポインターです。関数から戻ると、この変数にはデコードされたメッセージのサイズが格納されます。

注意 バッファーに返されたデータを処理する際、アプリケーションは実際に返されたデータのサイズを使用する必要があります。実際のサイズは、入力時に指定したバッファーのサイズよりわずかに小さくなる場合があります。(入力時には、出力されうる最大のデータが収まるよう、通常は十分に大きなバッファーサイズを指定します。) 出力時には、このパラメーターが指す変数が、バッファーにコピーされた実際のデータサイズを反映するように更新されます。
ppXchgCertCERT_CONTEXT**outoptionalメッセージのデコードに必要な秘密交換キーに対応する証明書を持つ CERT_CONTEXT 構造体へのポインターへのポインターです。このパラメーターは CMSG_ENVELOPED 型および CMSG_SIGNED_AND_ENVELOPED 型のメッセージに対してのみ設定されます。
ppSignerCertCERT_CONTEXT**outoptional署名者の証明書コンテキストを表す CERT_CONTEXT 構造体へのポインターへのポインターです。このパラメーターは CMSG_SIGNED 型および CMSG_SIGNED_AND_ENVELOPED 型のメッセージに対してのみ設定されます。

戻り値の型: BOOL

公式ドキュメント

暗号化メッセージのデコード、復号、および検証を行います。

戻り値

関数が成功すると、0 以外の値 (TRUE) が返されます。

関数が失敗すると、0 (FALSE) が返されます。拡張エラー情報を取得するには、 GetLastError を呼び出します。

CryptDecryptMessageCryptVerifyMessageSignature、または CryptVerifyMessageHash 関数のエラーがこの関数に伝播することがあります。

次のエラーコードが GetLastError 関数によって返される最も一般的なものです。

戻り値 説明
ERROR_MORE_DATA
pbDecoded パラメーターで指定したバッファーが返されるデータを保持するのに十分な大きさでない場合、関数は ERROR_MORE_DATA コードを設定し、必要なバッファーサイズ (バイト単位) を pcbDecoded が指す変数に格納します。

解説(Remarks)

dwMsgTypeFlags パラメーターは、許可されるメッセージの集合を指定します。たとえば、SIGNED メッセージまたは ENVELOPED メッセージのいずれかをデコードするには、dwMsgTypeFlags に CMSG_SIGNED_FLAG | CMSG_ENVELOPED_FLAG を設定します。pDecryptPara パラメーターまたは pVerifyPara パラメーターのいずれか一方、または両方を指定する必要があります。

メッセージのデコードまたは検証に成功すると、ppXchgCert および ppSignerCert が指す証明書コンテキストのポインターが更新されます。これらは CertFreeCertificateContext を呼び出して解放する必要があります。関数が失敗した場合、これらは NULL に設定されます。

関数を呼び出す前に ppXchgCert または ppSignerCert パラメーターを NULL に設定できます。これは、交換証明書または署名者の証明書コンテキストの取得を呼び出し元が必要としないことを示します。

出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)

各言語での呼び出し定義

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

BOOL CryptDecodeMessage(
    DWORD dwMsgTypeFlags,
    CRYPT_DECRYPT_MESSAGE_PARA* pDecryptPara,   // optional
    CRYPT_VERIFY_MESSAGE_PARA* pVerifyPara,   // optional
    DWORD dwSignerIndex,
    const BYTE* pbEncodedBlob,
    DWORD cbEncodedBlob,
    DWORD dwPrevInnerContentType,
    DWORD* pdwMsgType,   // optional
    DWORD* pdwInnerContentType,   // optional
    BYTE* pbDecoded,   // optional
    DWORD* pcbDecoded,   // optional
    CERT_CONTEXT** ppXchgCert,   // optional
    CERT_CONTEXT** ppSignerCert   // optional
);
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("CRYPT32.dll", SetLastError = true, ExactSpelling = true)]
static extern bool CryptDecodeMessage(
    uint dwMsgTypeFlags,   // DWORD
    IntPtr pDecryptPara,   // CRYPT_DECRYPT_MESSAGE_PARA* optional
    IntPtr pVerifyPara,   // CRYPT_VERIFY_MESSAGE_PARA* optional
    uint dwSignerIndex,   // DWORD
    IntPtr pbEncodedBlob,   // BYTE*
    uint cbEncodedBlob,   // DWORD
    uint dwPrevInnerContentType,   // DWORD
    IntPtr pdwMsgType,   // DWORD* optional, out
    IntPtr pdwInnerContentType,   // DWORD* optional, out
    IntPtr pbDecoded,   // BYTE* optional, out
    IntPtr pcbDecoded,   // DWORD* optional, in/out
    IntPtr ppXchgCert,   // CERT_CONTEXT** optional, out
    IntPtr ppSignerCert   // CERT_CONTEXT** optional, out
);
<DllImport("CRYPT32.dll", SetLastError:=True, ExactSpelling:=True)>
Public Shared Function CryptDecodeMessage(
    dwMsgTypeFlags As UInteger,   ' DWORD
    pDecryptPara As IntPtr,   ' CRYPT_DECRYPT_MESSAGE_PARA* optional
    pVerifyPara As IntPtr,   ' CRYPT_VERIFY_MESSAGE_PARA* optional
    dwSignerIndex As UInteger,   ' DWORD
    pbEncodedBlob As IntPtr,   ' BYTE*
    cbEncodedBlob As UInteger,   ' DWORD
    dwPrevInnerContentType As UInteger,   ' DWORD
    pdwMsgType As IntPtr,   ' DWORD* optional, out
    pdwInnerContentType As IntPtr,   ' DWORD* optional, out
    pbDecoded As IntPtr,   ' BYTE* optional, out
    pcbDecoded As IntPtr,   ' DWORD* optional, in/out
    ppXchgCert As IntPtr,   ' CERT_CONTEXT** optional, out
    ppSignerCert As IntPtr   ' CERT_CONTEXT** optional, out
) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
' dwMsgTypeFlags : DWORD
' pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional
' pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional
' dwSignerIndex : DWORD
' pbEncodedBlob : BYTE*
' cbEncodedBlob : DWORD
' dwPrevInnerContentType : DWORD
' pdwMsgType : DWORD* optional, out
' pdwInnerContentType : DWORD* optional, out
' pbDecoded : BYTE* optional, out
' pcbDecoded : DWORD* optional, in/out
' ppXchgCert : CERT_CONTEXT** optional, out
' ppSignerCert : CERT_CONTEXT** optional, out
Declare PtrSafe Function CryptDecodeMessage Lib "crypt32" ( _
    ByVal dwMsgTypeFlags As Long, _
    ByVal pDecryptPara As LongPtr, _
    ByVal pVerifyPara As LongPtr, _
    ByVal dwSignerIndex As Long, _
    ByVal pbEncodedBlob As LongPtr, _
    ByVal cbEncodedBlob As Long, _
    ByVal dwPrevInnerContentType As Long, _
    ByVal pdwMsgType As LongPtr, _
    ByVal pdwInnerContentType As LongPtr, _
    ByVal pbDecoded As LongPtr, _
    ByVal pcbDecoded As LongPtr, _
    ByVal ppXchgCert As LongPtr, _
    ByVal ppSignerCert As LongPtr) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。
import ctypes
from ctypes import wintypes

CryptDecodeMessage = ctypes.windll.crypt32.CryptDecodeMessage
CryptDecodeMessage.restype = wintypes.BOOL
CryptDecodeMessage.argtypes = [
    wintypes.DWORD,  # dwMsgTypeFlags : DWORD
    ctypes.c_void_p,  # pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional
    ctypes.c_void_p,  # pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional
    wintypes.DWORD,  # dwSignerIndex : DWORD
    ctypes.POINTER(ctypes.c_ubyte),  # pbEncodedBlob : BYTE*
    wintypes.DWORD,  # cbEncodedBlob : DWORD
    wintypes.DWORD,  # dwPrevInnerContentType : DWORD
    ctypes.POINTER(wintypes.DWORD),  # pdwMsgType : DWORD* optional, out
    ctypes.POINTER(wintypes.DWORD),  # pdwInnerContentType : DWORD* optional, out
    ctypes.POINTER(ctypes.c_ubyte),  # pbDecoded : BYTE* optional, out
    ctypes.POINTER(wintypes.DWORD),  # pcbDecoded : DWORD* optional, in/out
    ctypes.c_void_p,  # ppXchgCert : CERT_CONTEXT** optional, out
    ctypes.c_void_p,  # ppSignerCert : CERT_CONTEXT** optional, out
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('CRYPT32.dll')
CryptDecodeMessage = Fiddle::Function.new(
  lib['CryptDecodeMessage'],
  [
    -Fiddle::TYPE_INT,  # dwMsgTypeFlags : DWORD
    Fiddle::TYPE_VOIDP,  # pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional
    Fiddle::TYPE_VOIDP,  # pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional
    -Fiddle::TYPE_INT,  # dwSignerIndex : DWORD
    Fiddle::TYPE_VOIDP,  # pbEncodedBlob : BYTE*
    -Fiddle::TYPE_INT,  # cbEncodedBlob : DWORD
    -Fiddle::TYPE_INT,  # dwPrevInnerContentType : DWORD
    Fiddle::TYPE_VOIDP,  # pdwMsgType : DWORD* optional, out
    Fiddle::TYPE_VOIDP,  # pdwInnerContentType : DWORD* optional, out
    Fiddle::TYPE_VOIDP,  # pbDecoded : BYTE* optional, out
    Fiddle::TYPE_VOIDP,  # pcbDecoded : DWORD* optional, in/out
    Fiddle::TYPE_VOIDP,  # ppXchgCert : CERT_CONTEXT** optional, out
    Fiddle::TYPE_VOIDP,  # ppSignerCert : CERT_CONTEXT** optional, out
  ],
  Fiddle::TYPE_INT)
#[link(name = "crypt32")]
extern "system" {
    fn CryptDecodeMessage(
        dwMsgTypeFlags: u32,  // DWORD
        pDecryptPara: *mut CRYPT_DECRYPT_MESSAGE_PARA,  // CRYPT_DECRYPT_MESSAGE_PARA* optional
        pVerifyPara: *mut CRYPT_VERIFY_MESSAGE_PARA,  // CRYPT_VERIFY_MESSAGE_PARA* optional
        dwSignerIndex: u32,  // DWORD
        pbEncodedBlob: *const u8,  // BYTE*
        cbEncodedBlob: u32,  // DWORD
        dwPrevInnerContentType: u32,  // DWORD
        pdwMsgType: *mut u32,  // DWORD* optional, out
        pdwInnerContentType: *mut u32,  // DWORD* optional, out
        pbDecoded: *mut u8,  // BYTE* optional, out
        pcbDecoded: *mut u32,  // DWORD* optional, in/out
        ppXchgCert: *mut *mut CERT_CONTEXT,  // CERT_CONTEXT** optional, out
        ppSignerCert: *mut *mut CERT_CONTEXT  // CERT_CONTEXT** optional, out
    ) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.
$sig = @"
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("CRYPT32.dll", SetLastError = true)]
public static extern bool CryptDecodeMessage(uint dwMsgTypeFlags, IntPtr pDecryptPara, IntPtr pVerifyPara, uint dwSignerIndex, IntPtr pbEncodedBlob, uint cbEncodedBlob, uint dwPrevInnerContentType, IntPtr pdwMsgType, IntPtr pdwInnerContentType, IntPtr pbDecoded, IntPtr pcbDecoded, IntPtr ppXchgCert, IntPtr ppSignerCert);
"@
$api = Add-Type -MemberDefinition $sig -Name 'CRYPT32_CryptDecodeMessage' -Namespace Win32 -PassThru
# $api::CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
#uselib "CRYPT32.dll"
#func global CryptDecodeMessage "CryptDecodeMessage" sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr
; CryptDecodeMessage dwMsgTypeFlags, varptr(pDecryptPara), varptr(pVerifyPara), dwSignerIndex, varptr(pbEncodedBlob), cbEncodedBlob, dwPrevInnerContentType, varptr(pdwMsgType), varptr(pdwInnerContentType), varptr(pbDecoded), varptr(pcbDecoded), varptr(ppXchgCert), varptr(ppSignerCert)   ; 戻り値は stat
; dwMsgTypeFlags : DWORD -> "sptr"
; pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> "sptr"
; pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> "sptr"
; dwSignerIndex : DWORD -> "sptr"
; pbEncodedBlob : BYTE* -> "sptr"
; cbEncodedBlob : DWORD -> "sptr"
; dwPrevInnerContentType : DWORD -> "sptr"
; pdwMsgType : DWORD* optional, out -> "sptr"
; pdwInnerContentType : DWORD* optional, out -> "sptr"
; pbDecoded : BYTE* optional, out -> "sptr"
; pcbDecoded : DWORD* optional, in/out -> "sptr"
; ppXchgCert : CERT_CONTEXT** optional, out -> "sptr"
; ppSignerCert : CERT_CONTEXT** optional, out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数:
#uselib "CRYPT32.dll"
#cfunc global CryptDecodeMessage "CryptDecodeMessage" int, var, var, int, var, int, int, var, var, var, var, var, var
; res = CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
; dwMsgTypeFlags : DWORD -> "int"
; pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> "var"
; pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> "var"
; dwSignerIndex : DWORD -> "int"
; pbEncodedBlob : BYTE* -> "var"
; cbEncodedBlob : DWORD -> "int"
; dwPrevInnerContentType : DWORD -> "int"
; pdwMsgType : DWORD* optional, out -> "var"
; pdwInnerContentType : DWORD* optional, out -> "var"
; pbDecoded : BYTE* optional, out -> "var"
; pcbDecoded : DWORD* optional, in/out -> "var"
; ppXchgCert : CERT_CONTEXT** optional, out -> "var"
; ppSignerCert : CERT_CONTEXT** optional, out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数:
; BOOL CryptDecodeMessage(DWORD dwMsgTypeFlags, CRYPT_DECRYPT_MESSAGE_PARA* pDecryptPara, CRYPT_VERIFY_MESSAGE_PARA* pVerifyPara, DWORD dwSignerIndex, BYTE* pbEncodedBlob, DWORD cbEncodedBlob, DWORD dwPrevInnerContentType, DWORD* pdwMsgType, DWORD* pdwInnerContentType, BYTE* pbDecoded, DWORD* pcbDecoded, CERT_CONTEXT** ppXchgCert, CERT_CONTEXT** ppSignerCert)
#uselib "CRYPT32.dll"
#cfunc global CryptDecodeMessage "CryptDecodeMessage" int, var, var, int, var, int, int, var, var, var, var, var, var
; res = CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
; dwMsgTypeFlags : DWORD -> "int"
; pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> "var"
; pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> "var"
; dwSignerIndex : DWORD -> "int"
; pbEncodedBlob : BYTE* -> "var"
; cbEncodedBlob : DWORD -> "int"
; dwPrevInnerContentType : DWORD -> "int"
; pdwMsgType : DWORD* optional, out -> "var"
; pdwInnerContentType : DWORD* optional, out -> "var"
; pbDecoded : BYTE* optional, out -> "var"
; pcbDecoded : DWORD* optional, in/out -> "var"
; ppXchgCert : CERT_CONTEXT** optional, out -> "var"
; ppSignerCert : CERT_CONTEXT** optional, out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	crypt32 = windows.NewLazySystemDLL("CRYPT32.dll")
	procCryptDecodeMessage = crypt32.NewProc("CryptDecodeMessage")
)

// dwMsgTypeFlags (DWORD), pDecryptPara (CRYPT_DECRYPT_MESSAGE_PARA* optional), pVerifyPara (CRYPT_VERIFY_MESSAGE_PARA* optional), dwSignerIndex (DWORD), pbEncodedBlob (BYTE*), cbEncodedBlob (DWORD), dwPrevInnerContentType (DWORD), pdwMsgType (DWORD* optional, out), pdwInnerContentType (DWORD* optional, out), pbDecoded (BYTE* optional, out), pcbDecoded (DWORD* optional, in/out), ppXchgCert (CERT_CONTEXT** optional, out), ppSignerCert (CERT_CONTEXT** optional, out)
r1, _, err := procCryptDecodeMessage.Call(
	uintptr(dwMsgTypeFlags),
	uintptr(pDecryptPara),
	uintptr(pVerifyPara),
	uintptr(dwSignerIndex),
	uintptr(pbEncodedBlob),
	uintptr(cbEncodedBlob),
	uintptr(dwPrevInnerContentType),
	uintptr(pdwMsgType),
	uintptr(pdwInnerContentType),
	uintptr(pbDecoded),
	uintptr(pcbDecoded),
	uintptr(ppXchgCert),
	uintptr(ppSignerCert),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // BOOL
function CryptDecodeMessage(
  dwMsgTypeFlags: DWORD;   // DWORD
  pDecryptPara: Pointer;   // CRYPT_DECRYPT_MESSAGE_PARA* optional
  pVerifyPara: Pointer;   // CRYPT_VERIFY_MESSAGE_PARA* optional
  dwSignerIndex: DWORD;   // DWORD
  pbEncodedBlob: Pointer;   // BYTE*
  cbEncodedBlob: DWORD;   // DWORD
  dwPrevInnerContentType: DWORD;   // DWORD
  pdwMsgType: Pointer;   // DWORD* optional, out
  pdwInnerContentType: Pointer;   // DWORD* optional, out
  pbDecoded: Pointer;   // BYTE* optional, out
  pcbDecoded: Pointer;   // DWORD* optional, in/out
  ppXchgCert: Pointer;   // CERT_CONTEXT** optional, out
  ppSignerCert: Pointer   // CERT_CONTEXT** optional, out
): BOOL; stdcall;
  external 'CRYPT32.dll' name 'CryptDecodeMessage';
result := DllCall("CRYPT32\CryptDecodeMessage"
    , "UInt", dwMsgTypeFlags   ; DWORD
    , "Ptr", pDecryptPara   ; CRYPT_DECRYPT_MESSAGE_PARA* optional
    , "Ptr", pVerifyPara   ; CRYPT_VERIFY_MESSAGE_PARA* optional
    , "UInt", dwSignerIndex   ; DWORD
    , "Ptr", pbEncodedBlob   ; BYTE*
    , "UInt", cbEncodedBlob   ; DWORD
    , "UInt", dwPrevInnerContentType   ; DWORD
    , "Ptr", pdwMsgType   ; DWORD* optional, out
    , "Ptr", pdwInnerContentType   ; DWORD* optional, out
    , "Ptr", pbDecoded   ; BYTE* optional, out
    , "Ptr", pcbDecoded   ; DWORD* optional, in/out
    , "Ptr", ppXchgCert   ; CERT_CONTEXT** optional, out
    , "Ptr", ppSignerCert   ; CERT_CONTEXT** optional, out
    , "Int")   ; return: BOOL
●CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert) = DLL("CRYPT32.dll", "bool CryptDecodeMessage(dword, void*, void*, dword, void*, dword, dword, void*, void*, void*, void*, void*, void*)")
# 呼び出し: CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
# dwMsgTypeFlags : DWORD -> "dword"
# pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> "void*"
# pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> "void*"
# dwSignerIndex : DWORD -> "dword"
# pbEncodedBlob : BYTE* -> "void*"
# cbEncodedBlob : DWORD -> "dword"
# dwPrevInnerContentType : DWORD -> "dword"
# pdwMsgType : DWORD* optional, out -> "void*"
# pdwInnerContentType : DWORD* optional, out -> "void*"
# pbDecoded : BYTE* optional, out -> "void*"
# pcbDecoded : DWORD* optional, in/out -> "void*"
# ppXchgCert : CERT_CONTEXT** optional, out -> "void*"
# ppSignerCert : CERT_CONTEXT** optional, out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
const std = @import("std");

extern "crypt32" fn CryptDecodeMessage(
    dwMsgTypeFlags: u32, // DWORD
    pDecryptPara: [*c]CRYPT_DECRYPT_MESSAGE_PARA, // CRYPT_DECRYPT_MESSAGE_PARA* optional
    pVerifyPara: [*c]CRYPT_VERIFY_MESSAGE_PARA, // CRYPT_VERIFY_MESSAGE_PARA* optional
    dwSignerIndex: u32, // DWORD
    pbEncodedBlob: [*c]u8, // BYTE*
    cbEncodedBlob: u32, // DWORD
    dwPrevInnerContentType: u32, // DWORD
    pdwMsgType: [*c]u32, // DWORD* optional, out
    pdwInnerContentType: [*c]u32, // DWORD* optional, out
    pbDecoded: [*c]u8, // BYTE* optional, out
    pcbDecoded: [*c]u32, // DWORD* optional, in/out
    ppXchgCert: [*c][*c]CERT_CONTEXT, // CERT_CONTEXT** optional, out
    ppSignerCert: [*c][*c]CERT_CONTEXT // CERT_CONTEXT** optional, out
) callconv(std.os.windows.WINAPI) i32;
proc CryptDecodeMessage(
    dwMsgTypeFlags: uint32,  # DWORD
    pDecryptPara: ptr CRYPT_DECRYPT_MESSAGE_PARA,  # CRYPT_DECRYPT_MESSAGE_PARA* optional
    pVerifyPara: ptr CRYPT_VERIFY_MESSAGE_PARA,  # CRYPT_VERIFY_MESSAGE_PARA* optional
    dwSignerIndex: uint32,  # DWORD
    pbEncodedBlob: ptr uint8,  # BYTE*
    cbEncodedBlob: uint32,  # DWORD
    dwPrevInnerContentType: uint32,  # DWORD
    pdwMsgType: ptr uint32,  # DWORD* optional, out
    pdwInnerContentType: ptr uint32,  # DWORD* optional, out
    pbDecoded: ptr uint8,  # BYTE* optional, out
    pcbDecoded: ptr uint32,  # DWORD* optional, in/out
    ppXchgCert: ptr CERT_CONTEXT,  # CERT_CONTEXT** optional, out
    ppSignerCert: ptr CERT_CONTEXT  # CERT_CONTEXT** optional, out
): int32 {.importc: "CryptDecodeMessage", stdcall, dynlib: "CRYPT32.dll".}
pragma(lib, "crypt32");
extern(Windows)
int CryptDecodeMessage(
    uint dwMsgTypeFlags,   // DWORD
    CRYPT_DECRYPT_MESSAGE_PARA* pDecryptPara,   // CRYPT_DECRYPT_MESSAGE_PARA* optional
    CRYPT_VERIFY_MESSAGE_PARA* pVerifyPara,   // CRYPT_VERIFY_MESSAGE_PARA* optional
    uint dwSignerIndex,   // DWORD
    ubyte* pbEncodedBlob,   // BYTE*
    uint cbEncodedBlob,   // DWORD
    uint dwPrevInnerContentType,   // DWORD
    uint* pdwMsgType,   // DWORD* optional, out
    uint* pdwInnerContentType,   // DWORD* optional, out
    ubyte* pbDecoded,   // BYTE* optional, out
    uint* pcbDecoded,   // DWORD* optional, in/out
    CERT_CONTEXT** ppXchgCert,   // CERT_CONTEXT** optional, out
    CERT_CONTEXT** ppSignerCert   // CERT_CONTEXT** optional, out
);
ccall((:CryptDecodeMessage, "CRYPT32.dll"), stdcall, Int32,
      (UInt32, Ptr{CRYPT_DECRYPT_MESSAGE_PARA}, Ptr{CRYPT_VERIFY_MESSAGE_PARA}, UInt32, Ptr{UInt8}, UInt32, UInt32, Ptr{UInt32}, Ptr{UInt32}, Ptr{UInt8}, Ptr{UInt32}, Ptr{CERT_CONTEXT}, Ptr{CERT_CONTEXT}),
      dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
# dwMsgTypeFlags : DWORD -> UInt32
# pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> Ptr{CRYPT_DECRYPT_MESSAGE_PARA}
# pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> Ptr{CRYPT_VERIFY_MESSAGE_PARA}
# dwSignerIndex : DWORD -> UInt32
# pbEncodedBlob : BYTE* -> Ptr{UInt8}
# cbEncodedBlob : DWORD -> UInt32
# dwPrevInnerContentType : DWORD -> UInt32
# pdwMsgType : DWORD* optional, out -> Ptr{UInt32}
# pdwInnerContentType : DWORD* optional, out -> Ptr{UInt32}
# pbDecoded : BYTE* optional, out -> Ptr{UInt8}
# pcbDecoded : DWORD* optional, in/out -> Ptr{UInt32}
# ppXchgCert : CERT_CONTEXT** optional, out -> Ptr{CERT_CONTEXT}
# ppSignerCert : CERT_CONTEXT** optional, out -> Ptr{CERT_CONTEXT}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
local ffi = require("ffi")
ffi.cdef[[
int32_t CryptDecodeMessage(
    uint32_t dwMsgTypeFlags,
    void* pDecryptPara,
    void* pVerifyPara,
    uint32_t dwSignerIndex,
    uint8_t* pbEncodedBlob,
    uint32_t cbEncodedBlob,
    uint32_t dwPrevInnerContentType,
    uint32_t* pdwMsgType,
    uint32_t* pdwInnerContentType,
    uint8_t* pbDecoded,
    uint32_t* pcbDecoded,
    void* ppXchgCert,
    void* ppSignerCert);
]]
local crypt32 = ffi.load("crypt32")
-- crypt32.CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
-- dwMsgTypeFlags : DWORD
-- pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional
-- pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional
-- dwSignerIndex : DWORD
-- pbEncodedBlob : BYTE*
-- cbEncodedBlob : DWORD
-- dwPrevInnerContentType : DWORD
-- pdwMsgType : DWORD* optional, out
-- pdwInnerContentType : DWORD* optional, out
-- pbDecoded : BYTE* optional, out
-- pcbDecoded : DWORD* optional, in/out
-- ppXchgCert : CERT_CONTEXT** optional, out
-- ppSignerCert : CERT_CONTEXT** optional, out
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
const koffi = require('koffi');
const lib = koffi.load('CRYPT32.dll');
const CryptDecodeMessage = lib.func('__stdcall', 'CryptDecodeMessage', 'int32_t', ['uint32_t', 'void *', 'void *', 'uint32_t', 'uint8_t *', 'uint32_t', 'uint32_t', 'uint32_t *', 'uint32_t *', 'uint8_t *', 'uint32_t *', 'void *', 'void *']);
// CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
// dwMsgTypeFlags : DWORD -> 'uint32_t'
// pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> 'void *'
// pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> 'void *'
// dwSignerIndex : DWORD -> 'uint32_t'
// pbEncodedBlob : BYTE* -> 'uint8_t *'
// cbEncodedBlob : DWORD -> 'uint32_t'
// dwPrevInnerContentType : DWORD -> 'uint32_t'
// pdwMsgType : DWORD* optional, out -> 'uint32_t *'
// pdwInnerContentType : DWORD* optional, out -> 'uint32_t *'
// pbDecoded : BYTE* optional, out -> 'uint8_t *'
// pcbDecoded : DWORD* optional, in/out -> 'uint32_t *'
// ppXchgCert : CERT_CONTEXT** optional, out -> 'void *'
// ppSignerCert : CERT_CONTEXT** optional, out -> 'void *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
const lib = Deno.dlopen("CRYPT32.dll", {
  CryptDecodeMessage: { parameters: ["u32", "pointer", "pointer", "u32", "pointer", "u32", "u32", "pointer", "pointer", "pointer", "pointer", "pointer", "pointer"], result: "i32" },
});
// lib.symbols.CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert)
// dwMsgTypeFlags : DWORD -> "u32"
// pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> "pointer"
// pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> "pointer"
// dwSignerIndex : DWORD -> "u32"
// pbEncodedBlob : BYTE* -> "pointer"
// cbEncodedBlob : DWORD -> "u32"
// dwPrevInnerContentType : DWORD -> "u32"
// pdwMsgType : DWORD* optional, out -> "pointer"
// pdwInnerContentType : DWORD* optional, out -> "pointer"
// pbDecoded : BYTE* optional, out -> "pointer"
// pcbDecoded : DWORD* optional, in/out -> "pointer"
// ppXchgCert : CERT_CONTEXT** optional, out -> "pointer"
// ppSignerCert : CERT_CONTEXT** optional, out -> "pointer"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
int32_t CryptDecodeMessage(
    uint32_t dwMsgTypeFlags,
    void* pDecryptPara,
    void* pVerifyPara,
    uint32_t dwSignerIndex,
    uint8_t* pbEncodedBlob,
    uint32_t cbEncodedBlob,
    uint32_t dwPrevInnerContentType,
    uint32_t* pdwMsgType,
    uint32_t* pdwInnerContentType,
    uint8_t* pbDecoded,
    uint32_t* pcbDecoded,
    void* ppXchgCert,
    void* ppSignerCert);
C, "CRYPT32.dll");
// $ffi->CryptDecodeMessage(dwMsgTypeFlags, pDecryptPara, pVerifyPara, dwSignerIndex, pbEncodedBlob, cbEncodedBlob, dwPrevInnerContentType, pdwMsgType, pdwInnerContentType, pbDecoded, pcbDecoded, ppXchgCert, ppSignerCert);
// dwMsgTypeFlags : DWORD
// pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional
// pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional
// dwSignerIndex : DWORD
// pbEncodedBlob : BYTE*
// cbEncodedBlob : DWORD
// dwPrevInnerContentType : DWORD
// pdwMsgType : DWORD* optional, out
// pdwInnerContentType : DWORD* optional, out
// pbDecoded : BYTE* optional, out
// pcbDecoded : DWORD* optional, in/out
// ppXchgCert : CERT_CONTEXT** optional, out
// ppSignerCert : CERT_CONTEXT** optional, out
// 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
// WINAPI(stdcall): x64 では呼出規約が統一されるため問題なし。x86 では __stdcall 対応のラッパが必要な場合あり。
import com.sun.jna.*;
import com.sun.jna.ptr.*;
import com.sun.jna.win32.StdCallLibrary;
import com.sun.jna.win32.W32APIOptions;

public interface Crypt32 extends StdCallLibrary {
    Crypt32 INSTANCE = Native.load("crypt32", Crypt32.class);
    boolean CryptDecodeMessage(
        int dwMsgTypeFlags,   // DWORD
        Pointer pDecryptPara,   // CRYPT_DECRYPT_MESSAGE_PARA* optional
        Pointer pVerifyPara,   // CRYPT_VERIFY_MESSAGE_PARA* optional
        int dwSignerIndex,   // DWORD
        byte[] pbEncodedBlob,   // BYTE*
        int cbEncodedBlob,   // DWORD
        int dwPrevInnerContentType,   // DWORD
        IntByReference pdwMsgType,   // DWORD* optional, out
        IntByReference pdwInnerContentType,   // DWORD* optional, out
        byte[] pbDecoded,   // BYTE* optional, out
        IntByReference pcbDecoded,   // DWORD* optional, in/out
        Pointer ppXchgCert,   // CERT_CONTEXT** optional, out
        Pointer ppSignerCert   // CERT_CONTEXT** optional, out
    );
}
@[Link("crypt32")]
lib LibCRYPT32
  fun CryptDecodeMessage = CryptDecodeMessage(
    dwMsgTypeFlags : UInt32,   # DWORD
    pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA*,   # CRYPT_DECRYPT_MESSAGE_PARA* optional
    pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA*,   # CRYPT_VERIFY_MESSAGE_PARA* optional
    dwSignerIndex : UInt32,   # DWORD
    pbEncodedBlob : UInt8*,   # BYTE*
    cbEncodedBlob : UInt32,   # DWORD
    dwPrevInnerContentType : UInt32,   # DWORD
    pdwMsgType : UInt32*,   # DWORD* optional, out
    pdwInnerContentType : UInt32*,   # DWORD* optional, out
    pbDecoded : UInt8*,   # BYTE* optional, out
    pcbDecoded : UInt32*,   # DWORD* optional, in/out
    ppXchgCert : CERT_CONTEXT**,   # CERT_CONTEXT** optional, out
    ppSignerCert : CERT_CONTEXT**   # CERT_CONTEXT** optional, out
  ) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef CryptDecodeMessageNative = Int32 Function(Uint32, Pointer<Void>, Pointer<Void>, Uint32, Pointer<Uint8>, Uint32, Uint32, Pointer<Uint32>, Pointer<Uint32>, Pointer<Uint8>, Pointer<Uint32>, Pointer<Void>, Pointer<Void>);
typedef CryptDecodeMessageDart = int Function(int, Pointer<Void>, Pointer<Void>, int, Pointer<Uint8>, int, int, Pointer<Uint32>, Pointer<Uint32>, Pointer<Uint8>, Pointer<Uint32>, Pointer<Void>, Pointer<Void>);
final CryptDecodeMessage = DynamicLibrary.open('CRYPT32.dll')
    .lookupFunction<CryptDecodeMessageNative, CryptDecodeMessageDart>('CryptDecodeMessage');
// dwMsgTypeFlags : DWORD -> Uint32
// pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> Pointer<Void>
// pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> Pointer<Void>
// dwSignerIndex : DWORD -> Uint32
// pbEncodedBlob : BYTE* -> Pointer<Uint8>
// cbEncodedBlob : DWORD -> Uint32
// dwPrevInnerContentType : DWORD -> Uint32
// pdwMsgType : DWORD* optional, out -> Pointer<Uint32>
// pdwInnerContentType : DWORD* optional, out -> Pointer<Uint32>
// pbDecoded : BYTE* optional, out -> Pointer<Uint8>
// pcbDecoded : DWORD* optional, in/out -> Pointer<Uint32>
// ppXchgCert : CERT_CONTEXT** optional, out -> Pointer<Void>
// ppSignerCert : CERT_CONTEXT** optional, out -> Pointer<Void>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function CryptDecodeMessage(
  dwMsgTypeFlags: DWORD;   // DWORD
  pDecryptPara: Pointer;   // CRYPT_DECRYPT_MESSAGE_PARA* optional
  pVerifyPara: Pointer;   // CRYPT_VERIFY_MESSAGE_PARA* optional
  dwSignerIndex: DWORD;   // DWORD
  pbEncodedBlob: Pointer;   // BYTE*
  cbEncodedBlob: DWORD;   // DWORD
  dwPrevInnerContentType: DWORD;   // DWORD
  pdwMsgType: Pointer;   // DWORD* optional, out
  pdwInnerContentType: Pointer;   // DWORD* optional, out
  pbDecoded: Pointer;   // BYTE* optional, out
  pcbDecoded: Pointer;   // DWORD* optional, in/out
  ppXchgCert: Pointer;   // CERT_CONTEXT** optional, out
  ppSignerCert: Pointer   // CERT_CONTEXT** optional, out
): BOOL; stdcall;
  external 'CRYPT32.dll' name 'CryptDecodeMessage';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "CryptDecodeMessage"
  c_CryptDecodeMessage :: Word32 -> Ptr () -> Ptr () -> Word32 -> Ptr Word8 -> Word32 -> Word32 -> Ptr Word32 -> Ptr Word32 -> Ptr Word8 -> Ptr Word32 -> Ptr () -> Ptr () -> IO CInt
-- dwMsgTypeFlags : DWORD -> Word32
-- pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> Ptr ()
-- pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> Ptr ()
-- dwSignerIndex : DWORD -> Word32
-- pbEncodedBlob : BYTE* -> Ptr Word8
-- cbEncodedBlob : DWORD -> Word32
-- dwPrevInnerContentType : DWORD -> Word32
-- pdwMsgType : DWORD* optional, out -> Ptr Word32
-- pdwInnerContentType : DWORD* optional, out -> Ptr Word32
-- pbDecoded : BYTE* optional, out -> Ptr Word8
-- pcbDecoded : DWORD* optional, in/out -> Ptr Word32
-- ppXchgCert : CERT_CONTEXT** optional, out -> Ptr ()
-- ppSignerCert : CERT_CONTEXT** optional, out -> Ptr ()
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let cryptdecodemessage =
  foreign "CryptDecodeMessage"
    (uint32_t @-> (ptr void) @-> (ptr void) @-> uint32_t @-> (ptr uint8_t) @-> uint32_t @-> uint32_t @-> (ptr uint32_t) @-> (ptr uint32_t) @-> (ptr uint8_t) @-> (ptr uint32_t) @-> (ptr void) @-> (ptr void) @-> returning int32_t)
(* dwMsgTypeFlags : DWORD -> uint32_t *)
(* pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> (ptr void) *)
(* pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> (ptr void) *)
(* dwSignerIndex : DWORD -> uint32_t *)
(* pbEncodedBlob : BYTE* -> (ptr uint8_t) *)
(* cbEncodedBlob : DWORD -> uint32_t *)
(* dwPrevInnerContentType : DWORD -> uint32_t *)
(* pdwMsgType : DWORD* optional, out -> (ptr uint32_t) *)
(* pdwInnerContentType : DWORD* optional, out -> (ptr uint32_t) *)
(* pbDecoded : BYTE* optional, out -> (ptr uint8_t) *)
(* pcbDecoded : DWORD* optional, in/out -> (ptr uint32_t) *)
(* ppXchgCert : CERT_CONTEXT** optional, out -> (ptr void) *)
(* ppSignerCert : CERT_CONTEXT** optional, out -> (ptr void) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library crypt32 (t "CRYPT32.dll"))
(cffi:use-foreign-library crypt32)

(cffi:defcfun ("CryptDecodeMessage" crypt-decode-message :convention :stdcall) :int32
  (dw-msg-type-flags :uint32)   ; DWORD
  (p-decrypt-para :pointer)   ; CRYPT_DECRYPT_MESSAGE_PARA* optional
  (p-verify-para :pointer)   ; CRYPT_VERIFY_MESSAGE_PARA* optional
  (dw-signer-index :uint32)   ; DWORD
  (pb-encoded-blob :pointer)   ; BYTE*
  (cb-encoded-blob :uint32)   ; DWORD
  (dw-prev-inner-content-type :uint32)   ; DWORD
  (pdw-msg-type :pointer)   ; DWORD* optional, out
  (pdw-inner-content-type :pointer)   ; DWORD* optional, out
  (pb-decoded :pointer)   ; BYTE* optional, out
  (pcb-decoded :pointer)   ; DWORD* optional, in/out
  (pp-xchg-cert :pointer)   ; CERT_CONTEXT** optional, out
  (pp-signer-cert :pointer))   ; CERT_CONTEXT** optional, out
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $CryptDecodeMessage = Win32::API::More->new('CRYPT32',
    'BOOL CryptDecodeMessage(DWORD dwMsgTypeFlags, LPVOID pDecryptPara, LPVOID pVerifyPara, DWORD dwSignerIndex, LPVOID pbEncodedBlob, DWORD cbEncodedBlob, DWORD dwPrevInnerContentType, LPVOID pdwMsgType, LPVOID pdwInnerContentType, LPVOID pbDecoded, LPVOID pcbDecoded, LPVOID ppXchgCert, LPVOID ppSignerCert)');
# my $ret = $CryptDecodeMessage->Call($dwMsgTypeFlags, $pDecryptPara, $pVerifyPara, $dwSignerIndex, $pbEncodedBlob, $cbEncodedBlob, $dwPrevInnerContentType, $pdwMsgType, $pdwInnerContentType, $pbDecoded, $pcbDecoded, $ppXchgCert, $ppSignerCert);
# dwMsgTypeFlags : DWORD -> DWORD
# pDecryptPara : CRYPT_DECRYPT_MESSAGE_PARA* optional -> LPVOID
# pVerifyPara : CRYPT_VERIFY_MESSAGE_PARA* optional -> LPVOID
# dwSignerIndex : DWORD -> DWORD
# pbEncodedBlob : BYTE* -> LPVOID
# cbEncodedBlob : DWORD -> DWORD
# dwPrevInnerContentType : DWORD -> DWORD
# pdwMsgType : DWORD* optional, out -> LPVOID
# pdwInnerContentType : DWORD* optional, out -> LPVOID
# pbDecoded : BYTE* optional, out -> LPVOID
# pcbDecoded : DWORD* optional, in/out -> LPVOID
# ppXchgCert : CERT_CONTEXT** optional, out -> LPVOID
# ppSignerCert : CERT_CONTEXT** optional, out -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。

関連項目

公式の関連項目
使用する型