Tcl

ScMinidriver - Acquire Context with Smart Card or USB Token

See more ScMinidriver Examples

Initializes communication with the card inserted in the given reader (or a USB token). Reader names can be discovered via the SCard.ListReaders or SCard.FindSmartcards methods. If successful, the Atr and CardName properties will be set. Tcl

load ./chilkat.dll

set success 0

# This example requires the Chilkat API to have been previously unlocked.
# See Global Unlock Sample for sample code.

set scmd [new_CkScMinidriver]

# Reader names (smart card readers or USB tokens) can be discovered
# via List Readers or Find Smart Cards
set readerName "Alcor Micro USB Smart Card Reader 0"
set success [CkScMinidriver_AcquireContext $scmd $readerName]
if {$success == 0} then {
    puts [CkScMinidriver_lastErrorText $scmd]
    delete_CkScMinidriver $scmd
    exit
}

# If we are successful, the name of the currently inserted smart card is available:
set cardName [CkScMinidriver_cardName $scmd]
puts "Card name: $cardName"

# Also, the ATR of the inserted card is available (you will likely not need the ATR).
puts "ATR: [CkScMinidriver_atr $scmd]"

# Also, the maximum number of key containers is readily available:
puts "Max number of key containers = [CkScMinidriver_get_MaxContainers $scmd]"

# Delete the context when finished with the card.
set success [CkScMinidriver_DeleteContext $scmd]
if {$success == 0} then {
    puts [CkScMinidriver_lastErrorText $scmd]
}

# Sample output:

# Card name: IDPrime MD T=0
# ATR: 3B7F96000080318065B0855956FB120FFE829000
# Max number of key containers = 20

delete_CkScMinidriver $scmd