1 files changed, 138 insertions, 0 deletions

diff --git a/arch/sparc/kernel/auxio.c b/arch/sparc/kernel/auxio.c
new file mode 100644
index 000000000000..d3b3648362c0
--- /dev/null
+++ b/arch/sparc/kernel/auxio.c
@@ -0,0 +1,138 @@
+/* auxio.c: Probing for the Sparc AUXIO register at boot time.
+ *
+ * Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu)
+ */
+
+#include <linux/stddef.h>
+#include <linux/init.h>
+#include <linux/config.h>
+#include <linux/spinlock.h>
+#include <asm/oplib.h>
+#include <asm/io.h>
+#include <asm/auxio.h>
+#include <asm/string.h>         /* memset(), Linux has no bzero() */
+
+/* Probe and map in the Auxiliary I/O register */
+
+/* auxio_register is not static because it is referenced 
+ * in entry.S::floppy_tdone
+ */
+void __iomem *auxio_register = NULL;
+static DEFINE_SPINLOCK(auxio_lock);
+
+void __init auxio_probe(void)
+{
+        int node, auxio_nd;
+        struct linux_prom_registers auxregs[1];
+        struct resource r;
+
+        switch (sparc_cpu_model) {
+        case sun4d:
+        case sun4:
+                return;
+        default:
+                break;
+        }
+        node = prom_getchild(prom_root_node);
+        auxio_nd = prom_searchsiblings(node, "auxiliary-io");
+        if(!auxio_nd) {
+                node = prom_searchsiblings(node, "obio");
+                node = prom_getchild(node);
+                auxio_nd = prom_searchsiblings(node, "auxio");
+                if(!auxio_nd) {
+#ifdef CONFIG_PCI
+                        /* There may be auxio on Ebus */
+                        return;
+#else
+                        if(prom_searchsiblings(node, "leds")) {
+                                /* VME chassis sun4m machine, no auxio exists. */
+                                return;
+                        }
+                        prom_printf("Cannot find auxio node, cannot continue...\n");
+                        prom_halt();
+#endif
+                }
+        }
+        if(prom_getproperty(auxio_nd, "reg", (char *) auxregs, sizeof(auxregs)) <= 0)
+                return;
+        prom_apply_obio_ranges(auxregs, 0x1);
+        /* Map the register both read and write */
+        r.flags = auxregs[0].which_io & 0xF;
+        r.start = auxregs[0].phys_addr;
+        r.end = auxregs[0].phys_addr + auxregs[0].reg_size - 1;
+        auxio_register = sbus_ioremap(&r, 0, auxregs[0].reg_size, "auxio");
+        /* Fix the address on sun4m and sun4c. */
+        if((((unsigned long) auxregs[0].phys_addr) & 3) == 3 ||
+           sparc_cpu_model == sun4c)
+                auxio_register += (3 - ((unsigned long)auxio_register & 3));
+
+        set_auxio(AUXIO_LED, 0);
+}
+
+unsigned char get_auxio(void)
+{
+        if(auxio_register) 
+                return sbus_readb(auxio_register);
+        return 0;
+}
+
+void set_auxio(unsigned char bits_on, unsigned char bits_off)
+{
+        unsigned char regval;
+        unsigned long flags;
+        spin_lock_irqsave(&auxio_lock, flags);
+        switch(sparc_cpu_model) {
+        case sun4c:
+                regval = sbus_readb(auxio_register);
+                sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN,
+                        auxio_register);
+                break;
+        case sun4m:
+                if(!auxio_register)
+                        break;     /* VME chassic sun4m, no auxio. */
+                regval = sbus_readb(auxio_register);
+                sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN4M,
+                        auxio_register);
+                break;
+        case sun4d:
+                break;
+        default:
+                panic("Can't set AUXIO register on this machine.");
+        };
+        spin_unlock_irqrestore(&auxio_lock, flags);
+}
+
+
+/* sun4m power control register (AUXIO2) */
+
+volatile unsigned char * auxio_power_register = NULL;
+
+void __init auxio_power_probe(void)
+{
+        struct linux_prom_registers regs;
+        int node;
+        struct resource r;
+
+        /* Attempt to find the sun4m power control node. */
+        node = prom_getchild(prom_root_node);
+        node = prom_searchsiblings(node, "obio");
+        node = prom_getchild(node);
+        node = prom_searchsiblings(node, "power");
+        if (node == 0 || node == -1)
+                return;
+
+        /* Map the power control register. */
+        if (prom_getproperty(node, "reg", (char *)&regs, sizeof(regs)) <= 0)
+                return;
+        prom_apply_obio_ranges(&regs, 1);
+        memset(&r, 0, sizeof(r));
+        r.flags = regs.which_io & 0xF;
+        r.start = regs.phys_addr;
+        r.end = regs.phys_addr + regs.reg_size - 1;
+        auxio_power_register = (unsigned char *) sbus_ioremap(&r, 0,
+            regs.reg_size, "auxpower");
+
+        /* Display a quick message on the console. */
+        if (auxio_power_register)
+                printk(KERN_INFO "Power off control detected.\n");
+}