/*
 * SN1 Platform specific error Support
 *
 * Copyright (C) 2001 Silicon Graphics, Inc.
 * Copyright (C) 2001 Alan Mayer (ajm@sgi.com)
 */



#include <linux/kernel.h>
#include <linux/sched.h>
#include <linux/mm.h>

#include <asm/ptrace.h>
#include <linux/devfs_fs_kernel.h>
#include <asm/smp.h>
#include <asm/sn/sn_cpuid.h>
#include <asm/sn/sn1/bedrock.h>
#include <asm/sn/intr.h>
#include <asm/sn/addrs.h>

void
snia_error_intr_handler(int irq, void *devid, struct pt_regs *pt_regs) {
	unsigned long long intpend_val;
	unsigned long long bit;

	switch (irq) {
	case SGI_UART_IRQ:
		// This isn't really an error interrupt.  We're just
		// here because we have to do something with them.
		// This is probably wrong, and this code will be
		// removed.
		intpend_val = LOCAL_HUB_L(PI_INT_PEND0);
		if ( (bit = ~(1L<<GFX_INTR_A)) ==
			(intpend_val & ~(1L<<GFX_INTR_A)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		if ( (bit = ~(1L<<GFX_INTR_B)) ==
			(intpend_val & ~(1L<<GFX_INTR_B)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		if ( (bit = ~(1L<<PG_MIG_INTR)) ==
			(intpend_val & ~(1L<<PG_MIG_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		if ( (bit = ~(1L<<UART_INTR)) ==
			(intpend_val & ~(1L<<UART_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		if ( (bit = ~(1L<<CC_PEND_A)) ==
			(intpend_val & ~(1L<<CC_PEND_A)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		if ( (bit = ~(1L<<CC_PEND_B)) ==
			(intpend_val & ~(1L<<CC_PEND_B)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			return;
		}
		printk("Received SGI_UART_IRQ (65), but no intpend0 bits were set???\n");
		return;
	case SGI_HUB_ERROR_IRQ:
		// These are mostly error interrupts of various
		// sorts.  We need to do more than panic here, but
		// what the heck, this is bring up.
		intpend_val = LOCAL_HUB_L(PI_INT_PEND1);
		
		if ( (bit = ~(1L<<XB_ERROR)) ==
			(intpend_val & ~(1L<<XB_ERROR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED XB_ERROR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<LB_ERROR)) ==
			(intpend_val & ~(1L<<LB_ERROR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED LB_ERROR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<NACK_INT_A)) ==
			(intpend_val & ~(1L<<NACK_INT_A)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED NACK_INT_A on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<NACK_INT_B)) ==
			(intpend_val & ~(1L<<NACK_INT_B)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED NACK_INT_B on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<CLK_ERR_INTR)) ==
			(intpend_val & ~(1L<<CLK_ERR_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED CLK_ERR_INTR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<COR_ERR_INTR_A)) ==
			(intpend_val & ~(1L<<COR_ERR_INTR_A)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED COR_ERR_INTR_A on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<COR_ERR_INTR_B)) ==
			(intpend_val & ~(1L<<COR_ERR_INTR_B)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED COR_ERR_INTR_B on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<MD_COR_ERR_INTR)) ==
			(intpend_val & ~(1L<<MD_COR_ERR_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED MD_COR_ERR_INTR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<NI_ERROR_INTR)) ==
			(intpend_val & ~(1L<<NI_ERROR_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED NI_ERROR_INTR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		if ( (bit = ~(1L<<MSC_PANIC_INTR)) ==
			(intpend_val & ~(1L<<MSC_PANIC_INTR)) ) {
			LOCAL_HUB_CLR_INTR(bit);
			panic("RECEIVED MSC_PANIC_INTR on cpu %d, cnode %d\n",
				smp_processor_id(), 
				cpuid_to_cnodeid(smp_processor_id()));
		}
		printk("Received SGI_XB_ERROR_IRQ (182) but no intpend1 bits are set???\n");
		return;
	default:
		printk("Received invalid irq in snia_error_intr_handler()/n");
	}
}