git.zerfleddert.de Git - proxmark3-svn/blobdiff

#include "string.h"

#include "common.h"

#include "cmd.h"

#include "string.h"

#include "common.h"

#include "cmd.h"

+#include "iso14443a.h"

// Needed for CRC in emulation mode;

// same construction as in ISO 14443;

// different initial value (CRC_ICLASS)

#include "iso14443crc.h"

#include "iso15693tools.h"

// Needed for CRC in emulation mode;

// same construction as in ISO 14443;

// different initial value (CRC_ICLASS)

#include "iso14443crc.h"

#include "iso15693tools.h"

+#include "protocols.h"

+#include "optimized_cipher.h"

+#include "usb_cdc.h" // for usb_poll_validate_length

static int timeout = 4096;

// Convert from last byte pos to length

ToSendMax++;

}

// Convert from last byte pos to length

ToSendMax++;

}

+#define MODE_SIM_CSN 0

+#define MODE_EXIT_AFTER_MAC 1

+#define MODE_FULLSIM 2

-int doIClassSimulation(uint8_t csn[], int breakAfterMacReceived, uint8_t *reader_mac_buf);

+int doIClassSimulation(int simulationMode, uint8_t *reader_mac_buf);

/**

* @brief SimulateIClass simulates an iClass card.

* @param arg0 type of simulation

/**

* @brief SimulateIClass simulates an iClass card.

* @param arg0 type of simulation

// Enable and clear the trace

set_tracing(TRUE);

clear_trace();

// Enable and clear the trace

set_tracing(TRUE);

clear_trace();

+ //Use the emulator memory for SIM

+ uint8_t *emulator = BigBuf_get_EM_addr();

- uint8_t csn_crc[] = { 0x03, 0x1f, 0xec, 0x8a, 0xf7, 0xff, 0x12, 0xe0, 0x00, 0x00 };

if(simType == 0) {

// Use the CSN from commandline

if(simType == 0) {

// Use the CSN from commandline

- memcpy(csn_crc, datain, 8);

- doIClassSimulation(csn_crc,0,NULL);

+ memcpy(emulator, datain, 8);

+ doIClassSimulation(MODE_SIM_CSN,NULL);

}else if(simType == 1)

{

}else if(simType == 1)

{

- doIClassSimulation(csn_crc,0,NULL);

+ //Default CSN

+ uint8_t csn_crc[] = { 0x03, 0x1f, 0xec, 0x8a, 0xf7, 0xff, 0x12, 0xe0, 0x00, 0x00 };

+ // Use the CSN from commandline

+ memcpy(emulator, csn_crc, 8);

+ doIClassSimulation(MODE_SIM_CSN,NULL);

}

else if(simType == 2)

{

}

else if(simType == 2)

{

// The usb data is 512 bytes, fitting 65 8-byte CSNs in there.

{

// The usb data is 512 bytes, fitting 65 8-byte CSNs in there.

- memcpy(csn_crc, datain+(i*8), 8);

- if(doIClassSimulation(csn_crc,1,mac_responses+i*8))

+ memcpy(emulator, datain+(i*8), 8);

+ if(doIClassSimulation(MODE_EXIT_AFTER_MAC,mac_responses+i*8))

{

cmd_send(CMD_ACK,CMD_SIMULATE_TAG_ICLASS,i,0,mac_responses,i*8);

return; // Button pressed

{

cmd_send(CMD_ACK,CMD_SIMULATE_TAG_ICLASS,i,0,mac_responses,i*8);

return; // Button pressed

}

cmd_send(CMD_ACK,CMD_SIMULATE_TAG_ICLASS,i,0,mac_responses,i*8);

}

cmd_send(CMD_ACK,CMD_SIMULATE_TAG_ICLASS,i,0,mac_responses,i*8);

+ }else if(simType == 3){

+ //This is 'full sim' mode, where we use the emulator storage for data.

+ doIClassSimulation(MODE_FULLSIM, NULL);

}

else{

// We may want a mode here where we hardcode the csns to use (from proxclone).

}

else{

// We may want a mode here where we hardcode the csns to use (from proxclone).

Dbprintf("Done...");

}

Dbprintf("Done...");

}

+void AppendCrc(uint8_t* data, int len)

+{

+ ComputeCrc14443(CRC_ICLASS,data,len,data+len,data+len+1);

+}

+

/**

* @brief Does the actual simulation

* @param csn - csn to use

* @param breakAfterMacReceived if true, returns after reader MAC has been received.

*/

/**

* @brief Does the actual simulation

* @param csn - csn to use

* @param breakAfterMacReceived if true, returns after reader MAC has been received.

*/

-int doIClassSimulation(uint8_t csn[], int breakAfterMacReceived, uint8_t *reader_mac_buf)

+int doIClassSimulation( int simulationMode, uint8_t *reader_mac_buf)

