Simple unaligned-pc ptrace evil test.

Code initially for sparc from Mark Kettenis, KNF and other architectures
snippets by yours truly.

Regress at your own risc on sparc and m68060 for now.

3 files changed, 107 insertions, 2 deletions

diff --git a/regress/sys/Makefile b/regress/sys/Makefile
index 121c32be38e..011dddbc9ce 100644
--- a/regress/sys/Makefile
+++ b/regress/sys/Makefile
@@ -1,7 +1,7 @@
-#	$OpenBSD: Makefile,v 1.13 2004/01/29 22:09:57 millert Exp $
+#	$OpenBSD: Makefile,v 1.14 2004/01/31 22:09:32 miod Exp $
 #	$NetBSD: Makefile,v 1.4 1995/04/20 22:41:08 cgd Exp $
 
-SUBDIR+= crypto ddb fdescfs fifofs kern sys uvm dev
+SUBDIR+= crypto ddb fdescfs fifofs kern ptrace sys uvm dev
 .if exists(arch/${MACHINE})
 SUBDIR+= arch/${MACHINE}
 .endif
diff --git a/regress/sys/ptrace/Makefile b/regress/sys/ptrace/Makefile
new file mode 100644
index 00000000000..cade75aa9d0
--- /dev/null
+++ b/regress/sys/ptrace/Makefile
@@ -0,0 +1,5 @@
+#	$OpenBSD: Makefile,v 1.1 2004/01/31 22:09:35 miod Exp $
+
+PROG=ptrace
+
+.include <bsd.regress.mk>
diff --git a/regress/sys/ptrace/ptrace.c b/regress/sys/ptrace/ptrace.c
new file mode 100644
index 00000000000..7320cb22e00
--- /dev/null
+++ b/regress/sys/ptrace/ptrace.c
@@ -0,0 +1,100 @@
+/*	$OpenBSD: ptrace.c,v 1.1 2004/01/31 22:09:35 miod Exp $	*/
+/*
+ * Copyright (c) 2004, Mark Kettenis.
+ * Copyright (c) 2004, Miodrag Vallat.
+ * All rights reserved.
+ *
+ * Redistribution and use in source and binary forms, with or without
+ * modification, are permitted provided that the following conditions
+ * are met:
+ * 1. Redistributions of source code must retain the above copyright
+ *    notice, this list of conditions and the following disclaimer.
+ * 2. Redistributions in binary form must reproduce the above copyright
+ *    notice, this list of conditions and the following disclaimer in the
+ *    documentation and/or other materials provided with the distribution.
+ *
+ * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
+ * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
+ * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
+ * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
+ * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
+ * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
+ * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
+ * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
+ * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
+ * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
+ */
+
+#include <sys/types.h>
+#include <sys/ptrace.h>
+#include <sys/wait.h>
+
+#include <machine/reg.h>
+
+#include <signal.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <unistd.h>
+
+/*
+ * This tests checks whether ptrace will correctly cope with unaligned pc.
+ *
+ * Platforms known to fail at the moment are: sparc, m68060.
+ */
+int
+main(void)
+{
+	pid_t pid;
+	int status;
+
+	pid = fork();
+	if (pid == 0) {
+		ptrace(PT_TRACE_ME, 0, 0, 0);
+		raise(SIGTRAP);
+		exit(EXIT_FAILURE);
+	} else {
+		struct reg regs;
+
+		waitpid(pid, &status, 0);
+		ptrace(PT_GETREGS, pid, (caddr_t)&regs, 0);
+
+		/*
+		 * Make sure amd64 is tested before i386,
+		 * and sparc64 before sparc.
+		 */
+
+#if defined(__x86_64__)
+		regs.regs[tRIP] |= 0x07;
+#elif defined(__m68k__)
+		regs.r_pc |= 0x03;
+#elif defined(__hppa__)
+		regs.r_pc |= 0x03;
+		regs.r_npc |= 0x03;
+#elif defined(__i386__)
+		regs.r_eip |= 0x03;
+#elif defined(__powerpc__)
+		regs.pc |= 0x03;
+#elif defined( __sparcv9__)
+		regs.r_pc |= 0x07;
+		regs.r_npc |= 0x07;
+#elif defined(__sparc__)
+		regs.r_pc |= 0x03;
+		regs.r_npc |= 0x03;
+#elif defined( __m88k__)
+		/*
+		 * The following code is for 88100 only, but should work with
+		 * 88110 too, as it does not set the DELAY bit in exip.
+		 * Though we might want to test the behaviour with delay set
+		 * in exip too...
+		 */
+		regs.sxip |= 0x03;
+		regs.snip |= 0x03;
+		regs.sfip |= 0x03;
+#elif defined(__vax__)
+		regs.pc |= 0x03;
+#endif
+		ptrace(PT_SETREGS, pid, (caddr_t)&regs, 0);
+		ptrace(PT_CONTINUE, pid, (caddr_t)1, 0);
+	}
+	exit(EXIT_SUCCESS);
+}