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