j6x0tp.c revision 1.19 1 1.19 uwe /* $NetBSD: j6x0tp.c,v 1.19 2007/07/11 22:15:41 uwe Exp $ */
2 1.1 uwe
3 1.1 uwe /*
4 1.1 uwe * Copyright (c) 2003 Valeriy E. Ushakov
5 1.1 uwe * All rights reserved.
6 1.1 uwe *
7 1.1 uwe * Redistribution and use in source and binary forms, with or without
8 1.1 uwe * modification, are permitted provided that the following conditions
9 1.1 uwe * are met:
10 1.1 uwe * 1. Redistributions of source code must retain the above copyright
11 1.1 uwe * notice, this list of conditions and the following disclaimer.
12 1.1 uwe * 2. Redistributions in binary form must reproduce the above copyright
13 1.1 uwe * notice, this list of conditions and the following disclaimer in the
14 1.1 uwe * documentation and/or other materials provided with the distribution.
15 1.1 uwe * 3. The name of the author may not be used to endorse or promote products
16 1.1 uwe * derived from this software without specific prior written permission
17 1.1 uwe *
18 1.1 uwe * THIS SOFTWARE IS PROVIDED BY THE AUTHOR ``AS IS'' AND ANY EXPRESS OR
19 1.1 uwe * IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES
20 1.1 uwe * OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
21 1.1 uwe * IN NO EVENT SHALL THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT,
22 1.1 uwe * INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT
23 1.1 uwe * NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE,
24 1.1 uwe * DATA, OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
25 1.1 uwe * THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
26 1.1 uwe * (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF
27 1.1 uwe * THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28 1.1 uwe */
29 1.1 uwe
30 1.1 uwe #include <sys/cdefs.h>
31 1.19 uwe __KERNEL_RCSID(0, "$NetBSD: j6x0tp.c,v 1.19 2007/07/11 22:15:41 uwe Exp $");
32 1.1 uwe
33 1.1 uwe #include <sys/param.h>
34 1.1 uwe #include <sys/kernel.h>
35 1.1 uwe #include <sys/device.h>
36 1.1 uwe #include <sys/malloc.h>
37 1.1 uwe #include <sys/systm.h>
38 1.1 uwe #include <sys/callout.h>
39 1.1 uwe
40 1.3 uwe #include "opt_j6x0tp.h"
41 1.3 uwe
42 1.1 uwe #include <dev/wscons/wsconsio.h>
43 1.1 uwe #include <dev/wscons/wsmousevar.h>
44 1.3 uwe #include <dev/wscons/wskbdvar.h>
45 1.3 uwe #include <dev/wscons/wsksymvar.h>
46 1.3 uwe #include <dev/wscons/wsksymdef.h>
47 1.5 tsarna #include <dev/hpc/hpctpanelvar.h>
48 1.1 uwe
49 1.1 uwe #include <machine/platid.h>
50 1.1 uwe #include <machine/platid_mask.h>
51 1.1 uwe
52 1.1 uwe #include <machine/intr.h>
53 1.1 uwe
54 1.1 uwe #include <sh3/exception.h>
55 1.1 uwe #include <sh3/intcreg.h>
56 1.1 uwe #include <sh3/pfcreg.h>
57 1.1 uwe #include <sh3/adcreg.h>
58 1.1 uwe
59 1.2 uwe #include <sh3/dev/adcvar.h>
60 1.2 uwe
61 1.2 uwe
62 1.19 uwe #define J6X0TP_DEBUG 1
63 1.1 uwe #if 0 /* XXX: disabled in favor of local version that uses printf_nolog */
64 1.1 uwe #define DPRINTF_ENABLE
65 1.1 uwe #define DPRINTF_DEBUG j6x0tp_debug
66 1.1 uwe #define DPRINTF_LEVEL 0
67 1.1 uwe #include <machine/debug.h>
68 1.1 uwe #else
69 1.1 uwe #ifdef J6X0TP_DEBUG
70 1.1 uwe volatile int j6x0tp_debug = 0;
71 1.3 uwe #define DPRINTF_PRINTF printf_nolog
72 1.3 uwe #define DPRINTF(arg) if (j6x0tp_debug) DPRINTF_PRINTF arg
73 1.3 uwe #define DPRINTFN(n, arg) if (j6x0tp_debug > (n)) DPRINTF_PRINTF arg
74 1.1 uwe #else
75 1.3 uwe #define DPRINTF(arg) ((void)0)
76 1.1 uwe #define DPRINTFN(n, arg) ((void)0)
77 1.1 uwe #endif
78 1.1 uwe #endif
79 1.1 uwe
80 1.1 uwe
81 1.3 uwe /*
82 1.3 uwe * PFC bits pertinent to Jornada 6x0 touchpanel
83 1.3 uwe */
84 1.1 uwe #define PHDR_TP_PEN_DOWN 0x08
85 1.1 uwe
86 1.1 uwe #define SCPDR_TP_SCAN_ENABLE 0x20
87 1.1 uwe #define SCPDR_TP_SCAN_Y 0x02
88 1.1 uwe #define SCPDR_TP_SCAN_X 0x01
89 1.1 uwe
90 1.3 uwe /*
91 1.4 uwe * A/D converter channels to get x/y from
92 1.3 uwe */
93 1.1 uwe #define ADC_CHANNEL_TP_Y 1
94 1.1 uwe #define ADC_CHANNEL_TP_X 2
95 1.1 uwe
96 1.3 uwe /*
97 1.3 uwe * Default (read: my device :) raw X/Y values for framebuffer edges.
98 1.3 uwe * XXX: defopt these?
99 1.3 uwe */
100 1.3 uwe #define J6X0TP_FB_LEFT 38
101 1.3 uwe #define J6X0TP_FB_RIGHT 950
102 1.3 uwe #define J6X0TP_FB_TOP 80
103 1.3 uwe #define J6X0TP_FB_BOTTOM 900
104 1.3 uwe
105 1.3 uwe /*
106 1.3 uwe * Bottom of the n'th hard icon (n = 1..4)
107 1.3 uwe */
108 1.3 uwe #define J6X0TP_HARD_ICON_MAX_Y(n) \
109 1.3 uwe (J6X0TP_FB_TOP + ((J6X0TP_FB_BOTTOM - J6X0TP_FB_TOP) / 4) * (n))
110 1.3 uwe
111 1.1 uwe
112 1.1 uwe struct j6x0tp_softc {
113 1.1 uwe struct device sc_dev;
114 1.1 uwe
115 1.3 uwe #define J6X0TP_WSMOUSE_ENABLED 0x01
116 1.3 uwe #define J6X0TP_WSKBD_ENABLED 0x02
117 1.3 uwe int sc_enabled;
118 1.3 uwe
119 1.3 uwe int sc_hard_icon;
120 1.3 uwe
121 1.1 uwe struct callout sc_touch_ch;
122 1.1 uwe
123 1.1 uwe struct device *sc_wsmousedev;
124 1.3 uwe struct device *sc_wskbddev;
125 1.3 uwe
126 1.3 uwe struct tpcalib_softc sc_tpcalib; /* calibration info for wsmouse */
127 1.1 uwe };
128 1.1 uwe
129 1.3 uwe
130 1.3 uwe /* config machinery */
131 1.1 uwe static int j6x0tp_match(struct device *, struct cfdata *, void *);
132 1.1 uwe static void j6x0tp_attach(struct device *, struct device *, void *);
133 1.3 uwe
134 1.3 uwe /* wsmouse accessops */
135 1.3 uwe static int j6x0tp_wsmouse_enable(void *);
136 1.16 christos static int j6x0tp_wsmouse_ioctl(void *, u_long, void *, int,
137 1.10 christos struct lwp *);
138 1.3 uwe static void j6x0tp_wsmouse_disable(void *);
139 1.3 uwe
140 1.3 uwe /* wskbd accessops */
141 1.3 uwe static int j6x0tp_wskbd_enable(void *, int);
142 1.3 uwe static void j6x0tp_wskbd_set_leds(void *, int);
143 1.16 christos static int j6x0tp_wskbd_ioctl(void *, u_long, void *, int,
144 1.10 christos struct lwp *);
145 1.3 uwe
146 1.19 uwe /* power hook */
147 1.19 uwe static void j6x0tp_powerhook(int, void *);
148 1.19 uwe
149 1.3 uwe /* internal driver routines */
150 1.3 uwe static void j6x0tp_enable(struct j6x0tp_softc *);
151 1.3 uwe static void j6x0tp_disable(struct j6x0tp_softc *);
152 1.18 uwe static int j6x0tp_enable_child(struct j6x0tp_softc *, int, int);
153 1.3 uwe static int j6x0tp_intr(void *);
154 1.3 uwe static void j6x0tp_start_polling(void *);
155 1.3 uwe static void j6x0tp_stop_polling(struct j6x0tp_softc *);
156 1.3 uwe static void j6x0tp_callout_wsmouse(void *);
157 1.3 uwe static void j6x0tp_callout_wskbd(void *);
158 1.3 uwe static void j6x0tp_wsmouse_input(struct j6x0tp_softc *, int, int);
159 1.3 uwe static void j6x0tp_get_raw_xy(int *, int *);
160 1.3 uwe static int j6x0tp_get_hard_icon(int, int);
161 1.1 uwe
162 1.1 uwe
163 1.11 uwe static const struct wsmouse_accessops j6x0tp_accessops = {
164 1.3 uwe j6x0tp_wsmouse_enable,
165 1.3 uwe j6x0tp_wsmouse_ioctl,
166 1.3 uwe j6x0tp_wsmouse_disable
167 1.1 uwe };
168 1.1 uwe
169 1.1 uwe static const struct wsmouse_calibcoords j6x0tp_default_calib = {
170 1.1 uwe 0, 0, 639, 239,
171 1.1 uwe 4,
172 1.3 uwe {{ J6X0TP_FB_LEFT, J6X0TP_FB_TOP, 0, 0 },
173 1.3 uwe { J6X0TP_FB_RIGHT, J6X0TP_FB_TOP, 639, 0 },
174 1.3 uwe { J6X0TP_FB_LEFT, J6X0TP_FB_BOTTOM, 0, 239 },
175 1.3 uwe { J6X0TP_FB_RIGHT, J6X0TP_FB_BOTTOM, 639, 239 }}
176 1.3 uwe };
177 1.3 uwe
178 1.11 uwe static const struct wskbd_accessops j6x0tp_wskbd_accessops = {
179 1.3 uwe j6x0tp_wskbd_enable,
180 1.3 uwe j6x0tp_wskbd_set_leds,
181 1.3 uwe j6x0tp_wskbd_ioctl
182 1.3 uwe };
183 1.3 uwe
184 1.3 uwe
185 1.3 uwe #ifndef J6X0TP_SETTINGS_ICON_KEYSYM
186 1.3 uwe #define J6X0TP_SETTINGS_ICON_KEYSYM KS_Home
187 1.3 uwe #endif
188 1.3 uwe #ifndef J6X0TP_PGUP_ICON_KEYSYM
189 1.3 uwe #define J6X0TP_PGUP_ICON_KEYSYM KS_Prior
190 1.3 uwe #endif
191 1.3 uwe #ifndef J6X0TP_PGDN_ICON_KEYSYM
192 1.3 uwe #define J6X0TP_PGDN_ICON_KEYSYM KS_Next
193 1.3 uwe #endif
194 1.3 uwe #ifndef J6X0TP_SWITCH_ICON_KEYSYM
195 1.3 uwe #define J6X0TP_SWITCH_ICON_KEYSYM KS_End
196 1.3 uwe #endif
197 1.3 uwe
198 1.3 uwe static const keysym_t j6x0tp_wskbd_keydesc[] = {
199 1.3 uwe KS_KEYCODE(1), J6X0TP_SETTINGS_ICON_KEYSYM,
200 1.3 uwe KS_KEYCODE(2), J6X0TP_PGUP_ICON_KEYSYM,
201 1.3 uwe KS_KEYCODE(3), J6X0TP_PGDN_ICON_KEYSYM,
202 1.3 uwe KS_KEYCODE(4), J6X0TP_SWITCH_ICON_KEYSYM
203 1.3 uwe };
204 1.3 uwe
205 1.11 uwe static const struct wscons_keydesc j6x0tp_wskbd_keydesctab[] = {
206 1.3 uwe { KB_US, 0,
207 1.3 uwe sizeof(j6x0tp_wskbd_keydesc)/sizeof(keysym_t),
208 1.3 uwe j6x0tp_wskbd_keydesc
209 1.3 uwe },
210 1.3 uwe {0, 0, 0, 0}
211 1.3 uwe };
212 1.3 uwe
213 1.11 uwe static const struct wskbd_mapdata j6x0tp_wskbd_keymapdata = {
214 1.3 uwe j6x0tp_wskbd_keydesctab, KB_US
215 1.1 uwe };
216 1.1 uwe
217 1.1 uwe
218 1.3 uwe CFATTACH_DECL(j6x0tp, sizeof(struct j6x0tp_softc),
219 1.3 uwe j6x0tp_match, j6x0tp_attach, NULL, NULL);
220 1.1 uwe
221 1.1 uwe
222 1.1 uwe static int
223 1.3 uwe j6x0tp_match(struct device *parent, struct cfdata *cf, void *aux)
224 1.1 uwe {
225 1.1 uwe
226 1.1 uwe /*
227 1.8 uwe * XXX: platid_mask_MACH_HP_LX also matches 360LX. It's not
228 1.8 uwe * confirmed whether touch panel in 360LX is connected this
229 1.8 uwe * way. We may need to regroup platid masks.
230 1.1 uwe */
231 1.8 uwe if (!platid_match(&platid, &platid_mask_MACH_HP_JORNADA_6XX)
232 1.8 uwe && !platid_match(&platid, &platid_mask_MACH_HP_LX))
233 1.1 uwe return (0);
234 1.1 uwe
235 1.3 uwe if (strcmp(cf->cf_name, "j6x0tp") != 0)
236 1.1 uwe return (0);
237 1.1 uwe
238 1.1 uwe return (1);
239 1.1 uwe }
240 1.1 uwe
241 1.1 uwe
242 1.1 uwe static void
243 1.1 uwe j6x0tp_attach(struct device *parent, struct device *self, void *aux)
244 1.1 uwe {
245 1.1 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
246 1.1 uwe struct wsmousedev_attach_args wsma;
247 1.3 uwe struct wskbddev_attach_args wska;
248 1.1 uwe
249 1.1 uwe printf("\n");
250 1.1 uwe
251 1.1 uwe sc->sc_enabled = 0;
252 1.3 uwe sc->sc_hard_icon = 0;
253 1.1 uwe
254 1.19 uwe /*
255 1.19 uwe * Hook for dopowerhooks(9). We don't implement detach, so
256 1.19 uwe * don't bother saving a cookie to disablish the power hook.
257 1.19 uwe */
258 1.19 uwe (void)powerhook_establish(device_xname(&sc->sc_dev),
259 1.19 uwe j6x0tp_powerhook, sc);
260 1.19 uwe
261 1.3 uwe /* touch-panel as a pointing device */
262 1.1 uwe wsma.accessops = &j6x0tp_accessops;
263 1.1 uwe wsma.accesscookie = sc;
264 1.1 uwe
265 1.7 drochner sc->sc_wsmousedev = config_found_ia(self, "wsmousedev", &wsma,
266 1.7 drochner wsmousedevprint);
267 1.1 uwe if (sc->sc_wsmousedev == NULL)
268 1.1 uwe return;
269 1.1 uwe
270 1.3 uwe /* on-screen "hard icons" as a keyboard device */
271 1.3 uwe wska.console = 0;
272 1.3 uwe wska.keymap = &j6x0tp_wskbd_keymapdata;
273 1.3 uwe wska.accessops = &j6x0tp_wskbd_accessops;
274 1.3 uwe wska.accesscookie = sc;
275 1.3 uwe
276 1.9 uwe sc->sc_wskbddev = config_found_ia(self, "wskbddev", &wska,
277 1.7 drochner wskbddevprint);
278 1.3 uwe
279 1.4 uwe /* init calibration, set default parameters */
280 1.1 uwe tpcalib_init(&sc->sc_tpcalib);
281 1.1 uwe tpcalib_ioctl(&sc->sc_tpcalib, WSMOUSEIO_SCALIBCOORDS,
282 1.16 christos (void *)__UNCONST(&j6x0tp_default_calib), 0, 0);
283 1.1 uwe
284 1.3 uwe /* used when in polling mode */
285 1.19 uwe callout_init(&sc->sc_touch_ch, 0);
286 1.1 uwe
287 1.3 uwe /* establish interrupt handler, but disable until opened */
288 1.1 uwe intc_intr_establish(SH7709_INTEVT2_IRQ3, IST_EDGE, IPL_TTY,
289 1.1 uwe j6x0tp_intr, sc);
290 1.3 uwe intc_intr_disable(SH7709_INTEVT2_IRQ3);
291 1.1 uwe }
292 1.1 uwe
293 1.1 uwe
294 1.19 uwe static void
295 1.19 uwe j6x0tp_powerhook(int why, void *cookie)
296 1.19 uwe {
297 1.19 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)cookie;
298 1.19 uwe
299 1.19 uwe printf("%s: powerhook(%d)\n", device_xname(&sc->sc_dev), why);
300 1.19 uwe
301 1.19 uwe if (!sc->sc_enabled)
302 1.19 uwe return;
303 1.19 uwe
304 1.19 uwe if (why == PWR_SUSPEND) {
305 1.19 uwe j6x0tp_disable(sc);
306 1.19 uwe }
307 1.19 uwe else if (why == PWR_RESUME) {
308 1.19 uwe j6x0tp_enable(sc);
309 1.19 uwe }
310 1.19 uwe }
311 1.19 uwe
312 1.19 uwe
313 1.3 uwe /*
314 1.3 uwe * Enable touch panel: we start in interrupt mode.
315 1.3 uwe * Must be called as spltty().
316 1.3 uwe */
317 1.3 uwe static void
318 1.3 uwe j6x0tp_enable(struct j6x0tp_softc *sc)
319 1.3 uwe {
320 1.3 uwe
321 1.17 uwe DPRINTFN(2, ("%s: enable\n", device_xname(&sc->sc_dev)));
322 1.3 uwe intc_intr_enable(SH7709_INTEVT2_IRQ3);
323 1.3 uwe }
324 1.3 uwe
325 1.3 uwe
326 1.3 uwe /*
327 1.3 uwe * Disable touch panel: disable interrupt, cancel pending callout.
328 1.3 uwe * Must be called as spltty().
329 1.3 uwe */
330 1.3 uwe static void
331 1.3 uwe j6x0tp_disable(struct j6x0tp_softc *sc)
332 1.3 uwe {
333 1.3 uwe
334 1.17 uwe DPRINTFN(2, ("%s: disable\n", device_xname(&sc->sc_dev)));
335 1.3 uwe intc_intr_disable(SH7709_INTEVT2_IRQ3);
336 1.3 uwe callout_stop(&sc->sc_touch_ch);
337 1.3 uwe }
338 1.3 uwe
339 1.1 uwe
340 1.3 uwe static int
341 1.18 uwe j6x0tp_enable_child(struct j6x0tp_softc *sc, int child, int on)
342 1.3 uwe {
343 1.3 uwe int s = spltty();
344 1.1 uwe
345 1.3 uwe if (on) {
346 1.3 uwe if (!sc->sc_enabled)
347 1.3 uwe j6x0tp_enable(sc);
348 1.3 uwe sc->sc_enabled |= child;
349 1.3 uwe } else {
350 1.3 uwe sc->sc_enabled &= ~child;
351 1.3 uwe if (!sc->sc_enabled)
352 1.3 uwe j6x0tp_disable(sc);
353 1.3 uwe }
354 1.1 uwe
355 1.1 uwe splx(s);
356 1.1 uwe return (0);
357 1.1 uwe }
358 1.1 uwe
359 1.1 uwe
360 1.3 uwe static int
361 1.3 uwe j6x0tp_wsmouse_enable(void *self)
362 1.3 uwe {
363 1.3 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
364 1.3 uwe
365 1.17 uwe DPRINTFN(1, ("%s: wsmouse enable\n", device_xname(&sc->sc_dev)));
366 1.18 uwe return (j6x0tp_enable_child(sc, J6X0TP_WSMOUSE_ENABLED, 1));
367 1.3 uwe }
368 1.3 uwe
369 1.3 uwe
370 1.1 uwe static void
371 1.3 uwe j6x0tp_wsmouse_disable(void *self)
372 1.1 uwe {
373 1.1 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
374 1.1 uwe
375 1.17 uwe DPRINTFN(1, ("%s: wsmouse disable\n", device_xname(&sc->sc_dev)));
376 1.18 uwe j6x0tp_enable_child(sc, J6X0TP_WSMOUSE_ENABLED, 0);
377 1.3 uwe }
378 1.1 uwe
379 1.1 uwe
380 1.3 uwe static int
381 1.3 uwe j6x0tp_wskbd_enable(void *self, int on)
382 1.3 uwe {
383 1.3 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
384 1.1 uwe
385 1.17 uwe DPRINTFN(1, ("%s: wskbd %sable\n", device_xname(&sc->sc_dev),
386 1.3 uwe on ? "en" : "dis"));
387 1.18 uwe return (j6x0tp_enable_child(sc, J6X0TP_WSKBD_ENABLED, on));
388 1.1 uwe }
389 1.1 uwe
390 1.1 uwe
391 1.1 uwe static int
392 1.1 uwe j6x0tp_intr(void *self)
393 1.1 uwe {
394 1.1 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
395 1.1 uwe
396 1.1 uwe uint8_t irr0;
397 1.1 uwe uint8_t phdr, touched;
398 1.1 uwe unsigned int steady, tremor_timeout;
399 1.1 uwe
400 1.1 uwe irr0 = _reg_read_1(SH7709_IRR0);
401 1.1 uwe if ((irr0 & IRR0_IRQ3) == 0) {
402 1.1 uwe #ifdef DIAGNOSTIC
403 1.17 uwe printf("%s: irr0 %02x?\n", device_xname(&sc->sc_dev), irr0);
404 1.1 uwe #endif
405 1.1 uwe return (0);
406 1.1 uwe }
407 1.1 uwe
408 1.3 uwe if (!sc->sc_enabled) {
409 1.17 uwe DPRINTFN(1, ("%s: intr: !sc_enabled\n",
410 1.17 uwe device_xname(&sc->sc_dev)));
411 1.3 uwe intc_intr_disable(SH7709_INTEVT2_IRQ3);
412 1.3 uwe goto served;
413 1.3 uwe }
414 1.3 uwe
415 1.3 uwe
416 1.1 uwe /*
417 1.1 uwe * Number of times the "touched" bit should be read
418 1.1 uwe * consecutively.
419 1.1 uwe */
420 1.1 uwe # define TREMOR_THRESHOLD 0x300
421 1.1 uwe
422 1.1 uwe steady = 0;
423 1.1 uwe tremor_timeout = TREMOR_THRESHOLD * 16; /* XXX: arbitrary */
424 1.1 uwe touched = PHDR_TP_PEN_DOWN; /* we start with "touched" state */
425 1.1 uwe
426 1.1 uwe do {
427 1.1 uwe phdr = _reg_read_1(SH7709_PHDR);
428 1.1 uwe
429 1.1 uwe if ((phdr & PHDR_TP_PEN_DOWN) == touched)
430 1.1 uwe ++steady;
431 1.1 uwe else {
432 1.1 uwe steady = 0;
433 1.1 uwe touched = phdr & PHDR_TP_PEN_DOWN;
434 1.1 uwe }
435 1.1 uwe
436 1.1 uwe if (--tremor_timeout == 0) {
437 1.1 uwe DPRINTF(("%s: tremor timeout!\n",
438 1.17 uwe device_xname(&sc->sc_dev)));
439 1.1 uwe goto served;
440 1.1 uwe }
441 1.1 uwe } while (steady < TREMOR_THRESHOLD);
442 1.1 uwe
443 1.3 uwe if (touched) {
444 1.3 uwe intc_intr_disable(SH7709_INTEVT2_IRQ3);
445 1.3 uwe
446 1.3 uwe /*
447 1.3 uwe * ADC readings are not stable yet, so schedule
448 1.3 uwe * callout instead of accessing ADC from the interrupt
449 1.3 uwe * handler only to immediately delay().
450 1.3 uwe */
451 1.3 uwe callout_reset(&sc->sc_touch_ch, hz/32,
452 1.3 uwe j6x0tp_start_polling, sc);
453 1.3 uwe } else
454 1.17 uwe DPRINTFN(1, ("%s: tremor\n", device_xname(&sc->sc_dev)));
455 1.3 uwe served:
456 1.3 uwe /* clear the interrupt (XXX: protect access?) */
457 1.3 uwe _reg_write_1(SH7709_IRR0, irr0 & ~IRR0_IRQ3);
458 1.3 uwe
459 1.3 uwe return (1);
460 1.3 uwe }
461 1.3 uwe
462 1.3 uwe
463 1.3 uwe /*
464 1.3 uwe * Called from the interrupt handler at spltty() upon first touch.
465 1.3 uwe * Decide if we are going to report this touch as a mouse click/drag
466 1.3 uwe * or as a key press.
467 1.3 uwe */
468 1.3 uwe static void
469 1.3 uwe j6x0tp_start_polling(void *self)
470 1.3 uwe {
471 1.3 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
472 1.3 uwe uint8_t phdr;
473 1.3 uwe int do_mouse, do_kbd;
474 1.3 uwe int rawx, rawy;
475 1.3 uwe int icon;
476 1.3 uwe
477 1.3 uwe phdr = _reg_read_1(SH7709_PHDR);
478 1.3 uwe if ((phdr & PHDR_TP_PEN_DOWN) == 0) {
479 1.3 uwe DPRINTFN(2, ("%s: start: pen is not down\n",
480 1.17 uwe device_xname(&sc->sc_dev)));
481 1.3 uwe j6x0tp_stop_polling(sc);
482 1.1 uwe }
483 1.1 uwe
484 1.3 uwe j6x0tp_get_raw_xy(&rawx, &rawy);
485 1.3 uwe DPRINTFN(2, ("%s: start: %4d %4d -> ",
486 1.17 uwe device_xname(&sc->sc_dev), rawx, rawy));
487 1.3 uwe
488 1.3 uwe do_mouse = sc->sc_enabled & J6X0TP_WSMOUSE_ENABLED;
489 1.3 uwe #ifdef J6X0TP_WSMOUSE_EXCLUSIVE
490 1.3 uwe if (do_mouse)
491 1.3 uwe do_kbd = 0;
492 1.3 uwe else
493 1.3 uwe #endif
494 1.3 uwe do_kbd = sc->sc_enabled & J6X0TP_WSKBD_ENABLED;
495 1.1 uwe
496 1.3 uwe icon = 0;
497 1.3 uwe if (do_kbd)
498 1.3 uwe icon = j6x0tp_get_hard_icon(rawx, rawy);
499 1.3 uwe
500 1.3 uwe if (icon != 0) {
501 1.3 uwe DPRINTFN(2, ("icon %d\n", icon));
502 1.3 uwe sc->sc_hard_icon = icon;
503 1.3 uwe wskbd_input(sc->sc_wskbddev, WSCONS_EVENT_KEY_DOWN, icon);
504 1.3 uwe callout_reset(&sc->sc_touch_ch, hz/32,
505 1.3 uwe j6x0tp_callout_wskbd, sc);
506 1.3 uwe } else if (do_mouse) {
507 1.3 uwe DPRINTFN(2, ("mouse\n"));
508 1.3 uwe j6x0tp_wsmouse_input(sc, rawx, rawy);
509 1.1 uwe callout_reset(&sc->sc_touch_ch, hz/32,
510 1.3 uwe j6x0tp_callout_wsmouse, sc);
511 1.3 uwe } else {
512 1.3 uwe DPRINTFN(2, ("ignore\n"));
513 1.3 uwe j6x0tp_stop_polling(sc);
514 1.3 uwe }
515 1.3 uwe }
516 1.3 uwe
517 1.3 uwe
518 1.3 uwe /*
519 1.3 uwe * Re-enable touch panel interrupt.
520 1.3 uwe * Called as spltty() when polling code detects pen-up.
521 1.3 uwe */
522 1.3 uwe static void
523 1.3 uwe j6x0tp_stop_polling(struct j6x0tp_softc *sc)
524 1.3 uwe {
525 1.3 uwe uint8_t irr0;
526 1.3 uwe
527 1.17 uwe DPRINTFN(2, ("%s: stop\n", device_xname(&sc->sc_dev)));
528 1.1 uwe
529 1.3 uwe /* clear pending interrupt signal before re-enabling the interrupt */
530 1.3 uwe irr0 = _reg_read_1(SH7709_IRR0);
531 1.3 uwe if ((irr0 & IRR0_IRQ3) != 0)
532 1.3 uwe _reg_write_1(SH7709_IRR0, irr0 & ~IRR0_IRQ3);
533 1.1 uwe
534 1.3 uwe intc_intr_enable(SH7709_INTEVT2_IRQ3);
535 1.1 uwe }
536 1.1 uwe
537 1.1 uwe
538 1.3 uwe /*
539 1.3 uwe * We are reporting this touch as a keyboard event.
540 1.3 uwe * Poll touch screen waiting for pen-up.
541 1.3 uwe */
542 1.1 uwe static void
543 1.3 uwe j6x0tp_callout_wskbd(void *self)
544 1.1 uwe {
545 1.1 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
546 1.3 uwe uint8_t phdr;
547 1.1 uwe int s;
548 1.1 uwe
549 1.1 uwe s = spltty();
550 1.1 uwe
551 1.1 uwe if (!sc->sc_enabled) {
552 1.3 uwe DPRINTFN(1, ("%s: wskbd callout: !sc_enabled\n",
553 1.17 uwe device_xname(&sc->sc_dev)));
554 1.1 uwe splx(s);
555 1.1 uwe return;
556 1.1 uwe }
557 1.1 uwe
558 1.1 uwe phdr = _reg_read_1(SH7709_PHDR);
559 1.3 uwe if ((phdr & PHDR_TP_PEN_DOWN) != 0) {
560 1.3 uwe /*
561 1.3 uwe * Pen is still down, continue polling. Wskbd's
562 1.3 uwe * auto-repeat takes care of repeating the key.
563 1.3 uwe */
564 1.3 uwe callout_schedule(&sc->sc_touch_ch, hz/32);
565 1.3 uwe } else {
566 1.3 uwe wskbd_input(sc->sc_wskbddev,
567 1.3 uwe WSCONS_EVENT_KEY_UP, sc->sc_hard_icon);
568 1.3 uwe j6x0tp_stop_polling(sc);
569 1.3 uwe }
570 1.3 uwe splx(s);
571 1.3 uwe }
572 1.3 uwe
573 1.1 uwe
574 1.3 uwe /*
575 1.3 uwe * We are reporting this touch as a mouse click/drag.
576 1.3 uwe */
577 1.3 uwe static void
578 1.3 uwe j6x0tp_callout_wsmouse(void *self)
579 1.3 uwe {
580 1.3 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
581 1.3 uwe uint8_t phdr;
582 1.3 uwe int rawx, rawy;
583 1.3 uwe int s;
584 1.1 uwe
585 1.3 uwe s = spltty();
586 1.1 uwe
587 1.3 uwe if (!sc->sc_enabled) {
588 1.3 uwe DPRINTFN(1, ("%s: wsmouse callout: !sc_enabled\n",
589 1.17 uwe device_xname(&sc->sc_dev)));
590 1.1 uwe splx(s);
591 1.1 uwe return;
592 1.1 uwe }
593 1.1 uwe
594 1.3 uwe phdr = _reg_read_1(SH7709_PHDR);
595 1.3 uwe if ((phdr & PHDR_TP_PEN_DOWN) != 0) {
596 1.3 uwe j6x0tp_get_raw_xy(&rawx, &rawy);
597 1.3 uwe j6x0tp_wsmouse_input(sc, rawx, rawy); /* mouse dragged */
598 1.3 uwe callout_schedule(&sc->sc_touch_ch, hz/32);
599 1.3 uwe } else {
600 1.15 plunky wsmouse_input(sc->sc_wsmousedev, 0, 0, 0, 0, 0, /* button up */
601 1.3 uwe WSMOUSE_INPUT_DELTA);
602 1.3 uwe j6x0tp_stop_polling(sc);
603 1.3 uwe }
604 1.3 uwe splx(s);
605 1.3 uwe }
606 1.3 uwe
607 1.3 uwe
608 1.3 uwe /*
609 1.3 uwe * Report mouse click/drag.
610 1.3 uwe */
611 1.3 uwe static void
612 1.3 uwe j6x0tp_wsmouse_input(struct j6x0tp_softc *sc, int rawx, int rawy)
613 1.3 uwe {
614 1.3 uwe int x, y;
615 1.3 uwe
616 1.3 uwe tpcalib_trans(&sc->sc_tpcalib, rawx, rawy, &x, &y);
617 1.3 uwe
618 1.3 uwe DPRINTFN(3, ("%s: %4d %4d -> %3d %3d\n",
619 1.17 uwe device_xname(&sc->sc_dev), rawx, rawy, x, y));
620 1.3 uwe
621 1.3 uwe wsmouse_input(sc->sc_wsmousedev,
622 1.15 plunky 1, /* button */
623 1.15 plunky x, y, 0, 0,
624 1.15 plunky WSMOUSE_INPUT_ABSOLUTE_X | WSMOUSE_INPUT_ABSOLUTE_Y);
625 1.3 uwe }
626 1.3 uwe
627 1.3 uwe
628 1.3 uwe /*
629 1.3 uwe * Read raw X/Y coordinates from the ADC.
630 1.3 uwe * XXX: protect accesses to SCPDR?
631 1.3 uwe */
632 1.3 uwe static void
633 1.3 uwe j6x0tp_get_raw_xy(int *rawxp, int *rawyp)
634 1.3 uwe {
635 1.3 uwe uint8_t scpdr;
636 1.1 uwe
637 1.1 uwe /* Y axis */
638 1.1 uwe scpdr = _reg_read_1(SH7709_SCPDR);
639 1.1 uwe scpdr |= SCPDR_TP_SCAN_ENABLE;
640 1.1 uwe scpdr &= ~SCPDR_TP_SCAN_Y; /* pull low to scan */
641 1.1 uwe _reg_write_1(SH7709_SCPDR, scpdr);
642 1.1 uwe delay(10);
643 1.3 uwe
644 1.3 uwe *rawyp = adc_sample_channel(ADC_CHANNEL_TP_Y);
645 1.1 uwe
646 1.1 uwe /* X axis */
647 1.1 uwe scpdr = _reg_read_1(SH7709_SCPDR);
648 1.1 uwe scpdr |= SCPDR_TP_SCAN_Y;
649 1.1 uwe scpdr &= ~SCPDR_TP_SCAN_X; /* pull low to scan */
650 1.1 uwe _reg_write_1(SH7709_SCPDR, scpdr);
651 1.1 uwe delay(10);
652 1.3 uwe
653 1.3 uwe *rawxp = adc_sample_channel(ADC_CHANNEL_TP_X);
654 1.1 uwe
655 1.1 uwe /* restore SCPDR */
656 1.1 uwe scpdr = _reg_read_1(SH7709_SCPDR);
657 1.1 uwe scpdr |= SCPDR_TP_SCAN_X;
658 1.1 uwe scpdr &= ~SCPDR_TP_SCAN_ENABLE;
659 1.1 uwe _reg_write_1(SH7709_SCPDR, scpdr);
660 1.3 uwe }
661 1.1 uwe
662 1.1 uwe
663 1.3 uwe /*
664 1.3 uwe * Check if the (rawx, rawy) is inside one of the 4 hard icons.
665 1.3 uwe * Return the icon number 1..4, or 0 if not inside an icon.
666 1.3 uwe */
667 1.3 uwe static int
668 1.3 uwe j6x0tp_get_hard_icon(int rawx, int rawy)
669 1.3 uwe {
670 1.3 uwe if (rawx <= J6X0TP_FB_RIGHT)
671 1.3 uwe return (0);
672 1.1 uwe
673 1.3 uwe if (rawy < J6X0TP_HARD_ICON_MAX_Y(1))
674 1.3 uwe return (1);
675 1.3 uwe else if (rawy < J6X0TP_HARD_ICON_MAX_Y(2))
676 1.3 uwe return (2);
677 1.3 uwe else if (rawy < J6X0TP_HARD_ICON_MAX_Y(3))
678 1.3 uwe return (3);
679 1.3 uwe else
680 1.3 uwe return (4);
681 1.1 uwe }
682 1.1 uwe
683 1.1 uwe
684 1.1 uwe static int
685 1.16 christos j6x0tp_wsmouse_ioctl(void *self, u_long cmd, void *data, int flag,
686 1.10 christos struct lwp *l)
687 1.1 uwe {
688 1.1 uwe struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self;
689 1.1 uwe
690 1.10 christos return hpc_tpanel_ioctl(&sc->sc_tpcalib, cmd, data, flag, l);
691 1.3 uwe }
692 1.3 uwe
693 1.3 uwe
694 1.3 uwe static int
695 1.16 christos j6x0tp_wskbd_ioctl(void *self, u_long cmd, void *data, int flag,
696 1.10 christos struct lwp *l)
697 1.3 uwe {
698 1.3 uwe /* struct j6x0tp_softc *sc = (struct j6x0tp_softc *)self; */
699 1.3 uwe
700 1.3 uwe switch (cmd) {
701 1.3 uwe case WSKBDIO_GTYPE:
702 1.3 uwe *(int *)data = WSKBD_TYPE_HPC_BTN; /* may be use new type? */
703 1.3 uwe return (0);
704 1.3 uwe
705 1.3 uwe case WSKBDIO_GETLEDS:
706 1.3 uwe *(int *)data = 0;
707 1.3 uwe return (0);
708 1.3 uwe
709 1.3 uwe default:
710 1.3 uwe return (EPASSTHROUGH);
711 1.3 uwe }
712 1.3 uwe }
713 1.3 uwe
714 1.3 uwe
715 1.3 uwe static void
716 1.3 uwe j6x0tp_wskbd_set_leds(void *self, int leds)
717 1.3 uwe {
718 1.3 uwe
719 1.3 uwe /* nothing to do*/
720 1.3 uwe return;
721 1.1 uwe }
722