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

CryptMsgCountersignEncoded

関数
エンコードされた署名者情報に副署名を付与する。
DLLCRYPT32.dll呼出規約winapiSetLastErrorあり対応OSWindows XP 以降

シグネチャ

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

BOOL CryptMsgCountersignEncoded(
    DWORD dwEncodingType,
    BYTE* pbSignerInfo,
    DWORD cbSignerInfo,
    DWORD cCountersigners,
    CMSG_SIGNER_ENCODE_INFO* rgCountersigners,
    BYTE* pbCountersignature,   // optional
    DWORD* pcbCountersignature
);

パラメーター

名前方向説明
dwEncodingTypeDWORDin

使用するエンコード方式を指定します。現在使用されるのは X509_ASN_ENCODINGPKCS_7_ASN_ENCODING のみですが、将来追加のエンコード方式が追加される可能性があります。現在のどちらのエンコード方式でも、次を使用します。

X509_ASN_ENCODING | PKCS_7_ASN_ENCODING

pbSignerInfoBYTE*in副署対象となるエンコード済み SignerInfo へのポインター。
cbSignerInfoDWORDinエンコード済み SignerInfo データのバイト数。
cCountersignersDWORDinrgCountersigners 配列内の副署者の数。
rgCountersignersCMSG_SIGNER_ENCODE_INFO*in副署者の CMSG_SIGNER_ENCODE_INFO 構造体の配列。
pbCountersignatureBYTE*outoptional

エンコード済みの PKCS #9 countersignature 属性を受け取るバッファーへのポインター。

入力時、このパラメーターを NULL にして、メモリ割り当てのためにこの情報のサイズを取得することができます。詳細については、 Retrieving Data of Unknown Length を参照してください。

pcbCountersignatureDWORD*inoutpbCountersignature パラメーターが指すバッファーのサイズ (バイト単位) を指定する変数へのポインター。関数が戻るとき、pcbCountersignature パラメーターが指す変数には、バッファーに格納されたバイト数が含まれます。

戻り値の型: BOOL

公式ドキュメント

既存の PKCS に副署 (countersign) します。

戻り値

関数が成功した場合、戻り値は 0 以外 (TRUE) です。

関数が失敗した場合、戻り値は 0 (FALSE) です。拡張エラー情報を取得するには、 GetLastError を呼び出します。

次の表に、GetLastError 関数が返す最も一般的なエラーコードを示します。

戻りコード 説明
CRYPT_E_OID_FORMAT
オブジェクト識別子の形式が正しくありません。
E_INVALIDARG
1 つ以上の引数が無効です。
E_OUTOFMEMORY
メモリが不足しました。

次のいずれかの関数から伝播されたエラーが返される場合があります。

関数が失敗した場合、GetLastErrorAbstract Syntax Notation One (ASN.1) のエンコード/デコードエラーを返すことがあります。これらのエラーの詳細については、 ASN.1 Encoding/Decoding Return Values を参照してください。
出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)

各言語での呼び出し定義

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

BOOL CryptMsgCountersignEncoded(
    DWORD dwEncodingType,
    BYTE* pbSignerInfo,
    DWORD cbSignerInfo,
    DWORD cCountersigners,
    CMSG_SIGNER_ENCODE_INFO* rgCountersigners,
    BYTE* pbCountersignature,   // optional
    DWORD* pcbCountersignature
);
[return: MarshalAs(UnmanagedType.Bool)]
[DllImport("CRYPT32.dll", SetLastError = true, ExactSpelling = true)]
static extern bool CryptMsgCountersignEncoded(
    uint dwEncodingType,   // DWORD
    IntPtr pbSignerInfo,   // BYTE*
    uint cbSignerInfo,   // DWORD
    uint cCountersigners,   // DWORD
    IntPtr rgCountersigners,   // CMSG_SIGNER_ENCODE_INFO*
    IntPtr pbCountersignature,   // BYTE* optional, out
    ref uint pcbCountersignature   // DWORD* in/out
);
<DllImport("CRYPT32.dll", SetLastError:=True, ExactSpelling:=True)>
Public Shared Function CryptMsgCountersignEncoded(
    dwEncodingType As UInteger,   ' DWORD
    pbSignerInfo As IntPtr,   ' BYTE*
    cbSignerInfo As UInteger,   ' DWORD
    cCountersigners As UInteger,   ' DWORD
    rgCountersigners As IntPtr,   ' CMSG_SIGNER_ENCODE_INFO*
    pbCountersignature As IntPtr,   ' BYTE* optional, out
    ByRef pcbCountersignature As UInteger   ' DWORD* in/out
) As <MarshalAs(UnmanagedType.Bool)> Boolean
End Function
' dwEncodingType : DWORD
' pbSignerInfo : BYTE*
' cbSignerInfo : DWORD
' cCountersigners : DWORD
' rgCountersigners : CMSG_SIGNER_ENCODE_INFO*
' pbCountersignature : BYTE* optional, out
' pcbCountersignature : DWORD* in/out
Declare PtrSafe Function CryptMsgCountersignEncoded Lib "crypt32" ( _
    ByVal dwEncodingType As Long, _
    ByVal pbSignerInfo As LongPtr, _
    ByVal cbSignerInfo As Long, _
    ByVal cCountersigners As Long, _
    ByVal rgCountersigners As LongPtr, _
    ByVal pbCountersignature As LongPtr, _
    ByRef pcbCountersignature As Long) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。
