alert_handler_testutils.c

// Copyright lowRISC contributors (OpenTitan project).
// Licensed under the Apache License, Version 2.0, see LICENSE for details.
// SPDX-License-Identifier: Apache-2.0
 
#include "sw/device/lib/testing/alert_handler_testutils.h"
 
#include "hw/top/dt/alert_handler.h"  // Generated
#include "hw/top/dt/api.h"            // Generated
#include "sw/device/lib/base/math.h"
#include "sw/device/lib/dif/dif_alert_handler.h"
#include "sw/device/lib/dif/dif_base.h"
#include "sw/device/lib/dif/dif_rstmgr.h"
#include "sw/device/lib/testing/test_framework/check.h"
 
#include "hw/top/alert_handler_regs.h"  // Generated
 
#define MODULE_ID MAKE_MODULE_ID('a', 'h', 't')
 
const char kAlertClassName[] = {'A', 'B', 'C', 'D'};
static_assert(ARRAYSIZE(kAlertClassName) == ALERT_HANDLER_PARAM_N_CLASSES,
              "Expected four alert classes!");
 
/**
 * This is used to traverse the dump treating it as an array of bits, and
 * extract a number of bits placing them in a uint32_t. The word and bit index
 * are updated by num_bits before returning.
 */
static uint32_t get_next_n_bits(
    int num_bits, const dif_rstmgr_alert_info_dump_segment_t *dump,
    int *word_index, int *bit_index) {
  CHECK(num_bits <= 32);
  CHECK(*bit_index < 32);
  uint32_t word = dump[*word_index] >> *bit_index;
  // If the needed bits straddle into the next word, extract the missing bits
  // from the next word.
  if (*bit_index + num_bits > 32) {
    word |= dump[(*word_index) + 1] << (32 - *bit_index);
  }
  if (*bit_index + num_bits >= 32) {
    (*word_index) += 1;
    *bit_index = *bit_index + num_bits - 32;
  } else {
    *bit_index += num_bits;
  }
  uint32_t mask = (uint32_t)(((uint64_t)1 << num_bits) - 1);
  word &= mask;
  return word;
}
 
status_t alert_handler_testutils_info_parse(
    const dif_rstmgr_alert_info_dump_segment_t *dump, int dump_size,
    alert_handler_testutils_info_t *info) {
  int word_index = 0;
  int bit_index = 0;
  for (int i = 0; i < ALERT_HANDLER_PARAM_N_CLASSES; ++i) {
    info->class_esc_state[i] =
        get_next_n_bits(3, dump, &word_index, &bit_index);
  }
  for (int i = 0; i < ALERT_HANDLER_PARAM_N_CLASSES; ++i) {
    info->class_esc_cnt[i] = get_next_n_bits(32, dump, &word_index, &bit_index);
  }
  for (int i = 0; i < ALERT_HANDLER_PARAM_N_CLASSES; ++i) {
    info->class_accum_cnt[i] =
        (uint16_t)get_next_n_bits(16, dump, &word_index, &bit_index);
  }
  info->loc_alert_cause =
      (uint8_t)get_next_n_bits(7, dump, &word_index, &bit_index);
  TRY_CHECK(word_index < dump_size);
  for (int i = 0; i < ALERT_HANDLER_PARAM_N_ALERTS; ++i) {
    info->alert_cause[i] = get_next_n_bits(1, dump, &word_index, &bit_index);
  }
  TRY_CHECK(word_index < dump_size ||
            (word_index == dump_size && bit_index == 0));
  return OK_STATUS();
}
 
void alert_handler_testutils_info_dump(
    const alert_handler_testutils_info_t *info) {
  LOG_INFO("alert_info:");
  LOG_INFO("esc_state [0]=%x, [1]=%x, [2]=%x, [3]=%x", info->class_esc_state[0],
           info->class_esc_state[1], info->class_esc_state[2],
           info->class_esc_state[3]);
  LOG_INFO("esc_cnt [0]=0x%x, [1]=0x%x, [2]=0x%x, [3]=0x%x",
           info->class_esc_cnt[0], info->class_esc_cnt[1],
           info->class_esc_cnt[2], info->class_esc_cnt[3]);
  LOG_INFO("accum_cnt [0]=0x%x, [1]=0x%x, [2]=0x%x, [3]=0x%x",
           info->class_accum_cnt[0], info->class_accum_cnt[1],
           info->class_accum_cnt[2], info->class_accum_cnt[3]);
  LOG_INFO("loc_alert_cause=0x%x", info->loc_alert_cause);
  int set_count = 0;
  LOG_INFO("alert_cause bits set:");
  // Typically very few bits are set, so it is more clear to only show the
  // on bits.
  for (int i = 0; i < ALERT_HANDLER_PARAM_N_ALERTS; ++i) {
    if (info->alert_cause[i]) {
      LOG_INFO("alert_cause[%d] = 1", i);
      ++set_count;
    }
  }
  if (set_count == 0) {
    LOG_INFO("No bits set");
  }
}
 
