cpu/arm920t/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  * (C) Copyright 2002
  11  * Gary Jennejohn, DENX Software Engineering, <gj@denx.de>
  12  *
  13  * See file CREDITS for list of people who contributed to this
  14  * project.
  15  *
  16  * This program is free software; you can redistribute it and/or
  17  * modify it under the terms of the GNU General Public License as
  18  * published by the Free Software Foundation; either version 2 of
  19  * the License, or (at your option) any later version.
  20  *
  21  * This program is distributed in the hope that it will be useful,
  22  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  23  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  24  * GNU General Public License for more details.
  25  *
  26  * You should have received a copy of the GNU General Public License
  27  * along with this program; if not, write to the Free Software
  28  * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
  29  * MA 02111-1307 USA
  30  */
  31
  32 #include <common.h>
  33 #include <arm920t.h>
  34 #if defined(CONFIG_S3C2400)
  35 #include <s3c2400.h>
  36 #elif defined(CONFIG_S3C2410)
  37 #include <s3c2410.h>
  38 #endif
  39
  40 #include <asm/proc-armv/ptrace.h>
  41
  42 extern void reset_cpu(ulong addr);
  43 int timer_load_val = 0;
  44
  45 /* macro to read the 16 bit timer */
  46 #define READ_TIMER (rTCNTO4 & 0xffff)
  47
  48 #ifdef CONFIG_USE_IRQ
  49 /* enable IRQ interrupts */
  50 void enable_interrupts (void)
  51 {
  52         unsigned long temp;
  53         __asm__ __volatile__("mrs %0, cpsr\n"
  54                              "bic %0, %0, #0x80\n"
  55                              "msr cpsr_c, %0"
  56                              : "=r" (temp)
  57                              :
  58                              : "memory");
  59 }
  60
  61
  62 /*
  63  * disable IRQ/FIQ interrupts
  64  * returns true if interrupts had been enabled before we disabled them
  65  */
  66 int disable_interrupts (void)
  67 {
  68         unsigned long old,temp;
  69         __asm__ __volatile__("mrs %0, cpsr\n"
  70                              "orr %1, %0, #0xc0\n"
  71                              "msr cpsr_c, %1"
  72                              : "=r" (old), "=r" (temp)
  73                              :
  74                              : "memory");
  75         return (old & 0x80) == 0;
  76 }
  77 #else
  78 void enable_interrupts (void)
  79 {
  80         return;
  81 }
  82 int disable_interrupts (void)
  83 {
  84         return 0;
  85 }
  86 #endif
  87
  88
  89
  90 void bad_mode (void)
  91 {
  92         panic ("Resetting CPU ...\n");
  93         reset_cpu (0);
  94 }
  95
  96 void show_regs (struct pt_regs *regs)
  97 {
  98         unsigned long flags;
  99         const char *processor_modes[] = {
 100         "USER_26",      "FIQ_26",       "IRQ_26",       "SVC_26",
 101         "UK4_26",       "UK5_26",       "UK6_26",       "UK7_26",
 102         "UK8_26",       "UK9_26",       "UK10_26",      "UK11_26",
 103         "UK12_26",      "UK13_26",      "UK14_26",      "UK15_26",
 104         "USER_32",      "FIQ_32",       "IRQ_32",       "SVC_32",
 105         "UK4_32",       "UK5_32",       "UK6_32",       "ABT_32",
 106         "UK8_32",       "UK9_32",       "UK10_32",      "UND_32",
 107         "UK12_32",      "UK13_32",      "UK14_32",      "SYS_32",
 108         };
 109
 110         flags = condition_codes (regs);
 111
 112         printf ("pc : [<%08lx>]    lr : [<%08lx>]\n"
 113                 "sp : %08lx  ip : %08lx  fp : %08lx\n",
 114                 instruction_pointer (regs),
 115                 regs->ARM_lr, regs->ARM_sp, regs->ARM_ip, regs->ARM_fp);
 116         printf ("r10: %08lx  r9 : %08lx  r8 : %08lx\n",
 117                 regs->ARM_r10, regs->ARM_r9, regs->ARM_r8);
 118         printf ("r7 : %08lx  r6 : %08lx  r5 : %08lx  r4 : %08lx\n",
 119                 regs->ARM_r7, regs->ARM_r6, regs->ARM_r5, regs->ARM_r4);
 120         printf ("r3 : %08lx  r2 : %08lx  r1 : %08lx  r0 : %08lx\n",
 121                 regs->ARM_r3, regs->ARM_r2, regs->ARM_r1, regs->ARM_r0);
 122         printf ("Flags: %c%c%c%c",
 123                 flags & CC_N_BIT ? 'N' : 'n',
 124                 flags & CC_Z_BIT ? 'Z' : 'z',
 125                 flags & CC_C_BIT ? 'C' : 'c', flags & CC_V_BIT ? 'V' : 'v');
 126         printf ("  IRQs %s  FIQs %s  Mode %s%s\n",
 127                 interrupts_enabled (regs) ? "on" : "off",
 128                 fast_interrupts_enabled (regs) ? "on" : "off",
 129                 processor_modes[processor_mode (regs)],
 130                 thumb_mode (regs) ? " (T)" : "");
 131 }
 132
 133 void do_undefined_instruction (struct pt_regs *pt_regs)
 134 {
 135         printf ("undefined instruction\n");
 136         show_regs (pt_regs);
 137         bad_mode ();
 138 }
 139
 140 void do_software_interrupt (struct pt_regs *pt_regs)
 141 {
 142         printf ("software interrupt\n");
 143         show_regs (pt_regs);
 144         bad_mode ();
 145 }
 146
 147 void do_prefetch_abort (struct pt_regs *pt_regs)
 148 {
 149         printf ("prefetch abort\n");
 150         show_regs (pt_regs);
 151         bad_mode ();
 152 }
 153
 154 void do_data_abort (struct pt_regs *pt_regs)
 155 {
 156         printf ("data abort\n");
 157         show_regs (pt_regs);
 158         bad_mode ();
 159 }
 160
 161 void do_not_used (struct pt_regs *pt_regs)
 162 {
 163         printf ("not used\n");
 164         show_regs (pt_regs);
 165         bad_mode ();
 166 }
 167
 168 void do_fiq (struct pt_regs *pt_regs)
 169 {
 170         printf ("fast interrupt request\n");
 171         show_regs (pt_regs);
 172         bad_mode ();
 173 }
 174
 175 void do_irq (struct pt_regs *pt_regs)
 176 {
 177         printf ("interrupt request\n");
 178         show_regs (pt_regs);
 179         bad_mode ();
 180 }
 181
 182 static ulong timestamp;
 183 static ulong lastdec;
 184
 185 int interrupt_init (void)
 186 {
 187         /* use PWM Timer 4 because it has no output */
 188         /* prescaler for Timer 4 is 16 */
 189         rTCFG0 = 0x0f00;
 190         if (timer_load_val == 0)
 191         {
 192                 /*
 193                  * for 10 ms clock period @ PCLK with 4 bit divider = 1/2
 194                  * (default) and prescaler = 16. Should be 10390
 195                  * @33.25MHz and 15625 @ 50 MHz
 196                  */
 197                 timer_load_val = get_PCLK()/(2 * 16 * 100);
 198         }
 199         /* load value for 10 ms timeout */
 200         lastdec = rTCNTB4 = timer_load_val;
 201         /* auto load, manual update of Timer 4 */
 202         rTCON = 0x600000;
 203         /* auto load, start Timer 4 */
 204         rTCON = 0x500000;
 205         timestamp = 0;
 206
 207         return (0);
 208 }
 209
 210 /*
 211  * timer without interrupts
 212  */
 213
 214 void reset_timer (void)
 215 {
 216         reset_timer_masked ();
 217 }
 218
 219 ulong get_timer (ulong base)
 220 {
 221         return get_timer_masked () - base;
 222 }
 223
 224 void set_timer (ulong t)
 225 {
 226         timestamp = t;
 227 }
 228
 229 void udelay (unsigned long usec)
 230 {
 231         ulong tmo;
 232
 233         tmo = usec / 1000;
 234         tmo *= (timer_load_val * 100);
 235         tmo /= 1000;
 236
 237         tmo += get_timer (0);
 238
 239         while (get_timer_masked () < tmo)
 240                 /*NOP*/;
 241 }
 242
 243 void reset_timer_masked (void)
 244 {
 245         /* reset time */
 246         lastdec = READ_TIMER;
 247         timestamp = 0;
 248 }
 249
 250 ulong get_timer_masked (void)
 251 {
 252         ulong now = READ_TIMER;
 253
 254         if (lastdec >= now) {
 255                 /* normal mode */
 256                 timestamp += lastdec - now;
 257         } else {
 258                 /* we have an overflow ... */
 259                 timestamp += lastdec + timer_load_val - now;
 260         }
 261         lastdec = now;
 262
 263         return timestamp;
 264 }
 265
 266 void udelay_masked (unsigned long usec)
 267 {
 268         ulong tmo;
 269
 270         tmo = usec / 1000;
 271         tmo *= (timer_load_val * 100);
 272         tmo /= 1000;
 273
 274         reset_timer_masked ();
 275
 276         while (get_timer_masked () < tmo)
 277                 /*NOP*/;
 278 }
 279
 280 /*
 281  * This function is derived from PowerPC code (read timebase as long long).
 282  * On ARM it just returns the timer value.
 283  */
 284 unsigned long long get_ticks(void)
 285 {
 286         return get_timer(0);
 287 }
 288
 289 /*
 290  * This function is derived from PowerPC code (timebase clock frequency).
 291  * On ARM it returns the number of timer ticks per second.
 292  */
 293 ulong get_tbclk (void)
 294 {
 295         ulong tbclk;
 296
 297 #if defined(CONFIG_SMDK2400) || defined(CONFIG_TRAB)
 298         tbclk = timer_load_val * 100;
 299 #elif defined(CONFIG_SMDK2410)
 300         tbclk = CFG_HZ;
 301 #endif
 302
 303         return tbclk;
 304 }