import ctypes
from ctypes import wintypes

CryptMsgCountersignEncoded = ctypes.windll.crypt32.CryptMsgCountersignEncoded
CryptMsgCountersignEncoded.restype = wintypes.BOOL
CryptMsgCountersignEncoded.argtypes = [
    wintypes.DWORD,  # dwEncodingType : DWORD
    ctypes.POINTER(ctypes.c_ubyte),  # pbSignerInfo : BYTE*
    wintypes.DWORD,  # cbSignerInfo : DWORD
    wintypes.DWORD,  # cCountersigners : DWORD
    ctypes.c_void_p,  # rgCountersigners : CMSG_SIGNER_ENCODE_INFO*
    ctypes.POINTER(ctypes.c_ubyte),  # pbCountersignature : BYTE* optional, out
    ctypes.POINTER(wintypes.DWORD),  # pcbCountersignature : DWORD* in/out
]
# GetLastError: use ctypes.GetLastError() (or ctypes.WinDLL(use_last_error=True))
require 'fiddle'
require 'fiddle/import'

lib = Fiddle.dlopen('CRYPT32.dll')
CryptMsgCountersignEncoded = Fiddle::Function.new(
  lib['CryptMsgCountersignEncoded'],
  [
    -Fiddle::TYPE_INT,  # dwEncodingType : DWORD
    Fiddle::TYPE_VOIDP,  # pbSignerInfo : BYTE*
    -Fiddle::TYPE_INT,  # cbSignerInfo : DWORD
    -Fiddle::TYPE_INT,  # cCountersigners : DWORD
    Fiddle::TYPE_VOIDP,  # rgCountersigners : CMSG_SIGNER_ENCODE_INFO*
    Fiddle::TYPE_VOIDP,  # pbCountersignature : BYTE* optional, out
    Fiddle::TYPE_VOIDP,  # pcbCountersignature : DWORD* in/out
  ],
  Fiddle::TYPE_INT)
