1 /* auxio.c: Probing for the Sparc AUXIO register at boot time. 2 * 3 * Copyright (C) 1996 David S. Miller (davem@caip.rutgers.edu) 4 */ 5 6 #include <linux/stddef.h> 7 #include <linux/init.h> 8 #include <linux/spinlock.h> 9 #include <linux/of.h> 10 #include <linux/of_device.h> 11 #include <linux/export.h> 12 #include <asm/oplib.h> 13 #include <asm/io.h> 14 #include <asm/auxio.h> 15 #include <asm/string.h> /* memset(), Linux has no bzero() */ 16 17 /* Probe and map in the Auxiliary I/O register */ 18 19 /* auxio_register is not static because it is referenced 20 * in entry.S::floppy_tdone 21 */ 22 void __iomem *auxio_register = NULL; 23 static DEFINE_SPINLOCK(auxio_lock); 24 25 void __init auxio_probe(void) 26 { 27 phandle node, auxio_nd; 28 struct linux_prom_registers auxregs[1]; 29 struct resource r; 30 31 switch (sparc_cpu_model) { 32 case sparc_leon: 33 case sun4d: 34 case sun4: 35 return; 36 default: 37 break; 38 } 39 node = prom_getchild(prom_root_node); 40 auxio_nd = prom_searchsiblings(node, "auxiliary-io"); 41 if(!auxio_nd) { 42 node = prom_searchsiblings(node, "obio"); 43 node = prom_getchild(node); 44 auxio_nd = prom_searchsiblings(node, "auxio"); 45 if(!auxio_nd) { 46 #ifdef CONFIG_PCI 47 /* There may be auxio on Ebus */ 48 return; 49 #else 50 if(prom_searchsiblings(node, "leds")) { 51 /* VME chassis sun4m machine, no auxio exists. */ 52 return; 53 } 54 prom_printf("Cannot find auxio node, cannot continue...\n"); 55 prom_halt(); 56 #endif 57 } 58 } 59 if(prom_getproperty(auxio_nd, "reg", (char *) auxregs, sizeof(auxregs)) <= 0) 60 return; 61 prom_apply_obio_ranges(auxregs, 0x1); 62 /* Map the register both read and write */ 63 r.flags = auxregs[0].which_io & 0xF; 64 r.start = auxregs[0].phys_addr; 65 r.end = auxregs[0].phys_addr + auxregs[0].reg_size - 1; 66 auxio_register = of_ioremap(&r, 0, auxregs[0].reg_size, "auxio"); 67 /* Fix the address on sun4m and sun4c. */ 68 if((((unsigned long) auxregs[0].phys_addr) & 3) == 3 || 69 sparc_cpu_model == sun4c) 70 auxio_register += (3 - ((unsigned long)auxio_register & 3)); 71 72 set_auxio(AUXIO_LED, 0); 73 } 74 75 unsigned char get_auxio(void) 76 { 77 if(auxio_register) 78 return sbus_readb(auxio_register); 79 return 0; 80 } 81 EXPORT_SYMBOL(get_auxio); 82 83 void set_auxio(unsigned char bits_on, unsigned char bits_off) 84 { 85 unsigned char regval; 86 unsigned long flags; 87 spin_lock_irqsave(&auxio_lock, flags); 88 switch(sparc_cpu_model) { 89 case sun4c: 90 regval = sbus_readb(auxio_register); 91 sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN, 92 auxio_register); 93 break; 94 case sun4m: 95 if(!auxio_register) 96 break; /* VME chassis sun4m, no auxio. */ 97 regval = sbus_readb(auxio_register); 98 sbus_writeb(((regval | bits_on) & ~bits_off) | AUXIO_ORMEIN4M, 99 auxio_register); 100 break; 101 case sun4d: 102 break; 103 default: 104 panic("Can't set AUXIO register on this machine."); 105 } 106 spin_unlock_irqrestore(&auxio_lock, flags); 107 } 108 EXPORT_SYMBOL(set_auxio); 109 110 /* sun4m power control register (AUXIO2) */ 111 112 volatile unsigned char * auxio_power_register = NULL; 113 114 void __init auxio_power_probe(void) 115 { 116 struct linux_prom_registers regs; 117 phandle node; 118 struct resource r; 119 120 /* Attempt to find the sun4m power control node. */ 121 node = prom_getchild(prom_root_node); 122 node = prom_searchsiblings(node, "obio"); 123 node = prom_getchild(node); 124 node = prom_searchsiblings(node, "power"); 125 if (node == 0 || (s32)node == -1) 126 return; 127 128 /* Map the power control register. */ 129 if (prom_getproperty(node, "reg", (char *)®s, sizeof(regs)) <= 0) 130 return; 131 prom_apply_obio_ranges(®s, 1); 132 memset(&r, 0, sizeof(r)); 133 r.flags = regs.which_io & 0xF; 134 r.start = regs.phys_addr; 135 r.end = regs.phys_addr + regs.reg_size - 1; 136 auxio_power_register = (unsigned char *) of_ioremap(&r, 0, 137 regs.reg_size, "auxpower"); 138 139 /* Display a quick message on the console. */ 140 if (auxio_power_register) 141 printk(KERN_INFO "Power off control detected.\n"); 142 } 143