cpu/sa1100/interrupts.c

   1 /*
   2  * (C) Copyright 2002
   3  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
   4  * Marius Groeger <mgroeger@sysgo.de>
   5  *
   6  * (C) Copyright 2002
   7  * Sysgo Real-Time Solutions, GmbH <www.elinos.com>
   8  * Alex Zuepke <azu@sysgo.de>
   9  *
  10  * See file CREDITS for list of people who contributed to this
  11  * project.
  12  *
  13  * This program is free software; you can redistribute it and/or
  14  * modify it under the terms of the GNU General Public License as
  15  * published by the Free Software Foundation; either version 2 of
  16  * the License, or (at your option) any later version.
  17  *
  18  * This program is distributed in the hope that it will be useful,
  19  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  20  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  21  * GNU General Public License for more details.
  22  *
  23  * You should have received a copy of the GNU General Public License
  24  * along with this program; if not, write to the Free Software
  25  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  26  * MA 02111-1307 USA
  27  */
  28
  29 #include <common.h>
  30 #include <SA-1100.h>
  31
  32 #include <asm/proc-armv/ptrace.h>
  33
  34 extern void reset_cpu (ulong addr);
  35
  36 #ifdef CONFIG_USE_IRQ
  37 /* enable IRQ/FIQ interrupts */
  38 void enable_interrupts (void)
  39 {
  40         unsigned long temp;
  41         __asm__ __volatile__ ("mrs %0, cpsr\n"
  42                               "bic %0, %0, #0x80\n"
  43                               "msr cpsr_c, %0"
  44                               : "=r" (temp)
  45                               :
  46                               : "memory");
  47 }
  48
  49
  50 /*
  51  * disable IRQ/FIQ interrupts
  52  * returns true if interrupts had been enabled before we disabled them
  53  */
  54 int disable_interrupts (void)
  55 {
  56         unsigned long old, temp;
  57         __asm__ __volatile__ ("mrs %0, cpsr\n"
  58                               "orr %1, %0, #0x80\n"
  59                               "msr cpsr_c, %1"
  60                               : "=r" (old), "=r" (temp)
  61                               :
  62                               : "memory");
  63
  64         return (old & 0x80) == 0;
  65 }
  66 #else
  67 void enable_interrupts (void)
  68 {
  69         return;
  70 }
  71 int disable_interrupts (void)
  72 {
  73         return 0;
  74 }
  75 #endif
  76
  77
  78
  79 void bad_mode (void)
  80 {
  81         panic ("Resetting CPU ...\n");
  82         reset_cpu (0);
  83 }
  84
  85 void show_regs (struct pt_regs *regs)
  86 {
  87         unsigned long flags;
  88         const char *processor_modes[] = {
  89         "USER_26",      "FIQ_26",       "IRQ_26",       "SVC_26",
  90         "UK4_26",       "UK5_26",       "UK6_26",       "UK7_26",
  91         "UK8_26",       "UK9_26",       "UK10_26",      "UK11_26",
  92         "UK12_26",      "UK13_26",      "UK14_26",      "UK15_26",
  93         "USER_32",      "FIQ_32",       "IRQ_32",       "SVC_32",
  94         "UK4_32",       "UK5_32",       "UK6_32",       "ABT_32",
  95         "UK8_32",       "UK9_32",       "UK10_32",      "UND_32",
  96         "UK12_32",      "UK13_32",      "UK14_32",      "SYS_32"
  97         };
  98
  99         flags = condition_codes (regs);
 100
 101         printf ("pc : [<%08lx>]    lr : [<%08lx>]\n"
 102                 "sp : %08lx  ip : %08lx  fp : %08lx\n",
 103                 instruction_pointer (regs),
 104                 regs->ARM_lr, regs->ARM_sp, regs->ARM_ip, regs->ARM_fp);
 105         printf ("r10: %08lx  r9 : %08lx  r8 : %08lx\n",
 106                 regs->ARM_r10, regs->ARM_r9, regs->ARM_r8);
 107         printf ("r7 : %08lx  r6 : %08lx  r5 : %08lx  r4 : %08lx\n",
 108                 regs->ARM_r7, regs->ARM_r6, regs->ARM_r5, regs->ARM_r4);
 109         printf ("r3 : %08lx  r2 : %08lx  r1 : %08lx  r0 : %08lx\n",
 110                 regs->ARM_r3, regs->ARM_r2, regs->ARM_r1, regs->ARM_r0);
 111         printf ("Flags: %c%c%c%c",
 112                 flags & CC_N_BIT ? 'N' : 'n',
 113                 flags & CC_Z_BIT ? 'Z' : 'z',
 114                 flags & CC_C_BIT ? 'C' : 'c', flags & CC_V_BIT ? 'V' : 'v');
 115         printf ("  IRQs %s  FIQs %s  Mode %s%s\n",
 116                 interrupts_enabled (regs) ? "on" : "off",
 117                 fast_interrupts_enabled (regs) ? "on" : "off",
 118                 processor_modes[processor_mode (regs)],
 119                 thumb_mode (regs) ? " (T)" : "");
 120 }
 121
 122 void do_undefined_instruction (struct pt_regs *pt_regs)
 123 {
 124         printf ("undefined instruction\n");
 125         show_regs (pt_regs);
 126         bad_mode ();
 127 }
 128
 129 void do_software_interrupt (struct pt_regs *pt_regs)
 130 {
 131         printf ("software interrupt\n");
 132         show_regs (pt_regs);
 133         bad_mode ();
 134 }
 135
 136 void do_prefetch_abort (struct pt_regs *pt_regs)
 137 {
 138         printf ("prefetch abort\n");
 139         show_regs (pt_regs);
 140         bad_mode ();
 141 }
 142
 143 void do_data_abort (struct pt_regs *pt_regs)
 144 {
 145         printf ("data abort\n");
 146         show_regs (pt_regs);
 147         bad_mode ();
 148 }
 149
 150 void do_not_used (struct pt_regs *pt_regs)
 151 {
 152         printf ("not used\n");
 153         show_regs (pt_regs);
 154         bad_mode ();
 155 }
 156
 157 void do_fiq (struct pt_regs *pt_regs)
 158 {
 159         printf ("fast interrupt request\n");
 160         show_regs (pt_regs);
 161         bad_mode ();
 162 }
 163
 164 void do_irq (struct pt_regs *pt_regs)
 165 {
 166         printf ("interrupt request\n");
 167         show_regs (pt_regs);
 168         bad_mode ();
 169 }
 170
 171
 172 int interrupt_init (void)
 173 {
 174         /* nothing happens here - we don't setup any IRQs */
 175         return (0);
 176 }
 177
 178 void reset_timer (void)
 179 {
 180         reset_timer_masked ();
 181 }
 182
 183 ulong get_timer (ulong base)
 184 {
 185         return get_timer_masked ();
 186 }
 187
 188 void set_timer (ulong t)
 189 {
 190         /* nop */
 191 }
 192
 193 void udelay (unsigned long usec)
 194 {
 195         udelay_masked (usec);
 196 }
 197
 198
 199 void reset_timer_masked (void)
 200 {
 201         OSCR = 0;
 202 }
 203
 204 ulong get_timer_masked (void)
 205 {
 206         return OSCR;
 207 }
 208
 209 void udelay_masked (unsigned long usec)
 210 {
 211         ulong tmo;
 212
 213         tmo = usec / 1000;
 214         tmo *= CFG_HZ;
 215         tmo /= 1000;
 216
 217         reset_timer_masked ();
 218
 219         while (tmo >= get_timer_masked ())
 220                 /*NOP*/;
 221 }