#[link(name = "crypt32")]
extern "system" {
    fn CryptMsgCountersignEncoded(
        dwEncodingType: u32,  // DWORD
        pbSignerInfo: *mut u8,  // BYTE*
        cbSignerInfo: u32,  // DWORD
        cCountersigners: u32,  // DWORD
        rgCountersigners: *mut CMSG_SIGNER_ENCODE_INFO,  // CMSG_SIGNER_ENCODE_INFO*
        pbCountersignature: *mut u8,  // BYTE* optional, out
        pcbCountersignature: *mut u32  // DWORD* in/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 CryptMsgCountersignEncoded(uint dwEncodingType, IntPtr pbSignerInfo, uint cbSignerInfo, uint cCountersigners, IntPtr rgCountersigners, IntPtr pbCountersignature, ref uint pcbCountersignature);
"@
$api = Add-Type -MemberDefinition $sig -Name 'CRYPT32_CryptMsgCountersignEncoded' -Namespace Win32 -PassThru
# $api::CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
#uselib "CRYPT32.dll"
#func global CryptMsgCountersignEncoded "CryptMsgCountersignEncoded" sptr, sptr, sptr, sptr, sptr, sptr, sptr
; CryptMsgCountersignEncoded dwEncodingType, varptr(pbSignerInfo), cbSignerInfo, cCountersigners, varptr(rgCountersigners), varptr(pbCountersignature), varptr(pcbCountersignature)   ; 戻り値は stat
; dwEncodingType : DWORD -> "sptr"
; pbSignerInfo : BYTE* -> "sptr"
; cbSignerInfo : DWORD -> "sptr"
; cCountersigners : DWORD -> "sptr"
; rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> "sptr"
; pbCountersignature : BYTE* optional, out -> "sptr"
; pcbCountersignature : DWORD* in/out -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。
出力引数:
#uselib "CRYPT32.dll"
#cfunc global CryptMsgCountersignEncoded "CryptMsgCountersignEncoded" int, var, int, int, var, var, var
; res = CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
; dwEncodingType : DWORD -> "int"
; pbSignerInfo : BYTE* -> "var"
; cbSignerInfo : DWORD -> "int"
; cCountersigners : DWORD -> "int"
; rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> "var"
; pbCountersignature : BYTE* optional, out -> "var"
; pcbCountersignature : DWORD* in/out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
出力引数:
; BOOL CryptMsgCountersignEncoded(DWORD dwEncodingType, BYTE* pbSignerInfo, DWORD cbSignerInfo, DWORD cCountersigners, CMSG_SIGNER_ENCODE_INFO* rgCountersigners, BYTE* pbCountersignature, DWORD* pcbCountersignature)
#uselib "CRYPT32.dll"
#cfunc global CryptMsgCountersignEncoded "CryptMsgCountersignEncoded" int, var, int, int, var, var, var
; res = CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
; dwEncodingType : DWORD -> "int"
; pbSignerInfo : BYTE* -> "var"
; cbSignerInfo : DWORD -> "int"
; cCountersigners : DWORD -> "int"
; rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> "var"
; pbCountersignature : BYTE* optional, out -> "var"
; pcbCountersignature : DWORD* in/out -> "var"
; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。
import (
	"golang.org/x/sys/windows"
	"unsafe"
)

var (
	crypt32 = windows.NewLazySystemDLL("CRYPT32.dll")
	procCryptMsgCountersignEncoded = crypt32.NewProc("CryptMsgCountersignEncoded")
)

// dwEncodingType (DWORD), pbSignerInfo (BYTE*), cbSignerInfo (DWORD), cCountersigners (DWORD), rgCountersigners (CMSG_SIGNER_ENCODE_INFO*), pbCountersignature (BYTE* optional, out), pcbCountersignature (DWORD* in/out)
r1, _, err := procCryptMsgCountersignEncoded.Call(
	uintptr(dwEncodingType),
	uintptr(pbSignerInfo),
	uintptr(cbSignerInfo),
	uintptr(cCountersigners),
	uintptr(rgCountersigners),
	uintptr(pbCountersignature),
	uintptr(pcbCountersignature),
)
_ = err  // syscall.Errno (valid when the call sets last-error)
_ = r1   // BOOL
function CryptMsgCountersignEncoded(
  dwEncodingType: DWORD;   // DWORD
  pbSignerInfo: Pointer;   // BYTE*
  cbSignerInfo: DWORD;   // DWORD
  cCountersigners: DWORD;   // DWORD
  rgCountersigners: Pointer;   // CMSG_SIGNER_ENCODE_INFO*
  pbCountersignature: Pointer;   // BYTE* optional, out
  pcbCountersignature: Pointer   // DWORD* in/out
): BOOL; stdcall;
  external 'CRYPT32.dll' name 'CryptMsgCountersignEncoded';
result := DllCall("CRYPT32\CryptMsgCountersignEncoded"
    , "UInt", dwEncodingType   ; DWORD
    , "Ptr", pbSignerInfo   ; BYTE*
    , "UInt", cbSignerInfo   ; DWORD
    , "UInt", cCountersigners   ; DWORD
    , "Ptr", rgCountersigners   ; CMSG_SIGNER_ENCODE_INFO*
    , "Ptr", pbCountersignature   ; BYTE* optional, out
    , "Ptr", pcbCountersignature   ; DWORD* in/out
    , "Int")   ; return: BOOL
●CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature) = DLL("CRYPT32.dll", "bool CryptMsgCountersignEncoded(dword, void*, dword, dword, void*, void*, void*)")
# 呼び出し: CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
# dwEncodingType : DWORD -> "dword"
# pbSignerInfo : BYTE* -> "void*"
# cbSignerInfo : DWORD -> "dword"
# cCountersigners : DWORD -> "dword"
# rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> "void*"
# pbCountersignature : BYTE* optional, out -> "void*"
# pcbCountersignature : DWORD* in/out -> "void*"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。
const std = @import("std");

extern "crypt32" fn CryptMsgCountersignEncoded(
    dwEncodingType: u32, // DWORD
    pbSignerInfo: [*c]u8, // BYTE*
    cbSignerInfo: u32, // DWORD
    cCountersigners: u32, // DWORD
    rgCountersigners: [*c]CMSG_SIGNER_ENCODE_INFO, // CMSG_SIGNER_ENCODE_INFO*
    pbCountersignature: [*c]u8, // BYTE* optional, out
    pcbCountersignature: [*c]u32 // DWORD* in/out
) callconv(std.os.windows.WINAPI) i32;
proc CryptMsgCountersignEncoded(
    dwEncodingType: uint32,  # DWORD
    pbSignerInfo: ptr uint8,  # BYTE*
    cbSignerInfo: uint32,  # DWORD
    cCountersigners: uint32,  # DWORD
    rgCountersigners: ptr CMSG_SIGNER_ENCODE_INFO,  # CMSG_SIGNER_ENCODE_INFO*
    pbCountersignature: ptr uint8,  # BYTE* optional, out
    pcbCountersignature: ptr uint32  # DWORD* in/out
): int32 {.importc: "CryptMsgCountersignEncoded", stdcall, dynlib: "CRYPT32.dll".}
pragma(lib, "crypt32");
extern(Windows)
int CryptMsgCountersignEncoded(
    uint dwEncodingType,   // DWORD
    ubyte* pbSignerInfo,   // BYTE*
    uint cbSignerInfo,   // DWORD
    uint cCountersigners,   // DWORD
    CMSG_SIGNER_ENCODE_INFO* rgCountersigners,   // CMSG_SIGNER_ENCODE_INFO*
    ubyte* pbCountersignature,   // BYTE* optional, out
    uint* pcbCountersignature   // DWORD* in/out
);
ccall((:CryptMsgCountersignEncoded, "CRYPT32.dll"), stdcall, Int32,
      (UInt32, Ptr{UInt8}, UInt32, UInt32, Ptr{CMSG_SIGNER_ENCODE_INFO}, Ptr{UInt8}, Ptr{UInt32}),
      dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
# dwEncodingType : DWORD -> UInt32
# pbSignerInfo : BYTE* -> Ptr{UInt8}
# cbSignerInfo : DWORD -> UInt32
# cCountersigners : DWORD -> UInt32
# rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> Ptr{CMSG_SIGNER_ENCODE_INFO}
# pbCountersignature : BYTE* optional, out -> Ptr{UInt8}
# pcbCountersignature : DWORD* in/out -> Ptr{UInt32}
# stdcall は 32bit のみ意味を持つ(x64 では無視)。
local ffi = require("ffi")
ffi.cdef[[
int32_t CryptMsgCountersignEncoded(
    uint32_t dwEncodingType,
    uint8_t* pbSignerInfo,
    uint32_t cbSignerInfo,
    uint32_t cCountersigners,
    void* rgCountersigners,
    uint8_t* pbCountersignature,
    uint32_t* pcbCountersignature);
]]
local crypt32 = ffi.load("crypt32")
-- crypt32.CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
-- dwEncodingType : DWORD
-- pbSignerInfo : BYTE*
-- cbSignerInfo : DWORD
-- cCountersigners : DWORD
-- rgCountersigners : CMSG_SIGNER_ENCODE_INFO*
-- pbCountersignature : BYTE* optional, out
-- pcbCountersignature : DWORD* in/out
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。
const koffi = require('koffi');
const lib = koffi.load('CRYPT32.dll');
const CryptMsgCountersignEncoded = lib.func('__stdcall', 'CryptMsgCountersignEncoded', 'int32_t', ['uint32_t', 'uint8_t *', 'uint32_t', 'uint32_t', 'void *', 'uint8_t *', 'uint32_t *']);
// CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
// dwEncodingType : DWORD -> 'uint32_t'
// pbSignerInfo : BYTE* -> 'uint8_t *'
// cbSignerInfo : DWORD -> 'uint32_t'
// cCountersigners : DWORD -> 'uint32_t'
// rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> 'void *'
// pbCountersignature : BYTE* optional, out -> 'uint8_t *'
// pcbCountersignature : DWORD* in/out -> 'uint32_t *'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。
const lib = Deno.dlopen("CRYPT32.dll", {
  CryptMsgCountersignEncoded: { parameters: ["u32", "pointer", "u32", "u32", "pointer", "pointer", "pointer"], result: "i32" },
});
// lib.symbols.CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature)
// dwEncodingType : DWORD -> "u32"
// pbSignerInfo : BYTE* -> "pointer"
// cbSignerInfo : DWORD -> "u32"
// cCountersigners : DWORD -> "u32"
// rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> "pointer"
// pbCountersignature : BYTE* optional, out -> "pointer"
// pcbCountersignature : DWORD* in/out -> "pointer"
// 文字列引数は "buffer"(NUL 終端のバイト列を Uint8Array で渡す)。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。
<?php
$ffi = FFI::cdef(<<<C
int32_t CryptMsgCountersignEncoded(
    uint32_t dwEncodingType,
    uint8_t* pbSignerInfo,
    uint32_t cbSignerInfo,
    uint32_t cCountersigners,
    void* rgCountersigners,
    uint8_t* pbCountersignature,
    uint32_t* pcbCountersignature);
C, "CRYPT32.dll");
// $ffi->CryptMsgCountersignEncoded(dwEncodingType, pbSignerInfo, cbSignerInfo, cCountersigners, rgCountersigners, pbCountersignature, pcbCountersignature);
// dwEncodingType : DWORD
// pbSignerInfo : BYTE*
// cbSignerInfo : DWORD
// cCountersigners : DWORD
// rgCountersigners : CMSG_SIGNER_ENCODE_INFO*
// pbCountersignature : BYTE* optional, out
// pcbCountersignature : DWORD* in/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 CryptMsgCountersignEncoded(
        int dwEncodingType,   // DWORD
        byte[] pbSignerInfo,   // BYTE*
        int cbSignerInfo,   // DWORD
        int cCountersigners,   // DWORD
        Pointer rgCountersigners,   // CMSG_SIGNER_ENCODE_INFO*
        byte[] pbCountersignature,   // BYTE* optional, out
        IntByReference pcbCountersignature   // DWORD* in/out
    );
}
@[Link("crypt32")]
lib LibCRYPT32
  fun CryptMsgCountersignEncoded = CryptMsgCountersignEncoded(
    dwEncodingType : UInt32,   # DWORD
    pbSignerInfo : UInt8*,   # BYTE*
    cbSignerInfo : UInt32,   # DWORD
    cCountersigners : UInt32,   # DWORD
    rgCountersigners : CMSG_SIGNER_ENCODE_INFO*,   # CMSG_SIGNER_ENCODE_INFO*
    pbCountersignature : UInt8*,   # BYTE* optional, out
    pcbCountersignature : UInt32*   # DWORD* in/out
  ) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。
