Add testsuite for the PRU simulator port

[deliverable/binutils-gdb.git] / sim / testsuite / sim / pru / testutils.inc

diff --git a/sim/testsuite/sim/pru/testutils.inc b/sim/testsuite/sim/pru/testutils.inc
new file mode 100644 (file)
index 0000000..7539084
--- /dev/null
+++ b/sim/testsuite/sim/pru/testutils.inc
@@ -0,0 +1,100 @@
+# Copyright (C) 2016-2019 Free Software Foundation, Inc.
+# Contributed by Dimitar Dimitrov <dimitar@dinux.eu>
+#
+# This file is part of the GNU simulators.
+#
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 3 of the License, or
+# (at your option) any later version.
+#
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+#
+# You should have received a copy of the GNU General Public License
+# along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+# MACRO: start
+# All assembler tests should start with a call to "main_test"
+       .macro start
+       .text
+
+       .global _start
+_start:
+
+       # Skip over these inlined funcs.
+       jmp __main_test;
+
+       .global __pass
+       .type __pass, function
+__pass:
+       # Note - DRAM LMA and VMA are equal for PRU, so
+       # we can afford to pass DRAM pointer directly.
+       write 1, _passmsg, 5
+       exit 0
+
+       .global __fail
+       .type __fail, function
+__fail:
+       write 1, _failmsg, 5
+       exit 1
+
+       .data
+_passmsg:
+       .ascii "pass\n"
+
+_failmsg:
+       .ascii "fail\n"
+
+       .text
+       .global __main_test
+       .type __main_test, function
+__main_test:
+       .endm
+
+# MACRO: system_call
+# Make a libgloss system call
+       .macro system_call nr:req, arg1=0, arg2=0, arg3=0
+       ldi r1, \nr
+       ldi r14, \arg1
+       ldi r15, \arg2
+       ldi r16, \arg3
+       halt
+       .endm
+
+# MACRO: exit
+# Quit the current test
+       .macro exit rc:req
+       system_call 1, \rc
+       .endm
+
+# MACRO: pass
+# Write 'pass' to stdout via syscalls and quit;
+# meant for non-OS operating environments
+       .macro pass
+       jmp __pass;
+       .endm
+
+# MACRO: fail
+# Write 'fail' to stdout via syscalls and quit;
+# meant for non-OS operating environments
+       .macro fail
+       jmp __fail;
+       .endm
+
+# MACRO: write
+# Just like the write() C function; uses system calls
+       .macro write fd:req, str:req, len:req
+       system_call 5, \fd, \str, \len
+       .endm
+
+# MACRO: qbne32
+# Like qbne instruction, but check a 32-bit constant value.
+       .macro qbne32 label:req, op0:req, C0:req
+       qbne \label, \op0\().b0, ((\C0) >> 0) & 0xff
+       qbne \label, \op0\().b1, ((\C0) >> 8) & 0xff
+       qbne \label, \op0\().b2, ((\C0) >> 16) & 0xff
+       qbne \label, \op0\().b3, ((\C0) >> 24) & 0xff
+       .endm