/* USER CODE BEGIN Header */
/**
 ******************************************************************************
 * @file           : main.c
 * @brief          : Main program body
 ******************************************************************************
 * @attention
 *
 * <h2><center>&copy; Copyright (c) 2019 STMicroelectronics.
 * All rights reserved.</center></h2>
 *
 * This software component is licensed by ST under BSD 3-Clause license,
 * the "License"; You may not use this file except in compliance with the
 * License. You may obtain a copy of the License at:
 *                        opensource.org/licenses/BSD-3-Clause
 *
 ******************************************************************************
 */
/* USER CODE END Header */
/* Includes ------------------------------------------------------------------*/
#include "main.h"
#include "dma.h"
#include "i2c.h"
#include "spi.h"
#include "usart.h"
#include "gpio.h"

/* Private includes ----------------------------------------------------------*/
/* USER CODE BEGIN Includes */
#include "pn532_stm32f1.h"
#include "liquidcrystal_i2c.h"

#include <stdlib.h>
#include <time.h>
#include <string.h>
/* USER CODE END Includes */

/* Private typedef -----------------------------------------------------------*/
/* USER CODE BEGIN PTD */

/* USER CODE END PTD */

/* Private define ------------------------------------------------------------*/
/* USER CODE BEGIN PD */
typedef struct
{
  uint8_t state;
  char name[32];
  char surname[32];
  time_t time;

} incomming_data_t;
/* USER CODE END PD */

/* Private macro -------------------------------------------------------------*/
/* USER CODE BEGIN PM */

/* USER CODE END PM */

/* Private variables ---------------------------------------------------------*/

/* USER CODE BEGIN PV */
PN532 pn532;
/* USER CODE END PV */

/* Private function prototypes -----------------------------------------------*/
void SystemClock_Config(void);
/* USER CODE BEGIN PFP */

/* USER CODE END PFP */

/* Private user code ---------------------------------------------------------*/
/* USER CODE BEGIN 0 */
void sendToServer(uint16_t _uuid);
void parseIncommingPacket(uint8_t *_packet, incomming_data_t *_data);
/* USER CODE END 0 */

/**
  * @brief  The application entry point.
  * @retval int
  */