import 'dart:ffi';
import 'package:ffi/ffi.dart';

typedef CryptMsgCountersignEncodedNative = Int32 Function(Uint32, Pointer<Uint8>, Uint32, Uint32, Pointer<Void>, Pointer<Uint8>, Pointer<Uint32>);
typedef CryptMsgCountersignEncodedDart = int Function(int, Pointer<Uint8>, int, int, Pointer<Void>, Pointer<Uint8>, Pointer<Uint32>);
final CryptMsgCountersignEncoded = DynamicLibrary.open('CRYPT32.dll')
    .lookupFunction<CryptMsgCountersignEncodedNative, CryptMsgCountersignEncodedDart>('CryptMsgCountersignEncoded');
// dwEncodingType : DWORD -> Uint32
// pbSignerInfo : BYTE* -> Pointer<Uint8>
// cbSignerInfo : DWORD -> Uint32
// cCountersigners : DWORD -> Uint32
// rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> Pointer<Void>
// pbCountersignature : BYTE* optional, out -> Pointer<Uint8>
// pcbCountersignature : DWORD* in/out -> Pointer<Uint32>
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。
{$mode objfpc}{$H+}
function CryptMsgCountersignEncoded(
  dwEncodingType: DWORD;   // DWORD
  pbSignerInfo: Pointer;   // BYTE*
  cbSignerInfo: DWORD;   // DWORD
  cCountersigners: DWORD;   // DWORD
  rgCountersigners: Pointer;   // CMSG_SIGNER_ENCODE_INFO*
  pbCountersignature: Pointer;   // BYTE* optional, out
  pcbCountersignature: Pointer   // DWORD* in/out
): BOOL; stdcall;
  external 'CRYPT32.dll' name 'CryptMsgCountersignEncoded';
