main.c

Go to the documentation of this file.

 
#include <stdint.h>
 
#include "ra8_agt.h"
#include "ra8_agt_regs.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_time.h"

typedef enum : uint32_t {
  k_agt_pulse_baud    = 115200U, 
  k_agt_pulse_poll_ms = 10U,     
} agt_pulse_const_t;

typedef enum : uint16_t {
  k_agt_pulse_channel = 0U,      
  k_agt_pulse_period  = 0x7FFFU, 
  k_agt_pulse_duty    = 0x3FFFU, 
} agt_pulse_timer_t;

typedef enum : uint32_t {
  k_agt_pulse_hex_digits = 8U,   
  k_agt_pulse_hex_shift  = 4U,   
  k_agt_pulse_hex_mask   = 0xFU, 
} agt_pulse_fmt_t;

static const char s_agt_pulse_hex_chars[] = "0123456789ABCDEF";

static const uint8_t s_agt_pulse_msg_head[] = "agt_pulse: tick=";
static const uint8_t s_agt_pulse_msg_tail[] = "\r\n";

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

RA8_INTERNAL static void internal_setup_or_halt(void)
{
  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_time_init(cpuclk0_hz) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_board_uart_console_init((uint32_t)k_agt_pulse_baud) != k_ra8_ok) {
    internal_panic_halt();
  }
  if (ra8_board_led_init(k_ra8_board_led1) != k_ra8_ok) {
    internal_panic_halt();
  }
}

[[nodiscard]] RA8_INTERNAL static ra8_err_t internal_arm(void)
{
  const ra8_agt_pulse_cfg_t cfg = {
    .period   = (uint16_t)k_agt_pulse_period,
    .duty     = (uint16_t)k_agt_pulse_duty,
    .mode     = k_ra8_agt_pulse_mode_continuous,
    .polarity = k_ra8_agt_output_polarity_active_high,
    .compare  = k_ra8_agt_pulse_compare_a,
  };
  return ra8_agt_start_pulse_output((uint8_t)k_agt_pulse_channel, &cfg);
}

RA8_INTERNAL static void internal_format_tick(uint32_t tick, uint8_t* digits)
{
  for (uint32_t i = 0U; i < (uint32_t)k_agt_pulse_hex_digits; ++i) {
    const uint32_t shift =
      ((uint32_t)k_agt_pulse_hex_digits - 1U - i) * (uint32_t)k_agt_pulse_hex_shift;
    const uint32_t nib = (tick >> shift) & (uint32_t)k_agt_pulse_hex_mask;
    digits[i]          = (uint8_t)s_agt_pulse_hex_chars[nib];
  }
}

[[nodiscard]] RA8_INTERNAL static ra8_err_t internal_emit_tick(uint32_t tick)
{
  uint8_t digits[k_agt_pulse_hex_digits] = {};
  internal_format_tick(tick, digits);
  ra8_err_t err =
    ra8_board_uart_console_write(s_agt_pulse_msg_head, (size_t)(sizeof(s_agt_pulse_msg_head) - 1U));
  if (err != k_ra8_ok) {
    return err;
  }
  err = ra8_board_uart_console_write(digits, (size_t)sizeof(digits));
  if (err != k_ra8_ok) {
    return err;
  }
  return ra8_board_uart_console_write(s_agt_pulse_msg_tail,
                                      (size_t)(sizeof(s_agt_pulse_msg_tail) - 1U));
}
 
void main(void)
{
  internal_setup_or_halt();
  ra8_isr_globals_enable();
 
  if (internal_arm() != k_ra8_ok) {
    internal_panic_halt();
  }
 
  uint32_t tick = 0U;
  while (1) {
    uint8_t status = 0U;
    if (ra8_agt_get_status((uint8_t)k_agt_pulse_channel, &status) != k_ra8_ok) {
      break;
    }
    if ((status & (uint8_t)k_ra8_agt_agtcr_tundf_msk) != 0U) {
      if (ra8_board_led_toggle(k_ra8_board_led1) != k_ra8_ok) {
        break;
      }
      ++tick;
      if (internal_emit_tick(tick) != k_ra8_ok) {
        break;
      }
      /* Stop + re-arm to clear AGTCR.TUNDF on real silicon. */
      if (ra8_agt_stop((uint8_t)k_agt_pulse_channel) != k_ra8_ok) {
        break;
      }
      if (internal_arm() != k_ra8_ok) {
        break;
      }
    }
    ra8_delay_ms((uint32_t)k_agt_pulse_poll_ms);
  }
  internal_panic_halt();
}