blob: 9f4bb5a4c6f1af833d2a1177450fa43f4ddea5b7 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
{ Parsed from CryptoTokenKit.framework TKSmartCard.h }
{$ifdef TYPES}
type
TKSmartCardSlotManagerPtr = ^TKSmartCardSlotManager;
TKSmartCardSlotPtr = ^TKSmartCardSlot;
TKSmartCardPtr = ^TKSmartCard;
{$endif}
{$ifdef CLASSES}
type
TKSmartCardSlotManager = objcclass external (NSObject)
public
class function defaultManager: instancetype; message 'defaultManager';
function slotNames: NSArray; message 'slotNames';
procedure getSlotWithName_reply (name: NSString; reply: OpaqueCBlock); message 'getSlotWithName:reply:';
end;
{$endif}
{$ifdef TYPES}
type
TKSmartCardSlotState = NSInteger;
TKSmartCardSlotStatePtr = ^TKSmartCardSlotState;
const
TKSmartCardSlotStateMissing = 0;
TKSmartCardSlotStateEmpty = 1;
TKSmartCardSlotStateProbing = 2;
TKSmartCardSlotStateMuteCard = 3;
TKSmartCardSlotStateValidCard = 4;
TKSmartCardNoSlot = TKSmartCardSlotStateMissing deprecated 'in 10_10, 10_10';
TKSmartCardSlotEmpty = TKSmartCardSlotStateEmpty deprecated 'in 10_10, 10_10';
TKSmartCardSlotProbing = TKSmartCardSlotStateProbing deprecated 'in 10_10, 10_10';
TKSmartCardSlotMuteCard = TKSmartCardSlotStateMuteCard deprecated 'in 10_10, 10_10';
TKSmartCardSlotValidCard = TKSmartCardSlotStateValidCard deprecated 'in 10_10, 10_10';
{$endif}
{$ifdef CLASSES}
type
TKSmartCardSlot = objcclass external (NSObject)
public
function state: TKSmartCardSlotState; message 'state';
function ATR: TKSmartCardATR; message 'ATR';
function name: NSString; message 'name';
function maxInputLength: NSInteger; message 'maxInputLength';
function maxOutputLength: NSInteger; message 'maxOutputLength';
function makeSmartCard: TKSmartCard; message 'makeSmartCard';
end;
type
TKSmartCard = objcclass external (NSObject)
public
function slot: TKSmartCardSlot; message 'slot';
function valid: ObjCBOOL; message 'valid';
procedure setAllowedProtocols(newValue: TKSmartCardProtocol); message 'setAllowedProtocols:';
function allowedProtocols: TKSmartCardProtocol; message 'allowedProtocols';
function currentProtocol: TKSmartCardProtocol; message 'currentProtocol';
procedure setSensitive(newValue: ObjCBOOL); message 'setSensitive:';
function sensitive: ObjCBOOL; message 'sensitive';
procedure setContext(newValue: id); message 'setContext:';
function context: id; message 'context';
procedure beginSessionWithReply (reply: OpaqueCBlock); message 'beginSessionWithReply:';
procedure transmitRequest_reply (request: NSData; reply: OpaqueCBlock); message 'transmitRequest:reply:';
procedure endSession; message 'endSession';
end;
type
APDULevelTransmit = objccategory external (TKSmartCard)
procedure setCla(newValue: UInt8); message 'setCla:';
function cla: UInt8; message 'cla';
procedure setUseExtendedLength(newValue: ObjCBOOL); message 'setUseExtendedLength:';
function useExtendedLength: ObjCBOOL; message 'useExtendedLength';
procedure sendIns_p1_p2_data_le_reply (ins: UInt8; p1: UInt8; p2: UInt8; requestData: NSData; le: NSNumber; reply: OpaqueCBlock); message 'sendIns:p1:p2:data:le:reply:';
end;
{$endif}
|
