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