2 This is a library to read 14443a tags. It can be used something like this
4 local reader = require('read14a')
5 result, err = reader.read14443a()
13 -- Loads the commands-library
14 local cmds = require('commands')
15 local TIMEOUT = 2000 -- Shouldn't take longer than 2 seconds
16 local ISO14A_COMMAND = {
18 ISO14A_NO_DISCONNECT = 2,
21 ISO14A_REQUEST_TRIGGER = 0x10,
22 ISO14A_APPEND_CRC = 0x20,
23 ISO14A_SET_TIMEOUT = 0x40,
24 ISO14A_NO_SELECT = 0x80,
25 ISO14A_TOPAZMODE = 0x100,
26 ISO14A_NO_RATS = 0x200
29 local ISO14443a_TYPES = {}
30 ISO14443a_TYPES[0x00] = "NXP MIFARE Ultralight | Ultralight C"
31 ISO14443a_TYPES[0x01] = "NXP MIFARE TNP3xxx Activision Game Appliance"
32 ISO14443a_TYPES[0x04] = "NXP MIFARE (various !DESFire !DESFire EV1)"
33 ISO14443a_TYPES[0x08] = "NXP MIFARE CLASSIC 1k | Plus 2k"
34 ISO14443a_TYPES[0x09] = "NXP MIFARE Mini 0.3k"
35 ISO14443a_TYPES[0x10] = "NXP MIFARE Plus 2k"
36 ISO14443a_TYPES[0x11] = "NXP MIFARE Plus 4k"
37 ISO14443a_TYPES[0x18] = "NXP MIFARE Classic 4k | Plus 4k"
38 ISO14443a_TYPES[0x20] = "NXP MIFARE DESFire 4k | DESFire EV1 2k/4k/8k | Plus 2k/4k | JCOP 31/41"
39 ISO14443a_TYPES[0x24] = "NXP MIFARE DESFire | DESFire EV1"
40 ISO14443a_TYPES[0x28] = "JCOP31 or JCOP41 v2.3.1"
41 ISO14443a_TYPES[0x38] = "Nokia 6212 or 6131 MIFARE CLASSIC 4K"
42 ISO14443a_TYPES[0x88] = "Infineon MIFARE CLASSIC 1K"
43 ISO14443a_TYPES[0x98] = "Gemplus MPCOS"
46 local function tostring_14443a(sak)
47 return ISO14443a_TYPES[sak] or ("Unknown (SAK=%x)"):format(sak)
50 local function parse14443a(data)
53 Based on this struct :
62 } __attribute__((__packed__)) iso14a_card_select_t;
66 local count,uid,uidlen, atqa, sak, ats_len, ats= bin.unpack('H10CH2CC',data)
67 uid = uid:sub(1,2*uidlen)
68 --print("uid, atqa, sak: ",uid, atqa, sak)
69 --print("TYPE: ", tostring_14443a(sak))
70 return { uid = uid, atqa = atqa, sak = sak, name = tostring_14443a(sak)}
73 --- Sends a USBpacket to the device
74 -- @param command - the usb packet to send
75 -- @param ignoreresponse - if set to true, we don't read the device answer packet
76 -- which is usually recipe for fail. If not sent, the host will wait 2s for a
77 -- response of type CMD_ACK
78 -- @return packet,nil if successfull
79 -- nil, errormessage if unsuccessfull
81 local function sendToDevice(command, ignoreresponse)
82 core.clearCommandBuffer()
83 local err = core.SendCommand(command:getBytes())
88 if ignoreresponse then return nil,nil end
90 local response = core.WaitForResponseTimeout(cmds.CMD_ACK,TIMEOUT)
94 -- This function does a connect and retrieves som einfo
95 -- @param dont_disconnect - if true, does not disable the field
96 -- @param no_rats - if true, skips ISO14443-4 select (RATS)
97 -- @return if successfull: an table containing card info
98 -- @return if unsuccessfull : nil, error
99 local function read14443a(dont_disconnect, no_rats)
100 local command, result, info, err, data
102 command = Command:new{cmd = cmds.CMD_READER_ISO_14443a,
103 arg1 = ISO14A_COMMAND.ISO14A_CONNECT}
104 if dont_disconnect then
105 command.arg1 = command.arg1 + ISO14A_COMMAND.ISO14A_NO_DISCONNECT
108 command.arg1 = command.arg1 + ISO14A_COMMAND.ISO14A_NO_RATS
110 local result,err = sendToDevice(command)
112 local count,cmd,arg0,arg1,arg2 = bin.unpack('LLLL',result)
114 return nil, "iso14443a card select failed"
116 data = string.sub(result,count)
117 info, err = parse14443a(data)
119 err ="No response from card"
130 -- Waits for a mifare card to be placed within the vicinity of the reader.
131 -- @return if successfull: an table containing card info
132 -- @return if unsuccessfull : nil, error
133 local function waitFor14443a()
134 print("Waiting for card... press any key to quit")
135 while not core.ukbhit() do
136 res, err = read14443a()
137 if res then return res end
138 -- err means that there was no response from card
140 return nil, "Aborted by user"
144 read14443a = read14443a,
146 waitFor14443a = waitFor14443a,
147 parse14443a = parse14443a,
148 sendToDevice = sendToDevice,
149 ISO14A_COMMAND = ISO14A_COMMAND,