1 //-----------------------------------------------------------------------------
2 // Merlok - June 2011, 2012
3 // Gerhard de Koning Gans - May 2008
4 // Hagen Fritsch - June 2010
5 // Midnitesnake - Dec 2013
6 // Andy Davies - Apr 2014
9 // This code is licensed to you under the terms of the GNU GPL, version 2 or,
10 // at your option, any later version. See the LICENSE.txt file for the text of
12 //-----------------------------------------------------------------------------
13 // Routines to support ISO 14443 type A.
14 //-----------------------------------------------------------------------------
16 #include "mifarecmd.h"
19 //#include "../client/loclass/des.h"
23 //-----------------------------------------------------------------------------
24 // Select, Authenticate, Read a MIFARE tag.
26 //-----------------------------------------------------------------------------
27 void MifareReadBlock(uint8_t arg0
, uint8_t arg1
, uint8_t arg2
, uint8_t *datain
)
30 uint8_t blockNo
= arg0
;
31 uint8_t keyType
= arg1
;
33 ui64Key
= bytes_to_num(datain
, 6);
37 byte_t dataoutbuf
[16];
40 struct Crypto1State mpcs
= {0, 0};
41 struct Crypto1State
*pcs
;
46 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
53 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
54 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
58 if(mifare_classic_auth(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
)) {
59 if (MF_DBGLEVEL
>= 1) Dbprintf("Auth error");
63 if(mifare_classic_readblock(pcs
, cuid
, blockNo
, dataoutbuf
)) {
64 if (MF_DBGLEVEL
>= 1) Dbprintf("Read block error");
68 if(mifare_classic_halt(pcs
, cuid
)) {
69 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
77 // ----------------------------- crypto1 destroy
80 if (MF_DBGLEVEL
>= 2) DbpString("READ BLOCK FINISHED");
83 cmd_send(CMD_ACK
,isOK
,0,0,dataoutbuf
,16);
86 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
91 void MifareUC_Auth1(uint8_t arg0
, uint8_t *datain
){
93 byte_t dataoutbuf
[16] = {0x00};
94 uint8_t uid
[10] = {0x00};
97 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
100 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
102 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
103 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Can't select card");
108 if(mifare_ultra_auth1(dataoutbuf
)){
109 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Authentication part1: Fail.");
114 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) DbpString("AUTH 1 FINISHED");
116 cmd_send(CMD_ACK
,1,cuid
,0,dataoutbuf
,11);
119 void MifareUC_Auth2(uint32_t arg0
, uint8_t *datain
){
121 uint8_t key
[16] = {0x00};
122 byte_t dataoutbuf
[16] = {0x00};
124 memcpy(key
, datain
, 16);
126 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
128 if(mifare_ultra_auth2(key
, dataoutbuf
)){
129 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Authentication part2: Fail...");
134 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) DbpString("AUTH 2 FINISHED");
136 cmd_send(CMD_ACK
,1,0,0,dataoutbuf
,11);
137 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
141 void MifareUReadBlock(uint8_t arg0
, uint8_t arg1
, uint8_t *datain
)
143 uint8_t blockNo
= arg0
;
144 byte_t dataout
[16] = {0x00};
145 uint8_t uid
[10] = {0x00};
146 uint8_t key
[16] = {0x00};
147 bool usePwd
= (arg1
== 1);
149 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
152 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
154 int len
= iso14443a_select_card(uid
, NULL
, NULL
);
156 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Can't select card (RC:%02X)",len
);
161 // authenticate here.
164 memcpy(key
, datain
, 16);
166 // Dbprintf("KEY: %02x %02x %02x %02x %02x %02x %02x %02x", key[0],key[1],key[2],key[3],key[4],key[5],key[6],key[7] );
167 // Dbprintf("KEY: %02x %02x %02x %02x %02x %02x %02x %02x", key[8],key[9],key[10],key[11],key[12],key[13],key[14],key[15] );
169 uint8_t a
[8] = {1,1,1,1,1,1,1,1 };
170 uint8_t b
[8] = {0x00};
171 uint8_t enc_b
[8] = {0x00};
172 uint8_t ab
[16] = {0x00};
173 uint8_t enc_ab
[16] = {0x00};
174 uint8_t enc_key
[8] = {0x00};
177 uint8_t receivedAnswer
[MAX_FRAME_SIZE
];
178 uint8_t receivedAnswerPar
[MAX_PARITY_SIZE
];
180 len
= mifare_sendcmd_short(NULL
, 1, 0x1A, 0x00, receivedAnswer
,receivedAnswerPar
,NULL
);
182 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
188 memcpy(enc_b
,receivedAnswer
+1,8);
191 tdes_2key_dec(b
, enc_b
, 8, key
);
193 Dbprintf("enc_B: %02x %02x %02x %02x %02x %02x %02x %02x", enc_b
[0],enc_b
[1],enc_b
[2],enc_b
[3],enc_b
[4],enc_b
[5],enc_b
[6],enc_b
[7] );
194 Dbprintf(" B: %02x %02x %02x %02x %02x %02x %02x %02x", b
[0],b
[1],b
[2],b
[3],b
[4],b
[5],b
[6],b
[7] );
200 Dbprintf("AB: %02x %02x %02x %02x %02x %02x %02x %02x", ab
[0],ab
[1],ab
[2],ab
[3],ab
[4],ab
[5],ab
[6],ab
[7] );
201 Dbprintf("AB: %02x %02x %02x %02x %02x %02x %02x %02x", ab
[8],ab
[9],ab
[10],ab
[11],ab
[12],ab
[13],ab
[14],ab
[15] );
204 tdes_2key_enc(enc_ab
, ab
, 16, key
);
206 Dbprintf("e_AB: %02x %02x %02x %02x %02x %02x %02x %02x", enc_ab
[0],enc_ab
[1],enc_ab
[2],enc_ab
[3],enc_ab
[4],enc_ab
[5],enc_ab
[6],enc_ab
[7] );
207 Dbprintf("e_enc_ab: %02x %02x %02x %02x %02x %02x %02x %02x", enc_ab
[8],enc_ab
[9],enc_ab
[10],enc_ab
[11],enc_ab
[12],enc_ab
[13],enc_ab
[14],enc_ab
[15] );
209 len
= mifare_sendcmd_short_mfucauth(NULL
, 1, 0xAF, enc_ab
, receivedAnswer
, receivedAnswerPar
, NULL
);
211 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Cmd Error: %02x", receivedAnswer
[0]);
216 // the tags' encryption of our nonce, A.
217 memcpy(enc_key
, receivedAnswer
+1, 8);
223 tdes_2key_dec(b
, enc_key
, 8, key
);
224 if ( memcmp(a
, b
, 8) == 0 )
225 Dbprintf("Verified key");
227 Dbprintf("failed authentication");
229 Dbprintf("a: %02x %02x %02x %02x %02x %02x %02x %02x", a
[0],a
[1],a
[2],a
[3],a
[4],a
[5],a
[6],a
[7] );
230 Dbprintf("b: %02x %02x %02x %02x %02x %02x %02x %02x", b
[0],b
[1],b
[2],b
[3],b
[4],b
[5],b
[6],b
[7] );
233 if( mifare_ultra_readblock(blockNo
, dataout
) ) {
234 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Read block error");
239 if( mifare_ultra_halt() ) {
240 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Halt error");
245 cmd_send(CMD_ACK
,1,0,0,dataout
,16);
246 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
249 //-----------------------------------------------------------------------------
250 // Select, Authenticate, Read a MIFARE tag.
251 // read sector (data = 4 x 16 bytes = 64 bytes, or 16 x 16 bytes = 256 bytes)
252 //-----------------------------------------------------------------------------
253 void MifareReadSector(uint8_t arg0
, uint8_t arg1
, uint8_t arg2
, uint8_t *datain
)
256 uint8_t sectorNo
= arg0
;
257 uint8_t keyType
= arg1
;
258 uint64_t ui64Key
= 0;
259 ui64Key
= bytes_to_num(datain
, 6);
263 byte_t dataoutbuf
[16 * 16];
266 struct Crypto1State mpcs
= {0, 0};
267 struct Crypto1State
*pcs
;
273 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
280 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
282 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
286 if(isOK
&& mifare_classic_auth(pcs
, cuid
, FirstBlockOfSector(sectorNo
), keyType
, ui64Key
, AUTH_FIRST
)) {
288 if (MF_DBGLEVEL
>= 1) Dbprintf("Auth error");
291 for (uint8_t blockNo
= 0; isOK
&& blockNo
< NumBlocksPerSector(sectorNo
); blockNo
++) {
292 if(mifare_classic_readblock(pcs
, cuid
, FirstBlockOfSector(sectorNo
) + blockNo
, dataoutbuf
+ 16 * blockNo
)) {
294 if (MF_DBGLEVEL
>= 1) Dbprintf("Read sector %2d block %2d error", sectorNo
, blockNo
);
299 if(mifare_classic_halt(pcs
, cuid
)) {
300 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
303 // ----------------------------- crypto1 destroy
304 crypto1_destroy(pcs
);
306 if (MF_DBGLEVEL
>= 2) DbpString("READ SECTOR FINISHED");
309 cmd_send(CMD_ACK
,isOK
,0,0,dataoutbuf
,16*NumBlocksPerSector(sectorNo
));
313 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
317 void MifareUReadCard(uint8_t arg0
, int arg1
, uint8_t *datain
)
320 uint8_t sectorNo
= arg0
;
323 byte_t dataout
[176] = {0x00};;
324 uint32_t cuid
= 0x00;
326 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
328 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
330 int len
= iso14443a_select_card(NULL
, NULL
, &cuid
);
332 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Can't select card (RC:%d)",len
);
337 for (int i
= 0; i
< Pages
; i
++){
339 len
= mifare_ultra_readblock(sectorNo
* 4 + i
, dataout
+ 4 * i
);
342 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Read block %d error",i
);
350 len
= mifare_ultra_halt();
352 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Halt error");
357 if (MF_DBGLEVEL
>= MF_DBG_ALL
) Dbprintf("Pages read %d", countpages
);
359 len
= 16*4; //64 bytes
362 if (Pages
== 44 && countpages
> 16)
365 cmd_send(CMD_ACK
, 1, 0, 0, dataout
, len
);
366 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
371 //-----------------------------------------------------------------------------
372 // Select, Authenticate, Write a MIFARE tag.
374 //-----------------------------------------------------------------------------
375 void MifareWriteBlock(uint8_t arg0
, uint8_t arg1
, uint8_t arg2
, uint8_t *datain
)
378 uint8_t blockNo
= arg0
;
379 uint8_t keyType
= arg1
;
380 uint64_t ui64Key
= 0;
381 byte_t blockdata
[16];
383 ui64Key
= bytes_to_num(datain
, 6);
384 memcpy(blockdata
, datain
+ 10, 16);
390 struct Crypto1State mpcs
= {0, 0};
391 struct Crypto1State
*pcs
;
397 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
404 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
405 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
409 if(mifare_classic_auth(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
)) {
410 if (MF_DBGLEVEL
>= 1) Dbprintf("Auth error");
414 if(mifare_classic_writeblock(pcs
, cuid
, blockNo
, blockdata
)) {
415 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
419 if(mifare_classic_halt(pcs
, cuid
)) {
420 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
428 // ----------------------------- crypto1 destroy
429 crypto1_destroy(pcs
);
431 if (MF_DBGLEVEL
>= 2) DbpString("WRITE BLOCK FINISHED");
434 cmd_send(CMD_ACK
,isOK
,0,0,0,0);
439 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
443 void MifareUWriteBlock(uint8_t arg0
, uint8_t *datain
)
445 uint8_t blockNo
= arg0
;
446 byte_t blockdata
[16] = {0x00};
448 memcpy(blockdata
, datain
, 16);
450 uint8_t uid
[10] = {0x00};
452 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
455 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
457 if(!iso14443a_select_card(uid
, NULL
, NULL
)) {
458 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
463 if(mifare_ultra_writeblock(blockNo
, blockdata
)) {
464 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
468 if(mifare_ultra_halt()) {
469 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
474 if (MF_DBGLEVEL
>= 2) DbpString("WRITE BLOCK FINISHED");
476 cmd_send(CMD_ACK
,1,0,0,0,0);
477 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
481 void MifareUWriteBlock_Special(uint8_t arg0
, uint8_t *datain
)
483 uint8_t blockNo
= arg0
;
484 byte_t blockdata
[4] = {0x00};
486 memcpy(blockdata
, datain
,4);
488 uint8_t uid
[10] = {0x00};
490 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
492 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
494 if(!iso14443a_select_card(uid
, NULL
, NULL
)) {
495 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
500 if(mifare_ultra_special_writeblock(blockNo
, blockdata
)) {
501 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
506 if(mifare_ultra_halt()) {
507 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
512 if (MF_DBGLEVEL
>= 2) DbpString("WRITE BLOCK FINISHED");
514 cmd_send(CMD_ACK
,1,0,0,0,0);
515 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
519 void MifareUSetPwd(uint8_t arg0
, uint8_t *datain
){
521 uint8_t pwd
[16] = {0x00};
522 byte_t blockdata
[4] = {0x00};
524 memcpy(pwd
, datain
, 16);
526 LED_A_ON(); LED_B_OFF(); LED_C_OFF();
528 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
530 if(!iso14443a_select_card(NULL
, NULL
, NULL
)) {
531 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
536 blockdata
[0] = pwd
[7];
537 blockdata
[1] = pwd
[6];
538 blockdata
[2] = pwd
[5];
539 blockdata
[3] = pwd
[4];
540 if(mifare_ultra_special_writeblock( 44, blockdata
)) {
541 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
546 blockdata
[0] = pwd
[3];
547 blockdata
[1] = pwd
[2];
548 blockdata
[2] = pwd
[1];
549 blockdata
[3] = pwd
[0];
550 if(mifare_ultra_special_writeblock( 45, blockdata
)) {
551 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
556 blockdata
[0] = pwd
[15];
557 blockdata
[1] = pwd
[14];
558 blockdata
[2] = pwd
[13];
559 blockdata
[3] = pwd
[12];
560 if(mifare_ultra_special_writeblock( 46, blockdata
)) {
561 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
566 blockdata
[0] = pwd
[11];
567 blockdata
[1] = pwd
[10];
568 blockdata
[2] = pwd
[9];
569 blockdata
[3] = pwd
[8];
570 if(mifare_ultra_special_writeblock( 47, blockdata
)) {
571 if (MF_DBGLEVEL
>= 1) Dbprintf("Write block error");
576 if(mifare_ultra_halt()) {
577 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
582 cmd_send(CMD_ACK
,1,0,0,0,0);
583 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
587 // Return 1 if the nonce is invalid else return 0
588 int valid_nonce(uint32_t Nt
, uint32_t NtEnc
, uint32_t Ks1
, uint8_t *parity
) {
589 return ((oddparity((Nt
>> 24) & 0xFF) == ((parity
[0]) ^ oddparity((NtEnc
>> 24) & 0xFF) ^ BIT(Ks1
,16))) & \
590 (oddparity((Nt
>> 16) & 0xFF) == ((parity
[1]) ^ oddparity((NtEnc
>> 16) & 0xFF) ^ BIT(Ks1
,8))) & \
591 (oddparity((Nt
>> 8) & 0xFF) == ((parity
[2]) ^ oddparity((NtEnc
>> 8) & 0xFF) ^ BIT(Ks1
,0)))) ? 1 : 0;
595 //-----------------------------------------------------------------------------
596 // MIFARE nested authentication.
598 //-----------------------------------------------------------------------------
599 void MifareNested(uint32_t arg0
, uint32_t arg1
, uint32_t calibrate
, uint8_t *datain
)
602 uint8_t blockNo
= arg0
& 0xff;
603 uint8_t keyType
= (arg0
>> 8) & 0xff;
604 uint8_t targetBlockNo
= arg1
& 0xff;
605 uint8_t targetKeyType
= (arg1
>> 8) & 0xff;
606 uint64_t ui64Key
= 0;
608 ui64Key
= bytes_to_num(datain
, 6);
611 uint16_t rtr
, i
, j
, len
;
613 static uint16_t dmin
, dmax
;
615 uint32_t cuid
, nt1
, nt2
, nttmp
, nttest
, ks1
;
617 uint32_t target_nt
[2], target_ks
[2];
619 uint8_t par_array
[4];
621 struct Crypto1State mpcs
= {0, 0};
622 struct Crypto1State
*pcs
;
624 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
626 uint32_t auth1_time
, auth2_time
;
627 static uint16_t delta_time
;
629 // free eventually allocated BigBuf memory
635 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
641 // statistics on nonce distance
642 if (calibrate
) { // for first call only. Otherwise reuse previous calibration
650 for (rtr
= 0; rtr
< 17; rtr
++) {
652 // prepare next select. No need to power down the card.
653 if(mifare_classic_halt(pcs
, cuid
)) {
654 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Halt error");
659 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
660 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Can't select card");
666 if(mifare_classic_authex(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
, &nt1
, &auth1_time
)) {
667 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Auth1 error");
673 auth2_time
= auth1_time
+ delta_time
;
677 if(mifare_classic_authex(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_NESTED
, &nt2
, &auth2_time
)) {
678 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Auth2 error");
683 nttmp
= prng_successor(nt1
, 100); //NXP Mifare is typical around 840,but for some unlicensed/compatible mifare card this can be 160
684 for (i
= 101; i
< 1200; i
++) {
685 nttmp
= prng_successor(nttmp
, 1);
686 if (nttmp
== nt2
) break;
696 delta_time
= auth2_time
- auth1_time
+ 32; // allow some slack for proper timing
698 if (MF_DBGLEVEL
>= 3) Dbprintf("Nested: calibrating... ntdist=%d", i
);
702 if (rtr
<= 1) return;
704 davg
= (davg
+ (rtr
- 1)/2) / (rtr
- 1);
706 if (MF_DBGLEVEL
>= 3) Dbprintf("min=%d max=%d avg=%d, delta_time=%d", dmin
, dmax
, davg
, delta_time
);
714 // -------------------------------------------------------------------------------------------------
718 // get crypted nonces for target sector
719 for(i
=0; i
< 2; i
++) { // look for exactly two different nonces
722 while(target_nt
[i
] == 0) { // continue until we have an unambiguous nonce
724 // prepare next select. No need to power down the card.
725 if(mifare_classic_halt(pcs
, cuid
)) {
726 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Halt error");
730 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
731 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Can't select card");
736 if(mifare_classic_authex(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
, &nt1
, &auth1_time
)) {
737 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Auth1 error");
741 // nested authentication
742 auth2_time
= auth1_time
+ delta_time
;
743 len
= mifare_sendcmd_shortex(pcs
, AUTH_NESTED
, 0x60 + (targetKeyType
& 0x01), targetBlockNo
, receivedAnswer
, par
, &auth2_time
);
745 if (MF_DBGLEVEL
>= 1) Dbprintf("Nested: Auth2 error len=%d", len
);
749 nt2
= bytes_to_num(receivedAnswer
, 4);
750 if (MF_DBGLEVEL
>= 3) Dbprintf("Nonce#%d: Testing nt1=%08x nt2enc=%08x nt2par=%02x", i
+1, nt1
, nt2
, par
[0]);
752 // Parity validity check
753 for (j
= 0; j
< 4; j
++) {
754 par_array
[j
] = (oddparity(receivedAnswer
[j
]) != ((par
[0] >> (7-j
)) & 0x01));
758 nttest
= prng_successor(nt1
, dmin
- 1);
759 for (j
= dmin
; j
< dmax
+ 1; j
++) {
760 nttest
= prng_successor(nttest
, 1);
763 if (valid_nonce(nttest
, nt2
, ks1
, par_array
)){
764 if (ncount
> 0) { // we are only interested in disambiguous nonces, try again
765 if (MF_DBGLEVEL
>= 3) Dbprintf("Nonce#%d: dismissed (ambigous), ntdist=%d", i
+1, j
);
769 target_nt
[i
] = nttest
;
772 if (i
== 1 && target_nt
[1] == target_nt
[0]) { // we need two different nonces
774 if (MF_DBGLEVEL
>= 3) Dbprintf("Nonce#2: dismissed (= nonce#1), ntdist=%d", j
);
777 if (MF_DBGLEVEL
>= 3) Dbprintf("Nonce#%d: valid, ntdist=%d", i
+1, j
);
780 if (target_nt
[i
] == 0 && j
== dmax
+1 && MF_DBGLEVEL
>= 3) Dbprintf("Nonce#%d: dismissed (all invalid)", i
+1);
786 // ----------------------------- crypto1 destroy
787 crypto1_destroy(pcs
);
789 byte_t buf
[4 + 4 * 4];
790 memcpy(buf
, &cuid
, 4);
791 memcpy(buf
+4, &target_nt
[0], 4);
792 memcpy(buf
+8, &target_ks
[0], 4);
793 memcpy(buf
+12, &target_nt
[1], 4);
794 memcpy(buf
+16, &target_ks
[1], 4);
797 cmd_send(CMD_ACK
, 0, 2, targetBlockNo
+ (targetKeyType
* 0x100), buf
, sizeof(buf
));
800 if (MF_DBGLEVEL
>= 3) DbpString("NESTED FINISHED");
802 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
807 //-----------------------------------------------------------------------------
808 // MIFARE check keys. key count up to 85.
810 //-----------------------------------------------------------------------------
811 void MifareChkKeys(uint8_t arg0
, uint8_t arg1
, uint8_t arg2
, uint8_t *datain
)
814 uint8_t blockNo
= arg0
;
815 uint8_t keyType
= arg1
;
816 uint8_t keyCount
= arg2
;
817 uint64_t ui64Key
= 0;
824 struct Crypto1State mpcs
= {0, 0};
825 struct Crypto1State
*pcs
;
829 int OLD_MF_DBGLEVEL
= MF_DBGLEVEL
;
830 MF_DBGLEVEL
= MF_DBG_NONE
;
836 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
842 for (i
= 0; i
< keyCount
; i
++) {
843 if(mifare_classic_halt(pcs
, cuid
)) {
844 if (MF_DBGLEVEL
>= 1) Dbprintf("ChkKeys: Halt error");
847 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
848 if (OLD_MF_DBGLEVEL
>= 1) Dbprintf("ChkKeys: Can't select card");
852 ui64Key
= bytes_to_num(datain
+ i
* 6, 6);
853 if(mifare_classic_auth(pcs
, cuid
, blockNo
, keyType
, ui64Key
, AUTH_FIRST
)) {
861 // ----------------------------- crypto1 destroy
862 crypto1_destroy(pcs
);
865 cmd_send(CMD_ACK
,isOK
,0,0,datain
+ i
* 6,6);
868 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
871 // restore debug level
872 MF_DBGLEVEL
= OLD_MF_DBGLEVEL
;
875 //-----------------------------------------------------------------------------
876 // MIFARE commands set debug level
878 //-----------------------------------------------------------------------------
879 void MifareSetDbgLvl(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
881 Dbprintf("Debug level: %d", MF_DBGLEVEL
);
884 //-----------------------------------------------------------------------------
885 // Work with emulator memory
887 //-----------------------------------------------------------------------------
888 void MifareEMemClr(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
892 void MifareEMemSet(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
893 emlSetMem(datain
, arg0
, arg1
); // data, block num, blocks count
896 void MifareEMemGet(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
897 byte_t buf
[USB_CMD_DATA_SIZE
];
898 emlGetMem(buf
, arg0
, arg1
); // data, block num, blocks count (max 4)
901 cmd_send(CMD_ACK
,arg0
,arg1
,0,buf
,USB_CMD_DATA_SIZE
);
905 //-----------------------------------------------------------------------------
906 // Load a card into the emulator memory
908 //-----------------------------------------------------------------------------
909 void MifareECardLoad(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
910 uint8_t numSectors
= arg0
;
911 uint8_t keyType
= arg1
;
912 uint64_t ui64Key
= 0;
914 struct Crypto1State mpcs
= {0, 0};
915 struct Crypto1State
*pcs
;
919 byte_t dataoutbuf
[16];
920 byte_t dataoutbuf2
[16];
927 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
935 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
937 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
940 for (uint8_t sectorNo
= 0; isOK
&& sectorNo
< numSectors
; sectorNo
++) {
941 ui64Key
= emlGetKey(sectorNo
, keyType
);
943 if(isOK
&& mifare_classic_auth(pcs
, cuid
, FirstBlockOfSector(sectorNo
), keyType
, ui64Key
, AUTH_FIRST
)) {
945 if (MF_DBGLEVEL
>= 1) Dbprintf("Sector[%2d]. Auth error", sectorNo
);
949 if(isOK
&& mifare_classic_auth(pcs
, cuid
, FirstBlockOfSector(sectorNo
), keyType
, ui64Key
, AUTH_NESTED
)) {
951 if (MF_DBGLEVEL
>= 1) Dbprintf("Sector[%2d]. Auth nested error", sectorNo
);
956 for (uint8_t blockNo
= 0; isOK
&& blockNo
< NumBlocksPerSector(sectorNo
); blockNo
++) {
957 if(isOK
&& mifare_classic_readblock(pcs
, cuid
, FirstBlockOfSector(sectorNo
) + blockNo
, dataoutbuf
)) {
959 if (MF_DBGLEVEL
>= 1) Dbprintf("Error reading sector %2d block %2d", sectorNo
, blockNo
);
963 if (blockNo
< NumBlocksPerSector(sectorNo
) - 1) {
964 emlSetMem(dataoutbuf
, FirstBlockOfSector(sectorNo
) + blockNo
, 1);
965 } else { // sector trailer, keep the keys, set only the AC
966 emlGetMem(dataoutbuf2
, FirstBlockOfSector(sectorNo
) + blockNo
, 1);
967 memcpy(&dataoutbuf2
[6], &dataoutbuf
[6], 4);
968 emlSetMem(dataoutbuf2
, FirstBlockOfSector(sectorNo
) + blockNo
, 1);
975 if(mifare_classic_halt(pcs
, cuid
)) {
976 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
979 // ----------------------------- crypto1 destroy
980 crypto1_destroy(pcs
);
982 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
985 if (MF_DBGLEVEL
>= 2) DbpString("EMUL FILL SECTORS FINISHED");
990 //-----------------------------------------------------------------------------
991 // Work with "magic Chinese" card (email him: ouyangweidaxian@live.cn)
993 //-----------------------------------------------------------------------------
994 void MifareCSetBlock(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
997 uint8_t needWipe
= arg0
;
998 // bit 0 - need get UID
1000 // bit 2 - need HALT after sequence
1001 // bit 3 - need init FPGA and field before sequence
1002 // bit 4 - need reset FPGA and LED
1003 uint8_t workFlags
= arg1
;
1004 uint8_t blockNo
= arg2
;
1007 uint8_t wupC1
[] = { 0x40 };
1008 uint8_t wupC2
[] = { 0x43 };
1009 uint8_t wipeC
[] = { 0x41 };
1013 uint8_t uid
[10] = {0x00};
1014 uint8_t d_block
[18] = {0x00};
1017 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
1018 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
1020 // reset FPGA and LED
1021 if (workFlags
& 0x08) {
1028 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
1033 // get UID from chip
1034 if (workFlags
& 0x01) {
1035 if(!iso14443a_select_card(uid
, NULL
, &cuid
)) {
1036 if (MF_DBGLEVEL
>= 1) Dbprintf("Can't select card");
1040 if(mifare_classic_halt(NULL
, cuid
)) {
1041 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
1048 ReaderTransmitBitsPar(wupC1
,7,0, NULL
);
1049 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1050 if (MF_DBGLEVEL
>= 1) Dbprintf("wupC1 error");
1054 ReaderTransmit(wipeC
, sizeof(wipeC
), NULL
);
1055 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1056 if (MF_DBGLEVEL
>= 1) Dbprintf("wipeC error");
1060 if(mifare_classic_halt(NULL
, cuid
)) {
1061 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
1067 if (workFlags
& 0x02) {
1068 ReaderTransmitBitsPar(wupC1
,7,0, NULL
);
1069 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1070 if (MF_DBGLEVEL
>= 1) Dbprintf("wupC1 error");
1074 ReaderTransmit(wupC2
, sizeof(wupC2
), NULL
);
1075 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1076 if (MF_DBGLEVEL
>= 1) Dbprintf("wupC2 error");
1081 if ((mifare_sendcmd_short(NULL
, 0, 0xA0, blockNo
, receivedAnswer
, receivedAnswerPar
, NULL
) != 1) || (receivedAnswer
[0] != 0x0a)) {
1082 if (MF_DBGLEVEL
>= 1) Dbprintf("write block send command error");
1086 memcpy(d_block
, datain
, 16);
1087 AppendCrc14443a(d_block
, 16);
1089 ReaderTransmit(d_block
, sizeof(d_block
), NULL
);
1090 if ((ReaderReceive(receivedAnswer
, receivedAnswerPar
) != 1) || (receivedAnswer
[0] != 0x0a)) {
1091 if (MF_DBGLEVEL
>= 1) Dbprintf("write block send data error");
1095 if (workFlags
& 0x04) {
1096 if (mifare_classic_halt(NULL
, cuid
)) {
1097 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
1107 cmd_send(CMD_ACK
,isOK
,0,0,uid
,4);
1110 if ((workFlags
& 0x10) || (!isOK
)) {
1111 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
1117 void MifareCGetBlock(uint32_t arg0
, uint32_t arg1
, uint32_t arg2
, uint8_t *datain
){
1120 // bit 1 - need wupC
1121 // bit 2 - need HALT after sequence
1122 // bit 3 - need init FPGA and field before sequence
1123 // bit 4 - need reset FPGA and LED
1124 uint8_t workFlags
= arg0
;
1125 uint8_t blockNo
= arg2
;
1128 uint8_t wupC1
[] = { 0x40 };
1129 uint8_t wupC2
[] = { 0x43 };
1133 uint8_t data
[18] = {0x00};
1136 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
1137 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
1139 if (workFlags
& 0x08) {
1146 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
1150 if (workFlags
& 0x02) {
1151 ReaderTransmitBitsPar(wupC1
,7,0, NULL
);
1152 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1153 if (MF_DBGLEVEL
>= 1) Dbprintf("wupC1 error");
1157 ReaderTransmit(wupC2
, sizeof(wupC2
), NULL
);
1158 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1159 if (MF_DBGLEVEL
>= 1) Dbprintf("wupC2 error");
1165 if ((mifare_sendcmd_short(NULL
, 0, 0x30, blockNo
, receivedAnswer
, receivedAnswerPar
, NULL
) != 18)) {
1166 if (MF_DBGLEVEL
>= 1) Dbprintf("read block send command error");
1169 memcpy(data
, receivedAnswer
, 18);
1171 if (workFlags
& 0x04) {
1172 if (mifare_classic_halt(NULL
, cuid
)) {
1173 if (MF_DBGLEVEL
>= 1) Dbprintf("Halt error");
1183 cmd_send(CMD_ACK
,isOK
,0,0,data
,18);
1186 if ((workFlags
& 0x10) || (!isOK
)) {
1187 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);
1192 void MifareCIdent(){
1195 uint8_t wupC1
[] = { 0x40 };
1196 uint8_t wupC2
[] = { 0x43 };
1201 uint8_t receivedAnswer
[MAX_MIFARE_FRAME_SIZE
];
1202 uint8_t receivedAnswerPar
[MAX_MIFARE_PARITY_SIZE
];
1204 ReaderTransmitBitsPar(wupC1
,7,0, NULL
);
1205 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1209 ReaderTransmit(wupC2
, sizeof(wupC2
), NULL
);
1210 if(!ReaderReceive(receivedAnswer
, receivedAnswerPar
) || (receivedAnswer
[0] != 0x0a)) {
1214 if (mifare_classic_halt(NULL
, 0)) {
1218 cmd_send(CMD_ACK
,isOK
,0,0,0,0);
1225 void Mifare_DES_Auth1(uint8_t arg0
, uint8_t *datain
){
1227 byte_t dataout
[11] = {0x00};
1228 uint8_t uid
[10] = {0x00};
1229 uint32_t cuid
= 0x00;
1232 iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN
);
1234 int len
= iso14443a_select_card(uid
, NULL
, &cuid
);
1236 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Can't select card");
1241 if(mifare_desfire_des_auth1(cuid
, dataout
)){
1242 if (MF_DBGLEVEL
>= MF_DBG_ERROR
) Dbprintf("Authentication part1: Fail.");
1247 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) DbpString("AUTH 1 FINISHED");
1248 cmd_send(CMD_ACK
,1,cuid
,0,dataout
, sizeof(dataout
));
1251 void Mifare_DES_Auth2(uint32_t arg0
, uint8_t *datain
){
1253 uint32_t cuid
= arg0
;
1254 uint8_t key
[16] = {0x00};
1255 byte_t dataout
[12] = {0x00};
1258 memcpy(key
, datain
, 16);
1260 isOK
= mifare_desfire_des_auth2(cuid
, key
, dataout
);
1263 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) Dbprintf("Authentication part2: Failed");
1268 if (MF_DBGLEVEL
>= MF_DBG_EXTENDED
) DbpString("AUTH 2 FINISHED");
1270 cmd_send(CMD_ACK
, isOK
, 0, 0, dataout
, sizeof(dataout
));
1271 FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF
);