tests: Add a test for trace interrupts
Signed-off-by: Paul Mackerras <paulus@ozlabs.org>pull/244/head
parent
b589d2d472
commit
e1672ea709
Binary file not shown.
@ -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
|
||||
@ -0,0 +1,3 @@
|
||||
TEST=trace
|
||||
|
||||
include ../Makefile.test
|
||||
@ -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
|
||||
@ -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 = .;
|
||||
}
|
||||
@ -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;
|
||||
}
|
||||
Loading…
Reference in New Issue