int main(void)
{

  /* USER CODE BEGIN 1 */
  uint8_t buff[255];
  uint8_t uid[MIFARE_UID_MAX_LENGTH];
  uint8_t key_a[] = {0xFF, 0xFF, 0xFF, 0xFF, 0xFF, 0xFF};
  uint32_t pn532_error = PN532_ERROR_NONE;
  int32_t uid_len = 0;
  /* USER CODE END 1 */

  /* MCU Configuration--------------------------------------------------------*/

  /* Reset of all peripherals, Initializes the Flash interface and the Systick. */
  HAL_Init();

  /* USER CODE BEGIN Init */
  incomming_data_t R_Data;
  /* USER CODE END Init */

  /* Configure the system clock */
  SystemClock_Config();

  /* USER CODE BEGIN SysInit */

  /* USER CODE END SysInit */

  /* Initialize all configured peripherals */
  MX_GPIO_Init();
  MX_DMA_Init();
  MX_I2C1_Init();
  MX_USART1_UART_Init();
  MX_USART2_UART_Init();
  MX_SPI1_Init();
  /* USER CODE BEGIN 2 */
  HD44780_Init(2);
  HD44780_Clear();
  HD44780_SetCursor(0, 0);
  HD44780_PrintStr("LightTAM RFID");
  HD44780_SetCursor(0, 1);
  HD44780_PrintStr("(C) E. Dlabal");
  HAL_Delay(2000);
  HD44780_Clear();

  PN532 pn532;
  // PN532_SPI_Init(&pn532);
  PN532_I2C_Init(&pn532);
  PN532_GetFirmwareVersion(&pn532, buff);
  if (PN532_GetFirmwareVersion(&pn532, buff) == PN532_STATUS_OK)
  {
    printf("Found PN532 with firmware version: %d.%d\r\n", buff[1], buff[2]);
  }
  else
  {
    return -1;
  }
  PN532_SamConfiguration(&pn532);
  HD44780_SetCursor(1, 0);
  HD44780_PrintStr("Prilozte kartu");
  printf("Waiting for RFID/NFC card...\r\n");
  HAL_GPIO_WritePin(GREEN_LED_GPIO_Port, GREEN_LED_Pin, GPIO_PIN_SET);

  /* USER CODE END 2 */

  /* Infinite loop */
  /* USER CODE BEGIN WHILE */
  while (1)
  {
    /* USER CODE END WHILE */

    /* USER CODE BEGIN 3 */
    // Check if a card is available to read

    uid_len = PN532_ReadPassiveTarget(&pn532, uid, PN532_MIFARE_ISO14443A, 1000);
    if (uid_len == PN532_STATUS_ERROR)
    {
      printf(".");
    }
    else
    {
      HD44780_Clear();
      HD44780_SetCursor(0, 0);
      HD44780_PrintStr("Prosim,ponechte");
      HD44780_SetCursor(0, 1);
      HD44780_PrintStr("kartu prilozenou");
      HAL_GPIO_WritePin(GREEN_LED_GPIO_Port, GREEN_LED_Pin, GPIO_PIN_RESET);
      HAL_GPIO_WritePin(ORANGE_LED_GPIO_Port, ORANGE_LED_Pin, GPIO_PIN_SET);
      printf("Found card with UID: ");

      for (uint8_t i = 0; i < uid_len; i++)
      {
        printf("%02x ", uid[i]);
      }
      printf("\r\n");
      while (1)
      {

        printf(" Auth block 6..\r\n");
        pn532_error = PN532_MifareClassicAuthenticateBlock(&pn532, uid, uid_len, 6, MIFARE_CMD_AUTH_A, key_a);

        for (uint8_t i = 0; i < 16; i++)
        {
          buff[i] = 0x00;
        }
        pn532_error = PN532_MifareClassicReadBlock(&pn532, buff, 6);
        printf("Data read back: ");
        for (uint8_t i = 0; i < 16; i++)
        {
          printf("%02x ", buff[i]);
        }
        printf("\r\n");

        uint32_t value_le = (buff[3] << 24) | (buff[2] << 16) | (buff[1] << 8) | buff[0];
        printf("UUID: %lu\r\n", value_le);
        sendToServer(value_le);

        uint8_t r_packet[76];
        HAL_UART_Receive(&huart2, r_packet, 76, HAL_MAX_DELAY);
        parseIncommingPacket(r_packet, &R_Data);

        HD44780_Clear();
        HAL_GPIO_WritePin(ORANGE_LED_GPIO_Port, ORANGE_LED_Pin, GPIO_PIN_RESET);

        if (R_Data.state == 1)
        {
          HAL_GPIO_WritePin(GREEN_LED_GPIO_Port, GREEN_LED_Pin, GPIO_PIN_SET);
          HD44780_SetCursor(1, 0);
          HD44780_PrintStr("Prichod OK");
          HD44780_SetCursor(0, 1);
          char name[15];
          sprintf(name, "%10s,%1s.", R_Data.surname, R_Data.name);
          HD44780_PrintStr(name);
        }
        else if (R_Data.state == 2)
        {
          HAL_GPIO_WritePin(GREEN_LED_GPIO_Port, GREEN_LED_Pin, GPIO_PIN_SET);
          HD44780_SetCursor(1, 0);
          HD44780_PrintStr("Odchod OK");
          HD44780_SetCursor(0, 1);
          char name[15];
          sprintf(name, "%10s,%1s.", R_Data.surname, R_Data.name);
          HD44780_PrintStr(name);
        }
        else if (R_Data.state == 0)
        {
          HAL_GPIO_WritePin(RED_LED_GPIO_Port, RED_LED_Pin, GPIO_PIN_SET);
          HD44780_SetCursor(1, 0);
          HD44780_PrintStr("Chyba");
          HD44780_SetCursor(0, 1);
          HD44780_PrintStr("Zkuste to znovu");
        }

        while (PN532_ReadPassiveTarget(&pn532, uid, PN532_MIFARE_ISO14443A, 100) != PN532_STATUS_ERROR)
        {
          HAL_Delay(100);
        }
        HAL_GPIO_WritePin(RED_LED_GPIO_Port, RED_LED_Pin, GPIO_PIN_RESET);
        HAL_GPIO_WritePin(GREEN_LED_GPIO_Port, GREEN_LED_Pin, GPIO_PIN_SET);

        printf("Card removed. Waiting for next card...\r\n");
        HD44780_Clear();
        HD44780_SetCursor(1, 0);
        HD44780_PrintStr("Prilozte kartu");
        if (pn532_error)
        {
          printf("Error: 0x%02x\r\n", pn532_error);
        }
        break;
      }
    }
  }

  /* USER CODE END 3 */
}

/**
  * @brief System Clock Configuration
  * @retval None
  */
