tests: Add a test for trace interrupts

Signed-off-by: Paul Mackerras <paulus@ozlabs.org>

tests/test_trace.console_out

@@ -0,0 +1,7 @@
+test 01:PASS
+test 02:PASS
+test 03:PASS
+test 04:PASS
+test 05:PASS
+test 06:PASS
+test 07:PASS

tests/trace/Makefile

@@ -0,0 +1,3 @@
+TEST=trace
+
+include ../Makefile.test

tests/trace/head.S

@@ -0,0 +1,216 @@
+/* Copyright 2020 Paul Mackerras, IBM Corp.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ * 	http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
+ * implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+
+/* Load an immediate 64-bit value into a register */
+#define LOAD_IMM64(r, e)			\
+	lis     r,(e)@highest;			\
+	ori     r,r,(e)@higher;			\
+	rldicr  r,r, 32, 31;			\
+	oris    r,r, (e)@h;			\
+	ori     r,r, (e)@l;
+
+	.section ".head","ax"
+
+	/*
+	 * Microwatt currently enters in LE mode at 0x0, so we don't need to
+	 * do any endian fix ups
+	 */
+	. = 0
+.global _start
+_start:
+	LOAD_IMM64(%r10,__bss_start)
+	LOAD_IMM64(%r11,__bss_end)
+	subf	%r11,%r10,%r11
+	addi	%r11,%r11,63
+	srdi.	%r11,%r11,6
+	beq	2f
+	mtctr	%r11
+1:	dcbz	0,%r10
+	addi	%r10,%r10,64
+	bdnz	1b
+
+2:	LOAD_IMM64(%r1,__stack_top)
+	li	%r0,0
+	stdu	%r0,-16(%r1)
+	mtsprg2	%r0
+	LOAD_IMM64(%r12, main)
+	mtctr	%r12
+	bctrl
+	attn // terminate on exit
+	b .
+
+exception:
+	mtsprg3	%r0
+	mfsprg2	%r0
+	cmpdi	%r0,0
+	bne	call_ret
+	attn
+
+#define EXCEPTION(nr)		\
+	.= nr			;\
+	li	%r0,nr		;\
+	b	exception
+
+	EXCEPTION(0x300)
+	EXCEPTION(0x380)
+	EXCEPTION(0x400)
+	EXCEPTION(0x480)
+	EXCEPTION(0x500)
+	EXCEPTION(0x600)
+	EXCEPTION(0x700)
+	EXCEPTION(0x800)
+	EXCEPTION(0x900)
+	EXCEPTION(0x980)
+	EXCEPTION(0xa00)
+	EXCEPTION(0xb00)
+	EXCEPTION(0xc00)
+	EXCEPTION(0xd00)
+	EXCEPTION(0xe00)
+	EXCEPTION(0xe20)
+	EXCEPTION(0xe40)
+	EXCEPTION(0xe60)
+	EXCEPTION(0xe80)
+	EXCEPTION(0xf00)
+	EXCEPTION(0xf20)
+	EXCEPTION(0xf40)
+	EXCEPTION(0xf60)
+	EXCEPTION(0xf80)
+
+	. = 0x1000
+	/*
+	 * Call a function in a context with a given MSR value.
+	 * r3, r4 = args; r5 = function, r6 = MSR,
+	 * r7 = array in which to return r3 and r4
+	 * Return value is trap number or 0.
+	 */
+	.globl	callit
+callit:
+	mflr	%r0
+	std	%r0,16(%r1)
+	stdu	%r1,-256(%r1)
+	mfcr	%r8
+	stw	%r8,100(%r1)
+	std	%r13,104(%r1)
+	std	%r14,112(%r1)
+	std	%r15,120(%r1)
+	std	%r16,128(%r1)
+	std	%r17,136(%r1)
+	std	%r18,144(%r1)
+	std	%r19,152(%r1)
+	std	%r20,160(%r1)
+	std	%r21,168(%r1)
+	std	%r22,176(%r1)
+	std	%r23,184(%r1)
+	std	%r24,192(%r1)
+	std	%r25,200(%r1)
+	std	%r26,208(%r1)
+	std	%r27,216(%r1)
+	std	%r28,224(%r1)
+	std	%r29,232(%r1)
+	std	%r30,240(%r1)
+	std	%r31,248(%r1)
+	li	%r10,call_ret@l
+	mtlr	%r10
+	mtsprg0	%r7
+	mtsprg1	%r1
+	mtsprg2	%r2
+	li	%r11,0
+	mtsprg3	%r11
+	mtsrr0	%r5
+	mtsrr1	%r6
+	rfid
+call_ret:
+	mfsprg0	%r7		/* restore regs in case of trap */
+	mfsprg1	%r1
+	mfsprg2	%r2
+	li	%r0,0
+	mtsprg2	%r0
+	std	%r3,0(%r7)
+	std	%r4,8(%r7)
+	mfsprg3	%r3
+	lwz	%r8,100(%r1)
+	mtcr	%r8
+	ld	%r13,104(%r1)
+	ld	%r14,112(%r1)
+	ld	%r15,120(%r1)
+	ld	%r16,128(%r1)
+	ld	%r17,136(%r1)
+	ld	%r18,144(%r1)
+	ld	%r19,152(%r1)
+	ld	%r20,160(%r1)
+	ld	%r21,168(%r1)
+	ld	%r22,176(%r1)
+	ld	%r23,184(%r1)
+	ld	%r24,192(%r1)
+	ld	%r25,200(%r1)
+	ld	%r26,208(%r1)
+	ld	%r27,216(%r1)
+	ld	%r28,224(%r1)
+	ld	%r29,232(%r1)
+	ld	%r30,240(%r1)
+	ld	%r31,248(%r1)
+	addi	%r1,%r1,256
+	ld	%r0,16(%r1)
+	mtlr	%r0
+	blr
+
+	.global test1
+test1:
+	addi	%r3,%r4,1
+	li	%r3,0
+	blr
+
+	.global test2
+test2:
+	ld	%r3,0(%r4)
+	li	%r3,-1
+	blr
+
+	.global test3
+test3:
+	stw	%r3,0(%r4)
+	li	%r3,-1
+	blr
+
+	.global test4
+test4:
+	dcbt	0,%r3
+	li	%r3,-1
+	blr
+
+	.global test5
+test5:
+	dcbtst	0,%r3
+	li	%r3,-1
+	blr
+
+	.global test6
+test6:
+	nop
+	nop
+	b	1f
+	li	%r3,2
+	blr
+1:	li	%r3,1
+	blr
+
+	.global	test7
+test7:
+	li	%r4,1
+	cmpwi	%r4,0
+	bne	1f
+	li	%r3,-1
+1:	blr

