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