]> git.zerfleddert.de Git - proxmark3-svn/blame_incremental - client/cmdhfmf.c
- Added very basic scripting support to PM3 client-side (proxmark3 application)
[proxmark3-svn] / client / cmdhfmf.c
... / ...
CommitLineData
1//-----------------------------------------------------------------------------\r
2// Copyright (C) 2011 Merlok\r
3//\r
4// This code is licensed to you under the terms of the GNU GPL, version 2 or,\r
5// at your option, any later version. See the LICENSE.txt file for the text of\r
6// the license.\r
7//-----------------------------------------------------------------------------\r
8// High frequency MIFARE commands\r
9//-----------------------------------------------------------------------------\r
10\r
11#include "cmdhfmf.h"\r
12#include "proxmark3.h"\r
13\r
14static int CmdHelp(const char *Cmd);\r
15\r
16int CmdHF14AMifare(const char *Cmd)\r
17{\r
18 uint32_t uid = 0;\r
19 uint32_t nt = 0;\r
20 uint64_t par_list = 0, ks_list = 0, r_key = 0;\r
21 uint8_t isOK = 0;\r
22 uint8_t keyBlock[6] = {0,0,0,0,0,0};\r
23 \r
24 if (param_getchar(Cmd, 0) && param_gethex(Cmd, 0, keyBlock, 8)) {\r
25 PrintAndLog("Nt must include 8 HEX symbols");\r
26 return 1;\r
27 }\r
28 \r
29 UsbCommand c = {CMD_READER_MIFARE, {(uint32_t)bytes_to_num(keyBlock, 4), 0, 0}};\r
30 SendCommand(&c);\r
31 \r
32 //flush queue\r
33 while (ukbhit()) getchar();\r
34\r
35 // message\r
36 printf("-------------------------------------------------------------------------\n");\r
37 printf("Executing command. It may take up to 30 min.\n");\r
38 printf("Press the key on proxmark3 device to abort proxmark3.\n");\r
39 printf("Press the key on the proxmark3 device to abort both proxmark3 and client.\n");\r
40 printf("-------------------------------------------------------------------------\n");\r
41 \r
42 // wait cycle\r
43 while (true) {\r
44 printf(".");\r
45 if (ukbhit()) {\r
46 getchar();\r
47 printf("\naborted via keyboard!\n");\r
48 break;\r
49 }\r
50 \r
51 UsbCommand * resp = WaitForResponseTimeout(CMD_ACK, 2000);\r
52 if (resp != NULL) {\r
53 isOK = resp->arg[0] & 0xff;\r
54 \r
55 uid = (uint32_t)bytes_to_num(resp->d.asBytes + 0, 4);\r
56 nt = (uint32_t)bytes_to_num(resp->d.asBytes + 4, 4);\r
57 par_list = bytes_to_num(resp->d.asBytes + 8, 8);\r
58 ks_list = bytes_to_num(resp->d.asBytes + 16, 8);\r
59 \r
60 printf("\n\n");\r
61 PrintAndLog("isOk:%02x", isOK);\r
62 if (!isOK) PrintAndLog("Proxmark can't get statistic info. Execution aborted.\n");\r
63 break;\r
64 }\r
65 } \r
66 printf("\n");\r
67 \r
68 // error\r
69 if (isOK != 1) return 1;\r
70 \r
71 // execute original function from util nonce2key\r
72 if (nonce2key(uid, nt, par_list, ks_list, &r_key)) return 2;\r
73 printf("------------------------------------------------------------------\n");\r
74 PrintAndLog("Key found:%012llx \n", r_key);\r
75\r
76 num_to_bytes(r_key, 6, keyBlock);\r
77 isOK = mfCheckKeys(0, 0, 1, keyBlock, &r_key);\r
78 if (!isOK) \r
79 PrintAndLog("Found valid key:%012llx", r_key);\r
80 else\r
81 PrintAndLog("Found invalid key. ( Nt=%08x", nt); \r
82 \r
83 \r
84 return 0;\r
85}\r
86\r
87int CmdHF14AMfWrBl(const char *Cmd)\r
88{\r
89 uint8_t blockNo = 0;\r
90 uint8_t keyType = 0;\r
91 uint8_t key[6] = {0, 0, 0, 0, 0, 0};\r
92 uint8_t bldata[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};\r
93 \r
94 char cmdp = 0x00;\r
95\r
96 if (strlen(Cmd)<3) {\r
97 PrintAndLog("Usage: hf mf wrbl <block number> <key A/B> <key (12 hex symbols)> <block data (32 hex symbols)>");\r
98 PrintAndLog(" sample: hf mf wrbl 0 A FFFFFFFFFFFF 000102030405060708090A0B0C0D0E0F");\r
99 return 0;\r
100 } \r
101\r
102 blockNo = param_get8(Cmd, 0);\r
103 cmdp = param_getchar(Cmd, 1);\r
104 if (cmdp == 0x00) {\r
105 PrintAndLog("Key type must be A or B");\r
106 return 1;\r
107 }\r
108 if (cmdp != 'A' && cmdp != 'a') keyType = 1;\r
109 if (param_gethex(Cmd, 2, key, 12)) {\r
110 PrintAndLog("Key must include 12 HEX symbols");\r
111 return 1;\r
112 }\r
113 if (param_gethex(Cmd, 3, bldata, 32)) {\r
114 PrintAndLog("Block data must include 32 HEX symbols");\r
115 return 1;\r
116 }\r
117 PrintAndLog("--block no:%02x key type:%02x key:%s", blockNo, keyType, sprint_hex(key, 6));\r
118 PrintAndLog("--data: %s", sprint_hex(bldata, 16));\r
119 \r
120 UsbCommand c = {CMD_MIFARE_WRITEBL, {blockNo, keyType, 0}};\r
121 memcpy(c.d.asBytes, key, 6);\r
122 memcpy(c.d.asBytes + 10, bldata, 16);\r
123 SendCommand(&c);\r
124 UsbCommand * resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
125\r
126 if (resp != NULL) {\r
127 uint8_t isOK = resp->arg[0] & 0xff;\r
128\r
129 PrintAndLog("isOk:%02x", isOK);\r
130 } else {\r
131 PrintAndLog("Command execute timeout");\r
132 }\r
133\r
134 return 0;\r
135}\r
136\r
137int CmdHF14AMfRdBl(const char *Cmd)\r
138{\r
139 uint8_t blockNo = 0;\r
140 uint8_t keyType = 0;\r
141 uint8_t key[6] = {0, 0, 0, 0, 0, 0};\r
142 \r
143 char cmdp = 0x00;\r
144\r
145\r
146 if (strlen(Cmd)<3) {\r
147 PrintAndLog("Usage: hf mf rdbl <block number> <key A/B> <key (12 hex symbols)>");\r
148 PrintAndLog(" sample: hf mf rdbl 0 A FFFFFFFFFFFF ");\r
149 return 0;\r
150 } \r
151 \r
152 blockNo = param_get8(Cmd, 0);\r
153 cmdp = param_getchar(Cmd, 1);\r
154 if (cmdp == 0x00) {\r
155 PrintAndLog("Key type must be A or B");\r
156 return 1;\r
157 }\r
158 if (cmdp != 'A' && cmdp != 'a') keyType = 1;\r
159 if (param_gethex(Cmd, 2, key, 12)) {\r
160 PrintAndLog("Key must include 12 HEX symbols");\r
161 return 1;\r
162 }\r
163 PrintAndLog("--block no:%02x key type:%02x key:%s ", blockNo, keyType, sprint_hex(key, 6));\r
164 \r
165 UsbCommand c = {CMD_MIFARE_READBL, {blockNo, keyType, 0}};\r
166 memcpy(c.d.asBytes, key, 6);\r
167 SendCommand(&c);\r
168 UsbCommand * resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
169\r
170 if (resp != NULL) {\r
171 uint8_t isOK = resp->arg[0] & 0xff;\r
172 uint8_t * data = resp->d.asBytes;\r
173\r
174 if (isOK)\r
175 PrintAndLog("isOk:%02x data:%s", isOK, sprint_hex(data, 16));\r
176 else\r
177 PrintAndLog("isOk:%02x", isOK);\r
178 } else {\r
179 PrintAndLog("Command execute timeout");\r
180 }\r
181\r
182 return 0;\r
183}\r
184\r
185int CmdHF14AMfRdSc(const char *Cmd)\r
186{\r
187 int i;\r
188 uint8_t sectorNo = 0;\r
189 uint8_t keyType = 0;\r
190 uint8_t key[6] = {0, 0, 0, 0, 0, 0};\r
191 \r
192 uint8_t isOK = 0;\r
193 uint8_t * data = NULL;\r
194\r
195 char cmdp = 0x00;\r
196\r
197 if (strlen(Cmd)<3) {\r
198 PrintAndLog("Usage: hf mf rdsc <sector number> <key A/B> <key (12 hex symbols)>");\r
199 PrintAndLog(" sample: hf mf rdsc 0 A FFFFFFFFFFFF ");\r
200 return 0;\r
201 } \r
202 \r
203 sectorNo = param_get8(Cmd, 0);\r
204 if (sectorNo > 63) {\r
205 PrintAndLog("Sector number must be less than 64");\r
206 return 1;\r
207 }\r
208 cmdp = param_getchar(Cmd, 1);\r
209 if (cmdp == 0x00) {\r
210 PrintAndLog("Key type must be A or B");\r
211 return 1;\r
212 }\r
213 if (cmdp != 'A' && cmdp != 'a') keyType = 1;\r
214 if (param_gethex(Cmd, 2, key, 12)) {\r
215 PrintAndLog("Key must include 12 HEX symbols");\r
216 return 1;\r
217 }\r
218 PrintAndLog("--sector no:%02x key type:%02x key:%s ", sectorNo, keyType, sprint_hex(key, 6));\r
219 \r
220 UsbCommand c = {CMD_MIFARE_READSC, {sectorNo, keyType, 0}};\r
221 memcpy(c.d.asBytes, key, 6);\r
222 SendCommand(&c);\r
223 UsbCommand * resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
224 PrintAndLog(" ");\r
225\r
226 if (resp != NULL) {\r
227 isOK = resp->arg[0] & 0xff;\r
228 data = resp->d.asBytes;\r
229\r
230 PrintAndLog("isOk:%02x", isOK);\r
231 if (isOK) \r
232 for (i = 0; i < 2; i++) {\r
233 PrintAndLog("data:%s", sprint_hex(data + i * 16, 16));\r
234 }\r
235 } else {\r
236 PrintAndLog("Command1 execute timeout");\r
237 }\r
238\r
239 // response2\r
240 resp = WaitForResponseTimeout(CMD_ACK, 500);\r
241 PrintAndLog(" ");\r
242\r
243 if (resp != NULL) {\r
244 isOK = resp->arg[0] & 0xff;\r
245 data = resp->d.asBytes;\r
246\r
247 if (isOK) \r
248 for (i = 0; i < 2; i++) {\r
249 PrintAndLog("data:%s", sprint_hex(data + i * 16, 16));\r
250 }\r
251 } else {\r
252 PrintAndLog("Command2 execute timeout");\r
253 }\r
254 \r
255 return 0;\r
256}\r
257\r
258int CmdHF14AMfDump1k(const char *Cmd)\r
259{\r
260 int i, j;\r
261 \r
262 uint8_t keyType = 0;\r
263 uint8_t c[3][4];\r
264 uint8_t keyA[16][6];\r
265 uint8_t keyB[16][6];\r
266 uint8_t rights[16][4];\r
267 \r
268 uint8_t isOK = 0;\r
269 uint8_t *data = NULL;\r
270\r
271 FILE *fin;\r
272 FILE *fout;\r
273 \r
274 UsbCommand *resp;\r
275 \r
276 if ((fin = fopen("dumpkeys.bin","rb")) == NULL) {\r
277 PrintAndLog("Could not find file keys.bin");\r
278 return 1;\r
279 }\r
280 \r
281 if ((fout = fopen("dumpdata.bin","wb")) == NULL) { \r
282 PrintAndLog("Could not create file name dump.bin");\r
283 return 1;\r
284 }\r
285 \r
286 // Read key file\r
287 \r
288 for (i=0 ; i<16 ; i++) {\r
289 fread ( keyA[i], 1, 6, fin );\r
290 }\r
291 for (i=0 ; i<16 ; i++) {\r
292 fread ( keyB[i], 1, 6, fin );\r
293 }\r
294 \r
295 // Read access rights to sectors\r
296 \r
297 PrintAndLog("|-----------------------------------------|");\r
298 PrintAndLog("|------ Reading sector access bits...-----|");\r
299 PrintAndLog("|-----------------------------------------|");\r
300 \r
301 for (i = 0 ; i < 16 ; i++) {\r
302 UsbCommand c = {CMD_MIFARE_READBL, {4*i + 3, 0, 0}};\r
303 memcpy(c.d.asBytes, keyA[i], 6);\r
304 SendCommand(&c);\r
305 resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
306\r
307 if (resp != NULL) {\r
308 uint8_t isOK = resp->arg[0] & 0xff;\r
309 uint8_t *data = resp->d.asBytes;\r
310 if (isOK){\r
311 rights[i][0] = ((data[7] & 0x10)>>4) | ((data[8] & 0x1)<<1) | ((data[8] & 0x10)>>2);\r
312 rights[i][1] = ((data[7] & 0x20)>>5) | ((data[8] & 0x2)<<0) | ((data[8] & 0x20)>>3);\r
313 rights[i][2] = ((data[7] & 0x40)>>6) | ((data[8] & 0x4)>>1) | ((data[8] & 0x40)>>4);\r
314 rights[i][3] = ((data[7] & 0x80)>>7) | ((data[8] & 0x8)>>2) | ((data[8] & 0x80)>>5);\r
315 }\r
316 else{\r
317 PrintAndLog("Could not get access rights for block %d", i);\r
318 }\r
319 }\r
320 else {\r
321 PrintAndLog("Command execute timeout");\r
322 }\r
323 }\r
324 \r
325 // Read blocks and print to file\r
326 \r
327 PrintAndLog("|-----------------------------------------|");\r
328 PrintAndLog("|----- Dumping all blocks to file... -----|");\r
329 PrintAndLog("|-----------------------------------------|");\r
330 \r
331 for (i=0 ; i<16 ; i++) {\r
332 for (j=0 ; j<4 ; j++) {\r
333 \r
334 if (j == 3){\r
335 UsbCommand c = {CMD_MIFARE_READBL, {i*4 + j, 0, 0}};\r
336 memcpy(c.d.asBytes, keyA[i], 6);\r
337 SendCommand(&c);\r
338 resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
339 }\r
340 else{\r
341 if ((rights[i][j] == 6) | (rights[i][j] == 5)) {\r
342 UsbCommand c = {CMD_MIFARE_READBL, {i*4+j, 1, 0}};\r
343 memcpy(c.d.asBytes, keyB[i], 6);\r
344 SendCommand(&c);\r
345 resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
346 }\r
347 else if (rights[i][j] == 7) {\r
348 PrintAndLog("Access rights do not allow reading of sector %d block %d",i,j);\r
349 }\r
350 else {\r
351 UsbCommand c = {CMD_MIFARE_READBL, {i*4+j, 0, 0}};\r
352 memcpy(c.d.asBytes, keyA[i], 6);\r
353 SendCommand(&c);\r
354 resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
355 }\r
356 }\r
357\r
358 if (resp != NULL) {\r
359 uint8_t isOK = resp->arg[0] & 0xff;\r
360 uint8_t *data = resp->d.asBytes;\r
361 if (isOK) {\r
362 fwrite ( data, 1, 16, fout );\r
363 }\r
364 else {\r
365 PrintAndLog("Could not get access rights for block %d", i);\r
366 }\r
367 }\r
368 else {\r
369 PrintAndLog("Command execute timeout");\r
370 }\r
371 }\r
372 }\r
373 \r
374 fclose(fin);\r
375 fclose(fout);\r
376 \r
377 return 0;\r
378}\r
379\r
380int CmdHF14AMfRestore1k(const char *Cmd)\r
381{\r
382\r
383 int i,j;\r
384 uint8_t keyType = 0;\r
385 uint8_t key[6] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};\r
386 uint8_t bldata[16] = {0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0};\r
387 uint8_t keyA[16][6];\r
388 uint8_t keyB[16][6];\r
389 \r
390 FILE *fdump;\r
391 FILE *fkeys;\r
392 \r
393 if ((fdump = fopen("dumpdata.bin","rb")) == NULL) {\r
394 PrintAndLog("Could not find file dump.bin");\r
395 return 1;\r
396 }\r
397 if ((fkeys = fopen("dumpkeys.bin","rb")) == NULL) {\r
398 PrintAndLog("Could not find file keys.bin");\r
399 return 1;\r
400 }\r
401 \r
402 for (i=0 ; i<16 ; i++) {\r
403 fread(keyA[i], 1, 6, fkeys);\r
404 }\r
405 for (i=0 ; i<16 ; i++) {\r
406 fread(keyB[i], 1, 6, fkeys);\r
407 }\r
408 \r
409 PrintAndLog("going...");\r
410\r
411 for (i=0 ; i<16 ; i++) {\r
412 for( j=0 ; j<4 ; j++) {\r
413 UsbCommand c = {CMD_MIFARE_WRITEBL, {i*4 + j, keyType, 0}};\r
414 memcpy(c.d.asBytes, key, 6);\r
415 \r
416 fread(bldata, 1, 16, fdump);\r
417 \r
418 if (j == 3) {\r
419 bldata[0] = (keyA[i][0]);\r
420 bldata[1] = (keyA[i][1]);\r
421 bldata[2] = (keyA[i][2]);\r
422 bldata[3] = (keyA[i][3]);\r
423 bldata[4] = (keyA[i][4]);\r
424 bldata[5] = (keyA[i][5]);\r
425 bldata[10] = (keyB[i][0]);\r
426 bldata[11] = (keyB[i][1]);\r
427 bldata[12] = (keyB[i][2]);\r
428 bldata[13] = (keyB[i][3]);\r
429 bldata[14] = (keyB[i][4]);\r
430 bldata[15] = (keyB[i][5]);\r
431 } \r
432 \r
433 PrintAndLog("writing to block %2d: %s confirm?", i*4+j, sprint_hex(bldata, 16));\r
434 \r
435 memcpy(c.d.asBytes + 10, bldata, 16);\r
436 SendCommand(&c);\r
437 UsbCommand *resp = WaitForResponseTimeout(CMD_ACK, 1500);\r
438\r
439 if (resp != NULL) {\r
440 uint8_t isOK = resp->arg[0] & 0xff;\r
441 PrintAndLog("isOk:%02x", isOK);\r
442 } else {\r
443 PrintAndLog("Command execute timeout");\r
444 }\r
445 }\r
446 }\r
447 \r
448 fclose(fdump);\r
449 fclose(fkeys);\r
450 return 0;\r
451}\r
452\r
453int CmdHF14AMfNested(const char *Cmd)\r
454{\r
455 int i, j, res, iterations;\r
456 sector * e_sector = NULL;\r
457 uint8_t blockNo = 0;\r
458 uint8_t keyType = 0;\r
459 uint8_t trgBlockNo = 0;\r
460 uint8_t trgKeyType = 0;\r
461 uint8_t blDiff = 0;\r
462 int SectorsCnt = 0;\r
463 uint8_t key[6] = {0, 0, 0, 0, 0, 0};\r
464 uint8_t keyBlock[16 * 6];\r
465 uint64_t key64 = 0;\r
466 int transferToEml = 0;\r
467 \r
468 int createDumpFile = 0;\r
469 FILE *fkeys;\r
470 uint8_t standart[6] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};\r
471 uint8_t tempkey[6] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};\r
472 \r
473 char cmdp, ctmp;\r
474\r
475 if (strlen(Cmd)<3) {\r
476 PrintAndLog("Usage:");\r
477 PrintAndLog(" all sectors: hf mf nested <card memory> <block number> <key A/B> <key (12 hex symbols)> [t,d]");\r
478 PrintAndLog(" one sector: hf mf nested o <block number> <key A/B> <key (12 hex symbols)>");\r
479 PrintAndLog(" <target block number> <target key A/B> [t]");\r
480 PrintAndLog("card memory - 0 - MINI(320 bytes), 1 - 1K, 2 - 2K, 4 - 4K, <other> - 1K");\r
481 PrintAndLog("t - transfer keys into emulator memory");\r
482 PrintAndLog("d - write keys to binary file");\r
483 PrintAndLog(" ");\r
484 PrintAndLog(" sample1: hf mf nested 1 0 A FFFFFFFFFFFF ");\r
485 PrintAndLog(" sample1: hf mf nested 1 0 A FFFFFFFFFFFF t ");\r
486 PrintAndLog(" sample1: hf mf nested 1 0 A FFFFFFFFFFFF d ");\r
487 PrintAndLog(" sample2: hf mf nested o 0 A FFFFFFFFFFFF 4 A");\r
488 return 0;\r
489 } \r
490 \r
491 cmdp = param_getchar(Cmd, 0);\r
492 blockNo = param_get8(Cmd, 1);\r
493 ctmp = param_getchar(Cmd, 2);\r
494 if (ctmp == 0x00) {\r
495 PrintAndLog("Key type must be A or B");\r
496 return 1;\r
497 }\r
498 if (ctmp != 'A' && ctmp != 'a') keyType = 1;\r
499 if (param_gethex(Cmd, 3, key, 12)) {\r
500 PrintAndLog("Key must include 12 HEX symbols");\r
501 return 1;\r
502 }\r
503 \r
504 if (cmdp == 'o' || cmdp == 'O') {\r
505 cmdp = 'o';\r
506 trgBlockNo = param_get8(Cmd, 4);\r
507 ctmp = param_getchar(Cmd, 5);\r
508 if (ctmp == 0x00) {\r
509 PrintAndLog("Target key type must be A or B");\r
510 return 1;\r
511 }\r
512 if (ctmp != 'A' && ctmp != 'a') trgKeyType = 1;\r
513 } else {\r
514 switch (cmdp) {\r
515 case '0': SectorsCnt = 05; break;\r
516 case '1': SectorsCnt = 16; break;\r
517 case '2': SectorsCnt = 32; break;\r
518 case '4': SectorsCnt = 64; break;\r
519 default: SectorsCnt = 16;\r
520 }\r
521 }\r
522\r
523 ctmp = param_getchar(Cmd, 4);\r
524 if (ctmp == 't' || ctmp == 'T') transferToEml = 1;\r
525 else if (ctmp == 'd' || ctmp == 'D') createDumpFile = 1;\r
526 \r
527 ctmp = param_getchar(Cmd, 6);\r
528 transferToEml |= (ctmp == 't' || ctmp == 'T');\r
529 transferToEml |= (ctmp == 'd' || ctmp == 'D');\r
530 \r
531 PrintAndLog("--block no:%02x key type:%02x key:%s etrans:%d", blockNo, keyType, sprint_hex(key, 6), transferToEml);\r
532 if (cmdp == 'o')\r
533 PrintAndLog("--target block no:%02x target key type:%02x ", trgBlockNo, trgKeyType);\r
534\r
535 if (cmdp == 'o') {\r
536 if (mfnested(blockNo, keyType, key, trgBlockNo, trgKeyType, keyBlock)) {\r
537 PrintAndLog("Nested error.");\r
538 return 2;\r
539 }\r
540\r
541 for (i = 0; i < 16; i++) {\r
542 PrintAndLog("cnt=%d key= %s", i, sprint_hex(keyBlock + i * 6, 6));\r
543 }\r
544 \r
545 // test keys\r
546 res = mfCheckKeys(trgBlockNo, trgKeyType, 8, keyBlock, &key64);\r
547 if (res)\r
548 res = mfCheckKeys(trgBlockNo, trgKeyType, 8, &keyBlock[6 * 8], &key64);\r
549 if (!res) {\r
550 PrintAndLog("Found valid key:%012llx", key64);\r
551\r
552 // transfer key to the emulator\r
553 if (transferToEml) {\r
554 mfEmlGetMem(keyBlock, (trgBlockNo / 4) * 4 + 3, 1);\r
555 \r
556 if (!trgKeyType)\r
557 num_to_bytes(key64, 6, keyBlock);\r
558 else\r
559 num_to_bytes(key64, 6, &keyBlock[10]);\r
560 mfEmlSetMem(keyBlock, (trgBlockNo / 4) * 4 + 3, 1); \r
561 }\r
562 } else {\r
563 PrintAndLog("No valid key found");\r
564 }\r
565 }\r
566 else { // ------------------------------------ multiple sectors working\r
567 blDiff = blockNo % 4;\r
568 PrintAndLog("Block shift=%d", blDiff);\r
569 e_sector = calloc(SectorsCnt, sizeof(sector));\r
570 if (e_sector == NULL) return 1;\r
571 \r
572 //test current key 4 sectors\r
573 memcpy(keyBlock, key, 6);\r
574 num_to_bytes(0xa0a1a2a3a4a5, 6, (uint8_t*)(keyBlock + 1 * 6));\r
575 num_to_bytes(0xb0b1b2b3b4b5, 6, (uint8_t*)(keyBlock + 2 * 6));\r
576 num_to_bytes(0xffffffffffff, 6, (uint8_t*)(keyBlock + 3 * 6));\r
577 num_to_bytes(0x000000000000, 6, (uint8_t*)(keyBlock + 4 * 6));\r
578 num_to_bytes(0xaabbccddeeff, 6, (uint8_t*)(keyBlock + 5 * 6));\r
579\r
580 PrintAndLog("Testing known keys. Sector count=%d", SectorsCnt);\r
581 for (i = 0; i < SectorsCnt; i++) {\r
582 for (j = 0; j < 2; j++) {\r
583 if (e_sector[i].foundKey[j]) continue;\r
584 \r
585 res = mfCheckKeys(i * 4 + blDiff, j, 6, keyBlock, &key64);\r
586 \r
587 if (!res) {\r
588 e_sector[i].Key[j] = key64;\r
589 e_sector[i].foundKey[j] = 1;\r
590 }\r
591 }\r
592 } \r
593 \r
594 // nested sectors\r
595 iterations = 0;\r
596 PrintAndLog("nested...");\r
597 for (i = 0; i < NESTED_SECTOR_RETRY; i++) {\r
598 for (trgBlockNo = blDiff; trgBlockNo < SectorsCnt * 4; trgBlockNo = trgBlockNo + 4) \r
599 for (trgKeyType = 0; trgKeyType < 2; trgKeyType++) { \r
600 if (e_sector[trgBlockNo / 4].foundKey[trgKeyType]) continue;\r
601 if (mfnested(blockNo, keyType, key, trgBlockNo, trgKeyType, keyBlock)) continue;\r
602 \r
603 iterations++;\r
604 \r
605 //try keys from nested\r
606 res = mfCheckKeys(trgBlockNo, trgKeyType, 8, keyBlock, &key64);\r
607 if (res)\r
608 res = mfCheckKeys(trgBlockNo, trgKeyType, 8, &keyBlock[6 * 8], &key64);\r
609 if (!res) {\r
610 PrintAndLog("Found valid key:%012llx", key64); \r
611 e_sector[trgBlockNo / 4].foundKey[trgKeyType] = 1;\r
612 e_sector[trgBlockNo / 4].Key[trgKeyType] = key64;\r
613 }\r
614 }\r
615 }\r
616\r
617 PrintAndLog("Iterations count: %d", iterations);\r
618 //print them\r
619 PrintAndLog("|---|----------------|---|----------------|---|");\r
620 PrintAndLog("|sec|key A |res|key B |res|");\r
621 PrintAndLog("|---|----------------|---|----------------|---|");\r
622 for (i = 0; i < SectorsCnt; i++) {\r
623 PrintAndLog("|%03d| %012llx | %d | %012llx | %d |", i, \r
624 e_sector[i].Key[0], e_sector[i].foundKey[0], e_sector[i].Key[1], e_sector[i].foundKey[1]);\r
625 }\r
626 PrintAndLog("|---|----------------|---|----------------|---|");\r
627 \r
628 // transfer them to the emulator\r
629 if (transferToEml) {\r
630 for (i = 0; i < SectorsCnt; i++) {\r
631 mfEmlGetMem(keyBlock, i * 4 + 3, 1);\r
632 if (e_sector[i].foundKey[0])\r
633 num_to_bytes(e_sector[i].Key[0], 6, keyBlock);\r
634 if (e_sector[i].foundKey[1])\r
635 num_to_bytes(e_sector[i].Key[1], 6, &keyBlock[10]);\r
636 mfEmlSetMem(keyBlock, i * 4 + 3, 1);\r
637 } \r
638 }\r
639 \r
640 // Create dump file\r
641 if (createDumpFile) {\r
642 if ((fkeys = fopen("dumpkeys.bin","wb")) == NULL) { \r
643 PrintAndLog("Could not create file keys.bin");\r
644 free(e_sector);\r
645 return 1;\r
646 }\r
647 PrintAndLog("Printing keys to bynary file dumpkeys.bin...");\r
648 for(i=0; i<16; i++) {\r
649 if (e_sector[i].foundKey[0]){\r
650 num_to_bytes(e_sector[i].Key[0], 6, tempkey);\r
651 fwrite ( tempkey, 1, 6, fkeys );\r
652 }\r
653 else{\r
654 fwrite ( &standart, 1, 6, fkeys );\r
655 }\r
656 }\r
657 for(i=0; i<16; i++) {\r
658 if (e_sector[i].foundKey[1]){\r
659 num_to_bytes(e_sector[i].Key[1], 6, tempkey);\r
660 fwrite ( tempkey, 1, 6, fkeys );\r
661 }\r
662 else{\r
663 fwrite ( &standart, 1, 6, fkeys );\r
664 }\r
665 }\r
666 fclose(fkeys);\r
667 }\r
668 \r
669 free(e_sector);\r
670 }\r
671\r
672 return 0;\r
673}\r
674\r
675int CmdHF14AMfChk(const char *Cmd)\r
676{\r
677 int i, res;\r
678 int keycnt = 0;\r
679 char ctmp = 0x00;\r
680 uint8_t blockNo = 0;\r
681 uint8_t keyType = 0;\r
682 uint8_t keyBlock[8 * 6];\r
683 uint64_t key64 = 0;\r
684\r
685 memset(keyBlock, 0x00, sizeof(keyBlock));\r
686\r
687 if (strlen(Cmd)<3) {\r
688 PrintAndLog("Usage: hf mf chk <block number> <key A/B> [<key (12 hex symbols)>]");\r
689 PrintAndLog(" sample: hf mf chk 0 A FFFFFFFFFFFF a0a1a2a3a4a5 b0b1b2b3b4b5 ");\r
690 return 0;\r
691 } \r
692 \r
693 blockNo = param_get8(Cmd, 0);\r
694 ctmp = param_getchar(Cmd, 1);\r
695 if (ctmp == 0x00) {\r
696 PrintAndLog("Key type must be A or B");\r
697 return 1;\r
698 }\r
699 if (ctmp != 'A' && ctmp != 'a') keyType = 1;\r
700 \r
701 for (i = 0; i < 6; i++) {\r
702 if (!isxdigit(param_getchar(Cmd, 2 + i))) break;\r
703\r
704 if (param_gethex(Cmd, 2 + i, keyBlock + 6 * i, 12)) {\r
705 PrintAndLog("Key[%d] must include 12 HEX symbols", i);\r
706 return 1;\r
707 }\r
708 keycnt = i + 1;\r
709 }\r
710 \r
711 if (keycnt == 0) {\r
712 PrintAndLog("There is must be at least one key");\r
713 return 1;\r
714 }\r
715\r
716 PrintAndLog("--block no:%02x key type:%02x key count:%d ", blockNo, keyType, keycnt);\r
717 \r
718 res = mfCheckKeys(blockNo, keyType, keycnt, keyBlock, &key64);\r
719 if (res !=1) {\r
720 if (!res)\r
721 PrintAndLog("isOk:%02x valid key:%012llx", 1, key64);\r
722 else\r
723 PrintAndLog("isOk:%02x", 0);\r
724 } else {\r
725 PrintAndLog("Command execute timeout");\r
726 }\r
727\r
728 return 0;\r
729}\r
730\r
731int CmdHF14AMf1kSim(const char *Cmd)\r
732{\r
733 uint8_t uid[4] = {0, 0, 0, 0};\r
734 \r
735 if (param_getchar(Cmd, 0) == 'h') {\r
736 PrintAndLog("Usage: hf mf sim <uid (8 hex symbols)>");\r
737 PrintAndLog(" sample: hf mf sim 0a0a0a0a ");\r
738 return 0;\r
739 } \r
740 \r
741 if (param_getchar(Cmd, 0) && param_gethex(Cmd, 0, uid, 8)) {\r
742 PrintAndLog("UID must include 8 HEX symbols");\r
743 return 1;\r
744 }\r
745 PrintAndLog(" uid:%s ", sprint_hex(uid, 4));\r
746 \r
747 UsbCommand c = {CMD_SIMULATE_MIFARE_CARD, {0, 0, 0}};\r
748 memcpy(c.d.asBytes, uid, 4);\r
749 SendCommand(&c);\r
750\r
751 return 0;\r
752}\r
753\r
754int CmdHF14AMfDbg(const char *Cmd)\r
755{\r
756 int dbgMode = param_get32ex(Cmd, 0, 0, 10);\r
757 if (dbgMode > 4) {\r
758 PrintAndLog("Max debud mode parameter is 4 \n");\r
759 }\r
760\r
761 if (strlen(Cmd) < 1 || !param_getchar(Cmd, 0) || dbgMode > 4) {\r
762 PrintAndLog("Usage: hf mf dbg <debug level>");\r
763 PrintAndLog(" 0 - no debug messages");\r
764 PrintAndLog(" 1 - error messages");\r
765 PrintAndLog(" 2 - all messages");\r
766 PrintAndLog(" 4 - extended debug mode");\r
767 return 0;\r
768 } \r
769\r
770 UsbCommand c = {CMD_MIFARE_SET_DBGMODE, {dbgMode, 0, 0}};\r
771 SendCommand(&c);\r
772\r
773 return 0;\r
774}\r
775\r
776int CmdHF14AMfEGet(const char *Cmd)\r
777{\r
778 uint8_t blockNo = 0;\r
779 uint8_t data[3 * 16];\r
780 int i;\r
781\r
782 if (strlen(Cmd) < 1 || param_getchar(Cmd, 0) == 'h') {\r
783 PrintAndLog("Usage: hf mf eget <block number>");\r
784 PrintAndLog(" sample: hf mf eget 0 ");\r
785 return 0;\r
786 } \r
787 \r
788 blockNo = param_get8(Cmd, 0);\r
789 if (blockNo >= 16 * 4) {\r
790 PrintAndLog("Block number must be in [0..63] as in MIFARE classic.");\r
791 return 1;\r
792 }\r
793\r
794 PrintAndLog(" ");\r
795 if (!mfEmlGetMem(data, blockNo, 3)) {\r
796 for (i = 0; i < 3; i++) {\r
797 PrintAndLog("data[%d]:%s", blockNo + i, sprint_hex(data + i * 16, 16));\r
798 }\r
799 } else {\r
800 PrintAndLog("Command execute timeout");\r
801 }\r
802\r
803 return 0;\r
804}\r
805\r
806int CmdHF14AMfEClear(const char *Cmd)\r
807{\r
808 if (param_getchar(Cmd, 0) == 'h') {\r
809 PrintAndLog("Usage: hf mf eclr");\r
810 PrintAndLog("It set card emulator memory to empty data blocks and key A/B FFFFFFFFFFFF \n");\r
811 return 0;\r
812 } \r
813\r
814 UsbCommand c = {CMD_MIFARE_EML_MEMCLR, {0, 0, 0}};\r
815 SendCommand(&c);\r
816 return 0;\r
817}\r
818\r
819int CmdHF14AMfESet(const char *Cmd)\r
820{\r
821 uint8_t memBlock[16];\r
822 uint8_t blockNo = 0;\r
823\r
824 memset(memBlock, 0x00, sizeof(memBlock));\r
825\r
826 if (strlen(Cmd) < 3 || param_getchar(Cmd, 0) == 'h') {\r
827 PrintAndLog("Usage: hf mf eset <block number> <block data (32 hex symbols)>");\r
828 PrintAndLog(" sample: hf mf eset 1 000102030405060708090a0b0c0d0e0f ");\r
829 return 0;\r
830 } \r
831 \r
832 blockNo = param_get8(Cmd, 0);\r
833 if (blockNo >= 16 * 4) {\r
834 PrintAndLog("Block number must be in [0..63] as in MIFARE classic.");\r
835 return 1;\r
836 }\r
837 \r
838 if (param_gethex(Cmd, 1, memBlock, 32)) {\r
839 PrintAndLog("block data must include 32 HEX symbols");\r
840 return 1;\r
841 }\r
842 \r
843 // 1 - blocks count\r
844 UsbCommand c = {CMD_MIFARE_EML_MEMSET, {blockNo, 1, 0}};\r
845 memcpy(c.d.asBytes, memBlock, 16);\r
846 SendCommand(&c);\r
847 return 0;\r
848}\r
849\r
850int CmdHF14AMfELoad(const char *Cmd)\r
851{\r
852 FILE * f;\r
853 char filename[20];\r
854 char * fnameptr = filename;\r
855 char buf[64];\r
856 uint8_t buf8[64];\r
857 int i, len, blockNum;\r
858 \r
859 memset(filename, 0, sizeof(filename));\r
860 memset(buf, 0, sizeof(buf));\r
861\r
862 if (param_getchar(Cmd, 0) == 'h') {\r
863 PrintAndLog("It loads emul dump from the file `filename.eml`");\r
864 PrintAndLog("Usage: hf mf eload <file name w/o `.eml`>");\r
865 PrintAndLog(" sample: hf mf eload filename");\r
866 return 0;\r
867 } \r
868\r
869 len = strlen(Cmd);\r
870 if (len > 14) len = 14;\r
871 \r
872 if (len < 1) {\r
873 }\r
874\r
875 memcpy(filename, Cmd, len);\r
876 fnameptr += len;\r
877\r
878 sprintf(fnameptr, ".eml"); \r
879 \r
880 // open file\r
881 f = fopen(filename, "r");\r
882 if (f == NULL) {\r
883 PrintAndLog("File not found or locked.");\r
884 return 1;\r
885 }\r
886 \r
887 blockNum = 0;\r
888 while(!feof(f)){\r
889 memset(buf, 0, sizeof(buf));\r
890 fgets(buf, sizeof(buf), f);\r
891 if (strlen(buf) < 32){\r
892 PrintAndLog("File content error. Block data must include 32 HEX symbols");\r
893 return 2;\r
894 }\r
895 for (i = 0; i < 32; i += 2)\r
896 sscanf(&buf[i], "%02x", (unsigned int *)&buf8[i / 2]);\r
897// PrintAndLog("data[%02d]:%s", blockNum, sprint_hex(buf8, 16));\r
898\r
899 if (mfEmlSetMem(buf8, blockNum, 1)) {\r
900 PrintAndLog("Cant set emul block: %d", blockNum);\r
901 return 3;\r
902 }\r
903 blockNum++;\r
904 \r
905 if (blockNum >= 16 * 4) break;\r
906 }\r
907 fclose(f);\r
908 \r
909 if (blockNum != 16 * 4){\r
910 PrintAndLog("File content error. There must be 64 blocks");\r
911 return 4;\r
912 }\r
913 PrintAndLog("Loaded from file: %s", filename);\r
914 return 0;\r
915}\r
916\r
917int CmdHF14AMfESave(const char *Cmd)\r
918{\r
919 FILE * f;\r
920 char filename[20];\r
921 char * fnameptr = filename;\r
922 uint8_t buf[64];\r
923 int i, j, len;\r
924 \r
925 memset(filename, 0, sizeof(filename));\r
926 memset(buf, 0, sizeof(buf));\r
927\r
928 if (param_getchar(Cmd, 0) == 'h') {\r
929 PrintAndLog("It saves emul dump into the file `filename.eml` or `cardID.eml`");\r
930 PrintAndLog("Usage: hf mf esave [file name w/o `.eml`]");\r
931 PrintAndLog(" sample: hf mf esave ");\r
932 PrintAndLog(" hf mf esave filename");\r
933 return 0;\r
934 } \r
935\r
936 len = strlen(Cmd);\r
937 if (len > 14) len = 14;\r
938 \r
939 if (len < 1) {\r
940 // get filename\r
941 if (mfEmlGetMem(buf, 0, 1)) {\r
942 PrintAndLog("Cant get block: %d", 0);\r
943 return 1;\r
944 }\r
945 for (j = 0; j < 7; j++, fnameptr += 2)\r
946 sprintf(fnameptr, "%02x", buf[j]); \r
947 } else {\r
948 memcpy(filename, Cmd, len);\r
949 fnameptr += len;\r
950 }\r
951\r
952 sprintf(fnameptr, ".eml"); \r
953 \r
954 // open file\r
955 f = fopen(filename, "w+");\r
956\r
957 // put hex\r
958 for (i = 0; i < 16 * 4; i++) {\r
959 if (mfEmlGetMem(buf, i, 1)) {\r
960 PrintAndLog("Cant get block: %d", i);\r
961 break;\r
962 }\r
963 for (j = 0; j < 16; j++)\r
964 fprintf(f, "%02x", buf[j]); \r
965 fprintf(f,"\n");\r
966 }\r
967 fclose(f);\r
968 \r
969 PrintAndLog("Saved to file: %s", filename);\r
970 \r
971 return 0;\r
972}\r
973\r
974int CmdHF14AMfECFill(const char *Cmd)\r
975{\r
976 uint8_t keyType = 0;\r
977\r
978 if (strlen(Cmd) < 1 || param_getchar(Cmd, 0) == 'h') {\r
979 PrintAndLog("Usage: hf mf efill <key A/B>");\r
980 PrintAndLog("sample: hf mf efill A");\r
981 PrintAndLog("Card data blocks transfers to card emulator memory.");\r
982 PrintAndLog("Keys must be laid in the simulator memory. \n");\r
983 return 0;\r
984 } \r
985\r
986 char ctmp = param_getchar(Cmd, 0);\r
987 if (ctmp == 0x00) {\r
988 PrintAndLog("Key type must be A or B");\r
989 return 1;\r
990 }\r
991 if (ctmp != 'A' && ctmp != 'a') keyType = 1;\r
992\r
993 UsbCommand c = {CMD_MIFARE_EML_CARDLOAD, {0, keyType, 0}};\r
994 SendCommand(&c);\r
995 return 0;\r
996}\r
997\r
998int CmdHF14AMfEKeyPrn(const char *Cmd)\r
999{\r
1000 int i;\r
1001 uint8_t data[16];\r
1002 uint64_t keyA, keyB;\r
1003 \r
1004 PrintAndLog("|---|----------------|----------------|");\r
1005 PrintAndLog("|sec|key A |key B |");\r
1006 PrintAndLog("|---|----------------|----------------|");\r
1007 for (i = 0; i < 16; i++) {\r
1008 if (mfEmlGetMem(data, i * 4 + 3, 1)) {\r
1009 PrintAndLog("error get block %d", i * 4 + 3);\r
1010 break;\r
1011 }\r
1012 keyA = bytes_to_num(data, 6);\r
1013 keyB = bytes_to_num(data + 10, 6);\r
1014 PrintAndLog("|%03d| %012llx | %012llx |", i, keyA, keyB);\r
1015 }\r
1016 PrintAndLog("|---|----------------|----------------|");\r
1017 \r
1018 return 0;\r
1019}\r
1020\r
1021static command_t CommandTable[] =\r
1022{\r
1023 {"help", CmdHelp, 1, "This help"},\r
1024 {"dbg", CmdHF14AMfDbg, 0, "Set default debug mode"},\r
1025 {"rdbl", CmdHF14AMfRdBl, 0, "Read MIFARE classic block"},\r
1026 {"rdsc", CmdHF14AMfRdSc, 0, "Read MIFARE classic sector"},\r
1027 {"dump1k", CmdHF14AMfDump1k, 0, "Dump MIFARE classic tag to binary file"},\r
1028 {"restore1k", CmdHF14AMfRestore1k, 0, "Restore MIFARE classic binary file to BLANK tag"},\r
1029 {"wrbl", CmdHF14AMfWrBl, 0, "Write MIFARE classic block"},\r
1030 {"chk", CmdHF14AMfChk, 0, "Test block up to 8 keys"},\r
1031 {"mifare", CmdHF14AMifare, 0, "Read parity error messages. param - <used card nonce>"},\r
1032 {"nested", CmdHF14AMfNested, 0, "Test nested authentication"},\r
1033 {"sim", CmdHF14AMf1kSim, 0, "Simulate MIFARE 1k card"},\r
1034 {"eclr", CmdHF14AMfEClear, 0, "Clear simulator memory block"},\r
1035 {"eget", CmdHF14AMfEGet, 0, "Get simulator memory block"},\r
1036 {"eset", CmdHF14AMfESet, 0, "Set simulator memory block"},\r
1037 {"eload", CmdHF14AMfELoad, 0, "Load from file emul dump"},\r
1038 {"esave", CmdHF14AMfESave, 0, "Save to file emul dump"},\r
1039 {"ecfill", CmdHF14AMfECFill, 0, "Fill simulator memory with help of keys from simulator"},\r
1040 {"ekeyprn", CmdHF14AMfEKeyPrn, 0, "Print keys from simulator memory"},\r
1041 {NULL, NULL, 0, NULL}\r
1042};\r
1043\r
1044int CmdHFMF(const char *Cmd)\r
1045{\r
1046 // flush\r
1047 while (WaitForResponseTimeout(CMD_ACK, 500) != NULL) ;\r
1048\r
1049 CmdsParse(CommandTable, Cmd);\r
1050 return 0;\r
1051}\r
1052\r
1053int CmdHelp(const char *Cmd)\r
1054{\r
1055 CmdsHelp(CommandTable);\r
1056 return 0;\r
1057}\r
Impressum, Datenschutz