/*	$OpenBSD: sfuid.c,v 1.4 2021/12/13 16:56:49 deraadt Exp $	*/

/*
 * Written by Michael Shalayeff, 2004. Public Domain.
 */

#include <sys/types.h>
#include <signal.h>
#include <unistd.h>
#include <stdio.h>
#include <stdlib.h>
#include <string.h>
#include <err.h>

#ifdef __hppa__

#define	sfuid(i,r)	__asm volatile(	\
    "spop1,%1,0	%0" : "=r" (r) : "i" (i))

volatile int sfu;

void
sigill(int sig, siginfo_t *sip, void *scp)
{
	char buf[1024];

	snprintf(buf, sizeof buf, "sfuid(%d) not decoded\n", sfu);
	write(STDOUT_FILENO, buf, strlen(buf));
        _exit(1);
}

int
main(int argc, char *argv[])
{
	struct sigaction sa;
	int rv;

	sa.sa_sigaction = &sigill;
	sa.sa_flags = SA_SIGINFO;
	sigemptyset(&sa.sa_mask);
	sigaction(SIGILL, &sa, NULL);

#define	test_sfuid(i,rv)	\
	rv = -1, sfu = i;	\
	sfuid(i, rv);		\
	if (rv != 0)		\
		errx(1, "sfuid(%d) returned %d", i, rv);

	sfuid(0, rv);
	sfuid(1, rv);
	sfuid(2, rv);
	sfuid(3, rv);
	sfuid(4, rv);
	sfuid(5, rv);
	sfuid(6, rv);
	sfuid(7, rv);

	exit(0);
}

#else

int
main(int argc, char *argv[])
{
	printf("SKIPPED\n");
	exit(0);
}

#endif