vrpiu.c revision 1.30
1/* $NetBSD: vrpiu.c,v 1.30 2003/10/23 20:25:40 he Exp $ */ 2 3/* 4 * Copyright (c) 1999-2003 TAKEMURA Shin All rights reserved. 5 * Copyright (c) 2000-2001 SATO Kazumi, All rights reserved. 6 * Copyright (c) 1999-2001 PocketBSD Project. All rights reserved. 7 * 8 * Redistribution and use in source and binary forms, with or without 9 * modification, are permitted provided that the following conditions 10 * are met: 11 * 1. Redistributions of source code must retain the above copyright 12 * notice, this list of conditions and the following disclaimer. 13 * 2. Redistributions in binary form must reproduce the above copyright 14 * notice, this list of conditions and the following disclaimer in the 15 * documentation and/or other materials provided with the distribution. 16 * 17 * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 18 * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 19 * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 20 * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 21 * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 22 * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 23 * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 24 * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 25 * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 26 * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 27 * SUCH DAMAGE. 28 * 29 */ 30 31/* 32 * A/D polling part written by SATO Kazumi. 33 */ 34 35#include <sys/cdefs.h> 36__KERNEL_RCSID(0, "$NetBSD: vrpiu.c,v 1.30 2003/10/23 20:25:40 he Exp $"); 37 38#include <sys/param.h> 39#include <sys/systm.h> 40#include <sys/device.h> 41#include <sys/kernel.h> 42#include <sys/callout.h> 43#include <sys/boot_flag.h> 44 45#include <dev/wscons/wsconsio.h> 46#include <dev/wscons/wsmousevar.h> 47 48#include <machine/bus.h> 49#include <machine/platid.h> 50#include <machine/platid_mask.h> 51#include <machine/config_hook.h> 52 53#include <dev/hpc/tpcalibvar.h> 54 55#include <dev/hpc/hpcbatteryvar.h> 56#include <dev/hpc/hpcbatterytable.h> 57 58#include <hpcmips/vr/vrcpudef.h> 59#include <hpcmips/vr/vripif.h> 60#include <hpcmips/vr/cmureg.h> 61#include <hpcmips/vr/vrpiuvar.h> 62#define PIUB_REG_OFFSSET 0 63#include <hpcmips/vr/vrpiureg.h> 64 65/* 66 * contant and macro definitions 67 */ 68#define VRPIUDEBUG 69#ifdef VRPIUDEBUG 70int vrpiu_debug = 0; 71#define DPRINTF(arg) if (vrpiu_debug) printf arg; 72#define VPRINTF(arg) if (bootverbose || vrpiu_debug) printf arg; 73#else 74#define DPRINTF(arg) 75#define VPRINTF(arg) if (bootverbose) printf arg; 76#endif 77 78#ifndef VRPIU_NO_ADHOC_BATTERY_EVENT 79#define VRPIU_ADHOC_BATTERY_EVENT /* currently... */ 80#endif /* VRPIU_NO_ADHOC_BATTERY_EVENT */ 81 82#ifndef VRPIU_AD_POLL_INTERVAL 83#define VRPIU_AD_POLL_INTERVAL 60 /* interval is 60 sec */ 84#endif /* VRPIU_AD_POLL_INTERTVAL */ 85 86#define PIUSIVL_SCANINTVAL_MIN 333 /* 10msec */ 87#define PIUSIVL_SCANINTVAL_MAX PIUSIVL_SCANINTVAL_MASK /* 60msec */ 88#define VRPIU_TP_SCAN_TIMEOUT (hz/10) /* timeout is 100msec */ 89 90#define TP_INTR (PIUINT_ALLINTR & ~PIUINT_PADADPINTR) 91#define AD_INTR (PIUINT_PADADPINTR) 92 93/* 94 * data types 95 */ 96/* struct vrpiu_softc is defined in vrpiuvar.h */ 97 98/* 99 * function prototypes 100 */ 101static int vrpiumatch(struct device *, struct cfdata *, void *); 102static void vrpiuattach(struct device *, struct device *, void *); 103static void vrc4173piuattach(struct device *, struct device *, void *); 104static void vrpiu_init(struct vrpiu_softc *, void *); 105 106static void vrpiu_write(struct vrpiu_softc *, int, unsigned short); 107static u_short vrpiu_read(struct vrpiu_softc *, int); 108 109static int vrpiu_intr(void *); 110static void vrpiu_tp_intr(struct vrpiu_softc *); 111static void vrpiu_ad_intr(struct vrpiu_softc *); 112#ifdef DEBUG 113static void vrpiu_dump_cntreg(unsigned int); 114#endif 115 116static int vrpiu_tp_enable(void *); 117static int vrpiu_tp_ioctl(void *, u_long, caddr_t, int, struct proc *); 118static void vrpiu_tp_disable(void *); 119static void vrpiu_tp_up(struct vrpiu_softc *); 120static void vrpiu_tp_timeout(void *); 121int vrpiu_ad_enable(void *); 122void vrpiu_ad_disable(void *); 123static void vrpiu_start_powerstate(void *); 124static void vrpiu_calc_powerstate(struct vrpiu_softc *); 125static void vrpiu_send_battery_event(struct vrpiu_softc *); 126static void vrpiu_power(int, void *); 127static u_int scan_interval(u_int data); 128 129/* mra is defined in mra.c */ 130int mra_Y_AX1_BX2_C(int *y, int ys, int *x1, int x1s, int *x2, int x2s, 131 int n, int scale, int *a, int *b, int *c); 132 133/* 134 * static or global variables 135 */ 136CFATTACH_DECL(vrpiu, sizeof(struct vrpiu_softc), 137 vrpiumatch, vrpiuattach, NULL, NULL); 138CFATTACH_DECL(vrc4173piu, sizeof(struct vrpiu_softc), 139 vrpiumatch, vrc4173piuattach, NULL, NULL); 140 141const struct wsmouse_accessops vrpiu_accessops = { 142 vrpiu_tp_enable, 143 vrpiu_tp_ioctl, 144 vrpiu_tp_disable, 145}; 146 147int vrpiu_ad_poll_interval = VRPIU_AD_POLL_INTERVAL; 148 149/* 150 * function definitions 151 */ 152static inline void 153vrpiu_write(struct vrpiu_softc *sc, int port, unsigned short val) 154{ 155 156 bus_space_write_2(sc->sc_iot, sc->sc_ioh, port, val); 157} 158 159static inline u_short 160vrpiu_read(struct vrpiu_softc *sc, int port) 161{ 162 163 return (bus_space_read_2(sc->sc_iot, sc->sc_ioh, port)); 164} 165 166static inline u_short 167vrpiu_buf_read(struct vrpiu_softc *sc, int port) 168{ 169 170 return (bus_space_read_2(sc->sc_iot, sc->sc_buf_ioh, port)); 171} 172 173static int 174vrpiumatch(struct device *parent, struct cfdata *cf, void *aux) 175{ 176 177 return (1); 178} 179 180static void 181vrpiuattach(struct device *parent, struct device *self, void *aux) 182{ 183 struct vrpiu_softc *sc = (struct vrpiu_softc *)self; 184 185 sc->sc_ab_paddata_mask = PIUAB_PADDATA_MASK; 186 sc->sc_pb_paddata_mask = PIUPB_PADDATA_MASK; 187 sc->sc_pb_paddata_max = PIUPB_PADDATA_MAX; 188 vrpiu_init(sc, aux); 189} 190 191static void 192vrc4173piuattach(struct device *parent, struct device *self, void *aux) 193{ 194 struct vrpiu_softc *sc = (struct vrpiu_softc *)self; 195 196 sc->sc_ab_paddata_mask = VRC4173PIUAB_PADDATA_MASK; 197 sc->sc_pb_paddata_mask = VRC4173PIUPB_PADDATA_MASK; 198 sc->sc_pb_paddata_max = VRC4173PIUPB_PADDATA_MAX; 199 vrpiu_init(sc, aux); 200} 201 202static void 203vrpiu_init(struct vrpiu_softc *sc, void *aux) 204{ 205 struct vrip_attach_args *va = aux; 206 struct wsmousedev_attach_args wsmaa; 207 int res; 208 bus_space_tag_t iot = va->va_iot; 209 struct platid_data *p; 210 211 if (va->va_parent_ioh != 0) 212 res = bus_space_subregion(iot, va->va_parent_ioh, va->va_addr, 213 va->va_size, &sc->sc_ioh); 214 else 215 res = bus_space_map(iot, va->va_addr, va->va_size, 0, 216 &sc->sc_ioh); 217 if (res != 0) { 218 printf(": can't map bus space\n"); 219 return; 220 } 221 if (va->va_parent_ioh != 0) 222 res = bus_space_subregion(iot, va->va_parent_ioh, va->va_addr2, 223 va->va_size2, &sc->sc_buf_ioh); 224 else 225 res = bus_space_map(iot, va->va_addr2, va->va_size2, 0, 226 &sc->sc_buf_ioh); 227 if (res != 0) { 228 printf(": can't map second bus space\n"); 229 return; 230 } 231 232 sc->sc_iot = iot; 233 sc->sc_unit = va->va_unit; 234 sc->sc_vrip = va->va_vc; 235 236 sc->sc_interval = scan_interval(WSMOUSE_RES_DEFAULT); 237 if ((p = platid_search_data(&platid, hpcbattery_parameters)) == NULL) 238 sc->sc_battery_spec = NULL; 239 else 240 sc->sc_battery_spec = p->data; 241 242 /* 243 * disable device until vrpiu_enable called 244 */ 245 sc->sc_tpstat = VRPIU_TP_STAT_DISABLE; 246 247 /* initialize touch panel timeout structure */ 248 callout_init(&sc->sc_tptimeout); 249 250 /* initialize calibration context */ 251 tpcalib_init(&sc->sc_tpcalib); 252#if 1 253 /* 254 * XXX, calibrate parameters 255 */ 256 { 257 int i; 258 static const struct { 259 platid_mask_t *mask; 260 struct wsmouse_calibcoords coords; 261 } calibrations[] = { 262 { &platid_mask_MACH_NEC_MCR_700, 263 { 0, 0, 799, 599, 264 4, 265 { { 115, 80, 0, 0 }, 266 { 115, 966, 0, 599 }, 267 { 912, 80, 799, 0 }, 268 { 912, 966, 799, 599 } } } }, 269 { &platid_mask_MACH_NEC_MCR_700A, 270 { 0, 0, 799, 599, 271 4, 272 { { 115, 80, 0, 0 }, 273 { 115, 966, 0, 599 }, 274 { 912, 80, 799, 0 }, 275 { 912, 966, 799, 599 } } } }, 276 { &platid_mask_MACH_NEC_MCR_730, 277 { 0, 0, 799, 599, 278 4, 279 { { 115, 80, 0, 0 }, 280 { 115, 966, 0, 599 }, 281 { 912, 80, 799, 0 }, 282 { 912, 966, 799, 599 } } } }, 283 { NULL, /* samples got on my MC-R500 */ 284 { 0, 0, 639, 239, 285 5, 286 { { 502, 486, 320, 120 }, 287 { 55, 109, 0, 0 }, 288 { 54, 913, 0, 239 }, 289 { 973, 924, 639, 239 }, 290 { 975, 123, 639, 0 } } } }, 291 }; 292 for (i = 0; ; i++) { 293 if (calibrations[i].mask == NULL 294 || platid_match(&platid, calibrations[i].mask)) 295 break; 296 } 297 tpcalib_ioctl(&sc->sc_tpcalib, WSMOUSEIO_SCALIBCOORDS, 298 (caddr_t)&calibrations[i].coords, 0, 0); 299 } 300#endif 301 302 /* install interrupt handler and enable interrupt */ 303 if (!(sc->sc_handler = 304 vrip_intr_establish(sc->sc_vrip, sc->sc_unit, 0, IPL_TTY, 305 vrpiu_intr, sc))) { 306 printf (": can't map interrupt line.\n"); 307 return; 308 } 309 310 /* mask level2 interrupt, stop scan sequencer and mask clock to piu */ 311 vrpiu_tp_disable(sc); 312 313 printf("\n"); 314 315 wsmaa.accessops = &vrpiu_accessops; 316 wsmaa.accesscookie = sc; 317 318 /* 319 * attach the wsmouse 320 */ 321 sc->sc_wsmousedev = config_found(&sc->sc_dev, &wsmaa, wsmousedevprint); 322 323 /* 324 * power management events 325 */ 326 sc->sc_power_hook = powerhook_establish(vrpiu_power, sc); 327 328 /* 329 * init A/D port polling. 330 */ 331 sc->sc_battery.n_values = 3; 332 sc->sc_battery.value[0] = -1; 333 sc->sc_battery.value[1] = -1; 334 sc->sc_battery.value[2] = -1; 335 sc->sc_battery.nextpoll = hz*vrpiu_ad_poll_interval; 336 callout_init(&sc->sc_adpoll); 337 callout_reset(&sc->sc_adpoll, hz, vrpiu_start_powerstate, sc); 338} 339 340/* 341 * calculate interval value 342 * input: WSMOUSE_RES_MIN - WSMOUSE_RES_MAX 343 * output: value for PIUSIVL_REG 344 */ 345static u_int 346scan_interval(u_int data) 347{ 348 int scale; 349 350 if (data < WSMOUSE_RES_MIN) 351 data = WSMOUSE_RES_MIN; 352 353 if (WSMOUSE_RES_MAX < data) 354 data = WSMOUSE_RES_MAX; 355 356 scale = WSMOUSE_RES_MAX - WSMOUSE_RES_MIN; 357 data += WSMOUSE_RES_MIN; 358 359 return PIUSIVL_SCANINTVAL_MIN + 360 (PIUSIVL_SCANINTVAL_MAX - PIUSIVL_SCANINTVAL_MIN) * 361 (scale - data) / scale; 362} 363 364int 365vrpiu_ad_enable(void *v) 366{ 367 struct vrpiu_softc *sc = v; 368 int s; 369 unsigned int cnt; 370 371 DPRINTF(("%s(%d): vrpiu_ad_enable(): interval=0x%03x\n", 372 __FILE__, __LINE__, sc->sc_interval)); 373 if (sc->sc_adstat != VRPIU_AD_STAT_DISABLE) 374 return EBUSY; 375 376 /* supply clock to PIU */ 377 vrip_power(sc->sc_vrip, sc->sc_unit, 1); 378 379 /* set scan interval */ 380 vrpiu_write(sc, PIUSIVL_REG_W, sc->sc_interval); 381 382 s = spltty(); 383 384 /* clear interrupt status */ 385 vrpiu_write(sc, PIUINT_REG_W, AD_INTR); 386 387 /* Disable -> Standby */ 388 cnt = PIUCNT_PIUPWR | 389 PIUCNT_PIUMODE_COORDINATE | 390 PIUCNT_PADATSTART | PIUCNT_PADATSTOP; 391 vrpiu_write(sc, PIUCNT_REG_W, cnt); 392 393 /* Level2 interrupt register setting */ 394 vrip_intr_setmask2(sc->sc_vrip, sc->sc_handler, AD_INTR, 1); 395 396 /* save pen status, touch or release */ 397 cnt = vrpiu_read(sc, PIUCNT_REG_W); 398 399 /* 400 * Enable scan sequencer operation 401 * Standby -> WaitPenTouch 402 */ 403 cnt |= PIUCNT_PIUSEQEN; 404 vrpiu_write(sc, PIUCNT_REG_W, cnt); 405 406 sc->sc_adstat = VRPIU_AD_STAT_ENABLE; 407 408 splx(s); 409 410 return 0; 411} 412 413void 414vrpiu_ad_disable(void *v) 415{ 416 struct vrpiu_softc *sc = v; 417 418 DPRINTF(("%s(%d): vrpiu_ad_disable()\n", __FILE__, __LINE__)); 419 420 /* Set level2 interrupt register to mask interrupts */ 421 vrip_intr_setmask2(sc->sc_vrip, sc->sc_handler, AD_INTR, 0); 422 423 sc->sc_adstat = VRPIU_AD_STAT_DISABLE; 424 425 if (sc->sc_tpstat == VRPIU_TP_STAT_DISABLE){ 426 /* Disable scan sequencer operation and power off */ 427 vrpiu_write(sc, PIUCNT_REG_W, 0); 428 429 /* mask clock to PIU */ 430 vrip_power(sc->sc_vrip, sc->sc_unit, 0); 431 } 432} 433 434int 435vrpiu_tp_enable(void *v) 436{ 437 struct vrpiu_softc *sc = v; 438 int s; 439 unsigned int cnt; 440 441 DPRINTF(("%s(%d): vrpiu_tp_enable(): interval=0x%03x\n", 442 __FILE__, __LINE__, sc->sc_interval)); 443 if (sc->sc_tpstat != VRPIU_TP_STAT_DISABLE) 444 return EBUSY; 445 446 /* supply clock to PIU */ 447 vrip_power(sc->sc_vrip, sc->sc_unit, 1); 448 449 /* set scan interval */ 450 vrpiu_write(sc, PIUSIVL_REG_W, sc->sc_interval); 451 452 s = spltty(); 453 454 /* clear interrupt status */ 455 vrpiu_write(sc, PIUINT_REG_W, TP_INTR); 456 457 /* Disable -> Standby */ 458 cnt = PIUCNT_PIUPWR | 459 PIUCNT_PIUMODE_COORDINATE | 460 PIUCNT_PADATSTART | PIUCNT_PADATSTOP; 461 vrpiu_write(sc, PIUCNT_REG_W, cnt); 462 463 /* Level2 interrupt register setting */ 464 vrip_intr_setmask2(sc->sc_vrip, sc->sc_handler, TP_INTR, 1); 465 466 /* save pen status, touch or release */ 467 cnt = vrpiu_read(sc, PIUCNT_REG_W); 468 469 /* 470 * Enable scan sequencer operation 471 * Standby -> WaitPenTouch 472 */ 473 cnt |= PIUCNT_PIUSEQEN; 474 vrpiu_write(sc, PIUCNT_REG_W, cnt); 475 476 /* transit status DISABLE -> TOUCH or RELEASE */ 477 sc->sc_tpstat = (cnt & PIUCNT_PENSTC) ? 478 VRPIU_TP_STAT_TOUCH : VRPIU_TP_STAT_RELEASE; 479 480 splx(s); 481 482 return 0; 483} 484 485void 486vrpiu_tp_disable(void *v) 487{ 488 struct vrpiu_softc *sc = v; 489 490 DPRINTF(("%s(%d): vrpiu_tp_disable()\n", __FILE__, __LINE__)); 491 492 /* Set level2 interrupt register to mask interrupts */ 493 vrip_intr_setmask2(sc->sc_vrip, sc->sc_handler, TP_INTR, 0); 494 495 sc->sc_tpstat = VRPIU_TP_STAT_DISABLE; 496 497 if (sc->sc_adstat == VRPIU_AD_STAT_DISABLE){ 498 /* Disable scan sequencer operation and power off */ 499 vrpiu_write(sc, PIUCNT_REG_W, 0); 500 501 /* mask clock to PIU */ 502 vrip_power(sc->sc_vrip, sc->sc_unit, 0); 503 } 504} 505 506int 507vrpiu_tp_ioctl(void *v, u_long cmd, caddr_t data, int flag, struct proc *p) 508{ 509 struct vrpiu_softc *sc = v; 510 511 DPRINTF(("%s(%d): vrpiu_tp_ioctl(%08lx)\n", __FILE__, __LINE__, cmd)); 512 513 switch (cmd) { 514 case WSMOUSEIO_GTYPE: 515 *(u_int *)data = WSMOUSE_TYPE_TPANEL; 516 break; 517 518 case WSMOUSEIO_SRES: 519 { 520 int tp_enable; 521 int ad_enable; 522 523 tp_enable = (sc->sc_tpstat != VRPIU_TP_STAT_DISABLE); 524 ad_enable = (sc->sc_adstat != VRPIU_AD_STAT_DISABLE); 525 526 if (tp_enable) 527 vrpiu_tp_disable(sc); 528 if (ad_enable) 529 vrpiu_ad_disable(sc); 530 531 sc->sc_interval = scan_interval(*(u_int *)data); 532 DPRINTF(("%s(%d): WSMOUSEIO_SRES: *data=%d, interval=0x%03x\n", 533 __FILE__, __LINE__, *(u_int *)data, sc->sc_interval)); 534 535 if (sc->sc_interval < PIUSIVL_SCANINTVAL_MIN) 536 sc->sc_interval = PIUSIVL_SCANINTVAL_MIN; 537 538 if (PIUSIVL_SCANINTVAL_MAX < sc->sc_interval) 539 sc->sc_interval = PIUSIVL_SCANINTVAL_MAX; 540 541 if (tp_enable) 542 vrpiu_tp_enable(sc); 543 if (ad_enable) 544 vrpiu_ad_enable(sc); 545 } 546 break; 547 548 case WSMOUSEIO_SCALIBCOORDS: 549 case WSMOUSEIO_GCALIBCOORDS: 550 case WSMOUSEIO_GETID: 551 return tpcalib_ioctl(&sc->sc_tpcalib, cmd, data, flag, p); 552 553 default: 554 return (EPASSTHROUGH); 555 } 556 return (0); 557} 558 559/* 560 * PIU AD interrupt handler. 561 */ 562void 563vrpiu_ad_intr(struct vrpiu_softc *sc) 564{ 565 unsigned int i; 566 unsigned int intrstat; 567 568 intrstat = vrpiu_read(sc, PIUINT_REG_W); 569 570 if (sc->sc_adstat == VRPIU_AD_STAT_DISABLE) { 571 /* 572 * the device isn't enabled. just clear interrupt. 573 */ 574 vrpiu_write(sc, PIUINT_REG_W, AD_INTR); 575 return; 576 } 577 578 if (intrstat & PIUINT_PADADPINTR) { 579 sc->sc_battery.value[0] = (unsigned int) 580 vrpiu_buf_read(sc, PIUAB(0)); 581 sc->sc_battery.value[1] = (unsigned int) 582 vrpiu_buf_read(sc, PIUAB(1)); 583 sc->sc_battery.value[2] = (unsigned int) 584 vrpiu_buf_read(sc, PIUAB(2)); 585 } 586 587 if (intrstat & PIUINT_PADADPINTR) { 588 for (i = 0; i < 3; i++) { 589 if (sc->sc_battery.value[i] & PIUAB_VALID) 590 sc->sc_battery.value[i] &= 591 sc->sc_ab_paddata_mask; 592 else 593 sc->sc_battery.value[i] = 0; 594 } 595 vrpiu_calc_powerstate(sc); 596 } 597 vrpiu_write(sc, PIUINT_REG_W, AD_INTR); 598 599 return; 600} 601/* 602 * PIU TP interrupt handler. 603 */ 604void 605vrpiu_tp_intr(struct vrpiu_softc *sc) 606{ 607 unsigned int cnt, i; 608 unsigned int intrstat, page; 609 int tpx0, tpx1, tpy0, tpy1; 610 int x, y, xraw, yraw; 611 612 intrstat = vrpiu_read(sc, PIUINT_REG_W); 613 614 if (sc->sc_tpstat == VRPIU_TP_STAT_DISABLE) { 615 /* 616 * the device isn't enabled. just clear interrupt. 617 */ 618 vrpiu_write(sc, PIUINT_REG_W, intrstat & TP_INTR); 619 return; 620 } 621 622 page = (intrstat & PIUINT_OVP) ? 1 : 0; 623 if (intrstat & (PIUINT_PADPAGE0INTR | PIUINT_PADPAGE1INTR)) { 624 tpx0 = vrpiu_buf_read(sc, PIUPB(page, 0)); 625 tpx1 = vrpiu_buf_read(sc, PIUPB(page, 1)); 626 tpy0 = vrpiu_buf_read(sc, PIUPB(page, 2)); 627 tpy1 = vrpiu_buf_read(sc, PIUPB(page, 3)); 628 } 629 630 if (intrstat & PIUINT_PADDLOSTINTR) { 631 page = page ? 0 : 1; 632 for (i = 0; i < 4; i++) 633 vrpiu_buf_read(sc, PIUPB(page, i)); 634 } 635 636 cnt = vrpiu_read(sc, PIUCNT_REG_W); 637#ifdef DEBUG 638 if (vrpiu_debug) 639 vrpiu_dump_cntreg(cnt); 640#endif 641 642 /* clear interrupt status */ 643 vrpiu_write(sc, PIUINT_REG_W, intrstat & TP_INTR); 644 645#if 0 646 DPRINTF(("vrpiu_intr: OVP=%d", page)); 647 if (intrstat & PIUINT_PADCMDINTR) 648 DPRINTF((" CMD")); 649 if (intrstat & PIUINT_PADADPINTR) 650 DPRINTF((" A/D")); 651 if (intrstat & PIUINT_PADPAGE1INTR) 652 DPRINTF((" PAGE1")); 653 if (intrstat & PIUINT_PADPAGE0INTR) 654 DPRINTF((" PAGE0")); 655 if (intrstat & PIUINT_PADDLOSTINTR) 656 DPRINTF((" DLOST")); 657 if (intrstat & PIUINT_PENCHGINTR) 658 DPRINTF((" PENCHG")); 659 DPRINTF(("\n")); 660#endif 661 if (intrstat & (PIUINT_PADPAGE0INTR | PIUINT_PADPAGE1INTR)) { 662 /* 663 * just ignore scan data if status isn't Touch. 664 */ 665 if (sc->sc_tpstat == VRPIU_TP_STAT_TOUCH) { 666 /* reset tp scan timeout */ 667 callout_reset(&sc->sc_tptimeout, VRPIU_TP_SCAN_TIMEOUT, 668 vrpiu_tp_timeout, sc); 669 670 if (!((tpx0 & PIUPB_VALID) && (tpx1 & PIUPB_VALID) && 671 (tpy0 & PIUPB_VALID) && (tpy1 & PIUPB_VALID))) { 672 printf("vrpiu: internal error," 673 " data is not valid!\n"); 674 } else { 675 tpx0 &= sc->sc_pb_paddata_mask; 676 tpx1 &= sc->sc_pb_paddata_mask; 677 tpy0 &= sc->sc_pb_paddata_mask; 678 tpy1 &= sc->sc_pb_paddata_mask; 679#define ISVALID(n, c) ((c) - (c)/5 < (n) && (n) < (c) + (c)/5) 680 if (ISVALID(tpx0 + tpx1, sc->sc_pb_paddata_max) && 681 ISVALID(tpy0 + tpy1, sc->sc_pb_paddata_max)) { 682#if 0 683 DPRINTF(("%04x %04x %04x %04x\n", 684 tpx0, tpx1, tpy0, tpy1)); 685 DPRINTF(("%3d %3d (%4d %4d)->", tpx0, 686 tpy0, tpx0 + tpx1, tpy0 + tpy1)); 687#endif 688 xraw = tpy1 * sc->sc_pb_paddata_max / (tpy0 + tpy1); 689 yraw = tpx1 * sc->sc_pb_paddata_max / (tpx0 + tpx1); 690 DPRINTF(("%3d %3d", xraw, yraw)); 691 692 tpcalib_trans(&sc->sc_tpcalib, xraw, 693 yraw, &x, &y); 694 695 DPRINTF(("->%4d %4d", x, y)); 696 wsmouse_input(sc->sc_wsmousedev, 697 1, /* button 0 down */ 698 x, /* x */ 699 y, /* y */ 700 0, /* z */ 701 WSMOUSE_INPUT_ABSOLUTE_X | 702 WSMOUSE_INPUT_ABSOLUTE_Y); 703 DPRINTF(("\n")); 704 } 705 } 706 } 707 } 708 709 if (cnt & PIUCNT_PENSTC) { 710 if (sc->sc_tpstat == VRPIU_TP_STAT_RELEASE) { 711 /* 712 * pen touch 713 */ 714 DPRINTF(("PEN TOUCH\n")); 715 sc->sc_tpstat = VRPIU_TP_STAT_TOUCH; 716 /* 717 * We should not report button down event while 718 * we don't know where it occur. 719 */ 720 721 /* set tp scan timeout */ 722 callout_reset(&sc->sc_tptimeout, VRPIU_TP_SCAN_TIMEOUT, 723 vrpiu_tp_timeout, sc); 724 } 725 } else { 726 vrpiu_tp_up(sc); 727 } 728 729 if (intrstat & PIUINT_PADDLOSTINTR) { 730 cnt |= PIUCNT_PIUSEQEN; 731 vrpiu_write(sc, PIUCNT_REG_W, cnt); 732 } 733 734 return; 735} 736 737void 738vrpiu_tp_up(struct vrpiu_softc *sc) 739{ 740 if (sc->sc_tpstat == VRPIU_TP_STAT_TOUCH) { 741 /* 742 * pen release 743 */ 744 DPRINTF(("RELEASE\n")); 745 sc->sc_tpstat = VRPIU_TP_STAT_RELEASE; 746 747 /* clear tp scan timeout */ 748 callout_stop(&sc->sc_tptimeout); 749 750 /* button 0 UP */ 751 wsmouse_input(sc->sc_wsmousedev, 0, 0, 0, 0, 0); 752 } 753} 754 755/* touch panel timeout handler */ 756void 757vrpiu_tp_timeout(void *v) 758{ 759 struct vrpiu_softc *sc = (struct vrpiu_softc *)v; 760 761#ifdef VRPIUDEBUG 762 { 763 unsigned int cnt = vrpiu_read(sc, PIUCNT_REG_W); 764 DPRINTF(("TIMEOUT: stat=%s reg=%s\n", 765 (sc->sc_tpstat == VRPIU_TP_STAT_TOUCH)?"touch":"release", 766 (cnt & PIUCNT_PENSTC)?"touch":"release")); 767 } 768#endif 769 vrpiu_tp_up(sc); 770} 771 772/* 773 * PIU interrupt handler. 774 */ 775int 776vrpiu_intr(void *arg) 777{ 778 struct vrpiu_softc *sc = arg; 779 780 vrpiu_ad_intr(sc); 781 vrpiu_tp_intr(sc); 782 783 return 0; 784} 785 786void 787vrpiu_start_powerstate(void *v) 788{ 789 int mask; 790 struct vrpiu_softc *sc = (struct vrpiu_softc *)v; 791 792 vrpiu_ad_enable(sc); 793 mask = vrpiu_read(sc, PIUAMSK_REG_W); 794 mask &= 0xff8f; /* XXX */ 795 vrpiu_write(sc, PIUAMSK_REG_W, mask); 796 vrpiu_write(sc, PIUASCN_REG_W, PIUACN_ADPSSTART); 797 /* 798 * restart next A/D polling 799 */ 800 callout_reset(&sc->sc_adpoll, hz*vrpiu_ad_poll_interval, 801 vrpiu_start_powerstate, sc); 802} 803 804void 805vrpiu_calc_powerstate(struct vrpiu_softc *sc) 806{ 807 extern void vrgiu_diff_io(void); 808 vrpiu_ad_disable(sc); 809 VPRINTF(("vrpiu:AD: %d, %d, %d\n", 810 sc->sc_battery.value[0], 811 sc->sc_battery.value[1], 812 sc->sc_battery.value[2])); 813 sc->sc_battery.nextpoll = hz*vrpiu_ad_poll_interval; 814 vrpiu_send_battery_event(sc); 815 /* 816 * restart next A/D polling if change polling timming. 817 */ 818 if (sc->sc_battery.nextpoll != hz*vrpiu_ad_poll_interval) 819 callout_reset(&sc->sc_adpoll, sc->sc_battery.nextpoll, 820 vrpiu_start_powerstate, sc); 821 if (bootverbose) 822 vrgiu_diff_io(); 823 824} 825 826static void 827vrpiu_power(int why, void *arg) 828{ 829 struct vrpiu_softc *sc = arg; 830 831 switch (why) { 832 case PWR_STANDBY: 833 case PWR_SUSPEND: 834 break; 835 case PWR_RESUME: 836 callout_reset(&sc->sc_adpoll, hz, 837 vrpiu_start_powerstate, sc); 838 break; 839 } 840} 841 842static void 843vrpiu_send_battery_event(struct vrpiu_softc *sc) 844{ 845#ifdef VRPIU_ADHOC_BATTERY_EVENT 846 static int batteryhigh = 0; 847 static int batterylow = 0; 848 static int critical = 0; 849 850 if (sc->sc_battery_spec == NULL 851 || sc->sc_battery_spec->main_port == -1) 852 return; 853 854 if (sc->sc_battery.value[sc->sc_battery_spec->main_port] 855 <= sc->sc_battery_spec->dc_critical) { 856 batteryhigh = 0; 857 config_hook_call(CONFIG_HOOK_PMEVENT, 858 CONFIG_HOOK_PMEVENT_BATTERY, 859 (void *)CONFIG_HOOK_BATT_CRITICAL); 860 batterylow = 3; 861 if (critical) { 862 config_hook_call(CONFIG_HOOK_PMEVENT, 863 CONFIG_HOOK_PMEVENT_SUSPENDREQ, 864 (void *)0); 865 critical = 0; 866 batterylow = 0; 867 } 868 critical++; 869 } else if (sc->sc_battery.value[sc->sc_battery_spec->main_port] 870 <= sc->sc_battery_spec->dc_20p) { 871 batteryhigh = 0; 872 if (batterylow == 1) 873 config_hook_call(CONFIG_HOOK_PMEVENT, 874 CONFIG_HOOK_PMEVENT_BATTERY, 875 (void *)CONFIG_HOOK_BATT_20P); 876 config_hook_call(CONFIG_HOOK_PMEVENT, 877 CONFIG_HOOK_PMEVENT_BATTERY, 878 (void *)CONFIG_HOOK_BATT_LOW); 879 batterylow = 2; 880 } else if (sc->sc_battery.value[sc->sc_battery_spec->main_port] 881 <= sc->sc_battery_spec->dc_50p) { 882 batteryhigh = 0; 883 if (batterylow == 0) { 884 batterylow = 1; 885 config_hook_call(CONFIG_HOOK_PMEVENT, 886 CONFIG_HOOK_PMEVENT_BATTERY, 887 (void *)CONFIG_HOOK_BATT_50P); 888 } 889 } else if (sc->sc_battery.value[sc->sc_battery_spec->main_port] 890 >= sc->sc_battery_spec->ac_80p) { 891 batterylow = 0; 892 if (batteryhigh == 0) { 893 batteryhigh = 1; 894 config_hook_call(CONFIG_HOOK_PMEVENT, 895 CONFIG_HOOK_PMEVENT_BATTERY, 896 (void *)CONFIG_HOOK_BATT_80P); 897 config_hook_call(CONFIG_HOOK_PMEVENT, 898 CONFIG_HOOK_PMEVENT_BATTERY, 899 (void *)CONFIG_HOOK_BATT_HIGH); 900 } 901 } 902#else /* VRPIU_ADHOC_BATTERY_EVENT */ 903 config_hook_call(CONFIG_HOOK_SET, 904 CONFIG_HOOK_BATTERYVAL, 905 (void *)&sc->sc_battery); 906#endif /* VRPIU_ADHOC_BATTERY_EVENT */ 907} 908 909#ifdef DEBUG 910void 911vrpiu_dump_cntreg(unsigned int cnt) 912{ 913 printf("%s", (cnt & PIUCNT_PENSTC) ? "Touch" : "Release"); 914 printf(" state="); 915 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_CmdScan) 916 printf("CmdScan"); 917 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_IntervalNextScan) 918 printf("IntervalNextScan"); 919 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_PenDataScan) 920 printf("PenDataScan"); 921 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_WaitPenTouch) 922 printf("WaitPenTouch"); 923 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_RFU) 924 printf("???"); 925 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_ADPortScan) 926 printf("ADPortScan"); 927 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_Standby) 928 printf("Standby"); 929 if ((cnt & PIUCNT_PADSTATE_MASK) == PIUCNT_PADSTATE_Disable) 930 printf("Disable"); 931 if (cnt & PIUCNT_PADATSTOP) 932 printf(" AutoStop"); 933 if (cnt & PIUCNT_PADATSTART) 934 printf(" AutoStart"); 935 if (cnt & PIUCNT_PADSCANSTOP) 936 printf(" Stop"); 937 if (cnt & PIUCNT_PADSCANSTART) 938 printf(" Start"); 939 if (cnt & PIUCNT_PADSCANTYPE) 940 printf(" ScanPressure"); 941 if ((cnt & PIUCNT_PIUMODE_MASK) == PIUCNT_PIUMODE_ADCONVERTER) 942 printf(" A/D"); 943 if ((cnt & PIUCNT_PIUMODE_MASK) == PIUCNT_PIUMODE_COORDINATE) 944 printf(" Coordinate"); 945 if (cnt & PIUCNT_PIUSEQEN) 946 printf(" SeqEn"); 947 if ((cnt & PIUCNT_PIUPWR) == 0) 948 printf(" PowerOff"); 949 if ((cnt & PIUCNT_PADRST) == 0) 950 printf(" Reset"); 951 printf("\n"); 952} 953#endif 954