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