#include "mifaredesfire.h"
-#include "des.h"
+#include "BigBuf.h"
#define MAX_APPLICATION_COUNT 28
#define MAX_FILE_COUNT 16
//static uint8_t __res[MAX_FRAME_SIZE];
bool InitDesfireCard(){
-
- byte_t cardbuf[USB_CMD_DATA_SIZE] = {0x00};
- iso14a_card_select_t *card = (iso14a_card_select_t*)cardbuf;
-
- iso14a_set_tracing(TRUE);
iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);
+ set_tracing(TRUE);
+
+ byte_t cardbuf[USB_CMD_DATA_SIZE] = {0x00};
+ iso14a_card_select_t *card = (iso14a_card_select_t*)cardbuf;
- int len = iso14443a_select_card(NULL,card,NULL);
+ int len = iso14443a_select_card(NULL,card,NULL,true,0);
if (!len) {
- if (MF_DBGLEVEL >= 1) Dbprintf("Can't select card");
- OnError();
+ if (MF_DBGLEVEL >= MF_DBG_ERROR)
+ Dbprintf("Can't select card");
+ OnError(1);
return false;
}
return true;
print_result(" RX : ", datain, datalen);
}
- if ( flags & CLEARTRACE ){
- iso14a_clear_trace();
- }
+ if ( flags & CLEARTRACE )
+ clear_trace();
if ( flags & INIT ){
if ( !InitDesfireCard() )
}
int len = DesfireAPDU(datain, datalen, resp);
- if (MF_DBGLEVEL >= 4) {
+ if (MF_DBGLEVEL >= 4)
print_result("ERR <--: ", resp, len);
- }
if ( !len ) {
- OnError();
+ OnError(2);
return;
}
// reset the pcb_blocknum,
pcb_blocknum = 0;
- if ( flags & DISCONNECT ){
+ if ( flags & DISCONNECT )
OnSuccess();
- }
cmd_send(CMD_ACK,1,len,0,resp,len);
}
PCB == 0x0A because sending CID byte.
CID == 0x00 first card?
*/
- iso14a_clear_trace();
- iso14a_set_tracing(TRUE);
+ clear_trace();
+ set_tracing(TRUE);
iso14443a_setup(FPGA_HF_ISO14443A_READER_LISTEN);
// card select - information
iso14a_card_select_t *card = (iso14a_card_select_t*)cardbuf;
- byte_t isOK = iso14443a_select_card(NULL, card, NULL);
+ byte_t isOK = iso14443a_select_card(NULL, card, NULL, true, 0);
if ( isOK == 0) {
- if (MF_DBGLEVEL >= 1) {
+ if (MF_DBGLEVEL >= MF_DBG_ERROR) {
Dbprintf("Can't select card");
}
- OnError();
+ OnError(1);
return;
}
len = DesfireAPDU(cmd, cmd_len, resp);
if ( !len ) {
print_result("ERROR <--: ", resp, len);
- OnError();
+ OnError(2);
return;
}
len = DesfireAPDU(cmd, cmd_len, resp);
if ( !len ) {
print_result("ERROR <--: ", resp, len);
- OnError();
+ OnError(2);
return;
}
len = DesfireAPDU(cmd, cmd_len, resp);
if ( !len ) {
print_result("ERROR <--: ", resp, len);
- OnError();
+ OnError(2);
return;
}
uint8_t encBoth[32] = {0x00};
InitDesfireCard();
-
+
LED_A_ON();
LED_B_OFF();
LED_C_OFF();
// des, nyckel 0,
switch (mode){
case 1:{
- if (algo == 1) {
-
- uint8_t keybytes[8] = {0x00};
+ uint8_t keybytes[16];
uint8_t RndA[8] = {0x00};
uint8_t RndB[8] = {0x00};
+ if (algo == 2) {
if (datain[1] == 0xff){
+ memcpy(keybytes,PICC_MASTER_KEY16,16);
+ } else {
+ memcpy(keybytes, datain+1, datalen);
+ }
+ } else {
+ if (algo == 1) {
+ if (datain[1] == 0xff){
memcpy(keybytes,null_key_data8,8);
} else{
memcpy(keybytes, datain+1, datalen);
}
+ }
+ }
struct desfire_key defaultkey = {0};
desfirekey_t key = &defaultkey;
+
+ if (algo == 2)
+ Desfire_3des_key_new_with_version(keybytes, key);
+ else if (algo ==1)
Desfire_des_key_new(keybytes, key);
cmd[0] = AUTHENTICATE;
cmd[1] = keyno; //keynumber
len = DesfireAPDU(cmd, 2, resp);
if ( !len ) {
- if (MF_DBGLEVEL >= 1) {
+ if (MF_DBGLEVEL >= MF_DBG_ERROR) {
DbpString("Authentication failed. Card timeout.");
}
- OnError();
+ OnError(3);
return;
}
if ( resp[2] == 0xaf ){
} else {
DbpString("Authetication failed. Invalid key number.");
- OnError();
+ OnError(3);
return;
}
memcpy( encRndB, resp+3, 8);
-
+ if (algo == 2)
+ tdes_dec(&decRndB, &encRndB, key->data);
+ else if (algo == 1)
des_dec(&decRndB, &encRndB, key->data);
+
memcpy(RndB, decRndB, 8);
rol(decRndB,8);
memcpy(RndA, decRndA, 8);
uint8_t encRndA[8] = {0x00};
+ if (algo == 2)
+ tdes_dec(&encRndA, &decRndA, key->data);
+ else if (algo == 1)
des_dec(&encRndA, &decRndA, key->data);
memcpy(both, encRndA, 8);
for (int x = 0; x < 8; x++) {
decRndB[x] = decRndB[x] ^ encRndA[x];
+
}
+ if (algo == 2)
+ tdes_dec(&encRndB, &decRndB, key->data);
+ else if (algo == 1)
des_dec(&encRndB, &decRndB, key->data);
memcpy(both + 8, encRndB, 8);
len = DesfireAPDU(cmd, 17, resp);
if ( !len ) {
- if (MF_DBGLEVEL >= 1) {
+ if (MF_DBGLEVEL >= MF_DBG_ERROR) {
DbpString("Authentication failed. Card timeout.");
}
- OnError();
+ OnError(3);
return;
}
//print_result("SESSION : ", skey->data, 8);
memcpy(encRndA, resp+3, 8);
+
+ if (algo == 2)
+ tdes_dec(&encRndA, &encRndA, key->data);
+ else if (algo == 1)
des_dec(&encRndA, &encRndA, key->data);
+
rol(decRndA,8);
for (int x = 0; x < 8; x++) {
if (decRndA[x] != encRndA[x]) {
DbpString("Authetication failed. Cannot varify PICC.");
- OnError();
+ OnError(4);
return;
}
}
//Change the selected key to a new value.
/*
+ // Current key is a 3DES key, change it to a DES key
+ if (algo == 2) {
cmd[0] = CHANGE_KEY;
cmd[1] = keyno;
memcpy(buff3, &first, 1);
memcpy(buff3 + 1, &second, 1);
+ tdes_dec(&buff1, &buff1, skey->data);
+ memcpy(cmd+2,buff1,8);
+
+ for (int x = 0; x < 8; x++) {
+ buff2[x] = buff2[x] ^ buff1[x];
+ }
+ tdes_dec(&buff2, &buff2, skey->data);
+ memcpy(cmd+10,buff2,8);
+
+ for (int x = 0; x < 8; x++) {
+ buff3[x] = buff3[x] ^ buff2[x];
+ }
+ tdes_dec(&buff3, &buff3, skey->data);
+ memcpy(cmd+18,buff3,8);
+
+ // The command always times out on the first attempt, this will retry until a response
+ // is recieved.
+ len = 0;
+ while(!len) {
+ len = DesfireAPDU(cmd,26,resp);
+ }
+
+ } else {
+ // Current key is a DES key, change it to a 3DES key
+ if (algo == 1) {
+ cmd[0] = CHANGE_KEY;
+ cmd[1] = keyno;
+
+ uint8_t newKey[16] = {0x40,0x41,0x42,0x43,0x44,0x45,0x46,0x47,0x48,0x49,0x4a,0x4b,0x4c,0x4d,0x4e,0x4f};
+
+ uint8_t first, second;
+ uint8_t buff1[8] = {0x00};
+ uint8_t buff2[8] = {0x00};
+ uint8_t buff3[8] = {0x00};
+
+ memcpy(buff1,newKey, 8);
+ memcpy(buff2,newKey + 8, 8);
+
+ ComputeCrc14443(CRC_14443_A, newKey, 16, &first, &second);
+ memcpy(buff3, &first, 1);
+ memcpy(buff3 + 1, &second, 1);
+
des_dec(&buff1, &buff1, skey->data);
memcpy(cmd+2,buff1,8);
while(!len) {
len = DesfireAPDU(cmd,26,resp);
}
+ }
+ }
*/
OnSuccess();
+ if (algo == 2)
+ cmd_send(CMD_ACK,1,0,0,skey->data,16);
+ else if (algo == 1)
cmd_send(CMD_ACK,1,0,0,skey->data,8);
-
} else {
DbpString("Authetication failed.");
- OnError();
+ OnError(6);
return;
}
-
- }
}
break;
case 2:
if( MF_DBGLEVEL >= 4) {
Dbprintf("AES context failed to init");
}
- OnError();
+ OnError(7);
return;
}
cmd[1] = 0x00; //keynumber
len = DesfireAPDU(cmd, 2, resp);
if ( !len ) {
- if (MF_DBGLEVEL >= 1) {
+ if (MF_DBGLEVEL >= MF_DBG_ERROR) {
DbpString("Authentication failed. Card timeout.");
}
- OnError();
+ OnError(3);
return;
}
len = DesfireAPDU(cmd, 33, resp); // 1 + 32 == 33
if ( !len ) {
- if (MF_DBGLEVEL >= 1) {
+ if (MF_DBGLEVEL >= MF_DBG_ERROR) {
DbpString("Authentication failed. Card timeout.");
}
- OnError();
+ OnError(3);
return;
}
print_result("SESSION : ", skey->data, 16);
} else {
DbpString("Authetication failed.");
- OnError();
+ OnError(7);
return;
}
size_t len = 0;
size_t wrappedLen = 0;
- uint8_t wCmd[USB_CMD_DATA_SIZE] = {0};
+ uint8_t wCmd[USB_CMD_DATA_SIZE] = {0x00};
- uint8_t *resp = ((uint8_t *)BigBuf) + RECV_RESP_OFFSET;
- uint8_t *resp_par = ((uint8_t *)BigBuf) + RECV_RESP_PAR_OFFSET;
+ uint8_t resp[MAX_FRAME_SIZE];
+ uint8_t par[MAX_PARITY_SIZE];
wrappedLen = CreateAPDU( cmd, cmd_len, wCmd);
}
ReaderTransmit( wCmd, wrappedLen, NULL);
- len = ReaderReceive(resp, resp_par);
+ len = ReaderReceive(resp, par);
if( len == 0x00 ){
- if (MF_DBGLEVEL >= 4) {
- Dbprintf("fukked");
- }
+ if (MF_DBGLEVEL >= 4) Dbprintf("fukked");
return FALSE; //DATA LINK ERROR
}
// if we received an I- or R(ACK)-Block with a block number equal to the
ReaderTransmit(deselect_cmd, 3 , NULL);
FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
LEDsoff();
+ set_tracing(FALSE);
}
-void OnError(){
- pcb_blocknum = 0;
- ReaderTransmit(deselect_cmd, 3 , NULL);
- FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);
- cmd_send(CMD_ACK,0,0,0,0,0);
- LEDsoff();
+void OnError(uint8_t reason){
+ cmd_send(CMD_ACK,0,reason,0,0,0);
+ OnSuccess();
}