status_t alert_handler_testutils_configure_all(
    const dif_alert_handler_t *alert_handler, dif_alert_handler_config_t config,
    dif_toggle_t locked) {
  TRY_CHECK(alert_handler != NULL);
  TRY_CHECK(dif_is_valid_toggle(locked));
 
  // Check lengths of alert, local alert, and class arrays.
  TRY_CHECK((config.alerts_len > 0 && config.alerts != NULL &&
             config.alert_classes != NULL) ||
            (config.alerts_len == 0 && config.alerts == NULL &&
             config.alert_classes == NULL));
  TRY_CHECK((config.local_alerts_len > 0 && config.local_alerts != NULL &&
             config.local_alert_classes != NULL) ||
            (config.local_alerts_len == 0 && config.local_alerts == NULL &&
             config.local_alert_classes == NULL));
  TRY_CHECK((config.classes_len > 0 && config.classes != NULL &&
             config.class_configs != NULL) ||
            (config.classes_len == 0 && config.classes == NULL &&
             config.class_configs == NULL));
 
  // Check that the provided ping timeout actually fits in the timeout
  // register, which is smaller than a native word length.
  TRY_CHECK(
      config.ping_timeout <=
      ALERT_HANDLER_PING_TIMEOUT_CYC_SHADOWED_PING_TIMEOUT_CYC_SHADOWED_MASK);
 
  // Configure and enable the requested alerts.
  for (int i = 0; i < config.alerts_len; ++i) {
    TRY(dif_alert_handler_configure_alert(alert_handler, config.alerts[i],
                                          config.alert_classes[i],
                                          kDifToggleEnabled, locked));
  }
 
  // Configure and enable the requested local alerts.
  for (int i = 0; i < config.local_alerts_len; ++i) {
    TRY(dif_alert_handler_configure_local_alert(
        alert_handler, config.local_alerts[i], config.local_alert_classes[i],
        kDifToggleEnabled, locked));
  }
 
  // Configure and enable the requested classes.
  for (int i = 0; i < config.classes_len; ++i) {
    TRY(dif_alert_handler_configure_class(alert_handler, config.classes[i],
                                          config.class_configs[i],
                                          kDifToggleEnabled, locked));
  }
 
  // Configure the ping timer.
  TRY(dif_alert_handler_configure_ping_timer(alert_handler, config.ping_timeout,
                                             kDifToggleEnabled, locked));
 
  return OK_STATUS();
}
 
status_t alert_handler_testutils_get_cycles_from_us(uint64_t microseconds,
                                                    uint32_t *cycles) {
  uint64_t cycles_ = udiv64_slow(
      microseconds * dt_clock_frequency(dt_alert_handler_clock(
                         (dt_alert_handler_t)0, kDtAlertHandlerClockClk)),
      1000000,
      /*rem_out=*/NULL);
  TRY_CHECK(cycles_ < UINT32_MAX,
            "The value 0x%08x%08x can't fit into the 32 bits timer counter.",
            (uint32_t)(cycles_ >> 32), (uint32_t)cycles_);
  *cycles = (uint32_t)cycles_;
  return OK_STATUS();
}
 
uint32_t alert_handler_testutils_cycle_rescaling_factor(void) {
  return kDeviceType == kDeviceSimDV ? 1 : 10;
}
 
static status_t alert_handler_class_info_log(
    const dif_alert_handler_t *alert_handler,
    dif_alert_handler_class_t alert_class) {
  dif_alert_handler_class_state_t state;
  TRY(dif_alert_handler_get_class_state(alert_handler, alert_class, &state));
 
  uint16_t num_alerts;
  TRY(dif_alert_handler_get_accumulator(alert_handler, alert_class,
                                        &num_alerts));
 
  if (num_alerts > 0) {
    LOG_INFO("Alert class %c state: %d, acc_cnt: %d",
             kAlertClassName[alert_class], state, num_alerts);
 
    for (dif_alert_handler_alert_t alert = 0;
         alert < ALERT_HANDLER_PARAM_N_ALERTS; ++alert) {
      bool is_cause;
      TRY(dif_alert_handler_alert_is_cause(alert_handler, alert, &is_cause));
      if (is_cause) {
        LOG_INFO("Alert %d is set", alert);
      }
    }
 
    bool can_clear;
    TRY(dif_alert_handler_escalation_can_clear(alert_handler, alert_class,
                                               &can_clear));
    if (can_clear) {
      TRY(dif_alert_handler_escalation_clear(alert_handler, alert_class));
    } else {
      LOG_INFO("Alert class %c can't be cleared", kAlertClassName[alert_class]);
    }
  }
 
  return OK_STATUS();
}
 
