Home | History | Annotate | Line # | Download | only in gpio
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