]> git.zerfleddert.de Git - proxmark3-svn/blame - armsrc/mifarecmd.c
Merge branch 'master' of https://github.com/holiman/proxmark3
[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
baeaf579 44 iso14a_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
101 iso14a_clear_trace();\r
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
787b5bd8 165 iso14a_clear_trace();\r
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
baeaf579 216 iso14a_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
279 iso14a_clear_trace();\r
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
d19929cb 353 iso14a_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
7cc204bf 414 iso14a_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
baeaf579 461 iso14a_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
6a1f2d82 532 uint8_t* receivedAnswer = get_bigbufptr_recvrespbuf();\r
8556b852 533\r
9492e0b0 534 uint32_t auth1_time, auth2_time;\r
535 static uint16_t delta_time;\r
536\r
8556b852 537 // clear trace\r
d19929cb 538 iso14a_clear_trace();\r
9492e0b0 539 iso14a_set_tracing(false);\r
8556b852 540 \r
7bc95e2e 541 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
542\r
543 LED_A_ON();\r
8556b852
M
544 LED_C_OFF();\r
545\r
8556b852 546\r
9492e0b0 547 // statistics on nonce distance\r
548 if (calibrate) { // for first call only. Otherwise reuse previous calibration\r
549 LED_B_ON();\r
3fe4ff4f 550 WDT_HIT();\r
8556b852 551\r
9492e0b0 552 davg = dmax = 0;\r
553 dmin = 2000;\r
554 delta_time = 0;\r
8556b852 555 \r
9492e0b0 556 for (rtr = 0; rtr < 17; rtr++) {\r
8556b852 557\r
9492e0b0 558 // prepare next select. No need to power down the card.\r
559 if(mifare_classic_halt(pcs, cuid)) {\r
560 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
561 rtr--;\r
562 continue;\r
563 }\r
564\r
565 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
566 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
567 rtr--;\r
568 continue;\r
569 };\r
570\r
571 auth1_time = 0;\r
572 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
573 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
574 rtr--;\r
575 continue;\r
576 };\r
577\r
578 if (delta_time) {\r
579 auth2_time = auth1_time + delta_time;\r
580 } else {\r
581 auth2_time = 0;\r
582 }\r
583 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_NESTED, &nt2, &auth2_time)) {\r
584 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error");\r
585 rtr--;\r
586 continue;\r
587 };\r
588\r
b19bd5d6 589 nttmp = prng_successor(nt1, 100); //NXP Mifare is typical around 840,but for some unlicensed/compatible mifare card this can be 160\r
590 for (i = 101; i < 1200; i++) {\r
9492e0b0 591 nttmp = prng_successor(nttmp, 1);\r
592 if (nttmp == nt2) break;\r
593 }\r
594\r
595 if (i != 1200) {\r
596 if (rtr != 0) {\r
597 davg += i;\r
598 dmin = MIN(dmin, i);\r
599 dmax = MAX(dmax, i);\r
600 }\r
601 else {\r
602 delta_time = auth2_time - auth1_time + 32; // allow some slack for proper timing\r
603 }\r
604 if (MF_DBGLEVEL >= 3) Dbprintf("Nested: calibrating... ntdist=%d", i);\r
605 }\r
8556b852
M
606 }\r
607 \r
9492e0b0 608 if (rtr <= 1) return;\r
8556b852 609\r
9492e0b0 610 davg = (davg + (rtr - 1)/2) / (rtr - 1);\r
611 \r
612 if (MF_DBGLEVEL >= 3) Dbprintf("min=%d max=%d avg=%d, delta_time=%d", dmin, dmax, davg, delta_time);\r
8556b852 613\r
9492e0b0 614 dmin = davg - 2;\r
615 dmax = davg + 2;\r
616 \r
617 LED_B_OFF();\r
618 \r
619 }\r
8556b852
M
620// ------------------------------------------------------------------------------------------------- \r
621 \r
622 LED_C_ON();\r
623\r
624 // get crypted nonces for target sector\r
9492e0b0 625 for(i=0; i < 2; i++) { // look for exactly two different nonces\r
8556b852 626\r
9492e0b0 627 target_nt[i] = 0;\r
628 while(target_nt[i] == 0) { // continue until we have an unambiguous nonce\r
8556b852 629 \r
9492e0b0 630 // prepare next select. No need to power down the card.\r
631 if(mifare_classic_halt(pcs, cuid)) {\r
632 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Halt error");\r
633 continue;\r
634 }\r
8556b852 635\r
9492e0b0 636 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
637 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Can't select card");\r
638 continue;\r
639 };\r
8556b852 640 \r
9492e0b0 641 auth1_time = 0;\r
642 if(mifare_classic_authex(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST, &nt1, &auth1_time)) {\r
643 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth1 error");\r
644 continue;\r
645 };\r
8556b852 646\r
9492e0b0 647 // nested authentication\r
648 auth2_time = auth1_time + delta_time;\r
6a1f2d82 649 len = mifare_sendcmd_shortex(pcs, AUTH_NESTED, 0x60 + (targetKeyType & 0x01), targetBlockNo, receivedAnswer, par, &auth2_time);\r
9492e0b0 650 if (len != 4) {\r
651 if (MF_DBGLEVEL >= 1) Dbprintf("Nested: Auth2 error len=%d", len);\r
652 continue;\r
653 };\r
8556b852 654 \r
9492e0b0 655 nt2 = bytes_to_num(receivedAnswer, 4); \r
6a1f2d82 656 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: Testing nt1=%08x nt2enc=%08x nt2par=%02x", i+1, nt1, nt2, par[0]);\r
8556b852 657 \r
9492e0b0 658 // Parity validity check\r
659 for (j = 0; j < 4; j++) {\r
6a1f2d82 660 par_array[j] = (oddparity(receivedAnswer[j]) != ((par[0] >> (7-j)) & 0x01));\r
9492e0b0 661 }\r
662 \r
663 ncount = 0;\r
664 nttest = prng_successor(nt1, dmin - 1);\r
665 for (j = dmin; j < dmax + 1; j++) {\r
666 nttest = prng_successor(nttest, 1);\r
667 ks1 = nt2 ^ nttest;\r
668\r
669 if (valid_nonce(nttest, nt2, ks1, par_array)){\r
670 if (ncount > 0) { // we are only interested in disambiguous nonces, try again\r
671 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (ambigous), ntdist=%d", i+1, j);\r
672 target_nt[i] = 0;\r
673 break;\r
674 }\r
675 target_nt[i] = nttest;\r
676 target_ks[i] = ks1;\r
677 ncount++;\r
678 if (i == 1 && target_nt[1] == target_nt[0]) { // we need two different nonces\r
679 target_nt[i] = 0;\r
680 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#2: dismissed (= nonce#1), ntdist=%d", j);\r
8556b852
M
681 break;\r
682 }\r
9492e0b0 683 if (MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: valid, ntdist=%d", i+1, j);\r
8556b852 684 }\r
8556b852 685 }\r
9492e0b0 686 if (target_nt[i] == 0 && j == dmax+1 && MF_DBGLEVEL >= 3) Dbprintf("Nonce#%d: dismissed (all invalid)", i+1);\r
8556b852
M
687 }\r
688 }\r
689\r
690 LED_C_OFF();\r
691 \r
692 // ----------------------------- crypto1 destroy\r
693 crypto1_destroy(pcs);\r
694 \r
9492e0b0 695 byte_t buf[4 + 4 * 4];\r
696 memcpy(buf, &cuid, 4);\r
697 memcpy(buf+4, &target_nt[0], 4);\r
698 memcpy(buf+8, &target_ks[0], 4);\r
699 memcpy(buf+12, &target_nt[1], 4);\r
700 memcpy(buf+16, &target_ks[1], 4);\r
8556b852
M
701 \r
702 LED_B_ON();\r
9492e0b0 703 cmd_send(CMD_ACK, 0, 2, targetBlockNo + (targetKeyType * 0x100), buf, sizeof(buf));\r
6e82300d 704 LED_B_OFF();\r
8556b852 705\r
9492e0b0 706 if (MF_DBGLEVEL >= 3) DbpString("NESTED FINISHED");\r
8556b852 707\r
8556b852
M
708 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
709 LEDsoff();\r
9492e0b0 710 iso14a_set_tracing(TRUE);\r
8556b852
M
711}\r
712\r
713//-----------------------------------------------------------------------------\r
9492e0b0 714// MIFARE check keys. key count up to 85. \r
8556b852
M
715// \r
716//-----------------------------------------------------------------------------\r
717void MifareChkKeys(uint8_t arg0, uint8_t arg1, uint8_t arg2, uint8_t *datain)\r
718{\r
719 // params\r
720 uint8_t blockNo = arg0;\r
721 uint8_t keyType = arg1;\r
722 uint8_t keyCount = arg2;\r
723 uint64_t ui64Key = 0;\r
724 \r
725 // variables\r
726 int i;\r
727 byte_t isOK = 0;\r
1c611bbd 728 uint8_t uid[10];\r
8556b852
M
729 uint32_t cuid;\r
730 struct Crypto1State mpcs = {0, 0};\r
731 struct Crypto1State *pcs;\r
732 pcs = &mpcs;\r
733 \r
734 // clear debug level\r
735 int OLD_MF_DBGLEVEL = MF_DBGLEVEL; \r
736 MF_DBGLEVEL = MF_DBG_NONE;\r
737 \r
738 // clear trace\r
d19929cb 739 iso14a_clear_trace();\r
9492e0b0 740 iso14a_set_tracing(TRUE);\r
8556b852 741\r
7bc95e2e 742 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
743\r
744 LED_A_ON();\r
745 LED_B_OFF();\r
746 LED_C_OFF();\r
747\r
8556b852 748 for (i = 0; i < keyCount; i++) {\r
9492e0b0 749 if(mifare_classic_halt(pcs, cuid)) {\r
750 if (MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Halt error");\r
751 }\r
8556b852
M
752\r
753 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
9492e0b0 754 if (OLD_MF_DBGLEVEL >= 1) Dbprintf("ChkKeys: Can't select card");\r
8556b852
M
755 break;\r
756 };\r
757\r
758 ui64Key = bytes_to_num(datain + i * 6, 6);\r
759 if(mifare_classic_auth(pcs, cuid, blockNo, keyType, ui64Key, AUTH_FIRST)) {\r
760 continue;\r
761 };\r
762 \r
763 isOK = 1;\r
764 break;\r
765 }\r
766 \r
767 // ----------------------------- crypto1 destroy\r
768 crypto1_destroy(pcs);\r
769 \r
8556b852 770 LED_B_ON();\r
6e82300d 771 cmd_send(CMD_ACK,isOK,0,0,datain + i * 6,6);\r
8556b852
M
772 LED_B_OFF();\r
773\r
8556b852
M
774 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
775 LEDsoff();\r
776\r
777 // restore debug level\r
778 MF_DBGLEVEL = OLD_MF_DBGLEVEL; \r
779}\r
780\r
781//-----------------------------------------------------------------------------\r
782// MIFARE commands set debug level\r
783// \r
784//-----------------------------------------------------------------------------\r
785void MifareSetDbgLvl(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
786 MF_DBGLEVEL = arg0;\r
787 Dbprintf("Debug level: %d", MF_DBGLEVEL);\r
788}\r
789\r
790//-----------------------------------------------------------------------------\r
791// Work with emulator memory\r
792// \r
793//-----------------------------------------------------------------------------\r
794void MifareEMemClr(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
795 emlClearMem();\r
796}\r
797\r
798void MifareEMemSet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
799 emlSetMem(datain, arg0, arg1); // data, block num, blocks count\r
800}\r
801\r
802void MifareEMemGet(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
3fe4ff4f 803 byte_t buf[USB_CMD_DATA_SIZE];\r
baeaf579 804 emlGetMem(buf, arg0, arg1); // data, block num, blocks count (max 4)\r
8556b852
M
805\r
806 LED_B_ON();\r
3fe4ff4f 807 cmd_send(CMD_ACK,arg0,arg1,0,buf,USB_CMD_DATA_SIZE);\r
8556b852
M
808 LED_B_OFF();\r
809}\r
810\r
811//-----------------------------------------------------------------------------\r
812// Load a card into the emulator memory\r
813// \r
814//-----------------------------------------------------------------------------\r
815void MifareECardLoad(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
baeaf579 816 uint8_t numSectors = arg0;\r
8556b852
M
817 uint8_t keyType = arg1;\r
818 uint64_t ui64Key = 0;\r
819 uint32_t cuid;\r
820 struct Crypto1State mpcs = {0, 0};\r
821 struct Crypto1State *pcs;\r
822 pcs = &mpcs;\r
823\r
824 // variables\r
825 byte_t dataoutbuf[16];\r
ab8b654e 826 byte_t dataoutbuf2[16];\r
1c611bbd 827 uint8_t uid[10];\r
8556b852
M
828\r
829 // clear trace\r
d19929cb 830 iso14a_clear_trace();\r
8556b852
M
831 iso14a_set_tracing(false);\r
832 \r
7bc95e2e 833 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
8556b852
M
834\r
835 LED_A_ON();\r
836 LED_B_OFF();\r
837 LED_C_OFF();\r
838 \r
baeaf579 839 bool isOK = true;\r
840\r
841 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
842 isOK = false;\r
843 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
844 }\r
8556b852 845 \r
baeaf579 846 for (uint8_t sectorNo = 0; isOK && sectorNo < numSectors; sectorNo++) {\r
847 ui64Key = emlGetKey(sectorNo, keyType);\r
848 if (sectorNo == 0){\r
849 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_FIRST)) {\r
850 isOK = false;\r
851 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth error", sectorNo);\r
8556b852 852 break;\r
baeaf579 853 }\r
854 } else {\r
855 if(isOK && mifare_classic_auth(pcs, cuid, FirstBlockOfSector(sectorNo), keyType, ui64Key, AUTH_NESTED)) {\r
856 isOK = false;\r
857 if (MF_DBGLEVEL >= 1) Dbprintf("Sector[%2d]. Auth nested error", sectorNo);\r
8556b852 858 break;\r
baeaf579 859 }\r
860 }\r
861 \r
862 for (uint8_t blockNo = 0; isOK && blockNo < NumBlocksPerSector(sectorNo); blockNo++) {\r
863 if(isOK && mifare_classic_readblock(pcs, cuid, FirstBlockOfSector(sectorNo) + blockNo, dataoutbuf)) {\r
864 isOK = false;\r
865 if (MF_DBGLEVEL >= 1) Dbprintf("Error reading sector %2d block %2d", sectorNo, blockNo);\r
ab8b654e
M
866 break;\r
867 };\r
baeaf579 868 if (isOK) {\r
869 if (blockNo < NumBlocksPerSector(sectorNo) - 1) {\r
870 emlSetMem(dataoutbuf, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
871 } else { // sector trailer, keep the keys, set only the AC\r
872 emlGetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
873 memcpy(&dataoutbuf2[6], &dataoutbuf[6], 4);\r
874 emlSetMem(dataoutbuf2, FirstBlockOfSector(sectorNo) + blockNo, 1);\r
875 }\r
876 }\r
8556b852
M
877 }\r
878\r
baeaf579 879 }\r
880\r
881 if(mifare_classic_halt(pcs, cuid)) {\r
882 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
883 };\r
8556b852
M
884\r
885 // ----------------------------- crypto1 destroy\r
886 crypto1_destroy(pcs);\r
ab8b654e
M
887\r
888 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
889 LEDsoff();\r
8556b852
M
890 \r
891 if (MF_DBGLEVEL >= 2) DbpString("EMUL FILL SECTORS FINISHED");\r
892\r
8556b852
M
893}\r
894\r
0675f200
M
895\r
896//-----------------------------------------------------------------------------\r
897// Work with "magic Chinese" card (email him: ouyangweidaxian@live.cn)\r
898// \r
899//-----------------------------------------------------------------------------\r
900void MifareCSetBlock(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
901 \r
902 // params\r
903 uint8_t needWipe = arg0;\r
208a0166
M
904 // bit 0 - need get UID\r
905 // bit 1 - need wupC\r
906 // bit 2 - need HALT after sequence\r
907 // bit 3 - need init FPGA and field before sequence\r
908 // bit 4 - need reset FPGA and LED\r
909 uint8_t workFlags = arg1;\r
0675f200
M
910 uint8_t blockNo = arg2;\r
911 \r
912 // card commands\r
913 uint8_t wupC1[] = { 0x40 }; \r
914 uint8_t wupC2[] = { 0x43 }; \r
915 uint8_t wipeC[] = { 0x41 }; \r
916 \r
917 // variables\r
918 byte_t isOK = 0;\r
3fe4ff4f 919 uint8_t uid[10] = {0x00};\r
920 uint8_t d_block[18] = {0x00};\r
0675f200
M
921 uint32_t cuid;\r
922 \r
6a1f2d82 923 uint8_t *receivedAnswer = get_bigbufptr_recvrespbuf();\r
924 uint8_t *receivedAnswerPar = receivedAnswer + MAX_FRAME_SIZE;\r
925\r
3fe4ff4f 926 // reset FPGA and LED\r
208a0166 927 if (workFlags & 0x08) {\r
208a0166
M
928 LED_A_ON();\r
929 LED_B_OFF();\r
930 LED_C_OFF();\r
0675f200 931 \r
3fe4ff4f 932 iso14a_clear_trace();\r
933 iso14a_set_tracing(TRUE);\r
934 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
208a0166 935 }\r
0675f200
M
936\r
937 while (true) {\r
3fe4ff4f 938\r
0675f200 939 // get UID from chip\r
208a0166 940 if (workFlags & 0x01) {\r
0675f200
M
941 if(!iso14443a_select_card(uid, NULL, &cuid)) {\r
942 if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");\r
943 break;\r
944 };\r
945\r
946 if(mifare_classic_halt(NULL, cuid)) {\r
947 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
948 break;\r
949 };\r
950 };\r
951 \r
952 // reset chip\r
953 if (needWipe){\r
6a1f2d82 954 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
955 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
956 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
957 break;\r
958 };\r
959\r
9492e0b0 960 ReaderTransmit(wipeC, sizeof(wipeC), NULL);\r
6a1f2d82 961 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
962 if (MF_DBGLEVEL >= 1) Dbprintf("wipeC error");\r
963 break;\r
964 };\r
965\r
966 if(mifare_classic_halt(NULL, cuid)) {\r
967 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
968 break;\r
969 };\r
970 }; \r
971\r
545a1f38 972 // write block\r
208a0166 973 if (workFlags & 0x02) {\r
6a1f2d82 974 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
975 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
208a0166
M
976 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
977 break;\r
978 };\r
0675f200 979\r
9492e0b0 980 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
6a1f2d82 981 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
208a0166
M
982 if (MF_DBGLEVEL >= 1) Dbprintf("wupC2 error");\r
983 break;\r
984 };\r
985 }\r
0675f200 986\r
6a1f2d82 987 if ((mifare_sendcmd_short(NULL, 0, 0xA0, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 1) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
988 if (MF_DBGLEVEL >= 1) Dbprintf("write block send command error");\r
989 break;\r
990 };\r
991 \r
992 memcpy(d_block, datain, 16);\r
993 AppendCrc14443a(d_block, 16);\r
994 \r
9492e0b0 995 ReaderTransmit(d_block, sizeof(d_block), NULL);\r
6a1f2d82 996 if ((ReaderReceive(receivedAnswer, receivedAnswerPar) != 1) || (receivedAnswer[0] != 0x0a)) {\r
0675f200
M
997 if (MF_DBGLEVEL >= 1) Dbprintf("write block send data error");\r
998 break;\r
999 }; \r
1000 \r
208a0166
M
1001 if (workFlags & 0x04) {\r
1002 if (mifare_classic_halt(NULL, cuid)) {\r
1003 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1004 break;\r
1005 };\r
1006 }\r
0675f200
M
1007 \r
1008 isOK = 1;\r
1009 break;\r
1010 }\r
1011 \r
0675f200 1012 LED_B_ON();\r
baeaf579 1013 cmd_send(CMD_ACK,isOK,0,0,uid,4);\r
0675f200
M
1014 LED_B_OFF();\r
1015\r
545a1f38 1016 if ((workFlags & 0x10) || (!isOK)) {\r
208a0166
M
1017 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1018 LEDsoff();\r
1019 }\r
0675f200 1020}\r
545a1f38 1021\r
baeaf579 1022\r
545a1f38
M
1023void MifareCGetBlock(uint32_t arg0, uint32_t arg1, uint32_t arg2, uint8_t *datain){\r
1024 \r
1025 // params\r
1026 // bit 1 - need wupC\r
1027 // bit 2 - need HALT after sequence\r
1028 // bit 3 - need init FPGA and field before sequence\r
1029 // bit 4 - need reset FPGA and LED\r
1030 uint8_t workFlags = arg0;\r
1031 uint8_t blockNo = arg2;\r
1032 \r
1033 // card commands\r
1034 uint8_t wupC1[] = { 0x40 }; \r
1035 uint8_t wupC2[] = { 0x43 }; \r
1036 \r
1037 // variables\r
1038 byte_t isOK = 0;\r
3fe4ff4f 1039 uint8_t data[18] = {0x00};\r
545a1f38
M
1040 uint32_t cuid = 0;\r
1041 \r
6a1f2d82 1042 uint8_t* receivedAnswer = get_bigbufptr_recvrespbuf();\r
1043 uint8_t *receivedAnswerPar = receivedAnswer + MAX_FRAME_SIZE;\r
545a1f38
M
1044 \r
1045 if (workFlags & 0x08) {\r
545a1f38
M
1046 LED_A_ON();\r
1047 LED_B_OFF();\r
1048 LED_C_OFF();\r
1049 \r
3fe4ff4f 1050 iso14a_clear_trace();\r
1051 iso14a_set_tracing(TRUE);\r
1052 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
545a1f38
M
1053 }\r
1054\r
1055 while (true) {\r
1056 if (workFlags & 0x02) {\r
7bc95e2e 1057 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
6a1f2d82 1058 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
545a1f38
M
1059 if (MF_DBGLEVEL >= 1) Dbprintf("wupC1 error");\r
1060 break;\r
1061 };\r
1062\r
9492e0b0 1063 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
6a1f2d82 1064 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
545a1f38
M
1065 if (MF_DBGLEVEL >= 1) Dbprintf("wupC2 error");\r
1066 break;\r
1067 };\r
1068 }\r
1069\r
1070 // read block\r
6a1f2d82 1071 if ((mifare_sendcmd_short(NULL, 0, 0x30, blockNo, receivedAnswer, receivedAnswerPar, NULL) != 18)) {\r
545a1f38
M
1072 if (MF_DBGLEVEL >= 1) Dbprintf("read block send command error");\r
1073 break;\r
1074 };\r
1075 memcpy(data, receivedAnswer, 18);\r
1076 \r
1077 if (workFlags & 0x04) {\r
1078 if (mifare_classic_halt(NULL, cuid)) {\r
1079 if (MF_DBGLEVEL >= 1) Dbprintf("Halt error");\r
1080 break;\r
1081 };\r
1082 }\r
1083 \r
1084 isOK = 1;\r
1085 break;\r
1086 }\r
1087 \r
545a1f38 1088 LED_B_ON();\r
baeaf579 1089 cmd_send(CMD_ACK,isOK,0,0,data,18);\r
545a1f38
M
1090 LED_B_OFF();\r
1091\r
1092 if ((workFlags & 0x10) || (!isOK)) {\r
545a1f38
M
1093 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1094 LEDsoff();\r
1095 }\r
1096}\r
1097\r
3fe4ff4f 1098void MifareCIdent(){\r
1099 \r
1100 // card commands\r
1101 uint8_t wupC1[] = { 0x40 }; \r
1102 uint8_t wupC2[] = { 0x43 }; \r
1103 \r
1104 // variables\r
1105 byte_t isOK = 1;\r
1106 \r
1107 uint8_t* receivedAnswer = get_bigbufptr_recvrespbuf();\r
1108 uint8_t *receivedAnswerPar = receivedAnswer + MAX_FRAME_SIZE;\r
1109\r
1110 ReaderTransmitBitsPar(wupC1,7,0, NULL);\r
1111 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1112 isOK = 0;\r
1113 };\r
1114\r
1115 ReaderTransmit(wupC2, sizeof(wupC2), NULL);\r
1116 if(!ReaderReceive(receivedAnswer, receivedAnswerPar) || (receivedAnswer[0] != 0x0a)) {\r
1117 isOK = 0;\r
1118 };\r
1119\r
1120 if (mifare_classic_halt(NULL, 0)) {\r
1121 isOK = 0;\r
1122 };\r
1123\r
1124 cmd_send(CMD_ACK,isOK,0,0,0,0);\r
1125}\r
1126\r
1127 //\r
1128// DESFIRE\r
1129//\r
a631936e 1130\r
1131void Mifare_DES_Auth1(uint8_t arg0, uint8_t *datain){\r
1132\r
1133 byte_t dataout[11] = {0x00};\r
1134 uint8_t uid[10] = {0x00};\r
1135 uint32_t cuid;\r
1136 \r
1137 iso14a_clear_trace();\r
1138 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);\r
1139\r
1140 int len = iso14443a_select_card(uid, NULL, &cuid);\r
1141 if(!len) {\r
1142 if (MF_DBGLEVEL >= MF_DBG_ERROR) \r
1143 Dbprintf("Can't select card");\r
c8b6da22 1144 //OnError(1);\r
a631936e 1145 return;\r
1146 };\r
1147\r
1148 if(mifare_desfire_des_auth1(cuid, dataout)){\r
1149 if (MF_DBGLEVEL >= MF_DBG_ERROR) \r
1150 Dbprintf("Authentication part1: Fail.");\r
c8b6da22 1151 //OnError(4);\r
a631936e 1152 return;\r
1153 }\r
1154\r
1155 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) DbpString("AUTH 1 FINISHED");\r
1156 \r
1157 cmd_send(CMD_ACK,1,cuid,0,dataout, sizeof(dataout));\r
1158}\r
1159\r
1160void Mifare_DES_Auth2(uint32_t arg0, uint8_t *datain){\r
1161\r
1162 uint32_t cuid = arg0;\r
1163 uint8_t key[16] = {0x00};\r
1164 byte_t isOK = 0;\r
1165 byte_t dataout[12] = {0x00};\r
1166 \r
1167 memcpy(key, datain, 16);\r
1168 \r
1169 isOK = mifare_desfire_des_auth2(cuid, key, dataout);\r
1170 \r
1171 if( isOK) {\r
1172 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) \r
1173 Dbprintf("Authentication part2: Failed"); \r
c8b6da22 1174 //OnError(4);\r
a631936e 1175 return;\r
1176 }\r
1177\r
1178 if (MF_DBGLEVEL >= MF_DBG_EXTENDED) \r
1179 DbpString("AUTH 2 FINISHED");\r
1180\r
1181 cmd_send(CMD_ACK, isOK, 0, 0, dataout, sizeof(dataout));\r
1182 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);\r
1183 LEDsoff();\r
c8b6da22 1184}
Impressum, Datenschutz