static status_t alert_handler_class_log(
    const dif_alert_handler_t *alert_handler,
    dif_alert_handler_class_t alert_class) {
  dif_alert_handler_class_state_t state;
  TRY(dif_alert_handler_get_class_state(alert_handler, alert_class, &state));
 
  uint16_t num_alerts;
  TRY(dif_alert_handler_get_accumulator(alert_handler, alert_class,
                                        &num_alerts));
 
  if (num_alerts > 0) {
    LOG_INFO("Alert class %c state: %d, acc_cnt: %d",
             kAlertClassName[alert_class], state, num_alerts);
    for (dif_alert_handler_alert_t alert = 0;
         alert < ALERT_HANDLER_PARAM_N_ALERTS; ++alert) {
      bool is_cause;
      TRY(dif_alert_handler_alert_is_cause(alert_handler, alert, &is_cause));
      if (is_cause) {
        LOG_INFO("Alert %d is set", alert);
      }
    }
  }
 
  return OK_STATUS();
}
 
status_t alert_handler_testutils_status_log(
    const dif_alert_handler_t *alert_handler) {
  TRY_CHECK(alert_handler != NULL);
 
  for (dif_alert_handler_class_t alert_class = 0;
       alert_class < ALERT_HANDLER_PARAM_N_CLASSES; ++alert_class) {
    TRY(alert_handler_class_log(alert_handler, alert_class));
  }
 
  return OK_STATUS();
}
 
status_t alert_handler_testutils_dump_log(const dif_rstmgr_t *rstmgr) {
  TRY_CHECK(rstmgr != NULL);
 
  dif_rstmgr_alert_info_dump_segment_t dump[DIF_RSTMGR_ALERT_INFO_MAX_SIZE];
  size_t seg_size;
  alert_handler_testutils_info_t actual_info;
 
  uint32_t log_count = 0;
 
  CHECK_DIF_OK(dif_rstmgr_alert_info_dump_read(
      rstmgr, dump, DIF_RSTMGR_ALERT_INFO_MAX_SIZE, &seg_size));
  CHECK(seg_size <= INT_MAX, "seg_size must fit in int");
  CHECK_STATUS_OK(
      alert_handler_testutils_info_parse(dump, (int)seg_size, &actual_info));
 
  for (dif_alert_handler_class_t alert_class = 0;
       alert_class < ALERT_HANDLER_PARAM_N_CLASSES; ++alert_class) {
    if (actual_info.class_esc_state[alert_class] != kCstateIdle) {
      LOG_INFO("crashdump - Alert class %c state: %d, acc_cnt: %d, esc_cnt: %d",
               kAlertClassName[alert_class],
               actual_info.class_esc_state[alert_class],
               actual_info.class_accum_cnt[alert_class],
               actual_info.class_esc_cnt[alert_class]);
      log_count++;
    }
  }
  for (dif_alert_handler_alert_t alert = 0;
       alert < ALERT_HANDLER_PARAM_N_ALERTS; ++alert) {
    if (actual_info.alert_cause[alert]) {
      LOG_INFO("crashdump - Alert %d is set", alert);
      log_count++;
    }
  }
 
  if (log_count == 0) {
    LOG_INFO("crashdump - No alerts reported");
  }
 
  return OK_STATUS();
}
 
status_t alert_handler_testutils_dump_enable(
    const dif_alert_handler_t *alert_handler, const dif_rstmgr_t *rstmgr) {
  TRY_CHECK(alert_handler != NULL);
  TRY_CHECK(rstmgr != NULL);
 
  uint32_t enable_count = 0;
  for (dif_alert_handler_class_t alert_class = 0;
       alert_class < ALERT_HANDLER_PARAM_N_CLASSES; ++alert_class) {
    bool is_enabled;
    TRY(dif_alert_handler_is_class_enabled(alert_handler, alert_class,
                                           &is_enabled));
    if (is_enabled) {
      TRY(dif_alert_handler_crash_dump_trigger_set(
          alert_handler, alert_class, kDifAlertHandlerClassStatePhase3));
      enable_count++;
    }
  }
 
  if (enable_count) {
    CHECK_DIF_OK(dif_rstmgr_alert_info_set_enabled(rstmgr, kDifToggleEnabled));
  }
 
  return OK_STATUS();
}