4
* Copyright (c) 2006 Andrzej Zaborowski <balrog@zabor.org>
5
* Copyright (C) 2008 Nokia Corporation
7
* This program is free software; you can redistribute it and/or
8
* modify it under the terms of the GNU General Public License as
9
* published by the Free Software Foundation; either version 2 or
10
* (at your option) version 3 of the License.
12
* This program is distributed in the hope that it will be useful,
13
* but WITHOUT ANY WARRANTY; without even the implied warranty of
14
* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15
* GNU General Public License for more details.
17
* You should have received a copy of the GNU General Public License along
18
* with this program; if not, see <http://www.gnu.org/licenses/>.
22
#include "qemu/timer.h"
23
#include "ui/console.h"
24
#include "hw/devices.h"
26
#define TSC_CUT_RESOLUTION(value, p) ((value) >> (16 - (p ? 12 : 10)))
29
qemu_irq pint; /* Combination of the nPENIRQ and DAV signals */
36
int state, reg, irq, command;
60
TSC_MODE_XYZ_SCAN = 0x0,
78
static const uint16_t mode_regs[16] = {
79
0xf000, /* X, Y, Z scan */
80
0xc000, /* X, Y scan */
87
0x0800, /* AUX scan */
90
0x0080, /* Short-circuit test */
91
0x0000, /* Reserved */
92
0x0000, /* X+, X- drivers */
93
0x0000, /* Y+, Y- drivers */
94
0x0000, /* Y+, X- drivers */
97
#define X_TRANSFORM(s) \
98
((s->y * s->tr[0] - s->x * s->tr[1]) / s->tr[2] + s->tr[3])
99
#define Y_TRANSFORM(s) \
100
((s->y * s->tr[4] - s->x * s->tr[5]) / s->tr[6] + s->tr[7])
101
#define Z1_TRANSFORM(s) \
102
((400 - ((s)->x >> 7) + ((s)->pressure << 10)) << 4)
103
#define Z2_TRANSFORM(s) \
104
((4000 + ((s)->y >> 7) - ((s)->pressure << 10)) << 4)
106
#define AUX_VAL (700 << 4) /* +/- 3 at 12-bit */
107
#define TEMP1_VAL (1264 << 4) /* +/- 5 at 12-bit */
108
#define TEMP2_VAL (1531 << 4) /* +/- 5 at 12-bit */
110
static uint16_t tsc2005_read(TSC2005State *s, int reg)
116
s->dav &= ~mode_regs[TSC_MODE_X];
117
return TSC_CUT_RESOLUTION(X_TRANSFORM(s), s->precision) +
120
s->dav &= ~mode_regs[TSC_MODE_Y];
122
return TSC_CUT_RESOLUTION(Y_TRANSFORM(s), s->precision) ^
126
return TSC_CUT_RESOLUTION(Z1_TRANSFORM(s), s->precision) -
130
return TSC_CUT_RESOLUTION(Z2_TRANSFORM(s), s->precision) |
134
s->dav &= ~mode_regs[TSC_MODE_AUX];
135
return TSC_CUT_RESOLUTION(AUX_VAL, s->precision);
137
case 0x5: /* TEMP1 */
138
s->dav &= ~mode_regs[TSC_MODE_TEMP1];
139
return TSC_CUT_RESOLUTION(TEMP1_VAL, s->precision) -
141
case 0x6: /* TEMP2 */
143
s->dav &= ~mode_regs[TSC_MODE_TEMP2];
144
return TSC_CUT_RESOLUTION(TEMP2_VAL, s->precision) ^
147
case 0x7: /* Status */
148
ret = s->dav | (s->reset << 7) | (s->pdst << 2) | 0x0;
149
s->dav &= ~(mode_regs[TSC_MODE_X_TEST] | mode_regs[TSC_MODE_Y_TEST] |
150
mode_regs[TSC_MODE_TS_TEST]);
154
case 0x8: /* AUX high treshold */
155
return s->aux_thr[1];
156
case 0x9: /* AUX low treshold */
157
return s->aux_thr[0];
159
case 0xa: /* TEMP high treshold */
160
return s->temp_thr[1];
161
case 0xb: /* TEMP low treshold */
162
return s->temp_thr[0];
165
return (s->pressure << 15) | ((!s->busy) << 14) |
166
(s->nextprecision << 13) | s->timing[0];
170
return (s->pin_func << 14) | s->filter;
172
case 0xf: /* Function select status */
173
return s->function >= 0 ? 1 << s->function : 0;
176
/* Never gets here */
180
static void tsc2005_write(TSC2005State *s, int reg, uint16_t data)
183
case 0x8: /* AUX high treshold */
184
s->aux_thr[1] = data;
186
case 0x9: /* AUX low treshold */
187
s->aux_thr[0] = data;
190
case 0xa: /* TEMP high treshold */
191
s->temp_thr[1] = data;
193
case 0xb: /* TEMP low treshold */
194
s->temp_thr[0] = data;
198
s->host_mode = data >> 15;
199
if (s->enabled != !(data & 0x4000)) {
200
s->enabled = !(data & 0x4000);
201
fprintf(stderr, "%s: touchscreen sense %sabled\n",
202
__FUNCTION__, s->enabled ? "en" : "dis");
203
if (s->busy && !s->enabled)
204
qemu_del_timer(s->timer);
205
s->busy &= s->enabled;
207
s->nextprecision = (data >> 13) & 1;
208
s->timing[0] = data & 0x1fff;
209
if ((s->timing[0] >> 11) == 3)
210
fprintf(stderr, "%s: illegal conversion clock setting\n",
214
s->timing[1] = data & 0xf07;
217
s->pin_func = (data >> 14) & 3;
218
s->filter = data & 0x3fff;
222
fprintf(stderr, "%s: write into read-only register %x\n",
227
/* This handles most of the chip's logic. */
228
static void tsc2005_pin_update(TSC2005State *s)
233
switch (s->pin_func) {
235
pin_state = !s->pressure && !!s->dav;
243
pin_state = !s->pressure;
246
if (pin_state != s->irq) {
248
qemu_set_irq(s->pint, s->irq);
251
switch (s->nextfunction) {
252
case TSC_MODE_XYZ_SCAN:
253
case TSC_MODE_XY_SCAN:
254
if (!s->host_mode && s->dav)
259
case TSC_MODE_AUX_SCAN:
271
case TSC_MODE_X_TEST:
272
case TSC_MODE_Y_TEST:
273
case TSC_MODE_TS_TEST:
278
case TSC_MODE_RESERVED:
279
case TSC_MODE_XX_DRV:
280
case TSC_MODE_YY_DRV:
281
case TSC_MODE_YX_DRV:
286
if (!s->enabled || s->busy)
290
s->precision = s->nextprecision;
291
s->function = s->nextfunction;
292
s->pdst = !s->pnd0; /* Synchronised on internal clock */
293
expires = qemu_get_clock_ns(vm_clock) + (get_ticks_per_sec() >> 7);
294
qemu_mod_timer(s->timer, expires);
297
static void tsc2005_reset(TSC2005State *s)
303
s->nextprecision = 0;
313
s->temp_thr[0] = 0x000;
314
s->temp_thr[1] = 0xfff;
315
s->aux_thr[0] = 0x000;
316
s->aux_thr[1] = 0xfff;
318
tsc2005_pin_update(s);
321
static uint8_t tsc2005_txrx_word(void *opaque, uint8_t value)
323
TSC2005State *s = opaque;
326
switch (s->state ++) {
330
if (value & (1 << 1))
333
s->nextfunction = (value >> 3) & 0xf;
334
s->nextprecision = (value >> 2) & 1;
335
if (s->enabled != !(value & 1)) {
336
s->enabled = !(value & 1);
337
fprintf(stderr, "%s: touchscreen sense %sabled\n",
338
__FUNCTION__, s->enabled ? "en" : "dis");
339
if (s->busy && !s->enabled)
340
qemu_del_timer(s->timer);
341
s->busy &= s->enabled;
343
tsc2005_pin_update(s);
349
s->reg = (value >> 3) & 0xf;
350
s->pnd0 = (value >> 1) & 1;
351
s->command = value & 1;
355
s->data = tsc2005_read(s, s->reg);
356
tsc2005_pin_update(s);
365
ret = (s->data >> 8) & 0xff;
367
s->data |= value << 8;
372
ret = s->data & 0xff;
375
tsc2005_write(s, s->reg, s->data);
376
tsc2005_pin_update(s);
386
uint32_t tsc2005_txrx(void *opaque, uint32_t value, int len)
393
ret |= tsc2005_txrx_word(opaque, (value >> len) & 0xff) << len;
399
static void tsc2005_timer_tick(void *opaque)
401
TSC2005State *s = opaque;
403
/* Timer ticked -- a set of conversions has been finished. */
409
s->dav |= mode_regs[s->function];
411
tsc2005_pin_update(s);
414
static void tsc2005_touchscreen_event(void *opaque,
415
int x, int y, int z, int buttons_state)
417
TSC2005State *s = opaque;
424
s->pressure = !!buttons_state;
427
* Note: We would get better responsiveness in the guest by
428
* signaling TS events immediately, but for now we simulate
429
* the first conversion delay for sake of correctness.
431
if (p != s->pressure)
432
tsc2005_pin_update(s);
435
static void tsc2005_save(QEMUFile *f, void *opaque)
437
TSC2005State *s = (TSC2005State *) opaque;
440
qemu_put_be16(f, s->x);
441
qemu_put_be16(f, s->y);
442
qemu_put_byte(f, s->pressure);
444
qemu_put_byte(f, s->state);
445
qemu_put_byte(f, s->reg);
446
qemu_put_byte(f, s->command);
448
qemu_put_byte(f, s->irq);
449
qemu_put_be16s(f, &s->dav);
450
qemu_put_be16s(f, &s->data);
452
qemu_put_timer(f, s->timer);
453
qemu_put_byte(f, s->enabled);
454
qemu_put_byte(f, s->host_mode);
455
qemu_put_byte(f, s->function);
456
qemu_put_byte(f, s->nextfunction);
457
qemu_put_byte(f, s->precision);
458
qemu_put_byte(f, s->nextprecision);
459
qemu_put_be16(f, s->filter);
460
qemu_put_byte(f, s->pin_func);
461
qemu_put_be16(f, s->timing[0]);
462
qemu_put_be16(f, s->timing[1]);
463
qemu_put_be16s(f, &s->temp_thr[0]);
464
qemu_put_be16s(f, &s->temp_thr[1]);
465
qemu_put_be16s(f, &s->aux_thr[0]);
466
qemu_put_be16s(f, &s->aux_thr[1]);
467
qemu_put_be32(f, s->noise);
468
qemu_put_byte(f, s->reset);
469
qemu_put_byte(f, s->pdst);
470
qemu_put_byte(f, s->pnd0);
472
for (i = 0; i < 8; i ++)
473
qemu_put_be32(f, s->tr[i]);
476
static int tsc2005_load(QEMUFile *f, void *opaque, int version_id)
478
TSC2005State *s = (TSC2005State *) opaque;
481
s->x = qemu_get_be16(f);
482
s->y = qemu_get_be16(f);
483
s->pressure = qemu_get_byte(f);
485
s->state = qemu_get_byte(f);
486
s->reg = qemu_get_byte(f);
487
s->command = qemu_get_byte(f);
489
s->irq = qemu_get_byte(f);
490
qemu_get_be16s(f, &s->dav);
491
qemu_get_be16s(f, &s->data);
493
qemu_get_timer(f, s->timer);
494
s->enabled = qemu_get_byte(f);
495
s->host_mode = qemu_get_byte(f);
496
s->function = qemu_get_byte(f);
497
s->nextfunction = qemu_get_byte(f);
498
s->precision = qemu_get_byte(f);
499
s->nextprecision = qemu_get_byte(f);
500
s->filter = qemu_get_be16(f);
501
s->pin_func = qemu_get_byte(f);
502
s->timing[0] = qemu_get_be16(f);
503
s->timing[1] = qemu_get_be16(f);
504
qemu_get_be16s(f, &s->temp_thr[0]);
505
qemu_get_be16s(f, &s->temp_thr[1]);
506
qemu_get_be16s(f, &s->aux_thr[0]);
507
qemu_get_be16s(f, &s->aux_thr[1]);
508
s->noise = qemu_get_be32(f);
509
s->reset = qemu_get_byte(f);
510
s->pdst = qemu_get_byte(f);
511
s->pnd0 = qemu_get_byte(f);
513
for (i = 0; i < 8; i ++)
514
s->tr[i] = qemu_get_be32(f);
516
s->busy = qemu_timer_pending(s->timer);
517
tsc2005_pin_update(s);
522
void *tsc2005_init(qemu_irq pintdav)
527
g_malloc0(sizeof(TSC2005State));
531
s->precision = s->nextprecision = 0;
532
s->timer = qemu_new_timer_ns(vm_clock, tsc2005_timer_tick, s);
547
qemu_add_mouse_event_handler(tsc2005_touchscreen_event, s, 1,
548
"QEMU TSC2005-driven Touchscreen");
550
qemu_register_reset((void *) tsc2005_reset, s);
551
register_savevm(NULL, "tsc2005", -1, 0, tsc2005_save, tsc2005_load, s);
557
* Use tslib generated calibration data to generate ADC input values
558
* from the touchscreen. Assuming 12-bit precision was used during
561
void tsc2005_set_transform(void *opaque, MouseTransformInfo *info)
563
TSC2005State *s = (TSC2005State *) opaque;
565
/* This version assumes touchscreen X & Y axis are parallel or
566
* perpendicular to LCD's X & Y axis in some way. */
567
if (abs(info->a[0]) > abs(info->a[1])) {
569
s->tr[1] = -info->a[6] * info->x;
570
s->tr[2] = info->a[0];
571
s->tr[3] = -info->a[2] / info->a[0];
572
s->tr[4] = info->a[6] * info->y;
574
s->tr[6] = info->a[4];
575
s->tr[7] = -info->a[5] / info->a[4];
577
s->tr[0] = info->a[6] * info->y;
579
s->tr[2] = info->a[1];
580
s->tr[3] = -info->a[2] / info->a[1];
582
s->tr[5] = -info->a[6] * info->x;
583
s->tr[6] = info->a[3];
584
s->tr[7] = -info->a[5] / info->a[3];