{

+ // free eventually allocated BigBuf memory

+ BigBuf_free_keep_EM();

+ State cipher_state;

+// State cipher_state_reserve;

+ uint8_t *csn = BigBuf_get_EM_addr();

+ uint8_t *emulator = csn;

+ uint8_t sof_data[] = { 0x0F} ;

// CSN followed by two CRC bytes

- uint8_t response1[] = { 0x0F} ;

- uint8_t response2[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

- uint8_t response3[] = { 0,0,0,0,0,0,0,0,0,0};

- memcpy(response3,csn,sizeof(response3));

+ uint8_t anticoll_data[10] = { 0 };

+ uint8_t csn_data[10] = { 0 };

+ memcpy(csn_data,csn,sizeof(csn_data));

Dbprintf("Simulating CSN %02x%02x%02x%02x%02x%02x%02x%02x",csn[0],csn[1],csn[2],csn[3],csn[4],csn[5],csn[6],csn[7]);

- // e-Purse

- uint8_t response4[] = { 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

// Construct anticollision-CSN

- rotateCSN(response3,response2);

+ rotateCSN(csn_data,anticoll_data);

// Compute CRC on both CSNs

- ComputeCrc14443(CRC_ICLASS, response2, 8, &response2[8], &response2[9]);

- ComputeCrc14443(CRC_ICLASS, response3, 8, &response3[8], &response3[9]);

+ ComputeCrc14443(CRC_ICLASS, anticoll_data, 8, &anticoll_data[8], &anticoll_data[9]);

+ ComputeCrc14443(CRC_ICLASS, csn_data, 8, &csn_data[8], &csn_data[9]);

+

+ uint8_t diversified_key[8] = { 0 };

+ // e-Purse

+ uint8_t card_challenge_data[8] = { 0x00 };

+ if(simulationMode == MODE_FULLSIM)

+ {

+ //The diversified key should be stored on block 3

+ //Get the diversified key from emulator memory

+ memcpy(diversified_key, emulator+(8*3),8);

+

+ //Card challenge, a.k.a e-purse is on block 2

+ memcpy(card_challenge_data,emulator + (8 * 2) , 8);

+ //Precalculate the cipher state, feeding it the CC

+ cipher_state = opt_doTagMAC_1(card_challenge_data,diversified_key);

+

+ }

int exitLoop = 0;

// Reader 0a

int exitLoop = 0;

// Reader 0a

// Tag CSN

uint8_t *modulated_response;

// Tag CSN

uint8_t *modulated_response;

- int modulated_response_size;

+ int modulated_response_size = 0;

uint8_t* trace_data = NULL;

int trace_data_size = 0;

uint8_t* trace_data = NULL;

int trace_data_size = 0;

- //uint8_t sof = 0x0f;

- // free eventually allocated BigBuf memory

- BigBuf_free();

+

// Respond SOF -- takes 1 bytes

- uint8_t *resp1 = BigBuf_malloc(2);

- int resp1Len;

+ uint8_t *resp_sof = BigBuf_malloc(2);

+ int resp_sof_Len;

// Anticollision CSN (rotated CSN)

// 22: Takes 2 bytes for SOF/EOF and 10 * 2 = 20 bytes (2 bytes/byte)

// Anticollision CSN (rotated CSN)

// 22: Takes 2 bytes for SOF/EOF and 10 * 2 = 20 bytes (2 bytes/byte)

- uint8_t *resp2 = BigBuf_malloc(28);

- int resp2Len;

+ uint8_t *resp_anticoll = BigBuf_malloc(28);

+ int resp_anticoll_len;

// CSN

// 22: Takes 2 bytes for SOF/EOF and 10 * 2 = 20 bytes (2 bytes/byte)

// CSN

// 22: Takes 2 bytes for SOF/EOF and 10 * 2 = 20 bytes (2 bytes/byte)

- uint8_t *resp3 = BigBuf_malloc(30);

- int resp3Len;

+ uint8_t *resp_csn = BigBuf_malloc(30);

+ int resp_csn_len;

// e-Purse

// 18: Takes 2 bytes for SOF/EOF and 8 * 2 = 16 bytes (2 bytes/bit)

// e-Purse

// 18: Takes 2 bytes for SOF/EOF and 8 * 2 = 16 bytes (2 bytes/bit)

- uint8_t *resp4 = BigBuf_malloc(20);

- int resp4Len;

+ uint8_t *resp_cc = BigBuf_malloc(20);

+ int resp_cc_len;

uint8_t *receivedCmd = BigBuf_malloc(MAX_FRAME_SIZE);

- memset(receivedCmd, 0x44, MAX_FRAME_SIZE);

int len;

// Prepare card messages

int len;

// Prepare card messages

// First card answer: SOF

CodeIClassTagSOF();

// First card answer: SOF

CodeIClassTagSOF();

- memcpy(resp1, ToSend, ToSendMax); resp1Len = ToSendMax;

+ memcpy(resp_sof, ToSend, ToSendMax); resp_sof_Len = ToSendMax;

// Anticollision CSN

- CodeIClassTagAnswer(response2, sizeof(response2));

- memcpy(resp2, ToSend, ToSendMax); resp2Len = ToSendMax;

+ CodeIClassTagAnswer(anticoll_data, sizeof(anticoll_data));

+ memcpy(resp_anticoll, ToSend, ToSendMax); resp_anticoll_len = ToSendMax;

// CSN

- CodeIClassTagAnswer(response3, sizeof(response3));

- memcpy(resp3, ToSend, ToSendMax); resp3Len = ToSendMax;

+ CodeIClassTagAnswer(csn_data, sizeof(csn_data));

+ memcpy(resp_csn, ToSend, ToSendMax); resp_csn_len = ToSendMax;

// e-Purse

- CodeIClassTagAnswer(response4, sizeof(response4));

- memcpy(resp4, ToSend, ToSendMax); resp4Len = ToSendMax;

+ CodeIClassTagAnswer(card_challenge_data, sizeof(card_challenge_data));

+ memcpy(resp_cc, ToSend, ToSendMax); resp_cc_len = ToSendMax;

+ //This is used for responding to READ-block commands or other data which is dynamically generated

+ //First the 'trace'-data, not encoded for FPGA

+ uint8_t *data_generic_trace = BigBuf_malloc(8 + 2);//8 bytes data + 2byte CRC is max tag answer

+ //Then storage for the modulated data

+ //Each bit is doubled when modulated for FPGA, and we also have SOF and EOF (2 bytes)

+ uint8_t *data_response = BigBuf_malloc( (8+2) * 2 + 2);

// Start from off (no field generated)

//FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);

// Start from off (no field generated)

//FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);

LED_A_ON();

bool buttonPressed = false;

LED_A_ON();

bool buttonPressed = false;

-

+ uint8_t response_delay = 1;

while(!exitLoop) {

-

+ response_delay = 1;

LED_B_OFF();

//Signal tracer

// Can be used to get a trigger for an oscilloscope..

LED_B_OFF();

//Signal tracer

// Can be used to get a trigger for an oscilloscope..

LED_C_ON();

// Okay, look at the command now.

LED_C_ON();

// Okay, look at the command now.

- if(receivedCmd[0] == 0x0a ) {

+ if(receivedCmd[0] == ICLASS_CMD_ACTALL ) {

// Reader in anticollission phase

- modulated_response = resp1; modulated_response_size = resp1Len; //order = 1;

- trace_data = response1;

- trace_data_size = sizeof(response1);

- } else if(receivedCmd[0] == 0x0c) {

+ modulated_response = resp_sof; modulated_response_size = resp_sof_Len; //order = 1;

+ trace_data = sof_data;

+ trace_data_size = sizeof(sof_data);

+ } else if(receivedCmd[0] == ICLASS_CMD_READ_OR_IDENTIFY && len == 1) {

// Reader asks for anticollission CSN

- modulated_response = resp2; modulated_response_size = resp2Len; //order = 2;

- trace_data = response2;

- trace_data_size = sizeof(response2);

+ modulated_response = resp_anticoll; modulated_response_size = resp_anticoll_len; //order = 2;

+ trace_data = anticoll_data;

+ trace_data_size = sizeof(anticoll_data);

//DbpString("Reader requests anticollission CSN:");

- } else if(receivedCmd[0] == 0x81) {

+ } else if(receivedCmd[0] == ICLASS_CMD_SELECT) {

// Reader selects anticollission CSN.

// Tag sends the corresponding real CSN

// Reader selects anticollission CSN.

// Tag sends the corresponding real CSN

- modulated_response = resp3; modulated_response_size = resp3Len; //order = 3;

- trace_data = response3;

- trace_data_size = sizeof(response3);

+ modulated_response = resp_csn; modulated_response_size = resp_csn_len; //order = 3;

+ trace_data = csn_data;

+ trace_data_size = sizeof(csn_data);

//DbpString("Reader selects anticollission CSN:");

- } else if(receivedCmd[0] == 0x88) {

+ } else if(receivedCmd[0] == ICLASS_CMD_READCHECK_KD) {

// Read e-purse (88 02)

- modulated_response = resp4; modulated_response_size = resp4Len; //order = 4;

- trace_data = response4;

- trace_data_size = sizeof(response4);

+ modulated_response = resp_cc; modulated_response_size = resp_cc_len; //order = 4;

+ trace_data = card_challenge_data;

+ trace_data_size = sizeof(card_challenge_data);

LED_B_ON();

- } else if(receivedCmd[0] == 0x05) {

+ } else if(receivedCmd[0] == ICLASS_CMD_CHECK) {

// Reader random and reader MAC!!!

- // Do not respond

- // We do not know what to answer, so lets keep quiet

- modulated_response = resp1; modulated_response_size = 0; //order = 5;

- trace_data = NULL;

- trace_data_size = 0;

- if (breakAfterMacReceived){

- // dbprintf:ing ...

- Dbprintf("CSN: %02x %02x %02x %02x %02x %02x %02x %02x"

- ,csn[0],csn[1],csn[2],csn[3],csn[4],csn[5],csn[6],csn[7]);

- Dbprintf("RDR: (len=%02d): %02x %02x %02x %02x %02x %02x %02x %02x %02x",len,

- receivedCmd[0], receivedCmd[1], receivedCmd[2],

- receivedCmd[3], receivedCmd[4], receivedCmd[5],

- receivedCmd[6], receivedCmd[7], receivedCmd[8]);

- if (reader_mac_buf != NULL)

- {

- memcpy(reader_mac_buf,receivedCmd+1,8);

+ if(simulationMode == MODE_FULLSIM)

+ {

+ //NR, from reader, is in receivedCmd +1

+ opt_doTagMAC_2(cipher_state,receivedCmd+1,data_generic_trace,diversified_key);

+

+ trace_data = data_generic_trace;

+ trace_data_size = 4;

+ CodeIClassTagAnswer(trace_data , trace_data_size);

+ memcpy(data_response, ToSend, ToSendMax);

+ modulated_response = data_response;

+ modulated_response_size = ToSendMax;

+ response_delay = 0;//We need to hurry here...

+ //exitLoop = true;

+ }else

+ { //Not fullsim, we don't respond

+ // We do not know what to answer, so lets keep quiet

+ modulated_response = resp_sof; modulated_response_size = 0;

+ trace_data = NULL;

+ trace_data_size = 0;

+ if (simulationMode == MODE_EXIT_AFTER_MAC){

+ // dbprintf:ing ...

+ Dbprintf("CSN: %02x %02x %02x %02x %02x %02x %02x %02x"

+ ,csn[0],csn[1],csn[2],csn[3],csn[4],csn[5],csn[6],csn[7]);

+ Dbprintf("RDR: (len=%02d): %02x %02x %02x %02x %02x %02x %02x %02x %02x",len,

+ receivedCmd[0], receivedCmd[1], receivedCmd[2],

+ receivedCmd[3], receivedCmd[4], receivedCmd[5],

+ receivedCmd[6], receivedCmd[7], receivedCmd[8]);

+ if (reader_mac_buf != NULL)

+ {

+ memcpy(reader_mac_buf,receivedCmd+1,8);

+ }

+ exitLoop = true;

}

- exitLoop = true;

}

- } else if(receivedCmd[0] == 0x00 && len == 1) {

+

+ } else if(receivedCmd[0] == ICLASS_CMD_HALT && len == 1) {

// Reader ends the session

- modulated_response = resp1; modulated_response_size = 0; //order = 0;

+ modulated_response = resp_sof; modulated_response_size = 0; //order = 0;

trace_data = NULL;

trace_data_size = 0;

trace_data = NULL;

trace_data_size = 0;

- } else {

+ } else if(simulationMode == MODE_FULLSIM && receivedCmd[0] == ICLASS_CMD_READ_OR_IDENTIFY && len == 4){

+ //Read block

+ uint16_t blk = receivedCmd[1];

+ //Take the data...

+ memcpy(data_generic_trace, emulator+(blk << 3),8);

+ //Add crc

+ AppendCrc(data_generic_trace, 8);

+ trace_data = data_generic_trace;

+ trace_data_size = 10;

+ CodeIClassTagAnswer(trace_data , trace_data_size);

+ memcpy(data_response, ToSend, ToSendMax);

+ modulated_response = data_response;

+ modulated_response_size = ToSendMax;

+ }else if(receivedCmd[0] == ICLASS_CMD_UPDATE && simulationMode == MODE_FULLSIM)

+ {//Probably the reader wants to update the nonce. Let's just ignore that for now.

+ // OBS! If this is implemented, don't forget to regenerate the cipher_state

+ //We're expected to respond with the data+crc, exactly what's already in the receivedcmd

+ //receivedcmd is now UPDATE 1b | ADDRESS 1b| DATA 8b| Signature 4b or CRC 2b|

+

+ //Take the data...

+ memcpy(data_generic_trace, receivedCmd+2,8);

+ //Add crc

+ AppendCrc(data_generic_trace, 8);

+ trace_data = data_generic_trace;

+ trace_data_size = 10;

+ CodeIClassTagAnswer(trace_data , trace_data_size);

+ memcpy(data_response, ToSend, ToSendMax);

+ modulated_response = data_response;

+ modulated_response_size = ToSendMax;

+ }

+ else if(receivedCmd[0] == ICLASS_CMD_PAGESEL)

+ {//Pagesel

+ //Pagesel enables to select a page in the selected chip memory and return its configuration block

+ //Chips with a single page will not answer to this command

+ // It appears we're fine ignoring this.

+ //Otherwise, we should answer 8bytes (block) + 2bytes CRC

+ }

+ else {

//#db# Unknown command received from reader (len=5): 26 1 0 f6 a 44 44 44 44

// Never seen this command before

Dbprintf("Unknown command received from reader (len=%d): %x %x %x %x %x %x %x %x %x",

//#db# Unknown command received from reader (len=5): 26 1 0 f6 a 44 44 44 44

// Never seen this command before

Dbprintf("Unknown command received from reader (len=%d): %x %x %x %x %x %x %x %x %x",

receivedCmd[3], receivedCmd[4], receivedCmd[5],

receivedCmd[6], receivedCmd[7], receivedCmd[8]);

// Do not respond

receivedCmd[3], receivedCmd[4], receivedCmd[5],

receivedCmd[6], receivedCmd[7], receivedCmd[8]);

// Do not respond

- modulated_response = resp1; modulated_response_size = 0; //order = 0;

+ modulated_response = resp_sof; modulated_response_size = 0; //order = 0;

trace_data = NULL;

trace_data_size = 0;

}

trace_data = NULL;

trace_data_size = 0;

}

A legit tag has about 380us delay between reader EOT and tag SOF.

**/

if(modulated_response_size > 0) {

A legit tag has about 380us delay between reader EOT and tag SOF.

**/

if(modulated_response_size > 0) {

- SendIClassAnswer(modulated_response, modulated_response_size, 1);

+ SendIClassAnswer(modulated_response, modulated_response_size, response_delay);

t2r_time = GetCountSspClk();

}

t2r_time = GetCountSspClk();

}

- memset(receivedCmd, 0x44, MAX_FRAME_SIZE);

}

//Dbprintf("%x", cmdsRecvd);

}

//Dbprintf("%x", cmdsRecvd);

}

WDT_HIT();

}

WDT_HIT();

}

- if (samples) *samples = (c + *wait) << 3;

+ if (samples && wait) *samples = (c + *wait) << 3;

}

