Home | History | Annotate | Line # | Download | only in dev
wzero3_tp.c revision 1.4
      1 /*	$NetBSD: wzero3_tp.c,v 1.4 2010/05/22 15:37:58 nonaka Exp $	*/
      2 
      3 /*
      4  * Copyright (c) 2010 NONAKA Kimihiro <nonaka (at) netbsd.org>
      5  * All rights reserved.
      6  *
      7  * Redistribution and use in source and binary forms, with or without
      8  * modification, are permitted provided that the following conditions
      9  * are met:
     10  * 1. Redistributions of source code must retain the above copyright
     11  *    notice, this list of conditions and the following disclaimer.
     12  * 2. Redistributions in binary form must reproduce the above copyright
     13  *    notice, this list of conditions and the following disclaimer in the
     14  *    documentation and/or other materials provided with the distribution.
     15  *
     16  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
     17  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
     18  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
     19  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
     20  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
     21  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
     22  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
     23  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
     24  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
     25  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
     26  * SUCH DAMAGE.
     27  */
     28 
     29 #include <sys/cdefs.h>
     30 __KERNEL_RCSID(0, "$NetBSD: wzero3_tp.c,v 1.4 2010/05/22 15:37:58 nonaka Exp $");
     31 
     32 #include <sys/types.h>
     33 #include <sys/param.h>
     34 #include <sys/systm.h>
     35 #include <sys/device.h>
     36 #include <sys/malloc.h>
     37 #include <sys/kernel.h>
     38 #include <sys/callout.h>
     39 
     40 #include <machine/bootinfo.h>
     41 #include <machine/platid.h>
     42 #include <machine/platid_mask.h>
     43 
     44 #include <dev/wscons/wsconsio.h>
     45 #include <dev/wscons/wsmousevar.h>
     46 #include <dev/wscons/wsdisplayvar.h>
     47 
     48 #include <dev/hpc/hpcfbio.h>
     49 #include <dev/hpc/hpctpanelvar.h>
     50 
     51 #include <arm/xscale/pxa2x0cpu.h>
     52 #include <arm/xscale/pxa2x0reg.h>
     53 #include <arm/xscale/pxa2x0var.h>
     54 #include <arm/xscale/xscalereg.h>
     55 #include <arm/xscale/pxa2x0_lcd.h>
     56 #include <arm/xscale/pxa2x0_gpio.h>
     57 
     58 #include <hpcarm/dev/wzero3_reg.h>
     59 #include <hpcarm/dev/wzero3_sspvar.h>
     60 
     61 #ifdef WZERO3TP_DEBUG
     62 #define	DPRINTF(s)	printf s
     63 #else
     64 #define	DPRINTF(s)
     65 #endif
     66 
     67 #define POLL_TIMEOUT_RATE0	((hz * 150) / 1000)
     68 #define POLL_TIMEOUT_RATE1	((hz + 99) / 100) /* XXX every tick */
     69 
     70 /* Settable via sysctl. */
     71 int wzero3tp_rawmode;
     72 
     73 static const struct wsmouse_calibcoords ws003sh_default_calib = {
     74 	0, 0, 479, 639,				/* minx, miny, maxx, maxy */
     75 	5,					/* samplelen */
     76 	{
     77 		{ 2028, 2004, 240, 320 },	/* rawx, rawy, x, y */
     78 		{ 3312,  705,  48,  64 },
     79 		{ 3316, 3371,  48, 576 },
     80 		{  739, 3392, 432, 576 },
     81 		{  749,  673, 432,  64 },
     82 	}
     83 };
     84 
     85 static const struct wsmouse_calibcoords ws007sh_default_calib = {
     86 	0, 0, 479, 639,				/* minx, miny, maxx, maxy */
     87 	5,					/* samplelen */
     88 	{
     89 		{ 2050, 2024, 240, 320 },	/* rawx, rawy, x, y */
     90 		{  578, 3471,  48,  64 },
     91 		{  578,  582,  48, 576 },
     92 		{ 3432,  582, 432, 576 },
     93 		{ 3432, 3471, 432,  64 },
     94 	}
     95 };
     96 
     97 static const struct wsmouse_calibcoords ws011sh_default_calib = {
     98 	0, 0, 479, 799,				/* minx, miny, maxx, maxy */
     99 	5,					/* samplelen */
    100 	{
    101 		{ 2126, 2048, 240, 400 },	/* rawx, rawy, x, y */
    102 		{  527, 3464,  48,  80 },
    103 		{ 3628, 3376,  48, 720 },
    104 		{ 3351,  595, 432, 720 },
    105 		{  554,  562, 432,  80 },
    106 	}
    107 };
    108 
    109 struct wzero3tp_pos {
    110 	int x;
    111 	int y;
    112 	int z;			/* touch pressure */
    113 };
    114 
    115 struct wzero3tp_model;
    116 struct wzero3tp_softc {
    117 	device_t sc_dev;
    118 	const struct wzero3tp_model *sc_model;
    119 	void *sc_gh;
    120 	struct callout sc_tp_poll;
    121 	int sc_enabled;
    122 	int sc_buttons; /* button emulation ? */
    123 	struct device *sc_wsmousedev;
    124 	struct wzero3tp_pos sc_oldpos;
    125 	struct tpcalib_softc sc_tpcalib;
    126 };
    127 
    128 static void nulldrv_init(void);
    129 static int nulldrv_readpos(struct wzero3tp_pos *);
    130 static void nulldrv_suspend(void);
    131 static void nulldrv_resume(void);
    132 
    133 static void ws007sh_wait_for_hsync(void);
    134 
    135 void max1233_init(void);
    136 int max1233_readpos(struct wzero3tp_pos *);
    137 void max1233_suspend(void);
    138 void max1233_resume(void);
    139 
    140 void ads7846_init(void);
    141 int ads7846_readpos(struct wzero3tp_pos *);
    142 void ads7846_suspend(void);
    143 void ads7846_resume(void);
    144 extern void (*ads7846_wait_for_hsync)(void);
    145 
    146 void ak4184_init(void);
    147 int ak4184_readpos(struct wzero3tp_pos *);
    148 void ak4184_suspend(void);
    149 void ak4184_resume(void);
    150 
    151 static int	wzero3tp_match(device_t, cfdata_t, void *);
    152 static void	wzero3tp_attach(device_t, device_t, void *);
    153 
    154 CFATTACH_DECL_NEW(wzero3tp, sizeof(struct wzero3tp_softc),
    155 	wzero3tp_match, wzero3tp_attach, NULL, NULL);
    156 
    157 static int	wzero3tp_enable(void *);
    158 static void	wzero3tp_disable(void *);
    159 static bool	wzero3tp_suspend(device_t dv, const pmf_qual_t *);
    160 static bool	wzero3tp_resume(device_t dv, const pmf_qual_t *);
    161 static void	wzero3tp_poll(void *);
    162 static int	wzero3tp_irq(void *);
    163 static int	wzero3tp_ioctl(void *, u_long, void *, int, struct lwp *);
    164 
    165 static const struct wsmouse_accessops wzero3tp_accessops = {
    166         wzero3tp_enable,
    167 	wzero3tp_ioctl,
    168 	wzero3tp_disable
    169 };
    170 
    171 struct wzero3tp_model {
    172 	platid_mask_t *platid;
    173 	const char *name;
    174 	int intr_pin;
    175 	const struct wsmouse_calibcoords *calib;
    176 	void (*wait_for_hsync)(void);
    177 	struct chip {
    178 		void (*init)(void);
    179 		int (*readpos)(struct wzero3tp_pos *);
    180 		void (*suspend)(void);
    181 		void (*resume)(void);
    182 	} chip;
    183 } wzero3tp_table[] = {
    184 	/* WS003SH */
    185 	{
    186 		&platid_mask_MACH_SHARP_WZERO3_WS003SH,
    187 		"WS003SH",
    188 		GPIO_WS003SH_TOUCH_PANEL,
    189 		&ws003sh_default_calib,
    190 		NULL,
    191 		{ max1233_init, max1233_readpos,
    192 		  max1233_suspend, max1233_resume, },
    193 	},
    194 	/* WS004SH */
    195 	{
    196 		&platid_mask_MACH_SHARP_WZERO3_WS004SH,
    197 		"WS004SH",
    198 		GPIO_WS003SH_TOUCH_PANEL,
    199 		&ws003sh_default_calib,
    200 		NULL,
    201 		{ max1233_init, max1233_readpos,
    202 		  max1233_suspend, max1233_resume, },
    203 	},
    204 	/* WS007SH */
    205 	{
    206 		&platid_mask_MACH_SHARP_WZERO3_WS007SH,
    207 		"WS007SH",
    208 		GPIO_WS007SH_TOUCH_PANEL,
    209 		&ws007sh_default_calib,
    210 		ws007sh_wait_for_hsync,
    211 		{ ads7846_init, ads7846_readpos,
    212 		  ads7846_suspend, ads7846_resume, },
    213 	},
    214 	/* WS011SH */
    215 	{
    216 		&platid_mask_MACH_SHARP_WZERO3_WS011SH,
    217 		"WS011SH",
    218 		GPIO_WS011SH_TOUCH_PANEL,
    219 		&ws011sh_default_calib,
    220 		NULL,
    221 		{ ak4184_init, ak4184_readpos,
    222 		  ak4184_suspend, ak4184_resume, },
    223 	},
    224 #if 0
    225 	/* WS0020H */
    226 	{
    227 		&platid_mask_MACH_SHARP_WZERO3_WS020SH,
    228 		"WS020SH",
    229 		-1,
    230 		NULL,
    231 		NULL,
    232 		{ nulldrv_init, nulldrv_readpos,
    233 		  nulldrv_suspend, nulldrv_resume, },
    234 	},
    235 #endif
    236 	{
    237 		NULL, NULL, -1, NULL, NULL,
    238 		{ nulldrv_init, nulldrv_readpos,
    239 		  nulldrv_suspend, nulldrv_resume, },
    240 	},
    241 };
    242 
    243 static const struct wzero3tp_model *
    244 wzero3tp_lookup(void)
    245 {
    246 	const struct wzero3tp_model *model;
    247 
    248 	for (model = wzero3tp_table; model->platid != NULL; model++) {
    249 		if (platid_match(&platid, model->platid)) {
    250 			return model;
    251 		}
    252 	}
    253 	return NULL;
    254 }
    255 
    256 static int
    257 wzero3tp_match(device_t parent, cfdata_t cf, void *aux)
    258 {
    259 
    260 	if (strcmp(cf->cf_name, "wzero3tp") != 0)
    261 		return 0;
    262 	if (wzero3tp_lookup() == NULL)
    263 		return 0;
    264 	return 1;
    265 }
    266 
    267 static void
    268 wzero3tp_attach(device_t parent, device_t self, void *aux)
    269 {
    270 	struct wzero3tp_softc *sc = device_private(self);
    271 	struct wsmousedev_attach_args a;
    272 
    273 	sc->sc_dev = self;
    274 
    275 	aprint_normal(": touch panel\n");
    276 	aprint_naive("\n");
    277 
    278 	sc->sc_model = wzero3tp_lookup();
    279 	if (sc->sc_model == NULL) {
    280 		aprint_error_dev(self, "unknown model\n");
    281 		return;
    282 	}
    283 
    284 	callout_init(&sc->sc_tp_poll, 0);
    285 	callout_setfunc(&sc->sc_tp_poll, wzero3tp_poll, sc);
    286 
    287 	if (sc->sc_model->wait_for_hsync)
    288 		ads7846_wait_for_hsync = sc->sc_model->wait_for_hsync;
    289 
    290 	(*sc->sc_model->chip.init)();
    291 
    292 	a.accessops = &wzero3tp_accessops;
    293 	a.accesscookie = sc;
    294 
    295 	sc->sc_wsmousedev = config_found(self, &a, wsmousedevprint);
    296 
    297 	/* Initialize calibration, set default parameters. */
    298 	tpcalib_init(&sc->sc_tpcalib);
    299 	if (sc->sc_model->calib) {
    300 		tpcalib_ioctl(&sc->sc_tpcalib, WSMOUSEIO_SCALIBCOORDS,
    301 		    __UNCONST(sc->sc_model->calib), 0, 0);
    302 	}
    303 }
    304 
    305 static int
    306 wzero3tp_enable(void *v)
    307 {
    308 	struct wzero3tp_softc *sc = (struct wzero3tp_softc *)v;
    309 
    310 	DPRINTF(("%s: %s\n", device_xname(sc->sc_dev), __func__));
    311 
    312 	if (sc->sc_enabled) {
    313 		DPRINTF(("%s: already enabled\n", device_xname(sc->sc_dev)));
    314 		return EBUSY;
    315 	}
    316 
    317 	callout_stop(&sc->sc_tp_poll);
    318 
    319 	if (!pmf_device_register(sc->sc_dev, wzero3tp_suspend, wzero3tp_resume))
    320 		aprint_error_dev(sc->sc_dev,
    321 		    "couldn't establish power handler\n");
    322 
    323 	pxa2x0_gpio_set_function(sc->sc_model->intr_pin, GPIO_IN);
    324 
    325 	/* XXX */
    326 	if (sc->sc_gh == NULL) {
    327 		sc->sc_gh = pxa2x0_gpio_intr_establish(
    328 		    sc->sc_model->intr_pin, IST_EDGE_FALLING, IPL_TTY,
    329 		    wzero3tp_irq, sc);
    330 	} else {
    331 		pxa2x0_gpio_intr_unmask(sc->sc_gh);
    332 	}
    333 
    334 	/* enable interrupts */
    335 	sc->sc_enabled = 1;
    336 	sc->sc_buttons = 0;
    337 
    338 	return 0;
    339 }
    340 
    341 static void
    342 wzero3tp_disable(void *v)
    343 {
    344 	struct wzero3tp_softc *sc = (struct wzero3tp_softc *)v;
    345 
    346 	DPRINTF(("%s: %s\n", device_xname(sc->sc_dev), __func__));
    347 
    348 	callout_stop(&sc->sc_tp_poll);
    349 
    350 	pmf_device_deregister(sc->sc_dev);
    351 
    352 	pxa2x0_gpio_intr_mask(sc->sc_gh);
    353 
    354 	/* disable interrupts */
    355 	sc->sc_enabled = 0;
    356 }
    357 
    358 static bool
    359 wzero3tp_suspend(device_t dv, const pmf_qual_t *qual)
    360 {
    361 	struct wzero3tp_softc *sc = device_private(dv);
    362 
    363 	DPRINTF(("%s: %s\n", device_xname(sc->sc_dev), __func__));
    364 
    365 	sc->sc_enabled = 0;
    366 	pxa2x0_gpio_intr_mask(sc->sc_gh);
    367 
    368 	callout_stop(&sc->sc_tp_poll);
    369 
    370 	(*sc->sc_model->chip.suspend)();
    371 
    372 	pxa2x0_gpio_set_function(sc->sc_model->intr_pin, GPIO_OUT|GPIO_SET);
    373 
    374 	return true;
    375 }
    376 
    377 static bool
    378 wzero3tp_resume(device_t dv, const pmf_qual_t *qual)
    379 {
    380 	struct wzero3tp_softc *sc = device_private(dv);
    381 
    382 	DPRINTF(("%s: %s\n", device_xname(sc->sc_dev), __func__));
    383 
    384 	pxa2x0_gpio_set_function(sc->sc_model->intr_pin, GPIO_IN);
    385 	pxa2x0_gpio_intr_mask(sc->sc_gh);
    386 
    387 	(*sc->sc_model->chip.resume)();
    388 
    389 	pxa2x0_gpio_intr_unmask(sc->sc_gh);
    390 	sc->sc_enabled = 1;
    391 
    392 	return true;
    393 }
    394 
    395 static void
    396 wzero3tp_poll(void *v)
    397 {
    398 	int s;
    399 
    400 	s = spltty();
    401 	(void)wzero3tp_irq(v);
    402 	splx(s);
    403 }
    404 
    405 static int
    406 wzero3tp_irq(void *v)
    407 {
    408 	struct wzero3tp_softc *sc = (struct wzero3tp_softc *)v;
    409 	struct wzero3tp_pos tp = { 0, 0, 0 };
    410 	int pindown;
    411 	int down;
    412 	int x, y;
    413 	int s;
    414 
    415 	if (!sc->sc_enabled)
    416 		return 0;
    417 
    418 	s = splhigh();
    419 
    420 	pindown = pxa2x0_gpio_get_bit(sc->sc_model->intr_pin) ? 0 : 1;
    421 	DPRINTF(("%s: pindown = %d\n", device_xname(sc->sc_dev), pindown));
    422 	if (pindown) {
    423 		pxa2x0_gpio_intr_mask(sc->sc_gh);
    424 		callout_schedule(&sc->sc_tp_poll, POLL_TIMEOUT_RATE1);
    425 	}
    426 
    427 	down = (*sc->sc_model->chip.readpos)(&tp);
    428 	DPRINTF(("%s: x = %d, y = %d, z = %d, down = %d\n",
    429 	    device_xname(sc->sc_dev), tp.x, tp.y, tp.z, down));
    430 
    431 	if (!pindown) {
    432 		pxa2x0_gpio_intr_unmask(sc->sc_gh);
    433 		callout_schedule(&sc->sc_tp_poll, POLL_TIMEOUT_RATE0);
    434 	}
    435 	pxa2x0_gpio_clear_intr(sc->sc_model->intr_pin);
    436 
    437 	splx(s);
    438 
    439 	if (down) {
    440 		if (!wzero3tp_rawmode) {
    441 			tpcalib_trans(&sc->sc_tpcalib, tp.x, tp.y, &x, &y);
    442 			DPRINTF(("%s: x = %d, y = %d\n",
    443 			    device_xname(sc->sc_dev), x, y));
    444 			tp.x = x;
    445 			tp.y = y;
    446 		}
    447 	}
    448 
    449 	if (!down) {
    450 		/* x/y values are not reliable when pen is up */
    451 		tp = sc->sc_oldpos;
    452 	}
    453 
    454 	if (down || sc->sc_buttons != down) {
    455 		wsmouse_input(sc->sc_wsmousedev, down, tp.x, tp.y, 0, 0,
    456 		    WSMOUSE_INPUT_ABSOLUTE_X | WSMOUSE_INPUT_ABSOLUTE_Y);
    457 		sc->sc_buttons = down;
    458 		sc->sc_oldpos = tp;
    459 	}
    460 
    461 	return 1;
    462 }
    463 
    464 static int
    465 wzero3tp_ioctl(void *v, u_long cmd, void *data, int flag, struct lwp *l)
    466 {
    467 	struct wzero3tp_softc *sc = (struct wzero3tp_softc *)v;
    468 	struct wsmouse_id *id;
    469 
    470 	switch (cmd) {
    471 	case WSMOUSEIO_GTYPE:
    472 		*(u_int *)data = WSMOUSE_TYPE_TPANEL;
    473 		return 0;
    474 
    475 	case WSMOUSEIO_GETID:
    476 		/*
    477 		 * return unique ID string,
    478 		 * "<vendor> <model> <serial number>"
    479 		 */
    480 		id = (struct wsmouse_id *)data;
    481 		if (id->type != WSMOUSE_ID_TYPE_UIDSTR)
    482 			return EINVAL;
    483 		snprintf(id->data, WSMOUSE_ID_MAXLEN, "Sharp %s SN000000",
    484 		    sc->sc_model->name);
    485 		id->length = strlen(id->data);
    486 		return 0;
    487 
    488 	case WSMOUSEIO_SCALIBCOORDS:
    489 	case WSMOUSEIO_GCALIBCOORDS:
    490 		return tpcalib_ioctl(&sc->sc_tpcalib, cmd, data, flag, l);
    491 	}
    492 
    493 	return EPASSTHROUGH;
    494 }
    495 
    496 /*----------------------------------------------------------------------------
    497  * null driver
    498  */
    499 static void
    500 nulldrv_init(void)
    501 {
    502 
    503 	/* Nothing to do */
    504 }
    505 
    506 static int
    507 nulldrv_readpos(struct wzero3tp_pos *pos)
    508 {
    509 
    510 	pos->x = 0;
    511 	pos->y = 0;
    512 	pos->z = 0;
    513 
    514 	return 0;
    515 }
    516 
    517 static void
    518 nulldrv_suspend(void)
    519 {
    520 
    521 	/* Nothing to do */
    522 }
    523 
    524 static void
    525 nulldrv_resume(void)
    526 {
    527 
    528 	/* Nothing to do */
    529 }
    530 
    531 /*----------------------------------------------------------------------------
    532  * model specific functions
    533  */
    534 static void
    535 ws007sh_wait_for_hsync(void)
    536 {
    537 
    538 	while (pxa2x0_gpio_get_bit(GPIO_WS007SH_HSYNC) == 0)
    539 		continue;
    540 	while (pxa2x0_gpio_get_bit(GPIO_WS007SH_HSYNC) != 0)
    541 		continue;
    542 }
    543 
    544 /*----------------------------------------------------------------------------
    545  * MAX1233 touch screen controller for WS003SH/WS004SH
    546  */
    547 #define	MAXCTRL_ADDR_SH		0	/* Address bit[5:0] */
    548 #define	MAXCTRL_PAGE_SH		6	/* Page bit (0:Data/1:Control) */
    549 #define	MAXCTRL_RW_SH		15	/* R/W bit (0:Write/1:Read) */
    550 
    551 /* VREF=2.5V, sets interrupt initiated touch-screen scans
    552  * 3.5us/sample, 4 data ave., settling time: 100us */
    553 #define	MAX1233_ADCCTRL		0x8b43
    554 
    555 void
    556 max1233_init(void)
    557 {
    558 
    559 	/* Enable automatic low power mode. */
    560 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    561 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    562 	    0x0001);
    563 	/* Wait for touch */
    564 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    565 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    566 	    MAX1233_ADCCTRL);
    567 }
    568 
    569 void
    570 max1233_suspend(void)
    571 {
    572 
    573 	/* power down. */
    574 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    575 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    576 	    0xc000);
    577 	/* DAC off */
    578 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    579 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (2<<MAXCTRL_ADDR_SH),
    580 	    0x8000);
    581 }
    582 
    583 void
    584 max1233_resume(void)
    585 {
    586 
    587 	/* Enable automatic low power mode. */
    588 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    589 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    590 	    0x0001);
    591 	/* Wait for touch */
    592 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    593 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    594 	    MAX1233_ADCCTRL);
    595 	/* DAC on */
    596 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    597 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (2<<MAXCTRL_ADDR_SH),
    598 	    0x0000);
    599 }
    600 
    601 int
    602 max1233_readpos(struct wzero3tp_pos *pos)
    603 {
    604 	uint32_t z1 = 0, z2 = 0, rt;
    605 	uint32_t status;
    606 	int down;
    607 
    608 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    609 	    (0<<MAXCTRL_RW_SH) | (1<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),
    610 	    0x0bf3);
    611 
    612 	while ((status = (wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    613 		    (1<<MAXCTRL_RW_SH)
    614 		    | (1<<MAXCTRL_PAGE_SH)
    615 		    | (0<<MAXCTRL_ADDR_SH), 0) & 0x4000)) != 0x4000) {
    616 		DPRINTF(("%s: status=%#x\n", __func__, status));
    617 	}
    618 	DPRINTF(("%s: status=%#x\n", __func__, status));
    619 
    620 	z1 = wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    621 	    (1<<MAXCTRL_RW_SH) | (0<<MAXCTRL_PAGE_SH) | (2<<MAXCTRL_ADDR_SH),0);
    622 	DPRINTF(("%s: first z1=%d\n", __func__, z1));
    623 
    624 	down = (z1 >= 10);
    625 	if (!down)
    626 		goto out;
    627 
    628 	pos->x = wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    629 	    (1<<MAXCTRL_RW_SH) | (0<<MAXCTRL_PAGE_SH) | (0<<MAXCTRL_ADDR_SH),0);
    630 	DPRINTF(("%s: x=%d\n", __func__, pos->x));
    631 	pos->y = wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    632 	    (1<<MAXCTRL_RW_SH) | (0<<MAXCTRL_PAGE_SH) | (1<<MAXCTRL_ADDR_SH),0);
    633 	DPRINTF(("%s: y=%d\n", __func__, pos->y));
    634 	z1 = wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    635 	    (1<<MAXCTRL_RW_SH) | (0<<MAXCTRL_PAGE_SH) | (2<<MAXCTRL_ADDR_SH),0);
    636 	DPRINTF(("%s: z1=%d\n", __func__, z1));
    637 	z2 = wzero3ssp_ic_send(WZERO3_SSP_IC_MAX1233,
    638 	    (1<<MAXCTRL_RW_SH) | (0<<MAXCTRL_PAGE_SH) | (3<<MAXCTRL_ADDR_SH),0);
    639 	DPRINTF(("%s: z2=%d\n", __func__, z2));
    640 
    641 	if (z1) {
    642 		rt = 400 /* XXX: X plate ohms */;
    643 		rt *= pos->x;
    644 		rt *= (z2 / z1) - 1;
    645 		rt >>= 12;
    646 	} else
    647 		rt = 0;
    648 	DPRINTF(("%s: rt=%d\n", __func__, rt));
    649 
    650 	/* check that pen is still down */
    651 	if (z1 == 0 || rt == 0)
    652 		down = 0;
    653 	pos->z = down;
    654 
    655 out:
    656 	return down;
    657 }
    658 
    659 /*----------------------------------------------------------------------------
    660  * ADS7846/TSC2046 touch screen controller for WS007SH
    661  */
    662 #define ADSCTRL_PD0_SH		0	/* PD0 bit */
    663 #define ADSCTRL_PD1_SH		1	/* PD1 bit */
    664 #define ADSCTRL_DFR_SH		2	/* SER/DFR bit */
    665 #define ADSCTRL_MOD_SH		3	/* Mode bit */
    666 #define ADSCTRL_ADR_SH		4	/* Address setting */
    667 #define ADSCTRL_STS_SH		7	/* Start bit */
    668 
    669 static uint32_t ads7846_sync(int, int, uint32_t);
    670 
    671 void
    672 ads7846_init(void)
    673 {
    674 
    675 	/* Enable automatic low power mode. */
    676 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846,
    677 	    (4<<ADSCTRL_ADR_SH) | (1<<ADSCTRL_STS_SH), 0);
    678 }
    679 
    680 void
    681 ads7846_suspend(void)
    682 {
    683 
    684 	/* Turn off reference voltage but leave ADC on. */
    685 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846,
    686 	    (1<<ADSCTRL_PD1_SH) | (1<<ADSCTRL_ADR_SH) | (1<<ADSCTRL_STS_SH), 0);
    687 }
    688 
    689 void
    690 ads7846_resume(void)
    691 {
    692 
    693 	/* Enable automatic low power mode. */
    694 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846,
    695 	    (4<<ADSCTRL_ADR_SH) | (1<<ADSCTRL_STS_SH), 0);
    696 }
    697 
    698 int
    699 ads7846_readpos(struct wzero3tp_pos *pos)
    700 {
    701 	int cmd, cmd0;
    702 	int z0, z1;
    703 	int down;
    704 
    705 	cmd0 = (1<<ADSCTRL_STS_SH) | (1<<ADSCTRL_PD0_SH) | (1<<ADSCTRL_PD1_SH);
    706 
    707 	/* check that pen is down */
    708 	cmd = cmd0 | (3<<ADSCTRL_ADR_SH);
    709 	z0 = wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846, cmd, 0);
    710 	DPRINTF(("%s: first z0 = %d\n", __func__, z0));
    711 
    712 	down = (z0 >= 10);
    713 	if (!down)
    714 		goto out;
    715 
    716 	/* Y (discard) */
    717 	cmd = cmd0 | (1<<ADSCTRL_ADR_SH);
    718 	(void)ads7846_sync(0, 1, cmd);
    719 
    720 	/* Y */
    721 	cmd = cmd0 | (1<<ADSCTRL_ADR_SH);
    722 	(void)ads7846_sync(1, 1, cmd);
    723 
    724 	/* X */
    725 	cmd = cmd0 | (5<<ADSCTRL_ADR_SH);
    726 	pos->y = ads7846_sync(1, 1, cmd);
    727 	DPRINTF(("%s: y = %d\n", __func__, pos->y));
    728 
    729 	/* Z0 */
    730 	cmd = cmd0 | (3<<ADSCTRL_ADR_SH);
    731 	pos->x = ads7846_sync(1, 1, cmd);
    732 	DPRINTF(("%s: x = %d\n", __func__, pos->x));
    733 
    734 	/* Z1 */
    735 	cmd = cmd0 | (4<<ADSCTRL_ADR_SH);
    736 	z0 = ads7846_sync(1, 1, cmd);
    737 	z1 = ads7846_sync(1, 0, cmd);
    738 	DPRINTF(("%s: z0 = %d, z1 = %d\n", __func__, z0, z1));
    739 
    740 	/* check that pen is still down */
    741 	if (z0 == 0 || (pos->x * (z1 - z0) / z0) >= 15000)
    742 		down = 0;
    743 	pos->z = down;
    744 
    745 out:
    746 	/* Enable automatic low power mode. */
    747 	cmd = (1<<ADSCTRL_ADR_SH) | (1<<ADSCTRL_STS_SH);
    748 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846, cmd, 0);
    749 
    750 	return down;
    751 }
    752 
    753 void (*ads7846_wait_for_hsync)(void);
    754 
    755 /*
    756  * Communicate synchronously with the ADS784x touch screen controller.
    757  */
    758 static uint32_t
    759 ads7846_sync(int dorecv, int dosend, uint32_t cmd)
    760 {
    761 	uint32_t rv = 0;
    762 
    763 	if (ads7846_wait_for_hsync)
    764 		(*ads7846_wait_for_hsync)();
    765 
    766 	if (dorecv)
    767 		rv = wzero3ssp_ic_stop(WZERO3_SSP_IC_ADS7846);
    768 
    769 	if (dosend) {
    770 		/* send dummy command; discard SSDR */
    771 		(void)wzero3ssp_ic_send(WZERO3_SSP_IC_ADS7846, cmd, 0);
    772 
    773 		/* wait for refresh */
    774 		if (ads7846_wait_for_hsync)
    775 			(*ads7846_wait_for_hsync)();
    776 
    777 		/* send the actual command; keep ADS784x enabled */
    778 		wzero3ssp_ic_start(WZERO3_SSP_IC_ADS7846, cmd);
    779 	}
    780 
    781 	return rv;
    782 }
    783 
    784 /*----------------------------------------------------------------------------
    785  * AK4184 touch screen controller for WS011SH
    786  */
    787 #define AKMCTRL_PD_SH	12	/* Power down bit */
    788 #define AKMCTRL_ADR_SH	13	/* Address setting bits */
    789 #define AKMCTRL_STS_SH	15	/* Start bit */
    790 
    791 static uint32_t ak4184_sync(int, int, uint32_t);
    792 
    793 void
    794 ak4184_init(void)
    795 {
    796 
    797 	/* Enable automatic low power mode. */
    798 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_AK4184,
    799 	    (1<<AKMCTRL_STS_SH) | (0<<AKMCTRL_ADR_SH) | (0<<AKMCTRL_PD_SH), 0);
    800 }
    801 
    802 int
    803 ak4184_readpos(struct wzero3tp_pos *pos)
    804 {
    805 	u_int rt;
    806 	int z1, z2;
    807 
    808 	/* X (discard) */
    809 	(void)ak4184_sync(0, 1,
    810 	    (1<<AKMCTRL_STS_SH) | (0<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    811 
    812 	/* X */
    813 	(void)ak4184_sync(1, 1,
    814 	    (1<<AKMCTRL_STS_SH) | (0<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    815 
    816 	/* Y */
    817 	pos->x = ak4184_sync(1, 1,
    818 	    (1<<AKMCTRL_STS_SH) | (1<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    819 	DPRINTF(("%s: x=%d\n", __func__, pos->x));
    820 	pos->y = ak4184_sync(1, 1,
    821 	    (1<<AKMCTRL_STS_SH) | (2<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    822 	DPRINTF(("%s: y=%d\n", __func__, pos->y));
    823 	z1 = ak4184_sync(1, 1,
    824 	    (1<<AKMCTRL_STS_SH) | (3<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    825 	DPRINTF(("%s: z1=%d\n", __func__, z1));
    826 	z2 = ak4184_sync(1, 0,
    827 	    (1<<AKMCTRL_STS_SH) | (3<<AKMCTRL_ADR_SH) | (1<<AKMCTRL_PD_SH));
    828 	DPRINTF(("%s: z2=%d\n", __func__, z2));
    829 
    830 	if (z1 >= 10) {
    831 		rt = 400 /* XXX: X plate ohms */;
    832 		rt *= pos->x;
    833 		rt *= (z2 / z1) - 1;
    834 		rt >>= 12;
    835 	} else
    836 		rt = 0;
    837 	DPRINTF(("%s: rt=%d\n", __func__, rt));
    838 
    839 	/* check that pen is still down */
    840 	if (z1 == 0 || rt == 0)
    841 		pos->z = 0;
    842 	else
    843 		pos->z = 1;
    844 
    845 	/* Enable automatic low power mode. */
    846 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_AK4184,
    847 	    (1<<AKMCTRL_STS_SH) | (0<<AKMCTRL_ADR_SH) | (0<<AKMCTRL_PD_SH), 0);
    848 
    849 	return pos->z;
    850 }
    851 
    852 void
    853 ak4184_suspend(void)
    854 {
    855 
    856 	/* Nothing to do */
    857 }
    858 
    859 void
    860 ak4184_resume(void)
    861 {
    862 
    863 	/* Enable automatic low power mode. */
    864 	(void)wzero3ssp_ic_send(WZERO3_SSP_IC_AK4184,
    865 	    (1<<AKMCTRL_STS_SH) | (0<<AKMCTRL_ADR_SH) | (0<<AKMCTRL_PD_SH), 0);
    866 }
    867 
    868 static uint32_t
    869 ak4184_sync(int dorecv, int dosend, uint32_t cmd)
    870 {
    871 	uint32_t rv = 0;
    872 
    873 	if (dorecv)
    874 		rv = wzero3ssp_ic_stop(WZERO3_SSP_IC_AK4184);
    875 
    876 	if (dosend) {
    877 		/* send dummy command; discard SSDR */
    878 		(void)wzero3ssp_ic_send(WZERO3_SSP_IC_AK4184, cmd, 0);
    879 
    880 		/* send the actual command; keep AK4184 enabled */
    881 		wzero3ssp_ic_start(WZERO3_SSP_IC_AK4184, cmd);
    882 	}
    883 
    884 	return rv;
    885 }
    886