import Foreign
import Foreign.C.Types
import Foreign.C.String

foreign import stdcall safe "CryptMsgCountersignEncoded"
  c_CryptMsgCountersignEncoded :: Word32 -> Ptr Word8 -> Word32 -> Word32 -> Ptr () -> Ptr Word8 -> Ptr Word32 -> IO CInt
-- dwEncodingType : DWORD -> Word32
-- pbSignerInfo : BYTE* -> Ptr Word8
-- cbSignerInfo : DWORD -> Word32
-- cCountersigners : DWORD -> Word32
-- rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> Ptr ()
-- pbCountersignature : BYTE* optional, out -> Ptr Word8
-- pcbCountersignature : DWORD* in/out -> Ptr Word32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。
open Ctypes
open Foreign

let cryptmsgcountersignencoded =
  foreign "CryptMsgCountersignEncoded"
    (uint32_t @-> (ptr uint8_t) @-> uint32_t @-> uint32_t @-> (ptr void) @-> (ptr uint8_t) @-> (ptr uint32_t) @-> returning int32_t)
(* dwEncodingType : DWORD -> uint32_t *)
(* pbSignerInfo : BYTE* -> (ptr uint8_t) *)
(* cbSignerInfo : DWORD -> uint32_t *)
(* cCountersigners : DWORD -> uint32_t *)
(* rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> (ptr void) *)
(* pbCountersignature : BYTE* optional, out -> (ptr uint8_t) *)
(* pcbCountersignature : DWORD* in/out -> (ptr uint32_t) *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)
(cffi:define-foreign-library crypt32 (t "CRYPT32.dll"))
(cffi:use-foreign-library crypt32)

