ISO7816_send_recieve.c

#include <stdint.h>

#include "nrf.h"

#include "Universal.h"
#include "ISO7816.h"

void SC_Send_Message(uint8_t Lenght) {
	//Segger_write_string("Sending Message to SC!\n");
		
	SC_Send_Count=Lenght;
	
	for(uint8_t i=0; i<Lenght; i++) {
		Send_UART(SC_APDU[i]);
	}
	//Segger_write_string("\n");
	
	//Card_wait_ETU_cycles(2);
	//NRF_UART0->EVENTS_RXDRDY=0;
	//UART_prepare_for_recieve();
}


void Correct_First_False_Byte(uint8_t* count, uint8_t *Message) {
	//uint8_t value = *count;
	if((*count)>=1) {
		for(uint8_t i=1; i<(*count); i++) {
			Message[i-1]=Message[i];
		}
		(*count)=(*count)-1;
	}
}

uint8_t Recieve_Response(void) {
	//Card_wait_ETU_cycles(10);
	//UART_prepare_for_recieve();
	
	uint8_t Recieve_Count=0;
	//!!!!Segger_write_string("\tRecieving response!\n\t");
	
	while(true) {
		uint8_t success=0;
		SC_Response[Recieve_Count]=Recieve_UART_timeout(ISO_WAIT_TIME, &success);
		
		if(!success) {
			break;
		}
		//!!!!Segger_write_one_hex_value(SC_Response[Recieve_Count]);
		Recieve_Count++;
	}
	Segger_write_string("\n");
	
			//Segger_write_string_value("\tRecieved count=", Recieve_Count);
	//!!!!Correct_First_False_Byte(&Recieve_Count, SC_Response);
	//!!!!SC_Response_Count=Recieve_Count;

	//!!!!Print_Array(SC_Response_Count, SC_Response);
	return Recieve_Count;
}

uint8_t Recieve_And_Check_Response() {
	uint8_t Recieve_Count = Recieve_Response();
	
	if(Recieve_Count<2) {
		SC_Response_Count=0;
		return 0;
	}
	
	if(Is_Valid_Message(1, Recieve_Count, SC_Response)) {
		Analyze_Message(Recieve_Count, SC_Response);
		SC_Response_Count=Recieve_Count;
		return Recieve_Count;
	}
	
	SC_Response_Count=0;
	return 0;
}

uint8_t Send_Message_Recieve_Response(uint8_t * Payload, uint8_t send_count, uint8_t * Message_Recieved) {
	Segger_write_string("Send-recieve!\n");

	uint8_t APDU_Length = Prepare_Standard_APDU(send_count, Payload);
	
	SC_Send_Message(APDU_Length);
	
	UART_prepare_for_recieve();
	uint8_t recieved_count = Recieve_And_Check_Response();
	
	return recieved_count;
}



void Send_Negotiate_Block_Protocol_Alone() { // Should negotiate protocl T=0
	Segger_write_string("Negotiating T!\n");
	// Negotiating new protocol via PTS 
	
	SC_APDU[0] = 0xFF;  //PTS request
	SC_APDU[1] = SC_ATR_Get_Protocol_Type();	//PTS0 as TA1  0(RFU) 000(PTS 1 2 3 ) Protocol type 4 1
	//SC_APDU[2] = 0x00;	//PTS1 
	//SC_APDU[3] = 0x00;  //PTS2
	//SC_APDU[4] = 0x00;	//PTS3
	SC_APDU[2] = Calc_XOR_Checksum(0, 0, 2, SC_APDU);
	
	SC_Send_Message(3);	
	
	// TODO SC_ATR_Set_Protocol_Type(0x00);
}

void Send_Negotiate_Block_Protocol_APDU()  { // Should negotiate protocl T=0
	Segger_write_string("Negotiating T=0!\n");
	// Negotiating new protocol via PTS 
	
	SC_APDU[0] = 0xFF;  //PTS request
	SC_APDU[1] = 0x00;	//PTS0 as TA1  0(RFU) 000(PTS 1 2 3 ) Protocol type 4 1
	SC_APDU[2] = 0xFF;  //Calc_XOR_Checksum(0, 2, SC_APDU);
	
	uint8_t value = Prepare_Standard_APDU(3, SC_APDU);
	SC_Send_Message(value);
}

void Send_Negotiate_Block_Protocol_Block() { // Should negotiate protocl T=0
	Segger_write_string("Negotiating T=0!\n");
	// Negotiating new protocol via PTS 
	
	SC_APDU[0] = 0xFF;  //PTS request
	SC_APDU[1] = 0x00;	//PTS0 as TA1  0(RFU) 000(PTS 1 2 3 ) Protocol type 4 1
	SC_APDU[2] = 0xFF;  //Calc_XOR_Checksum(0, 2, SC_APDU);
	
	uint8_t value = Prepare_Standard_Block(3, SC_APDU);
	SC_Send_Message(value);
}


void Print_Sent() {
	Print_Array(SC_Send_Count, SC_APDU);
}

void Print_Recieved() {
	Print_Array(SC_Response_Count, SC_Response);
}

void Print_Touple_Send_Recieve() {
	Segger_write_string("-->");
		Print_Sent();
	
	Segger_write_string("\t<--");
		Print_Recieved();
}

uint8_t Send_And_Recieve(uint8_t count) {
	Segger_write_string("Sending && recieving response!\n");
	
	SC_Send_Message(count);
	uint8_t value = Recieve_And_Check_Response();
	
	Print_Touple_Send_Recieve();
	
	return value;
}