ホーム › Security.Credentials › SCardIntroduceCardTypeA
SCardIntroduceCardTypeA
関数新しいスマートカード種別をシステムに登録する。
シグネチャ
// WinSCard.dll (ANSI / -A)
#include <windows.h>
INT SCardIntroduceCardTypeA(
UINT_PTR hContext,
LPCSTR szCardName,
const GUID* pguidPrimaryProvider, // optional
const GUID* rgguidInterfaces, // optional
DWORD dwInterfaceCount,
BYTE* pbAtr,
BYTE* pbAtrMask,
DWORD cbAtrLen
);パラメーター
| 名前 | 型 | 方向 | 説明 |
|---|---|---|---|
| hContext | UINT_PTR | in | リソースマネージャーコンテキストを識別するハンドル。リソースマネージャーコンテキストは、事前の SCardEstablishContext の呼び出しによって設定されます。このパラメーターを NULL にすることはできません。 |
| szCardName | LPCSTR | in | ユーザーがカードを識別できる名前。 |
| pguidPrimaryProvider | GUID* | inoptional | スマートカードのプライマリサービスプロバイダーの識別子(GUID)へのポインター。 |
| rgguidInterfaces | GUID* | inoptional | スマートカードがサポートするインターフェイスを識別する識別子(GUID)の配列。 |
| dwInterfaceCount | DWORD | in | rgguidInterfaces 配列内の識別子の数。 |
| pbAtr | BYTE* | in | スマートカードデータベースを照会する際に照合目的で使用できる ATR 文字列(詳細については SCardListCards を参照してください)。この文字列の長さは、通常の ATR 解析によって決定されます。 |
| pbAtrMask | BYTE* | in | スマートカードの ATR を pbAtr で指定された ATR と比較する際に使用する省略可能なビットマスク。この値が非 NULL の場合、pbAtr で指定された ATR 文字列と同じ長さのバイト列を指している必要があります。ある ATR 文字列 A が pbAtr で指定された ATR と比較される場合、A & M = pbAtr(ここで M は指定されたマスク、& はビットごとの AND を表します)の場合にのみ一致します。 |
| cbAtrLen | DWORD | in | ATR および省略可能な ATR マスクの長さ。この値がゼロの場合、ATR の長さは通常の ATR 解析によって決定されます。pbAtr の値が指定されている場合、この値をゼロにすることはできません。 |
戻り値の型: INT
公式ドキュメント
スマートカードをスマートカードデータベースに追加することで、スマートカードをスマートカードサブシステムに(アクティブなユーザー向けに)登録します。(ANSI)
戻り値
この関数は、成功するか失敗するかに応じて異なる値を返します。
| 戻り値コード | 説明 |
|---|---|
|
SCARD_S_SUCCESS。 |
|
エラーコード。詳細については Smart Card Return Values を参照してください。 |
解説(Remarks)
この関数はリダイレクトされませんが、リモートデスクトップセッション内でこの関数を呼び出してもエラーにはなりません。それは単に、結果がローカルコンピューターではなくリモートコンピューターから取得されることを意味するだけです。
SCardIntroduceCardType 関数はデータベース管理関数です。他のデータベース管理関数の詳細については Smart Card Database Management Functions を参照してください。
スマートカードを削除するには SCardForgetCardType を使用します。
例
次の例は、カードタイプを登録する方法を示しています。この例では、hContext が事前の SCardEstablishContext 関数の呼び出しから取得した有効なハンドルであることを前提としています。
GUID MyGuid = { 0xABCDEF00,
0xABCD,
0xABCD,
0xAA, 0xBB, 0xCC, 0xDD,
0xAA, 0xBB, 0xCC, 0xDD };
static const BYTE MyATR[] = { 0xaa, 0xbb, 0xcc, 0x00, 0xdd };
static const BYTE MyATRMask[] = { 0xff, 0xff, 0xff, 0x00, 0xff};
LONG lReturn;
lReturn = SCardIntroduceCardType(hContext,
L"MyCardName",
&MyGuid,
NULL, // No interface array
0, // Interface count = 0
MyATR,
MyATRMask,
sizeof(MyATR));
if ( SCARD_S_SUCCESS != lReturn )
printf("Failed SCardIntroduceCardType\n");
メモ
winscard.h ヘッダーは、UNICODE プリプロセッサ定数の定義に基づいて、この関数の ANSI 版または Unicode 版を自動的に選択するエイリアスとして SCardIntroduceCardType を定義します。エンコード非依存のエイリアスの使用を、エンコード非依存ではないコードと混在させると、コンパイルエラーまたは実行時エラーを引き起こす不整合につながる可能性があります。詳細については Conventions for Function Prototypes を参照してください。
出典・ライセンス: 上記「公式ドキュメント」の内容は Microsoft の Win32 API ドキュメント(MicrosoftDocs/sdk-api)を日本語に翻訳・改変したものです。© Microsoft Corporation. CC BY 4.0 で提供。
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)
Microsoft 公式リファレンス: 英語 (en-us) · 日本語 (ja-jp) · 原文ソース (GitHub)
各言語での呼び出し定義
// WinSCard.dll (ANSI / -A)
#include <windows.h>
INT SCardIntroduceCardTypeA(
UINT_PTR hContext,
LPCSTR szCardName,
const GUID* pguidPrimaryProvider, // optional
const GUID* rgguidInterfaces, // optional
DWORD dwInterfaceCount,
BYTE* pbAtr,
BYTE* pbAtrMask,
DWORD cbAtrLen
);[DllImport("WinSCard.dll", CharSet = CharSet.Ansi, ExactSpelling = true)]
static extern int SCardIntroduceCardTypeA(
UIntPtr hContext, // UINT_PTR
[MarshalAs(UnmanagedType.LPStr)] string szCardName, // LPCSTR
IntPtr pguidPrimaryProvider, // GUID* optional
IntPtr rgguidInterfaces, // GUID* optional
uint dwInterfaceCount, // DWORD
IntPtr pbAtr, // BYTE*
IntPtr pbAtrMask, // BYTE*
uint cbAtrLen // DWORD
);<DllImport("WinSCard.dll", CharSet:=CharSet.Ansi, ExactSpelling:=True)>
Public Shared Function SCardIntroduceCardTypeA(
hContext As UIntPtr, ' UINT_PTR
<MarshalAs(UnmanagedType.LPStr)> szCardName As String, ' LPCSTR
pguidPrimaryProvider As IntPtr, ' GUID* optional
rgguidInterfaces As IntPtr, ' GUID* optional
dwInterfaceCount As UInteger, ' DWORD
pbAtr As IntPtr, ' BYTE*
pbAtrMask As IntPtr, ' BYTE*
cbAtrLen As UInteger ' DWORD
) As Integer
End Function' hContext : UINT_PTR
' szCardName : LPCSTR
' pguidPrimaryProvider : GUID* optional
' rgguidInterfaces : GUID* optional
' dwInterfaceCount : DWORD
' pbAtr : BYTE*
' pbAtrMask : BYTE*
' cbAtrLen : DWORD
Declare PtrSafe Function SCardIntroduceCardTypeA Lib "winscard" ( _
ByVal hContext As LongPtr, _
ByVal szCardName As String, _
ByVal pguidPrimaryProvider As LongPtr, _
ByVal rgguidInterfaces As LongPtr, _
ByVal dwInterfaceCount As Long, _
ByVal pbAtr As LongPtr, _
ByVal pbAtrMask As LongPtr, _
ByVal cbAtrLen As Long) As Long
' VBA7前提(PtrSafe)。32bit Office では LongPtr→Long。Integer=16bit / Long=32bit / LongLong=64bit。import ctypes
from ctypes import wintypes
SCardIntroduceCardTypeA = ctypes.windll.winscard.SCardIntroduceCardTypeA
SCardIntroduceCardTypeA.restype = ctypes.c_int
SCardIntroduceCardTypeA.argtypes = [
ctypes.c_size_t, # hContext : UINT_PTR
wintypes.LPCSTR, # szCardName : LPCSTR
ctypes.c_void_p, # pguidPrimaryProvider : GUID* optional
ctypes.c_void_p, # rgguidInterfaces : GUID* optional
wintypes.DWORD, # dwInterfaceCount : DWORD
ctypes.POINTER(ctypes.c_ubyte), # pbAtr : BYTE*
ctypes.POINTER(ctypes.c_ubyte), # pbAtrMask : BYTE*
wintypes.DWORD, # cbAtrLen : DWORD
]require 'fiddle'
require 'fiddle/import'
lib = Fiddle.dlopen('WinSCard.dll')
SCardIntroduceCardTypeA = Fiddle::Function.new(
lib['SCardIntroduceCardTypeA'],
[
Fiddle::TYPE_UINTPTR_T, # hContext : UINT_PTR
Fiddle::TYPE_VOIDP, # szCardName : LPCSTR
Fiddle::TYPE_VOIDP, # pguidPrimaryProvider : GUID* optional
Fiddle::TYPE_VOIDP, # rgguidInterfaces : GUID* optional
-Fiddle::TYPE_INT, # dwInterfaceCount : DWORD
Fiddle::TYPE_VOIDP, # pbAtr : BYTE*
Fiddle::TYPE_VOIDP, # pbAtrMask : BYTE*
-Fiddle::TYPE_INT, # cbAtrLen : DWORD
],
Fiddle::TYPE_INT)#[link(name = "winscard")]
extern "system" {
fn SCardIntroduceCardTypeA(
hContext: usize, // UINT_PTR
szCardName: *const u8, // LPCSTR
pguidPrimaryProvider: *const GUID, // GUID* optional
rgguidInterfaces: *const GUID, // GUID* optional
dwInterfaceCount: u32, // DWORD
pbAtr: *mut u8, // BYTE*
pbAtrMask: *mut u8, // BYTE*
cbAtrLen: u32 // DWORD
) -> i32;
}
// crates: windows-sys provides ready-made bindings for this API.$sig = @"
[DllImport("WinSCard.dll", CharSet = CharSet.Ansi)]
public static extern int SCardIntroduceCardTypeA(UIntPtr hContext, [MarshalAs(UnmanagedType.LPStr)] string szCardName, IntPtr pguidPrimaryProvider, IntPtr rgguidInterfaces, uint dwInterfaceCount, IntPtr pbAtr, IntPtr pbAtrMask, uint cbAtrLen);
"@
$api = Add-Type -MemberDefinition $sig -Name 'WinSCard_SCardIntroduceCardTypeA' -Namespace Win32 -PassThru
# $api::SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)#uselib "WinSCard.dll"
#func global SCardIntroduceCardTypeA "SCardIntroduceCardTypeA" sptr, sptr, sptr, sptr, sptr, sptr, sptr, sptr
; SCardIntroduceCardTypeA hContext, szCardName, varptr(pguidPrimaryProvider), varptr(rgguidInterfaces), dwInterfaceCount, varptr(pbAtr), varptr(pbAtrMask), cbAtrLen ; 戻り値は stat
; hContext : UINT_PTR -> "sptr"
; szCardName : LPCSTR -> "sptr"
; pguidPrimaryProvider : GUID* optional -> "sptr"
; rgguidInterfaces : GUID* optional -> "sptr"
; dwInterfaceCount : DWORD -> "sptr"
; pbAtr : BYTE* -> "sptr"
; pbAtrMask : BYTE* -> "sptr"
; cbAtrLen : DWORD -> "sptr"
; ※HSP3.7は #func のため戻り値はシステム変数 stat に格納されます。出力引数:
#uselib "WinSCard.dll" #cfunc global SCardIntroduceCardTypeA "SCardIntroduceCardTypeA" sptr, str, var, var, int, var, var, int ; res = SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen) ; hContext : UINT_PTR -> "sptr" ; szCardName : LPCSTR -> "str" ; pguidPrimaryProvider : GUID* optional -> "var" ; rgguidInterfaces : GUID* optional -> "var" ; dwInterfaceCount : DWORD -> "int" ; pbAtr : BYTE* -> "var" ; pbAtrMask : BYTE* -> "var" ; cbAtrLen : DWORD -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。#uselib "WinSCard.dll" #cfunc global SCardIntroduceCardTypeA "SCardIntroduceCardTypeA" sptr, str, sptr, sptr, int, sptr, sptr, int ; res = SCardIntroduceCardTypeA(hContext, szCardName, varptr(pguidPrimaryProvider), varptr(rgguidInterfaces), dwInterfaceCount, varptr(pbAtr), varptr(pbAtrMask), cbAtrLen) ; hContext : UINT_PTR -> "sptr" ; szCardName : LPCSTR -> "str" ; pguidPrimaryProvider : GUID* optional -> "sptr" ; rgguidInterfaces : GUID* optional -> "sptr" ; dwInterfaceCount : DWORD -> "int" ; pbAtr : BYTE* -> "sptr" ; pbAtrMask : BYTE* -> "sptr" ; cbAtrLen : DWORD -> "int" ; ※出力/バッファ引数はポインタ方式(token=sptr / 呼び出しは varptr(変数))。
出力引数:
; INT SCardIntroduceCardTypeA(UINT_PTR hContext, LPCSTR szCardName, GUID* pguidPrimaryProvider, GUID* rgguidInterfaces, DWORD dwInterfaceCount, BYTE* pbAtr, BYTE* pbAtrMask, DWORD cbAtrLen) #uselib "WinSCard.dll" #cfunc global SCardIntroduceCardTypeA "SCardIntroduceCardTypeA" intptr, str, var, var, int, var, var, int ; res = SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen) ; hContext : UINT_PTR -> "intptr" ; szCardName : LPCSTR -> "str" ; pguidPrimaryProvider : GUID* optional -> "var" ; rgguidInterfaces : GUID* optional -> "var" ; dwInterfaceCount : DWORD -> "int" ; pbAtr : BYTE* -> "var" ; pbAtrMask : BYTE* -> "var" ; cbAtrLen : DWORD -> "int" ; ※出力/バッファ引数は var 方式(変数を直接渡す)。varptr 方式にも切替可。; INT SCardIntroduceCardTypeA(UINT_PTR hContext, LPCSTR szCardName, GUID* pguidPrimaryProvider, GUID* rgguidInterfaces, DWORD dwInterfaceCount, BYTE* pbAtr, BYTE* pbAtrMask, DWORD cbAtrLen) #uselib "WinSCard.dll" #cfunc global SCardIntroduceCardTypeA "SCardIntroduceCardTypeA" intptr, str, intptr, intptr, int, intptr, intptr, int ; res = SCardIntroduceCardTypeA(hContext, szCardName, varptr(pguidPrimaryProvider), varptr(rgguidInterfaces), dwInterfaceCount, varptr(pbAtr), varptr(pbAtrMask), cbAtrLen) ; hContext : UINT_PTR -> "intptr" ; szCardName : LPCSTR -> "str" ; pguidPrimaryProvider : GUID* optional -> "intptr" ; rgguidInterfaces : GUID* optional -> "intptr" ; dwInterfaceCount : DWORD -> "int" ; pbAtr : BYTE* -> "intptr" ; pbAtrMask : BYTE* -> "intptr" ; cbAtrLen : DWORD -> "int" ; ※出力/バッファ引数はポインタ方式(token=intptr / 呼び出しは varptr(変数))。
import (
"golang.org/x/sys/windows"
"unsafe"
)
var (
winscard = windows.NewLazySystemDLL("WinSCard.dll")
procSCardIntroduceCardTypeA = winscard.NewProc("SCardIntroduceCardTypeA")
)
// hContext (UINT_PTR), szCardName (LPCSTR), pguidPrimaryProvider (GUID* optional), rgguidInterfaces (GUID* optional), dwInterfaceCount (DWORD), pbAtr (BYTE*), pbAtrMask (BYTE*), cbAtrLen (DWORD)
r1, _, err := procSCardIntroduceCardTypeA.Call(
uintptr(hContext),
uintptr(unsafe.Pointer(windows.BytePtrFromString(szCardName))),
uintptr(pguidPrimaryProvider),
uintptr(rgguidInterfaces),
uintptr(dwInterfaceCount),
uintptr(pbAtr),
uintptr(pbAtrMask),
uintptr(cbAtrLen),
)
_ = err // syscall.Errno (valid when the call sets last-error)
_ = r1 // INTfunction SCardIntroduceCardTypeA(
hContext: NativeUInt; // UINT_PTR
szCardName: PAnsiChar; // LPCSTR
pguidPrimaryProvider: PGUID; // GUID* optional
rgguidInterfaces: PGUID; // GUID* optional
dwInterfaceCount: DWORD; // DWORD
pbAtr: Pointer; // BYTE*
pbAtrMask: Pointer; // BYTE*
cbAtrLen: DWORD // DWORD
): Integer; stdcall;
external 'WinSCard.dll' name 'SCardIntroduceCardTypeA';result := DllCall("WinSCard\SCardIntroduceCardTypeA"
, "UPtr", hContext ; UINT_PTR
, "AStr", szCardName ; LPCSTR
, "Ptr", pguidPrimaryProvider ; GUID* optional
, "Ptr", rgguidInterfaces ; GUID* optional
, "UInt", dwInterfaceCount ; DWORD
, "Ptr", pbAtr ; BYTE*
, "Ptr", pbAtrMask ; BYTE*
, "UInt", cbAtrLen ; DWORD
, "Int") ; return: INT●SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen) = DLL("WinSCard.dll", "int SCardIntroduceCardTypeA(int, char*, void*, void*, dword, void*, void*, dword)")
# 呼び出し: SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)
# hContext : UINT_PTR -> "int"
# szCardName : LPCSTR -> "char*"
# pguidPrimaryProvider : GUID* optional -> "void*"
# rgguidInterfaces : GUID* optional -> "void*"
# dwInterfaceCount : DWORD -> "dword"
# pbAtr : BYTE* -> "void*"
# pbAtrMask : BYTE* -> "void*"
# cbAtrLen : DWORD -> "dword"
# なでしこ1は32bit・ANSI(Shift_JIS)。文字列=char*(ANSI)、ポインタ/ハンドル=void*(4byte)。const std = @import("std");
extern "winscard" fn SCardIntroduceCardTypeA(
hContext: usize, // UINT_PTR
szCardName: [*c]const u8, // LPCSTR
pguidPrimaryProvider: [*c]GUID, // GUID* optional
rgguidInterfaces: [*c]GUID, // GUID* optional
dwInterfaceCount: u32, // DWORD
pbAtr: [*c]u8, // BYTE*
pbAtrMask: [*c]u8, // BYTE*
cbAtrLen: u32 // DWORD
) callconv(std.os.windows.WINAPI) i32;proc SCardIntroduceCardTypeA(
hContext: uint, # UINT_PTR
szCardName: cstring, # LPCSTR
pguidPrimaryProvider: ptr GUID, # GUID* optional
rgguidInterfaces: ptr GUID, # GUID* optional
dwInterfaceCount: uint32, # DWORD
pbAtr: ptr uint8, # BYTE*
pbAtrMask: ptr uint8, # BYTE*
cbAtrLen: uint32 # DWORD
): int32 {.importc: "SCardIntroduceCardTypeA", stdcall, dynlib: "WinSCard.dll".}pragma(lib, "winscard");
extern(Windows)
int SCardIntroduceCardTypeA(
size_t hContext, // UINT_PTR
const(char)* szCardName, // LPCSTR
GUID* pguidPrimaryProvider, // GUID* optional
GUID* rgguidInterfaces, // GUID* optional
uint dwInterfaceCount, // DWORD
ubyte* pbAtr, // BYTE*
ubyte* pbAtrMask, // BYTE*
uint cbAtrLen // DWORD
);ccall((:SCardIntroduceCardTypeA, "WinSCard.dll"), stdcall, Int32,
(Csize_t, Cstring, Ptr{GUID}, Ptr{GUID}, UInt32, Ptr{UInt8}, Ptr{UInt8}, UInt32),
hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)
# hContext : UINT_PTR -> Csize_t
# szCardName : LPCSTR -> Cstring
# pguidPrimaryProvider : GUID* optional -> Ptr{GUID}
# rgguidInterfaces : GUID* optional -> Ptr{GUID}
# dwInterfaceCount : DWORD -> UInt32
# pbAtr : BYTE* -> Ptr{UInt8}
# pbAtrMask : BYTE* -> Ptr{UInt8}
# cbAtrLen : DWORD -> UInt32
# stdcall は 32bit のみ意味を持つ(x64 では無視)。local ffi = require("ffi")
ffi.cdef[[
int32_t SCardIntroduceCardTypeA(
uintptr_t hContext,
const char* szCardName,
void* pguidPrimaryProvider,
void* rgguidInterfaces,
uint32_t dwInterfaceCount,
uint8_t* pbAtr,
uint8_t* pbAtrMask,
uint32_t cbAtrLen);
]]
local winscard = ffi.load("winscard")
-- winscard.SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)
-- hContext : UINT_PTR
-- szCardName : LPCSTR
-- pguidPrimaryProvider : GUID* optional
-- rgguidInterfaces : GUID* optional
-- dwInterfaceCount : DWORD
-- pbAtr : BYTE*
-- pbAtrMask : BYTE*
-- cbAtrLen : DWORD
-- 構造体/GUIDへのポインタは cdef が通るよう void* で表記(実型は各引数コメント参照)。値渡し構造体・enum は対応する typedef を cdef に追加すること。const koffi = require('koffi');
const lib = koffi.load('WinSCard.dll');
const SCardIntroduceCardTypeA = lib.func('__stdcall', 'SCardIntroduceCardTypeA', 'int32_t', ['uintptr_t', 'str', 'void *', 'void *', 'uint32_t', 'uint8_t *', 'uint8_t *', 'uint32_t']);
// SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)
// hContext : UINT_PTR -> 'uintptr_t'
// szCardName : LPCSTR -> 'str'
// pguidPrimaryProvider : GUID* optional -> 'void *'
// rgguidInterfaces : GUID* optional -> 'void *'
// dwInterfaceCount : DWORD -> 'uint32_t'
// pbAtr : BYTE* -> 'uint8_t *'
// pbAtrMask : BYTE* -> 'uint8_t *'
// cbAtrLen : DWORD -> 'uint32_t'
// 出力ポインタは koffi.out(...) で包む。構造体は koffi.struct で定義。const lib = Deno.dlopen("WinSCard.dll", {
SCardIntroduceCardTypeA: { parameters: ["usize", "buffer", "pointer", "pointer", "u32", "pointer", "pointer", "u32"], result: "i32" },
});
// lib.symbols.SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen)
// hContext : UINT_PTR -> "usize"
// szCardName : LPCSTR -> "buffer"
// pguidPrimaryProvider : GUID* optional -> "pointer"
// rgguidInterfaces : GUID* optional -> "pointer"
// dwInterfaceCount : DWORD -> "u32"
// pbAtr : BYTE* -> "pointer"
// pbAtrMask : BYTE* -> "pointer"
// cbAtrLen : DWORD -> "u32"
// 文字列は "buffer"。ANSI(-A) は new TextEncoder() で UTF-8/ANSI バイト列(末尾に \x00)を渡す。
// 値渡し構造体は { struct: [ ...field types... ] } を使用。<?php
$ffi = FFI::cdef(<<<C
int32_t SCardIntroduceCardTypeA(
size_t hContext,
const char* szCardName,
void* pguidPrimaryProvider,
void* rgguidInterfaces,
uint32_t dwInterfaceCount,
uint8_t* pbAtr,
uint8_t* pbAtrMask,
uint32_t cbAtrLen);
C, "WinSCard.dll");
// $ffi->SCardIntroduceCardTypeA(hContext, szCardName, pguidPrimaryProvider, rgguidInterfaces, dwInterfaceCount, pbAtr, pbAtrMask, cbAtrLen);
// hContext : UINT_PTR
// szCardName : LPCSTR
// pguidPrimaryProvider : GUID* optional
// rgguidInterfaces : GUID* optional
// dwInterfaceCount : DWORD
// pbAtr : BYTE*
// pbAtrMask : BYTE*
// cbAtrLen : DWORD
// 構造体/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 Winscard extends StdCallLibrary {
Winscard INSTANCE = Native.load("winscard", Winscard.class, W32APIOptions.ASCII_OPTIONS);
int SCardIntroduceCardTypeA(
long hContext, // UINT_PTR
String szCardName, // LPCSTR
Pointer pguidPrimaryProvider, // GUID* optional
Pointer rgguidInterfaces, // GUID* optional
int dwInterfaceCount, // DWORD
byte[] pbAtr, // BYTE*
byte[] pbAtrMask, // BYTE*
int cbAtrLen // DWORD
);
}@[Link("winscard")]
lib LibWinSCard
fun SCardIntroduceCardTypeA = SCardIntroduceCardTypeA(
hContext : LibC::SizeT, # UINT_PTR
szCardName : UInt8*, # LPCSTR
pguidPrimaryProvider : GUID*, # GUID* optional
rgguidInterfaces : GUID*, # GUID* optional
dwInterfaceCount : UInt32, # DWORD
pbAtr : UInt8*, # BYTE*
pbAtrMask : UInt8*, # BYTE*
cbAtrLen : UInt32 # DWORD
) : Int32
end
# 構造体/GUID/enum は lib 内に対応する型定義が必要。
# 呼出規約: x64 は規約統一のため OK。x86(32bit)は WINAPI=stdcall だが Crystal の fun に stdcall 付与構文がなく非対応。import 'dart:ffi';
import 'package:ffi/ffi.dart';
typedef SCardIntroduceCardTypeANative = Int32 Function(UintPtr, Pointer<Utf8>, Pointer<Void>, Pointer<Void>, Uint32, Pointer<Uint8>, Pointer<Uint8>, Uint32);
typedef SCardIntroduceCardTypeADart = int Function(int, Pointer<Utf8>, Pointer<Void>, Pointer<Void>, int, Pointer<Uint8>, Pointer<Uint8>, int);
final SCardIntroduceCardTypeA = DynamicLibrary.open('WinSCard.dll')
.lookupFunction<SCardIntroduceCardTypeANative, SCardIntroduceCardTypeADart>('SCardIntroduceCardTypeA');
// hContext : UINT_PTR -> UintPtr
// szCardName : LPCSTR -> Pointer<Utf8>
// pguidPrimaryProvider : GUID* optional -> Pointer<Void>
// rgguidInterfaces : GUID* optional -> Pointer<Void>
// dwInterfaceCount : DWORD -> Uint32
// pbAtr : BYTE* -> Pointer<Uint8>
// pbAtrMask : BYTE* -> Pointer<Uint8>
// cbAtrLen : DWORD -> Uint32
// 文字列は package:ffi の "...".toNativeUtf16()/toNativeUtf8() で変換。{$mode objfpc}{$H+}
function SCardIntroduceCardTypeA(
hContext: NativeUInt; // UINT_PTR
szCardName: PAnsiChar; // LPCSTR
pguidPrimaryProvider: PGUID; // GUID* optional
rgguidInterfaces: PGUID; // GUID* optional
dwInterfaceCount: DWORD; // DWORD
pbAtr: Pointer; // BYTE*
pbAtrMask: Pointer; // BYTE*
cbAtrLen: DWORD // DWORD
): Integer; stdcall;
external 'WinSCard.dll' name 'SCardIntroduceCardTypeA';import Foreign
import Foreign.C.Types
import Foreign.C.String
foreign import stdcall safe "SCardIntroduceCardTypeA"
c_SCardIntroduceCardTypeA :: CUIntPtr -> CString -> Ptr () -> Ptr () -> Word32 -> Ptr Word8 -> Ptr Word8 -> Word32 -> IO Int32
-- hContext : UINT_PTR -> CUIntPtr
-- szCardName : LPCSTR -> CString
-- pguidPrimaryProvider : GUID* optional -> Ptr ()
-- rgguidInterfaces : GUID* optional -> Ptr ()
-- dwInterfaceCount : DWORD -> Word32
-- pbAtr : BYTE* -> Ptr Word8
-- pbAtrMask : BYTE* -> Ptr Word8
-- cbAtrLen : DWORD -> Word32
-- 要 GHC(Windows)。stdcall は x64 では ccall として扱われる。ブロックする API は safe 呼び出し推奨。open Ctypes
open Foreign
let scardintroducecardtypea =
foreign "SCardIntroduceCardTypeA"
(size_t @-> string @-> (ptr void) @-> (ptr void) @-> uint32_t @-> (ptr uint8_t) @-> (ptr uint8_t) @-> uint32_t @-> returning int32_t)
(* hContext : UINT_PTR -> size_t *)
(* szCardName : LPCSTR -> string *)
(* pguidPrimaryProvider : GUID* optional -> (ptr void) *)
(* rgguidInterfaces : GUID* optional -> (ptr void) *)
(* dwInterfaceCount : DWORD -> uint32_t *)
(* pbAtr : BYTE* -> (ptr uint8_t) *)
(* pbAtrMask : BYTE* -> (ptr uint8_t) *)
(* cbAtrLen : DWORD -> uint32_t *)
(* foreign は cdecl 前提。x64 Windows では WINAPI と一致。構造体は ctypes structure を定義のこと。 *)(cffi:define-foreign-library winscard (t "WinSCard.dll"))
(cffi:use-foreign-library winscard)
(cffi:defcfun ("SCardIntroduceCardTypeA" scard-introduce-card-type-a :convention :stdcall) :int32
(h-context :uint64) ; UINT_PTR
(sz-card-name :string) ; LPCSTR
(pguid-primary-provider :pointer) ; GUID* optional
(rgguid-interfaces :pointer) ; GUID* optional
(dw-interface-count :uint32) ; DWORD
(pb-atr :pointer) ; BYTE*
(pb-atr-mask :pointer) ; BYTE*
(cb-atr-len :uint32)) ; DWORD
; isize/usize(INT_PTR/SIZE_T)は x64 前提で :int64/:uint64。x86 では :int32/:uint32。use Win32::API;
my $SCardIntroduceCardTypeA = Win32::API::More->new('WinSCard',
'int SCardIntroduceCardTypeA(WPARAM hContext, LPCSTR szCardName, LPVOID pguidPrimaryProvider, LPVOID rgguidInterfaces, DWORD dwInterfaceCount, LPVOID pbAtr, LPVOID pbAtrMask, DWORD cbAtrLen)');
# my $ret = $SCardIntroduceCardTypeA->Call($hContext, $szCardName, $pguidPrimaryProvider, $rgguidInterfaces, $dwInterfaceCount, $pbAtr, $pbAtrMask, $cbAtrLen);
# hContext : UINT_PTR -> WPARAM
# szCardName : LPCSTR -> LPCSTR
# pguidPrimaryProvider : GUID* optional -> LPVOID
# rgguidInterfaces : GUID* optional -> LPVOID
# dwInterfaceCount : DWORD -> DWORD
# pbAtr : BYTE* -> LPVOID
# pbAtrMask : BYTE* -> LPVOID
# cbAtrLen : DWORD -> DWORD
# 値渡し構造体は pack() した文字列、または Win32::API::Struct を使用。関連項目
文字セット違い
- f SCardIntroduceCardTypeW (Unicode版) — 新しいスマートカード種別をシステムに登録する。
公式の関連項目
- f SCardEstablishContext — スマートカードリソースマネージャーへの接続コンテキストを確立する。
- f SCardForgetCardTypeA — 登録済みのスマートカード種別を削除する。
- f SCardIntroduceReaderA — 新しいスマートカードリーダーをシステムに登録する。
- f SCardIntroduceReaderGroupA — 新しいリーダーグループをシステムに登録する。
- f SCardListCardsA — ATRやインターフェイスに一致するカード名を列挙する。