| # Copyright (C) 2016-2022 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 |