]> git.zerfleddert.de Git - proxmark3-svn/blob - client/scripts/tnp3dump.lua
f93f9728288afcb53d966ee283007ef18c1ddb32
[proxmark3-svn] / client / scripts / tnp3dump.lua
1 local cmds = require('commands')
2 local getopt = require('getopt')
3 local bin = require('bin')
4 local lib14a = require('read14a')
5 local utils = require('utils')
6 local md5 = require('md5')
7 local dumplib = require('html_dumplib')
8 local toys = require('default_toys')
9
10 example =[[
11 script run tnp3dump
12 script run tnp3dump -n
13 script run tnp3dump -p
14 script run tnp3dump -k aabbccddeeff
15 script run tnp3dump -k aabbccddeeff -n
16 script run tnp3dump -o myfile
17 script run tnp3dump -n -o myfile
18 script run tnp3dump -p -o myfile
19 script run tnp3dump -k aabbccddeeff -n -o myfile
20 ]]
21 author = "Iceman"
22 usage = "script run tnp3dump -k <key> -n -p -o <filename>"
23 desc =[[
24 This script will try to dump the contents of a Mifare TNP3xxx card.
25 It will need a valid KeyA in order to find the other keys and decode the card.
26 Arguments:
27 -h : this help
28 -k <key> : Sector 0 Key A.
29 -n : Use the nested cmd to find all keys
30 -p : Use the precalc to find all keys
31 -o : filename for the saved dumps
32 ]]
33
34 local HASHCONSTANT = '20436F707972696768742028432920323031302041637469766973696F6E2E20416C6C205269676874732052657365727665642E20'
35
36 local TIMEOUT = 2000 -- Shouldn't take longer than 2 seconds
37 local DEBUG = false -- the debug flag
38 local numBlocks = 64
39 local numSectors = 16
40 ---
41 -- A debug printout-function
42 function dbg(args)
43 if not DEBUG then
44 return
45 end
46
47 if type(args) == "table" then
48 local i = 1
49 while result[i] do
50 dbg(result[i])
51 i = i+1
52 end
53 else
54 print("###", args)
55 end
56 end
57 ---
58 -- This is only meant to be used when errors occur
59 function oops(err)
60 print("ERROR: ",err)
61 end
62 ---
63 -- Usage help
64 function help()
65 print(desc)
66 print("Example usage")
67 print(example)
68 end
69 --
70 -- Exit message
71 function ExitMsg(msg)
72 print( string.rep('--',20) )
73 print( string.rep('--',20) )
74 print(msg)
75 print()
76 end
77
78 local function readdumpkeys(infile)
79 t = infile:read("*all")
80 len = string.len(t)
81 local len,hex = bin.unpack(("H%d"):format(len),t)
82 return hex
83 end
84
85 local function waitCmd()
86 local response = core.WaitForResponseTimeout(cmds.CMD_ACK,TIMEOUT)
87 if response then
88 local count,cmd,arg0 = bin.unpack('LL',response)
89 if(arg0==1) then
90 local count,arg1,arg2,data = bin.unpack('LLH511',response,count)
91 return data:sub(1,32)
92 else
93 return nil, "Couldn't read block.."
94 end
95 end
96 return nil, "No response from device"
97 end
98
99 local function computeCrc16(s)
100 local hash = core.crc16(utils.ConvertHexToAscii(s))
101 return hash
102 end
103
104 local function reverseCrcBytes(crc)
105 crc2 = crc:sub(3,4)..crc:sub(1,2)
106 return tonumber(crc2,16)
107 end
108
109 local function main(args)
110
111 print( string.rep('--',20) )
112 print( string.rep('--',20) )
113
114 local keyA
115 local cmd
116 local err
117 local useNested = false
118 local usePreCalc = false
119 local cmdReadBlockString = 'hf mf rdbl %d A %s'
120 local input = "dumpkeys.bin"
121 local outputTemplate = os.date("toydump_%Y-%m-%d_%H%M%S");
122
123 -- Arguments for the script
124 for o, a in getopt.getopt(args, 'hk:npo:') do
125 if o == "h" then return help() end
126 if o == "k" then keyA = a end
127 if o == "n" then useNested = true end
128 if o == "p" then usePreCalc = true end
129 if o == "o" then outputTemplate = a end
130 end
131
132 -- validate input args.
133 keyA = keyA or '4b0b20107ccb'
134 if #(keyA) ~= 12 then
135 return oops( string.format('Wrong length of write key (was %d) expected 12', #keyA))
136 end
137
138 -- Turn off Debug
139 local cmdSetDbgOff = "hf mf dbg 0"
140 core.console( cmdSetDbgOff)
141
142 result, err = lib14a.read1443a(false)
143 if not result then
144 return oops(err)
145 end
146
147 core.clearCommandBuffer()
148
149 if 0x01 ~= result.sak then -- NXP MIFARE TNP3xxx
150 -- return oops('This is not a TNP3xxx tag. aborting.')
151 end
152
153 -- Show tag info
154 print((' Found tag %s'):format(result.name))
155
156 dbg(('Using keyA : %s'):format(keyA))
157
158 --Trying to find the other keys
159 if useNested then
160 core.console( ('hf mf nested 1 0 A %s d'):format(keyA) )
161 end
162
163 core.clearCommandBuffer()
164
165 local akeys = ''
166 if usePreCalc then
167 local pre = require('precalc')
168 akeys = pre.GetAll(result.uid)
169 else
170 print('Loading dumpkeys.bin')
171 local hex, err = utils.ReadDumpFile(input)
172 if not hex then
173 return oops(err)
174 end
175 akeys = hex:sub(0,12*16)
176 end
177
178 -- Read block 0
179 cmd = Command:new{cmd = cmds.CMD_MIFARE_READBL, arg1 = 0,arg2 = 0,arg3 = 0, data = keyA}
180 err = core.SendCommand(cmd:getBytes())
181 if err then return oops(err) end
182 local block0, err = waitCmd()
183 if err then return oops(err) end
184
185 -- Read block 1
186 cmd = Command:new{cmd = cmds.CMD_MIFARE_READBL, arg1 = 1,arg2 = 0,arg3 = 0, data = keyA}
187 err = core.SendCommand(cmd:getBytes())
188 if err then return oops(err) end
189 local block1, err = waitCmd()
190 if err then return oops(err) end
191
192 local key
193 local pos = 0
194 local blockNo
195 local blocks = {}
196
197 print('Reading card data')
198 core.clearCommandBuffer()
199
200 -- main loop
201 io.write('Reading blocks > ')
202 for blockNo = 0, numBlocks-1, 1 do
203
204 if core.ukbhit() then
205 print("aborted by user")
206 break
207 end
208
209 pos = (math.floor( blockNo / 4 ) * 12)+1
210 key = akeys:sub(pos, pos + 11 )
211 cmd = Command:new{cmd = cmds.CMD_MIFARE_READBL, arg1 = blockNo ,arg2 = 0,arg3 = 0, data = key}
212 local err = core.SendCommand(cmd:getBytes())
213 if err then return oops(err) end
214 local blockdata, err = waitCmd()
215 if err then return oops(err) end
216
217
218 if blockNo%4 ~= 3 then
219
220 if blockNo < 8 then
221 -- Block 0-7 not encrypted
222 blocks[blockNo+1] = ('%02d :: %s'):format(blockNo,blockdata)
223 else
224 local base = ('%s%s%02x%s'):format(block0, block1, blockNo, HASHCONSTANT)
225 local baseStr = utils.ConvertHexToAscii(base)
226 local md5hash = md5.sumhexa(baseStr)
227 local aestest = core.aes(md5hash, blockdata)
228
229 local hex = utils.ConvertAsciiToBytes(aestest)
230 hex = utils.ConvertBytesToHex(hex)
231
232 -- blocks with zero not encrypted.
233 if string.find(blockdata, '^0+$') then
234 blocks[blockNo+1] = ('%02d :: %s'):format(blockNo,blockdata)
235 else
236 blocks[blockNo+1] = ('%02d :: %s'):format(blockNo,hex)
237 io.write( blockNo..',')
238 end
239 end
240 else
241 -- Sectorblocks, not encrypted
242 blocks[blockNo+1] = ('%02d :: %s%s'):format(blockNo,key,blockdata:sub(13,32))
243 end
244 end
245 io.write('\n')
246
247 core.clearCommandBuffer()
248
249 -- Print results
250 local bindata = {}
251 local emldata = ''
252
253 for _,s in pairs(blocks) do
254 local slice = s:sub(8,#s)
255 local str = utils.ConvertBytesToAscii(
256 utils.ConvertHexToBytes(slice)
257 )
258 emldata = emldata..slice..'\n'
259 for c in (str):gmatch('.') do
260 bindata[#bindata+1] = c
261 end
262 end
263
264 print( string.rep('--',20) )
265
266
267 local uid = block0:sub(1,8)
268 local toytype = block1:sub(1,4)
269 local cardidLsw = block1:sub(9,16)
270 local cardidMsw = block1:sub(16,24)
271 local cardid = block1:sub(9,24)
272 local subtype = block1:sub(25,28)
273
274 -- Write dump to files
275 if not DEBUG then
276 local foo = dumplib.SaveAsBinary(bindata, outputTemplate..'_uid_'..uid..'.bin')
277 print(("Wrote a BIN dump to: %s"):format(foo))
278 local bar = dumplib.SaveAsText(emldata, outputTemplate..'_uid_'..uid..'.eml')
279 print(("Wrote a EML dump to: %s"):format(bar))
280 end
281
282 local item = toys.Find(toytype, subtype)
283 if item then
284 local itemStr = ('%s - %s (%s)'):format(item[6],item[5], item[4])
285 print(' ITEM TYPE : '..itemStr )
286 else
287 print((' ITEM TYPE : 0x%s 0x%s'):format(toytype, subtype))
288 end
289
290 -- Show info
291 print( (' Alter ego / traptype : 0x%s'):format(traptype) )
292 print( (' UID : 0x%s'):format(uid) )
293 print( (' CARDID : 0x%s'):format(cardid ) )
294
295 print( string.rep('--',20) )
296
297 end
298 main(args)
Impressum, Datenschutz