xref: /netbsd/sys/arch/hpcarm/dev/wzero3_kbd.c (revision beecddb6)
1 /*	$NetBSD: wzero3_kbd.c,v 1.12 2021/08/07 16:18:53 thorpej Exp $	*/
2 
3 /*-
4  * Copyright (C) 2008, 2009, 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_kbd.c,v 1.12 2021/08/07 16:18:53 thorpej Exp $");
30 
31 #include <sys/param.h>
32 #include <sys/systm.h>
33 #include <sys/device.h>
34 #include <sys/kernel.h>
35 #include <sys/kmem.h>
36 #include <sys/callout.h>
37 #include <sys/bus.h>
38 
39 #include <dev/sysmon/sysmonvar.h>
40 #include <dev/sysmon/sysmon_taskq.h>
41 
42 #include <arm/xscale/pxa2x0cpu.h>
43 #include <arm/xscale/pxa2x0var.h>
44 #include <arm/xscale/pxa2x0_gpio.h>
45 
46 #include <machine/bootinfo.h>
47 #include <machine/config_hook.h>
48 #include <machine/platid.h>
49 #include <machine/platid_mask.h>
50 
51 #include <dev/hpc/hpckbdvar.h>
52 
53 #include <arch/hpcarm/dev/wzero3_reg.h>
54 
55 #ifdef DEBUG
56 #define DPRINTF(arg)	printf arg
57 #else
58 #define DPRINTF(arg)	/* nothing */
59 #endif
60 
61 #define	CSR_READ1(r)	bus_space_read_1(sc->sc_iot, sc->sc_ioh, (r))
62 #define	CSR_WRITE1(r,v)	bus_space_write_1(sc->sc_iot, sc->sc_ioh, (r), (v))
63 #define	CSR_READ2(r)	bus_space_read_2(sc->sc_iot, sc->sc_ioh, (r))
64 #define	CSR_WRITE2(r,v)	bus_space_write_2(sc->sc_iot, sc->sc_ioh, (r), (v))
65 #define	CSR_READ4(r)	bus_space_read_4(sc->sc_iot, sc->sc_ioh, (r))
66 #define	CSR_WRITE4(r,v)	bus_space_write_4(sc->sc_iot, sc->sc_ioh, (r), (v))
67 
68 /* register */
69 #define	KBDCOL_L	(0x00)	/* Write */
70 #define	KBDCOL_U	(0x04)	/* Write */
71 #define	KBDCHARGE	(0x08)	/* Write */
72 #define	KBDDATA		(0x08)	/* Read */
73 #define	REGMAPSIZE	0x0c
74 
75 #define	KEYWAIT		20	/* us */
76 
77 #define	WS003SH_NCOLUMN	12
78 #define	WS003SH_NROW	7
79 
80 struct wzero3kbd_softc {
81 	device_t sc_dev;
82 
83 	bus_space_tag_t sc_iot;
84 	bus_space_handle_t sc_ioh;
85 
86 	int sc_ncolumn;
87 	int sc_nrow;
88 	uint8_t *sc_okeystat;
89 	uint8_t *sc_keystat;
90 
91 	void *sc_key_ih;
92 	void *sc_power_ih;
93 	void *sc_reset_ih;
94 
95 	int sc_key_pin;
96 	int sc_power_pin;
97 	int sc_reset_pin;
98 
99 	struct hpckbd_ic_if sc_if;
100 	struct hpckbd_if *sc_hpckbd;
101 
102 	struct sysmon_pswitch sc_smpsw; /* for reset key */
103 
104 	int sc_enabled;
105 
106 	/* polling stuff */
107 	struct callout sc_keyscan_ch;
108 	int sc_interval;
109 #define	KEY_INTERVAL	50	/* ms */
110 
111 #if defined(KEYTEST) || defined(KEYTEST2) || defined(KEYTEST3) || defined(KEYTEST4) || defined(KEYTEST5)
112 	void *sc_test_ih;
113 	int sc_test_pin;
114 	int sc_nouse_pin;
115 	int sc_nouse_pin2;
116 	int sc_nouse_pin3;
117 	int sc_bit;
118 #endif
119 };
120 
121 static int wzero3kbd_match(device_t, cfdata_t, void *);
122 static void wzero3kbd_attach(device_t, device_t, void *);
123 
124 CFATTACH_DECL_NEW(wzero3kbd, sizeof(struct wzero3kbd_softc),
125     wzero3kbd_match, wzero3kbd_attach, NULL, NULL);
126 
127 static int wzero3kbd_intr(void *arg);
128 #if defined(KEYTEST)
129 static int wzero3kbd_intr2(void *arg);
130 #endif
131 #if defined(KEYTEST3)
132 static int wzero3kbd_intr3(void *arg);
133 #endif
134 static void wzero3kbd_tick(void *arg);
135 static int wzero3kbd_power_intr(void *arg);
136 static int wzero3kbd_reset_intr(void *arg);
137 static int wzero3kbd_input_establish(void *arg, struct hpckbd_if *kbdif);
138 static void wzero3kbd_sysmon_reset_event(void *arg);
139 static int wzero3kbd_poll(void *arg);
140 static int wzero3kbd_poll1(void *arg);
141 
142 /*
143  * WS003SH/WS004SH/WS007SH keyscan map
144 	col#0	col#1	col#2	col#3	col#4	col#5	col#6	col#7	col#8	col#9	col#10	col#11
145 row#0:	CTRL	1	3	5	6	7	9	0	BS	(none)	ROTATE	CAMERA
146 row#1:	(none)	2	4	r	y	8	i	o	p	(none)	VOL-	VOL+
147 row#2:	TAB	q	e	t	g	u	j	k	(none)	(none)	(none)	(none)
148 row#3:	(none)	w	s	f	v	h	m	l	(none)	(none)	SHIFT	(none)
149 row#4:	CALL	a	d	c	b	n	.	(none)	ENTER	(none)	WIN	(none)
150 row#5:	MAIL	z	x	-	SPACE	/	(none)	UP	(none)	(none)	LSOFT	FN
151 row#6:	IE	MOJI	(none)	OK	ACTION	,	LEFT	DOWN	RIGHT	(none)	RSOFT	(none)
152 */
153 
154 /*
155  * WS011SH keyscan map
156 	col#0	col#1	col#2	col#3	col#4	col#5	col#6	col#7	col#8	col#9	col#10	col#11
157 row#0	Ctrl	(none)	(none)	(none)	(none)	(none)	(none)	(none)	Del	(none)	ROTATE	(none)
158 row#1	(none)	(none)	(none)	R	Y	(none)	I	O	P	(none)	(none)	(none)
159 row#2	Tab	Q	E	T	G	U	J	K	(none)	(none)	(none)	(none)
160 row#3	(none)	W	S	F	V	H	M	L	(none)	(none)	Shift	(none)
161 row#4	(none)	A	D	C	B	N	.	(none)	Enter	(none)	(none)	(none)
162 row#5	(none)	Z	X	-	Space	/	(none)	UP	(none)	(none)	(none)	Fn
163 row#6	(none)	MOJI	HAN/ZEN	OK	(none)	,	LEFT	DOWN	RIGHT	(none)	(none)	(none)
164 */
165 
166 /*
167  * WS020SH keyscan map
168 	col#0	col#1	col#2	col#3	col#4	col#5	col#6	col#7	col#8	col#9	col#10	col#11
169 row#0	Ctrl	(none)	(none)	(none)	(none)	(none)	(none)	(none)	Del	(none)	ROTATE	(none)
170 row#1	(none)	(none)	(none)	R	Y	(none)	I	O	P	(none)	MEDIA	(none)
171 row#2	Tab	Q	E	T	G	U	J	K	(none)	(none)	(none)	(none)
172 row#3	(none)	W	S	F	V	H	M	L	(none)	(none)	LShift	(none)
173 row#4	(none)	A	D	C	B	N	.	(none)	Enter	(none)	RShift	(none)
174 row#5	(none)	Z	X	-	Space	/	(none)	UP	(none)	DOWN	(none)	Fn
175 row#6	(none)	MOJI	HAN/ZEN	OK	(none)	,	LEFT	(none)	RIGHT	(none)	(none)	(none)
176 */
177 
178 static const struct wzero3kbd_model {
179 	platid_mask_t *platid;
180 	int key_pin;
181 	int power_pin;
182 	int reset_pin;
183 	int ncolumn;
184 	int nrow;
185 } wzero3kbd_table[] = {
186 	/* WS003SH */
187 	{
188 		&platid_mask_MACH_SHARP_WZERO3_WS003SH,
189 		-1,	/* XXX */
190 		GPIO_WS003SH_POWER_BUTTON,
191 		-1,	/* None */
192 		WS003SH_NCOLUMN,
193 		WS003SH_NROW,
194 	},
195 	/* WS004SH */
196 	{
197 		&platid_mask_MACH_SHARP_WZERO3_WS004SH,
198 		-1,	/* XXX */
199 		GPIO_WS003SH_POWER_BUTTON,
200 		-1,	/* None */
201 		WS003SH_NCOLUMN,
202 		WS003SH_NROW,
203 	},
204 	/* WS007SH */
205 	{
206 		&platid_mask_MACH_SHARP_WZERO3_WS007SH,
207 		-1,	/* XXX */
208 		GPIO_WS007SH_POWER_BUTTON,
209 		GPIO_WS007SH_RESET_BUTTON,
210 		WS003SH_NCOLUMN,
211 		WS003SH_NROW,
212 	},
213 	/* WS011SH */
214 	{
215 		&platid_mask_MACH_SHARP_WZERO3_WS011SH,
216 		-1,	/* XXX */
217 		GPIO_WS011SH_POWER_BUTTON,
218 		GPIO_WS011SH_RESET_BUTTON,
219 		WS003SH_NCOLUMN,
220 		WS003SH_NROW,
221 	},
222 	/* WS020SH */
223 	{
224 		&platid_mask_MACH_SHARP_WZERO3_WS020SH,
225 		-1,	/* XXX */
226 		GPIO_WS020SH_POWER_BUTTON,
227 		GPIO_WS020SH_RESET_BUTTON,
228 		WS003SH_NCOLUMN,
229 		WS003SH_NROW,
230 	},
231 
232 	{ NULL, -1, -1, -1, 0, 0, }
233 };
234 
235 static const struct wzero3kbd_model *
wzero3kbd_lookup(void)236 wzero3kbd_lookup(void)
237 {
238 	const struct wzero3kbd_model *model;
239 
240 	for (model = wzero3kbd_table; model->platid != NULL; model++) {
241 		if (platid_match(&platid, model->platid)) {
242 			return model;
243 		}
244 	}
245 	return NULL;
246 }
247 
248 static int
wzero3kbd_match(device_t parent,cfdata_t cf,void * aux)249 wzero3kbd_match(device_t parent, cfdata_t cf, void *aux)
250 {
251 
252 	if (strcmp(cf->cf_name, "wzero3kbd") != 0)
253 		return 0;
254 	if (wzero3kbd_lookup() == NULL)
255 		return 0;
256 	return 1;
257 }
258 
259 static void
wzero3kbd_attach(device_t parent,device_t self,void * aux)260 wzero3kbd_attach(device_t parent, device_t self, void *aux)
261 {
262 	struct wzero3kbd_softc *sc = device_private(self);
263 	struct pxaip_attach_args *pxa = (struct pxaip_attach_args *)aux;
264 	struct hpckbd_attach_args haa;
265 	const struct wzero3kbd_model *model;
266 
267 	sc->sc_dev = self;
268 
269 	model = wzero3kbd_lookup();
270 	if (model == NULL) {
271 		aprint_error(": unknown model\n");
272 		return;
273 	}
274 
275 	aprint_normal(": keyboard\n");
276 	aprint_naive("\n");
277 
278 	sc->sc_key_pin = model->key_pin;
279 	sc->sc_power_pin = model->power_pin;
280 	sc->sc_reset_pin = model->reset_pin;
281 	sc->sc_ncolumn = model->ncolumn;
282 	sc->sc_nrow = model->nrow;
283 
284 	sc->sc_iot = pxa->pxa_iot;
285 	if (bus_space_map(sc->sc_iot, PXA2X0_CS2_START, REGMAPSIZE, 0,
286 	    &sc->sc_ioh)) {
287 		aprint_error_dev(self, "couldn't map registers.\n");
288 		return;
289 	}
290 
291 	sc->sc_okeystat = kmem_zalloc(sc->sc_nrow * sc->sc_ncolumn, KM_SLEEP);
292 	sc->sc_keystat = kmem_zalloc(sc->sc_nrow * sc->sc_ncolumn, KM_SLEEP);
293 
294 	sc->sc_if.hii_ctx = sc;
295 	sc->sc_if.hii_establish = wzero3kbd_input_establish;
296 	sc->sc_if.hii_poll = wzero3kbd_poll;
297 
298 	/* Attach console if not using serial. */
299 	if (!(bootinfo->bi_cnuse & BI_CNUSE_SERIAL))
300 		hpckbd_cnattach(&sc->sc_if);
301 
302 	/* Install interrupt handler. */
303 	if (sc->sc_key_pin >= 0) {
304 		pxa2x0_gpio_set_function(sc->sc_key_pin, GPIO_IN);
305 		sc->sc_key_ih = pxa2x0_gpio_intr_establish(sc->sc_key_pin,
306 		    IST_EDGE_BOTH, IPL_TTY, wzero3kbd_intr, sc);
307 		if (sc->sc_key_ih == NULL) {
308 			aprint_error_dev(sc->sc_dev,
309 			    "couldn't establish key interrupt\n");
310 		}
311 	} else {
312 		sc->sc_interval = KEY_INTERVAL / (1000 / hz);
313 		if (sc->sc_interval < 1)
314 			sc->sc_interval = 1;
315 		callout_init(&sc->sc_keyscan_ch, 0);
316 		callout_reset(&sc->sc_keyscan_ch, sc->sc_interval,
317 		    wzero3kbd_tick, sc);
318 	}
319 
320 	/* power key */
321 	if (sc->sc_power_pin >= 0) {
322 		pxa2x0_gpio_set_function(sc->sc_power_pin, GPIO_IN);
323 		sc->sc_power_ih = pxa2x0_gpio_intr_establish(
324 		    sc->sc_power_pin, IST_EDGE_BOTH, IPL_TTY,
325 		    wzero3kbd_power_intr, sc);
326 		if (sc->sc_power_ih == NULL) {
327 			aprint_error_dev(sc->sc_dev,
328 			    "couldn't establish power key interrupt\n");
329 		}
330 	}
331 
332 	/* reset button */
333 	if (sc->sc_reset_pin >= 0) {
334 		pxa2x0_gpio_set_function(sc->sc_reset_pin, GPIO_IN);
335 		sc->sc_reset_ih = pxa2x0_gpio_intr_establish(
336 		    sc->sc_reset_pin, IST_EDGE_BOTH, IPL_TTY,
337 		    wzero3kbd_reset_intr, sc);
338 		if (sc->sc_reset_ih == NULL) {
339 			aprint_error_dev(sc->sc_dev,
340 			    "couldn't establish reset key interrupt\n");
341 		}
342 
343 		sc->sc_smpsw.smpsw_name = device_xname(self);
344 		sc->sc_smpsw.smpsw_type = PSWITCH_TYPE_RESET;
345 		if (sysmon_pswitch_register(&sc->sc_smpsw) != 0) {
346 			aprint_error_dev(sc->sc_dev,
347 			    "unable to register reset event handler\n");
348 		}
349 	}
350 
351 	/* Attach hpckbd. */
352 	haa.haa_ic = &sc->sc_if;
353 	config_found(self, &haa, hpckbd_print, CFARGS_NONE);
354 
355 #if defined(KEYTEST) || defined(KEYTEST2) || defined(KEYTEST3) || defined(KEYTEST4) || defined(KEYTEST5)
356 	sc->sc_test_ih = NULL;
357 	sc->sc_test_pin = -1;
358 	sc->sc_nouse_pin = -1;
359 	sc->sc_nouse_pin2 = -1;
360 	sc->sc_nouse_pin3 = -1;
361 	sc->sc_bit = 0x01;
362 	if (platid_match(&platid, &platid_mask_MACH_SHARP_WZERO3_WS003SH)
363 	 || platid_match(&platid, &platid_mask_MACH_SHARP_WZERO3_WS004SH)) {
364 		sc->sc_nouse_pin = GPIO_WS003SH_SD_DETECT;  /* SD_DETECT */
365 		sc->sc_nouse_pin2 = 86;  /* Vsync? */
366 		sc->sc_nouse_pin3 = 89;  /* RESET? */
367 	}
368 	if (platid_match(&platid, &platid_mask_MACH_SHARP_WZERO3_WS007SH)) {
369 		sc->sc_nouse_pin = GPIO_WS007SH_SD_DETECT;  /* SD_DETECT */
370 		sc->sc_nouse_pin2 = 77;  /* Vsync? */
371 	}
372 	if (platid_match(&platid, &platid_mask_MACH_SHARP_WZERO3_WS011SH)) {
373 		sc->sc_nouse_pin = GPIO_WS011SH_SD_DETECT;  /* SD_DETECT */
374 		sc->sc_nouse_pin2 = 77;  /* Vsync? */
375 	}
376 	if (platid_match(&platid, &platid_mask_MACH_SHARP_WZERO3_WS020SH)) {
377 		sc->sc_nouse_pin = GPIO_WS020SH_SD_DETECT;  /* SD_DETECT */
378 		sc->sc_nouse_pin2 = 77;  /* Vsync? */
379 	}
380 
381 #ifdef KEYTEST
382 	for (sc->sc_test_pin = 2; sc->sc_test_pin < PXA270_GPIO_NPINS; sc->sc_test_pin++) {
383 		if (sc->sc_test_pin != sc->sc_nouse_pin
384 		 && sc->sc_test_pin != sc->sc_nouse_pin2
385 		 && sc->sc_test_pin != sc->sc_nouse_pin3
386 		 && sc->sc_test_pin != sc->sc_key_pin
387 		 && sc->sc_test_pin != sc->sc_power_pin
388 		 && sc->sc_test_pin != sc->sc_reset_pin
389 		 && GPIO_IS_GPIO_IN(pxa2x0_gpio_get_function(sc->sc_test_pin)))
390 			break;
391 	}
392 	if (sc->sc_test_pin < PXA270_GPIO_NPINS) {
393 		printf("GPIO_IN: GPIO pin #%d\n", sc->sc_test_pin);
394 		sc->sc_test_ih = pxa2x0_gpio_intr_establish(sc->sc_test_pin,
395 		    IST_EDGE_BOTH, IPL_TTY, wzero3kbd_intr2, sc);
396 	} else {
397 		sc->sc_test_pin = -1;
398 	}
399 #endif
400 
401 #ifdef KEYTEST3
402 	{
403 		int i;
404 		printf("pin: ");
405 		for (i = 0; i < PXA270_GPIO_NPINS; i++) {
406 			if (i == sc->sc_nouse_pin
407 			 || i == sc->sc_nouse_pin2
408 			 || i == sc->sc_nouse_pin3
409 			 || i == sc->sc_key_pin
410 			 || i == sc->sc_power_pin
411 			 || i == sc->sc_reset_pin)
412 				continue;
413 
414 			printf("%d, ", i);
415 			if (GPIO_IS_GPIO_IN(pxa2x0_gpio_get_function(i))) {
416 				pxa2x0_gpio_intr_establish(i, IST_EDGE_BOTH,
417 				    IPL_TTY, wzero3kbd_intr3, (void *)(long)i);
418 			}
419 		}
420 	}
421 #endif
422 
423 #ifdef KEYTEST4
424 	for (sc->sc_test_pin = 2; sc->sc_test_pin < PXA270_GPIO_NPINS; sc->sc_test_pin++) {
425 		if (sc->sc_test_pin != sc->sc_nouse_pin
426 		 && sc->sc_test_pin != sc->sc_nouse_pin2
427 		 && sc->sc_test_pin != sc->sc_nouse_pin3
428 		 && sc->sc_test_pin != sc->sc_key_pin
429 		 && sc->sc_test_pin != sc->sc_power_pin
430 		 && sc->sc_test_pin != sc->sc_reset_pin
431 		 && GPIO_IS_GPIO_OUT(pxa2x0_gpio_get_function(sc->sc_test_pin)))
432 			break;
433 	}
434 	if (sc->sc_test_pin < PXA270_GPIO_NPINS) {
435 		printf("GPIO_OUT: GPIO pin #%d\n", sc->sc_test_pin);
436 	} else {
437 		sc->sc_test_pin = -1;
438 	}
439 #endif
440 #ifdef KEYTEST5
441 	sc->sc_test_pin = 0x00;
442 	sc->sc_bit = 0x01;
443 #endif
444 #endif
445 }
446 
447 static int
wzero3kbd_intr(void * arg)448 wzero3kbd_intr(void *arg)
449 {
450 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
451 
452 #if defined(KEYTEST) || defined(KEYTEST2) || defined(KEYTEST3) || defined(KEYTEST4) || defined(KEYTEST5)
453 	printf("wzero3kbd_intr: GPIO pin #%d = %s\n", sc->sc_key_pin,
454 	    pxa2x0_gpio_get_bit(sc->sc_key_pin) ? "on" : "off");
455 #endif
456 
457 #if defined(KEYTEST4)
458 	if (sc->sc_test_pin >= 0) {
459 		if (pxa2x0_gpio_get_bit(sc->sc_test_pin)) {
460 			printf("GPIO_OUT: GPIO pin #%d: L\n",sc->sc_test_pin);
461 			pxa2x0_gpio_clear_bit(sc->sc_test_pin);
462 		} else {
463 			printf("GPIO_OUT: GPIO pin #%d: H\n", sc->sc_test_pin);
464 			pxa2x0_gpio_set_bit(sc->sc_test_pin);
465 		}
466 	}
467 #endif
468 #if defined(KEYTEST5)
469 	printf("CPLD(%#x): value=%#x, mask=%#x\n",
470 	    sc->sc_test_pin, CSR_READ4(sc->sc_test_pin), sc->sc_bit);
471 	if (CSR_READ4(sc->sc_test_pin) & sc->sc_bit) {
472 		printf("CPLD_OUT: CPLD: L\n");
473 		CSR_WRITE4(sc->sc_test_pin,
474 		    CSR_READ4(sc->sc_test_pin) & ~sc->sc_bit);
475 	} else {
476 		printf("CPLD_OUT: CPLD: H\n");
477 		CSR_WRITE4(sc->sc_test_pin,
478 		    CSR_READ4(sc->sc_test_pin) | sc->sc_bit);
479 	}
480 #endif
481 
482 	(void) wzero3kbd_poll1(sc);
483 
484 	pxa2x0_gpio_clear_intr(sc->sc_key_pin);
485 
486 	return 1;
487 }
488 
489 #if defined(KEYTEST)
490 static int
wzero3kbd_intr2(void * arg)491 wzero3kbd_intr2(void *arg)
492 {
493 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
494 
495 	printf("wzero3kbd_intr2: GPIO_IN: GPIO pin #%d = %s\n", sc->sc_test_pin,
496 	    pxa2x0_gpio_get_bit(sc->sc_test_pin) ? "on" : "off");
497 
498 	return 1;
499 }
500 #endif
501 
502 #if defined(KEYTEST3)
503 static int
wzero3kbd_intr3(void * arg)504 wzero3kbd_intr3(void *arg)
505 {
506 	int pin = (int)arg;
507 
508 	printf("wzero3kbd_intr3: GPIO pin #%d = %s\n", pin,
509 	    pxa2x0_gpio_get_bit(pin) ? "on" : "off");
510 
511 	return 1;
512 }
513 #endif
514 
515 
516 static void
wzero3kbd_tick(void * arg)517 wzero3kbd_tick(void *arg)
518 {
519 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
520 
521 	(void) wzero3kbd_poll1(sc);
522 
523 	callout_schedule(&sc->sc_keyscan_ch, sc->sc_interval);
524 }
525 
526 static int
wzero3kbd_power_intr(void * arg)527 wzero3kbd_power_intr(void *arg)
528 {
529 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
530 
531 #if defined(KEYTEST) || defined(KEYTEST2) || defined(KEYTEST3) || defined(KEYTEST4)
532 	printf("wzero3kbd_power_intr: status = %s\n",
533 	    pxa2x0_gpio_get_bit(sc->sc_power_pin) ? "on" : "off");
534 #endif
535 
536 #if defined(KEYTEST)
537 	if (pxa2x0_gpio_get_bit(sc->sc_power_pin)) {
538 		if (sc->sc_test_pin >= 0) {
539 			int orig_pin = sc->sc_test_pin;
540 			pxa2x0_gpio_intr_disestablish(sc->sc_test_ih);
541 			sc->sc_test_ih = NULL;
542 
543 			for (;;) {
544 				if (++sc->sc_test_pin >= PXA270_GPIO_NPINS)
545 					sc->sc_test_pin = 2;
546 				if (sc->sc_test_pin == orig_pin)
547 					break;
548 				if (sc->sc_test_pin != sc->sc_nouse_pin
549 				 && sc->sc_test_pin != sc->sc_nouse_pin2
550 				 && sc->sc_test_pin != sc->sc_nouse_pin3
551 				 && sc->sc_test_pin != sc->sc_key_pin
552 				 && sc->sc_test_pin != sc->sc_power_pin
553 				 && sc->sc_test_pin != sc->sc_reset_pin
554 				 && GPIO_IS_GPIO_IN(pxa2x0_gpio_get_function(sc->sc_test_pin)))
555 					break;
556 			}
557 			if (sc->sc_test_pin != orig_pin) {
558 				printf("GPIO_IN: GPIO pin #%d\n",
559 				    sc->sc_test_pin);
560 				sc->sc_test_ih =
561 				    pxa2x0_gpio_intr_establish(sc->sc_test_pin,
562 				    IST_EDGE_BOTH, IPL_TTY, wzero3kbd_intr2,sc);
563 			} else {
564 				sc->sc_test_pin = -1;
565 			}
566 		}
567 	}
568 #endif
569 
570 #if defined(KEYTEST2)
571 	if (pxa2x0_gpio_get_bit(sc->sc_power_pin)) {
572 		sc->sc_enabled ^= 2;
573 		if (sc->sc_enabled & 2) {
574 			printf("print col/row\n");
575 		} else {
576 			printf("keyscan\n");
577 		}
578 	}
579 #endif
580 #if defined(KEYTEST4)
581 	if (pxa2x0_gpio_get_bit(sc->sc_power_pin)) {
582 		if (sc->sc_test_pin >= 0) {
583 			int orig_pin = sc->sc_test_pin;
584 			for (;;) {
585 				if (++sc->sc_test_pin >= PXA270_GPIO_NPINS)
586 					sc->sc_test_pin = 2;
587 				if (sc->sc_test_pin == orig_pin)
588 					break;
589 				if (sc->sc_test_pin != sc->sc_nouse_pin
590 				 && sc->sc_test_pin != sc->sc_nouse_pin2
591 				 && sc->sc_test_pin != sc->sc_nouse_pin3
592 				 && sc->sc_test_pin != sc->sc_key_pin
593 				 && sc->sc_test_pin != sc->sc_power_pin
594 				 && sc->sc_test_pin != sc->sc_reset_pin
595 				 && GPIO_IS_GPIO_OUT(pxa2x0_gpio_get_function(sc->sc_test_pin)))
596 				break;
597 			}
598 			if (sc->sc_test_pin != orig_pin) {
599 				printf("GPIO_OUT: GPIO pin #%d\n", sc->sc_test_pin);
600 			} else {
601 				sc->sc_test_pin = -1;
602 			}
603 		}
604 	}
605 #endif
606 #if defined(KEYTEST5)
607 	if (pxa2x0_gpio_get_bit(sc->sc_power_pin)) {
608 		sc->sc_bit <<= 1;
609 		if (sc->sc_bit & ~0xff) {
610 			sc->sc_bit = 0x01;
611 			sc->sc_test_pin += 0x4;
612 			if (sc->sc_test_pin >= 0x20) {
613 				sc->sc_test_pin = 0x00;
614 			}
615 		}
616 		printf("CPLD(%#x), mask=%#x\n", sc->sc_test_pin, sc->sc_bit);
617 	}
618 #endif
619 
620 	pxa2x0_gpio_clear_intr(sc->sc_power_pin);
621 
622 	return 1;
623 }
624 
625 static int
wzero3kbd_reset_intr(void * arg)626 wzero3kbd_reset_intr(void *arg)
627 {
628 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
629 
630 	sysmon_task_queue_sched(0, wzero3kbd_sysmon_reset_event, sc);
631 
632 	pxa2x0_gpio_clear_intr(sc->sc_reset_pin);
633 
634 	return 1;
635 }
636 
637 static int
wzero3kbd_input_establish(void * arg,struct hpckbd_if * kbdif)638 wzero3kbd_input_establish(void *arg, struct hpckbd_if *kbdif)
639 {
640 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
641 
642 	/* Save hpckbd interface. */
643 	sc->sc_hpckbd = kbdif;
644 	sc->sc_enabled = 1;
645 
646 	return 0;
647 }
648 
649 static void
wzero3kbd_sysmon_reset_event(void * arg)650 wzero3kbd_sysmon_reset_event(void *arg)
651 {
652 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
653 
654 	sysmon_pswitch_event(&sc->sc_smpsw, PSWITCH_EVENT_PRESSED);
655 }
656 
657 static int
wzero3kbd_poll(void * arg)658 wzero3kbd_poll(void *arg)
659 {
660 	int keydown;
661 
662 	keydown = wzero3kbd_poll1(arg);
663 
664 	return keydown;
665 }
666 
667 static int
wzero3kbd_poll1(void * arg)668 wzero3kbd_poll1(void *arg)
669 {
670 	struct wzero3kbd_softc *sc = (struct wzero3kbd_softc *)arg;
671 	int row, col, data;
672 	int keycol;
673 	int keydown;
674 	int i;
675 	int s;
676 
677 	if (!sc->sc_enabled) {
678 		DPRINTF(("wzero3kbd_poll: disabled\n"));
679 		return 0;
680 	}
681 
682 	s = spltty();
683 
684 	for (col = 0; col < sc->sc_ncolumn; col++) {
685 		/* deselect column# and charge */
686 		CSR_WRITE1(KBDCOL_L, 0);
687 		CSR_WRITE1(KBDCOL_U, 0);
688 		CSR_WRITE1(KBDCHARGE, 1);
689 		delay(KEYWAIT);
690 		CSR_WRITE1(KBDCHARGE, 0);
691 
692 		/* select scan column# */
693 		keycol = 1 << col;
694 		CSR_WRITE1(KBDCOL_L, keycol & 0xff);
695 		CSR_WRITE1(KBDCOL_U, keycol >> 8);
696 		delay(KEYWAIT);
697 		CSR_WRITE1(KBDCHARGE, 0);
698 
699 		/* read key data */
700 		data = CSR_READ1(KBDDATA);
701 		for (row = 0; row < sc->sc_nrow; row++) {
702 #ifdef KEYTEST2
703 			if (!(sc->sc_enabled & 2)) {
704 #endif
705 			sc->sc_keystat[row + col * sc->sc_nrow] =
706 			    (data >> row) & 1;
707 #ifdef KEYTEST2
708 			} else if (data & (1 << row)) {
709 				printf("col = %d, row = %d, idx = %d, data = 0x%02x\n", col, row, row + col * sc->sc_nrow, data);
710 			}
711 #endif
712 		}
713 	}
714 
715 	/* deselect column# and charge */
716 	CSR_WRITE1(KBDCOL_L, 0);
717 	CSR_WRITE1(KBDCOL_U, 0);
718 	CSR_WRITE1(KBDCHARGE, 1);
719 	delay(KEYWAIT);
720 	CSR_WRITE1(KBDCHARGE, 0);
721 
722 	/* send key scan code */
723 	keydown = 0;
724 	for (i = 0; i < sc->sc_nrow * sc->sc_ncolumn; i++) {
725 		if (sc->sc_keystat[i] == sc->sc_okeystat[i])
726 			continue;
727 
728 		keydown |= sc->sc_keystat[i];
729 		hpckbd_input(sc->sc_hpckbd, sc->sc_keystat[i], i);
730 		sc->sc_okeystat[i] = sc->sc_keystat[i];
731 	}
732 
733 	splx(s);
734 
735 	return keydown;
736 }
737