(cffi:defcfun ("CryptMsgCountersignEncoded" crypt-msg-countersign-encoded :convention :stdcall) :int32
  (dw-encoding-type :uint32)   ; DWORD
  (pb-signer-info :pointer)   ; BYTE*
  (cb-signer-info :uint32)   ; DWORD
  (c-countersigners :uint32)   ; DWORD
  (rg-countersigners :pointer)   ; CMSG_SIGNER_ENCODE_INFO*
  (pb-countersignature :pointer)   ; BYTE* optional, out
  (pcb-countersignature :pointer))   ; DWORD* in/out
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。
use Win32::API;
my $CryptMsgCountersignEncoded = Win32::API::More->new('CRYPT32',
    'BOOL CryptMsgCountersignEncoded(DWORD dwEncodingType, LPVOID pbSignerInfo, DWORD cbSignerInfo, DWORD cCountersigners, LPVOID rgCountersigners, LPVOID pbCountersignature, LPVOID pcbCountersignature)');
# my $ret = $CryptMsgCountersignEncoded->Call($dwEncodingType, $pbSignerInfo, $cbSignerInfo, $cCountersigners, $rgCountersigners, $pbCountersignature, $pcbCountersignature);
# dwEncodingType : DWORD -> DWORD
# pbSignerInfo : BYTE* -> LPVOID
# cbSignerInfo : DWORD -> DWORD
# cCountersigners : DWORD -> DWORD
# rgCountersigners : CMSG_SIGNER_ENCODE_INFO* -> LPVOID
# pbCountersignature : BYTE* optional, out -> LPVOID
# pcbCountersignature : DWORD* in/out -> LPVOID
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。

関連項目

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