main.c

Go to the documentation of this file.

 
#include <stdint.h>
 
#include "ra8_attributes.h"
#include "ra8_board_ek_ra8d2.h"
#include "ra8_boot_entry.h"
#include "ra8_cgc.h"
#include "ra8_err.h"
#include "ra8_isr.h"
#include "ra8_mstp.h"
#include "ra8_spi.h"
#include "ra8_time.h"

typedef enum : uint32_t {
  k_spi_demo_baud        = 115200U,  
  k_spi_demo_period_ms   = 1000U,    
  k_spi_demo_spi_baud_hz = 1000000U, 
  k_spi_demo_spi_channel = 0U,       
} spi_demo_const_t;

typedef enum : uint8_t {
  k_spi_demo_pattern_len  = 16U,   
  k_spi_demo_pattern_base = 0xA0U, 
} spi_demo_byte_t;
 
static const uint8_t s_spi_demo_msg_pass[] = "spi: pass\r\n";
static const uint8_t s_spi_demo_msg_fail[] = "spi: FAIL\r\n";

RA8_INTERNAL static void internal_panic_halt(void)
{
  while (1) {
    __asm__ volatile("wfi");
  }
}

RA8_INTERNAL static void internal_clocks_or_halt(uint32_t* out_pclka)
{
  uint32_t cpuclk0_hz = 0U;
  if (ra8_cgc_init() != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_cgc_get_clock_hz(k_ra8_clock_id_cpuclk0, &cpuclk0_hz) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_cgc_get_clock_hz(k_ra8_clock_id_pclka, out_pclka) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_mstp_init() != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_time_init(cpuclk0_hz) != k_ra8_ok) {
    internal_panic_halt();
  }
}

RA8_INTERNAL static void internal_setup_or_halt(void)
{
  uint32_t pclka_hz = 0U;
  internal_clocks_or_halt(&pclka_hz);
  if (ra8_board_uart_console_init((uint32_t)k_spi_demo_baud) != k_ra8_ok) {
    internal_panic_halt();
  }
 
  const ra8_spi_cfg_t spi_cfg = {
    .baud_hz   = k_spi_demo_spi_baud_hz,
    .pclka_hz  = pclka_hz,
    .mode      = k_ra8_spi_mode_0,
    .lsb_first = false,
    .loopback  = true,
  };
  if (ra8_spi_init((uint8_t)k_spi_demo_spi_channel, &spi_cfg) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_board_led_init(k_ra8_board_led1) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_board_led_init(k_ra8_board_led2) != k_ra8_ok) {
    internal_panic_halt();
  }
}

RA8_INTERNAL static bool internal_round_trip_ok(void)
{
  for (uint8_t i = 0U; i < (uint8_t)k_spi_demo_pattern_len; i++) {
    const uint8_t tx = (uint8_t)((uint8_t)k_spi_demo_pattern_base + i);
    uint8_t       rx = 0U;
    if (ra8_spi_xfer8((uint8_t)k_spi_demo_spi_channel, tx, &rx) != k_ra8_ok) {
      return false;
    }
    if (rx != tx) {
      return false;
    }
  }
  return true;
}

void main(void)
{
  internal_setup_or_halt();
  ra8_isr_globals_enable();
 
  while (1) {
    const bool     ok = internal_round_trip_ok();
    const uint8_t* msg;
    uint32_t       msg_len;
    if (ok) {
      msg     = s_spi_demo_msg_pass;
      msg_len = (uint32_t)(sizeof(s_spi_demo_msg_pass) - 1U);
    } else {
      msg     = s_spi_demo_msg_fail;
      msg_len = (uint32_t)(sizeof(s_spi_demo_msg_fail) - 1U);
    }
    if (!ok) {
      (void)ra8_board_led_on(k_ra8_board_led2);
    }
    (void)ra8_board_uart_console_write(msg, (size_t)msg_len);
    if (ra8_board_led_toggle(k_ra8_board_led1) != k_ra8_ok) {
      break;
    }
    ra8_delay_ms(k_spi_demo_period_ms);
  }
 
  internal_panic_halt();
}