// SPDX-License-Identifier: GPL-2.0
/*
 * Copyright (C) 2023 ARM Limited
 *
 * Verify that the FPMR register context in signal frames is set up as
 * expected.
 */

#include <signal.h>
#include <ucontext.h>
#include <sys/auxv.h>
#include <sys/prctl.h>
#include <unistd.h>
#include <asm/sigcontext.h>

#include "test_signals_utils.h"
#include "testcases.h"

static union {
	ucontext_t uc;
	char buf[1024 * 128];
} context;

#define SYS_FPMR "S3_3_C4_C4_2"

static uint64_t get_fpmr(void)
{
	uint64_t val;

	asm volatile (
		"mrs	%0, " SYS_FPMR "\n"
		: "=r"(val)
		:
		: "cc");

	return val;
}

int fpmr_present(struct tdescr *td, siginfo_t *si, ucontext_t *uc)
{
	struct _aarch64_ctx *head = GET_BUF_RESV_HEAD(context);
	struct fpmr_context *fpmr_ctx;
	size_t offset;
	bool in_sigframe;
	bool have_fpmr;
	__u64 orig_fpmr;

	have_fpmr = getauxval(AT_HWCAP2) & HWCAP2_FPMR;
	if (have_fpmr)
		orig_fpmr = get_fpmr();

	if (!get_current_context(td, &context.uc, sizeof(context)))
		return 1;

	fpmr_ctx = (struct fpmr_context *)
		get_header(head, FPMR_MAGIC, td->live_sz, &offset);

	in_sigframe = fpmr_ctx != NULL;

	fprintf(stderr, "FPMR sigframe %s on system %s FPMR\n",
		in_sigframe ? "present" : "absent",
		have_fpmr ? "with" : "without");

	td->pass = (in_sigframe == have_fpmr);

	if (have_fpmr && fpmr_ctx) {
		if (fpmr_ctx->fpmr != orig_fpmr) {
			fprintf(stderr, "FPMR in frame is %llx, was %llx\n",
				fpmr_ctx->fpmr, orig_fpmr);
			td->pass = false;
		}
	}

	return 0;
}

struct tdescr tde = {
	.name = "FPMR",
	.descr = "Validate that FPMR is present as expected",
	.timeout = 3,
	.run = fpmr_present,
};