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