Files
seader/ccid.c
2023-07-12 16:54:50 -07:00

272 lines
9.6 KiB
C

#include "seader_i.h"
#define TAG "SeaderCCID"
bool hasSAM = false;
const uint8_t SAM_ATR[] =
{0x3b, 0x95, 0x96, 0x80, 0xb1, 0xfe, 0x55, 0x1f, 0xc7, 0x47, 0x72, 0x61, 0x63, 0x65, 0x13};
const uint8_t SAM_ATR2[] = {0x3b, 0x90, 0x96, 0x91, 0x81, 0xb1, 0xfe, 0x55, 0x1f, 0xc7, 0xd4};
bool powered = false;
uint8_t slot = 0;
uint8_t sequence = 0;
uint8_t retries = 3;
uint8_t getSequence() {
if(sequence > 254) {
sequence = 0;
}
return sequence++;
}
size_t addLRC(uint8_t* data, size_t len) {
uint8_t lrc = 0;
for(size_t i = 0; i < len; i++) {
lrc ^= data[i];
}
data[len] = lrc;
return len + 1;
}
void PC_to_RDR_IccPowerOn(SeaderUartBridge* seader_uart) {
if(powered) {
return;
}
powered = true;
FURI_LOG_D(TAG, "Sending Power On");
memset(seader_uart->tx_buf, 0, SEADER_UART_RX_BUF_SIZE);
seader_uart->tx_buf[0] = SYNC;
seader_uart->tx_buf[1] = CTRL;
seader_uart->tx_buf[2 + 0] = CCID_MESSAGE_TYPE_PC_to_RDR_IccPowerOn;
seader_uart->tx_buf[2 + 5] = slot;
seader_uart->tx_buf[2 + 6] = getSequence();
seader_uart->tx_buf[2 + 7] = 2; //power
seader_uart->tx_len = addLRC(seader_uart->tx_buf, 2 + 10);
furi_thread_flags_set(furi_thread_get_id(seader_uart->tx_thread), WorkerEvtSamRx);
}
void check_for_sam(SeaderUartBridge* seader_uart) {
hasSAM = false; // If someone is calling this, reset sam state
powered = false;
PC_to_RDR_GetSlotStatus(seader_uart);
}
void PC_to_RDR_GetSlotStatus(SeaderUartBridge* seader_uart) {
FURI_LOG_D(TAG, "PC_to_RDR_GetSlotStatus");
memset(seader_uart->tx_buf, 0, SEADER_UART_RX_BUF_SIZE);
seader_uart->tx_buf[0] = SYNC;
seader_uart->tx_buf[1] = CTRL;
seader_uart->tx_buf[2 + 0] = CCID_MESSAGE_TYPE_PC_to_RDR_GetSlotStatus;
seader_uart->tx_buf[2 + 5] = slot;
seader_uart->tx_buf[2 + 6] = getSequence();
seader_uart->tx_len = addLRC(seader_uart->tx_buf, 2 + 10);
furi_thread_flags_set(furi_thread_get_id(seader_uart->tx_thread), WorkerEvtSamRx);
}
void PC_to_RDR_SetParameters(SeaderUartBridge* seader_uart) {
uint8_t T1 = 1;
memset(seader_uart->tx_buf, 0, SEADER_UART_RX_BUF_SIZE);
seader_uart->tx_buf[0] = SYNC;
seader_uart->tx_buf[1] = CTRL;
seader_uart->tx_buf[2 + 0] = CCID_MESSAGE_TYPE_PC_to_RDR_SetParameters;
seader_uart->tx_buf[2 + 1] = 0;
seader_uart->tx_buf[2 + 5] = slot;
seader_uart->tx_buf[2 + 6] = getSequence();
seader_uart->tx_buf[2 + 7] = T1;
seader_uart->tx_buf[2 + 8] = 0;
seader_uart->tx_buf[2 + 9] = 0;
seader_uart->tx_len = addLRC(seader_uart->tx_buf, 2 + 10);
furi_thread_flags_set(furi_thread_get_id(seader_uart->tx_thread), WorkerEvtSamRx);
}
void PC_to_RDR_GetParameters(SeaderUartBridge* seader_uart) {
memset(seader_uart->tx_buf, 0, SEADER_UART_RX_BUF_SIZE);
seader_uart->tx_buf[0] = SYNC;
seader_uart->tx_buf[1] = CTRL;
seader_uart->tx_buf[2 + 0] = CCID_MESSAGE_TYPE_PC_to_RDR_GetParameters;
seader_uart->tx_buf[2 + 1] = 0;
seader_uart->tx_buf[2 + 5] = slot;
seader_uart->tx_buf[2 + 6] = getSequence();
seader_uart->tx_buf[2 + 7] = 0;
seader_uart->tx_buf[2 + 8] = 0;
seader_uart->tx_buf[2 + 9] = 0;
seader_uart->tx_len = addLRC(seader_uart->tx_buf, 2 + 10);
furi_thread_flags_set(furi_thread_get_id(seader_uart->tx_thread), WorkerEvtSamRx);
}
void PC_to_RDR_XfrBlock(SeaderUartBridge* seader_uart, uint8_t* data, size_t len) {
memset(seader_uart->tx_buf, 0, SEADER_UART_RX_BUF_SIZE);
seader_uart->tx_buf[0] = SYNC;
seader_uart->tx_buf[1] = CTRL;
seader_uart->tx_buf[2 + 0] = CCID_MESSAGE_TYPE_PC_to_RDR_XfrBlock;
seader_uart->tx_buf[2 + 1] = len;
seader_uart->tx_buf[2 + 5] = slot;
seader_uart->tx_buf[2 + 6] = getSequence();
seader_uart->tx_buf[2 + 7] = 5;
seader_uart->tx_buf[2 + 8] = 0;
seader_uart->tx_buf[2 + 9] = 0;
memcpy(seader_uart->tx_buf + 2 + 10, data, len);
seader_uart->tx_len = addLRC(seader_uart->tx_buf, 2 + 10 + len);
// FURI_LOG_I(TAG, "PC_to_RDR_XfrBlock %d bytes", seader_uart->tx_len);
furi_thread_flags_set(furi_thread_get_id(seader_uart->tx_thread), WorkerEvtSamRx);
}
size_t processCCID(SeaderWorker* seader_worker, uint8_t* cmd, size_t cmd_len) {
SeaderUartBridge* seader_uart = seader_worker->uart;
CCID_Message message;
message.consumed = 0;
char display[SEADER_UART_RX_BUF_SIZE * 2 + 1] = {0};
for(uint8_t i = 0; i < cmd_len; i++) {
snprintf(display + (i * 2), sizeof(display), "%02x", cmd[i]);
}
FURI_LOG_D(TAG, "CCID %d: %s", cmd_len, display);
if(cmd_len == 2) {
if(cmd[0] == CCID_MESSAGE_TYPE_RDR_to_PC_NotifySlotChange) {
switch(cmd[1]) {
case CARD_OUT:
FURI_LOG_D(TAG, "Card removed");
powered = false;
hasSAM = false;
retries = 3;
break;
case CARD_IN_1:
FURI_LOG_D(TAG, "Card Inserted (1)");
retries = 0;
slot = 0;
sequence = 0;
PC_to_RDR_IccPowerOn(seader_uart);
break;
case CARD_IN_2:
FURI_LOG_D(TAG, "Card Inserted (2)");
retries = 0;
slot = 1;
sequence = 0;
PC_to_RDR_IccPowerOn(seader_uart);
break;
case CARD_IN_BOTH:
FURI_LOG_W(TAG, "Loading 2 cards not supported");
break;
};
return 2;
}
}
while(cmd_len >= 3 && cmd[0] == SYNC && cmd[1] == NAK) {
// 031516
FURI_LOG_W(TAG, "NAK");
cmd += 3;
cmd_len -= 3;
message.consumed += 3;
}
while(cmd_len > 2 && (cmd[0] != SYNC || cmd[1] != CTRL)) {
FURI_LOG_W(TAG, "invalid start: %02x", cmd[0]);
cmd += 1;
cmd_len -= 1;
message.consumed += 1;
}
if(cmd_len > 12 && cmd[0] == SYNC && cmd[1] == CTRL) {
uint8_t* ccid = cmd + 2;
message.bMessageType = ccid[0];
message.dwLength = *((uint32_t*)(ccid + 1));
message.bStatus = ccid[7];
message.bError = ccid[8];
message.payload = ccid + 10;
if(cmd_len < 2 + 10 + message.dwLength + 1) {
return message.consumed;
}
message.consumed += 2 + 10 + message.dwLength + 1;
//0306 81 00000000 0000 0200 01 87
//0306 81 00000000 0000 0100 01 84
if(message.bMessageType == CCID_MESSAGE_TYPE_RDR_to_PC_SlotStatus) {
uint8_t status = (message.bStatus & BMICCSTATUS_MASK);
if(status == 0 || status == 1) {
PC_to_RDR_IccPowerOn(seader_uart);
return message.consumed;
} else if(status == 2) {
FURI_LOG_W(TAG, "No ICC is present [retries %d]", retries);
if(retries-- > 1 && hasSAM == false) {
furi_delay_ms(100);
PC_to_RDR_GetSlotStatus(seader_uart);
} else {
if(seader_worker->callback) {
seader_worker->callback(
SeaderWorkerEventSamMissing, seader_worker->context);
}
}
return message.consumed;
}
}
//0306 80 00000000 0001 42fe 00 38
if(message.bStatus == 0x41 && message.bError == 0xfe) {
FURI_LOG_W(TAG, "card probably upside down");
if(seader_worker->callback) {
seader_worker->callback(SeaderWorkerEventSamMissing, seader_worker->context);
}
return message.consumed;
}
if(message.bStatus == 0x42 && message.bError == 0xfe) {
FURI_LOG_W(TAG, "No card");
if(seader_worker->callback) {
seader_worker->callback(SeaderWorkerEventSamMissing, seader_worker->context);
}
return message.consumed;
}
if(message.bError != 0) {
FURI_LOG_W(TAG, "CCID error");
message.consumed = cmd_len;
if(seader_worker->callback) {
seader_worker->callback(SeaderWorkerEventSamMissing, seader_worker->context);
}
return message.consumed;
}
if(message.bMessageType == CCID_MESSAGE_TYPE_RDR_to_PC_DataBlock) {
if(hasSAM) {
seader_worker_process_message(seader_worker, &message);
} else {
if(memcmp(SAM_ATR, message.payload, sizeof(SAM_ATR)) == 0) {
FURI_LOG_I(TAG, "SAM ATR!");
hasSAM = true;
seader_worker_send_version(seader_worker);
if(seader_worker->callback) {
seader_worker->callback(
SeaderWorkerEventSamPresent, seader_worker->context);
}
} else if(memcmp(SAM_ATR2, message.payload, sizeof(SAM_ATR2)) == 0) {
FURI_LOG_I(TAG, "SAM ATR2!");
hasSAM = true;
seader_worker_send_version(seader_worker);
if(seader_worker->callback) {
seader_worker->callback(
SeaderWorkerEventSamPresent, seader_worker->context);
}
} else {
FURI_LOG_W(TAG, "Unknown ATR");
if(seader_worker->callback) {
seader_worker->callback(SeaderWorkerEventSamWrong, seader_worker->context);
}
}
}
} else {
FURI_LOG_W(TAG, "Unhandled CCID message type %d", message.bMessageType);
}
}
return message.consumed;
}