]> git.zerfleddert.de Git - proxmark3-svn/blame - armsrc/mifarecmd.c
@Marshmellow42 's cleanup isn device-side "hf mfu" code. Looks nice. Dump uses...
[proxmark3-svn] / armsrc / mifarecmd.c
CommitLineData
8556b852 1//-----------------------------------------------------------------------------\r
b62a5a84 2// Merlok - June 2011, 2012\r
8556b852
M
3// Gerhard de Koning Gans - May 2008\r
4// Hagen Fritsch - June 2010\r
3fe4ff4f 5// Midnitesnake - Dec 2013\r
6// Andy Davies - Apr 2014\r
7// Iceman - May 2014\r
8556b852
M
8//\r
9// This code is licensed to you under the terms of the GNU GPL, version 2 or,\r
10// at your option, any later version. See the LICENSE.txt file for the text of\r
11// the license.\r
12//-----------------------------------------------------------------------------\r
13// Routines to support ISO 14443 type A.\r
14//-----------------------------------------------------------------------------\r
15\r
16#include "mifarecmd.h"\r
17#include "apps.h"\r
787b5bd8 18#include "util.h"\r
4d2e4eea 19\r
a631936e 20#include "crc.h"\r
21\r
8556b852 22//-----------------------------------------------------------------------------\r
baeaf579 23// Select, Authenticate, Read a MIFARE tag. \r
8556b852
M
24// read block\r
25//-----------------------------------------------------------------------------\r
26void MifareReadBlock(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
27{\r
28 // params\r
29 uint8_t blockNo = arg0;\r
30 uint8_t keyType = arg1;\r
31 uint64_t ui64Key = 0;\r
32 ui64Key = bytes_to_num(datain, 6);\r
33 \r
34 // variables\r
35 byte_t isOK = 0;\r
36 byte_t dataoutbuf[16];\r
1c611bbd 37 uint8_t uid[10];\r
8556b852
M
38 uint32_t cuid;\r
39 struct Crypto1State mpcs = {0, 0};\r
40 struct Crypto1State *pcs;\r
41 pcs = &mpcs;\r
42\r
43 // clear trace\r
3000dc4e 44 clear_trace();\r
7bc95e2e 45 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
46\r
47 LED_A_ON();\r
48 LED_B_OFF();\r
49 LED_C_OFF();\r
50\r
51 while (true) {\r
52 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
baeaf579 53 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
8556b852
M
54 break;\r
55 };\r
56\r
57 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
baeaf579 58 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
8556b852
M
59 break;\r
60 };\r
61 \r
62 if(mifare_classic_readblock(pcs, cuid, blockNo, dataoutbuf)) {\r
baeaf579 63 if (MF_DBGLEVEL >= 1) Dbprintf("Read block error");\r
8556b852
M
64 break;\r
65 };\r
66\r
67 if(mifare_classic_halt(pcs, cuid)) {\r
baeaf579 68 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
8556b852
M
69 break;\r
70 };\r
71 \r
72 isOK = 1;\r
73 break;\r
74 }\r
75 \r
76 // ----------------------------- crypto1 destroy\r
77 crypto1_destroy(pcs);\r
78 \r
79 if (MF_DBGLEVEL >= 2) DbpString("READ BLOCK FINISHED");\r
80\r
8556b852 81 LED_B_ON();\r
baeaf579 82 cmd_send(CMD_ACK,isOK,0,0,dataoutbuf,16);\r
8556b852
M
83 LED_B_OFF();\r
84\r
a631936e 85 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
86 LEDsoff();\r
87}\r
88\r
89\r
4d2e4eea 90void MifareUC_Auth(uint8_t arg0, uint8_t *keybytes){\r
a631936e 91\r
4d2e4eea 92 bool turnOffField = (arg0 == 1);\r
a631936e 93\r
aa60d156 94 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
3000dc4e 95 clear_trace();\r
a631936e 96 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
97\r
4d2e4eea 98 if(!iso14443a_select_card(NULL, NULL, NULL)) {\r
aa60d156 99 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card");\r
0ec548dc 100 OnError(0);\r
a631936e 101 return;\r
102 };\r
103 \r
e7e95088 104 if(!mifare_ultra_auth(keybytes)){\r
4d2e4eea 105 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Authentication failed");\r
0ec548dc 106 OnError(1);\r
a631936e 107 return;\r
108 }\r
a631936e 109 \r
4d2e4eea 110 if (turnOffField) {\r
111 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
112 LEDsoff();\r
113 } \r
e7e95088 114 cmd_send(CMD_ACK,1,0,0,0,0);\r
7cc204bf 115}\r
116\r
8d53ea14 117// Arg0 = BlockNo,\r
118// Arg1 = UsePwd bool\r
119// datain = PWD bytes, \r
0ec548dc 120void MifareUReadBlock(uint8_t arg0, uint8_t arg1, uint8_t *datain)\r
7cc204bf 121{\r
7cc204bf 122 uint8_t blockNo = arg0;\r
787b5bd8 123 byte_t dataout[16] = {0x00};\r
4d2e4eea 124 bool useKey = (arg1 == 1); //UL_C\r
125 bool usePwd = (arg1 == 2); //UL_EV1/NTAG\r
8d53ea14 126\r
127 LEDsoff(); \r
128 LED_A_ON(); \r
3000dc4e 129 clear_trace();\r
787b5bd8 130 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
131 \r
4d2e4eea 132 int len = iso14443a_select_card(NULL, NULL, NULL);\r
787b5bd8 133 if(!len) {\r
aa60d156 134 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card (RC:%02X)",len);\r
0ec548dc 135 OnError(1);\r
787b5bd8 136 return;\r
aa60d156 137 }\r
0ec548dc 138 \r
4d2e4eea 139 // UL-C authentication\r
140 if ( useKey ) {\r
8d53ea14 141 uint8_t key[16] = {0x00}; \r
4d2e4eea 142 memcpy(key, datain, sizeof(key) );\r
143\r
e7e95088 144 if ( !mifare_ultra_auth(key) ) {\r
aa60d156 145 OnError(1);\r
4d2e4eea 146 return; \r
0ec548dc 147 }\r
4d2e4eea 148 }\r
aa60d156 149 \r
4d2e4eea 150 // UL-EV1 / NTAG authentication\r
151 if (usePwd) { \r
152 uint8_t pwd[4] = {0x00};\r
153 memcpy(pwd, datain, 4);\r
154 uint8_t pack[4] = {0,0,0,0};\r
e7e95088 155 if (!mifare_ul_ev1_auth(pwd, pack)) {\r
0ec548dc 156 OnError(1);\r
4d2e4eea 157 return; \r
062b7cb9 158 }\r
0ec548dc 159 }\r
160 \r
aa60d156 161 if( mifare_ultra_readblock(blockNo, dataout) ) {\r
162 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Read block error");\r
0ec548dc 163 OnError(2);\r
787b5bd8 164 return;\r
aa60d156 165 }\r
7cc204bf 166 \r
aa60d156 167 if( mifare_ultra_halt() ) {\r
168 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Halt error");\r
0ec548dc 169 OnError(3);\r
787b5bd8 170 return;\r
aa60d156 171 }\r
7cc204bf 172 \r
787b5bd8 173 cmd_send(CMD_ACK,1,0,0,dataout,16);\r
7cc204bf 174 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
175 LEDsoff();\r
176}\r
e7e95088 177\r
7cc204bf 178//-----------------------------------------------------------------------------\r
baeaf579 179// Select, Authenticate, Read a MIFARE tag. \r
180// read sector (data = 4 x 16 bytes = 64 bytes, or 16 x 16 bytes = 256 bytes)\r
8556b852
M
181//-----------------------------------------------------------------------------\r
182void MifareReadSector(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
183{\r
184 // params\r
185 uint8_t sectorNo = arg0;\r
186 uint8_t keyType = arg1;\r
187 uint64_t ui64Key = 0;\r
188 ui64Key = bytes_to_num(datain, 6);\r
189 \r
190 // variables\r
3fe4ff4f 191 byte_t isOK = 0;\r
baeaf579 192 byte_t dataoutbuf[16 * 16];\r
1c611bbd 193 uint8_t uid[10];\r
8556b852
M
194 uint32_t cuid;\r
195 struct Crypto1State mpcs = {0, 0};\r
196 struct Crypto1State *pcs;\r
197 pcs = &mpcs;\r
198\r
199 // clear trace\r
3000dc4e 200 clear_trace();\r
8556b852 201\r
7bc95e2e 202 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
203\r
204 LED_A_ON();\r
205 LED_B_OFF();\r
206 LED_C_OFF();\r
207\r
baeaf579 208 isOK = 1;\r
209 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
210 isOK = 0;\r
8556b852 211 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
baeaf579 212 }\r
baeaf579 213 \r
e7e95088 214 \r
baeaf579 215 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_FIRST)) {\r
216 isOK = 0;\r
8556b852 217 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
baeaf579 218 }\r
219 \r
220 for (uint8_t blockNo = 0; isOK && blockNo < NumBlocksPerSector(sectorNo); blockNo++) {\r
221 if(mifare_classic_readblock(pcs, cuid, FirstBlockOfSector(sectorNo) + blockNo, dataoutbuf + 16 * blockNo)) {\r
222 isOK = 0;\r
223 if (MF_DBGLEVEL >= 1) Dbprintf("Read sector %2d block %2d error", sectorNo, blockNo);\r
8556b852 224 break;\r
baeaf579 225 }\r
226 }\r
8556b852 227 \r
baeaf579 228 if(mifare_classic_halt(pcs, cuid)) {\r
8556b852 229 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
8556b852 230 }\r
baeaf579 231\r
8556b852
M
232 // ----------------------------- crypto1 destroy\r
233 crypto1_destroy(pcs);\r
234 \r
235 if (MF_DBGLEVEL >= 2) DbpString("READ SECTOR FINISHED");\r
236\r
8556b852 237 LED_B_ON();\r
baeaf579 238 cmd_send(CMD_ACK,isOK,0,0,dataoutbuf,16*NumBlocksPerSector(sectorNo));\r
6e82300d 239 LED_B_OFF();\r
8556b852
M
240\r
241 // Thats it...\r
242 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
243 LEDsoff();\r
7cc204bf 244}\r
245\r
8d53ea14 246// arg0 = blockNo (start)\r
247// arg1 = Pages (number of blocks)\r
248// arg2 = useKey\r
249// datain = KEY bytes\r
250void MifareUReadCard(uint8_t arg0, uint16_t arg1, uint8_t arg2, uint8_t *datain)\r
7cc204bf 251{\r
0ec548dc 252 // params\r
8d53ea14 253 uint8_t blockNo = arg0;\r
254 uint16_t blocks = arg1;\r
4d2e4eea 255 bool useKey = (arg2 == 1); //UL_C\r
256 bool usePwd = (arg2 == 2); //UL_EV1/NTAG\r
e7e95088 257 uint32_t countblocks = 0;\r
258 uint8_t *dataout = BigBuf_get_addr();\r
7cc204bf 259\r
1ec21089 260 LEDsoff();\r
261 LED_A_ON(); \r
3000dc4e 262 clear_trace();\r
787b5bd8 263 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
7cc204bf 264\r
1ec21089 265 int len = iso14443a_select_card(NULL, NULL, NULL);\r
787b5bd8 266 if (!len) {\r
aa60d156 267 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card (RC:%d)",len);\r
0ec548dc 268 OnError(1);\r
787b5bd8 269 return;\r
270 }\r
271 \r
4d2e4eea 272 // UL-C authentication\r
8d53ea14 273 if ( useKey ) {\r
8d53ea14 274 uint8_t key[16] = {0x00}; \r
4d2e4eea 275 memcpy(key, datain, sizeof(key) );\r
276\r
e7e95088 277 if ( !mifare_ultra_auth(key) ) {\r
8d53ea14 278 OnError(1);\r
4d2e4eea 279 return; \r
8d53ea14 280 }\r
4d2e4eea 281 }\r
282\r
283 // UL-EV1 / NTAG authentication\r
284 if (usePwd) { \r
285 uint8_t pwd[4] = {0x00};\r
286 memcpy(pwd, datain, sizeof(pwd));\r
287 uint8_t pack[4] = {0,0,0,0};\r
8d53ea14 288\r
e7e95088 289 if (!mifare_ul_ev1_auth(pwd, pack)){\r
8d53ea14 290 OnError(1);\r
4d2e4eea 291 return; \r
8d53ea14 292 }\r
8d53ea14 293 }\r
294 \r
295 for (int i = 0; i < blocks; i++){\r
e7e95088 296 if ((i*4) + 4 > BigBuf_get_traceLen()) {\r
297 Dbprintf("Data exceeds buffer!!");\r
298 break;\r
299 }\r
300 \r
301 len = mifare_ultra_readblock(blockNo + i, dataout + 4 * i);\r
787b5bd8 302 \r
303 if (len) {\r
aa60d156 304 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Read block %d error",i);\r
e7e95088 305 // if no blocks read - error out\r
306 if (i==0){\r
0ec548dc 307 OnError(2);\r
787b5bd8 308 return;\r
e7e95088 309 } else {\r
310 //stop at last successful read block and return what we got\r
311 break;\r
312 }\r
787b5bd8 313 } else {\r
4d2e4eea 314 countblocks++;\r
787b5bd8 315 }\r
316 }\r
317 \r
4d2e4eea 318 len = mifare_ultra_halt();\r
319 if (len) {\r
aa60d156 320 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Halt error");\r
0ec548dc 321 OnError(3);\r
787b5bd8 322 return;\r
323 }\r
324 \r
4d2e4eea 325 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) Dbprintf("Blocks read %d", countblocks);\r
7cc204bf 326\r
e7e95088 327 countblocks *= 4;\r
328 cmd_send(CMD_ACK, 1, countblocks, countblocks, 0, 0);\r
31d1caa5
MHS
329 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
330 LEDsoff();\r
7cc204bf 331}\r
332\r
7cc204bf 333//-----------------------------------------------------------------------------\r
baeaf579 334// Select, Authenticate, Write a MIFARE tag. \r
7cc204bf 335// read block\r
8556b852
M
336//-----------------------------------------------------------------------------\r
337void MifareWriteBlock(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
338{\r
339 // params\r
340 uint8_t blockNo = arg0;\r
341 uint8_t keyType = arg1;\r
342 uint64_t ui64Key = 0;\r
343 byte_t blockdata[16];\r
344\r
345 ui64Key = bytes_to_num(datain, 6);\r
346 memcpy(blockdata, datain + 10, 16);\r
347 \r
348 // variables\r
349 byte_t isOK = 0;\r
1c611bbd 350 uint8_t uid[10];\r
8556b852
M
351 uint32_t cuid;\r
352 struct Crypto1State mpcs = {0, 0};\r
353 struct Crypto1State *pcs;\r
354 pcs = &mpcs;\r
355\r
356 // clear trace\r
3000dc4e 357 clear_trace();\r
8556b852 358\r
7bc95e2e 359 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
360\r
361 LED_A_ON();\r
362 LED_B_OFF();\r
363 LED_C_OFF();\r
364\r
365 while (true) {\r
366 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
367 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
368 break;\r
369 };\r
370\r
371 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
372 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
373 break;\r
374 };\r
375 \r
376 if(mifare_classic_writeblock(pcs, cuid, blockNo, blockdata)) {\r
377 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
378 break;\r
379 };\r
380\r
381 if(mifare_classic_halt(pcs, cuid)) {\r
382 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
383 break;\r
384 };\r
385 \r
386 isOK = 1;\r
387 break;\r
388 }\r
389 \r
390 // ----------------------------- crypto1 destroy\r
391 crypto1_destroy(pcs);\r
392 \r
393 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
394\r
8556b852 395 LED_B_ON();\r
9492e0b0 396 cmd_send(CMD_ACK,isOK,0,0,0,0);\r
6e82300d 397 LED_B_OFF();\r
8556b852
M
398\r
399\r
400 // Thats it...\r
401 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
402 LEDsoff();\r
7cc204bf 403}\r
404\r
405void MifareUWriteBlock(uint8_t arg0, uint8_t *datain)\r
406{\r
aa60d156 407 uint8_t blockNo = arg0;\r
787b5bd8 408 byte_t blockdata[16] = {0x00};\r
7cc204bf 409\r
aa60d156 410 memcpy(blockdata, datain, 16);\r
7cc204bf 411 \r
787b5bd8 412 uint8_t uid[10] = {0x00};\r
7cc204bf 413\r
aa60d156 414 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
415 \r
416 clear_trace();\r
417 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
7cc204bf 418\r
aa60d156 419 if(!iso14443a_select_card(uid, NULL, NULL)) {\r
420 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
421 OnError(0);\r
422 return;\r
423 };\r
424\r
425 if(mifare_ultra_writeblock(blockNo, blockdata)) {\r
426 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
427 OnError(0);\r
428 return; };\r
429\r
430 if(mifare_ultra_halt()) {\r
431 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
432 OnError(0);\r
433 return;\r
434 };\r
435 \r
436 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
7cc204bf 437\r
aa60d156 438 cmd_send(CMD_ACK,1,0,0,0,0);\r
439 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
440 LEDsoff();\r
7cc204bf 441}\r
442\r
443void MifareUWriteBlock_Special(uint8_t arg0, uint8_t *datain)\r
444{\r
baeaf579 445 uint8_t blockNo = arg0;\r
787b5bd8 446 byte_t blockdata[4] = {0x00};\r
baeaf579 447 \r
7cc204bf 448 memcpy(blockdata, datain,4);\r
aa60d156 449 \r
8d53ea14 450 LEDsoff();\r
451 LED_A_ON();\r
aa60d156 452 clear_trace();\r
453 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
454\r
e7e95088 455 if(!iso14443a_select_card(NULL, NULL, NULL)) {\r
aa60d156 456 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
457 OnError(0);\r
458 return;\r
459 };\r
7cc204bf 460\r
aa60d156 461 if(mifare_ultra_special_writeblock(blockNo, blockdata)) {\r
462 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
463 OnError(0);\r
464 return;\r
465 };\r
466\r
467 if(mifare_ultra_halt()) {\r
468 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
469 OnError(0);\r
470 return;\r
471 };\r
472\r
473 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
474\r
475 cmd_send(CMD_ACK,1,0,0,0,0);\r
476 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
477 LEDsoff();\r
478}\r
479\r
480void MifareUSetPwd(uint8_t arg0, uint8_t *datain){\r
481 \r
482 uint8_t pwd[16] = {0x00};\r
483 byte_t blockdata[4] = {0x00};\r
484 \r
485 memcpy(pwd, datain, 16);\r
486 \r
487 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
3000dc4e 488 clear_trace();\r
baeaf579 489 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
7cc204bf 490\r
aa60d156 491 if(!iso14443a_select_card(NULL, NULL, NULL)) {\r
492 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
493 OnError(0);\r
494 return;\r
495 };\r
7cc204bf 496\r
aa60d156 497 blockdata[0] = pwd[7];\r
498 blockdata[1] = pwd[6];\r
499 blockdata[2] = pwd[5];\r
500 blockdata[3] = pwd[4];\r
501 if(mifare_ultra_special_writeblock( 44, blockdata)) {\r
502 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
503 OnError(44);\r
504 return;\r
505 };\r
7cc204bf 506\r
aa60d156 507 blockdata[0] = pwd[3];\r
508 blockdata[1] = pwd[2];\r
509 blockdata[2] = pwd[1];\r
510 blockdata[3] = pwd[0];\r
511 if(mifare_ultra_special_writeblock( 45, blockdata)) {\r
512 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
513 OnError(45);\r
514 return;\r
515 };\r
7cc204bf 516\r
aa60d156 517 blockdata[0] = pwd[15];\r
518 blockdata[1] = pwd[14];\r
519 blockdata[2] = pwd[13];\r
520 blockdata[3] = pwd[12];\r
521 if(mifare_ultra_special_writeblock( 46, blockdata)) {\r
522 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
523 OnError(46);\r
524 return;\r
525 };\r
7cc204bf 526\r
aa60d156 527 blockdata[0] = pwd[11];\r
528 blockdata[1] = pwd[10];\r
529 blockdata[2] = pwd[9];\r
530 blockdata[3] = pwd[8];\r
531 if(mifare_ultra_special_writeblock( 47, blockdata)) {\r
532 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
533 OnError(47);\r
534 return;\r
535 }; \r
7cc204bf 536\r
aa60d156 537 if(mifare_ultra_halt()) {\r
538 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
539 OnError(0);\r
540 return;\r
541 };\r
7cc204bf 542\r
aa60d156 543 cmd_send(CMD_ACK,1,0,0,0,0);\r
baeaf579 544 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
545 LEDsoff();\r
7cc204bf 546}\r
547\r
548// Return 1 if the nonce is invalid else return 0\r
6a1f2d82 549int valid_nonce(uint32_t Nt, uint32_t NtEnc, uint32_t Ks1, uint8_t *parity) {\r
7cc204bf 550 return ((oddparity((Nt >> 24) & 0xFF) == ((parity[0]) ^ oddparity((NtEnc >> 24) & 0xFF) ^ BIT(Ks1,16))) & \\r
8556b852
M
551 (oddparity((Nt >> 16) & 0xFF) == ((parity[1]) ^ oddparity((NtEnc >> 16) & 0xFF) ^ BIT(Ks1,8))) & \\r
552 (oddparity((Nt >> 8) & 0xFF) == ((parity[2]) ^ oddparity((NtEnc >> 8) & 0xFF) ^ BIT(Ks1,0)))) ? 1 : 0;\r
553}\r
554\r
9492e0b0 555\r
8556b852
M
556//-----------------------------------------------------------------------------\r
557// MIFARE nested authentication. \r
558// \r
559//-----------------------------------------------------------------------------\r
9492e0b0 560void MifareNested(uint32_t arg0, uint32_t arg1, uint32_t calibrate, uint8_t *datain)\r
8556b852
M
561{\r
562 // params\r
9492e0b0 563 uint8_t blockNo = arg0 & 0xff;\r
564 uint8_t keyType = (arg0 >> 8) & 0xff;\r
565 uint8_t targetBlockNo = arg1 & 0xff;\r
566 uint8_t targetKeyType = (arg1 >> 8) & 0xff;\r
8556b852
M
567 uint64_t ui64Key = 0;\r
568\r
569 ui64Key = bytes_to_num(datain, 6);\r
570 \r
571 // variables\r
9492e0b0 572 uint16_t rtr, i, j, len;\r
573 uint16_t davg;\r
574 static uint16_t dmin, dmax;\r
1c611bbd 575 uint8_t uid[10];\r
6a1f2d82 576 uint32_t cuid, nt1, nt2, nttmp, nttest, ks1;\r
577 uint8_t par[1];\r
9492e0b0 578 uint32_t target_nt[2], target_ks[2];\r
579 \r
8556b852 580 uint8_t par_array[4];\r
9492e0b0 581 uint16_t ncount = 0;\r
8556b852
M
582 struct Crypto1State mpcs = {0, 0};\r
583 struct Crypto1State *pcs;\r
584 pcs = &mpcs;\r
f71f4deb 585 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE];\r
8556b852 586\r
9492e0b0 587 uint32_t auth1_time, auth2_time;\r
588 static uint16_t delta_time;\r
589\r
f71f4deb 590 // free eventually allocated BigBuf memory\r
591 BigBuf_free();\r
8556b852 592 // clear trace\r
3000dc4e
MHS
593 clear_trace();\r
594 set_tracing(false);\r
8556b852 595 \r
7bc95e2e 596 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
597\r
598 LED_A_ON();\r
8556b852
M
599 LED_C_OFF();\r
600\r
8556b852 601\r
9492e0b0 602 // statistics on nonce distance\r
603 if (calibrate) { // for first call only. Otherwise reuse previous calibration\r
604 LED_B_ON();\r
3fe4ff4f 605 WDT_HIT();\r
8556b852 606\r
9492e0b0 607 davg = dmax = 0;\r
608 dmin = 2000;\r
609 delta_time = 0;\r
8556b852 610 \r
9492e0b0 611 for (rtr = 0; rtr < 17; rtr++) {\r
8556b852 612\r
9492e0b0 613 // prepare next select. No need to power down the card.\r
614 if(mifare_classic_halt(pcs, cuid)) {\r
615 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
616 rtr--;\r
617 continue;\r
618 }\r
619\r
620 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
621 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
622 rtr--;\r
623 continue;\r
624 };\r
625\r
626 auth1_time = 0;\r
627 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
628 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
629 rtr--;\r
630 continue;\r
631 };\r
632\r
633 if (delta_time) {\r
634 auth2_time = auth1_time + delta_time;\r
635 } else {\r
636 auth2_time = 0;\r
637 }\r
638 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_NESTED, &nt2, &auth2_time)) {\r
639 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error");\r
640 rtr--;\r
641 continue;\r
642 };\r
643\r
b19bd5d6 644 nttmp = prng_successor(nt1, 100); //NXP Mifare is typical around 840,but for some unlicensed/compatible mifare card this can be 160\r
645 for (i = 101; i < 1200; i++) {\r
9492e0b0 646 nttmp = prng_successor(nttmp, 1);\r
647 if (nttmp == nt2) break;\r
648 }\r
649\r
650 if (i != 1200) {\r
651 if (rtr != 0) {\r
652 davg += i;\r
653 dmin = MIN(dmin, i);\r
654 dmax = MAX(dmax, i);\r
655 }\r
656 else {\r
657 delta_time = auth2_time - auth1_time + 32; // allow some slack for proper timing\r
658 }\r
659 if (MF_DBGLEVEL >= 3) Dbprintf("Nested: calibrating... ntdist=%d", i);\r
660 }\r
8556b852
M
661 }\r
662 \r
9492e0b0 663 if (rtr <= 1) return;\r
8556b852 664\r
9492e0b0 665 davg = (davg + (rtr - 1)/2) / (rtr - 1);\r
666 \r
667 if (MF_DBGLEVEL >= 3) Dbprintf("min=%d max=%d avg=%d, delta_time=%d", dmin, dmax, davg, delta_time);\r
8556b852 668\r
9492e0b0 669 dmin = davg - 2;\r
670 dmax = davg + 2;\r
671 \r
672 LED_B_OFF();\r
673 \r
674 }\r
8556b852
M
675// ------------------------------------------------------------------------------------------------- \r
676 \r
677 LED_C_ON();\r
678\r
679 // get crypted nonces for target sector\r
9492e0b0 680 for(i=0; i < 2; i++) { // look for exactly two different nonces\r
8556b852 681\r
9492e0b0 682 target_nt[i] = 0;\r
683 while(target_nt[i] == 0) { // continue until we have an unambiguous nonce\r
8556b852 684 \r
9492e0b0 685 // prepare next select. No need to power down the card.\r
686 if(mifare_classic_halt(pcs, cuid)) {\r
687 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
688 continue;\r
689 }\r
8556b852 690\r
9492e0b0 691 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
692 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
693 continue;\r
694 };\r
8556b852 695 \r
9492e0b0 696 auth1_time = 0;\r
697 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
698 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
699 continue;\r
700 };\r
8556b852 701\r
9492e0b0 702 // nested authentication\r
703 auth2_time = auth1_time + delta_time;\r
6a1f2d82 704 len = mifare_sendcmd_shortex(pcs, AUTH_NESTED, 0x60 + (targetKeyType & 0x01), targetBlockNo, receivedAnswer, par, &auth2_time);\r
9492e0b0 705 if (len != 4) {\r
706 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error len=%d", len);\r
707 continue;\r
708 };\r
8556b852 709 \r
9492e0b0 710 nt2 = bytes_to_num(receivedAnswer, 4); \r
6a1f2d82 711 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: Testing nt1=%08x nt2enc=%08x nt2par=%02x", i+1, nt1, nt2, par[0]);\r
8556b852 712 \r
9492e0b0 713 // Parity validity check\r
714 for (j = 0; j < 4; j++) {\r
6a1f2d82 715 par_array[j] = (oddparity(receivedAnswer[j]) != ((par[0] >> (7-j)) & 0x01));\r
9492e0b0 716 }\r
717 \r
718 ncount = 0;\r
719 nttest = prng_successor(nt1, dmin - 1);\r
720 for (j = dmin; j < dmax + 1; j++) {\r
721 nttest = prng_successor(nttest, 1);\r
722 ks1 = nt2 ^ nttest;\r
723\r
724 if (valid_nonce(nttest, nt2, ks1, par_array)){\r
725 if (ncount > 0) { // we are only interested in disambiguous nonces, try again\r
726 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (ambigous), ntdist=%d", i+1, j);\r
727 target_nt[i] = 0;\r
728 break;\r
729 }\r
730 target_nt[i] = nttest;\r
731 target_ks[i] = ks1;\r
732 ncount++;\r
733 if (i == 1 && target_nt[1] == target_nt[0]) { // we need two different nonces\r
734 target_nt[i] = 0;\r
735 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#2: dismissed (= nonce#1), ntdist=%d", j);\r
8556b852
M
736 break;\r
737 }\r
9492e0b0 738 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: valid, ntdist=%d", i+1, j);\r
8556b852 739 }\r
8556b852 740 }\r
9492e0b0 741 if (target_nt[i] == 0 && j == dmax+1 && MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (all invalid)", i+1);\r
8556b852
M
742 }\r
743 }\r
744\r
745 LED_C_OFF();\r
746 \r
747 // ----------------------------- crypto1 destroy\r
748 crypto1_destroy(pcs);\r
749 \r
9492e0b0 750 byte_t buf[4 + 4 * 4];\r
751 memcpy(buf, &cuid, 4);\r
752 memcpy(buf+4, &target_nt[0], 4);\r
753 memcpy(buf+8, &target_ks[0], 4);\r
754 memcpy(buf+12, &target_nt[1], 4);\r
755 memcpy(buf+16, &target_ks[1], 4);\r
8556b852
M
756 \r
757 LED_B_ON();\r
9492e0b0 758 cmd_send(CMD_ACK, 0, 2, targetBlockNo + (targetKeyType * 0x100), buf, sizeof(buf));\r
6e82300d 759 LED_B_OFF();\r
8556b852 760\r
9492e0b0 761 if (MF_DBGLEVEL >= 3) DbpString("NESTED FINISHED");\r
8556b852 762\r
8556b852
M
763 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
764 LEDsoff();\r
3000dc4e 765 set_tracing(TRUE);\r
8556b852
M
766}\r
767\r
768//-----------------------------------------------------------------------------\r
9492e0b0 769// MIFARE check keys. key count up to 85. \r
8556b852
M
770// \r
771//-----------------------------------------------------------------------------\r
772void MifareChkKeys(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
773{\r
774 // params\r
775 uint8_t blockNo = arg0;\r
776 uint8_t keyType = arg1;\r
777 uint8_t keyCount = arg2;\r
778 uint64_t ui64Key = 0;\r
779 \r
780 // variables\r
781 int i;\r
782 byte_t isOK = 0;\r
1c611bbd 783 uint8_t uid[10];\r
8556b852
M
784 uint32_t cuid;\r
785 struct Crypto1State mpcs = {0, 0};\r
786 struct Crypto1State *pcs;\r
787 pcs = &mpcs;\r
788 \r
789 // clear debug level\r
790 int OLD_MF_DBGLEVEL = MF_DBGLEVEL; \r
791 MF_DBGLEVEL = MF_DBG_NONE;\r
792 \r
793 // clear trace\r
3000dc4e
MHS
794 clear_trace();\r
795 set_tracing(TRUE);\r
8556b852 796\r
7bc95e2e 797 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
798\r
799 LED_A_ON();\r
800 LED_B_OFF();\r
801 LED_C_OFF();\r
802\r
8556b852 803 for (i = 0; i < keyCount; i++) {\r
9492e0b0 804 if(mifare_classic_halt(pcs, cuid)) {\r
805 if (MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Halt error");\r
806 }\r
8556b852
M
807\r
808 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
9492e0b0 809 if (OLD_MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Can't select card");\r
8556b852
M
810 break;\r
811 };\r
812\r
813 ui64Key = bytes_to_num(datain + i * 6, 6);\r
814 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
815 continue;\r
816 };\r
817 \r
818 isOK = 1;\r
819 break;\r
820 }\r
821 \r
822 // ----------------------------- crypto1 destroy\r
823 crypto1_destroy(pcs);\r
824 \r
8556b852 825 LED_B_ON();\r
6e82300d 826 cmd_send(CMD_ACK,isOK,0,0,datain + i * 6,6);\r
8556b852
M
827 LED_B_OFF();\r
828\r
8556b852
M
829 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
830 LEDsoff();\r
831\r
832 // restore debug level\r
833 MF_DBGLEVEL = OLD_MF_DBGLEVEL; \r
834}\r
835\r
836//-----------------------------------------------------------------------------\r
837// MIFARE commands set debug level\r
838// \r
839//-----------------------------------------------------------------------------\r
840void MifareSetDbgLvl(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
841 MF_DBGLEVEL = arg0;\r
842 Dbprintf("Debug level: %d", MF_DBGLEVEL);\r
843}\r
844\r
845//-----------------------------------------------------------------------------\r
846// Work with emulator memory\r
847// \r
848//-----------------------------------------------------------------------------\r
849void MifareEMemClr(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
850 emlClearMem();\r
851}\r
852\r
853void MifareEMemSet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
854 emlSetMem(datain, arg0, arg1); // data, block num, blocks count\r
855}\r
856\r
857void MifareEMemGet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
3fe4ff4f 858 byte_t buf[USB_CMD_DATA_SIZE];\r
baeaf579 859 emlGetMem(buf, arg0, arg1); // data, block num, blocks count (max 4)\r
8556b852
M
860\r
861 LED_B_ON();\r
3fe4ff4f 862 cmd_send(CMD_ACK,arg0,arg1,0,buf,USB_CMD_DATA_SIZE);\r
8556b852
M
863 LED_B_OFF();\r
864}\r
865\r
866//-----------------------------------------------------------------------------\r
867// Load a card into the emulator memory\r
868// \r
869//-----------------------------------------------------------------------------\r
870void MifareECardLoad(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
baeaf579 871 uint8_t numSectors = arg0;\r
8556b852
M
872 uint8_t keyType = arg1;\r
873 uint64_t ui64Key = 0;\r
874 uint32_t cuid;\r
875 struct Crypto1State mpcs = {0, 0};\r
876 struct Crypto1State *pcs;\r
877 pcs = &mpcs;\r
878\r
879 // variables\r
880 byte_t dataoutbuf[16];\r
ab8b654e 881 byte_t dataoutbuf2[16];\r
1c611bbd 882 uint8_t uid[10];\r
8556b852
M
883\r
884 // clear trace\r
3000dc4e
MHS
885 clear_trace();\r
886 set_tracing(false);\r
8556b852 887 \r
7bc95e2e 888 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
889\r
890 LED_A_ON();\r
891 LED_B_OFF();\r
892 LED_C_OFF();\r
893 \r
baeaf579 894 bool isOK = true;\r
895\r
896 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
897 isOK = false;\r
898 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
899 }\r
8556b852 900 \r
baeaf579 901 for (uint8_t sectorNo = 0; isOK && sectorNo < numSectors; sectorNo++) {\r
902 ui64Key = emlGetKey(sectorNo, keyType);\r
903 if (sectorNo == 0){\r
904 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_FIRST)) {\r
905 isOK = false;\r
906 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth error", sectorNo);\r
8556b852 907 break;\r
baeaf579 908 }\r
909 } else {\r
910 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_NESTED)) {\r
911 isOK = false;\r
912 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth nested error", sectorNo);\r
8556b852 913 break;\r
baeaf579 914 }\r
915 }\r
916 \r
917 for (uint8_t blockNo = 0; isOK && blockNo < NumBlocksPerSector(sectorNo); blockNo++) {\r
918 if(isOK && mifare_classic_readblock(pcs, cuid, FirstBlockOfSector(sectorNo) + blockNo, dataoutbuf)) {\r
919 isOK = false;\r
920 if (MF_DBGLEVEL >= 1) Dbprintf("Error reading sector %2d block %2d", sectorNo, blockNo);\r
ab8b654e
M
921 break;\r
922 };\r
baeaf579 923 if (isOK) {\r
924 if (blockNo < NumBlocksPerSector(sectorNo) - 1) {\r
925 emlSetMem(dataoutbuf, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
926 } else { // sector trailer, keep the keys, set only the AC\r
927 emlGetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
928 memcpy(&dataoutbuf2[6], &dataoutbuf[6], 4);\r
929 emlSetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
930 }\r
931 }\r
8556b852
M
932 }\r
933\r
baeaf579 934 }\r
935\r
936 if(mifare_classic_halt(pcs, cuid)) {\r
937 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
938 };\r
8556b852
M
939\r
940 // ----------------------------- crypto1 destroy\r
941 crypto1_destroy(pcs);\r
ab8b654e
M
942\r
943 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
944 LEDsoff();\r
8556b852
M
945 \r
946 if (MF_DBGLEVEL >= 2) DbpString("EMUL FILL SECTORS FINISHED");\r
947\r
8556b852
M
948}\r
949\r
0675f200
M
950\r
951//-----------------------------------------------------------------------------\r
952// Work with "magic Chinese" card (email him: ouyangweidaxian@live.cn)\r
953// \r
954//-----------------------------------------------------------------------------\r
955void MifareCSetBlock(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
956 \r
957 // params\r
958 uint8_t needWipe = arg0;\r
208a0166
M
959 // bit 0 - need get UID\r
960 // bit 1 - need wupC\r
961 // bit 2 - need HALT after sequence\r
962 // bit 3 - need init FPGA and field before sequence\r
963 // bit 4 - need reset FPGA and LED\r
964 uint8_t workFlags = arg1;\r
0675f200
M
965 uint8_t blockNo = arg2;\r
966 \r
967 // card commands\r
968 uint8_t wupC1[] = { 0x40 }; \r
969 uint8_t wupC2[] = { 0x43 }; \r
970 uint8_t wipeC[] = { 0x41 }; \r
971 \r
972 // variables\r
973 byte_t isOK = 0;\r
3fe4ff4f 974 uint8_t uid[10] = {0x00};\r
975 uint8_t d_block[18] = {0x00};\r
0675f200
M
976 uint32_t cuid;\r
977 \r
f71f4deb 978 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE];\r
979 uint8_t receivedAnswerPar[MAX_MIFARE_PARITY_SIZE];\r
6a1f2d82 980\r
3fe4ff4f 981 // reset FPGA and LED\r
208a0166 982 if (workFlags & 0x08) {\r
208a0166
M
983 LED_A_ON();\r
984 LED_B_OFF();\r
985 LED_C_OFF();\r
0675f200 986 \r
3000dc4e
MHS
987 clear_trace();\r
988 set_tracing(TRUE);\r
3fe4ff4f 989 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
208a0166 990 }\r
0675f200
M
991\r
992 while (true) {\r
3fe4ff4f 993\r
0675f200 994 // get UID from chip\r
208a0166 995 if (workFlags & 0x01) {\r
0675f200
M
996 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
997 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
3ac59c7f 998 //break;\r
0675f200
M
999 };\r
1000\r
1001 if(mifare_classic_halt(NULL, cuid)) {\r
1002 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
3ac59c7f 1003 //break;\r
0675f200
M
1004 };\r
1005 };\r
1006 \r
1007 // reset chip\r
1008 if (needWipe){\r
6a1f2d82 1009 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
1010 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
1011 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
1012 break;\r
1013 };\r
1014\r
9492e0b0 1015 ReaderTransmit(wipeC, sizeof(wipeC), NULL);\r
6a1f2d82 1016 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
1017 if (MF_DBGLEVEL >= 1) Dbprintf("wipeC error");\r
1018 break;\r
1019 };\r
1020\r
1021 if(mifare_classic_halt(NULL, cuid)) {\r
1022 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1023 break;\r
1024 };\r
1025 }; \r
1026\r
545a1f38 1027 // write block\r
208a0166 1028 if (workFlags & 0x02) {\r
6a1f2d82 1029 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
1030 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
208a0166
M
1031 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
1032 break;\r
1033 };\r
0675f200 1034\r
9492e0b0 1035 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
6a1f2d82 1036 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
208a0166
M
1037 if (MF_DBGLEVEL >= 1) Dbprintf("wupC2 error");\r
1038 break;\r
1039 };\r
1040 }\r
0675f200 1041\r
6a1f2d82 1042 if ((mifare_sendcmd_short(NULL, 0, 0xA0, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 1) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
1043 if (MF_DBGLEVEL >= 1) Dbprintf("write block send command error");\r
1044 break;\r
1045 };\r
1046 \r
1047 memcpy(d_block, datain, 16);\r
1048 AppendCrc14443a(d_block, 16);\r
1049 \r
9492e0b0 1050 ReaderTransmit(d_block, sizeof(d_block), NULL);\r
6a1f2d82 1051 if ((ReaderReceive(receivedAnswer, receivedAnswerPar) != 1) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
1052 if (MF_DBGLEVEL >= 1) Dbprintf("write block send data error");\r
1053 break;\r
1054 }; \r
1055 \r
208a0166
M
1056 if (workFlags & 0x04) {\r
1057 if (mifare_classic_halt(NULL, cuid)) {\r
1058 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1059 break;\r
1060 };\r
1061 }\r
0675f200
M
1062 \r
1063 isOK = 1;\r
1064 break;\r
1065 }\r
1066 \r
0675f200 1067 LED_B_ON();\r
baeaf579 1068 cmd_send(CMD_ACK,isOK,0,0,uid,4);\r
0675f200
M
1069 LED_B_OFF();\r
1070\r
545a1f38 1071 if ((workFlags & 0x10) || (!isOK)) {\r
208a0166
M
1072 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1073 LEDsoff();\r
1074 }\r
0675f200 1075}\r
545a1f38 1076\r
baeaf579 1077\r
545a1f38
M
1078void MifareCGetBlock(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1079 \r
1080 // params\r
1081 // bit 1 - need wupC\r
1082 // bit 2 - need HALT after sequence\r
1083 // bit 3 - need init FPGA and field before sequence\r
1084 // bit 4 - need reset FPGA and LED\r
1085 uint8_t workFlags = arg0;\r
1086 uint8_t blockNo = arg2;\r
1087 \r
1088 // card commands\r
1089 uint8_t wupC1[] = { 0x40 }; \r
1090 uint8_t wupC2[] = { 0x43 }; \r
1091 \r
1092 // variables\r
1093 byte_t isOK = 0;\r
3fe4ff4f 1094 uint8_t data[18] = {0x00};\r
545a1f38
M
1095 uint32_t cuid = 0;\r
1096 \r
f71f4deb 1097 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE];\r
1098 uint8_t receivedAnswerPar[MAX_MIFARE_PARITY_SIZE];\r
545a1f38
M
1099 \r
1100 if (workFlags & 0x08) {\r
545a1f38
M
1101 LED_A_ON();\r
1102 LED_B_OFF();\r
1103 LED_C_OFF();\r
1104 \r
3000dc4e
MHS
1105 clear_trace();\r
1106 set_tracing(TRUE);\r
3fe4ff4f 1107 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
545a1f38
M
1108 }\r
1109\r
1110 while (true) {\r
1111 if (workFlags & 0x02) {\r
7bc95e2e 1112 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
6a1f2d82 1113 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
545a1f38
M
1114 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
1115 break;\r
1116 };\r
1117\r
9492e0b0 1118 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
6a1f2d82 1119 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
545a1f38
M
1120 if (MF_DBGLEVEL >= 1) Dbprintf("wupC2 error");\r
1121 break;\r
1122 };\r
1123 }\r
1124\r
1125 // read block\r
6a1f2d82 1126 if ((mifare_sendcmd_short(NULL, 0, 0x30, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 18)) {\r
545a1f38
M
1127 if (MF_DBGLEVEL >= 1) Dbprintf("read block send command error");\r
1128 break;\r
1129 };\r
1130 memcpy(data, receivedAnswer, 18);\r
1131 \r
1132 if (workFlags & 0x04) {\r
1133 if (mifare_classic_halt(NULL, cuid)) {\r
1134 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1135 break;\r
1136 };\r
1137 }\r
1138 \r
1139 isOK = 1;\r
1140 break;\r
1141 }\r
1142 \r
545a1f38 1143 LED_B_ON();\r
baeaf579 1144 cmd_send(CMD_ACK,isOK,0,0,data,18);\r
545a1f38
M
1145 LED_B_OFF();\r
1146\r
1147 if ((workFlags & 0x10) || (!isOK)) {\r
545a1f38
M
1148 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1149 LEDsoff();\r
1150 }\r
1151}\r
1152\r
3fe4ff4f 1153void MifareCIdent(){\r
1154 \r
1155 // card commands\r
1156 uint8_t wupC1[] = { 0x40 }; \r
1157 uint8_t wupC2[] = { 0x43 }; \r
1158 \r
1159 // variables\r
1160 byte_t isOK = 1;\r
1161 \r
f71f4deb 1162 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE];\r
1163 uint8_t receivedAnswerPar[MAX_MIFARE_PARITY_SIZE];\r
3fe4ff4f 1164\r
1165 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
1166 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1167 isOK = 0;\r
1168 };\r
1169\r
1170 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
1171 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1172 isOK = 0;\r
1173 };\r
1174\r
1175 if (mifare_classic_halt(NULL, 0)) {\r
1176 isOK = 0;\r
1177 };\r
1178\r
1179 cmd_send(CMD_ACK,isOK,0,0,0,0);\r
1180}\r
1181\r
add0504d 1182void MifareCollectNonces(uint32_t arg0, uint32_t arg1){\r
1183\r
1184 BigBuf_free();\r
1185\r
1186 uint32_t iterations = arg0;\r
1187 uint8_t uid[10] = {0x00};\r
1188\r
1189 uint8_t *response = BigBuf_malloc(MAX_MIFARE_FRAME_SIZE);\r
1190 uint8_t *responsePar = BigBuf_malloc(MAX_MIFARE_PARITY_SIZE);\r
1191\r
1192 uint8_t mf_auth[] = { 0x60,0x00,0xf5,0x7b };\r
1193 \r
1194 // get memory from BigBuf.\r
1195 uint8_t *nonces = BigBuf_malloc(iterations * 4);\r
1196\r
1197 LED_A_ON();\r
1198 LED_B_OFF();\r
1199 LED_C_OFF();\r
1200\r
1201 clear_trace();\r
1202 set_tracing(TRUE);\r
1203 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1204 \r
1205 for (int i = 0; i < iterations; i++) {\r
1206 \r
1207 WDT_HIT();\r
1208\r
1209 // Test if the action was cancelled\r
1210 if(BUTTON_PRESS()) break;\r
1211 \r
1212 // if(mifare_classic_halt(pcs, cuid)) {\r
1213 // if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1214 //}\r
1215\r
1216 if(!iso14443a_select_card(uid, NULL, NULL)) {\r
1217 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
1218 continue;\r
1219 };\r
1220\r
1221 // Transmit MIFARE_CLASSIC_AUTH.\r
1222 ReaderTransmit(mf_auth, sizeof(mf_auth), NULL);\r
1223\r
1224 // Receive the (4 Byte) "random" nonce\r
1225 if (!ReaderReceive(response, responsePar)) {\r
1226 if (MF_DBGLEVEL >= 1) Dbprintf("Couldn't receive tag nonce");\r
1227 continue;\r
1228 } \r
1229 \r
1230 nonces[i*4] = bytes_to_num(response, 4);\r
1231 }\r
1232 \r
1233 int packLen = iterations * 4;\r
1234 int packSize = 0;\r
1235 int packNum = 0;\r
1236 while (packLen > 0) {\r
1237 packSize = MIN(USB_CMD_DATA_SIZE, packLen);\r
1238 LED_B_ON();\r
1239 cmd_send(CMD_ACK, 77, 0, packSize, nonces - packLen, packSize);\r
1240 LED_B_OFF();\r
1241\r
1242 packLen -= packSize;\r
1243 packNum++;\r
1244 }\r
add0504d 1245 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1246 LEDsoff();\r
1247}\r
1248\r
1249//\r
3fe4ff4f 1250// DESFIRE\r
1251//\r
a631936e 1252\r
1253void Mifare_DES_Auth1(uint8_t arg0, uint8_t *datain){\r
1254\r
1255 byte_t dataout[11] = {0x00};\r
1256 uint8_t uid[10] = {0x00};\r
aa60d156 1257 uint32_t cuid = 0x00;\r
a631936e 1258 \r
3000dc4e 1259 clear_trace();\r
a631936e 1260 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1261\r
1262 int len = iso14443a_select_card(uid, NULL, &cuid);\r
1263 if(!len) {\r
aa60d156 1264 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card");\r
0ec548dc 1265 OnError(1);\r
a631936e 1266 return;\r
1267 };\r
1268\r
1269 if(mifare_desfire_des_auth1(cuid, dataout)){\r
aa60d156 1270 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Authentication part1: Fail.");\r
0ec548dc 1271 OnError(4);\r
a631936e 1272 return;\r
1273 }\r
1274\r
1275 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) DbpString("AUTH 1 FINISHED");\r
a631936e 1276 cmd_send(CMD_ACK,1,cuid,0,dataout, sizeof(dataout));\r
1277}\r
1278\r
1279void Mifare_DES_Auth2(uint32_t arg0, uint8_t *datain){\r
1280\r
1281 uint32_t cuid = arg0;\r
1282 uint8_t key[16] = {0x00};\r
a631936e 1283 byte_t dataout[12] = {0x00};\r
aa60d156 1284 byte_t isOK = 0;\r
a631936e 1285 \r
1286 memcpy(key, datain, 16);\r
1287 \r
1288 isOK = mifare_desfire_des_auth2(cuid, key, dataout);\r
1289 \r
1290 if( isOK) {\r
aa60d156 1291 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) Dbprintf("Authentication part2: Failed"); \r
0ec548dc 1292 OnError(4);\r
a631936e 1293 return;\r
1294 }\r
1295\r
aa60d156 1296 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) DbpString("AUTH 2 FINISHED");\r
a631936e 1297\r
1298 cmd_send(CMD_ACK, isOK, 0, 0, dataout, sizeof(dataout));\r
1299 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1300 LEDsoff();\r
3000dc4e 1301}\r
Impressum, Datenschutz