gpio.c revision 1.31 1 1.31 mbalmer /* $NetBSD: gpio.c,v 1.31 2010/01/24 12:25:20 mbalmer 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.31 mbalmer * Copyright (c) 2008, 2009, 2010 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.31 mbalmer __KERNEL_RCSID(0, "$NetBSD: gpio.c,v 1.31 2010/01/24 12:25:20 mbalmer 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.31 mbalmer gpio_search(device_t parent, cfdata_t cf, const int *ldesc, void *aux)
187 1.1 jmcneill {
188 1.1 jmcneill struct gpio_attach_args ga;
189 1.1 jmcneill
190 1.5 riz ga.ga_gpio = aux;
191 1.5 riz ga.ga_offset = cf->cf_loc[GPIOCF_OFFSET];
192 1.3 drochner ga.ga_mask = cf->cf_loc[GPIOCF_MASK];
193 1.1 jmcneill
194 1.1 jmcneill if (config_match(parent, cf, &ga) > 0)
195 1.1 jmcneill config_attach(parent, cf, &ga, gpio_print);
196 1.1 jmcneill
197 1.19 mbalmer return 0;
198 1.1 jmcneill }
199 1.1 jmcneill
200 1.1 jmcneill int
201 1.11 christos gpio_print(void *aux, const char *pnp)
202 1.1 jmcneill {
203 1.1 jmcneill struct gpio_attach_args *ga = aux;
204 1.1 jmcneill int i;
205 1.1 jmcneill
206 1.1 jmcneill printf(" pins");
207 1.1 jmcneill for (i = 0; i < 32; i++)
208 1.1 jmcneill if (ga->ga_mask & (1 << i))
209 1.5 riz printf(" %d", ga->ga_offset + i);
210 1.1 jmcneill
211 1.19 mbalmer return UNCONF;
212 1.1 jmcneill }
213 1.1 jmcneill
214 1.1 jmcneill int
215 1.11 christos gpiobus_print(void *aux, const char *pnp)
216 1.1 jmcneill {
217 1.3 drochner #if 0
218 1.1 jmcneill struct gpiobus_attach_args *gba = aux;
219 1.3 drochner #endif
220 1.1 jmcneill if (pnp != NULL)
221 1.19 mbalmer printf("gpiobus at %s", pnp);
222 1.1 jmcneill
223 1.19 mbalmer return UNCONF;
224 1.1 jmcneill }
225 1.1 jmcneill
226 1.27 mbalmer /* return 1 if all pins can be mapped, 0 if not */
227 1.27 mbalmer int
228 1.27 mbalmer gpio_pin_can_map(void *gpio, int offset, u_int32_t mask)
229 1.27 mbalmer {
230 1.27 mbalmer struct gpio_softc *sc = gpio;
231 1.27 mbalmer int npins, pin, i;
232 1.27 mbalmer
233 1.27 mbalmer npins = gpio_npins(mask);
234 1.27 mbalmer if (npins > sc->sc_npins)
235 1.27 mbalmer return 0;
236 1.27 mbalmer
237 1.27 mbalmer for (npins = 0, i = 0; i < 32; i++)
238 1.27 mbalmer if (mask & (1 << i)) {
239 1.27 mbalmer pin = offset + i;
240 1.27 mbalmer if (pin < 0 || pin >= sc->sc_npins)
241 1.27 mbalmer return 0;
242 1.27 mbalmer if (sc->sc_pins[pin].pin_mapped)
243 1.27 mbalmer return 0;
244 1.27 mbalmer }
245 1.27 mbalmer
246 1.27 mbalmer return 1;
247 1.27 mbalmer }
248 1.27 mbalmer
249 1.8 uwe int
250 1.5 riz gpio_pin_map(void *gpio, int offset, u_int32_t mask, struct gpio_pinmap *map)
251 1.5 riz {
252 1.5 riz struct gpio_softc *sc = gpio;
253 1.5 riz int npins, pin, i;
254 1.5 riz
255 1.5 riz npins = gpio_npins(mask);
256 1.5 riz if (npins > sc->sc_npins)
257 1.19 mbalmer return 1;
258 1.5 riz
259 1.5 riz for (npins = 0, i = 0; i < 32; i++)
260 1.5 riz if (mask & (1 << i)) {
261 1.5 riz pin = offset + i;
262 1.5 riz if (pin < 0 || pin >= sc->sc_npins)
263 1.19 mbalmer return 1;
264 1.5 riz if (sc->sc_pins[pin].pin_mapped)
265 1.19 mbalmer return 1;
266 1.5 riz sc->sc_pins[pin].pin_mapped = 1;
267 1.5 riz map->pm_map[npins++] = pin;
268 1.5 riz }
269 1.5 riz map->pm_size = npins;
270 1.5 riz
271 1.19 mbalmer return 0;
272 1.5 riz }
273 1.5 riz
274 1.5 riz void
275 1.5 riz gpio_pin_unmap(void *gpio, struct gpio_pinmap *map)
276 1.5 riz {
277 1.5 riz struct gpio_softc *sc = gpio;
278 1.5 riz int pin, i;
279 1.5 riz
280 1.5 riz for (i = 0; i < map->pm_size; i++) {
281 1.5 riz pin = map->pm_map[i];
282 1.5 riz sc->sc_pins[pin].pin_mapped = 0;
283 1.5 riz }
284 1.5 riz }
285 1.5 riz
286 1.5 riz int
287 1.5 riz gpio_pin_read(void *gpio, struct gpio_pinmap *map, int pin)
288 1.5 riz {
289 1.5 riz struct gpio_softc *sc = gpio;
290 1.5 riz
291 1.19 mbalmer return gpiobus_pin_read(sc->sc_gc, map->pm_map[pin]);
292 1.5 riz }
293 1.5 riz
294 1.5 riz void
295 1.5 riz gpio_pin_write(void *gpio, struct gpio_pinmap *map, int pin, int value)
296 1.5 riz {
297 1.5 riz struct gpio_softc *sc = gpio;
298 1.5 riz
299 1.13 dyoung gpiobus_pin_write(sc->sc_gc, map->pm_map[pin], value);
300 1.13 dyoung sc->sc_pins[map->pm_map[pin]].pin_state = value;
301 1.5 riz }
302 1.5 riz
303 1.5 riz void
304 1.5 riz gpio_pin_ctl(void *gpio, struct gpio_pinmap *map, int pin, int flags)
305 1.5 riz {
306 1.5 riz struct gpio_softc *sc = gpio;
307 1.5 riz
308 1.19 mbalmer return gpiobus_pin_ctl(sc->sc_gc, map->pm_map[pin], flags);
309 1.5 riz }
310 1.5 riz
311 1.5 riz int
312 1.5 riz gpio_pin_caps(void *gpio, struct gpio_pinmap *map, int pin)
313 1.5 riz {
314 1.5 riz struct gpio_softc *sc = gpio;
315 1.5 riz
316 1.19 mbalmer return sc->sc_pins[map->pm_map[pin]].pin_caps;
317 1.5 riz }
318 1.5 riz
319 1.5 riz int
320 1.5 riz gpio_npins(u_int32_t mask)
321 1.5 riz {
322 1.5 riz int npins, i;
323 1.5 riz
324 1.5 riz for (npins = 0, i = 0; i < 32; i++)
325 1.5 riz if (mask & (1 << i))
326 1.5 riz npins++;
327 1.5 riz
328 1.19 mbalmer return npins;
329 1.5 riz }
330 1.5 riz
331 1.1 jmcneill int
332 1.26 mbalmer gpioopen(dev_t dev, int flag, int mode, struct lwp *l)
333 1.1 jmcneill {
334 1.1 jmcneill struct gpio_softc *sc;
335 1.16 cegger int ret;
336 1.1 jmcneill
337 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
338 1.1 jmcneill if (sc == NULL)
339 1.19 mbalmer return ENXIO;
340 1.22 cegger DPRINTF(("%s: opening\n", device_xname(sc->sc_dev)));
341 1.19 mbalmer if (sc->sc_opened) {
342 1.22 cegger DPRINTF(("%s: already opened\n", device_xname(sc->sc_dev)));
343 1.19 mbalmer return EBUSY;
344 1.19 mbalmer }
345 1.1 jmcneill
346 1.19 mbalmer if ((ret = gpiobus_open(sc->sc_gc, sc->sc_dev))) {
347 1.25 mbalmer DPRINTF(("%s: gpiobus_open returned %d\n",
348 1.25 mbalmer device_xname(sc->sc_dev),
349 1.19 mbalmer ret));
350 1.16 cegger return ret;
351 1.19 mbalmer }
352 1.16 cegger
353 1.1 jmcneill sc->sc_opened = 1;
354 1.1 jmcneill
355 1.19 mbalmer return 0;
356 1.1 jmcneill }
357 1.1 jmcneill
358 1.1 jmcneill int
359 1.26 mbalmer gpioclose(dev_t dev, int flag, int mode, struct lwp *l)
360 1.1 jmcneill {
361 1.1 jmcneill struct gpio_softc *sc;
362 1.1 jmcneill
363 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
364 1.22 cegger DPRINTF(("%s: closing\n", device_xname(sc->sc_dev)));
365 1.17 cegger gpiobus_close(sc->sc_gc, sc->sc_dev);
366 1.1 jmcneill sc->sc_opened = 0;
367 1.1 jmcneill
368 1.19 mbalmer return 0;
369 1.19 mbalmer }
370 1.19 mbalmer
371 1.19 mbalmer int
372 1.19 mbalmer gpio_pinbyname(struct gpio_softc *sc, char *gp_name)
373 1.19 mbalmer {
374 1.19 mbalmer struct gpio_name *nm;
375 1.19 mbalmer
376 1.19 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next)
377 1.19 mbalmer if (!strcmp(nm->gp_name, gp_name))
378 1.19 mbalmer return nm->gp_pin;
379 1.19 mbalmer return -1;
380 1.1 jmcneill }
381 1.1 jmcneill
382 1.1 jmcneill int
383 1.26 mbalmer gpioioctl(dev_t dev, u_long cmd, void *data, int flag, struct lwp *l)
384 1.1 jmcneill {
385 1.1 jmcneill struct gpio_softc *sc;
386 1.1 jmcneill gpio_chipset_tag_t gc;
387 1.1 jmcneill struct gpio_info *info;
388 1.19 mbalmer struct gpio_attach *attach;
389 1.19 mbalmer struct gpio_attach_args ga;
390 1.19 mbalmer struct gpio_dev *gdev;
391 1.19 mbalmer struct gpio_req *req;
392 1.19 mbalmer struct gpio_name *nm;
393 1.19 mbalmer struct gpio_set *set;
394 1.20 mbalmer device_t dv;
395 1.24 mbalmer cfdata_t cf;
396 1.19 mbalmer kauth_cred_t cred;
397 1.19 mbalmer int locs[GPIOCF_NLOCS];
398 1.28 mbalmer int pin, value, flags, npins;
399 1.1 jmcneill
400 1.17 cegger sc = device_lookup_private(&gpio_cd, minor(dev));
401 1.1 jmcneill gc = sc->sc_gc;
402 1.1 jmcneill
403 1.19 mbalmer if (cmd != GPIOINFO && !device_is_active(sc->sc_dev)) {
404 1.26 mbalmer DPRINTF(("%s: device is not active\n",
405 1.26 mbalmer device_xname(sc->sc_dev)));
406 1.13 dyoung return EBUSY;
407 1.19 mbalmer }
408 1.19 mbalmer
409 1.19 mbalmer cred = kauth_cred_get();
410 1.13 dyoung
411 1.1 jmcneill switch (cmd) {
412 1.1 jmcneill case GPIOINFO:
413 1.1 jmcneill info = (struct gpio_info *)data;
414 1.19 mbalmer if (!kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
415 1.19 mbalmer NULL, NULL, NULL, NULL))
416 1.19 mbalmer info->gpio_npins = sc->sc_npins;
417 1.19 mbalmer else {
418 1.19 mbalmer for (pin = npins = 0; pin < sc->sc_npins; pin++)
419 1.19 mbalmer if (sc->sc_pins[pin].pin_flags & GPIO_PIN_SET)
420 1.19 mbalmer ++npins;
421 1.19 mbalmer info->gpio_npins = npins;
422 1.19 mbalmer }
423 1.19 mbalmer break;
424 1.19 mbalmer case GPIOREAD:
425 1.19 mbalmer req = (struct gpio_req *)data;
426 1.19 mbalmer
427 1.19 mbalmer if (req->gp_name[0] != '\0') {
428 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
429 1.19 mbalmer if (pin == -1)
430 1.19 mbalmer return EINVAL;
431 1.19 mbalmer } else
432 1.19 mbalmer pin = req->gp_pin;
433 1.19 mbalmer
434 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
435 1.19 mbalmer return EINVAL;
436 1.19 mbalmer
437 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
438 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
439 1.19 mbalmer NULL, NULL, NULL, NULL))
440 1.19 mbalmer return EPERM;
441 1.19 mbalmer
442 1.19 mbalmer /* return read value */
443 1.19 mbalmer req->gp_value = gpiobus_pin_read(gc, pin);
444 1.19 mbalmer break;
445 1.19 mbalmer case GPIOWRITE:
446 1.19 mbalmer if ((flag & FWRITE) == 0)
447 1.19 mbalmer return EBADF;
448 1.19 mbalmer
449 1.19 mbalmer req = (struct gpio_req *)data;
450 1.19 mbalmer
451 1.19 mbalmer if (req->gp_name[0] != '\0') {
452 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
453 1.19 mbalmer if (pin == -1)
454 1.19 mbalmer return EINVAL;
455 1.19 mbalmer } else
456 1.19 mbalmer pin = req->gp_pin;
457 1.19 mbalmer
458 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
459 1.19 mbalmer return EINVAL;
460 1.19 mbalmer
461 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
462 1.19 mbalmer return EBUSY;
463 1.19 mbalmer
464 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
465 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
466 1.19 mbalmer NULL, NULL, NULL, NULL))
467 1.19 mbalmer return EPERM;
468 1.1 jmcneill
469 1.19 mbalmer value = req->gp_value;
470 1.19 mbalmer if (value != GPIO_PIN_LOW && value != GPIO_PIN_HIGH)
471 1.19 mbalmer return EINVAL;
472 1.19 mbalmer
473 1.19 mbalmer gpiobus_pin_write(gc, pin, value);
474 1.19 mbalmer /* return old value */
475 1.19 mbalmer req->gp_value = sc->sc_pins[pin].pin_state;
476 1.19 mbalmer /* update current value */
477 1.19 mbalmer sc->sc_pins[pin].pin_state = value;
478 1.1 jmcneill break;
479 1.19 mbalmer case GPIOTOGGLE:
480 1.19 mbalmer if ((flag & FWRITE) == 0)
481 1.19 mbalmer return EBADF;
482 1.19 mbalmer
483 1.19 mbalmer req = (struct gpio_req *)data;
484 1.19 mbalmer
485 1.19 mbalmer if (req->gp_name[0] != '\0') {
486 1.19 mbalmer pin = gpio_pinbyname(sc, req->gp_name);
487 1.19 mbalmer if (pin == -1)
488 1.19 mbalmer return EINVAL;
489 1.19 mbalmer } else
490 1.19 mbalmer pin = req->gp_pin;
491 1.19 mbalmer
492 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
493 1.19 mbalmer return EINVAL;
494 1.19 mbalmer
495 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
496 1.19 mbalmer return EBUSY;
497 1.19 mbalmer
498 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
499 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
500 1.19 mbalmer NULL, NULL, NULL, NULL))
501 1.19 mbalmer return EPERM;
502 1.19 mbalmer
503 1.19 mbalmer value = (sc->sc_pins[pin].pin_state == GPIO_PIN_LOW ?
504 1.19 mbalmer GPIO_PIN_HIGH : GPIO_PIN_LOW);
505 1.19 mbalmer gpiobus_pin_write(gc, pin, value);
506 1.19 mbalmer /* return old value */
507 1.19 mbalmer req->gp_value = sc->sc_pins[pin].pin_state;
508 1.19 mbalmer /* update current value */
509 1.19 mbalmer sc->sc_pins[pin].pin_state = value;
510 1.19 mbalmer break;
511 1.19 mbalmer case GPIOATTACH:
512 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
513 1.19 mbalmer NULL, NULL, NULL, NULL))
514 1.19 mbalmer return EPERM;
515 1.27 mbalmer
516 1.19 mbalmer attach = (struct gpio_attach *)data;
517 1.27 mbalmer
518 1.27 mbalmer /* do not try to attach if the pins are already mapped */
519 1.27 mbalmer if (!gpio_pin_can_map(sc, attach->ga_offset, attach->ga_mask))
520 1.27 mbalmer return EBUSY;
521 1.27 mbalmer
522 1.19 mbalmer ga.ga_gpio = sc;
523 1.19 mbalmer ga.ga_dvname = attach->ga_dvname;
524 1.19 mbalmer ga.ga_offset = attach->ga_offset;
525 1.19 mbalmer ga.ga_mask = attach->ga_mask;
526 1.19 mbalmer DPRINTF(("%s: attach %s with offset %d and mask 0x%02x\n",
527 1.22 cegger device_xname(sc->sc_dev), ga.ga_dvname, ga.ga_offset,
528 1.19 mbalmer ga.ga_mask));
529 1.19 mbalmer
530 1.19 mbalmer locs[GPIOCF_OFFSET] = ga.ga_offset;
531 1.19 mbalmer locs[GPIOCF_MASK] = ga.ga_mask;
532 1.19 mbalmer
533 1.24 mbalmer cf = config_search_loc(NULL, sc->sc_dev, "gpio", locs, &ga);
534 1.24 mbalmer if (cf != NULL) {
535 1.24 mbalmer dv = config_attach_loc(sc->sc_dev, cf, locs, &ga,
536 1.24 mbalmer gpiobus_print);
537 1.24 mbalmer if (dv != NULL) {
538 1.24 mbalmer gdev = kmem_alloc(sizeof(struct gpio_dev),
539 1.24 mbalmer KM_SLEEP);
540 1.24 mbalmer gdev->sc_dev = dv;
541 1.24 mbalmer LIST_INSERT_HEAD(&sc->sc_devs, gdev, sc_next);
542 1.24 mbalmer } else
543 1.24 mbalmer return EINVAL;
544 1.19 mbalmer } else
545 1.19 mbalmer return EINVAL;
546 1.19 mbalmer break;
547 1.19 mbalmer case GPIODETACH:
548 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
549 1.19 mbalmer NULL, NULL, NULL, NULL))
550 1.19 mbalmer return EPERM;
551 1.19 mbalmer
552 1.19 mbalmer attach = (struct gpio_attach *)data;
553 1.19 mbalmer LIST_FOREACH(gdev, &sc->sc_devs, sc_next) {
554 1.23 mbalmer if (strcmp(device_xname(gdev->sc_dev),
555 1.23 mbalmer attach->ga_dvname) == 0) {
556 1.19 mbalmer if (config_detach(gdev->sc_dev, 0) == 0) {
557 1.19 mbalmer LIST_REMOVE(gdev, sc_next);
558 1.19 mbalmer kmem_free(gdev,
559 1.19 mbalmer sizeof(struct gpio_dev));
560 1.19 mbalmer return 0;
561 1.19 mbalmer }
562 1.19 mbalmer break;
563 1.19 mbalmer }
564 1.19 mbalmer }
565 1.19 mbalmer return EINVAL;
566 1.19 mbalmer break;
567 1.19 mbalmer case GPIOSET:
568 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
569 1.19 mbalmer NULL, NULL, NULL, NULL))
570 1.19 mbalmer return EPERM;
571 1.19 mbalmer
572 1.19 mbalmer set = (struct gpio_set *)data;
573 1.19 mbalmer
574 1.19 mbalmer if (set->gp_name[0] != '\0') {
575 1.19 mbalmer pin = gpio_pinbyname(sc, set->gp_name);
576 1.19 mbalmer if (pin == -1)
577 1.19 mbalmer return EINVAL;
578 1.19 mbalmer } else
579 1.19 mbalmer pin = set->gp_pin;
580 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
581 1.19 mbalmer return EINVAL;
582 1.19 mbalmer flags = set->gp_flags;
583 1.19 mbalmer
584 1.19 mbalmer /* check that the controller supports all requested flags */
585 1.19 mbalmer if ((flags & sc->sc_pins[pin].pin_caps) != flags)
586 1.19 mbalmer return ENODEV;
587 1.19 mbalmer flags = set->gp_flags | GPIO_PIN_SET;
588 1.19 mbalmer
589 1.19 mbalmer set->gp_caps = sc->sc_pins[pin].pin_caps;
590 1.19 mbalmer /* return old value */
591 1.19 mbalmer set->gp_flags = sc->sc_pins[pin].pin_flags;
592 1.19 mbalmer if (flags > 0) {
593 1.19 mbalmer gpiobus_pin_ctl(gc, pin, flags);
594 1.19 mbalmer /* update current value */
595 1.19 mbalmer sc->sc_pins[pin].pin_flags = flags;
596 1.19 mbalmer }
597 1.19 mbalmer
598 1.19 mbalmer /* rename pin or new pin? */
599 1.19 mbalmer if (set->gp_name2[0] != '\0') {
600 1.28 mbalmer struct gpio_name *gnm;
601 1.28 mbalmer
602 1.28 mbalmer gnm = NULL;
603 1.28 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next) {
604 1.28 mbalmer if (!strcmp(nm->gp_name, set->gp_name2) &&
605 1.28 mbalmer nm->gp_pin != pin)
606 1.28 mbalmer return EINVAL; /* duplicate name */
607 1.28 mbalmer if (nm->gp_pin == pin)
608 1.28 mbalmer gnm = nm;
609 1.28 mbalmer }
610 1.28 mbalmer if (gnm != NULL)
611 1.28 mbalmer strlcpy(gnm->gp_name, set->gp_name2,
612 1.28 mbalmer sizeof(gnm->gp_name));
613 1.28 mbalmer else {
614 1.19 mbalmer nm = kmem_alloc(sizeof(struct gpio_name),
615 1.19 mbalmer KM_SLEEP);
616 1.19 mbalmer strlcpy(nm->gp_name, set->gp_name2,
617 1.19 mbalmer sizeof(nm->gp_name));
618 1.19 mbalmer nm->gp_pin = set->gp_pin;
619 1.19 mbalmer LIST_INSERT_HEAD(&sc->sc_names, nm, gp_next);
620 1.19 mbalmer }
621 1.19 mbalmer }
622 1.19 mbalmer break;
623 1.19 mbalmer case GPIOUNSET:
624 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
625 1.19 mbalmer NULL, NULL, NULL, NULL))
626 1.19 mbalmer return EPERM;
627 1.19 mbalmer
628 1.19 mbalmer set = (struct gpio_set *)data;
629 1.19 mbalmer if (set->gp_name[0] != '\0') {
630 1.19 mbalmer pin = gpio_pinbyname(sc, set->gp_name);
631 1.19 mbalmer if (pin == -1)
632 1.19 mbalmer return EINVAL;
633 1.19 mbalmer } else
634 1.19 mbalmer pin = set->gp_pin;
635 1.19 mbalmer
636 1.19 mbalmer if (pin < 0 || pin >= sc->sc_npins)
637 1.19 mbalmer return EINVAL;
638 1.19 mbalmer if (sc->sc_pins[pin].pin_mapped)
639 1.19 mbalmer return EBUSY;
640 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET))
641 1.19 mbalmer return EINVAL;
642 1.19 mbalmer
643 1.19 mbalmer LIST_FOREACH(nm, &sc->sc_names, gp_next) {
644 1.19 mbalmer if (nm->gp_pin == pin) {
645 1.19 mbalmer LIST_REMOVE(nm, gp_next);
646 1.19 mbalmer kmem_free(nm, sizeof(struct gpio_name));
647 1.19 mbalmer break;
648 1.19 mbalmer }
649 1.19 mbalmer }
650 1.19 mbalmer sc->sc_pins[pin].pin_flags &= ~GPIO_PIN_SET;
651 1.19 mbalmer break;
652 1.19 mbalmer default:
653 1.19 mbalmer /* Try the old API */
654 1.22 cegger DPRINTF(("%s: trying the old API\n", device_xname(sc->sc_dev)));
655 1.19 mbalmer return gpio_ioctl_oapi(sc, cmd, data, flag, cred);
656 1.19 mbalmer }
657 1.19 mbalmer return 0;
658 1.19 mbalmer }
659 1.19 mbalmer
660 1.19 mbalmer int
661 1.19 mbalmer gpio_ioctl_oapi(struct gpio_softc *sc, u_long cmd, void *data, int flag,
662 1.19 mbalmer kauth_cred_t cred)
663 1.19 mbalmer {
664 1.19 mbalmer gpio_chipset_tag_t gc;
665 1.19 mbalmer struct gpio_pin_op *op;
666 1.19 mbalmer struct gpio_pin_ctl *ctl;
667 1.19 mbalmer int pin, value, flags;
668 1.19 mbalmer
669 1.19 mbalmer gc = sc->sc_gc;
670 1.19 mbalmer
671 1.19 mbalmer switch (cmd) {
672 1.1 jmcneill case GPIOPINREAD:
673 1.1 jmcneill op = (struct gpio_pin_op *)data;
674 1.1 jmcneill
675 1.1 jmcneill pin = op->gp_pin;
676 1.19 mbalmer
677 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
678 1.19 mbalmer return EINVAL;
679 1.19 mbalmer
680 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
681 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
682 1.19 mbalmer NULL, NULL, NULL, NULL))
683 1.19 mbalmer return EPERM;
684 1.1 jmcneill
685 1.1 jmcneill /* return read value */
686 1.1 jmcneill op->gp_value = gpiobus_pin_read(gc, pin);
687 1.1 jmcneill break;
688 1.1 jmcneill case GPIOPINWRITE:
689 1.19 mbalmer if ((flag & FWRITE) == 0)
690 1.19 mbalmer return EBADF;
691 1.19 mbalmer
692 1.1 jmcneill op = (struct gpio_pin_op *)data;
693 1.1 jmcneill
694 1.1 jmcneill pin = op->gp_pin;
695 1.19 mbalmer
696 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
697 1.19 mbalmer return EINVAL;
698 1.19 mbalmer
699 1.5 riz if (sc->sc_pins[pin].pin_mapped)
700 1.19 mbalmer return EBUSY;
701 1.19 mbalmer
702 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
703 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
704 1.19 mbalmer NULL, NULL, NULL, NULL))
705 1.19 mbalmer return EPERM;
706 1.1 jmcneill
707 1.1 jmcneill value = op->gp_value;
708 1.1 jmcneill if (value != GPIO_PIN_LOW && value != GPIO_PIN_HIGH)
709 1.19 mbalmer return EINVAL;
710 1.1 jmcneill
711 1.1 jmcneill gpiobus_pin_write(gc, pin, value);
712 1.1 jmcneill /* return old value */
713 1.1 jmcneill op->gp_value = sc->sc_pins[pin].pin_state;
714 1.1 jmcneill /* update current value */
715 1.1 jmcneill sc->sc_pins[pin].pin_state = value;
716 1.1 jmcneill break;
717 1.1 jmcneill case GPIOPINTOGGLE:
718 1.19 mbalmer if ((flag & FWRITE) == 0)
719 1.19 mbalmer return EBADF;
720 1.19 mbalmer
721 1.1 jmcneill op = (struct gpio_pin_op *)data;
722 1.1 jmcneill
723 1.1 jmcneill pin = op->gp_pin;
724 1.19 mbalmer
725 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
726 1.19 mbalmer return EINVAL;
727 1.19 mbalmer
728 1.5 riz if (sc->sc_pins[pin].pin_mapped)
729 1.19 mbalmer return EBUSY;
730 1.19 mbalmer
731 1.19 mbalmer if (!(sc->sc_pins[pin].pin_flags & GPIO_PIN_SET) &&
732 1.19 mbalmer kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
733 1.19 mbalmer NULL, NULL, NULL, NULL))
734 1.19 mbalmer return EPERM;
735 1.1 jmcneill
736 1.1 jmcneill value = (sc->sc_pins[pin].pin_state == GPIO_PIN_LOW ?
737 1.1 jmcneill GPIO_PIN_HIGH : GPIO_PIN_LOW);
738 1.1 jmcneill gpiobus_pin_write(gc, pin, value);
739 1.1 jmcneill /* return old value */
740 1.1 jmcneill op->gp_value = sc->sc_pins[pin].pin_state;
741 1.1 jmcneill /* update current value */
742 1.1 jmcneill sc->sc_pins[pin].pin_state = value;
743 1.1 jmcneill break;
744 1.1 jmcneill case GPIOPINCTL:
745 1.19 mbalmer ctl = (struct gpio_pin_ctl *) data;
746 1.19 mbalmer
747 1.19 mbalmer if (kauth_authorize_device(cred, KAUTH_DEVICE_GPIO_PINSET,
748 1.19 mbalmer NULL, NULL, NULL, NULL))
749 1.19 mbalmer return EPERM;
750 1.1 jmcneill
751 1.1 jmcneill pin = ctl->gp_pin;
752 1.19 mbalmer
753 1.1 jmcneill if (pin < 0 || pin >= sc->sc_npins)
754 1.19 mbalmer return EINVAL;
755 1.5 riz if (sc->sc_pins[pin].pin_mapped)
756 1.19 mbalmer return EBUSY;
757 1.19 mbalmer flags = ctl->gp_flags;
758 1.1 jmcneill
759 1.1 jmcneill /* check that the controller supports all requested flags */
760 1.1 jmcneill if ((flags & sc->sc_pins[pin].pin_caps) != flags)
761 1.19 mbalmer return ENODEV;
762 1.1 jmcneill
763 1.1 jmcneill ctl->gp_caps = sc->sc_pins[pin].pin_caps;
764 1.1 jmcneill /* return old value */
765 1.1 jmcneill ctl->gp_flags = sc->sc_pins[pin].pin_flags;
766 1.1 jmcneill if (flags > 0) {
767 1.1 jmcneill gpiobus_pin_ctl(gc, pin, flags);
768 1.1 jmcneill /* update current value */
769 1.1 jmcneill sc->sc_pins[pin].pin_flags = flags;
770 1.1 jmcneill }
771 1.1 jmcneill break;
772 1.1 jmcneill default:
773 1.19 mbalmer return ENOTTY;
774 1.1 jmcneill }
775 1.19 mbalmer return 0;
776 1.1 jmcneill }
777