DataFlex
DataFlex
PKCS11 Find Driver Files
See more PKCS11 Examples
Uses Chilkat's SCard class to find smartcards/tokens present on the system (Windows/Linux/Mac/etc.) to return information about the expected PKCS11 drivers (DLL, shared lib, dylib) and the confirmed existing PKCS11 drivers present on the system.Once the PKCS11 driver file is discovered, it can be used as a starting point with the PKCS11 class, which is shown in this example.
Chilkat DataFlex Downloads
Use ChilkatAx-win32.pkg
Procedure Test
Boolean iSuccess
Handle hoScard
Variant vJson
Handle hoJson
Variant vJson2
Handle hoJson2
Integer iNumExists
String sPkcs11DriverPath
Handle hoPkcs11
Variant vJson
Pkcs11 Handle hoJsonPkcs11
String sTemp1
Move False To iSuccess
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
// First discover the smart cards and tokens present on the system..
Get Create (RefClass(cComChilkatSCard)) To hoScard
If (Not(IsComObjectCreated(hoScard))) Begin
Send CreateComObject of hoScard
End
Get Create (RefClass(cComChilkatJsonObject)) To hoJson
If (Not(IsComObjectCreated(hoJson))) Begin
Send CreateComObject of hoJson
End
Set ComEmitCompact Of hoJson To False
Get pvComObject of hoJson to vJson
Get ComFindSmartcards Of hoScard vJson To iSuccess
If (iSuccess = False) Begin
Get ComLastErrorText Of hoScard To sTemp1
Showln sTemp1
Procedure_Return
End
Get ComEmit Of hoJson To sTemp1
Showln sTemp1
// Sample output:
// Note: This example was tested on Windows, but it can also run on Linux and MacOSX.
// {
// "reader": [
// {
// "name": "Gemalto USB SmartCard Reader 0",
// "state": "present,inuse",
// "vendorName": "Gemalto",
// "serialNumber": "3339424644374543",
// "systemName": "Gemalto USB SmartCard Reader 0",
// "card": {
// "atr": "3B7F96000080318065B084565110120FFE829000",
// "windows": {
// "miniDriver": "AxaltoCM.dll",
// "cryptoProvider": "Microsoft Base Smart Card Crypto Provider",
// "keyStorageProvider": "Microsoft Smart Card Key Storage Provider"
// },
// "pkcs11_driver": {
// "possible": [
// "C:/Program Files/SafeNet/Authentication/SAC/x64/IDPrimePKCS1164.dll",
// "C:/Program Files(x86)/Gemalto/IDGo 800 PKCS#11/IDPrimePKCS1164.dll",
// "C:/Program Files/Gemalto/IDGo 800 PKCS#11/IDPrimePKCS1164.dll",
// "C:/WINDOWS/SysWOW64/IDPrimePKCS1164.dll",
// "C:/WINDOWS/SysWOW64/eTPKCS11.dll"
// ],
// "exists": [
// "C:/Program Files/SafeNet/Authentication/SAC/x64/IDPrimePKCS1164.dll",
// "C:/WINDOWS/SysWOW64/eTPKCS11.dll"
// ]
// }
// }
// }
// ]
// }
// We're interested in the PKCS11 drivers that were found.
// Find the 1st reader where the card is present. (The "state" contains the keyword "present")
Get Create (RefClass(cComChilkatJsonObject)) To hoJson2
If (Not(IsComObjectCreated(hoJson2))) Begin
Send CreateComObject of hoJson2
End
Get pvComObject of hoJson2 to vJson2
Get ComFindRecord2 Of hoJson "reader" "state" "*present*" False vJson2 To iSuccess
If (iSuccess = False) Begin
Showln "No readers exist with a smart card or token present."
Procedure_Return
End
// Get the size of the "card.pkcs11_driver.exists" array.
// If it doesn't exist the size will be -1.
Get ComSizeOfArray Of hoJson2 "card.pkcs11_driver.exists" To iNumExists
If (iNumExists < 1) Begin
Showln "No PKCS11 driver files found for the smart card."
Procedure_Return
End
// Get the path of the 1st available PKCS11 driver.
Get ComStringOf Of hoJson2 "card.pkcs11_driver.exists[0]" To sPkcs11DriverPath
Showln "PKCS11 driver path = " sPkcs11DriverPath
// Now that we have a driver file, we can use it for PKCS11 access..
Get Create (RefClass(cComChilkatPkcs11)) To hoPkcs11
If (Not(IsComObjectCreated(hoPkcs11))) Begin
Send CreateComObject of hoPkcs11
End
Set ComSharedLibPath Of hoPkcs11 To sPkcs11DriverPath
Get ComInitialize Of hoPkcs11 To iSuccess
If (iSuccess = False) Begin
Get ComLastErrorText Of hoPkcs11 To sTemp1
Showln sTemp1
Procedure_Return
End
// Get information about the smart card via PKCS11..
Get Create (RefClass(cComChilkatJsonObject)) To hoJsonPkcs11
If (Not(IsComObjectCreated(hoJsonPkcs11))) Begin
Send CreateComObject of hoJsonPkcs11
End
Get pvComObject of hoJsonPkcs11 to vJsonPkcs11
Get ComDiscover Of hoPkcs11 True vJsonPkcs11 To iSuccess
If (iSuccess = False) Begin
Get ComLastErrorText Of hoPkcs11 To sTemp1
Showln sTemp1
Procedure_Return
End
Set ComEmitCompact Of hoJsonPkcs11 To False
Get ComEmit Of hoJsonPkcs11 To sTemp1
Showln sTemp1
// Use this online tool to generate parsing code from sample JSON:
// Generate Parsing Code from JSON
// Sample output:
// {
// "cryptokiVersion": {
// "major": 2,
// "minor": 20
// },
// "manufacturerID": "Gemalto",
// "libraryDescription": "Gemalto PKCS11",
// "libraryVersion": {
// "major": 10,
// "minor": 8
// },
// "slot": [
// {
// "id": 0,
// "slotDescription": "Gemalto USB SmartCard Reader 0",
// "manufacturerID": "Gemalto",
// "tokenPresent": true,
// "removableDevice": true,
// "hardwareSlot": true,
// "hardwareVersion": {
// "major": 0,
// "minor": 0
// },
// "firmwareVersion": {
// "major": 0,
// "minor": 0
// },
// "token": {
// "label": "chilkat",
// "manufacturerID": "Gemalto",
// "model": "ID Prime MD",
// "serialNumber": "2DD70CC46070255E",
// "flags": [
// "CKF_RNG",
// "CKF_LOGIN_REQUIRED",
// "CKF_USER_PIN_INITIALIZED",
// "CKF_DUAL_CRYPTO_OPERATIONS",
// "CKF_TOKEN_INITIALIZED",
// "CKF_SO_PIN_COUNT_LOW",
// "CKF_SO_PIN_LOCKED"
// ],
// "maxSessionCount": 0,
// "sessionCount": 0,
// "maxRwSessionCount": 0,
// "rwSessionCount": 0,
// "maxPinLen": 16,
// "minPinLen": 4,
// "totalPublicMemory": 32768,
// "freePublicMemory": 32720,
// "totalPrivateMemory": 32768,
// "freePrivateMemory": 32720,
// "hardwareVersion": {
// "major": 0,
// "minor": 0
// },
// "firmwareVersion": {
// "major": 0,
// "minor": 0
// },
// "utcTime": "",
// "mechanism": [
// "CKM_DES3_MAC",
// "CKM_DES3_MAC_GENERAL",
// "CKM_AES_MAC",
// "CKM_AES_MAC_GENERAL",
// "CKM_DES3_CBC",
// "CKM_DES3_CBC_PAD",
// "CKM_AES_CBC",
// "CKM_AES_CBC_PAD",
// "CKM_AES_CTR",
// "CKM_AES_CCM",
// "CKM_RSA_PKCS_KEY_PAIR_GEN",
// "CKM_RSA_PKCS",
// "CKM_RSA_PKCS_OAEP",
// "CKM_RSA_PKCS_PSS",
// "CKM_SHA256_RSA_PKCS_PSS",
// "CKM_SHA384_RSA_PKCS_PSS",
// "CKM_SHA512_RSA_PKCS_PSS",
// "CKM_SHA256_RSA_PKCS",
// "CKM_SHA384_RSA_PKCS",
// "CKM_SHA512_RSA_PKCS",
// "CKM_EC_KEY_PAIR_GEN",
// "CKM_ECDSA",
// "CKM_ECDSA_SHA256",
// "CKM_ECDSA_SHA384",
// "80000045",
// "CKM_ECDSA_SHA512",
// "CKM_ECDH1_DERIVE",
// "CKM_DES3_KEY_GEN",
// "CKM_AES_KEY_GEN",
// "CKM_PBE_SHA1_DES3_EDE_CBC",
// "CKM_GENERIC_SECRET_KEY_GEN",
// "CKM_PBA_SHA1_WITH_SHA1_HMAC",
// "CKM_PKCS5_PBKD2",
// "CKM_SHA_1_HMAC_GENERAL",
// "CKM_SHA_1_HMAC",
// "CKM_SHA256_HMAC_GENERAL",
// "CKM_SHA256_HMAC",
// "CKM_SHA384_HMAC_GENERAL",
// "CKM_SHA384_HMAC",
// "CKM_SHA512_HMAC_GENERAL",
// "CKM_SHA512_HMAC",
// "CKM_SHA_1",
// "CKM_SHA256",
// "CKM_SHA384",
// "CKM_SHA512",
// "80006001"
// ],
// "rsa": {
// "minKeySize": 2048,
// "maxKeySize": 2048
// }
// }
// }
// ]
// }
//
End_Procedure