void SystemClock_Config(void)
{
  RCC_OscInitTypeDef RCC_OscInitStruct = {0};
  RCC_ClkInitTypeDef RCC_ClkInitStruct = {0};

  /** Initializes the RCC Oscillators according to the specified parameters
  * in the RCC_OscInitTypeDef structure.
  */
  RCC_OscInitStruct.OscillatorType = RCC_OSCILLATORTYPE_HSE;
  RCC_OscInitStruct.HSEState = RCC_HSE_ON;
  RCC_OscInitStruct.HSEPredivValue = RCC_HSE_PREDIV_DIV1;
  RCC_OscInitStruct.HSIState = RCC_HSI_ON;
  RCC_OscInitStruct.PLL.PLLState = RCC_PLL_ON;
  RCC_OscInitStruct.PLL.PLLSource = RCC_PLLSOURCE_HSE;
  RCC_OscInitStruct.PLL.PLLMUL = RCC_PLL_MUL9;
  if (HAL_RCC_OscConfig(&RCC_OscInitStruct) != HAL_OK)
  {
    Error_Handler();
  }

  /** Initializes the CPU, AHB and APB buses clocks
  */
  RCC_ClkInitStruct.ClockType = RCC_CLOCKTYPE_HCLK|RCC_CLOCKTYPE_SYSCLK
                              |RCC_CLOCKTYPE_PCLK1|RCC_CLOCKTYPE_PCLK2;
  RCC_ClkInitStruct.SYSCLKSource = RCC_SYSCLKSOURCE_PLLCLK;
  RCC_ClkInitStruct.AHBCLKDivider = RCC_SYSCLK_DIV1;
  RCC_ClkInitStruct.APB1CLKDivider = RCC_HCLK_DIV2;
  RCC_ClkInitStruct.APB2CLKDivider = RCC_HCLK_DIV1;

  if (HAL_RCC_ClockConfig(&RCC_ClkInitStruct, FLASH_LATENCY_2) != HAL_OK)
  {
    Error_Handler();
  }
}

/* USER CODE BEGIN 4 */
void sendToServer(uint16_t _uuid)
{
  uint8_t packet[6];
  uint8_t crc;
  int write_offset = 0;
  packet[0] = 0xFF;
  packet[1] = 0x55;
  write_offset = write_offset + 2;
  memcpy(packet + write_offset, &_uuid, sizeof(uint16_t));
  write_offset = write_offset + sizeof(uint16_t);

  packet[4] = 0x00;
  write_offset++; // empty byte for future functions
  for (int i = 0; i < write_offset; i++)
  {
    crc ^= packet[i];
  }
  packet[5] = crc;

  HAL_UART_Transmit(&huart2, packet, 6, HAL_MAX_DELAY);

  return;
}

void parseIncommingPacket(uint8_t *_packet, incomming_data_t *_data)
{
  if (_packet[0] != 0xFF || _packet[1] != 0x55)
  {
    printf("Invalid packet header\r\n");
    return;
  }

  uint8_t state = _packet[2];
  char name[32] = {0};
  char surname[32] = {0};
  time_t time = 0;
  uint8_t crc = 0;

  memcpy(name, _packet + 3, 31);
  name[31] = '\0';
  memcpy(surname, _packet + 35, 31);
  surname[31] = '\0';

  memcpy(&time, _packet + 67, sizeof(time_t));

  for (int i = 0; i < 67 + sizeof(time_t); i++)
  {
    crc ^= _packet[i];
  }
  if (crc != _packet[67 + sizeof(time_t)])
  {
    printf("CRC error\r\n");
    return;
  }

  strcpy(_data->name, name);
  strcpy(_data->surname, surname);
  _data->state = state;
  _data->time = time;

  return;
}

#ifdef __GNUC__
/* With GCC/RAISONANCE, small printf (option LD Linker->Libraries->Small printf
   set to 'Yes') calls __io_putchar() */
#define PUTCHAR_PROTOTYPE int __io_putchar(int ch)
#else
#define PUTCHAR_PROTOTYPE int fputc(int ch, FILE *f)
#endif /* __GNUC__ */
/**
 * @brief  Retargets the C library printf function to the USART.
 * @param  None
 * @retval None
 */
PUTCHAR_PROTOTYPE
{
  /* Place your implementation of fputc here */
  /* e.g. write a character to the EVAL_COM1 and Loop until the end of transmission */
  HAL_UART_Transmit(&huart1, (uint8_t *)&ch, 1, 0xFFFF);

  return ch;
}
/* USER CODE END 4 */

/**
  * @brief  This function is executed in case of error occurrence.
  * @retval None
  */
void Error_Handler(void)
{
  /* USER CODE BEGIN Error_Handler_Debug */
  /* User can add his own implementation to report the HAL error return state */

  /* USER CODE END Error_Handler_Debug */
}

#ifdef  USE_FULL_ASSERT
/**
  * @brief  Reports the name of the source file and the source line number
  *         where the assert_param error has occurred.
  * @param  file: pointer to the source file name
  * @param  line: assert_param error line source number
  * @retval None
  */
void assert_failed(uint8_t *file, uint32_t line)
{
  /* USER CODE BEGIN 6 */
  /* User can add his own implementation to report the file name and line number,
     tex: printf("Wrong parameters value: file %s on line %d\r\n", file, line) */
  /* USER CODE END 6 */
}
#endif /* USE_FULL_ASSERT */