shsim/start/ispshgdb.c

0001 /*
0002  * This file contains the isp frames for the user interrupts.
0003  * From these procedures __ISR_Handler is called with the vector number
0004  * as argument.
0005  *
0006  * __ISR_Handler is kept in a separate file (cpu_asm.c), because a bug in
0007  * some releases of gcc doesn't properly handle #pragma interrupt, if a
0008  * file contains both isrs and normal functions.
0009  *
0010  *  Authors: Ralf Corsepius (corsepiu@faw.uni-ulm.de) and
0011  *           Bernd Becker (becker@faw.uni-ulm.de)
0012  *
0013  *  COPYRIGHT (c) 1997-1998, FAW Ulm, Germany
0014  *
0015  *  This program is distributed in the hope that it will be useful,
0016  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
0017  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE
0018  *
0019  *
0020  *  COPYRIGHT (c) 1998.
0021  *  On-Line Applications Research Corporation (OAR).
0022  *
0023  *  The license and distribution terms for this file may be
0024  *  found in the file LICENSE in this distribution or at
0025  *  http://www.rtems.org/license/LICENSE.
0026  *
0027  *  Modified to reflect dummy isp entries for GDB SH simulator by Joel.
0028  */
0029
0030 #include <rtems/score/cpu.h>
0031
0032 /*
0033  * This is a exception vector table
0034  *
0035  * It has the same structure as the actual vector table (vectab)
0036  */
0037
0038 void _dummy_isp(uint32_t);
0039
0040 CPU_ISR_raw_handler _Hardware_isr_Table[256]={
0041 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp, /* PWRon Reset, Maual Reset,...*/
0042 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0043 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0044 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0045 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0046 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0047 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0048 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0049 /* trapa 0 -31 */
0050 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0051 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0052 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0053 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0054 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0055 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0056 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0057 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0058 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0059 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0060 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0061 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0062 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0063 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0064 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0065 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0066 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0067 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0068 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0069 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0070 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0071 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0072 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0073 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0074 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0075 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0076 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0077 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0078 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0079 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp,
0080 _dummy_isp, _dummy_isp, _dummy_isp, _dummy_isp, /* irq 152-155*/
0081 _dummy_isp
0082 };
0083
0084 #define Str(a)#a
0085
0086 /*
0087  * Some versions of gcc and all version of egcs at least until egcs-1.1b
0088  * are not able to handle #pragma interrupt correctly if more than 1 isr is
0089  * contained in a file and when optimizing.
0090  * We try to work around this problem by using the macro below.
0091  */
0092 #define isp( name, number, func)\
0093 __asm__ (".global _"Str(name)"\n\t"\
0094      "_"Str(name)":       \n\t"\
0095      "    mov.l r0,@-r15   \n\t"\
0096      "    mov.l r1,@-r15   \n\t"\
0097      "    mov.l r2,@-r15   \n\t"\
0098      "    mov.l r3,@-r15   \n\t"\
0099      "    mov.l r4,@-r15   \n\t"\
0100      "    mov.l r5,@-r15   \n\t"\
0101      "    mov.l r6,@-r15   \n\t"\
0102      "    mov.l r7,@-r15   \n\t"\
0103      "    mov.l r14,@-r15  \n\t"\
0104      "    sts.l pr,@-r15   \n\t"\
0105      "    sts.l mach,@-r15 \n\t"\
0106      "    sts.l macl,@-r15 \n\t"\
0107      "    mov r15,r14      \n\t"\
0108      "    mov.l "Str(name)"_v, r2 \n\t"\
0109      "    mov.l "Str(name)"_k, r1\n\t"\
0110      "    jsr @r1           \n\t"\
0111      "    mov   r2,r4      \n\t"\
0112      "    mov   r14,r15    \n\t"\
0113      "    lds.l @r15+,macl \n\t"\
0114      "    lds.l @r15+,mach \n\t"\
0115      "    lds.l @r15+,pr   \n\t"\
0116      "    mov.l @r15+,r14  \n\t"\
0117      "    mov.l @r15+,r7   \n\t"\
0118      "    mov.l @r15+,r6   \n\t"\
0119      "    mov.l @r15+,r5   \n\t"\
0120      "    mov.l @r15+,r4   \n\t"\
0121      "    mov.l @r15+,r3   \n\t"\
0122      "    mov.l @r15+,r2   \n\t"\
0123      "    mov.l @r15+,r1   \n\t"\
0124      "    mov.l @r15+,r0   \n\t"\
0125      "    rte              \n\t"\
0126      "    nop              \n\t"\
0127      "    .align 2         \n\t"\
0128      #name"_k: \n\t"\
0129      ".long "Str(func)"\n\t"\
0130      #name"_v: \n\t"\
0131      ".long "Str(number));
0132
0133 /************************************************
0134  * Dummy interrupt service procedure for
0135  * interrupts being not allowed --> Trap 34
0136  ************************************************/
0137 __asm__ (" .section .text\n\
0138 .global __dummy_isp\n\
0139 __dummy_isp:\n\
0140       mov.l r14,@-r15\n\
0141       mov   r15, r14\n\
0142       trapa #34\n\
0143       mov.l @r15+,r14\n\
0144       rte\n\
0145       nop");
0146