board_periph_lvd.c

Go to the documentation of this file.

 
#include <stdint.h>
#include <stdio.h>
 
#include "board_periph_block.h"
#include "emu_host_io_internal.h"

typedef enum : uint64_t {
  k_lvd_base        = 0x4001E0E0UL, 
  k_lvd_span        = 0x04UL,       
  k_lvd_off_pvd1cr1 = 0x00UL,       
  k_lvd_off_pvd1sr  = 0x01UL,       
  k_lvd_off_pvd2cr1 = 0x02UL,       
  k_lvd_off_pvd2sr  = 0x03UL,       
} lvd_geom_t;

typedef enum : uint8_t {
  k_lvd_sr_det     = 0x01U, 
  k_lvd_sr_mon     = 0x02U, 
  k_lvd_sr_healthy = 0x02U, 
} lvd_field_t;

typedef enum : uint32_t {
  k_lvd_block_order = 170U, 
} lvd_order_t;

typedef struct {
  uint8_t  pvd1cr1; 
  uint8_t  pvd2cr1; 
  uint32_t reads;   
} lvd_state_t;
 
static lvd_state_t s_lvd;

RA8_INTERNAL static void internal_lvd_reset(void)
{
  s_lvd = (lvd_state_t){};
}

RA8_INTERNAL static uint64_t internal_lvd_read(uc_engine* uc, uint64_t addr, unsigned size)
{
  (void)uc;
  (void)size;
  const uint64_t off = addr - (uint64_t)k_lvd_base;
  if (off == (uint64_t)k_lvd_off_pvd1cr1) {
    return s_lvd.pvd1cr1;
  }
  if (off == (uint64_t)k_lvd_off_pvd2cr1) {
    return s_lvd.pvd2cr1;
  }
  if ((off == (uint64_t)k_lvd_off_pvd1sr) || (off == (uint64_t)k_lvd_off_pvd2sr)) {
    s_lvd.reads++;
    return (uint64_t)k_lvd_sr_healthy; /* MON = above, DET = 0. */
  }
  return 0U;
}

RA8_INTERNAL static void
internal_lvd_write(uc_engine* uc, uint64_t addr, unsigned size, uint64_t value)
{
  (void)uc;
  (void)size;
  const uint64_t off = addr - (uint64_t)k_lvd_base;
  if (off == (uint64_t)k_lvd_off_pvd1cr1) {
    s_lvd.pvd1cr1 = (uint8_t)value;
  } else if (off == (uint64_t)k_lvd_off_pvd2cr1) {
    s_lvd.pvd2cr1 = (uint8_t)value;
  }
  /* PVDmSR writes (DET write-0-to-clear) are absorbed: MON stays "above". */
}

RA8_INTERNAL static void internal_lvd_report(void)
{
  if (s_lvd.reads == 0U) {
    return; /* Untouched: stay quiet. */
  }
  (void)priv_emu_io_errf("  LVD/PVD       : status reads=%u (MON=above, DET=0)\n", s_lvd.reads);
}

static const board_periph_block_t s_k_lvd_block = {
  .base   = (uint64_t)k_lvd_base,
  .span   = (uint64_t)k_lvd_span,
  .order  = (uint32_t)k_lvd_block_order,
  .read   = internal_lvd_read,
  .write  = internal_lvd_write,
  .tick   = nullptr,
  .reset  = internal_lvd_reset,
  .report = internal_lvd_report,
  .name   = "LVD/PVD",
};

[[gnu::constructor]] RA8_INTERNAL static void internal_lvd_block_register(void)
{
  board_periph_register_block(&s_k_lvd_block);
}