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