tests/trace/powerpc.lds

@@ -0,0 +1,27 @@
+SECTIONS
+{
+	. = 0;
+	_start = .;
+	.head : {
+		KEEP(*(.head))
+	}
+	. = ALIGN(0x1000);
+	.text : { *(.text) *(.text.*) *(.rodata) *(.rodata.*) }
+	. = ALIGN(0x1000);
+	.data : { *(.data) *(.data.*) *(.got) *(.toc) }
+	. = ALIGN(0x80);
+	__bss_start = .;
+	.bss : {
+		*(.dynsbss)
+		*(.sbss)
+		*(.scommon)
+		*(.dynbss)
+		*(.bss)
+		*(.common)
+		*(.bss.*)
+	}
+	. = ALIGN(0x80);
+	__bss_end = .;
+	. = . + 0x4000;
+	__stack_top = .;
+}

tests/trace/trace.c

@@ -0,0 +1,222 @@
+#include <stddef.h>
+#include <stdint.h>
+#include <stdbool.h>
+
+#include "console.h"
+
+extern unsigned long callit(unsigned long arg1, unsigned long arg2,
+			    unsigned long (*fn)(unsigned long, unsigned long),
+			    unsigned long msr, unsigned long *regs);
+
+#define MSR_SE	0x400
+#define MSR_BE	0x200
+
+#define SRR0	26
+#define SRR1	27
+#define SPRG0	272
+#define SPRG1	273
+
+static inline unsigned long mfmsr(void)
+{
+	unsigned long msr;
+
+	__asm__ volatile ("mfmsr %0" : "=r" (msr));
+	return msr;
+}
+
+static inline unsigned long mfspr(int sprnum)
+{
+	long val;
+
+	__asm__ volatile("mfspr %0,%1" : "=r" (val) : "i" (sprnum));
+	return val;
+}
+
+static inline void mtspr(int sprnum, unsigned long val)
+{
+	__asm__ volatile("mtspr %0,%1" : : "i" (sprnum), "r" (val));
+}
+
+void print_string(const char *str)
+{
+	for (; *str; ++str)
+		putchar(*str);
+}
+
+void print_hex(unsigned long val, int ndigits)
+{
+	int i, x;
+
+	for (i = (ndigits - 1) * 4; i >= 0; i -= 4) {
+		x = (val >> i) & 0xf;
+		if (x >= 10)
+			putchar(x + 'a' - 10);
+		else
+			putchar(x + '0');
+	}
+}
+
+// i < 100
+void print_test_number(int i)
+{
+	print_string("test ");
+	putchar(48 + i/10);
+	putchar(48 + i%10);
+	putchar(':');
+}
+
+extern unsigned long test1(unsigned long, unsigned long);
+
+int trace_test_1(void)
+{
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(1, 2, test1, mfmsr() | MSR_SE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test1 + 4)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x40000000)
+		return ret + 2;
+	if (regs[0] != 3 || regs[1] != 2)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test2(unsigned long, unsigned long);
+
+int trace_test_2(void)
+{
+	unsigned long x = 3;
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(1, (unsigned long)&x, test2, mfmsr() | MSR_SE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test2 + 4)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x50000000)
+		return ret + 2;
+	if (regs[0] != 3 || x != 3)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test3(unsigned long, unsigned long);
+
+int trace_test_3(void)
+{
+	unsigned int x = 3;
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(11, (unsigned long)&x, test3, mfmsr() | MSR_SE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test3 + 4)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x48000000)
+		return ret + 2;
+	if (regs[0] != 11 || x != 11)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test4(unsigned long, unsigned long);
+
+int trace_test_4(void)
+{
+	unsigned long x = 3;
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(1, (unsigned long)&x, test4, mfmsr() | MSR_SE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test4 + 4)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x50000000)
+		return ret + 2;
+	if (regs[0] != 1 || x != 3)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test5(unsigned long, unsigned long);
+
+int trace_test_5(void)
+{
+	unsigned int x = 7;
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(11, (unsigned long)&x, test5, mfmsr() | MSR_SE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test5 + 4)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x48000000)
+		return ret + 2;
+	if (regs[0] != 11 || x != 7)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test6(unsigned long, unsigned long);
+
+int trace_test_6(void)
+{
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(11, 55, test6, mfmsr() | MSR_BE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test6 + 20)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x40000000)
+		return ret + 2;
+	if (regs[0] != 11 || regs[1] != 55)
+		return 3;
+	return 0;
+}
+
+extern unsigned long test7(unsigned long, unsigned long);
+
+int trace_test_7(void)
+{
+	unsigned long ret;
+	unsigned long regs[2];
+
+	ret = callit(11, 55, test7, mfmsr() | MSR_BE, regs);
+	if (ret != 0xd00 || mfspr(SRR0) != (unsigned long)&test7 + 16)
+		return ret + 1;
+	if ((mfspr(SRR1) & 0x781f0000) != 0x40000000)
+		return ret + 2;
+	if (regs[0] != 11 || regs[1] != 1)
+		return 3;
+	return 0;
+}
+
+int fail = 0;
+
+void do_test(int num, int (*test)(void))
+{
+	int ret;
+
+	print_test_number(num);
+	ret = test();
+	if (ret == 0) {
+		print_string("PASS\r\n");
+	} else {
+		fail = 1;
+		print_string("FAIL ");
+		print_hex(ret, 4);
+		print_string("\r\n");
+	}
+}
+
+int main(void)
+{
+	console_init();
+
+	do_test(1, trace_test_1);
+	do_test(2, trace_test_2);
+	do_test(3, trace_test_3);
+	do_test(4, trace_test_4);
+	do_test(5, trace_test_5);
+	do_test(6, trace_test_6);
+	do_test(7, trace_test_7);
+
+	return fail;
+}

tests/update_console_tests

@@ -3,7 +3,7 @@
 # Script to update console related tests from source
 #
 
-for i in sc illegal decrementer xics privileged mmu misc modes reservation ; do
+for i in sc illegal decrementer xics privileged mmu misc modes reservation trace ; do
     cd $i
     make
     cd -