gpio.c revision 1.30 1 1.30 dyoung /* $NetBSD: gpio.c,v 1.30 2010/01/08 19:48:18 dyoung Exp $ */
2 1.5 riz /* $OpenBSD: gpio.c,v 1.6 2006/01/14 12:33:49 grange Exp $ */
3 1.5 riz
4 1.1 jmcneill /*
5 1.19 mbalmer * Copyright (c) 2008, 2009 Marc Balmer <marc (at) msys.ch>
6 1.5 riz * Copyright (c) 2004, 2006 Alexander Yurchenko <grange (at) openbsd.org>
7 1.1 jmcneill *
8 1.1 jmcneill * Permission to use, copy, modify, and distribute this software for any
9 1.1 jmcneill * purpose with or without fee is hereby granted, provided that the above
10 1.1 jmcneill * copyright notice and this permission notice appear in all copies.
11 1.1 jmcneill *
12 1.1 jmcneill * THE SOFTWARE IS PROVIDED "AS IS" AND THE AUTHOR DISCLAIMS ALL WARRANTIES
13 1.1 jmcneill * WITH REGARD TO THIS SOFTWARE INCLUDING ALL IMPLIED WARRANTIES OF
14 1.1 jmcneill * MERCHANTABILITY AND FITNESS. IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR
15 1.1 jmcneill * ANY SPECIAL, DIRECT, INDIRECT, OR CONSEQUENTIAL DAMAGES OR ANY DAMAGES
16 1.1 jmcneill * WHATSOEVER RESULTING FROM LOSS OF USE, DATA OR PROFITS, WHETHER IN AN
17 1.1 jmcneill * ACTION OF CONTRACT, NEGLIGENCE OR OTHER TORTIOUS ACTION, ARISING OUT OF
18 1.1 jmcneill * OR IN CONNECTION WITH THE USE OR PERFORMANCE OF THIS SOFTWARE.
19 1.1 jmcneill */
20 1.1 jmcneill
21 1.2 cube #include <sys/cdefs.h>
22 1.30 dyoung __KERNEL_RCSID(0, "$NetBSD: gpio.c,v 1.30 2010/01/08 19:48:18 dyoung Exp $");
23 1.2 cube
24 1.1 jmcneill /*
25 1.1 jmcneill * General Purpose Input/Output framework.
26 1.1 jmcneill */
27 1.1 jmcneill
28 1.1 jmcneill #include <sys/param.h>
29 1.1 jmcneill #include <sys/systm.h>
30 1.1 jmcneill #include <sys/conf.h>
31 1.1 jmcneill #include <sys/device.h>
32 1.19 mbalmer #include <sys/fcntl.h>
33 1.1 jmcneill #include <sys/ioctl.h>
34 1.1 jmcneill #include <sys/gpio.h>
35 1.1 jmcneill #include <sys/vnode.h>
36 1.19 mbalmer #include <sys/kmem.h>
37 1.19 mbalmer #include <sys/queue.h>
38 1.19 mbalmer #include <sys/kauth.h>
39 1.1 jmcneill
40 1.1 jmcneill #include <dev/gpio/gpiovar.h>
41 1.1 jmcneill
42 1.3 drochner #include "locators.h"
43 1.3 drochner
44 1.19 mbalmer #ifdef GPIO_DEBUG
45 1.21 cegger #define DPRINTFN(n, x) do { if (gpiodebug > (n)) printf x; } while (0)
46 1.19 mbalmer int gpiodebug = 0;
47 1.19 mbalmer #else
48 1.19 mbalmer #define DPRINTFN(n, x)
49 1.19 mbalmer #endif
50 1.19 mbalmer #define DPRINTF(x) DPRINTFN(0, x)
51 1.19 mbalmer
52 1.1 jmcneill struct gpio_softc {
53 1.19 mbalmer device_t sc_dev;
54 1.1 jmcneill
55 1.19 mbalmer gpio_chipset_tag_t sc_gc; /* GPIO controller */
56 1.19 mbalmer gpio_pin_t *sc_pins; /* pins array */
57 1.19 mbalmer int sc_npins; /* number of pins */
58 1.19 mbalmer
59 1.19 mbalmer int sc_opened;
60 1.19 mbalmer LIST_HEAD(, gpio_dev) sc_devs; /* devices */
61 1.19 mbalmer LIST_HEAD(, gpio_name) sc_names; /* named pins */
62 1.1 jmcneill };
63 1.1 jmcneill
64 1.17 cegger int gpio_match(device_t, cfdata_t, void *);
65 1.19 mbalmer int gpio_submatch(device_t, cfdata_t, const int *, void *);
66 1.14 dyoung void gpio_attach(device_t, device_t, void *);
67 1.29 dyoung int gpio_rescan(device_t, const char *, const int *);
68 1.29 dyoung void gpio_childdetached(device_t, device_t);
69 1.30 dyoung bool gpio_resume(device_t, pmf_qual_t);
70 1.14 dyoung int gpio_detach(device_t, int);
71 1.17 cegger int gpio_search(device_t, cfdata_t, const int *, void *);
72 1.1 jmcneill int gpio_print(void *, const char *);
73 1.19 mbalmer int gpio_pinbyname(struct gpio_softc *, char *);
74 1.19 mbalmer
75 1.19 mbalmer /* Old API */
76 1.19 mbalmer int gpio_ioctl_oapi(struct gpio_softc *, u_long, void *, int, kauth_cred_t);
77 1.1 jmcneill
78 1.18 dyoung CFATTACH_DECL3_NEW(gpio, sizeof(struct gpio_softc),
79 1.29 dyoung gpio_match, gpio_attach, gpio_detach, NULL, gpio_rescan,
80 1.29 dyoung gpio_childdetached, DVF_DETACH_SHUTDOWN);
81 1.1 jmcneill
82 1.1 jmcneill dev_type_open(gpioopen);
83 1.1 jmcneill dev_type_close(gpioclose);
84 1.1 jmcneill dev_type_ioctl(gpioioctl);
85 1.1 jmcneill
86 1.1 jmcneill const struct cdevsw gpio_cdevsw = {
87 1.1 jmcneill gpioopen, gpioclose, noread, nowrite, gpioioctl,
88 1.9 christos nostop, notty, nopoll, nommap, nokqfilter, D_OTHER,
89 1.1 jmcneill };
90 1.1 jmcneill
91 1.1 jmcneill extern struct cfdriver gpio_cd;
92 1.1 jmcneill
93 1.1 jmcneill int
94 1.17 cegger gpio_match(device_t parent, cfdata_t cf, void *aux)
95 1.1 jmcneill {
96 1.19 mbalmer return 1;
97 1.19 mbalmer }
98 1.19 mbalmer
99 1.19 mbalmer int
100 1.19 mbalmer gpio_submatch(device_t parent, cfdata_t cf, const int *ip, void *aux)
101 1.19 mbalmer {
102 1.19 mbalmer struct gpio_attach_args *ga = aux;
103 1.1 jmcneill
104 1.19 mbalmer if (ga->ga_offset == -1)
105 1.19 mbalmer return 0;
106 1.19 mbalmer
107 1.19 mbalmer return strcmp(ga->ga_dvname, cf->cf_name) == 0;
108 1.1 jmcneill }
109 1.1 jmcneill
110 1.13 dyoung bool
111 1.30 dyoung gpio_resume(device_t self, pmf_qual_t qual)
112 1.13 dyoung {
113 1.13 dyoung struct gpio_softc *sc = device_private(self);
114 1.13 dyoung int pin;
115 1.13 dyoung
116 1.13 dyoung for (pin = 0; pin < sc->sc_npins; pin++) {
117 1.13 dyoung gpiobus_pin_ctl(sc->sc_gc, pin, sc->sc_pins[pin].pin_flags);
118 1.13 dyoung gpiobus_pin_write(sc->sc_gc, pin, sc->sc_pins[pin].pin_state);
119 1.13 dyoung }
120 1.13 dyoung return true;
121 1.13 dyoung }
122 1.13 dyoung
123 1.1 jmcneill void
124 1.29 dyoung gpio_childdetached(device_t self, device_t child)
125 1.29 dyoung {
126 1.29 dyoung /* gpio(4) keeps no references to its children, so do nothing. */
127 1.29 dyoung }
128 1.29 dyoung
129 1.29 dyoung int
130 1.29 dyoung gpio_rescan(device_t self, const char *ifattr, const int *locators)
131 1.29 dyoung {
132 1.29 dyoung struct gpio_softc *sc = device_private(self);
133 1.29 dyoung
134 1.29 dyoung config_search_loc(gpio_search, self, ifattr, locators, sc);
135 1.29 dyoung
136 1.29 dyoung return 0;
137 1.29 dyoung }
138 1.29 dyoung
139 1.29 dyoung void
140 1.14 dyoung gpio_attach(device_t parent, device_t self, void *aux)
141 1.1 jmcneill {
142 1.7 thorpej struct gpio_softc *sc = device_private(self);
143 1.1 jmcneill struct gpiobus_attach_args *gba = aux;
144 1.1 jmcneill
145 1.17 cegger sc->sc_dev = self;
146 1.1 jmcneill sc->sc_gc = gba->gba_gc;
147 1.1 jmcneill sc->sc_pins = gba->gba_pins;
148 1.1 jmcneill sc->sc_npins = gba->gba_npins;
149 1.1 jmcneill
150 1.1 jmcneill printf(": %d pins\n", sc->sc_npins);
151 1.1 jmcneill
152 1.13 dyoung if (!pmf_device_register(self, NULL, gpio_resume))
153 1.13 dyoung aprint_error_dev(self, "couldn't establish power handler\n");
154 1.13 dyoung
155 1.1 jmcneill /*
156 1.1 jmcneill * Attach all devices that can be connected to the GPIO pins
157 1.1 jmcneill * described in the kernel configuration file.
158 1.1 jmcneill */
159 1.29 dyoung gpio_rescan(self, "gpio", NULL);
160 1.1 jmcneill }
161 1.1 jmcneill
162 1.1 jmcneill int
163 1.14 dyoung gpio_detach(device_t self, int flags)
164 1.1 jmcneill {
165 1.29 dyoung int rc;
166 1.29 dyoung
167 1.29 dyoung if ((rc = config_detach_children(self, flags)) != 0)
168 1.29 dyoung return rc;
169 1.29 dyoung
170 1.1 jmcneill #if 0
171 1.1 jmcneill int maj, mn;
172 1.1 jmcneill
173 1.1 jmcneill /* Locate the major number */
174 1.1 jmcneill for (maj = 0; maj < nchrdev; maj++)
175 1.1 jmcneill if (cdevsw[maj].d_open == gpioopen)
176 1.1 jmcneill break;
177 1.1 jmcneill
178 1.1 jmcneill /* Nuke the vnodes for any open instances (calls close) */
179 1.6 thorpej mn = device_unit(self);
180 1.1 jmcneill vdevgone(maj, mn, mn, VCHR);
181 1.1 jmcneill #endif
182 1.19 mbalmer return 0;
183 1.1 jmcneill }
184 1.1 jmcneill
185 1.1 jmcneill int
186 1.17 cegger gpio_search(device_t parent, cfdata_t cf,
187 1.11 christos const int *ldesc, void *aux)
188 1.1 jmcneill {
189 1.1 jmcneill struct gpio_attach_args ga;
190 1.1 jmcneill
191 1.5 riz ga.ga_gpio = aux;
192 1.5 riz ga.ga_offset = cf->cf_loc[GPIOCF_OFFSET];
193 1.3 drochner ga.ga_mask = cf->cf_loc[GPIOCF_MASK];
194 1.1 jmcneill
195 1.1 jmcneill if (config_match(parent, cf, &ga) > 0)
196 1.1 jmcneill config_attach(parent, cf, &ga, gpio_print);
197 1.1 jmcneill
198 1.19 mbalmer return 0;
199 1.1 jmcneill }
200 1.1 jmcneill
201 1.1 jmcneill int
202 1.11 christos gpio_print(void *aux, const char *pnp)
203 1.1 jmcneill {
204 1.1 jmcneill struct gpio_attach_args *ga = aux;
205 1.1 jmcneill int i;
206 1.1 jmcneill
207 1.1 jmcneill printf(" pins");
208 1.1 jmcneill for (i = 0; i < 32; i++)
209 1.1 jmcneill if (ga->ga_mask & (1 << i))
210 1.5 riz printf(" %d", ga->ga_offset + i);
211 1.1 jmcneill
212 1.19 mbalmer return UNCONF;
213 1.1 jmcneill }
214 1.1 jmcneill
215 1.1 jmcneill int
216 1.11 christos gpiobus_print(void *aux, const char *pnp)
217 1.1 jmcneill {
218 1.3 drochner #if 0
219 1.1 jmcneill struct gpiobus_attach_args *gba = aux;
220 1.3 drochner #endif
221 1.1 jmcneill if (pnp != NULL)
222 1.19 mbalmer printf("gpiobus at %s", pnp);
223 1.1 jmcneill
224 1.19 mbalmer return UNCONF;
225 1.1 jmcneill }
226 1.1 jmcneill
227 1.27 mbalmer /* return 1 if all pins can be mapped, 0 if not */
228 1.27 mbalmer
229 1.27 mbalmer int
230 1.27 mbalmer gpio_pin_can_map(void *gpio, int offset, u_int32_t mask)
231 1.27 mbalmer {
232 1.27 mbalmer struct gpio_softc *sc = gpio;
233 1.27 mbalmer int npins, pin, i;
234 1.27 mbalmer
235 1.27 mbalmer npins = gpio_npins(mask);
236 1.27 mbalmer if (npins > sc->sc_npins)
237 1.27 mbalmer return 0;
238 1.27 mbalmer
239 1.27 mbalmer for (npins = 0, i = 0; i < 32; i++)
240 1.27 mbalmer if (mask & (1 << i)) {
241 1.27 mbalmer pin = offset + i;
242 1.27 mbalmer if (pin < 0 || pin >= sc->sc_npins)
243 1.27 mbalmer return 0;
244 1.27 mbalmer if (sc->sc_pins[pin].pin_mapped)
245 1.27 mbalmer return 0;
246 1.27 mbalmer }
247 1.27 mbalmer
248 1.27 mbalmer return 1;
249 1.27 mbalmer }
250 1.27 mbalmer
251 1.8 uwe int
252 1.5 riz gpio_pin_map(void *gpio, int offset, u_int32_t mask, struct gpio_pinmap *map)
253 1.5 riz {
254 1.5 riz struct gpio_softc *sc = gpio;
255 1.5 riz int npins, pin, i;
256 1.5 riz
257 1.5 riz npins = gpio_npins(mask);
258 1.5 riz if (npins > sc->sc_npins)
259 1.19 mbalmer return 1;
260 1.5 riz
261 1.5 riz for (npins = 0, i = 0; i < 32; i++)
262 1.5 riz if (mask & (1 << i)) {
263 1.5 riz pin = offset + i;
264 1.5 riz if (pin < 0 || pin >= sc->sc_npins)
265 1.19 mbalmer return 1;
266 1.5 riz if (sc->sc_pins[pin].pin_mapped)
267 1.19 mbalmer return 1;
268 1.5 riz sc->sc_pins[pin].pin_mapped = 1;
269 1.5 riz map->pm_map[npins++] = pin;
270 1.5 riz }
271 1.5 riz map->pm_size = npins;
272 1.5 riz
273 1.19 mbalmer return 0;
274 1.5 riz }
275 1.5 riz
276 1.5 riz void
277 1.5 riz gpio_pin_unmap(void *gpio, struct gpio_pinmap *map)
278 1.5 riz {
279 1.5 riz struct gpio_softc *sc = gpio;
280 1.5 riz int pin, i;
281 1.5 riz
282 1.5 riz for (i = 0; i < map->pm_size; i++) {
283 1.5 riz pin = map->pm_map[i];
284 1.5 riz sc->sc_pins[pin].pin_mapped = 0;
285 1.5 riz }
286 1.5 riz }
287 1.5 riz
288 1.5 riz int
289 1.5 riz gpio_pin_read(void *gpio, struct gpio_pinmap *map, int pin)
290 1.5 riz {
291 1.5 riz struct gpio_softc *sc = gpio;
292 1.5 riz
293 1.19 mbalmer return gpiobus_pin_read(sc->sc_gc, map->pm_map[pin]);
294 1.5 riz }
295 1.5 riz
296 1.5 riz void
297 1.5 riz gpio_pin_write(void *gpio, struct gpio_pinmap *map, int pin, int value)
298 1.5 riz {
299 1.5 riz struct gpio_softc *sc = gpio;
300 1.5 riz
301 1.13 dyoung gpiobus_pin_write(sc->sc_gc, map->pm_map[pin], value);
302 1.13 dyoung sc->sc_pins[map->pm_map[pin]].pin_state = value;
303 1.5 riz }
304 1.5 riz
305 1.5 riz void
306 1.5 riz gpio_pin_ctl(void *gpio, struct gpio_pinmap *map, int pin, int flags)
307 1.5 riz {
308 1.5 riz struct gpio_softc *sc = gpio;
309 1.5 riz
310 1.19 mbalmer return gpiobus_pin_ctl(sc->sc_gc, map->pm_map[pin], flags);
311 1.5 riz }
312 1.5 riz
313 1.5 riz int
314 1.5 riz gpio_pin_caps(void *gpio, struct gpio_pinmap *map, int pin)
315 1.5 riz {
316 1.5 riz struct gpio_softc *sc = gpio;
317 1.5 riz
318 1.19 mbalmer return sc->sc_pins[map->pm_map[pin]].pin_caps;
319 1.5 riz }
320 1.5 riz
321 1.5 riz int
322 1.5 riz gpio_npins(u_int32_t mask)
323 1.5 riz {
324 1.5 riz int npins, i;
325 1.5 riz
326 1.5 riz for (npins = 0, i = 0; i < 32; i++)
327 1.5 riz if (mask & (1 << i))
328 1.5 riz npins++;
329 1.5 riz
330 1.19 mbalmer return npins;
331 1.5 riz }
332 1.5 riz
333 1.1 jmcneill int
334 1.26 mbalmer gpioopen(dev_t dev, int flag, int mode, struct lwp *l)
335 1.1 jmcneill {
336 1.1 jmcneill struct gpio_softc *sc;
337 1.16 cegger int ret;
338 1.1 jmcneill
339 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
340 1.1 jmcneill if (sc == NULL)
341 1.19 mbalmer return ENXIO;
342 1.22 cegger DPRINTF(("%s: opening\n", device_xname(sc->sc_dev)));
343 1.19 mbalmer if (sc->sc_opened) {
344 1.22 cegger DPRINTF(("%s: already opened\n", device_xname(sc->sc_dev)));
345 1.19 mbalmer return EBUSY;
346 1.19 mbalmer }
347 1.1 jmcneill
348 1.19 mbalmer if ((ret = gpiobus_open(sc->sc_gc, sc->sc_dev))) {
349 1.25 mbalmer DPRINTF(("%s: gpiobus_open returned %d\n",
350 1.25 mbalmer device_xname(sc->sc_dev),
351 1.19 mbalmer ret));
352 1.16 cegger return ret;
353 1.19 mbalmer }
354 1.16 cegger
355 1.1 jmcneill sc->sc_opened = 1;
356 1.1 jmcneill
357 1.19 mbalmer return 0;
358 1.1 jmcneill }
359 1.1 jmcneill
360 1.1 jmcneill int
361 1.26 mbalmer gpioclose(dev_t dev, int flag, int mode, struct lwp *l)
362 1.1 jmcneill {
363 1.1 jmcneill struct gpio_softc *sc;
364 1.1 jmcneill
365 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
366 1.22 cegger DPRINTF(("%s: closing\n", device_xname(sc->sc_dev)));
367 1.17 cegger gpiobus_close(sc->sc_gc, sc->sc_dev);
368 1.1 jmcneill sc->sc_opened = 0;
369 1.1 jmcneill
370 1.19 mbalmer return 0;
371 1.19 mbalmer }
372 1.19 mbalmer
373 1.19 mbalmer int
374 1.19 mbalmer gpio_pinbyname(struct gpio_softc *sc, char *gp_name)
375 1.19 mbalmer {
376 1.19 mbalmer struct gpio_name *nm;
377 1.19 mbalmer
378 1.19 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next)
379 1.19 mbalmer if (!strcmp(nm->gp_name, gp_name))
380 1.19 mbalmer return nm->gp_pin;
381 1.19 mbalmer return -1;
382 1.1 jmcneill }
383 1.1 jmcneill
384 1.1 jmcneill int
385 1.26 mbalmer gpioioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
386 1.1 jmcneill {
387 1.1 jmcneill struct gpio_softc *sc;
388 1.1 jmcneill gpio_chipset_tag_t gc;
389 1.1 jmcneill struct gpio_info *info;
390 1.19 mbalmer struct gpio_attach *attach;
391 1.19 mbalmer struct gpio_attach_args ga;
392 1.19 mbalmer struct gpio_dev *gdev;
393 1.19 mbalmer struct gpio_req *req;
394 1.19 mbalmer struct gpio_name *nm;
395 1.19 mbalmer struct gpio_set *set;
396 1.20 mbalmer device_t dv;
397 1.24 mbalmer cfdata_t cf;
398 1.19 mbalmer kauth_cred_t cred;
399 1.19 mbalmer int locs[GPIOCF_NLOCS];
400 1.28 mbalmer int pin, value, flags, npins;
401 1.1 jmcneill
402 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
403 1.1 jmcneill gc = sc->sc_gc;
404 1.1 jmcneill
405 1.19 mbalmer if (cmd != GPIOINFO && !device_is_active(sc->sc_dev)) {
406 1.26 mbalmer DPRINTF(("%s: device is not active\n",
407 1.26 mbalmer device_xname(sc->sc_dev)));
408 1.13 dyoung return EBUSY;
409 1.19 mbalmer }
410 1.19 mbalmer
411 1.19 mbalmer cred = kauth_cred_get();
412 1.13 dyoung
413 1.1 jmcneill switch (cmd) {
414 1.1 jmcneill case GPIOINFO:
415 1.1 jmcneill info = (struct gpio_info *)data;
416 1.19 mbalmer if (!kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
417 1.19 mbalmer NULL, NULL, NULL, NULL))
418 1.19 mbalmer info->gpio_npins = sc->sc_npins;
419 1.19 mbalmer else {
420 1.19 mbalmer for (pin = npins = 0; pin < sc->sc_npins; pin++)
421 1.19 mbalmer if (sc->sc_pins[pin].pin_flags & GPIO_PIN_SET)
422 1.19 mbalmer ++npins;
423 1.19 mbalmer info->gpio_npins = npins;
424 1.19 mbalmer }
425 1.19 mbalmer break;
426 1.19 mbalmer case GPIOREAD:
427 1.19 mbalmer req = (struct gpio_req *)data;
428 1.19 mbalmer
429 1.19 mbalmer if (req->gp_name[0] != '\0') {
430 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
431 1.19 mbalmer if (pin == -1)
432 1.19 mbalmer return EINVAL;
433 1.19 mbalmer } else
434 1.19 mbalmer pin = req->gp_pin;
435 1.19 mbalmer
436 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
437 1.19 mbalmer return EINVAL;
438 1.19 mbalmer
439 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
440 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
441 1.19 mbalmer NULL, NULL, NULL, NULL))
442 1.19 mbalmer return EPERM;
443 1.19 mbalmer
444 1.19 mbalmer /* return read value */
445 1.19 mbalmer req->gp_value = gpiobus_pin_read(gc, pin);
446 1.19 mbalmer break;
447 1.19 mbalmer case GPIOWRITE:
448 1.19 mbalmer if ((flag & FWRITE) == 0)
449 1.19 mbalmer return EBADF;
450 1.19 mbalmer
451 1.19 mbalmer req = (struct gpio_req *)data;
452 1.19 mbalmer
453 1.19 mbalmer if (req->gp_name[0] != '\0') {
454 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
455 1.19 mbalmer if (pin == -1)
456 1.19 mbalmer return EINVAL;
457 1.19 mbalmer } else
458 1.19 mbalmer pin = req->gp_pin;
459 1.19 mbalmer
460 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
461 1.19 mbalmer return EINVAL;
462 1.19 mbalmer
463 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
464 1.19 mbalmer return EBUSY;
465 1.19 mbalmer
466 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
467 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
468 1.19 mbalmer NULL, NULL, NULL, NULL))
469 1.19 mbalmer return EPERM;
470 1.1 jmcneill
471 1.19 mbalmer value = req->gp_value;
472 1.19 mbalmer if (value != GPIO_PIN_LOW && value != GPIO_PIN_HIGH)
473 1.19 mbalmer return EINVAL;
474 1.19 mbalmer
475 1.19 mbalmer gpiobus_pin_write(gc, pin, value);
476 1.19 mbalmer /* return old value */
477 1.19 mbalmer req->gp_value = sc->sc_pins[pin].pin_state;
478 1.19 mbalmer /* update current value */
479 1.19 mbalmer sc->sc_pins[pin].pin_state = value;
480 1.1 jmcneill break;
481 1.19 mbalmer case GPIOTOGGLE:
482 1.19 mbalmer if ((flag & FWRITE) == 0)
483 1.19 mbalmer return EBADF;
484 1.19 mbalmer
485 1.19 mbalmer req = (struct gpio_req *)data;
486 1.19 mbalmer
487 1.19 mbalmer if (req->gp_name[0] != '\0') {
488 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
489 1.19 mbalmer if (pin == -1)
490 1.19 mbalmer return EINVAL;
491 1.19 mbalmer } else
492 1.19 mbalmer pin = req->gp_pin;
493 1.19 mbalmer
494 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
495 1.19 mbalmer return EINVAL;
496 1.19 mbalmer
497 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
498 1.19 mbalmer return EBUSY;
499 1.19 mbalmer
500 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
501 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
502 1.19 mbalmer NULL, NULL, NULL, NULL))
503 1.19 mbalmer return EPERM;
504 1.19 mbalmer
505 1.19 mbalmer value = (sc->sc_pins[pin].pin_state == GPIO_PIN_LOW ?
506 1.19 mbalmer GPIO_PIN_HIGH : GPIO_PIN_LOW);
507 1.19 mbalmer gpiobus_pin_write(gc, pin, value);
508 1.19 mbalmer /* return old value */
509 1.19 mbalmer req->gp_value = sc->sc_pins[pin].pin_state;
510 1.19 mbalmer /* update current value */
511 1.19 mbalmer sc->sc_pins[pin].pin_state = value;
512 1.19 mbalmer break;
513 1.19 mbalmer case GPIOATTACH:
514 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
515 1.19 mbalmer NULL, NULL, NULL, NULL))
516 1.19 mbalmer return EPERM;
517 1.27 mbalmer
518 1.19 mbalmer attach = (struct gpio_attach *)data;
519 1.27 mbalmer
520 1.27 mbalmer /* do not try to attach if the pins are already mapped */
521 1.27 mbalmer if (!gpio_pin_can_map(sc, attach->ga_offset, attach->ga_mask))
522 1.27 mbalmer return EBUSY;
523 1.27 mbalmer
524 1.19 mbalmer ga.ga_gpio = sc;
525 1.19 mbalmer ga.ga_dvname = attach->ga_dvname;
526 1.19 mbalmer ga.ga_offset = attach->ga_offset;
527 1.19 mbalmer ga.ga_mask = attach->ga_mask;
528 1.19 mbalmer DPRINTF(("%s: attach %s with offset %d and mask 0x%02x\n",
529 1.22 cegger device_xname(sc->sc_dev), ga.ga_dvname, ga.ga_offset,
530 1.19 mbalmer ga.ga_mask));
531 1.19 mbalmer
532 1.19 mbalmer locs[GPIOCF_OFFSET] = ga.ga_offset;
533 1.19 mbalmer locs[GPIOCF_MASK] = ga.ga_mask;
534 1.19 mbalmer
535 1.24 mbalmer cf = config_search_loc(NULL, sc->sc_dev, "gpio", locs, &ga);
536 1.24 mbalmer if (cf != NULL) {
537 1.24 mbalmer dv = config_attach_loc(sc->sc_dev, cf, locs, &ga,
538 1.24 mbalmer gpiobus_print);
539 1.24 mbalmer if (dv != NULL) {
540 1.24 mbalmer gdev = kmem_alloc(sizeof(struct gpio_dev),
541 1.24 mbalmer KM_SLEEP);
542 1.24 mbalmer gdev->sc_dev = dv;
543 1.24 mbalmer LIST_INSERT_HEAD(&sc->sc_devs, gdev, sc_next);
544 1.24 mbalmer } else
545 1.24 mbalmer return EINVAL;
546 1.19 mbalmer } else
547 1.19 mbalmer return EINVAL;
548 1.19 mbalmer break;
549 1.19 mbalmer case GPIODETACH:
550 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
551 1.19 mbalmer NULL, NULL, NULL, NULL))
552 1.19 mbalmer return EPERM;
553 1.19 mbalmer
554 1.19 mbalmer attach = (struct gpio_attach *)data;
555 1.19 mbalmer LIST_FOREACH(gdev, &sc->sc_devs, sc_next) {
556 1.23 mbalmer if (strcmp(device_xname(gdev->sc_dev),
557 1.23 mbalmer attach->ga_dvname) == 0) {
558 1.19 mbalmer if (config_detach(gdev->sc_dev, 0) == 0) {
559 1.19 mbalmer LIST_REMOVE(gdev, sc_next);
560 1.19 mbalmer kmem_free(gdev,
561 1.19 mbalmer sizeof(struct gpio_dev));
562 1.19 mbalmer return 0;
563 1.19 mbalmer }
564 1.19 mbalmer break;
565 1.19 mbalmer }
566 1.19 mbalmer }
567 1.19 mbalmer return EINVAL;
568 1.19 mbalmer break;
569 1.19 mbalmer case GPIOSET:
570 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
571 1.19 mbalmer NULL, NULL, NULL, NULL))
572 1.19 mbalmer return EPERM;
573 1.19 mbalmer
574 1.19 mbalmer set = (struct gpio_set *)data;
575 1.19 mbalmer
576 1.19 mbalmer if (set->gp_name[0] != '\0') {
577 1.19 mbalmer pin = gpio_pinbyname(sc, set->gp_name);
578 1.19 mbalmer if (pin == -1)
579 1.19 mbalmer return EINVAL;
580 1.19 mbalmer } else
581 1.19 mbalmer pin = set->gp_pin;
582 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
583 1.19 mbalmer return EINVAL;
584 1.19 mbalmer flags = set->gp_flags;
585 1.19 mbalmer
586 1.19 mbalmer /* check that the controller supports all requested flags */
587 1.19 mbalmer if ((flags & sc->sc_pins[pin].pin_caps) != flags)
588 1.19 mbalmer return ENODEV;
589 1.19 mbalmer flags = set->gp_flags | GPIO_PIN_SET;
590 1.19 mbalmer
591 1.19 mbalmer set->gp_caps = sc->sc_pins[pin].pin_caps;
592 1.19 mbalmer /* return old value */
593 1.19 mbalmer set->gp_flags = sc->sc_pins[pin].pin_flags;
594 1.19 mbalmer if (flags > 0) {
595 1.19 mbalmer gpiobus_pin_ctl(gc, pin, flags);
596 1.19 mbalmer /* update current value */
597 1.19 mbalmer sc->sc_pins[pin].pin_flags = flags;
598 1.19 mbalmer }
599 1.19 mbalmer
600 1.19 mbalmer /* rename pin or new pin? */
601 1.19 mbalmer if (set->gp_name2[0] != '\0') {
602 1.28 mbalmer struct gpio_name *gnm;
603 1.28 mbalmer
604 1.28 mbalmer gnm = NULL;
605 1.28 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next) {
606 1.28 mbalmer if (!strcmp(nm->gp_name, set->gp_name2) &&
607 1.28 mbalmer nm->gp_pin != pin)
608 1.28 mbalmer return EINVAL; /* duplicate name */
609 1.28 mbalmer if (nm->gp_pin == pin)
610 1.28 mbalmer gnm = nm;
611 1.28 mbalmer }
612 1.28 mbalmer if (gnm != NULL)
613 1.28 mbalmer strlcpy(gnm->gp_name, set->gp_name2,
614 1.28 mbalmer sizeof(gnm->gp_name));
615 1.28 mbalmer else {
616 1.19 mbalmer nm = kmem_alloc(sizeof(struct gpio_name),
617 1.19 mbalmer KM_SLEEP);
618 1.19 mbalmer strlcpy(nm->gp_name, set->gp_name2,
619 1.19 mbalmer sizeof(nm->gp_name));
620 1.19 mbalmer nm->gp_pin = set->gp_pin;
621 1.19 mbalmer LIST_INSERT_HEAD(&sc->sc_names, nm, gp_next);
622 1.19 mbalmer }
623 1.19 mbalmer }
624 1.19 mbalmer break;
625 1.19 mbalmer case GPIOUNSET:
626 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
627 1.19 mbalmer NULL, NULL, NULL, NULL))
628 1.19 mbalmer return EPERM;
629 1.19 mbalmer
630 1.19 mbalmer set = (struct gpio_set *)data;
631 1.19 mbalmer if (set->gp_name[0] != '\0') {
632 1.19 mbalmer pin = gpio_pinbyname(sc, set->gp_name);
633 1.19 mbalmer if (pin == -1)
634 1.19 mbalmer return EINVAL;
635 1.19 mbalmer } else
636 1.19 mbalmer pin = set->gp_pin;
637 1.19 mbalmer
638 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
639 1.19 mbalmer return EINVAL;
640 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
641 1.19 mbalmer return EBUSY;
642 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET))
643 1.19 mbalmer return EINVAL;
644 1.19 mbalmer
645 1.19 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next) {
646 1.19 mbalmer if (nm->gp_pin == pin) {
647 1.19 mbalmer LIST_REMOVE(nm, gp_next);
648 1.19 mbalmer kmem_free(nm, sizeof(struct gpio_name));
649 1.19 mbalmer break;
650 1.19 mbalmer }
651 1.19 mbalmer }
652 1.19 mbalmer sc->sc_pins[pin].pin_flags &= ~GPIO_PIN_SET;
653 1.19 mbalmer break;
654 1.19 mbalmer default:
655 1.19 mbalmer /* Try the old API */
656 1.22 cegger DPRINTF(("%s: trying the old API\n", device_xname(sc->sc_dev)));
657 1.19 mbalmer return gpio_ioctl_oapi(sc, cmd, data, flag, cred);
658 1.19 mbalmer }
659 1.19 mbalmer return 0;
660 1.19 mbalmer }
661 1.19 mbalmer
662 1.19 mbalmer int
663 1.19 mbalmer gpio_ioctl_oapi(struct gpio_softc *sc, u_long cmd, void *data, int flag,
664 1.19 mbalmer kauth_cred_t cred)
665 1.19 mbalmer {
666 1.19 mbalmer gpio_chipset_tag_t gc;
667 1.19 mbalmer struct gpio_pin_op *op;
668 1.19 mbalmer struct gpio_pin_ctl *ctl;
669 1.19 mbalmer int pin, value, flags;
670 1.19 mbalmer
671 1.19 mbalmer gc = sc->sc_gc;
672 1.19 mbalmer
673 1.19 mbalmer switch (cmd) {
674 1.1 jmcneill case GPIOPINREAD:
675 1.1 jmcneill op = (struct gpio_pin_op *)data;
676 1.1 jmcneill
677 1.1 jmcneill pin = op->gp_pin;
678 1.19 mbalmer
679 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
680 1.19 mbalmer return EINVAL;
681 1.19 mbalmer
682 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
683 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
684 1.19 mbalmer NULL, NULL, NULL, NULL))
685 1.19 mbalmer return EPERM;
686 1.1 jmcneill
687 1.1 jmcneill /* return read value */
688 1.1 jmcneill op->gp_value = gpiobus_pin_read(gc, pin);
689 1.1 jmcneill break;
690 1.1 jmcneill case GPIOPINWRITE:
691 1.19 mbalmer if ((flag & FWRITE) == 0)
692 1.19 mbalmer return EBADF;
693 1.19 mbalmer
694 1.1 jmcneill op = (struct gpio_pin_op *)data;
695 1.1 jmcneill
696 1.1 jmcneill pin = op->gp_pin;
697 1.19 mbalmer
698 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
699 1.19 mbalmer return EINVAL;
700 1.19 mbalmer
701 1.5 riz if (sc->sc_pins[pin].pin_mapped)
702 1.19 mbalmer return EBUSY;
703 1.19 mbalmer
704 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
705 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
706 1.19 mbalmer NULL, NULL, NULL, NULL))
707 1.19 mbalmer return EPERM;
708 1.1 jmcneill
709 1.1 jmcneill value = op->gp_value;
710 1.1 jmcneill if (value != GPIO_PIN_LOW && value != GPIO_PIN_HIGH)
711 1.19 mbalmer return EINVAL;
712 1.1 jmcneill
713 1.1 jmcneill gpiobus_pin_write(gc, pin, value);
714 1.1 jmcneill /* return old value */
715 1.1 jmcneill op->gp_value = sc->sc_pins[pin].pin_state;
716 1.1 jmcneill /* update current value */
717 1.1 jmcneill sc->sc_pins[pin].pin_state = value;
718 1.1 jmcneill break;
719 1.1 jmcneill case GPIOPINTOGGLE:
720 1.19 mbalmer if ((flag & FWRITE) == 0)
721 1.19 mbalmer return EBADF;
722 1.19 mbalmer
723 1.1 jmcneill op = (struct gpio_pin_op *)data;
724 1.1 jmcneill
725 1.1 jmcneill pin = op->gp_pin;
726 1.19 mbalmer
727 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
728 1.19 mbalmer return EINVAL;
729 1.19 mbalmer
730 1.5 riz if (sc->sc_pins[pin].pin_mapped)
731 1.19 mbalmer return EBUSY;
732 1.19 mbalmer
733 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
734 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
735 1.19 mbalmer NULL, NULL, NULL, NULL))
736 1.19 mbalmer return EPERM;
737 1.1 jmcneill
738 1.1 jmcneill value = (sc->sc_pins[pin].pin_state == GPIO_PIN_LOW ?
739 1.1 jmcneill GPIO_PIN_HIGH : GPIO_PIN_LOW);
740 1.1 jmcneill gpiobus_pin_write(gc, pin, value);
741 1.1 jmcneill /* return old value */
742 1.1 jmcneill op->gp_value = sc->sc_pins[pin].pin_state;
743 1.1 jmcneill /* update current value */
744 1.1 jmcneill sc->sc_pins[pin].pin_state = value;
745 1.1 jmcneill break;
746 1.1 jmcneill case GPIOPINCTL:
747 1.19 mbalmer ctl = (struct gpio_pin_ctl *) data;
748 1.19 mbalmer
749 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
750 1.19 mbalmer NULL, NULL, NULL, NULL))
751 1.19 mbalmer return EPERM;
752 1.1 jmcneill
753 1.1 jmcneill pin = ctl->gp_pin;
754 1.19 mbalmer
755 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
756 1.19 mbalmer return EINVAL;
757 1.5 riz if (sc->sc_pins[pin].pin_mapped)
758 1.19 mbalmer return EBUSY;
759 1.19 mbalmer flags = ctl->gp_flags;
760 1.1 jmcneill
761 1.1 jmcneill /* check that the controller supports all requested flags */
762 1.1 jmcneill if ((flags & sc->sc_pins[pin].pin_caps) != flags)
763 1.19 mbalmer return ENODEV;
764 1.1 jmcneill
765 1.1 jmcneill ctl->gp_caps = sc->sc_pins[pin].pin_caps;
766 1.1 jmcneill /* return old value */
767 1.1 jmcneill ctl->gp_flags = sc->sc_pins[pin].pin_flags;
768 1.1 jmcneill if (flags > 0) {
769 1.1 jmcneill gpiobus_pin_ctl(gc, pin, flags);
770 1.1 jmcneill /* update current value */
771 1.1 jmcneill sc->sc_pins[pin].pin_flags = flags;
772 1.1 jmcneill }
773 1.1 jmcneill break;
774 1.1 jmcneill default:
775 1.19 mbalmer return ENOTTY;
776 1.1 jmcneill }
777 1.19 mbalmer return 0;
778 1.1 jmcneill }
779