obsled.c revision 1.9 1 /* $NetBSD: obsled.c,v 1.9 2012/06/02 21:36:41 dsl Exp $ */
2
3 /*
4 * Copyright (c) 2004 Shigeyuki Fukushima.
5 * All rights reserved.
6 *
7 * Redistribution and use in source and binary forms, with or without
8 * modification, are permitted provided that the following conditions
9 * are met:
10 * 1. Redistributions of source code must retain the above copyright
11 * notice, this list of conditions and the following disclaimer.
12 * 2. Redistributions in binary form must reproduce the above
13 * copyright notice, this list of conditions and the following
14 * disclaimer in the documentation and/or other materials provided
15 * with the distribution.
16 * 3. The name of the author may not be used to endorse or promote
17 * products derived from this software without specific prior
18 * written permission.
19 *
20 * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS
21 * OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED
22 * WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
23 * ARE DISCLAIMED. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY
24 * DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
25 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
26 * GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
27 * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
28 * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
29 * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
30 * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
31 */
32
33 #include <sys/cdefs.h>
34 __KERNEL_RCSID(0, "$NetBSD: obsled.c,v 1.9 2012/06/02 21:36:41 dsl Exp $");
35
36 #include <sys/param.h>
37 #include <sys/device.h>
38 #include <sys/queue.h>
39 #include <sys/sysctl.h>
40 #include <sys/systm.h>
41
42 #include <machine/obs266.h>
43
44 #include <powerpc/ibm4xx/dev/gpiovar.h>
45
46 struct obsled_softc {
47 device_t sc_dev;
48 gpio_tag_t sc_tag;
49 int sc_addr;
50 int sc_led_state; /* LED status (ON=1/OFF=0) */
51 int sc_led_state_mib;
52 };
53
54 static void obsled_attach(device_t, device_t, void *);
55 static int obsled_match(device_t, cfdata_t, void *);
56 static int obsled_sysctl_verify(SYSCTLFN_PROTO);
57 static void obsled_set_state(struct obsled_softc *);
58
59 CFATTACH_DECL_NEW(obsled, sizeof(struct obsled_softc),
60 obsled_match, obsled_attach, NULL, NULL);
61
62 static int
63 obsled_match(device_t parent, cfdata_t cf, void *aux)
64 {
65 struct gpio_attach_args *ga = aux;
66
67 /* XXX: support only OpenBlockS266 LED */
68 if (ga->ga_addr == OBS266_GPIO_LED1)
69 return (1);
70 else if (ga->ga_addr == OBS266_GPIO_LED2)
71 return (1);
72 else if (ga->ga_addr == OBS266_GPIO_LED4)
73 return (1);
74
75 return (0);
76 }
77
78 static void
79 obsled_attach(device_t parent, device_t self, void *aux)
80 {
81 struct obsled_softc *sc = device_private(self);
82 struct gpio_attach_args *ga = aux;
83 struct sysctlnode *node;
84 int err, node_mib;
85 char led_name[5];
86 /* int led = (1 << device_unit(sc->sc_dev)); */
87
88 snprintf(led_name, sizeof(led_name),
89 "led%d", (1 << device_unit(sc->sc_dev)) & 0x7);
90 aprint_naive(": OpenBlockS %s\n", led_name);
91 aprint_normal(": OpenBlockS %s\n", led_name);
92
93 sc->sc_dev = self;
94 sc->sc_tag = ga->ga_tag;
95 sc->sc_addr = ga->ga_addr;
96 sc->sc_led_state = 0;
97
98 obs266_led_set(OBS266_LED_OFF);
99
100 /* add sysctl interface */
101 err = sysctl_createv(NULL, 0,
102 NULL, NULL,
103 0, CTLTYPE_NODE,
104 "hw",
105 NULL,
106 NULL, 0, NULL, 0,
107 CTL_HW, CTL_EOL);
108 if (err != 0)
109 return;
110 err = sysctl_createv(NULL, 0,
111 NULL, (const struct sysctlnode **)&node,
112 0, CTLTYPE_NODE,
113 "obsled",
114 NULL,
115 NULL, 0, NULL, 0,
116 CTL_HW, CTL_CREATE, CTL_EOL);
117 if (err != 0)
118 return;
119 node_mib = node->sysctl_num;
120 err = sysctl_createv(NULL, 0,
121 NULL, (const struct sysctlnode **)&node,
122 CTLFLAG_READWRITE, CTLTYPE_INT,
123 led_name,
124 SYSCTL_DESCR("OpenBlockS LED state (0=off, 1=on)"),
125 obsled_sysctl_verify, 0, (void *)sc, 0,
126 CTL_HW, node_mib, CTL_CREATE, CTL_EOL);
127 if (err != 0)
128 return;
129
130 sc->sc_led_state_mib = node->sysctl_num;
131 #if 0
132 {
133 gpio_tag_t tag = sc->sc_tag;
134 (*(tag)->io_or_write)((tag)->cookie, sc->sc_addr, 0);
135 }
136 #endif
137 }
138
139 static int
140 obsled_sysctl_verify(SYSCTLFN_ARGS)
141 {
142 struct obsled_softc *sc = rnode->sysctl_data;
143 struct sysctlnode node;
144 int err, state;
145
146 node = *rnode;
147 state = sc->sc_led_state;
148 node.sysctl_data = &state;
149
150 err = sysctl_lookup(SYSCTLFN_CALL(&node));
151 if (err != 0 || newp == NULL)
152 return err;
153
154 if (node.sysctl_num == sc->sc_led_state_mib) {
155 if (state < 0 || state > 1)
156 return EINVAL;
157 sc->sc_led_state = state;
158 obsled_set_state(sc);
159 }
160
161 return 0;
162 }
163
164 static void
165 obsled_set_state(struct obsled_softc *sc)
166 {
167 gpio_tag_t tag = sc->sc_tag;
168
169 (*(tag)->io_or_write)((tag)->cookie,
170 sc->sc_addr,
171 (~(sc->sc_led_state) & 1));
172 /* GPIO LED input ON=0/OFF=1 */
173 }
174
175 /*
176 * Setting LED interface for inside kernel.
177 * Argumnt `led' is 3-bit LED state (led=0-7/ON=1/OFF=0).
178 */
179 void
180 obs266_led_set(int led)
181 {
182 device_t dv;
183 deviter_t di;
184
185 /*
186 * Sarching "obsled" devices from device tree.
187 * Do you have something better idea?
188 */
189 for (dv = deviter_first(&di, DEVITER_F_ROOT_FIRST); dv != NULL;
190 dv = deviter_next(&di)) {
191 if (device_is_a(dv, "obsles")) {
192 struct obsled_softc *sc = device_private(dv);
193 sc->sc_led_state =
194 (led & (1 << device_unit(dv))) >> device_unit(dv);
195 obsled_set_state(sc);
196 }
197 }
198 deviter_release(&di);
199 }
200