arch/sparc/kernel/sun4c_irq.c

   1 /*  sun4c_irq.c
   2  *  arch/sparc/kernel/sun4c_irq.c:
   3  *
   4  *  djhr: Hacked out of irq.c into a CPU dependent version.
   5  *
   6  *  Copyright (C) 1995 David S. Miller (davem@caip.rutgers.edu)
   7  *  Copyright (C) 1995 Miguel de Icaza (miguel@nuclecu.unam.mx)
   8  *  Copyright (C) 1995 Pete A. Zaitcev (zaitcev@yahoo.com)
   9  *  Copyright (C) 1996 Dave Redman (djhr@tadpole.co.uk)
  10  */
  11
  12 #include <linux/errno.h>
  13 #include <linux/linkage.h>
  14 #include <linux/kernel_stat.h>
  15 #include <linux/signal.h>
  16 #include <linux/sched.h>
  17 #include <linux/ptrace.h>
  18 #include <linux/interrupt.h>
  19 #include <linux/slab.h>
  20 #include <linux/init.h>
  21
  22 #include <asm/ptrace.h>
  23 #include <asm/processor.h>
  24 #include <asm/system.h>
  25 #include <asm/psr.h>
  26 #include <asm/vaddrs.h>
  27 #include <asm/timer.h>
  28 #include <asm/openprom.h>
  29 #include <asm/oplib.h>
  30 #include <asm/traps.h>
  31 #include <asm/irq.h>
  32 #include <asm/io.h>
  33 #include <asm/sun4paddr.h>
  34 #include <asm/idprom.h>
  35 #include <asm/machines.h>
  36 #include <asm/sbus.h>
  37
  38 #if 0
  39 static struct resource sun4c_timer_eb = { "sun4c_timer" };
  40 static struct resource sun4c_intr_eb = { "sun4c_intr" };
  41 #endif
  42
  43 /* Pointer to the interrupt enable byte
  44  *
  45  * Dave Redman (djhr@tadpole.co.uk)
  46  * What you may not be aware of is that entry.S requires this variable.
  47  *
  48  *  --- linux_trap_nmi_sun4c --
  49  *
  50  * so don't go making it static, like I tried. sigh.
  51  */
  52 unsigned char *interrupt_enable = NULL;
  53
  54 static int sun4c_pil_map[] = { 0, 1, 2, 3, 5, 7, 8, 9 };
  55
  56 unsigned int sun4c_sbint_to_irq(struct sbus_dev *sdev, unsigned int sbint)
  57 {
  58         if (sbint >= sizeof(sun4c_pil_map)) {
  59                 printk(KERN_ERR "%s: bogus SBINT %d\n", sdev->prom_name, sbint);
  60                 BUG();
  61         }
  62         return sun4c_pil_map[sbint];
  63 }
  64
  65 static void sun4c_disable_irq(unsigned int irq_nr)
  66 {
  67         unsigned long flags;
  68         unsigned char current_mask, new_mask;
  69
  70         local_irq_save(flags);
  71         irq_nr &= (NR_IRQS - 1);
  72         current_mask = *interrupt_enable;
  73         switch(irq_nr) {
  74         case 1:
  75                 new_mask = ((current_mask) & (~(SUN4C_INT_E1)));
  76                 break;
  77         case 8:
  78                 new_mask = ((current_mask) & (~(SUN4C_INT_E8)));
  79                 break;
  80         case 10:
  81                 new_mask = ((current_mask) & (~(SUN4C_INT_E10)));
  82                 break;
  83         case 14:
  84                 new_mask = ((current_mask) & (~(SUN4C_INT_E14)));
  85                 break;
  86         default:
  87                 local_irq_restore(flags);
  88                 return;
  89         }
  90         *interrupt_enable = new_mask;
  91         local_irq_restore(flags);
  92 }
  93
  94 static void sun4c_enable_irq(unsigned int irq_nr)
  95 {
  96         unsigned long flags;
  97         unsigned char current_mask, new_mask;
  98
  99         local_irq_save(flags);
 100         irq_nr &= (NR_IRQS - 1);
 101         current_mask = *interrupt_enable;
 102         switch(irq_nr) {
 103         case 1:
 104                 new_mask = ((current_mask) | SUN4C_INT_E1);
 105                 break;
 106         case 8:
 107                 new_mask = ((current_mask) | SUN4C_INT_E8);
 108                 break;
 109         case 10:
 110                 new_mask = ((current_mask) | SUN4C_INT_E10);
 111                 break;
 112         case 14:
 113                 new_mask = ((current_mask) | SUN4C_INT_E14);
 114                 break;
 115         default:
 116                 local_irq_restore(flags);
 117                 return;
 118         }
 119         *interrupt_enable = new_mask;
 120         local_irq_restore(flags);
 121 }
 122
 123 #define TIMER_IRQ       10    /* Also at level 14, but we ignore that one. */
 124 #define PROFILE_IRQ     14    /* Level14 ticker.. used by OBP for polling */
 125
 126 volatile struct sun4c_timer_info *sun4c_timers;
 127
 128 #ifdef CONFIG_SUN4
 129 /* This is an ugly hack to work around the
 130    current timer code, and make it work with
 131    the sun4/260 intersil
 132    */
 133 volatile struct sun4c_timer_info sun4_timer;
 134 #endif
 135
 136 static void sun4c_clear_clock_irq(void)
 137 {
 138         volatile unsigned int clear_intr;
 139 #ifdef CONFIG_SUN4
 140         if (idprom->id_machtype == (SM_SUN4 | SM_4_260))
 141           clear_intr = sun4_timer.timer_limit10;
 142         else
 143 #endif
 144         clear_intr = sun4c_timers->timer_limit10;
 145 }
 146
 147 static void sun4c_clear_profile_irq(int cpu)
 148 {
 149         /* Errm.. not sure how to do this.. */
 150 }
 151
 152 static void sun4c_load_profile_irq(int cpu, unsigned int limit)
 153 {
 154         /* Errm.. not sure how to do this.. */
 155 }
 156
 157 static void __init sun4c_init_timers(irq_handler_t counter_fn)
 158 {
 159         int irq;
 160
 161         /* Map the Timer chip, this is implemented in hardware inside
 162          * the cache chip on the sun4c.
 163          */
 164 #ifdef CONFIG_SUN4
 165         if (idprom->id_machtype == (SM_SUN4 | SM_4_260))
 166                 sun4c_timers = &sun4_timer;
 167         else
 168 #endif
 169         sun4c_timers = ioremap(SUN_TIMER_PHYSADDR,
 170             sizeof(struct sun4c_timer_info));
 171
 172         /* Have the level 10 timer tick at 100HZ.  We don't touch the
 173          * level 14 timer limit since we are letting the prom handle
 174          * them until we have a real console driver so L1-A works.
 175          */
 176         sun4c_timers->timer_limit10 = (((1000000/HZ) + 1) << 10);
 177         master_l10_counter = &sun4c_timers->cur_count10;
 178         master_l10_limit = &sun4c_timers->timer_limit10;
 179
 180         irq = request_irq(TIMER_IRQ,
 181                           counter_fn,
 182                           (IRQF_DISABLED | SA_STATIC_ALLOC),
 183                           "timer", NULL);
 184         if (irq) {
 185                 prom_printf("time_init: unable to attach IRQ%d\n",TIMER_IRQ);
 186                 prom_halt();
 187         }
 188
 189 #if 0
 190         /* This does not work on 4/330 */
 191         sun4c_enable_irq(10);
 192 #endif
 193         claim_ticker14(NULL, PROFILE_IRQ, 0);
 194 }
 195
 196 #ifdef CONFIG_SMP
 197 static void sun4c_nop(void) {}
 198 #endif
 199
 200 void __init sun4c_init_IRQ(void)
 201 {
 202         struct linux_prom_registers int_regs[2];
 203         int ie_node;
 204
 205         if (ARCH_SUN4) {
 206                 interrupt_enable = (char *)
 207                     ioremap(sun4_ie_physaddr, PAGE_SIZE);
 208         } else {
 209                 struct resource phyres;
 210
 211                 ie_node = prom_searchsiblings (prom_getchild(prom_root_node),
 212                                         "interrupt-enable");
 213                 if(ie_node == 0)
 214                         panic("Cannot find /interrupt-enable node");
 215
 216                 /* Depending on the "address" property is bad news... */
 217                 interrupt_enable = NULL;
 218                 if (prom_getproperty(ie_node, "reg", (char *) int_regs,
 219                                      sizeof(int_regs)) != -1) {
 220                         memset(&phyres, 0, sizeof(struct resource));
 221                         phyres.flags = int_regs[0].which_io;
 222                         phyres.start = int_regs[0].phys_addr;
 223                         interrupt_enable = (char *) sbus_ioremap(&phyres, 0,
 224                             int_regs[0].reg_size, "sun4c_intr");
 225                 }
 226         }
 227         if (!interrupt_enable)
 228                 panic("Cannot map interrupt_enable");
 229
 230         BTFIXUPSET_CALL(sbint_to_irq, sun4c_sbint_to_irq, BTFIXUPCALL_NORM);
 231         BTFIXUPSET_CALL(enable_irq, sun4c_enable_irq, BTFIXUPCALL_NORM);
 232         BTFIXUPSET_CALL(disable_irq, sun4c_disable_irq, BTFIXUPCALL_NORM);
 233         BTFIXUPSET_CALL(enable_pil_irq, sun4c_enable_irq, BTFIXUPCALL_NORM);
 234         BTFIXUPSET_CALL(disable_pil_irq, sun4c_disable_irq, BTFIXUPCALL_NORM);
 235         BTFIXUPSET_CALL(clear_clock_irq, sun4c_clear_clock_irq, BTFIXUPCALL_NORM);
 236         BTFIXUPSET_CALL(clear_profile_irq, sun4c_clear_profile_irq, BTFIXUPCALL_NOP);
 237         BTFIXUPSET_CALL(load_profile_irq, sun4c_load_profile_irq, BTFIXUPCALL_NOP);
 238         sparc_init_timers = sun4c_init_timers;
 239 #ifdef CONFIG_SMP
 240         BTFIXUPSET_CALL(set_cpu_int, sun4c_nop, BTFIXUPCALL_NOP);
 241         BTFIXUPSET_CALL(clear_cpu_int, sun4c_nop, BTFIXUPCALL_NOP);
 242         BTFIXUPSET_CALL(set_irq_udt, sun4c_nop, BTFIXUPCALL_NOP);
 243 #endif
 244         *interrupt_enable = (SUN4C_INT_ENABLE);
 245         /* Cannot enable interrupts until OBP ticker is disabled. */
 246 }