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