1 //-----------------------------------------------------------------------------
2 // Merlok, May 2011, 2012
3 // Many authors, whom made it possible
5 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
6 // at your option, any later version. See the LICENSE.txt file for the text of
8 //-----------------------------------------------------------------------------
9 // Work with mifare cards.
10 //-----------------------------------------------------------------------------
12 #include "mifareutil.h"
17 #include "proxmark3.h"
21 #include "iso14443crc.h"
22 #include "iso14443a.h"
23 #include "crapto1/crapto1.h"
24 #include "mbedtls/des.h"
26 int MF_DBGLEVEL
= MF_DBG_INFO
;
29 void mf_crypto1_decryptEx(struct Crypto1State
*pcs
, uint8_t *data_in
, int len
, uint8_t *data_out
){
34 for (i
= 0; i
< len
; i
++)
35 data_out
[i
] = crypto1_byte(pcs
, 0x00, 0) ^ data_in
[i
];
38 for (i
= 0; i
< 4; i
++)
39 bt
|= (crypto1_bit(pcs
, 0, 0) ^ BIT(data_in
[0], i
)) << i
;
46 void mf_crypto1_decrypt(struct Crypto1State
*pcs
, uint8_t *data
, int len
){
47 mf_crypto1_decryptEx(pcs
, data
, len
, data
);
50 void mf_crypto1_encryptEx(struct Crypto1State
*pcs
, uint8_t *data
, uint8_t *in
, uint16_t len
, uint8_t *par
) {
55 for (i
= 0; i
< len
; i
++) {
57 data
[i
] = crypto1_byte(pcs
, in
==NULL
?0x00:in
[i
], 0) ^ data
[i
];
60 par
[i
>>3] |= (((filter(pcs
->odd
) ^ oddparity8(bt
)) & 0x01)<<(7-(i
&0x0007)));
65 void mf_crypto1_encrypt(struct Crypto1State
*pcs
, uint8_t *data
, uint16_t len
, uint8_t *par
) {
66 mf_crypto1_encryptEx(pcs
, data
, NULL
, len
, par
);
69 uint8_t mf_crypto1_encrypt4bit(struct Crypto1State
*pcs
, uint8_t data
) {
73 for (i
= 0; i
< 4; i
++)
74 bt
|= (crypto1_bit(pcs
, 0, 0) ^ BIT(data
, i
)) << i
;
79 // send X byte basic commands
80 int mifare_sendcmd(uint8_t cmd
, uint8_t* data
, uint8_t data_size
, uint8_t* answer
, uint8_t *answer_parity
, uint32_t *timing
)
82 uint8_t dcmd
[data_size
+3];
84 memcpy(dcmd
+1,data
,data_size
);
85 AppendCrc14443a(dcmd
, data_size
+1);
86 ReaderTransmit(dcmd
, sizeof(dcmd
), timing
);
87 int len
= ReaderReceive(answer
, answer_parity
);
89 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("%02X Cmd failed. Card timeout.", cmd
);
90 len
= ReaderReceive(answer
,answer_parity
);
96 // send 2 byte commands
97 int mifare_sendcmd_short(struct Crypto1State
*pcs
, uint8_t crypted
, uint8_t cmd
, uint8_t data
, uint8_t *answer
, uint8_t *answer_parity
, uint32_t *timing
)
99 uint8_t dcmd
[4], ecmd
[4];
101 uint8_t par
[1]; // 1 Byte parity is enough here
104 AppendCrc14443a(dcmd
, 2);
106 memcpy(ecmd
, dcmd
, sizeof(dcmd
));
110 for (pos
= 0; pos
< 4; pos
++)
112 ecmd
[pos
] = crypto1_byte(pcs
, 0x00, 0) ^ dcmd
[pos
];
113 par
[0] |= (((filter(pcs
->odd
) ^ oddparity8(dcmd
[pos
])) & 0x01) << (7-pos
));
116 ReaderTransmitPar(ecmd
, sizeof(ecmd
), par
, timing
);
119 ReaderTransmit(dcmd
, sizeof(dcmd
), timing
);
122 int len
= ReaderReceive(answer
, par
);
124 if (answer_parity
) *answer_parity
= par
[0];
126 if (crypted
== CRYPT_ALL
) {
129 for (pos
= 0; pos
< 4; pos
++)
130 res
|= (crypto1_bit(pcs
, 0, 0) ^ BIT(answer
[0], pos
)) << pos
;
135 for (pos
= 0; pos
< len
; pos
++)
137 answer
[pos
] = crypto1_byte(pcs
, 0x00, 0) ^ answer
[pos
];
145 // mifare classic commands
146 int mifare_classic_auth(struct Crypto1State
*pcs
, uint32_t uid
, uint8_t blockNo
, uint8_t keyType
, uint64_t ui64Key
, uint8_t isNested
)
148 return mifare_classic_authex(pcs
, uid
, blockNo
, keyType
, ui64Key
, isNested
, NULL
, NULL
);
151 int mifare_classic_authex(struct Crypto1State
*pcs
, uint32_t uid
, uint8_t blockNo
, uint8_t keyType
, uint64_t ui64Key
, uint8_t isNested
, uint32_t *ntptr
, uint32_t *timing
)
157 uint8_t par
[1] = {0x00};
159 uint32_t nt
, ntpp
; // Supplied tag nonce
161 uint8_t mf_nr_ar
[] = { 0x00,0x00,0x00,0x00,0x00,0x00,0x00,0x00 };
162 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
163 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
165 // Transmit MIFARE_CLASSIC_AUTH
166 len
= mifare_sendcmd_short(pcs
, isNested
, 0x60 + (keyType
& 0x01), blockNo
, receivedAnswer
, receivedAnswerPar
, timing
);
167 if (MF_DBGLEVEL
>= 4) Dbprintf("rand tag nonce len: %x", len
);
168 if (len
!= 4) return 1;
170 // "random" reader nonce:
176 // Save the tag nonce (nt)
177 nt
= bytes_to_num(receivedAnswer
, 4);
179 // ----------------------------- crypto1 create
181 crypto1_destroy(pcs
);
183 // Init cipher with key
184 crypto1_create(pcs
, ui64Key
);
186 if (isNested
== AUTH_NESTED
) {
187 // decrypt nt with help of new key
188 nt
= crypto1_word(pcs
, nt
^ uid
, 1) ^ nt
;
190 // Load (plain) uid^nt into the cipher
191 crypto1_word(pcs
, nt
^ uid
, 0);
195 if (!ntptr
&& (MF_DBGLEVEL
>= 3))
196 Dbprintf("auth uid: %08x nt: %08x", uid
, nt
);
202 // Generate (encrypted) nr+parity by loading it into the cipher (Nr)
204 for (pos
= 0; pos
< 4; pos
++)
206 mf_nr_ar
[pos
] = crypto1_byte(pcs
, nr
[pos
], 0) ^ nr
[pos
];
207 par
[0] |= (((filter(pcs
->odd
) ^ oddparity8(nr
[pos
])) & 0x01) << (7-pos
));
210 // Skip 32 bits in pseudo random generator
211 nt
= prng_successor(nt
,32);
214 for (pos
= 4; pos
< 8; pos
++)
216 nt
= prng_successor(nt
,8);
217 mf_nr_ar
[pos
] = crypto1_byte(pcs
,0x00,0) ^ (nt
& 0xff);
218 par
[0] |= (((filter(pcs
->odd
) ^ oddparity8(nt
)) & 0x01) << (7-pos
));
221 // Transmit reader nonce and reader answer
222 ReaderTransmitPar(mf_nr_ar
, sizeof(mf_nr_ar
), par
, NULL
);
224 // Receive 4 byte tag answer
225 len
= ReaderReceive(receivedAnswer
, receivedAnswerPar
);
228 if (MF_DBGLEVEL
>= 1) Dbprintf("Authentication failed. Card timeout.");
232 memcpy(tmp4
, receivedAnswer
, 4);
233 ntpp
= prng_successor(nt
, 32) ^ crypto1_word(pcs
, 0,0);
235 if (ntpp
!= bytes_to_num(tmp4
, 4)) {
236 if (MF_DBGLEVEL
>= 1) Dbprintf("Authentication failed. Error card response.");
243 int mifare_classic_readblock(struct Crypto1State
*pcs
, uint32_t uid
, uint8_t blockNo
, uint8_t *blockData
)
249 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
250 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
252 // command MIFARE_CLASSIC_READBLOCK
253 len
= mifare_sendcmd_short(pcs
, 1, 0x30, blockNo
, receivedAnswer
, receivedAnswerPar
, NULL
);
255 if (MF_DBGLEVEL
>= 1) Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
259 if (MF_DBGLEVEL
>= 1) Dbprintf("Cmd Error: card timeout. len: %x", len
);
263 memcpy(bt
, receivedAnswer
+ 16, 2);
264 AppendCrc14443a(receivedAnswer
, 16);
265 if (bt
[0] != receivedAnswer
[16] || bt
[1] != receivedAnswer
[17]) {
266 if (MF_DBGLEVEL
>= 1) Dbprintf("Cmd CRC response error.");
270 memcpy(blockData
, receivedAnswer
, 16);
274 // mifare ultralight commands
275 int mifare_ul_ev1_auth(uint8_t *keybytes
, uint8_t *pack
){
280 uint8_t key
[4] = {0x00};
281 memcpy(key
, keybytes
, 4);
283 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
)
284 Dbprintf("EV1 Auth : %02x%02x%02x%02x", key
[0], key
[1], key
[2], key
[3]);
285 len
= mifare_sendcmd(0x1B, key
, sizeof(key
), resp
, respPar
, NULL
);
286 //len = mifare_sendcmd_short_mfuev1auth(NULL, 0, 0x1B, key, resp, respPar, NULL);
288 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x %u", resp
[0], len
);
292 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
)
293 Dbprintf("Auth Resp: %02x%02x%02x%02x", resp
[0],resp
[1],resp
[2],resp
[3]);
295 memcpy(pack
, resp
, 4);
299 int mifare_ultra_auth(uint8_t *keybytes
){
303 mbedtls_des3_context ctx
= { {0} };
304 uint8_t random_a
[8] = {1,1,1,1,1,1,1,1};
305 uint8_t random_b
[8] = {0x00};
306 uint8_t enc_random_b
[8] = {0x00};
307 uint8_t rnd_ab
[16] = {0x00};
308 uint8_t IV
[8] = {0x00};
309 uint8_t key
[16] = {0x00};
310 memcpy(key
, keybytes
, 16);
313 uint8_t resp
[19] = {0x00};
314 uint8_t respPar
[3] = {0,0,0};
316 // REQUEST AUTHENTICATION
317 len
= mifare_sendcmd_short(NULL
, 1, 0x1A, 0x00, resp
, respPar
,NULL
);
319 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x", resp
[0]);
324 memcpy(enc_random_b
,resp
+1,8);
327 // tdes_2key_dec(random_b, enc_random_b, sizeof(random_b), key, IV );
328 mbedtls_des3_set2key_dec(&ctx
, key
);
329 mbedtls_des3_crypt_cbc(&ctx
// des3_context
330 , MBEDTLS_DES_DECRYPT
// int mode
331 , sizeof(random_b
) // length
333 , enc_random_b
// input
338 memcpy(rnd_ab
,random_a
,8);
339 memcpy(rnd_ab
+8,random_b
,8);
341 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) {
342 Dbprintf("enc_B: %02x %02x %02x %02x %02x %02x %02x %02x",
343 enc_random_b
[0],enc_random_b
[1],enc_random_b
[2],enc_random_b
[3],enc_random_b
[4],enc_random_b
[5],enc_random_b
[6],enc_random_b
[7]);
345 Dbprintf(" B: %02x %02x %02x %02x %02x %02x %02x %02x",
346 random_b
[0],random_b
[1],random_b
[2],random_b
[3],random_b
[4],random_b
[5],random_b
[6],random_b
[7]);
348 Dbprintf("rnd_ab: %02x %02x %02x %02x %02x %02x %02x %02x",
349 rnd_ab
[0],rnd_ab
[1],rnd_ab
[2],rnd_ab
[3],rnd_ab
[4],rnd_ab
[5],rnd_ab
[6],rnd_ab
[7]);
351 Dbprintf("rnd_ab: %02x %02x %02x %02x %02x %02x %02x %02x",
352 rnd_ab
[8],rnd_ab
[9],rnd_ab
[10],rnd_ab
[11],rnd_ab
[12],rnd_ab
[13],rnd_ab
[14],rnd_ab
[15] );
355 // encrypt out, in, length, key, iv
356 //tdes_2key_enc(rnd_ab, rnd_ab, sizeof(rnd_ab), key, enc_random_b);
357 mbedtls_des3_set2key_enc(&ctx
, key
);
358 mbedtls_des3_crypt_cbc(&ctx
// des3_context
359 , MBEDTLS_DES_ENCRYPT
// int mode
360 , sizeof(rnd_ab
) // length
361 , enc_random_b
// iv[8]
366 //len = mifare_sendcmd_short_mfucauth(NULL, 1, 0xAF, rnd_ab, resp, respPar, NULL);
367 len
= mifare_sendcmd(0xAF, rnd_ab
, sizeof(rnd_ab
), resp
, respPar
, NULL
);
369 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x", resp
[0]);
373 uint8_t enc_resp
[8] = { 0,0,0,0,0,0,0,0 };
374 uint8_t resp_random_a
[8] = { 0,0,0,0,0,0,0,0 };
375 memcpy(enc_resp
, resp
+1, 8);
377 // decrypt out, in, length, key, iv
378 // tdes_2key_dec(resp_random_a, enc_resp, 8, key, enc_random_b);
379 mbedtls_des3_set2key_dec(&ctx
, key
);
380 mbedtls_des3_crypt_cbc(&ctx
// des3_context
381 , MBEDTLS_DES_DECRYPT
// int mode
383 , enc_random_b
// iv[8]
385 , resp_random_a
// output
387 if ( memcmp(resp_random_a
, random_a
, 8) != 0 ) {
388 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("failed authentication");
392 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) {
393 Dbprintf("e_AB: %02x %02x %02x %02x %02x %02x %02x %02x",
394 rnd_ab
[0],rnd_ab
[1],rnd_ab
[2],rnd_ab
[3],
395 rnd_ab
[4],rnd_ab
[5],rnd_ab
[6],rnd_ab
[7]);
397 Dbprintf("e_AB: %02x %02x %02x %02x %02x %02x %02x %02x",
398 rnd_ab
[8],rnd_ab
[9],rnd_ab
[10],rnd_ab
[11],
399 rnd_ab
[12],rnd_ab
[13],rnd_ab
[14],rnd_ab
[15]);
401 Dbprintf("a: %02x %02x %02x %02x %02x %02x %02x %02x",
402 random_a
[0],random_a
[1],random_a
[2],random_a
[3],
403 random_a
[4],random_a
[5],random_a
[6],random_a
[7]);
405 Dbprintf("b: %02x %02x %02x %02x %02x %02x %02x %02x",
406 resp_random_a
[0],resp_random_a
[1],resp_random_a
[2],resp_random_a
[3],
407 resp_random_a
[4],resp_random_a
[5],resp_random_a
[6],resp_random_a
[7]);
413 #define MFU_MAX_RETRIES 5
414 int mifare_ultra_readblock(uint8_t blockNo
, uint8_t *blockData
)
418 uint8_t receivedAnswer
[MAX_FRAME_SIZE
];
419 uint8_t receivedAnswerPar
[MAX_PARITY_SIZE
];
423 for (retries
= 0; retries
< MFU_MAX_RETRIES
; retries
++) {
424 len
= mifare_sendcmd_short(NULL
, 1, 0x30, blockNo
, receivedAnswer
, receivedAnswerPar
, NULL
);
426 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
431 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: card timeout. len: %x", len
);
436 memcpy(bt
, receivedAnswer
+ 16, 2);
437 AppendCrc14443a(receivedAnswer
, 16);
438 if (bt
[0] != receivedAnswer
[16] || bt
[1] != receivedAnswer
[17]) {
439 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd CRC response error.");
444 // No errors encountered; don't retry
450 Dbprintf("Cmd Error: too many retries; read failed");
454 memcpy(blockData
, receivedAnswer
, 14);
458 int mifare_classic_writeblock(struct Crypto1State
*pcs
, uint32_t uid
, uint8_t blockNo
, uint8_t *blockData
)
463 uint8_t par
[3] = {0}; // enough for 18 Bytes to send
466 uint8_t d_block
[18], d_block_enc
[18];
467 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
468 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
470 // command MIFARE_CLASSIC_WRITEBLOCK
471 len
= mifare_sendcmd_short(pcs
, 1, 0xA0, blockNo
, receivedAnswer
, receivedAnswerPar
, NULL
);
473 if ((len
!= 1) || (receivedAnswer
[0] != 0x0A)) { // 0x0a - ACK
474 if (MF_DBGLEVEL
>= 1) Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
478 memcpy(d_block
, blockData
, 16);
479 AppendCrc14443a(d_block
, 16);
482 for (pos
= 0; pos
< 18; pos
++)
484 d_block_enc
[pos
] = crypto1_byte(pcs
, 0x00, 0) ^ d_block
[pos
];
485 par
[pos
>>3] |= (((filter(pcs
->odd
) ^ oddparity8(d_block
[pos
])) & 0x01) << (7 - (pos
&0x0007)));
488 ReaderTransmitPar(d_block_enc
, sizeof(d_block_enc
), par
, NULL
);
490 // Receive the response
491 len
= ReaderReceive(receivedAnswer
, receivedAnswerPar
);
494 for (i
= 0; i
< 4; i
++)
495 res
|= (crypto1_bit(pcs
, 0, 0) ^ BIT(receivedAnswer
[0], i
)) << i
;
497 if ((len
!= 1) || (res
!= 0x0A)) {
498 if (MF_DBGLEVEL
>= 1) Dbprintf("Cmd send data2 Error: %02x", res
);
505 /* // command not needed, but left for future testing
506 int mifare_ultra_writeblock_compat(uint8_t blockNo, uint8_t *blockData)
509 uint8_t par[3] = {0}; // enough for 18 parity bits
510 uint8_t d_block[18] = {0x00};
511 uint8_t receivedAnswer[MAX_FRAME_SIZE];
512 uint8_t receivedAnswerPar[MAX_PARITY_SIZE];
514 len = mifare_sendcmd_short(NULL, true, 0xA0, blockNo, receivedAnswer, receivedAnswerPar, NULL);
516 if ((len != 1) || (receivedAnswer[0] != 0x0A)) { // 0x0a - ACK
517 if (MF_DBGLEVEL >= MF_DBG_ERROR)
518 Dbprintf("Cmd Addr Error: %02x", receivedAnswer[0]);
522 memcpy(d_block, blockData, 16);
523 AppendCrc14443a(d_block, 16);
525 ReaderTransmitPar(d_block, sizeof(d_block), par, NULL);
527 len = ReaderReceive(receivedAnswer, receivedAnswerPar);
529 if ((len != 1) || (receivedAnswer[0] != 0x0A)) { // 0x0a - ACK
530 if (MF_DBGLEVEL >= MF_DBG_ERROR)
531 Dbprintf("Cmd Data Error: %02x %d", receivedAnswer[0],len);
538 int mifare_ultra_writeblock(uint8_t blockNo
, uint8_t *blockData
)
541 uint8_t d_block
[5] = {0x00};
542 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
543 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
545 // command MIFARE_CLASSIC_WRITEBLOCK
547 memcpy(d_block
+1,blockData
,4);
548 //AppendCrc14443a(d_block, 6);
550 len
= mifare_sendcmd(0xA2, d_block
, sizeof(d_block
), receivedAnswer
, receivedAnswerPar
, NULL
);
552 if (receivedAnswer
[0] != 0x0A) { // 0x0a - ACK
553 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
554 Dbprintf("Cmd Send Error: %02x %d", receivedAnswer
[0],len
);
560 int mifare_classic_halt(struct Crypto1State
*pcs
, uint32_t uid
)
563 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
564 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
566 len
= mifare_sendcmd_short(pcs
, pcs
== NULL
? false:true, 0x50, 0x00, receivedAnswer
, receivedAnswerPar
, NULL
);
568 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
569 Dbprintf("halt error. response len: %x", len
);
576 int mifare_ultra_halt()
579 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
580 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
582 len
= mifare_sendcmd_short(NULL
, true, 0x50, 0x00, receivedAnswer
, receivedAnswerPar
, NULL
);
584 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
585 Dbprintf("halt error. response len: %x", len
);
592 // Mifare Memory Structure: up to 32 Sectors with 4 blocks each (1k and 2k cards),
593 // plus evtl. 8 sectors with 16 blocks each (4k cards)
594 uint8_t NumBlocksPerSector(uint8_t sectorNo
)
602 uint8_t FirstBlockOfSector(uint8_t sectorNo
)
607 return 32*4 + (sectorNo
- 32) * 16;
611 uint8_t SectorTrailer(uint8_t blockNo
)
613 if (blockNo
< 32*4) {
614 return (blockNo
| 0x03);
616 return (blockNo
| 0x0f);
620 bool IsSectorTrailer(uint8_t blockNo
)
622 return (blockNo
== SectorTrailer(blockNo
));
625 // work with emulator memory
626 void emlSetMem(uint8_t *data
, int blockNum
, int blocksCount
) {
627 uint8_t* emCARD
= BigBuf_get_EM_addr();
628 memcpy(emCARD
+ blockNum
* 16, data
, blocksCount
* 16);
631 void emlGetMem(uint8_t *data
, int blockNum
, int blocksCount
) {
632 uint8_t* emCARD
= BigBuf_get_EM_addr();
633 memcpy(data
, emCARD
+ blockNum
* 16, blocksCount
* 16);
636 void emlGetMemBt(uint8_t *data
, int bytePtr
, int byteCount
) {
637 uint8_t* emCARD
= BigBuf_get_EM_addr();
638 memcpy(data
, emCARD
+ bytePtr
, byteCount
);
641 int emlCheckValBl(int blockNum
) {
642 uint8_t* emCARD
= BigBuf_get_EM_addr();
643 uint8_t* data
= emCARD
+ blockNum
* 16;
645 if ((data
[0] != (data
[4] ^ 0xff)) || (data
[0] != data
[8]) ||
646 (data
[1] != (data
[5] ^ 0xff)) || (data
[1] != data
[9]) ||
647 (data
[2] != (data
[6] ^ 0xff)) || (data
[2] != data
[10]) ||
648 (data
[3] != (data
[7] ^ 0xff)) || (data
[3] != data
[11]) ||
649 (data
[12] != (data
[13] ^ 0xff)) || (data
[12] != data
[14]) ||
650 (data
[12] != (data
[15] ^ 0xff))
656 int emlGetValBl(uint32_t *blReg
, uint8_t *blBlock
, int blockNum
) {
657 uint8_t* emCARD
= BigBuf_get_EM_addr();
658 uint8_t* data
= emCARD
+ blockNum
* 16;
660 if (emlCheckValBl(blockNum
)) {
664 memcpy(blReg
, data
, 4);
669 int emlSetValBl(uint32_t blReg
, uint8_t blBlock
, int blockNum
) {
670 uint8_t* emCARD
= BigBuf_get_EM_addr();
671 uint8_t* data
= emCARD
+ blockNum
* 16;
673 memcpy(data
+ 0, &blReg
, 4);
674 memcpy(data
+ 8, &blReg
, 4);
675 blReg
= blReg
^ 0xffffffff;
676 memcpy(data
+ 4, &blReg
, 4);
679 data
[13] = blBlock
^ 0xff;
681 data
[15] = blBlock
^ 0xff;
686 uint64_t emlGetKey(int sectorNum
, int keyType
) {
688 uint8_t* emCARD
= BigBuf_get_EM_addr();
690 memcpy(key
, emCARD
+ 16 * (FirstBlockOfSector(sectorNum
) + NumBlocksPerSector(sectorNum
) - 1) + keyType
* 10, 6);
691 return bytes_to_num(key
, 6);
694 void emlClearMem(void) {
697 const uint8_t trailer
[] = {0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff, 0x07, 0x80, 0x69, 0xff, 0xff, 0xff, 0xff, 0xff, 0xff};
698 const uint8_t uid
[] = {0xe6, 0x84, 0x87, 0xf3, 0x16, 0x88, 0x04, 0x00, 0x46, 0x8e, 0x45, 0x55, 0x4d, 0x70, 0x41, 0x04};
699 uint8_t* emCARD
= BigBuf_get_EM_addr();
701 memset(emCARD
, 0, CARD_MEMORY_SIZE
);
703 // fill sectors trailer data
704 for(b
= 3; b
< 256; b
<127?(b
+=4):(b
+=16)) {
705 emlSetMem((uint8_t *)trailer
, b
, 1);
709 emlSetMem((uint8_t *)uid
, 0, 1);
714 // Mifare desfire commands
715 int mifare_sendcmd_special(struct Crypto1State
*pcs
, uint8_t crypted
, uint8_t cmd
, uint8_t* data
, uint8_t* answer
, uint8_t *answer_parity
, uint32_t *timing
)
717 uint8_t dcmd
[5] = {0x00};
719 memcpy(dcmd
+1,data
,2);
720 AppendCrc14443a(dcmd
, 3);
722 ReaderTransmit(dcmd
, sizeof(dcmd
), NULL
);
723 int len
= ReaderReceive(answer
, answer_parity
);
725 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
726 Dbprintf("Authentication failed. Card timeout.");
732 int mifare_sendcmd_special2(struct Crypto1State
*pcs
, uint8_t crypted
, uint8_t cmd
, uint8_t* data
, uint8_t* answer
,uint8_t *answer_parity
, uint32_t *timing
)
734 uint8_t dcmd
[20] = {0x00};
736 memcpy(dcmd
+1,data
,17);
737 AppendCrc14443a(dcmd
, 18);
739 ReaderTransmit(dcmd
, sizeof(dcmd
), NULL
);
740 int len
= ReaderReceive(answer
, answer_parity
);
742 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
743 Dbprintf("Authentication failed. Card timeout.");
749 int mifare_desfire_des_auth1(uint32_t uid
, uint8_t *blockData
){
752 // load key, keynumber
753 uint8_t data
[2]={0x0a, 0x00};
754 uint8_t receivedAnswer
[MAX_FRAME_SIZE
];
755 uint8_t receivedAnswerPar
[MAX_PARITY_SIZE
];
757 len
= mifare_sendcmd_special(NULL
, 1, 0x02, data
, receivedAnswer
,receivedAnswerPar
,NULL
);
759 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
760 Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
765 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) {
766 Dbprintf("Auth1 Resp: %02x%02x%02x%02x%02x%02x%02x%02x%02x%02x%02x",
767 receivedAnswer
[0],receivedAnswer
[1],receivedAnswer
[2],receivedAnswer
[3],receivedAnswer
[4],
768 receivedAnswer
[5],receivedAnswer
[6],receivedAnswer
[7],receivedAnswer
[8],receivedAnswer
[9],
769 receivedAnswer
[10],receivedAnswer
[11]);
771 memcpy(blockData
, receivedAnswer
, 12);
777 int mifare_desfire_des_auth2(uint32_t uid
, uint8_t *key
, uint8_t *blockData
){
780 uint8_t data
[17] = {0x00};
782 memcpy(data
+1,key
,16);
784 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
785 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
787 len
= mifare_sendcmd_special2(NULL
, 1, 0x03, data
, receivedAnswer
, receivedAnswerPar
,NULL
);
789 if ((receivedAnswer
[0] == 0x03) && (receivedAnswer
[1] == 0xae)) {
790 if (MF_DBGLEVEL
>= MF_DBG_ERROR
)
791 Dbprintf("Auth Error: %02x %02x", receivedAnswer
[0], receivedAnswer
[1]);
796 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) {
797 Dbprintf("Auth2 Resp: %02x%02x%02x%02x%02x%02x%02x%02x%02x%02x",
798 receivedAnswer
[0],receivedAnswer
[1],receivedAnswer
[2],receivedAnswer
[3],receivedAnswer
[4],
799 receivedAnswer
[5],receivedAnswer
[6],receivedAnswer
[7],receivedAnswer
[8],receivedAnswer
[9],
800 receivedAnswer
[10],receivedAnswer
[11]);
802 memcpy(blockData
, receivedAnswer
, 12);
808 //-----------------------------------------------------------------------------
811 //-----------------------------------------------------------------------------
813 int MifareChkBlockKey(uint8_t *uid
, uint32_t *cuid
, uint8_t *cascade_levels
, uint64_t ui64Key
, uint8_t blockNo
, uint8_t keyType
, uint8_t debugLevel
) {
815 struct Crypto1State mpcs
= {0, 0};
816 struct Crypto1State
*pcs
;
819 // Iceman: use piwi's faster nonce collecting part in hardnested.
820 if (*cascade_levels
== 0) { // need a full select cycle to get the uid first
821 iso14a_card_select_t card_info
;
822 if(!iso14443a_select_card(uid
, &card_info
, cuid
, true, 0, true)) {
823 if (debugLevel
>= 1) Dbprintf("ChkKeys: Can't select card");
826 switch (card_info
.uidlen
) {
827 case 4 : *cascade_levels
= 1; break;
828 case 7 : *cascade_levels
= 2; break;
829 case 10: *cascade_levels
= 3; break;
832 } else { // no need for anticollision. We can directly select the card
833 if(!iso14443a_select_card(uid
, NULL
, NULL
, false, *cascade_levels
, true)) {
834 if (debugLevel
>= 1) Dbprintf("ChkKeys: Can't select card (UID) lvl=%d", *cascade_levels
);
839 if(mifare_classic_auth(pcs
, *cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
)) {
840 // SpinDelayUs(AUTHENTICATION_TIMEOUT); // it not needs because mifare_classic_auth have timeout from iso14a_set_timeout()
843 /* // let it be here. it like halt command, but maybe it will work in some strange cases
844 uint8_t dummy_answer = 0;
845 ReaderTransmit(&dummy_answer, 1, NULL);
846 int timeout = GetCountSspClk() + AUTHENTICATION_TIMEOUT;
847 // wait for the card to become ready again
848 while(GetCountSspClk() < timeout) {};
850 // it needs after success authentication
851 mifare_classic_halt(pcs
, *cuid
);
858 int MifareChkBlockKeys(uint8_t *keys
, uint8_t keyCount
, uint8_t blockNo
, uint8_t keyType
, uint8_t debugLevel
) {
861 uint8_t cascade_levels
= 0;
862 uint64_t ui64Key
= 0;
865 for (uint8_t i
= 0; i
< keyCount
; i
++) {
867 // Allow button press / usb cmd to interrupt device
868 if (BUTTON_PRESS() && !usb_poll_validate_length()) {
869 Dbprintf("ChkKeys: Cancel operation. Exit...");
873 ui64Key
= bytes_to_num(keys
+ i
* 6, 6);
874 int res
= MifareChkBlockKey(uid
, &cuid
, &cascade_levels
, ui64Key
, blockNo
, keyType
, debugLevel
);
879 if (retryCount
>= 5) {
880 Dbprintf("ChkKeys: block=%d key=%d. Can't select. Exit...", blockNo
, keyType
);
883 --i
; // try the same key once again
886 // Dbprintf("ChkKeys: block=%d key=%d. Try the same key once again...", blockNo, keyType);
890 // can't authenticate
893 continue; // can't auth. wrong key.
902 // multisector multikey check
903 int MifareMultisectorChk(uint8_t *keys
, uint8_t keyCount
, uint8_t SectorCount
, uint8_t keyType
, uint8_t debugLevel
, TKeyIndex
*keyIndex
) {
906 // int clk = GetCountSspClk();
908 for(int sc
= 0; sc
< SectorCount
; sc
++){
913 res
= MifareChkBlockKeys(keys
, keyCount
, FirstBlockOfSector(sc
), keyAB
& 0x01, debugLevel
);
918 (*keyIndex
)[keyAB
& 0x01][sc
] = res
;
920 } while(--keyAB
> 0);
923 // Dbprintf("%d %d", GetCountSspClk() - clk, (GetCountSspClk() - clk)/(SectorCount*keyCount*(keyType==2?2:1)));