|  | /* $Id: irq.c,v 1.114 2002/01/11 08:45:38 davem Exp $ | 
|  | * irq.c: UltraSparc IRQ handling/init/registry. | 
|  | * | 
|  | * Copyright (C) 1997  David S. Miller  (davem@caip.rutgers.edu) | 
|  | * Copyright (C) 1998  Eddie C. Dost    (ecd@skynet.be) | 
|  | * Copyright (C) 1998  Jakub Jelinek    (jj@ultra.linux.cz) | 
|  | */ | 
|  |  | 
|  | #include <linux/module.h> | 
|  | #include <linux/sched.h> | 
|  | #include <linux/ptrace.h> | 
|  | #include <linux/errno.h> | 
|  | #include <linux/kernel_stat.h> | 
|  | #include <linux/signal.h> | 
|  | #include <linux/mm.h> | 
|  | #include <linux/interrupt.h> | 
|  | #include <linux/slab.h> | 
|  | #include <linux/random.h> | 
|  | #include <linux/init.h> | 
|  | #include <linux/delay.h> | 
|  | #include <linux/proc_fs.h> | 
|  | #include <linux/seq_file.h> | 
|  | #include <linux/bootmem.h> | 
|  | #include <linux/irq.h> | 
|  | #include <linux/msi.h> | 
|  |  | 
|  | #include <asm/ptrace.h> | 
|  | #include <asm/processor.h> | 
|  | #include <asm/atomic.h> | 
|  | #include <asm/system.h> | 
|  | #include <asm/irq.h> | 
|  | #include <asm/io.h> | 
|  | #include <asm/sbus.h> | 
|  | #include <asm/iommu.h> | 
|  | #include <asm/upa.h> | 
|  | #include <asm/oplib.h> | 
|  | #include <asm/prom.h> | 
|  | #include <asm/timer.h> | 
|  | #include <asm/smp.h> | 
|  | #include <asm/starfire.h> | 
|  | #include <asm/uaccess.h> | 
|  | #include <asm/cache.h> | 
|  | #include <asm/cpudata.h> | 
|  | #include <asm/auxio.h> | 
|  | #include <asm/head.h> | 
|  |  | 
|  | /* UPA nodes send interrupt packet to UltraSparc with first data reg | 
|  | * value low 5 (7 on Starfire) bits holding the IRQ identifier being | 
|  | * delivered.  We must translate this into a non-vector IRQ so we can | 
|  | * set the softint on this cpu. | 
|  | * | 
|  | * To make processing these packets efficient and race free we use | 
|  | * an array of irq buckets below.  The interrupt vector handler in | 
|  | * entry.S feeds incoming packets into per-cpu pil-indexed lists. | 
|  | * The IVEC handler does not need to act atomically, the PIL dispatch | 
|  | * code uses CAS to get an atomic snapshot of the list and clear it | 
|  | * at the same time. | 
|  | * | 
|  | * If you make changes to ino_bucket, please update hand coded assembler | 
|  | * of the vectored interrupt trap handler(s) in entry.S and sun4v_ivec.S | 
|  | */ | 
|  | struct ino_bucket { | 
|  | /* Next handler in per-CPU IRQ worklist.  We know that | 
|  | * bucket pointers have the high 32-bits clear, so to | 
|  | * save space we only store the bits we need. | 
|  | */ | 
|  | /*0x00*/unsigned int irq_chain; | 
|  |  | 
|  | /* Virtual interrupt number assigned to this INO.  */ | 
|  | /*0x04*/unsigned int virt_irq; | 
|  | }; | 
|  |  | 
|  | #define NUM_IVECS	(IMAP_INR + 1) | 
|  | struct ino_bucket ivector_table[NUM_IVECS] __attribute__ ((aligned (SMP_CACHE_BYTES))); | 
|  |  | 
|  | #define __irq_ino(irq) \ | 
|  | (((struct ino_bucket *)(unsigned long)(irq)) - &ivector_table[0]) | 
|  | #define __bucket(irq) ((struct ino_bucket *)(unsigned long)(irq)) | 
|  | #define __irq(bucket) ((unsigned int)(unsigned long)(bucket)) | 
|  |  | 
|  | /* This has to be in the main kernel image, it cannot be | 
|  | * turned into per-cpu data.  The reason is that the main | 
|  | * kernel image is locked into the TLB and this structure | 
|  | * is accessed from the vectored interrupt trap handler.  If | 
|  | * access to this structure takes a TLB miss it could cause | 
|  | * the 5-level sparc v9 trap stack to overflow. | 
|  | */ | 
|  | #define irq_work(__cpu)	&(trap_block[(__cpu)].irq_worklist) | 
|  |  | 
|  | static unsigned int virt_to_real_irq_table[NR_IRQS]; | 
|  |  | 
|  | static unsigned char virt_irq_alloc(unsigned int real_irq) | 
|  | { | 
|  | unsigned char ent; | 
|  |  | 
|  | BUILD_BUG_ON(NR_IRQS >= 256); | 
|  |  | 
|  | for (ent = 1; ent < NR_IRQS; ent++) { | 
|  | if (!virt_to_real_irq_table[ent]) | 
|  | break; | 
|  | } | 
|  | if (ent >= NR_IRQS) { | 
|  | printk(KERN_ERR "IRQ: Out of virtual IRQs.\n"); | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | virt_to_real_irq_table[ent] = real_irq; | 
|  |  | 
|  | return ent; | 
|  | } | 
|  |  | 
|  | #ifdef CONFIG_PCI_MSI | 
|  | static void virt_irq_free(unsigned int virt_irq) | 
|  | { | 
|  | unsigned int real_irq; | 
|  |  | 
|  | if (virt_irq >= NR_IRQS) | 
|  | return; | 
|  |  | 
|  | real_irq = virt_to_real_irq_table[virt_irq]; | 
|  | virt_to_real_irq_table[virt_irq] = 0; | 
|  |  | 
|  | __bucket(real_irq)->virt_irq = 0; | 
|  | } | 
|  | #endif | 
|  |  | 
|  | static unsigned int virt_to_real_irq(unsigned char virt_irq) | 
|  | { | 
|  | return virt_to_real_irq_table[virt_irq]; | 
|  | } | 
|  |  | 
|  | /* | 
|  | * /proc/interrupts printing: | 
|  | */ | 
|  |  | 
|  | int show_interrupts(struct seq_file *p, void *v) | 
|  | { | 
|  | int i = *(loff_t *) v, j; | 
|  | struct irqaction * action; | 
|  | unsigned long flags; | 
|  |  | 
|  | if (i == 0) { | 
|  | seq_printf(p, "           "); | 
|  | for_each_online_cpu(j) | 
|  | seq_printf(p, "CPU%d       ",j); | 
|  | seq_putc(p, '\n'); | 
|  | } | 
|  |  | 
|  | if (i < NR_IRQS) { | 
|  | spin_lock_irqsave(&irq_desc[i].lock, flags); | 
|  | action = irq_desc[i].action; | 
|  | if (!action) | 
|  | goto skip; | 
|  | seq_printf(p, "%3d: ",i); | 
|  | #ifndef CONFIG_SMP | 
|  | seq_printf(p, "%10u ", kstat_irqs(i)); | 
|  | #else | 
|  | for_each_online_cpu(j) | 
|  | seq_printf(p, "%10u ", kstat_cpu(j).irqs[i]); | 
|  | #endif | 
|  | seq_printf(p, " %9s", irq_desc[i].chip->typename); | 
|  | seq_printf(p, "  %s", action->name); | 
|  |  | 
|  | for (action=action->next; action; action = action->next) | 
|  | seq_printf(p, ", %s", action->name); | 
|  |  | 
|  | seq_putc(p, '\n'); | 
|  | skip: | 
|  | spin_unlock_irqrestore(&irq_desc[i].lock, flags); | 
|  | } | 
|  | return 0; | 
|  | } | 
|  |  | 
|  | extern unsigned long real_hard_smp_processor_id(void); | 
|  |  | 
|  | static unsigned int sun4u_compute_tid(unsigned long imap, unsigned long cpuid) | 
|  | { | 
|  | unsigned int tid; | 
|  |  | 
|  | if (this_is_starfire) { | 
|  | tid = starfire_translate(imap, cpuid); | 
|  | tid <<= IMAP_TID_SHIFT; | 
|  | tid &= IMAP_TID_UPA; | 
|  | } else { | 
|  | if (tlb_type == cheetah || tlb_type == cheetah_plus) { | 
|  | unsigned long ver; | 
|  |  | 
|  | __asm__ ("rdpr %%ver, %0" : "=r" (ver)); | 
|  | if ((ver >> 32UL) == __JALAPENO_ID || | 
|  | (ver >> 32UL) == __SERRANO_ID) { | 
|  | tid = cpuid << IMAP_TID_SHIFT; | 
|  | tid &= IMAP_TID_JBUS; | 
|  | } else { | 
|  | unsigned int a = cpuid & 0x1f; | 
|  | unsigned int n = (cpuid >> 5) & 0x1f; | 
|  |  | 
|  | tid = ((a << IMAP_AID_SHIFT) | | 
|  | (n << IMAP_NID_SHIFT)); | 
|  | tid &= (IMAP_AID_SAFARI | | 
|  | IMAP_NID_SAFARI);; | 
|  | } | 
|  | } else { | 
|  | tid = cpuid << IMAP_TID_SHIFT; | 
|  | tid &= IMAP_TID_UPA; | 
|  | } | 
|  | } | 
|  |  | 
|  | return tid; | 
|  | } | 
|  |  | 
|  | struct irq_handler_data { | 
|  | unsigned long	iclr; | 
|  | unsigned long	imap; | 
|  |  | 
|  | void		(*pre_handler)(unsigned int, void *, void *); | 
|  | void		*pre_handler_arg1; | 
|  | void		*pre_handler_arg2; | 
|  | }; | 
|  |  | 
|  | static inline struct ino_bucket *virt_irq_to_bucket(unsigned int virt_irq) | 
|  | { | 
|  | unsigned int real_irq = virt_to_real_irq(virt_irq); | 
|  | struct ino_bucket *bucket = NULL; | 
|  |  | 
|  | if (likely(real_irq)) | 
|  | bucket = __bucket(real_irq); | 
|  |  | 
|  | return bucket; | 
|  | } | 
|  |  | 
|  | #ifdef CONFIG_SMP | 
|  | static int irq_choose_cpu(unsigned int virt_irq) | 
|  | { | 
|  | cpumask_t mask = irq_desc[virt_irq].affinity; | 
|  | int cpuid; | 
|  |  | 
|  | if (cpus_equal(mask, CPU_MASK_ALL)) { | 
|  | static int irq_rover; | 
|  | static DEFINE_SPINLOCK(irq_rover_lock); | 
|  | unsigned long flags; | 
|  |  | 
|  | /* Round-robin distribution... */ | 
|  | do_round_robin: | 
|  | spin_lock_irqsave(&irq_rover_lock, flags); | 
|  |  | 
|  | while (!cpu_online(irq_rover)) { | 
|  | if (++irq_rover >= NR_CPUS) | 
|  | irq_rover = 0; | 
|  | } | 
|  | cpuid = irq_rover; | 
|  | do { | 
|  | if (++irq_rover >= NR_CPUS) | 
|  | irq_rover = 0; | 
|  | } while (!cpu_online(irq_rover)); | 
|  |  | 
|  | spin_unlock_irqrestore(&irq_rover_lock, flags); | 
|  | } else { | 
|  | cpumask_t tmp; | 
|  |  | 
|  | cpus_and(tmp, cpu_online_map, mask); | 
|  |  | 
|  | if (cpus_empty(tmp)) | 
|  | goto do_round_robin; | 
|  |  | 
|  | cpuid = first_cpu(tmp); | 
|  | } | 
|  |  | 
|  | return cpuid; | 
|  | } | 
|  | #else | 
|  | static int irq_choose_cpu(unsigned int virt_irq) | 
|  | { | 
|  | return real_hard_smp_processor_id(); | 
|  | } | 
|  | #endif | 
|  |  | 
|  | static void sun4u_irq_enable(unsigned int virt_irq) | 
|  | { | 
|  | struct irq_handler_data *data = get_irq_chip_data(virt_irq); | 
|  |  | 
|  | if (likely(data)) { | 
|  | unsigned long cpuid, imap; | 
|  | unsigned int tid; | 
|  |  | 
|  | cpuid = irq_choose_cpu(virt_irq); | 
|  | imap = data->imap; | 
|  |  | 
|  | tid = sun4u_compute_tid(imap, cpuid); | 
|  |  | 
|  | upa_writel(tid | IMAP_VALID, imap); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void sun4u_irq_disable(unsigned int virt_irq) | 
|  | { | 
|  | struct irq_handler_data *data = get_irq_chip_data(virt_irq); | 
|  |  | 
|  | if (likely(data)) { | 
|  | unsigned long imap = data->imap; | 
|  | u32 tmp = upa_readl(imap); | 
|  |  | 
|  | tmp &= ~IMAP_VALID; | 
|  | upa_writel(tmp, imap); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void sun4u_irq_end(unsigned int virt_irq) | 
|  | { | 
|  | struct irq_handler_data *data = get_irq_chip_data(virt_irq); | 
|  |  | 
|  | if (likely(data)) | 
|  | upa_writel(ICLR_IDLE, data->iclr); | 
|  | } | 
|  |  | 
|  | static void sun4v_irq_enable(unsigned int virt_irq) | 
|  | { | 
|  | struct ino_bucket *bucket = virt_irq_to_bucket(virt_irq); | 
|  | unsigned int ino = bucket - &ivector_table[0]; | 
|  |  | 
|  | if (likely(bucket)) { | 
|  | unsigned long cpuid; | 
|  | int err; | 
|  |  | 
|  | cpuid = irq_choose_cpu(virt_irq); | 
|  |  | 
|  | err = sun4v_intr_settarget(ino, cpuid); | 
|  | if (err != HV_EOK) | 
|  | printk("sun4v_intr_settarget(%x,%lu): err(%d)\n", | 
|  | ino, cpuid, err); | 
|  | err = sun4v_intr_setenabled(ino, HV_INTR_ENABLED); | 
|  | if (err != HV_EOK) | 
|  | printk("sun4v_intr_setenabled(%x): err(%d)\n", | 
|  | ino, err); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void sun4v_irq_disable(unsigned int virt_irq) | 
|  | { | 
|  | struct ino_bucket *bucket = virt_irq_to_bucket(virt_irq); | 
|  | unsigned int ino = bucket - &ivector_table[0]; | 
|  |  | 
|  | if (likely(bucket)) { | 
|  | int err; | 
|  |  | 
|  | err = sun4v_intr_setenabled(ino, HV_INTR_DISABLED); | 
|  | if (err != HV_EOK) | 
|  | printk("sun4v_intr_setenabled(%x): " | 
|  | "err(%d)\n", ino, err); | 
|  | } | 
|  | } | 
|  |  | 
|  | #ifdef CONFIG_PCI_MSI | 
|  | static void sun4v_msi_enable(unsigned int virt_irq) | 
|  | { | 
|  | sun4v_irq_enable(virt_irq); | 
|  | unmask_msi_irq(virt_irq); | 
|  | } | 
|  |  | 
|  | static void sun4v_msi_disable(unsigned int virt_irq) | 
|  | { | 
|  | mask_msi_irq(virt_irq); | 
|  | sun4v_irq_disable(virt_irq); | 
|  | } | 
|  | #endif | 
|  |  | 
|  | static void sun4v_irq_end(unsigned int virt_irq) | 
|  | { | 
|  | struct ino_bucket *bucket = virt_irq_to_bucket(virt_irq); | 
|  | unsigned int ino = bucket - &ivector_table[0]; | 
|  |  | 
|  | if (likely(bucket)) { | 
|  | int err; | 
|  |  | 
|  | err = sun4v_intr_setstate(ino, HV_INTR_STATE_IDLE); | 
|  | if (err != HV_EOK) | 
|  | printk("sun4v_intr_setstate(%x): " | 
|  | "err(%d)\n", ino, err); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void run_pre_handler(unsigned int virt_irq) | 
|  | { | 
|  | struct ino_bucket *bucket = virt_irq_to_bucket(virt_irq); | 
|  | struct irq_handler_data *data = get_irq_chip_data(virt_irq); | 
|  |  | 
|  | if (likely(data->pre_handler)) { | 
|  | data->pre_handler(__irq_ino(__irq(bucket)), | 
|  | data->pre_handler_arg1, | 
|  | data->pre_handler_arg2); | 
|  | } | 
|  | } | 
|  |  | 
|  | static struct irq_chip sun4u_irq = { | 
|  | .typename	= "sun4u", | 
|  | .enable		= sun4u_irq_enable, | 
|  | .disable	= sun4u_irq_disable, | 
|  | .end		= sun4u_irq_end, | 
|  | }; | 
|  |  | 
|  | static struct irq_chip sun4u_irq_ack = { | 
|  | .typename	= "sun4u+ack", | 
|  | .enable		= sun4u_irq_enable, | 
|  | .disable	= sun4u_irq_disable, | 
|  | .ack		= run_pre_handler, | 
|  | .end		= sun4u_irq_end, | 
|  | }; | 
|  |  | 
|  | static struct irq_chip sun4v_irq = { | 
|  | .typename	= "sun4v", | 
|  | .enable		= sun4v_irq_enable, | 
|  | .disable	= sun4v_irq_disable, | 
|  | .end		= sun4v_irq_end, | 
|  | }; | 
|  |  | 
|  | static struct irq_chip sun4v_irq_ack = { | 
|  | .typename	= "sun4v+ack", | 
|  | .enable		= sun4v_irq_enable, | 
|  | .disable	= sun4v_irq_disable, | 
|  | .ack		= run_pre_handler, | 
|  | .end		= sun4v_irq_end, | 
|  | }; | 
|  |  | 
|  | #ifdef CONFIG_PCI_MSI | 
|  | static struct irq_chip sun4v_msi = { | 
|  | .typename	= "sun4v+msi", | 
|  | .mask		= mask_msi_irq, | 
|  | .unmask		= unmask_msi_irq, | 
|  | .enable		= sun4v_msi_enable, | 
|  | .disable	= sun4v_msi_disable, | 
|  | .ack		= run_pre_handler, | 
|  | .end		= sun4v_irq_end, | 
|  | }; | 
|  | #endif | 
|  |  | 
|  | void irq_install_pre_handler(int virt_irq, | 
|  | void (*func)(unsigned int, void *, void *), | 
|  | void *arg1, void *arg2) | 
|  | { | 
|  | struct irq_handler_data *data = get_irq_chip_data(virt_irq); | 
|  | struct irq_chip *chip; | 
|  |  | 
|  | data->pre_handler = func; | 
|  | data->pre_handler_arg1 = arg1; | 
|  | data->pre_handler_arg2 = arg2; | 
|  |  | 
|  | chip = get_irq_chip(virt_irq); | 
|  | if (chip == &sun4u_irq_ack || | 
|  | chip == &sun4v_irq_ack | 
|  | #ifdef CONFIG_PCI_MSI | 
|  | || chip == &sun4v_msi | 
|  | #endif | 
|  | ) | 
|  | return; | 
|  |  | 
|  | chip = (chip == &sun4u_irq ? | 
|  | &sun4u_irq_ack : &sun4v_irq_ack); | 
|  | set_irq_chip(virt_irq, chip); | 
|  | } | 
|  |  | 
|  | unsigned int build_irq(int inofixup, unsigned long iclr, unsigned long imap) | 
|  | { | 
|  | struct ino_bucket *bucket; | 
|  | struct irq_handler_data *data; | 
|  | int ino; | 
|  |  | 
|  | BUG_ON(tlb_type == hypervisor); | 
|  |  | 
|  | ino = (upa_readl(imap) & (IMAP_IGN | IMAP_INO)) + inofixup; | 
|  | bucket = &ivector_table[ino]; | 
|  | if (!bucket->virt_irq) { | 
|  | bucket->virt_irq = virt_irq_alloc(__irq(bucket)); | 
|  | set_irq_chip(bucket->virt_irq, &sun4u_irq); | 
|  | } | 
|  |  | 
|  | data = get_irq_chip_data(bucket->virt_irq); | 
|  | if (unlikely(data)) | 
|  | goto out; | 
|  |  | 
|  | data = kzalloc(sizeof(struct irq_handler_data), GFP_ATOMIC); | 
|  | if (unlikely(!data)) { | 
|  | prom_printf("IRQ: kzalloc(irq_handler_data) failed.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  | set_irq_chip_data(bucket->virt_irq, data); | 
|  |  | 
|  | data->imap  = imap; | 
|  | data->iclr  = iclr; | 
|  |  | 
|  | out: | 
|  | return bucket->virt_irq; | 
|  | } | 
|  |  | 
|  | unsigned int sun4v_build_irq(u32 devhandle, unsigned int devino) | 
|  | { | 
|  | struct ino_bucket *bucket; | 
|  | struct irq_handler_data *data; | 
|  | unsigned long sysino; | 
|  |  | 
|  | BUG_ON(tlb_type != hypervisor); | 
|  |  | 
|  | sysino = sun4v_devino_to_sysino(devhandle, devino); | 
|  | bucket = &ivector_table[sysino]; | 
|  | if (!bucket->virt_irq) { | 
|  | bucket->virt_irq = virt_irq_alloc(__irq(bucket)); | 
|  | set_irq_chip(bucket->virt_irq, &sun4v_irq); | 
|  | } | 
|  |  | 
|  | data = get_irq_chip_data(bucket->virt_irq); | 
|  | if (unlikely(data)) | 
|  | goto out; | 
|  |  | 
|  | data = kzalloc(sizeof(struct irq_handler_data), GFP_ATOMIC); | 
|  | if (unlikely(!data)) { | 
|  | prom_printf("IRQ: kzalloc(irq_handler_data) failed.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  | set_irq_chip_data(bucket->virt_irq, data); | 
|  |  | 
|  | /* Catch accidental accesses to these things.  IMAP/ICLR handling | 
|  | * is done by hypervisor calls on sun4v platforms, not by direct | 
|  | * register accesses. | 
|  | */ | 
|  | data->imap = ~0UL; | 
|  | data->iclr = ~0UL; | 
|  |  | 
|  | out: | 
|  | return bucket->virt_irq; | 
|  | } | 
|  |  | 
|  | #ifdef CONFIG_PCI_MSI | 
|  | unsigned int sun4v_build_msi(u32 devhandle, unsigned int *virt_irq_p, | 
|  | unsigned int msi_start, unsigned int msi_end) | 
|  | { | 
|  | struct ino_bucket *bucket; | 
|  | struct irq_handler_data *data; | 
|  | unsigned long sysino; | 
|  | unsigned int devino; | 
|  |  | 
|  | BUG_ON(tlb_type != hypervisor); | 
|  |  | 
|  | /* Find a free devino in the given range.  */ | 
|  | for (devino = msi_start; devino < msi_end; devino++) { | 
|  | sysino = sun4v_devino_to_sysino(devhandle, devino); | 
|  | bucket = &ivector_table[sysino]; | 
|  | if (!bucket->virt_irq) | 
|  | break; | 
|  | } | 
|  | if (devino >= msi_end) | 
|  | return 0; | 
|  |  | 
|  | sysino = sun4v_devino_to_sysino(devhandle, devino); | 
|  | bucket = &ivector_table[sysino]; | 
|  | bucket->virt_irq = virt_irq_alloc(__irq(bucket)); | 
|  | *virt_irq_p = bucket->virt_irq; | 
|  | set_irq_chip(bucket->virt_irq, &sun4v_msi); | 
|  |  | 
|  | data = get_irq_chip_data(bucket->virt_irq); | 
|  | if (unlikely(data)) | 
|  | return devino; | 
|  |  | 
|  | data = kzalloc(sizeof(struct irq_handler_data), GFP_ATOMIC); | 
|  | if (unlikely(!data)) { | 
|  | prom_printf("IRQ: kzalloc(irq_handler_data) failed.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  | set_irq_chip_data(bucket->virt_irq, data); | 
|  |  | 
|  | data->imap = ~0UL; | 
|  | data->iclr = ~0UL; | 
|  |  | 
|  | return devino; | 
|  | } | 
|  |  | 
|  | void sun4v_destroy_msi(unsigned int virt_irq) | 
|  | { | 
|  | virt_irq_free(virt_irq); | 
|  | } | 
|  | #endif | 
|  |  | 
|  | void ack_bad_irq(unsigned int virt_irq) | 
|  | { | 
|  | struct ino_bucket *bucket = virt_irq_to_bucket(virt_irq); | 
|  | unsigned int ino = 0xdeadbeef; | 
|  |  | 
|  | if (bucket) | 
|  | ino = bucket - &ivector_table[0]; | 
|  |  | 
|  | printk(KERN_CRIT "Unexpected IRQ from ino[%x] virt_irq[%u]\n", | 
|  | ino, virt_irq); | 
|  | } | 
|  |  | 
|  | #ifndef CONFIG_SMP | 
|  | extern irqreturn_t timer_interrupt(int, void *); | 
|  |  | 
|  | void timer_irq(int irq, struct pt_regs *regs) | 
|  | { | 
|  | unsigned long clr_mask = 1 << irq; | 
|  | unsigned long tick_mask = tick_ops->softint_mask; | 
|  | struct pt_regs *old_regs; | 
|  |  | 
|  | if (get_softint() & tick_mask) { | 
|  | irq = 0; | 
|  | clr_mask = tick_mask; | 
|  | } | 
|  | clear_softint(clr_mask); | 
|  |  | 
|  | old_regs = set_irq_regs(regs); | 
|  | irq_enter(); | 
|  |  | 
|  | kstat_this_cpu.irqs[0]++; | 
|  | timer_interrupt(irq, NULL); | 
|  |  | 
|  | irq_exit(); | 
|  | set_irq_regs(old_regs); | 
|  | } | 
|  | #endif | 
|  |  | 
|  | void handler_irq(int irq, struct pt_regs *regs) | 
|  | { | 
|  | struct ino_bucket *bucket; | 
|  | struct pt_regs *old_regs; | 
|  |  | 
|  | clear_softint(1 << irq); | 
|  |  | 
|  | old_regs = set_irq_regs(regs); | 
|  | irq_enter(); | 
|  |  | 
|  | /* Sliiiick... */ | 
|  | bucket = __bucket(xchg32(irq_work(smp_processor_id()), 0)); | 
|  | while (bucket) { | 
|  | struct ino_bucket *next = __bucket(bucket->irq_chain); | 
|  |  | 
|  | bucket->irq_chain = 0; | 
|  | __do_IRQ(bucket->virt_irq); | 
|  |  | 
|  | bucket = next; | 
|  | } | 
|  |  | 
|  | irq_exit(); | 
|  | set_irq_regs(old_regs); | 
|  | } | 
|  |  | 
|  | struct sun5_timer { | 
|  | u64	count0; | 
|  | u64	limit0; | 
|  | u64	count1; | 
|  | u64	limit1; | 
|  | }; | 
|  |  | 
|  | static struct sun5_timer *prom_timers; | 
|  | static u64 prom_limit0, prom_limit1; | 
|  |  | 
|  | static void map_prom_timers(void) | 
|  | { | 
|  | struct device_node *dp; | 
|  | unsigned int *addr; | 
|  |  | 
|  | /* PROM timer node hangs out in the top level of device siblings... */ | 
|  | dp = of_find_node_by_path("/"); | 
|  | dp = dp->child; | 
|  | while (dp) { | 
|  | if (!strcmp(dp->name, "counter-timer")) | 
|  | break; | 
|  | dp = dp->sibling; | 
|  | } | 
|  |  | 
|  | /* Assume if node is not present, PROM uses different tick mechanism | 
|  | * which we should not care about. | 
|  | */ | 
|  | if (!dp) { | 
|  | prom_timers = (struct sun5_timer *) 0; | 
|  | return; | 
|  | } | 
|  |  | 
|  | /* If PROM is really using this, it must be mapped by him. */ | 
|  | addr = of_get_property(dp, "address", NULL); | 
|  | if (!addr) { | 
|  | prom_printf("PROM does not have timer mapped, trying to continue.\n"); | 
|  | prom_timers = (struct sun5_timer *) 0; | 
|  | return; | 
|  | } | 
|  | prom_timers = (struct sun5_timer *) ((unsigned long)addr[0]); | 
|  | } | 
|  |  | 
|  | static void kill_prom_timer(void) | 
|  | { | 
|  | if (!prom_timers) | 
|  | return; | 
|  |  | 
|  | /* Save them away for later. */ | 
|  | prom_limit0 = prom_timers->limit0; | 
|  | prom_limit1 = prom_timers->limit1; | 
|  |  | 
|  | /* Just as in sun4c/sun4m PROM uses timer which ticks at IRQ 14. | 
|  | * We turn both off here just to be paranoid. | 
|  | */ | 
|  | prom_timers->limit0 = 0; | 
|  | prom_timers->limit1 = 0; | 
|  |  | 
|  | /* Wheee, eat the interrupt packet too... */ | 
|  | __asm__ __volatile__( | 
|  | "	mov	0x40, %%g2\n" | 
|  | "	ldxa	[%%g0] %0, %%g1\n" | 
|  | "	ldxa	[%%g2] %1, %%g1\n" | 
|  | "	stxa	%%g0, [%%g0] %0\n" | 
|  | "	membar	#Sync\n" | 
|  | : /* no outputs */ | 
|  | : "i" (ASI_INTR_RECEIVE), "i" (ASI_INTR_R) | 
|  | : "g1", "g2"); | 
|  | } | 
|  |  | 
|  | void init_irqwork_curcpu(void) | 
|  | { | 
|  | int cpu = hard_smp_processor_id(); | 
|  |  | 
|  | trap_block[cpu].irq_worklist = 0; | 
|  | } | 
|  |  | 
|  | static void __cpuinit register_one_mondo(unsigned long paddr, unsigned long type) | 
|  | { | 
|  | unsigned long num_entries = 128; | 
|  | unsigned long status; | 
|  |  | 
|  | status = sun4v_cpu_qconf(type, paddr, num_entries); | 
|  | if (status != HV_EOK) { | 
|  | prom_printf("SUN4V: sun4v_cpu_qconf(%lu:%lx:%lu) failed, " | 
|  | "err %lu\n", type, paddr, num_entries, status); | 
|  | prom_halt(); | 
|  | } | 
|  | } | 
|  |  | 
|  | static void __cpuinit sun4v_register_mondo_queues(int this_cpu) | 
|  | { | 
|  | struct trap_per_cpu *tb = &trap_block[this_cpu]; | 
|  |  | 
|  | register_one_mondo(tb->cpu_mondo_pa, HV_CPU_QUEUE_CPU_MONDO); | 
|  | register_one_mondo(tb->dev_mondo_pa, HV_CPU_QUEUE_DEVICE_MONDO); | 
|  | register_one_mondo(tb->resum_mondo_pa, HV_CPU_QUEUE_RES_ERROR); | 
|  | register_one_mondo(tb->nonresum_mondo_pa, HV_CPU_QUEUE_NONRES_ERROR); | 
|  | } | 
|  |  | 
|  | static void __cpuinit alloc_one_mondo(unsigned long *pa_ptr, int use_bootmem) | 
|  | { | 
|  | void *page; | 
|  |  | 
|  | if (use_bootmem) | 
|  | page = alloc_bootmem_low_pages(PAGE_SIZE); | 
|  | else | 
|  | page = (void *) get_zeroed_page(GFP_ATOMIC); | 
|  |  | 
|  | if (!page) { | 
|  | prom_printf("SUN4V: Error, cannot allocate mondo queue.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  |  | 
|  | *pa_ptr = __pa(page); | 
|  | } | 
|  |  | 
|  | static void __cpuinit alloc_one_kbuf(unsigned long *pa_ptr, int use_bootmem) | 
|  | { | 
|  | void *page; | 
|  |  | 
|  | if (use_bootmem) | 
|  | page = alloc_bootmem_low_pages(PAGE_SIZE); | 
|  | else | 
|  | page = (void *) get_zeroed_page(GFP_ATOMIC); | 
|  |  | 
|  | if (!page) { | 
|  | prom_printf("SUN4V: Error, cannot allocate kbuf page.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  |  | 
|  | *pa_ptr = __pa(page); | 
|  | } | 
|  |  | 
|  | static void __cpuinit init_cpu_send_mondo_info(struct trap_per_cpu *tb, int use_bootmem) | 
|  | { | 
|  | #ifdef CONFIG_SMP | 
|  | void *page; | 
|  |  | 
|  | BUILD_BUG_ON((NR_CPUS * sizeof(u16)) > (PAGE_SIZE - 64)); | 
|  |  | 
|  | if (use_bootmem) | 
|  | page = alloc_bootmem_low_pages(PAGE_SIZE); | 
|  | else | 
|  | page = (void *) get_zeroed_page(GFP_ATOMIC); | 
|  |  | 
|  | if (!page) { | 
|  | prom_printf("SUN4V: Error, cannot allocate cpu mondo page.\n"); | 
|  | prom_halt(); | 
|  | } | 
|  |  | 
|  | tb->cpu_mondo_block_pa = __pa(page); | 
|  | tb->cpu_list_pa = __pa(page + 64); | 
|  | #endif | 
|  | } | 
|  |  | 
|  | /* Allocate and register the mondo and error queues for this cpu.  */ | 
|  | void __cpuinit sun4v_init_mondo_queues(int use_bootmem, int cpu, int alloc, int load) | 
|  | { | 
|  | struct trap_per_cpu *tb = &trap_block[cpu]; | 
|  |  | 
|  | if (alloc) { | 
|  | alloc_one_mondo(&tb->cpu_mondo_pa, use_bootmem); | 
|  | alloc_one_mondo(&tb->dev_mondo_pa, use_bootmem); | 
|  | alloc_one_mondo(&tb->resum_mondo_pa, use_bootmem); | 
|  | alloc_one_kbuf(&tb->resum_kernel_buf_pa, use_bootmem); | 
|  | alloc_one_mondo(&tb->nonresum_mondo_pa, use_bootmem); | 
|  | alloc_one_kbuf(&tb->nonresum_kernel_buf_pa, use_bootmem); | 
|  |  | 
|  | init_cpu_send_mondo_info(tb, use_bootmem); | 
|  | } | 
|  |  | 
|  | if (load) { | 
|  | if (cpu != hard_smp_processor_id()) { | 
|  | prom_printf("SUN4V: init mondo on cpu %d not %d\n", | 
|  | cpu, hard_smp_processor_id()); | 
|  | prom_halt(); | 
|  | } | 
|  | sun4v_register_mondo_queues(cpu); | 
|  | } | 
|  | } | 
|  |  | 
|  | static struct irqaction timer_irq_action = { | 
|  | .name = "timer", | 
|  | }; | 
|  |  | 
|  | /* Only invoked on boot processor. */ | 
|  | void __init init_IRQ(void) | 
|  | { | 
|  | map_prom_timers(); | 
|  | kill_prom_timer(); | 
|  | memset(&ivector_table[0], 0, sizeof(ivector_table)); | 
|  |  | 
|  | if (tlb_type == hypervisor) | 
|  | sun4v_init_mondo_queues(1, hard_smp_processor_id(), 1, 1); | 
|  |  | 
|  | /* We need to clear any IRQ's pending in the soft interrupt | 
|  | * registers, a spurious one could be left around from the | 
|  | * PROM timer which we just disabled. | 
|  | */ | 
|  | clear_softint(get_softint()); | 
|  |  | 
|  | /* Now that ivector table is initialized, it is safe | 
|  | * to receive IRQ vector traps.  We will normally take | 
|  | * one or two right now, in case some device PROM used | 
|  | * to boot us wants to speak to us.  We just ignore them. | 
|  | */ | 
|  | __asm__ __volatile__("rdpr	%%pstate, %%g1\n\t" | 
|  | "or	%%g1, %0, %%g1\n\t" | 
|  | "wrpr	%%g1, 0x0, %%pstate" | 
|  | : /* No outputs */ | 
|  | : "i" (PSTATE_IE) | 
|  | : "g1"); | 
|  |  | 
|  | irq_desc[0].action = &timer_irq_action; | 
|  | } |