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