// SPDX-License-Identifier: GPL-2.0-only
/*
 * KVM nVHE hypervisor stack tracing support.
 *
 * Copyright (C) 2022 Google LLC
 */
#include <asm/kvm_asm.h>
#include <asm/kvm_hyp.h>
#include <asm/memory.h>
#include <asm/percpu.h>

DEFINE_PER_CPU(unsigned long [OVERFLOW_STACK_SIZE/sizeof(long)], overflow_stack)
 __aligned(16);

DEFINE_PER_CPU(struct kvm_nvhe_stacktrace_info, kvm_stacktrace_info);

/*
 * hyp_prepare_backtrace - Prepare non-protected nVHE backtrace.
 *
 * @fp : frame pointer at which to start the unwinding.
 * @pc : program counter at which to start the unwinding.
 *
 * Save the information needed by the host to unwind the non-protected
 * nVHE hypervisor stack in EL1.
 */
static void hyp_prepare_backtrace(unsigned long fp, unsigned long pc)
{
 struct kvm_nvhe_stacktrace_info *stacktrace_info = this_cpu_ptr(&kvm_stacktrace_info);
 struct kvm_nvhe_init_params *params = this_cpu_ptr(&kvm_init_params);

 stacktrace_info->stack_base = (unsigned long)(params->stack_hyp_va - NVHE_STACK_SIZE);
 stacktrace_info->overflow_stack_base = (unsigned long)this_cpu_ptr(overflow_stack);
 stacktrace_info->fp = fp;
 stacktrace_info->pc = pc;
}

#ifdef CONFIG_PROTECTED_NVHE_STACKTRACE
#include <asm/stacktrace/nvhe.h>

DEFINE_PER_CPU(unsigned long [NVHE_STACKTRACE_SIZE/sizeof(long)], pkvm_stacktrace);

static struct stack_info stackinfo_get_overflow(void)
{
 unsigned long low = (unsigned long)this_cpu_ptr(overflow_stack);
 unsigned long high = low + OVERFLOW_STACK_SIZE;

 return (struct stack_info) {
  .low = low,
  .high = high,
 };
}

static struct stack_info stackinfo_get_hyp(void)
{
 struct kvm_nvhe_init_params *params = this_cpu_ptr(&kvm_init_params);
 unsigned long high = params->stack_hyp_va;
 unsigned long low = high - NVHE_STACK_SIZE;

 return (struct stack_info) {
  .low = low,
  .high = high,
 };
}

static int unwind_next(struct unwind_state *state)
{
 return unwind_next_frame_record(state);
}

static void notrace unwind(struct unwind_state *state,
      stack_trace_consume_fn consume_entry,
      void *cookie)
{
 while (1) {
  int ret;

  if (!consume_entry(cookie, state->pc))
   break;
  ret = unwind_next(state);
  if (ret < 0)
   break;
 }
}

/*
 * pkvm_save_backtrace_entry - Saves a protected nVHE HYP stacktrace entry
 *
 * @arg    : index of the entry in the stacktrace buffer
 * @where  : the program counter corresponding to the stack frame
 *
 * Save the return address of a stack frame to the shared stacktrace buffer.
 * The host can access this shared buffer from EL1 to dump the backtrace.
 */
static bool pkvm_save_backtrace_entry(void *arg, unsigned long where)
{
 unsigned long *stacktrace = this_cpu_ptr(pkvm_stacktrace);
 int *idx = (int *)arg;

 /*
  * Need 2 free slots: 1 for current entry and 1 for the
  * delimiter.
 */
 if (*idx > ARRAY_SIZE(pkvm_stacktrace) - 2)
  return false;

 stacktrace[*idx] = where;
 stacktrace[++*idx] = 0UL;

 return true;
}

/*
 * pkvm_save_backtrace - Saves the protected nVHE HYP stacktrace
 *
 * @fp : frame pointer at which to start the unwinding.
 * @pc : program counter at which to start the unwinding.
 *
 * Save the unwinded stack addresses to the shared stacktrace buffer.
 * The host can access this shared buffer from EL1 to dump the backtrace.
 */
static void pkvm_save_backtrace(unsigned long fp, unsigned long pc)
{
 struct stack_info stacks[] = {
  stackinfo_get_overflow(),
  stackinfo_get_hyp(),
 };
 struct unwind_state state = {
  .stacks = stacks,
  .nr_stacks = ARRAY_SIZE(stacks),
 };
 int idx = 0;

 kvm_nvhe_unwind_init(&state, fp, pc);

 unwind(&state, pkvm_save_backtrace_entry, &idx);
}
#else /* !CONFIG_PROTECTED_NVHE_STACKTRACE */
static void pkvm_save_backtrace(unsigned long fp, unsigned long pc)
{
}
#endif /* CONFIG_PROTECTED_NVHE_STACKTRACE */

/*
 * kvm_nvhe_prepare_backtrace - prepare to dump the nVHE backtrace
 *
 * @fp : frame pointer at which to start the unwinding.
 * @pc : program counter at which to start the unwinding.
 *
 * Saves the information needed by the host to dump the nVHE hypervisor
 * backtrace.
 */
void kvm_nvhe_prepare_backtrace(unsigned long fp, unsigned long pc)
{
 if (is_protected_kvm_enabled())
  pkvm_save_backtrace(fp, pc);
 else
  hyp_prepare_backtrace(fp, pc);
}