]> git.zerfleddert.de Git - proxmark3-svn/blame_incremental - armsrc/mifarecmd.c
CHG: Cleaning up
[proxmark3-svn] / armsrc / mifarecmd.c
... / ...
CommitLineData
1//-----------------------------------------------------------------------------\r
2// Merlok - June 2011, 2012\r
3// Gerhard de Koning Gans - May 2008\r
4// Hagen Fritsch - June 2010\r
5// Midnitesnake - Dec 2013\r
6// Andy Davies - Apr 2014\r
7// Iceman - May 2014,2015,2016\r
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
18#include "util.h"\r
19#include "crc.h"\r
20#include "protocols.h"\r
21#include "parity.h"\r
22\r
23//-----------------------------------------------------------------------------\r
24// Select, Authenticate, Read a MIFARE tag. \r
25// read block\r
26//-----------------------------------------------------------------------------\r
27void MifareReadBlock(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
28{\r
29 // params\r
30 uint8_t blockNo = arg0;\r
31 uint8_t keyType = arg1;\r
32 uint64_t ui64Key = 0;\r
33 ui64Key = bytes_to_num(datain, 6);\r
34 \r
35 // variables\r
36 byte_t isOK = 0;\r
37 byte_t dataoutbuf[16] = {0x00};\r
38 uint8_t uid[10] = {0x00};\r
39 uint32_t cuid = 0;\r
40 struct Crypto1State mpcs = {0, 0};\r
41 struct Crypto1State *pcs;\r
42 pcs = &mpcs;\r
43\r
44 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
45\r
46 clear_trace();\r
47 set_tracing(true);\r
48\r
49 LED_A_ON();\r
50 LED_B_OFF();\r
51 LED_C_OFF();\r
52\r
53 while (true) {\r
54 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
55 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
56 break;\r
57 };\r
58\r
59 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
60 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
61 break;\r
62 };\r
63 \r
64 if(mifare_classic_readblock(pcs, cuid, blockNo, dataoutbuf)) {\r
65 if (MF_DBGLEVEL >= 1) Dbprintf("Read block error");\r
66 break;\r
67 };\r
68\r
69 if(mifare_classic_halt(pcs, cuid)) {\r
70 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
71 break;\r
72 };\r
73 \r
74 isOK = 1;\r
75 break;\r
76 }\r
77 \r
78 crypto1_destroy(pcs);\r
79 \r
80 if (MF_DBGLEVEL >= 2) DbpString("READ BLOCK FINISHED");\r
81\r
82 LED_B_ON();\r
83 cmd_send(CMD_ACK,isOK,0,0,dataoutbuf,16);\r
84 LED_B_OFF();\r
85\r
86 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
87 LEDsoff();\r
88}\r
89\r
90void MifareUC_Auth(uint8_t arg0, uint8_t *keybytes){\r
91\r
92 bool turnOffField = (arg0 == 1);\r
93\r
94 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
95\r
96 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
97\r
98 clear_trace();\r
99 set_tracing(true);\r
100\r
101 if(!iso14443a_select_card(NULL, NULL, NULL, true, 0)) {\r
102 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card");\r
103 OnError(0);\r
104 return;\r
105 };\r
106 \r
107 if(!mifare_ultra_auth(keybytes)){\r
108 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Authentication failed");\r
109 OnError(1);\r
110 return;\r
111 }\r
112\r
113 if (turnOffField) {\r
114 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
115 LEDsoff();\r
116 }\r
117 cmd_send(CMD_ACK,1,0,0,0,0);\r
118}\r
119\r
120// Arg0 = BlockNo,\r
121// Arg1 = UsePwd bool\r
122// datain = PWD bytes,\r
123void MifareUReadBlock(uint8_t arg0, uint8_t arg1, uint8_t *datain)\r
124{\r
125 uint8_t blockNo = arg0;\r
126 byte_t dataout[16] = {0x00};\r
127 bool useKey = (arg1 == 1); //UL_C\r
128 bool usePwd = (arg1 == 2); //UL_EV1/NTAG\r
129\r
130 LEDsoff();\r
131 LED_A_ON();\r
132 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
133\r
134 clear_trace();\r
135 set_tracing(true);\r
136\r
137 int len = iso14443a_select_card(NULL, NULL, NULL, true, 0);\r
138 if(!len) {\r
139 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card (RC:%02X)",len);\r
140 OnError(1);\r
141 return;\r
142 }\r
143\r
144 // UL-C authentication\r
145 if ( useKey ) {\r
146 uint8_t key[16] = {0x00};\r
147 memcpy(key, datain, sizeof(key) );\r
148\r
149 if ( !mifare_ultra_auth(key) ) {\r
150 OnError(1);\r
151 return;\r
152 }\r
153 }\r
154\r
155 // UL-EV1 / NTAG authentication\r
156 if ( usePwd ) {\r
157 uint8_t pwd[4] = {0x00};\r
158 memcpy(pwd, datain, 4);\r
159 uint8_t pack[4] = {0,0,0,0};\r
160 if (!mifare_ul_ev1_auth(pwd, pack)) {\r
161 OnError(1);\r
162 return;\r
163 }\r
164 } \r
165\r
166 if( mifare_ultra_readblock(blockNo, dataout) ) {\r
167 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Read block error");\r
168 OnError(2);\r
169 return;\r
170 }\r
171\r
172 if( mifare_ultra_halt() ) {\r
173 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Halt error");\r
174 OnError(3);\r
175 return;\r
176 }\r
177\r
178 cmd_send(CMD_ACK,1,0,0,dataout,16);\r
179 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
180 LEDsoff();\r
181}\r
182\r
183//-----------------------------------------------------------------------------\r
184// Select, Authenticate, Read a MIFARE tag. \r
185// read sector (data = 4 x 16 bytes = 64 bytes, or 16 x 16 bytes = 256 bytes)\r
186//-----------------------------------------------------------------------------\r
187void MifareReadSector(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
188{\r
189 // params\r
190 uint8_t sectorNo = arg0;\r
191 uint8_t keyType = arg1;\r
192 uint64_t ui64Key = 0;\r
193 ui64Key = bytes_to_num(datain, 6);\r
194 \r
195 // variables\r
196 byte_t isOK = 0;\r
197 byte_t dataoutbuf[16 * 16];\r
198 uint8_t uid[10] = {0x00};\r
199 uint32_t cuid = 0;\r
200 struct Crypto1State mpcs = {0, 0};\r
201 struct Crypto1State *pcs;\r
202 pcs = &mpcs;\r
203\r
204 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
205\r
206 clear_trace();\r
207 set_tracing(true);\r
208 \r
209 LED_A_ON();\r
210 LED_B_OFF();\r
211 LED_C_OFF();\r
212\r
213 isOK = 1;\r
214 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
215 isOK = 0;\r
216 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
217 }\r
218 \r
219 \r
220 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_FIRST)) {\r
221 isOK = 0;\r
222 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
223 }\r
224 \r
225 for (uint8_t blockNo = 0; isOK && blockNo < NumBlocksPerSector(sectorNo); blockNo++) {\r
226 if(mifare_classic_readblock(pcs, cuid, FirstBlockOfSector(sectorNo) + blockNo, dataoutbuf + 16 * blockNo)) {\r
227 isOK = 0;\r
228 if (MF_DBGLEVEL >= 1) Dbprintf("Read sector %2d block %2d error", sectorNo, blockNo);\r
229 break;\r
230 }\r
231 }\r
232 \r
233 if(mifare_classic_halt(pcs, cuid)) {\r
234 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
235 }\r
236\r
237 if (MF_DBGLEVEL >= 2) DbpString("READ SECTOR FINISHED");\r
238\r
239 crypto1_destroy(pcs);\r
240\r
241 LED_B_ON();\r
242 cmd_send(CMD_ACK,isOK,0,0,dataoutbuf,16*NumBlocksPerSector(sectorNo));\r
243 LED_B_OFF();\r
244\r
245 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
246 LEDsoff();\r
247 set_tracing(FALSE);\r
248}\r
249\r
250// arg0 = blockNo (start)\r
251// arg1 = Pages (number of blocks)\r
252// arg2 = useKey\r
253// datain = KEY bytes\r
254void MifareUReadCard(uint8_t arg0, uint16_t arg1, uint8_t arg2, uint8_t *datain)\r
255{\r
256 LEDsoff();\r
257 LED_A_ON();\r
258 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
259\r
260 // free eventually allocated BigBuf memory\r
261 BigBuf_free(); BigBuf_Clear_ext(false);\r
262 clear_trace();\r
263 set_tracing(true);\r
264 \r
265 // params\r
266 uint8_t blockNo = arg0;\r
267 uint16_t blocks = arg1;\r
268 bool useKey = (arg2 == 1); //UL_C\r
269 bool usePwd = (arg2 == 2); //UL_EV1/NTAG\r
270 uint32_t countblocks = 0;\r
271 uint8_t *dataout = BigBuf_malloc(CARD_MEMORY_SIZE);\r
272 if (dataout == NULL){\r
273 Dbprintf("out of memory");\r
274 OnError(1);\r
275 return;\r
276 }\r
277\r
278 int len = iso14443a_select_card(NULL, NULL, NULL, true, 0);\r
279 if (!len) {\r
280 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card (RC:%d)",len);\r
281 OnError(1);\r
282 return;\r
283 }\r
284\r
285 // UL-C authentication\r
286 if ( useKey ) {\r
287 uint8_t key[16] = {0x00};\r
288 memcpy(key, datain, sizeof(key) );\r
289\r
290 if ( !mifare_ultra_auth(key) ) {\r
291 OnError(1);\r
292 return;\r
293 }\r
294 }\r
295\r
296 // UL-EV1 / NTAG authentication\r
297 if (usePwd) {\r
298 uint8_t pwd[4] = {0x00};\r
299 memcpy(pwd, datain, sizeof(pwd));\r
300 uint8_t pack[4] = {0,0,0,0};\r
301\r
302 if (!mifare_ul_ev1_auth(pwd, pack)){\r
303 OnError(1);\r
304 return; \r
305 }\r
306 }\r
307\r
308 for (int i = 0; i < blocks; i++){\r
309 if ((i*4) + 4 >= CARD_MEMORY_SIZE) {\r
310 Dbprintf("Data exceeds buffer!!");\r
311 break;\r
312 }\r
313\r
314 len = mifare_ultra_readblock(blockNo + i, dataout + 4 * i);\r
315 \r
316 if (len) {\r
317 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Read block %d error",i);\r
318 // if no blocks read - error out\r
319 if (i==0){\r
320 OnError(2);\r
321 return;\r
322 } else {\r
323 //stop at last successful read block and return what we got\r
324 break;\r
325 }\r
326 } else {\r
327 countblocks++;\r
328 }\r
329 }\r
330\r
331 len = mifare_ultra_halt();\r
332 if (len) {\r
333 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Halt error");\r
334 OnError(3);\r
335 return;\r
336 }\r
337\r
338 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) Dbprintf("Blocks read %d", countblocks);\r
339\r
340 countblocks *= 4;\r
341\r
342 cmd_send(CMD_ACK, 1, countblocks, BigBuf_max_traceLen(), 0, 0);\r
343 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
344 LEDsoff();\r
345 BigBuf_free();\r
346 set_tracing(FALSE);\r
347}\r
348\r
349//-----------------------------------------------------------------------------\r
350// Select, Authenticate, Write a MIFARE tag. \r
351// read block\r
352//-----------------------------------------------------------------------------\r
353void MifareWriteBlock(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
354{\r
355 // params\r
356 uint8_t blockNo = arg0;\r
357 uint8_t keyType = arg1;\r
358 uint64_t ui64Key = 0;\r
359 byte_t blockdata[16] = {0x00};\r
360\r
361 ui64Key = bytes_to_num(datain, 6);\r
362 memcpy(blockdata, datain + 10, 16);\r
363 \r
364 // variables\r
365 byte_t isOK = 0;\r
366 uint8_t uid[10] = {0x00};\r
367 uint32_t cuid = 0;\r
368 struct Crypto1State mpcs = {0, 0};\r
369 struct Crypto1State *pcs;\r
370 pcs = &mpcs;\r
371\r
372 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
373\r
374 clear_trace();\r
375 set_tracing(true);\r
376 \r
377 LED_A_ON();\r
378 LED_B_OFF();\r
379 LED_C_OFF();\r
380\r
381 while (true) {\r
382 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
383 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
384 break;\r
385 };\r
386\r
387 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
388 if (MF_DBGLEVEL >= 1) Dbprintf("Auth error");\r
389 break;\r
390 };\r
391 \r
392 if(mifare_classic_writeblock(pcs, cuid, blockNo, blockdata)) {\r
393 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
394 break;\r
395 };\r
396\r
397 if(mifare_classic_halt(pcs, cuid)) {\r
398 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
399 break;\r
400 };\r
401 \r
402 isOK = 1;\r
403 break;\r
404 }\r
405 \r
406 crypto1_destroy(pcs);\r
407 \r
408 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
409\r
410 cmd_send(CMD_ACK,isOK,0,0,0,0);\r
411\r
412 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
413 LEDsoff();\r
414 set_tracing(FALSE);\r
415}\r
416\r
417/* // Command not needed but left for future testing \r
418void MifareUWriteBlockCompat(uint8_t arg0, uint8_t *datain)\r
419{\r
420 uint8_t blockNo = arg0;\r
421 byte_t blockdata[16] = {0x00};\r
422\r
423 memcpy(blockdata, datain, 16);\r
424\r
425 uint8_t uid[10] = {0x00};\r
426\r
427 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
428\r
429 clear_trace();\r
430 set_tracing(true);\r
431 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
432\r
433 if(!iso14443a_select_card(uid, NULL, NULL, true, 0)) {\r
434 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
435 OnError(0);\r
436 return;\r
437 };\r
438\r
439 if(mifare_ultra_writeblock_compat(blockNo, blockdata)) {\r
440 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
441 OnError(0);\r
442 return; };\r
443\r
444 if(mifare_ultra_halt()) {\r
445 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
446 OnError(0);\r
447 return;\r
448 };\r
449\r
450 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
451\r
452 cmd_send(CMD_ACK,1,0,0,0,0);\r
453 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
454 LEDsoff();\r
455}\r
456*/\r
457\r
458// Arg0 : Block to write to.\r
459// Arg1 : 0 = use no authentication.\r
460// 1 = use 0x1A authentication.\r
461// 2 = use 0x1B authentication.\r
462// datain : 4 first bytes is data to be written.\r
463// : 4/16 next bytes is authentication key.\r
464void MifareUWriteBlock(uint8_t arg0, uint8_t arg1, uint8_t *datain)\r
465{\r
466 uint8_t blockNo = arg0;\r
467 bool useKey = (arg1 == 1); //UL_C\r
468 bool usePwd = (arg1 == 2); //UL_EV1/NTAG\r
469 byte_t blockdata[4] = {0x00};\r
470\r
471 memcpy(blockdata, datain,4);\r
472 \r
473 LEDsoff();\r
474 LED_A_ON();\r
475 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
476\r
477 clear_trace();\r
478 set_tracing(true);\r
479 \r
480 if(!iso14443a_select_card(NULL, NULL, NULL, true, 0)) {\r
481 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
482 OnError(0);\r
483 return;\r
484 };\r
485\r
486 // UL-C authentication\r
487 if ( useKey ) {\r
488 uint8_t key[16] = {0x00}; \r
489 memcpy(key, datain+4, sizeof(key) );\r
490\r
491 if ( !mifare_ultra_auth(key) ) {\r
492 OnError(1);\r
493 return; \r
494 }\r
495 }\r
496 \r
497 // UL-EV1 / NTAG authentication\r
498 if (usePwd) { \r
499 uint8_t pwd[4] = {0x00};\r
500 memcpy(pwd, datain+4, 4);\r
501 uint8_t pack[4] = {0,0,0,0};\r
502 if (!mifare_ul_ev1_auth(pwd, pack)) {\r
503 OnError(1);\r
504 return; \r
505 }\r
506 }\r
507 \r
508 if(mifare_ultra_writeblock(blockNo, blockdata)) {\r
509 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
510 OnError(0);\r
511 return;\r
512 };\r
513\r
514 if(mifare_ultra_halt()) {\r
515 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
516 OnError(0);\r
517 return;\r
518 };\r
519\r
520 if (MF_DBGLEVEL >= 2) DbpString("WRITE BLOCK FINISHED");\r
521\r
522 cmd_send(CMD_ACK,1,0,0,0,0);\r
523 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
524 LEDsoff();\r
525 set_tracing(FALSE);\r
526}\r
527\r
528void MifareUSetPwd(uint8_t arg0, uint8_t *datain){\r
529 \r
530 uint8_t pwd[16] = {0x00};\r
531 byte_t blockdata[4] = {0x00};\r
532 \r
533 memcpy(pwd, datain, 16);\r
534 \r
535 LED_A_ON(); LED_B_OFF(); LED_C_OFF();\r
536 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
537\r
538 clear_trace();\r
539 set_tracing(true);\r
540 \r
541 if(!iso14443a_select_card(NULL, NULL, NULL, true, 0)) {\r
542 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
543 OnError(0);\r
544 return;\r
545 };\r
546\r
547 blockdata[0] = pwd[7];\r
548 blockdata[1] = pwd[6];\r
549 blockdata[2] = pwd[5];\r
550 blockdata[3] = pwd[4];\r
551 if(mifare_ultra_writeblock( 44, blockdata)) {\r
552 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
553 OnError(44);\r
554 return;\r
555 };\r
556\r
557 blockdata[0] = pwd[3];\r
558 blockdata[1] = pwd[2];\r
559 blockdata[2] = pwd[1];\r
560 blockdata[3] = pwd[0];\r
561 if(mifare_ultra_writeblock( 45, blockdata)) {\r
562 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
563 OnError(45);\r
564 return;\r
565 };\r
566\r
567 blockdata[0] = pwd[15];\r
568 blockdata[1] = pwd[14];\r
569 blockdata[2] = pwd[13];\r
570 blockdata[3] = pwd[12];\r
571 if(mifare_ultra_writeblock( 46, blockdata)) {\r
572 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
573 OnError(46);\r
574 return;\r
575 };\r
576\r
577 blockdata[0] = pwd[11];\r
578 blockdata[1] = pwd[10];\r
579 blockdata[2] = pwd[9];\r
580 blockdata[3] = pwd[8];\r
581 if(mifare_ultra_writeblock( 47, blockdata)) {\r
582 if (MF_DBGLEVEL >= 1) Dbprintf("Write block error");\r
583 OnError(47);\r
584 return;\r
585 }; \r
586\r
587 if(mifare_ultra_halt()) {\r
588 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
589 OnError(0);\r
590 return;\r
591 };\r
592\r
593 cmd_send(CMD_ACK,1,0,0,0,0);\r
594 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
595 LEDsoff();\r
596 set_tracing(FALSE);\r
597}\r
598\r
599// Return 1 if the nonce is invalid else return 0\r
600int valid_nonce(uint32_t Nt, uint32_t NtEnc, uint32_t Ks1, uint8_t *parity) {\r
601 return ((oddparity8((Nt >> 24) & 0xFF) == ((parity[0]) ^ oddparity8((NtEnc >> 24) & 0xFF) ^ BIT(Ks1,16))) & \\r
602 (oddparity8((Nt >> 16) & 0xFF) == ((parity[1]) ^ oddparity8((NtEnc >> 16) & 0xFF) ^ BIT(Ks1,8))) & \\r
603 (oddparity8((Nt >> 8) & 0xFF) == ((parity[2]) ^ oddparity8((NtEnc >> 8) & 0xFF) ^ BIT(Ks1,0)))) ? 1 : 0;\r
604}\r
605\r
606\r
607//-----------------------------------------------------------------------------\r
608// acquire encrypted nonces in order to perform the attack described in\r
609// Carlo Meijer, Roel Verdult, "Ciphertext-only Cryptanalysis on Hardened\r
610// Mifare Classic Cards" in Proceedings of the 22nd ACM SIGSAC Conference on \r
611// Computer and Communications Security, 2015\r
612//-----------------------------------------------------------------------------\r
613#define AUTHENTICATION_TIMEOUT 848 //848 // card times out 1ms after wrong authentication (according to NXP documentation)\r
614#define PRE_AUTHENTICATION_LEADTIME 400 // some (non standard) cards need a pause after select before they are ready for first authentication \r
615\r
616void MifareAcquireEncryptedNonces(uint32_t arg0, uint32_t arg1, uint32_t flags, uint8_t *datain)\r
617{\r
618 uint64_t ui64Key = 0;\r
619 uint8_t uid[10] = {0x00};\r
620 uint32_t cuid = 0;\r
621 uint8_t cascade_levels = 0;\r
622 struct Crypto1State mpcs = {0, 0};\r
623 struct Crypto1State *pcs;\r
624 pcs = &mpcs;\r
625 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE] = {0x00};\r
626 int16_t isOK = 0;\r
627 uint8_t par_enc[1] = {0x00};\r
628 uint8_t nt_par_enc = 0;\r
629 uint8_t buf[USB_CMD_DATA_SIZE] = {0x00};\r
630 uint32_t timeout = 0;\r
631 \r
632 uint8_t blockNo = arg0 & 0xff;\r
633 uint8_t keyType = (arg0 >> 8) & 0xff;\r
634 uint8_t targetBlockNo = arg1 & 0xff;\r
635 uint8_t targetKeyType = (arg1 >> 8) & 0xff;\r
636 ui64Key = bytes_to_num(datain, 6);\r
637 bool initialize = flags & 0x0001;\r
638 bool slow = flags & 0x0002;\r
639 bool field_off = flags & 0x0004;\r
640 \r
641 LED_A_ON();\r
642 LED_C_OFF();\r
643\r
644 BigBuf_free(); BigBuf_Clear_ext(false); \r
645 clear_trace();\r
646 set_tracing(FALSE);\r
647 \r
648 if (initialize) {\r
649 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
650 }\r
651 \r
652 LED_C_ON();\r
653 \r
654 uint8_t dummy_answer = 0; \r
655 uint16_t num_nonces = 0;\r
656 bool have_uid = false;\r
657 for (uint16_t i = 0; i <= USB_CMD_DATA_SIZE - 9; ) {\r
658\r
659 // Test if the action was cancelled\r
660 if(BUTTON_PRESS()) {\r
661 isOK = 2;\r
662 field_off = true;\r
663 break;\r
664 }\r
665\r
666 if (!have_uid) { // need a full select cycle to get the uid first\r
667 iso14a_card_select_t card_info; \r
668 if(!iso14443a_select_card(uid, &card_info, &cuid, true, 0)) {\r
669 if (MF_DBGLEVEL >= 1) Dbprintf("AcquireNonces: Can't select card (ALL)");\r
670 continue;\r
671 }\r
672 switch (card_info.uidlen) {\r
673 case 4 : cascade_levels = 1; break;\r
674 case 7 : cascade_levels = 2; break;\r
675 case 10: cascade_levels = 3; break;\r
676 default: break;\r
677 }\r
678 have_uid = true; \r
679 } else { // no need for anticollision. We can directly select the card\r
680 if(!iso14443a_select_card(uid, NULL, NULL, false, cascade_levels)) {\r
681 if (MF_DBGLEVEL >= 1) Dbprintf("AcquireNonces: Can't select card (UID)");\r
682 continue;\r
683 }\r
684 }\r
685 \r
686 if (slow) {\r
687 timeout = GetCountSspClk() + PRE_AUTHENTICATION_LEADTIME;\r
688 while(GetCountSspClk() < timeout);\r
689 }\r
690\r
691 uint32_t nt1;\r
692 if (mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, NULL)) {\r
693 if (MF_DBGLEVEL >= 1) Dbprintf("AcquireNonces: Auth1 error");\r
694 continue;\r
695 }\r
696\r
697 // nested authentication\r
698 uint16_t len = mifare_sendcmd_short(pcs, AUTH_NESTED, 0x60 + (targetKeyType & 0x01), targetBlockNo, receivedAnswer, par_enc, NULL);\r
699 if (len != 4) {\r
700 if (MF_DBGLEVEL >= 1) Dbprintf("AcquireNonces: Auth2 error len=%d", len);\r
701 continue;\r
702 }\r
703 \r
704 // send a dummy byte as reader response in order to trigger the cards authentication timeout\r
705 ReaderTransmit(&dummy_answer, 1, NULL);\r
706 timeout = GetCountSspClk() + AUTHENTICATION_TIMEOUT;\r
707 \r
708 num_nonces++;\r
709 if (num_nonces % 2) {\r
710 memcpy(buf+i, receivedAnswer, 4);\r
711 nt_par_enc = par_enc[0] & 0xf0;\r
712 } else {\r
713 nt_par_enc |= par_enc[0] >> 4;\r
714 memcpy(buf+i+4, receivedAnswer, 4);\r
715 memcpy(buf+i+8, &nt_par_enc, 1);\r
716 i += 9;\r
717 }\r
718 // wait for the card to become ready again\r
719 while(GetCountSspClk() < timeout); \r
720 }\r
721\r
722 LED_C_OFF();\r
723 crypto1_destroy(pcs); \r
724 LED_B_ON();\r
725 cmd_send(CMD_ACK, isOK, cuid, num_nonces, buf, sizeof(buf));\r
726 LED_B_OFF();\r
727\r
728 if (MF_DBGLEVEL >= 3) DbpString("AcquireEncryptedNonces finished");\r
729\r
730 if (field_off) {\r
731 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
732 LEDsoff();\r
733 set_tracing(FALSE);\r
734 }\r
735}\r
736\r
737\r
738//-----------------------------------------------------------------------------\r
739// MIFARE nested authentication. \r
740// \r
741//-----------------------------------------------------------------------------\r
742void MifareNested(uint32_t arg0, uint32_t arg1, uint32_t calibrate, uint8_t *datain)\r
743{\r
744 // params\r
745 uint8_t blockNo = arg0 & 0xff;\r
746 uint8_t keyType = (arg0 >> 8) & 0xff;\r
747 uint8_t targetBlockNo = arg1 & 0xff;\r
748 uint8_t targetKeyType = (arg1 >> 8) & 0xff;\r
749 uint64_t ui64Key = 0;\r
750\r
751 ui64Key = bytes_to_num(datain, 6);\r
752 \r
753 // variables\r
754 uint16_t rtr, i, j, len;\r
755 uint16_t davg = 0;\r
756 static uint16_t dmin, dmax;\r
757 uint8_t uid[10] = {0x00};\r
758 uint32_t cuid = 0, nt1, nt2, nttmp, nttest, ks1;\r
759 uint8_t par[1] = {0x00};\r
760 uint32_t target_nt[2] = {0x00}, target_ks[2] = {0x00};\r
761 \r
762 uint8_t par_array[4] = {0x00};\r
763 uint16_t ncount = 0;\r
764 struct Crypto1State mpcs = {0, 0};\r
765 struct Crypto1State *pcs;\r
766 pcs = &mpcs;\r
767 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE] = {0x00};\r
768\r
769 uint32_t auth1_time, auth2_time;\r
770 static uint16_t delta_time = 0;\r
771\r
772 LED_A_ON();\r
773 LED_C_OFF();\r
774 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
775\r
776 // free eventually allocated BigBuf memory\r
777 BigBuf_free(); BigBuf_Clear_ext(false);\r
778 \r
779 if (calibrate) clear_trace();\r
780 set_tracing(true);\r
781\r
782 // statistics on nonce distance\r
783 int16_t isOK = 0;\r
784 #define NESTED_MAX_TRIES 12\r
785 uint16_t unsuccessfull_tries = 0;\r
786 if (calibrate) { // for first call only. Otherwise reuse previous calibration\r
787 LED_B_ON();\r
788 WDT_HIT();\r
789\r
790 davg = dmax = 0;\r
791 dmin = 2000;\r
792 delta_time = 0;\r
793 \r
794 for (rtr = 0; rtr < 17; rtr++) {\r
795\r
796 // Test if the action was cancelled\r
797 if(BUTTON_PRESS()) {\r
798 isOK = -2;\r
799 break;\r
800 }\r
801\r
802 // prepare next select. No need to power down the card.\r
803 if(mifare_classic_halt(pcs, cuid)) {\r
804 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
805 rtr--;\r
806 continue;\r
807 }\r
808\r
809 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
810 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
811 rtr--;\r
812 continue;\r
813 };\r
814\r
815 auth1_time = 0;\r
816 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
817 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
818 rtr--;\r
819 continue;\r
820 };\r
821 auth2_time = (delta_time) ? auth1_time + delta_time : 0;\r
822\r
823 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_NESTED, &nt2, &auth2_time)) {\r
824 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error");\r
825 rtr--;\r
826 continue;\r
827 };\r
828\r
829 nttmp = prng_successor(nt1, 100); //NXP Mifare is typical around 840,but for some unlicensed/compatible mifare card this can be 160\r
830 for (i = 101; i < 1200; i++) {\r
831 nttmp = prng_successor(nttmp, 1);\r
832 if (nttmp == nt2) break;\r
833 }\r
834\r
835 if (i != 1200) {\r
836 if (rtr != 0) {\r
837 davg += i;\r
838 dmin = MIN(dmin, i);\r
839 dmax = MAX(dmax, i);\r
840 }\r
841 else {\r
842 delta_time = auth2_time - auth1_time + 32; // allow some slack for proper timing\r
843 }\r
844 if (MF_DBGLEVEL >= 3) Dbprintf("Nested: calibrating... ntdist=%d", i);\r
845 } else {\r
846 unsuccessfull_tries++;\r
847 if (unsuccessfull_tries > NESTED_MAX_TRIES) { // card isn't vulnerable to nested attack (random numbers are not predictable)\r
848 isOK = -3;\r
849 }\r
850 }\r
851 }\r
852\r
853 davg = (davg + (rtr - 1)/2) / (rtr - 1);\r
854 \r
855 if (MF_DBGLEVEL >= 3) Dbprintf("rtr=%d isOK=%d min=%d max=%d avg=%d, delta_time=%d", rtr, isOK, dmin, dmax, davg, delta_time);\r
856\r
857 dmin = davg - 2;\r
858 dmax = davg + 2;\r
859 \r
860 LED_B_OFF();\r
861 }\r
862// ------------------------------------------------------------------------------------------------- \r
863 \r
864 LED_C_ON();\r
865\r
866 // get crypted nonces for target sector\r
867 for(i=0; i < 2 && !isOK; i++) { // look for exactly two different nonces\r
868\r
869 target_nt[i] = 0;\r
870 while(target_nt[i] == 0) { // continue until we have an unambiguous nonce\r
871 \r
872 // prepare next select. No need to power down the card.\r
873 if(mifare_classic_halt(pcs, cuid)) {\r
874 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
875 continue;\r
876 }\r
877\r
878 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
879 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
880 continue;\r
881 };\r
882 \r
883 auth1_time = 0;\r
884 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
885 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
886 continue;\r
887 };\r
888\r
889 // nested authentication\r
890 auth2_time = auth1_time + delta_time;\r
891\r
892 len = mifare_sendcmd_short(pcs, AUTH_NESTED, 0x60 + (targetKeyType & 0x01), targetBlockNo, receivedAnswer, par, &auth2_time);\r
893 if (len != 4) {\r
894 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error len=%d", len);\r
895 continue;\r
896 };\r
897 \r
898 nt2 = bytes_to_num(receivedAnswer, 4); \r
899 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: Testing nt1=%08x nt2enc=%08x nt2par=%02x", i+1, nt1, nt2, par[0]);\r
900 \r
901 // Parity validity check\r
902// for (j = 0; j < 4; j++) {\r
903// par_array[j] = (oddparity8(receivedAnswer[j]) != ((par[0] >> (7-j)) & 0x01));\r
904// }\r
905 par_array[0] = (oddparity8(receivedAnswer[0]) != ((par[0] >> (7-0)) & 0x01));\r
906 par_array[1] = (oddparity8(receivedAnswer[1]) != ((par[0] >> (7-1)) & 0x01));\r
907 par_array[2] = (oddparity8(receivedAnswer[2]) != ((par[0] >> (7-2)) & 0x01));\r
908 par_array[3] = (oddparity8(receivedAnswer[3]) != ((par[0] >> (7-3)) & 0x01));\r
909 \r
910 ncount = 0;\r
911 nttest = prng_successor(nt1, dmin - 1);\r
912 for (j = dmin; j < dmax + 1; j++) {\r
913 nttest = prng_successor(nttest, 1);\r
914 ks1 = nt2 ^ nttest;\r
915\r
916 if (valid_nonce(nttest, nt2, ks1, par_array)){\r
917 if (ncount > 0) { // we are only interested in disambiguous nonces, try again\r
918 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (ambigous), ntdist=%d", i+1, j);\r
919 target_nt[i] = 0;\r
920 break;\r
921 }\r
922 target_nt[i] = nttest;\r
923 target_ks[i] = ks1;\r
924 ncount++;\r
925 if (i == 1 && target_nt[1] == target_nt[0]) { // we need two different nonces\r
926 target_nt[i] = 0;\r
927 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#2: dismissed (= nonce#1), ntdist=%d", j);\r
928 break;\r
929 }\r
930 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: valid, ntdist=%d", i+1, j);\r
931 }\r
932 }\r
933 if (target_nt[i] == 0 && j == dmax+1 && MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (all invalid)", i+1);\r
934 }\r
935 }\r
936\r
937 LED_C_OFF();\r
938 \r
939 crypto1_destroy(pcs);\r
940 \r
941 byte_t buf[4 + 4 * 4] = {0};\r
942 memcpy(buf, &cuid, 4);\r
943 memcpy(buf+4, &target_nt[0], 4);\r
944 memcpy(buf+8, &target_ks[0], 4);\r
945 memcpy(buf+12, &target_nt[1], 4);\r
946 memcpy(buf+16, &target_ks[1], 4);\r
947 \r
948 LED_B_ON();\r
949 cmd_send(CMD_ACK, isOK, 0, targetBlockNo + (targetKeyType * 0x100), buf, sizeof(buf));\r
950 LED_B_OFF();\r
951\r
952 if (MF_DBGLEVEL >= 3) DbpString("NESTED FINISHED");\r
953\r
954 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
955 LEDsoff();\r
956 set_tracing(FALSE);\r
957}\r
958\r
959//-----------------------------------------------------------------------------\r
960// MIFARE check keys. key count up to 85. \r
961// \r
962//-----------------------------------------------------------------------------\r
963void MifareChkKeys(uint16_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain) {\r
964 uint8_t blockNo = arg0 & 0xff;\r
965 uint8_t keyType = (arg0 >> 8) & 0xff;\r
966 bool clearTrace = arg1;\r
967 uint8_t keyCount = arg2;\r
968 uint64_t ui64Key = 0;\r
969 \r
970 bool have_uid = FALSE;\r
971 uint8_t cascade_levels = 0;\r
972 uint32_t timeout = 0;\r
973 \r
974 int i;\r
975 byte_t isOK = 0;\r
976 uint8_t uid[10] = {0x00};\r
977 uint32_t cuid = 0;\r
978 struct Crypto1State mpcs = {0, 0};\r
979 struct Crypto1State *pcs;\r
980 pcs = &mpcs;\r
981 \r
982 // save old debuglevel, and tempory turn off dbg printing. speedissues.\r
983 int OLD_MF_DBGLEVEL = MF_DBGLEVEL; \r
984 MF_DBGLEVEL = MF_DBG_NONE;\r
985 \r
986 LEDsoff();\r
987 LED_A_ON();\r
988 \r
989 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
990\r
991 if (clearTrace) \r
992 clear_trace();\r
993 \r
994 set_tracing(TRUE);\r
995 \r
996 for (i = 0; i < keyCount; ++i) {\r
997\r
998 //mifare_classic_halt(pcs, cuid);\r
999\r
1000 // this part is from Piwi's faster nonce collecting part in Hardnested.\r
1001 if (!have_uid) { // need a full select cycle to get the uid first\r
1002 iso14a_card_select_t card_info; \r
1003 if(!iso14443a_select_card(uid, &card_info, &cuid, true, 0)) {\r
1004 if (MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Can't select card (ALL)");\r
1005 break;\r
1006 }\r
1007 switch (card_info.uidlen) {\r
1008 case 4 : cascade_levels = 1; break;\r
1009 case 7 : cascade_levels = 2; break;\r
1010 case 10: cascade_levels = 3; break;\r
1011 default: break;\r
1012 }\r
1013 have_uid = TRUE; \r
1014 } else { // no need for anticollision. We can directly select the card\r
1015 if(!iso14443a_select_card(uid, NULL, NULL, false, cascade_levels)) {\r
1016 if (MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Can't select card (UID)");\r
1017 continue;\r
1018 }\r
1019 }\r
1020 \r
1021 ui64Key = bytes_to_num(datain + i * 6, 6);\r
1022 \r
1023 if (mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
1024\r
1025 uint8_t dummy_answer = 0;\r
1026 ReaderTransmit(&dummy_answer, 1, NULL);\r
1027 timeout = GetCountSspClk() + AUTHENTICATION_TIMEOUT;\r
1028 \r
1029 // wait for the card to become ready again\r
1030 while(GetCountSspClk() < timeout);\r
1031 \r
1032 continue;\r
1033 }\r
1034 isOK = 1;\r
1035 break;\r
1036 }\r
1037 \r
1038 LED_B_ON();\r
1039 cmd_send(CMD_ACK, isOK, 0, 0, datain + i * 6, 6);\r
1040\r
1041 // restore debug level\r
1042 MF_DBGLEVEL = OLD_MF_DBGLEVEL; \r
1043 \r
1044 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1045 LEDsoff();\r
1046 set_tracing(FALSE);\r
1047 crypto1_destroy(pcs);\r
1048}\r
1049\r
1050//-----------------------------------------------------------------------------\r
1051// MIFARE commands set debug level\r
1052// \r
1053//-----------------------------------------------------------------------------\r
1054void MifareSetDbgLvl(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1055 MF_DBGLEVEL = arg0;\r
1056 Dbprintf("Debug level: %d", MF_DBGLEVEL);\r
1057}\r
1058\r
1059//-----------------------------------------------------------------------------\r
1060// Work with emulator memory\r
1061// \r
1062// Note: we call FpgaDownloadAndGo(FPGA_BITSTREAM_HF) here although FPGA is not\r
1063// involved in dealing with emulator memory. But if it is called later, it might\r
1064// destroy the Emulator Memory.\r
1065//-----------------------------------------------------------------------------\r
1066\r
1067void MifareEMemClr(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1068 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);\r
1069 emlClearMem();\r
1070}\r
1071\r
1072void MifareEMemSet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1073 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);\r
1074 if (arg2==0) arg2 = 16; // backwards compat... default bytewidth\r
1075 emlSetMem_xt(datain, arg0, arg1, arg2); // data, block num, blocks count, block byte width\r
1076}\r
1077\r
1078void MifareEMemGet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1079 FpgaDownloadAndGo(FPGA_BITSTREAM_HF);\r
1080 byte_t buf[USB_CMD_DATA_SIZE] = {0x00};\r
1081 emlGetMem(buf, arg0, arg1); // data, block num, blocks count (max 4)\r
1082\r
1083 LED_B_ON();\r
1084 cmd_send(CMD_ACK,arg0,arg1,0,buf,USB_CMD_DATA_SIZE);\r
1085 LED_B_OFF();\r
1086}\r
1087\r
1088//-----------------------------------------------------------------------------\r
1089// Load a card into the emulator memory\r
1090// \r
1091//-----------------------------------------------------------------------------\r
1092void MifareECardLoad(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1093 uint8_t numSectors = arg0;\r
1094 uint8_t keyType = arg1;\r
1095 uint64_t ui64Key = 0;\r
1096 uint32_t cuid = 0;\r
1097 struct Crypto1State mpcs = {0, 0};\r
1098 struct Crypto1State *pcs;\r
1099 pcs = &mpcs;\r
1100\r
1101 // variables\r
1102 byte_t dataoutbuf[16] = {0x00};\r
1103 byte_t dataoutbuf2[16] = {0x00};\r
1104 uint8_t uid[10] = {0x00};\r
1105\r
1106 LED_A_ON();\r
1107 LED_B_OFF();\r
1108 LED_C_OFF();\r
1109 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1110 \r
1111 clear_trace();\r
1112 set_tracing(TRUE);\r
1113 \r
1114 bool isOK = true;\r
1115\r
1116 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
1117 isOK = false;\r
1118 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
1119 }\r
1120 \r
1121 for (uint8_t sectorNo = 0; isOK && sectorNo < numSectors; sectorNo++) {\r
1122 ui64Key = emlGetKey(sectorNo, keyType);\r
1123 if (sectorNo == 0){\r
1124 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_FIRST)) {\r
1125 isOK = false;\r
1126 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth error", sectorNo);\r
1127 break;\r
1128 }\r
1129 } else {\r
1130 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_NESTED)) {\r
1131 isOK = false;\r
1132 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth nested error", sectorNo);\r
1133 break;\r
1134 }\r
1135 }\r
1136 \r
1137 for (uint8_t blockNo = 0; isOK && blockNo < NumBlocksPerSector(sectorNo); blockNo++) {\r
1138 if(isOK && mifare_classic_readblock(pcs, cuid, FirstBlockOfSector(sectorNo) + blockNo, dataoutbuf)) {\r
1139 isOK = false;\r
1140 if (MF_DBGLEVEL >= 1) Dbprintf("Error reading sector %2d block %2d", sectorNo, blockNo);\r
1141 break;\r
1142 }\r
1143 if (isOK) {\r
1144 if (blockNo < NumBlocksPerSector(sectorNo) - 1) {\r
1145 emlSetMem(dataoutbuf, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
1146 } else { // sector trailer, keep the keys, set only the AC\r
1147 emlGetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
1148 memcpy(&dataoutbuf2[6], &dataoutbuf[6], 4);\r
1149 emlSetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
1150 }\r
1151 }\r
1152 }\r
1153\r
1154 }\r
1155\r
1156 if(mifare_classic_halt(pcs, cuid))\r
1157 if (MF_DBGLEVEL >= 1)\r
1158 Dbprintf("Halt error");\r
1159\r
1160 // ----------------------------- crypto1 destroy\r
1161 crypto1_destroy(pcs);\r
1162\r
1163 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1164 LEDsoff();\r
1165 \r
1166 if (MF_DBGLEVEL >= 2) DbpString("EMUL FILL SECTORS FINISHED");\r
1167\r
1168 set_tracing(FALSE);\r
1169}\r
1170\r
1171\r
1172//-----------------------------------------------------------------------------\r
1173// Work with "magic Chinese" card (email him: ouyangweidaxian@live.cn)\r
1174// \r
1175// PARAMS - workFlags\r
1176// bit 0 - need get UID\r
1177// bit 1 - need wupC\r
1178// bit 2 - need HALT after sequence\r
1179// bit 3 - need turn on FPGA before sequence\r
1180// bit 4 - need turn off FPGA\r
1181// bit 5 - need to set datain instead of issuing USB reply (called via ARM for StandAloneMode14a)\r
1182// bit 6 - wipe tag.\r
1183//-----------------------------------------------------------------------------\r
1184// magic uid card generation 1 commands\r
1185uint8_t wupC1[] = { MIFARE_MAGICWUPC1 }; \r
1186uint8_t wupC2[] = { MIFARE_MAGICWUPC2 }; \r
1187uint8_t wipeC[] = { MIFARE_MAGICWIPEC }; \r
1188 \r
1189void MifareCSetBlock(uint32_t arg0, uint32_t arg1, uint8_t *datain){\r
1190 \r
1191 // params\r
1192 uint8_t workFlags = arg0;\r
1193 uint8_t blockNo = arg1;\r
1194 \r
1195 // variables\r
1196 bool isOK = false; //assume we will get an error\r
1197 uint8_t errormsg = 0x00;\r
1198 uint8_t uid[10] = {0x00};\r
1199 uint8_t data[18] = {0x00};\r
1200 uint32_t cuid = 0;\r
1201 \r
1202 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE] = {0x00};\r
1203 uint8_t receivedAnswerPar[MAX_MIFARE_PARITY_SIZE] = {0x00};\r
1204\r
1205 if (workFlags & MAGIC_INIT) {\r
1206 LED_A_ON();\r
1207 LED_B_OFF();\r
1208 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1209 clear_trace();\r
1210 set_tracing(TRUE);\r
1211 }\r
1212\r
1213 //loop doesn't loop just breaks out if error\r
1214 while (true) {\r
1215 // read UID and return to client with write\r
1216 if (workFlags & MAGIC_UID) {\r
1217 if(!iso14443a_select_card(uid, NULL, &cuid, true, 0)) {\r
1218 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card");\r
1219 errormsg = MAGIC_UID;\r
1220 }\r
1221 mifare_classic_halt_ex(NULL);\r
1222 break;\r
1223 }\r
1224 \r
1225 // wipe tag, fill it with zeros\r
1226 if (workFlags & MAGIC_WIPE){\r
1227 ReaderTransmitBitsPar(wupC1, 7, NULL, NULL);\r
1228 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1229 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wupC1 error");\r
1230 errormsg = MAGIC_WIPE;\r
1231 break;\r
1232 }\r
1233\r
1234 ReaderTransmit(wipeC, sizeof(wipeC), NULL);\r
1235 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1236 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wipeC error");\r
1237 errormsg = MAGIC_WIPE;\r
1238 break;\r
1239 }\r
1240\r
1241 mifare_classic_halt_ex(NULL);\r
1242 } \r
1243\r
1244 // write block\r
1245 if (workFlags & MAGIC_WUPC) {\r
1246 ReaderTransmitBitsPar(wupC1, 7, NULL, NULL);\r
1247 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1248 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wupC1 error");\r
1249 errormsg = MAGIC_WUPC;\r
1250 break;\r
1251 }\r
1252\r
1253 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
1254 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1255 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wupC2 error");\r
1256 errormsg = MAGIC_WUPC;\r
1257 break;\r
1258 }\r
1259 }\r
1260\r
1261 if ((mifare_sendcmd_short(NULL, 0, ISO14443A_CMD_WRITEBLOCK, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 1) || (receivedAnswer[0] != 0x0a)) {\r
1262 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("write block send command error");\r
1263 errormsg = 4;\r
1264 break;\r
1265 }\r
1266 \r
1267 memcpy(data, datain, 16);\r
1268 AppendCrc14443a(data, 16);\r
1269 \r
1270 ReaderTransmit(data, sizeof(data), NULL);\r
1271 if ((ReaderReceive(receivedAnswer, receivedAnswerPar) != 1) || (receivedAnswer[0] != 0x0a)) {\r
1272 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("write block send data error");\r
1273 errormsg = 0;\r
1274 break;\r
1275 } \r
1276 \r
1277 if (workFlags & MAGIC_OFF) \r
1278 mifare_classic_halt_ex(NULL);\r
1279 \r
1280 isOK = true;\r
1281 break;\r
1282\r
1283 } // end while \r
1284\r
1285 if (isOK )\r
1286 cmd_send(CMD_ACK,1,0,0,uid,sizeof(uid));\r
1287 else\r
1288 OnErrorMagic(errormsg);\r
1289\r
1290 if (workFlags & MAGIC_OFF)\r
1291 OnSuccessMagic();\r
1292}\r
1293\r
1294void MifareCGetBlock(uint32_t arg0, uint32_t arg1, uint8_t *datain){\r
1295 \r
1296 uint8_t workFlags = arg0;\r
1297 uint8_t blockNo = arg1;\r
1298 uint8_t errormsg = 0x00;\r
1299 bool isOK = false; //assume we will get an error\r
1300 \r
1301 // variables\r
1302 uint8_t data[MAX_MIFARE_FRAME_SIZE];\r
1303 uint8_t receivedAnswer[MAX_MIFARE_FRAME_SIZE] = {0x00};\r
1304 uint8_t receivedAnswerPar[MAX_MIFARE_PARITY_SIZE] = {0x00};\r
1305 \r
1306 memset(data, 0x00, sizeof(data));\r
1307 \r
1308 if (workFlags & MAGIC_INIT) {\r
1309 LED_A_ON();\r
1310 LED_B_OFF();\r
1311 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN); \r
1312 clear_trace();\r
1313 set_tracing(TRUE);\r
1314 }\r
1315\r
1316 //loop doesn't loop just breaks out if error or done\r
1317 while (true) {\r
1318 if (workFlags & MAGIC_WUPC) {\r
1319 ReaderTransmitBitsPar(wupC1, 7, NULL, NULL);\r
1320 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1321 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wupC1 error");\r
1322 errormsg = MAGIC_WUPC;\r
1323 break;\r
1324 }\r
1325\r
1326 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
1327 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1328 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("wupC2 error");\r
1329 errormsg = MAGIC_WUPC;\r
1330 break;\r
1331 }\r
1332 }\r
1333\r
1334 // read block \r
1335 if ((mifare_sendcmd_short(NULL, 0, ISO14443A_CMD_READBLOCK, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 18)) {\r
1336 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("read block send command error");\r
1337 errormsg = 0;\r
1338 break;\r
1339 }\r
1340 \r
1341 memcpy(data, receivedAnswer, sizeof(data));\r
1342 \r
1343 // send HALT\r
1344 if (workFlags & MAGIC_HALT)\r
1345 mifare_classic_halt_ex(NULL);\r
1346\r
1347 isOK = true;\r
1348 break;\r
1349 }\r
1350 // if MAGIC_DATAIN, the data stays on device side.\r
1351 if (workFlags & MAGIC_DATAIN) {\r
1352 if (isOK)\r
1353 memcpy(datain, data, sizeof(data));\r
1354 } else {\r
1355 if (isOK) \r
1356 cmd_send(CMD_ACK,1,0,0,data,sizeof(data)); \r
1357 else \r
1358 OnErrorMagic(errormsg); \r
1359 }\r
1360 \r
1361 if (workFlags & MAGIC_OFF)\r
1362 OnSuccessMagic();\r
1363}\r
1364\r
1365void MifareCIdent(){\r
1366 \r
1367 // variables\r
1368 bool isOK = true; \r
1369 uint8_t receivedAnswer[1] = {0x00};\r
1370 uint8_t receivedAnswerPar[1] = {0x00};\r
1371\r
1372 ReaderTransmitBitsPar(wupC1, 7, NULL, NULL);\r
1373 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1374 isOK = false;\r
1375 }\r
1376\r
1377 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
1378 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1379 isOK = false;\r
1380 }\r
1381\r
1382 // removed the if, since some magic tags misbehavies and send an answer to it.\r
1383 mifare_classic_halt(NULL, 0);\r
1384 cmd_send(CMD_ACK,isOK,0,0,0,0);\r
1385}\r
1386\r
1387void OnSuccessMagic(){\r
1388 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1389 LEDsoff();\r
1390 set_tracing(FALSE); \r
1391}\r
1392void OnErrorMagic(uint8_t reason){\r
1393 // ACK, ISOK, reason,0,0,0\r
1394 cmd_send(CMD_ACK,0,reason,0,0,0);\r
1395 OnSuccessMagic();\r
1396}\r
1397//\r
1398// DESFIRE\r
1399//\r
1400void Mifare_DES_Auth1(uint8_t arg0, uint8_t *datain){\r
1401 byte_t dataout[12] = {0x00};\r
1402 uint8_t uid[10] = {0x00};\r
1403 uint32_t cuid = 0;\r
1404 \r
1405 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1406 clear_trace();\r
1407 set_tracing(true);\r
1408\r
1409 int len = iso14443a_select_card(uid, NULL, &cuid, true, 0);\r
1410 if(!len) {\r
1411 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Can't select card");\r
1412 OnError(1);\r
1413 return;\r
1414 };\r
1415\r
1416 if(mifare_desfire_des_auth1(cuid, dataout)){\r
1417 if (MF_DBGLEVEL >= MF_DBG_ERROR) Dbprintf("Authentication part1: Fail.");\r
1418 OnError(4);\r
1419 return;\r
1420 }\r
1421\r
1422 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) DbpString("AUTH 1 FINISHED");\r
1423 cmd_send(CMD_ACK, 1, cuid, 0, dataout, sizeof(dataout));\r
1424}\r
1425\r
1426void Mifare_DES_Auth2(uint32_t arg0, uint8_t *datain){\r
1427 uint32_t cuid = arg0;\r
1428 uint8_t key[16] = {0x00};\r
1429 byte_t dataout[12] = {0x00};\r
1430 byte_t isOK = 0;\r
1431 \r
1432 memcpy(key, datain, 16);\r
1433 \r
1434 isOK = mifare_desfire_des_auth2(cuid, key, dataout);\r
1435 \r
1436 if( isOK) {\r
1437 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) Dbprintf("Authentication part2: Failed"); \r
1438 OnError(4);\r
1439 return;\r
1440 }\r
1441\r
1442 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) DbpString("AUTH 2 FINISHED");\r
1443\r
1444 cmd_send(CMD_ACK, isOK, 0, 0, dataout, sizeof(dataout));\r
1445 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1446 LEDsoff();\r
1447 set_tracing(FALSE);\r
1448}
Impressum, Datenschutz