diff options
Diffstat (limited to 'newlib/libc/machine/spu/mk_syscalls')
| -rw-r--r-- | newlib/libc/machine/spu/mk_syscalls | 98 |
1 files changed, 98 insertions, 0 deletions
diff --git a/newlib/libc/machine/spu/mk_syscalls b/newlib/libc/machine/spu/mk_syscalls new file mode 100644 index 000000000..db9ea9409 --- /dev/null +++ b/newlib/libc/machine/spu/mk_syscalls @@ -0,0 +1,98 @@ +#!/usr/bin/perl -w +# +# (C) Copyright 2007 TOSHIBA CORPORATION +# All Rights Reserved +# +# Redistribution and use in source and binary forms, with or without +# modification, are permitted provided that the following conditions are met: +# +# * Redistributions of source code must retain the above copyright notice, +# this list of conditions and the following disclaimer. +# * Redistributions in binary form must reproduce the above copyright +# notice, this list of conditions and the following disclaimer in the +# documentation and/or other materials provided with the distribution. +# * Neither the names of Toshiba nor the names of its +# contributors may be used to endorse or promote products derived from this +# software without specific prior written permission. +# +# THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS IS" +# AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE +# IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE +# ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE +# LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR +# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF +# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS +# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN +# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) +# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE +# POSSIBILITY OF SUCH DAMAGE. + +open(DEFS, "syscall.def"); + +while ($line = <DEFS>) { + next if ($line =~ /^#.*/); + + ($opcode, $name, $fp, $parms) = split(" ", $line); + $filename = ">" . $name . ".S"; + open(SOURCE, $filename); + + print SOURCE "\/\*\n"; + print SOURCE " Copyright (c) 2007, Toshiba Corporation\n\n"; + + print SOURCE " All rights reserved.\n\n"; + + print SOURCE " Redistribution and use in source and binary forms, with or without\n"; + print SOURCE " modification, are permitted provided that the following conditions are met:\n\n"; + + print SOURCE " \* Redistributions of source code must retain the above copyright notice,\n"; + print SOURCE " this list of conditions and the following disclaimer.\n"; + print SOURCE " \* Redistributions in binary form must reproduce the above copyright\n"; + print SOURCE " notice, this list of conditions and the following disclaimer in the\n"; + print SOURCE " documentation and/or other materials provided with the distribution.\n"; + print SOURCE " \* Neither the names of Toshiba nor the names of its\n"; + print SOURCE " contributors may be used to endorse or promote products derived from this\n"; + print SOURCE " software without specific prior written permission.\n\n"; + + print SOURCE " THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS \"AS IS\"\n"; + print SOURCE " AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE\n"; + print SOURCE " IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE\n"; + print SOURCE " ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER OR CONTRIBUTORS BE\n"; + print SOURCE " LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR\n"; + print SOURCE " CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF\n"; + print SOURCE " SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS\n"; + print SOURCE " INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN\n"; + print SOURCE " CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)\n"; + print SOURCE " ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE\n"; + print SOURCE " POSSIBILITY OF SUCH DAMAGE.\n"; + print SOURCE " \*\/\n\n"; + print SOURCE "#include \"c99ppe.h\"\n\n"; + print SOURCE " .text\n"; + print SOURCE " .align 4\n"; + print SOURCE " GLOBL ", $name, "\n"; + print SOURCE $name, ":\n"; + + print SOURCE " stqd \$0, 16(\$sp) \/\* save caller address \*\/\n"; + print SOURCE " il \$2, ", $parms, " \/\* number of fixed arguments \*\/\n"; + print SOURCE " brsl \$0, __stack_reg_va \/\* save register to the stack frame \*\/\n\n"; + + if ($fp > 0) { + print SOURCE " brsl \$0, __check_init\n"; + print SOURCE " lqd \$3, 16\*2(\$sp) \/\* \$3 <- saved FP on the stack frame \*\/\n"; + print SOURCE " lqd \$2, 0(\$3) \/\* FP = fp->_fp \*\/\n"; + print SOURCE " rotqby \$2, \$2, \$3\n"; + print SOURCE " stqd \$2, 16\*2(\$sp) \/\* replace FP on the stack frame \*\/\n\n"; + } + + print SOURCE " il \$3, SPE_C99_SIGNALCODE\n"; + print SOURCE " il \$4, ", $opcode, "\n"; + print SOURCE " ai \$5, \$sp, 16\*2 \/\* data (\$3 save address) \*\/\n"; + print SOURCE " brsl \$0, __send_to_ppe\n\n"; + + print SOURCE " il \$2, 16\*(SPE_STACK_REGS+2+2)\n"; + print SOURCE " a \$sp, \$sp, \$2\n"; + print SOURCE " lqd \$0, 16(\$sp) \/\* load caller address \*\/\n"; + print SOURCE " bi \$0 \/\* return to caller \*\/\n"; + + close(SOURCE); +} + |