for(j = 0; j < 4; j++) {

for(k = 0; k < 4; k++) {

if(k == (b & 3)) {

for(j = 0; j < 4; j++) {

for(k = 0; k < 4; k++) {

if(k == (b & 3)) {

- ToSend[++ToSendMax] = 0x0f;

+ ToSend[++ToSendMax] = 0xf0;

}

else {

ToSend[++ToSendMax] = 0x00;

}

else {

ToSend[++ToSendMax] = 0x00;

{

FpgaDownloadAndGo(FPGA_BITSTREAM_HF);

// Reset trace buffer

{

FpgaDownloadAndGo(FPGA_BITSTREAM_HF);

// Reset trace buffer

- set_tracing(TRUE);

- clear_trace();

+ set_tracing(TRUE);

+ clear_trace();

// Setup SSC

FpgaSetupSsc();

// Setup SSC

FpgaSetupSsc();

}

-size_t sendCmdGetResponseWithRetries(uint8_t* command, size_t cmdsize, uint8_t* resp, uint8_t expected_size, uint8_t retries)

+bool sendCmdGetResponseWithRetries(uint8_t* command, size_t cmdsize, uint8_t* resp, uint8_t expected_size, uint8_t retries)

{

while(retries-- > 0)

{

ReaderTransmitIClass(command, cmdsize);

if(expected_size == ReaderReceiveIClass(resp)){

{

while(retries-- > 0)

{

ReaderTransmitIClass(command, cmdsize);

if(expected_size == ReaderReceiveIClass(resp)){

- return 0;

+ return true;

}

- return 1;//Error

+ return false;//Error

}

/**

}

/**

* 1 = Got CSN

* 2 = Got CSN and CC

*/

* 1 = Got CSN

* 2 = Got CSN and CC

*/

-uint8_t handshakeIclassTag(uint8_t *card_data)

+uint8_t handshakeIclassTag_ext(uint8_t *card_data, bool use_credit_key)

{

static uint8_t act_all[] = { 0x0a };

{

static uint8_t act_all[] = { 0x0a };

- static uint8_t identify[] = { 0x0c };

+ //static uint8_t identify[] = { 0x0c };

+ static uint8_t identify[] = { 0x0c, 0x00, 0x73, 0x33 };

static uint8_t select[] = { 0x81, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

static uint8_t readcheck_cc[]= { 0x88, 0x02 };

static uint8_t select[] = { 0x81, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

static uint8_t readcheck_cc[]= { 0x88, 0x02 };

+ if (use_credit_key)

+ readcheck_cc[0] = 0x18;

+ else

+ readcheck_cc[0] = 0x88;

+

uint8_t resp[ICLASS_BUFFER_SIZE];

uint8_t read_status = 0;

uint8_t resp[ICLASS_BUFFER_SIZE];

uint8_t read_status = 0;

//Flag that we got to at least stage 1, read CSN

read_status = 1;

//Flag that we got to at least stage 1, read CSN

read_status = 1;

- // Card selected, now read e-purse (cc)

+ // Card selected, now read e-purse (cc) (only 8 bytes no CRC)

ReaderTransmitIClass(readcheck_cc, sizeof(readcheck_cc));

if(ReaderReceiveIClass(resp) == 8) {

//Save CC (e-purse) in response data

memcpy(card_data+8,resp,8);

ReaderTransmitIClass(readcheck_cc, sizeof(readcheck_cc));

if(ReaderReceiveIClass(resp) == 8) {

//Save CC (e-purse) in response data

memcpy(card_data+8,resp,8);

-

- //Got both

- read_status = 2;

+ read_status++;

}

return read_status;

}

return read_status;

}

+uint8_t handshakeIclassTag(uint8_t *card_data) {

+ return handshakeIclassTag_ext(card_data, false);

+}

+

// Reader iClass Anticollission

void ReaderIClass(uint8_t arg0) {

// Reader iClass Anticollission

void ReaderIClass(uint8_t arg0) {

- uint8_t card_data[24]={0};

- uint8_t last_csn[8]={0};

-

- int read_status= 0;

- bool abort_after_read = arg0 & FLAG_ICLASS_READER_ONLY_ONCE;

- bool get_cc = arg0 & FLAG_ICLASS_READER_GET_CC;

- set_tracing(TRUE);

- setupIclassReader();

-

- size_t datasize = 0;

- while(!BUTTON_PRESS())

- {

-

+ uint8_t card_data[6 * 8]={0};

+ memset(card_data, 0xFF, sizeof(card_data));

+ uint8_t last_csn[8]={0,0,0,0,0,0,0,0};

+ uint8_t resp[ICLASS_BUFFER_SIZE];

+ memset(resp, 0xFF, sizeof(resp));

+ //Read conf block CRC(0x01) => 0xfa 0x22

+ uint8_t readConf[] = { ICLASS_CMD_READ_OR_IDENTIFY,0x01, 0xfa, 0x22};

+ //Read App Issuer Area block CRC(0x05) => 0xde 0x64

+ uint8_t readAA[] = { ICLASS_CMD_READ_OR_IDENTIFY,0x05, 0xde, 0x64};

+

+ int read_status= 0;

+ uint8_t result_status = 0;

+ // flag to read until one tag is found successfully

+ bool abort_after_read = arg0 & FLAG_ICLASS_READER_ONLY_ONCE;

+ // flag to only try 5 times to find one tag then return

+ bool try_once = arg0 & FLAG_ICLASS_READER_ONE_TRY;

+ // if neither abort_after_read nor try_once then continue reading until button pressed.

+

+ bool use_credit_key = arg0 & FLAG_ICLASS_READER_CEDITKEY;

+ // test flags for what blocks to be sure to read

+ uint8_t flagReadConfig = arg0 & FLAG_ICLASS_READER_CONF;

+ uint8_t flagReadCC = arg0 & FLAG_ICLASS_READER_CC;

+ uint8_t flagReadAA = arg0 & FLAG_ICLASS_READER_AA;

+

+ set_tracing(true);

+ setupIclassReader();

+

+ uint16_t tryCnt=0;

+ bool userCancelled = BUTTON_PRESS() || usb_poll_validate_length();

+ while(!userCancelled)

+ {

+ // if only looking for one card try 2 times if we missed it the first time

+ if (try_once && tryCnt > 2) break;

+ tryCnt++;

if(!tracing) {

DbpString("Trace full");

break;

}

WDT_HIT();

if(!tracing) {

DbpString("Trace full");

break;

}

WDT_HIT();

- read_status = handshakeIclassTag(card_data);

+ read_status = handshakeIclassTag_ext(card_data, use_credit_key);

if(read_status == 0) continue;

- if(read_status == 1) datasize = 8;

- if(read_status == 2) datasize = 16;

+ if(read_status == 1) result_status = FLAG_ICLASS_READER_CSN;

+ if(read_status == 2) result_status = FLAG_ICLASS_READER_CSN|FLAG_ICLASS_READER_CC;

+

+ // handshakeIclass returns CSN|CC, but the actual block

+ // layout is CSN|CONFIG|CC, so here we reorder the data,

+ // moving CC forward 8 bytes

+ memcpy(card_data+16,card_data+8, 8);

+ //Read block 1, config

+ if(flagReadConfig) {

+ if(sendCmdGetResponseWithRetries(readConf, sizeof(readConf), resp, 10, 10))

+ {

+ result_status |= FLAG_ICLASS_READER_CONF;

+ memcpy(card_data+8, resp, 8);

+ } else {

+ Dbprintf("Failed to dump config block");

+ }

+

+ //Read block 5, AA

+ if(flagReadAA) {

+ if(sendCmdGetResponseWithRetries(readAA, sizeof(readAA), resp, 10, 10))

+ {

+ result_status |= FLAG_ICLASS_READER_AA;

+ memcpy(card_data+(8*5), resp, 8);

+ } else {

+ //Dbprintf("Failed to dump AA block");

+ }

+

+ // 0 : CSN

+ // 1 : Configuration

+ // 2 : e-purse

+ // (3,4 write-only, kc and kd)

+ // 5 Application issuer area

+ //

+ //Then we can 'ship' back the 8 * 6 bytes of data,

+ // with 0xFF:s in block 3 and 4.

LED_B_ON();

- //Send back to client, but don't bother if we already sent this

+ //Send back to client, but don't bother if we already sent this -

+ // only useful if looping in arm (not try_once && not abort_after_read)

if(memcmp(last_csn, card_data, 8) != 0)

{

if(memcmp(last_csn, card_data, 8) != 0)

{

-

- if(!get_cc || (get_cc && read_status == 2))

- {

- cmd_send(CMD_ACK,read_status,0,0,card_data,datasize);

+ // If caller requires that we get Conf, CC, AA, continue until we got it

+ if( (result_status ^ FLAG_ICLASS_READER_CSN ^ flagReadConfig ^ flagReadCC ^ flagReadAA) == 0) {

+ cmd_send(CMD_ACK,result_status,0,0,card_data,sizeof(card_data));

if(abort_after_read) {

LED_A_OFF();

if(abort_after_read) {

LED_A_OFF();

+ LED_B_OFF();

return;

}

//Save that we already sent this....

memcpy(last_csn, card_data, 8);

}

return;

}

//Save that we already sent this....

memcpy(last_csn, card_data, 8);

}

- //If 'get_cc' was specified and we didn't get a CC, we'll just keep trying...

+

}

LED_B_OFF();

}

LED_B_OFF();

- }

- cmd_send(CMD_ACK,0,0,0,card_data, 0);

- LED_A_OFF();

+ userCancelled = BUTTON_PRESS() || usb_poll_validate_length();

+ }

+ if (userCancelled) {

+ cmd_send(CMD_ACK,0xFF,0,0,card_data, 0);

+ } else {

+ cmd_send(CMD_ACK,0,0,0,card_data, 0);

+ }

+ LED_A_OFF();

}

void ReaderIClass_Replay(uint8_t arg0, uint8_t *MAC) {

}

void ReaderIClass_Replay(uint8_t arg0, uint8_t *MAC) {

//for now replay captured auth (as cc not updated)

memcpy(check+5,MAC,4);

//for now replay captured auth (as cc not updated)

memcpy(check+5,MAC,4);

- if(sendCmdGetResponseWithRetries(check, sizeof(check),resp, 4, 5))

+ if(!sendCmdGetResponseWithRetries(check, sizeof(check),resp, 4, 5))

{

Dbprintf("Error: Authentication Fail!");

continue;

{

Dbprintf("Error: Authentication Fail!");

continue;

read[2] = crc >> 8;

read[3] = crc & 0xff;

read[2] = crc >> 8;

read[3] = crc & 0xff;

- if(sendCmdGetResponseWithRetries(read, sizeof(read),resp, 10, 10))

+ if(!sendCmdGetResponseWithRetries(read, sizeof(read),resp, 10, 10))

{

Dbprintf("Dump config (block 1) failed");

continue;

{

Dbprintf("Dump config (block 1) failed");

continue;

//Set card_data to all zeroes, we'll fill it with data

memset(card_data,0x0,USB_CMD_DATA_SIZE);

uint8_t failedRead =0;

//Set card_data to all zeroes, we'll fill it with data

memset(card_data,0x0,USB_CMD_DATA_SIZE);

uint8_t failedRead =0;

- uint8_t stored_data_length =0;

+ uint32_t stored_data_length =0;

//then loop around remaining blocks

for(int block=0; block < cardsize; block++){

//then loop around remaining blocks

for(int block=0; block < cardsize; block++){

read[2] = crc >> 8;

read[3] = crc & 0xff;

read[2] = crc >> 8;

read[3] = crc & 0xff;

- if(!sendCmdGetResponseWithRetries(read, sizeof(read), resp, 10, 10))

+ if(sendCmdGetResponseWithRetries(read, sizeof(read), resp, 10, 10))

{

Dbprintf(" %02x: %02x %02x %02x %02x %02x %02x %02x %02x",

block, resp[0], resp[1], resp[2],

{

Dbprintf(" %02x: %02x %02x %02x %02x %02x %02x %02x %02x",

block, resp[0], resp[1], resp[2],

//Fill up the buffer

memcpy(card_data+stored_data_length,resp,8);

stored_data_length += 8;

//Fill up the buffer

memcpy(card_data+stored_data_length,resp,8);

stored_data_length += 8;

-

if(stored_data_length +8 > USB_CMD_DATA_SIZE)

{//Time to send this off and start afresh

cmd_send(CMD_ACK,

if(stored_data_length +8 > USB_CMD_DATA_SIZE)

{//Time to send this off and start afresh

cmd_send(CMD_ACK,

Dbprintf("Failed to dump block %d", block);

}

Dbprintf("Failed to dump block %d", block);

}

+

//Send off any remaining data

if(stored_data_length > 0)

{

//Send off any remaining data

if(stored_data_length > 0)

{

LED_A_OFF();

}

LED_A_OFF();

}

-//2. Create Read method (cut-down from above) based off responses from 1.

-// Since we have the MAC could continue to use replay function.

-//3. Create Write method

-/*

-void IClass_iso14443A_write(uint8_t arg0, uint8_t blockNo, uint8_t *data, uint8_t *MAC) {

- uint8_t act_all[] = { 0x0a };

- uint8_t identify[] = { 0x0c };

- uint8_t select[] = { 0x81, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

- uint8_t readcheck_cc[]= { 0x88, 0x02 };

- uint8_t check[] = { 0x05, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

- uint8_t read[] = { 0x0c, 0x00, 0x00, 0x00 };

- uint8_t write[] = { 0x87, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

-

- uint16_t crc = 0;

-

- uint8_t* resp = (((uint8_t *)BigBuf) + 3560);

-

- // Reset trace buffer

- memset(trace, 0x44, RECV_CMD_OFFSET);

- traceLen = 0;

+void iClass_ReadCheck(uint8_t blockNo, uint8_t keyType) {

+ uint8_t readcheck[] = { keyType, blockNo };

+ uint8_t resp[] = {0,0,0,0,0,0,0,0};

+ size_t isOK = 0;

+ isOK = sendCmdGetResponseWithRetries(readcheck, sizeof(readcheck), resp, sizeof(resp), 6);

+ cmd_send(CMD_ACK,isOK,0,0,0,0);

+}

- // Setup SSC

- FpgaSetupSsc();

- // Start from off (no field generated)

- // Signal field is off with the appropriate LED

- LED_D_OFF();

- FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);

- SpinDelay(200);

+void iClass_Authentication(uint8_t *MAC) {

+ uint8_t check[] = { ICLASS_CMD_CHECK, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

+ uint8_t resp[ICLASS_BUFFER_SIZE];

+ memcpy(check+5,MAC,4);

+ bool isOK;

+ isOK = sendCmdGetResponseWithRetries(check, sizeof(check), resp, 4, 6);

+ cmd_send(CMD_ACK,isOK,0,0,0,0);

+}

+bool iClass_ReadBlock(uint8_t blockNo, uint8_t *readdata) {

+ uint8_t readcmd[] = {ICLASS_CMD_READ_OR_IDENTIFY, blockNo, 0x00, 0x00}; //0x88, 0x00 // can i use 0C?

+ char bl = blockNo;

+ uint16_t rdCrc = iclass_crc16(&bl, 1);

+ readcmd[2] = rdCrc >> 8;

+ readcmd[3] = rdCrc & 0xff;

+ uint8_t resp[] = {0,0,0,0,0,0,0,0,0,0};

+ bool isOK = false;

+

+ //readcmd[1] = blockNo;

+ isOK = sendCmdGetResponseWithRetries(readcmd, sizeof(readcmd), resp, 10, 10);

+ memcpy(readdata, resp, sizeof(resp));

+

+ return isOK;

+}

- SetAdcMuxFor(GPIO_MUXSEL_HIPKD);

+void iClass_ReadBlk(uint8_t blockno) {

+ uint8_t readblockdata[] = {0,0,0,0,0,0,0,0,0,0};

+ bool isOK = false;

+ isOK = iClass_ReadBlock(blockno, readblockdata);

+ cmd_send(CMD_ACK, isOK, 0, 0, readblockdata, 8);

+}

- // Now give it time to spin up.

- // Signal field is on with the appropriate LED

- FpgaWriteConfWord(FPGA_MAJOR_MODE_HF_ISO14443A | FPGA_HF_ISO14443A_READER_MOD);

- SpinDelay(200);

+void iClass_Dump(uint8_t blockno, uint8_t numblks) {

+ uint8_t readblockdata[] = {0,0,0,0,0,0,0,0,0,0};

+ bool isOK = false;

+ uint8_t blkCnt = 0;

- LED_A_ON();

+ BigBuf_free();

+ uint8_t *dataout = BigBuf_malloc(255*8);

+ if (dataout == NULL){

+ Dbprintf("out of memory");

+ OnError(1);

+ return;

+ }

+ memset(dataout,0xFF,255*8);

+

+ for (;blkCnt < numblks; blkCnt++) {

+ isOK = iClass_ReadBlock(blockno+blkCnt, readblockdata);

+ if (!isOK || (readblockdata[0] == 0xBB || readblockdata[7] == 0xBB || readblockdata[2] == 0xBB)) { //try again

+ isOK = iClass_ReadBlock(blockno+blkCnt, readblockdata);

+ if (!isOK) {

+ Dbprintf("Block %02X failed to read", blkCnt+blockno);

+ break;

+ }

+ memcpy(dataout+(blkCnt*8),readblockdata,8);

+ }

+ //return pointer to dump memory in arg3

+ cmd_send(CMD_ACK,isOK,blkCnt,BigBuf_max_traceLen(),0,0);

+ FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);

+ LEDsoff();

+ BigBuf_free();

+}

- for(int i=0;i<1;i++) {

-

- if(traceLen > TRACE_SIZE) {

- DbpString("Trace full");

- break;

+bool iClass_WriteBlock_ext(uint8_t blockNo, uint8_t *data) {

+ uint8_t write[] = { ICLASS_CMD_UPDATE, blockNo, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00, 0x00 };

+ //uint8_t readblockdata[10];

+ //write[1] = blockNo;

+ memcpy(write+2, data, 12); // data + mac

+ char *wrCmd = (char *)(write+1);

+ uint16_t wrCrc = iclass_crc16(wrCmd, 13);

+ write[14] = wrCrc >> 8;

+ write[15] = wrCrc & 0xff;

+ uint8_t resp[] = {0,0,0,0,0,0,0,0,0,0};

+ bool isOK = false;

+

+ isOK = sendCmdGetResponseWithRetries(write,sizeof(write),resp,sizeof(resp),10);

+ if (isOK) { //if reader responded correctly

+ //Dbprintf("WriteResp: %02X%02X%02X%02X%02X%02X%02X%02X%02X%02X",resp[0],resp[1],resp[2],resp[3],resp[4],resp[5],resp[6],resp[7],resp[8],resp[9]);

+ if (memcmp(write+2,resp,8)) { //if response is not equal to write values

+ if (blockNo != 3 && blockNo != 4) { //if not programming key areas (note key blocks don't get programmed with actual key data it is xor data)

+ //error try again

+ isOK = sendCmdGetResponseWithRetries(write,sizeof(write),resp,sizeof(resp),10);

+ }

+

}

-

- if (BUTTON_PRESS()) break;

-

- // Send act_all

- ReaderTransmitIClass(act_all, 1);

- // Card present?

- if(ReaderReceiveIClass(resp)) {

- ReaderTransmitIClass(identify, 1);

- if(ReaderReceiveIClass(resp) == 10) {

- // Select card

- memcpy(&select[1],resp,8);

- ReaderTransmitIClass(select, sizeof(select));

-

- if(ReaderReceiveIClass(resp) == 10) {

- Dbprintf(" Selected CSN: %02x %02x %02x %02x %02x %02x %02x %02x",

- resp[0], resp[1], resp[2],

- resp[3], resp[4], resp[5],

- resp[6], resp[7]);

- }

- // Card selected

- Dbprintf("Readcheck on Sector 2");

- ReaderTransmitIClass(readcheck_cc, sizeof(readcheck_cc));

- if(ReaderReceiveIClass(resp) == 8) {

- Dbprintf(" CC: %02x %02x %02x %02x %02x %02x %02x %02x",

- resp[0], resp[1], resp[2],

- resp[3], resp[4], resp[5],

- resp[6], resp[7]);

- }else return;

- Dbprintf("Authenticate");

- //for now replay captured auth (as cc not updated)

- memcpy(check+5,MAC,4);

- Dbprintf(" AA: %02x %02x %02x %02x",

- check[5], check[6], check[7],check[8]);

- ReaderTransmitIClass(check, sizeof(check));

- if(ReaderReceiveIClass(resp) == 4) {

- Dbprintf(" AR: %02x %02x %02x %02x",

- resp[0], resp[1], resp[2],resp[3]);

- }else {

- Dbprintf("Error: Authentication Fail!");

- return;

- }

- Dbprintf("Write Block");

-

- //read configuration for max block number

- read_success=false;

- read[1]=1;

- uint8_t *blockno=&read[1];

- crc = iclass_crc16((char *)blockno,1);

- read[2] = crc >> 8;

- read[3] = crc & 0xff;

- while(!read_success){

- ReaderTransmitIClass(read, sizeof(read));

- if(ReaderReceiveIClass(resp) == 10) {

- read_success=true;

- mem=resp[5];

- memory.k16= (mem & 0x80);

- memory.book= (mem & 0x20);

- memory.k2= (mem & 0x8);

- memory.lockauth= (mem & 0x2);

- memory.keyaccess= (mem & 0x1);

-

- }

- if (memory.k16){

- cardsize=255;

- }else cardsize=32;

- //check card_size

-

- memcpy(write+1,blockNo,1);

- memcpy(write+2,data,8);

- memcpy(write+10,mac,4);

- while(!send_success){

- ReaderTransmitIClass(write, sizeof(write));

- if(ReaderReceiveIClass(resp) == 10) {

- write_success=true;

- }

- }//

+ }

+ return isOK;

+}

+

+void iClass_WriteBlock(uint8_t blockNo, uint8_t *data) {

+ bool isOK = iClass_WriteBlock_ext(blockNo, data);

+ if (isOK){

+ Dbprintf("Write block [%02x] successful",blockNo);

+ } else {

+ Dbprintf("Write block [%02x] failed",blockNo);

+ }

+ cmd_send(CMD_ACK,isOK,0,0,0,0);

+}

+

+void iClass_Clone(uint8_t startblock, uint8_t endblock, uint8_t *data) {

+ int i;

+ int written = 0;

+ int total_block = (endblock - startblock) + 1;

+ for (i = 0; i < total_block;i++){

+ // block number

+ if (iClass_WriteBlock_ext(i+startblock, data+(i*12))){

+ Dbprintf("Write block [%02x] successful",i + startblock);

+ written++;

+ } else {

+ if (iClass_WriteBlock_ext(i+startblock, data+(i*12))){

+ Dbprintf("Write block [%02x] successful",i + startblock);

+ written++;

+ } else {

+ Dbprintf("Write block [%02x] failed",i + startblock);

+ }

}

- WDT_HIT();

}

-

- LED_A_OFF();

-}*/

+ if (written == total_block)

+ Dbprintf("Clone complete");

+ else

+ Dbprintf("Clone incomplete");

+

+ cmd_send(CMD_ACK,1,0,0,0,0);

+ FpgaWriteConfWord(FPGA_MAJOR_MODE_OFF);

+ LEDsoff();

+}