kvm: testsuite: add harness for real-mode tests in C
[qemu-kvm/fedora.git] / hw / tsc210x.c
blob97c21ef026f6adc2a80afda72d45e802684adcb5
1 /*
2 * TI TSC2102 (touchscreen/sensors/audio controller) emulator.
3 * TI TSC2301 (touchscreen/sensors/keypad).
5 * Copyright (c) 2006 Andrzej Zaborowski <balrog@zabor.org>
6 * Copyright (C) 2008 Nokia Corporation
8 * This program is free software; you can redistribute it and/or
9 * modify it under the terms of the GNU General Public License as
10 * published by the Free Software Foundation; either version 2 or
11 * (at your option) version 3 of the License.
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
18 * You should have received a copy of the GNU General Public License
19 * along with this program; if not, write to the Free Software
20 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
21 * MA 02111-1307 USA
24 #include "hw.h"
25 #include "audio/audio.h"
26 #include "qemu-timer.h"
27 #include "console.h"
28 #include "omap.h" /* For struct i2s_codec_s and struct uwire_slave_s */
30 #define TSC_DATA_REGISTERS_PAGE 0x0
31 #define TSC_CONTROL_REGISTERS_PAGE 0x1
32 #define TSC_AUDIO_REGISTERS_PAGE 0x2
34 #define TSC_VERBOSE
36 #define TSC_CUT_RESOLUTION(value, p) ((value) >> (16 - resolution[p]))
38 struct tsc210x_state_s {
39 qemu_irq pint;
40 qemu_irq kbint;
41 qemu_irq davint;
42 QEMUTimer *timer;
43 QEMUSoundCard card;
44 struct uwire_slave_s chip;
45 struct i2s_codec_s codec;
46 uint8_t in_fifo[16384];
47 uint8_t out_fifo[16384];
48 uint16_t model;
50 int x, y;
51 int pressure;
53 int state, page, offset, irq;
54 uint16_t command, dav;
56 int busy;
57 int enabled;
58 int host_mode;
59 int function;
60 int nextfunction;
61 int precision;
62 int nextprecision;
63 int filter;
64 int pin_func;
65 int ref;
66 int timing;
67 int noise;
69 uint16_t audio_ctrl1;
70 uint16_t audio_ctrl2;
71 uint16_t audio_ctrl3;
72 uint16_t pll[3];
73 uint16_t volume;
74 int64_t volume_change;
75 int softstep;
76 uint16_t dac_power;
77 int64_t powerdown;
78 uint16_t filter_data[0x14];
80 const char *name;
81 SWVoiceIn *adc_voice[1];
82 SWVoiceOut *dac_voice[1];
83 int i2s_rx_rate;
84 int i2s_tx_rate;
85 AudioState *audio;
87 int tr[8];
89 struct {
90 uint16_t down;
91 uint16_t mask;
92 int scan;
93 int debounce;
94 int mode;
95 int intr;
96 } kb;
99 static const int resolution[4] = { 12, 8, 10, 12 };
101 #define TSC_MODE_NO_SCAN 0x0
102 #define TSC_MODE_XY_SCAN 0x1
103 #define TSC_MODE_XYZ_SCAN 0x2
104 #define TSC_MODE_X 0x3
105 #define TSC_MODE_Y 0x4
106 #define TSC_MODE_Z 0x5
107 #define TSC_MODE_BAT1 0x6
108 #define TSC_MODE_BAT2 0x7
109 #define TSC_MODE_AUX 0x8
110 #define TSC_MODE_AUX_SCAN 0x9
111 #define TSC_MODE_TEMP1 0xa
112 #define TSC_MODE_PORT_SCAN 0xb
113 #define TSC_MODE_TEMP2 0xc
114 #define TSC_MODE_XX_DRV 0xd
115 #define TSC_MODE_YY_DRV 0xe
116 #define TSC_MODE_YX_DRV 0xf
118 static const uint16_t mode_regs[16] = {
119 0x0000, /* No scan */
120 0x0600, /* X, Y scan */
121 0x0780, /* X, Y, Z scan */
122 0x0400, /* X */
123 0x0200, /* Y */
124 0x0180, /* Z */
125 0x0040, /* BAT1 */
126 0x0030, /* BAT2 */
127 0x0010, /* AUX */
128 0x0010, /* AUX scan */
129 0x0004, /* TEMP1 */
130 0x0070, /* Port scan */
131 0x0002, /* TEMP2 */
132 0x0000, /* X+, X- drivers */
133 0x0000, /* Y+, Y- drivers */
134 0x0000, /* Y+, X- drivers */
137 #define X_TRANSFORM(s) \
138 ((s->y * s->tr[0] - s->x * s->tr[1]) / s->tr[2] + s->tr[3])
139 #define Y_TRANSFORM(s) \
140 ((s->y * s->tr[4] - s->x * s->tr[5]) / s->tr[6] + s->tr[7])
141 #define Z1_TRANSFORM(s) \
142 ((400 - ((s)->x >> 7) + ((s)->pressure << 10)) << 4)
143 #define Z2_TRANSFORM(s) \
144 ((4000 + ((s)->y >> 7) - ((s)->pressure << 10)) << 4)
146 #define BAT1_VAL 0x8660
147 #define BAT2_VAL 0x0000
148 #define AUX1_VAL 0x35c0
149 #define AUX2_VAL 0xffff
150 #define TEMP1_VAL 0x8c70
151 #define TEMP2_VAL 0xa5b0
153 #define TSC_POWEROFF_DELAY 50
154 #define TSC_SOFTSTEP_DELAY 50
156 static void tsc210x_reset(struct tsc210x_state_s *s)
158 s->state = 0;
159 s->pin_func = 2;
160 s->enabled = 0;
161 s->busy = 0;
162 s->nextfunction = 0;
163 s->ref = 0;
164 s->timing = 0;
165 s->irq = 0;
166 s->dav = 0;
168 s->audio_ctrl1 = 0x0000;
169 s->audio_ctrl2 = 0x4410;
170 s->audio_ctrl3 = 0x0000;
171 s->pll[0] = 0x1004;
172 s->pll[1] = 0x0000;
173 s->pll[2] = 0x1fff;
174 s->volume = 0xffff;
175 s->dac_power = 0x8540;
176 s->softstep = 1;
177 s->volume_change = 0;
178 s->powerdown = 0;
179 s->filter_data[0x00] = 0x6be3;
180 s->filter_data[0x01] = 0x9666;
181 s->filter_data[0x02] = 0x675d;
182 s->filter_data[0x03] = 0x6be3;
183 s->filter_data[0x04] = 0x9666;
184 s->filter_data[0x05] = 0x675d;
185 s->filter_data[0x06] = 0x7d83;
186 s->filter_data[0x07] = 0x84ee;
187 s->filter_data[0x08] = 0x7d83;
188 s->filter_data[0x09] = 0x84ee;
189 s->filter_data[0x0a] = 0x6be3;
190 s->filter_data[0x0b] = 0x9666;
191 s->filter_data[0x0c] = 0x675d;
192 s->filter_data[0x0d] = 0x6be3;
193 s->filter_data[0x0e] = 0x9666;
194 s->filter_data[0x0f] = 0x675d;
195 s->filter_data[0x10] = 0x7d83;
196 s->filter_data[0x11] = 0x84ee;
197 s->filter_data[0x12] = 0x7d83;
198 s->filter_data[0x13] = 0x84ee;
200 s->i2s_tx_rate = 0;
201 s->i2s_rx_rate = 0;
203 s->kb.scan = 1;
204 s->kb.debounce = 0;
205 s->kb.mask = 0x0000;
206 s->kb.mode = 3;
207 s->kb.intr = 0;
209 qemu_set_irq(s->pint, !s->irq);
210 qemu_set_irq(s->davint, !s->dav);
211 qemu_irq_raise(s->kbint);
214 struct tsc210x_rate_info_s {
215 int rate;
216 int dsor;
217 int fsref;
220 /* { rate, dsor, fsref } */
221 static const struct tsc210x_rate_info_s tsc2101_rates[] = {
222 /* Fsref / 6.0 */
223 { 7350, 7, 1 },
224 { 8000, 7, 0 },
225 /* Fsref / 5.5 */
226 { 8018, 6, 1 },
227 { 8727, 6, 0 },
228 /* Fsref / 5.0 */
229 { 8820, 5, 1 },
230 { 9600, 5, 0 },
231 /* Fsref / 4.0 */
232 { 11025, 4, 1 },
233 { 12000, 4, 0 },
234 /* Fsref / 3.0 */
235 { 14700, 3, 1 },
236 { 16000, 3, 0 },
237 /* Fsref / 2.0 */
238 { 22050, 2, 1 },
239 { 24000, 2, 0 },
240 /* Fsref / 1.5 */
241 { 29400, 1, 1 },
242 { 32000, 1, 0 },
243 /* Fsref */
244 { 44100, 0, 1 },
245 { 48000, 0, 0 },
247 { 0, 0, 0 },
250 /* { rate, dsor, fsref } */
251 static const struct tsc210x_rate_info_s tsc2102_rates[] = {
252 /* Fsref / 6.0 */
253 { 7350, 63, 1 },
254 { 8000, 63, 0 },
255 /* Fsref / 6.0 */
256 { 7350, 54, 1 },
257 { 8000, 54, 0 },
258 /* Fsref / 5.0 */
259 { 8820, 45, 1 },
260 { 9600, 45, 0 },
261 /* Fsref / 4.0 */
262 { 11025, 36, 1 },
263 { 12000, 36, 0 },
264 /* Fsref / 3.0 */
265 { 14700, 27, 1 },
266 { 16000, 27, 0 },
267 /* Fsref / 2.0 */
268 { 22050, 18, 1 },
269 { 24000, 18, 0 },
270 /* Fsref / 1.5 */
271 { 29400, 9, 1 },
272 { 32000, 9, 0 },
273 /* Fsref */
274 { 44100, 0, 1 },
275 { 48000, 0, 0 },
277 { 0, 0, 0 },
280 static inline void tsc210x_out_flush(struct tsc210x_state_s *s, int len)
282 uint8_t *data = s->codec.out.fifo + s->codec.out.start;
283 uint8_t *end = data + len;
285 while (data < end)
286 data += AUD_write(s->dac_voice[0], data, end - data) ?: (end - data);
288 s->codec.out.len -= len;
289 if (s->codec.out.len)
290 memmove(s->codec.out.fifo, end, s->codec.out.len);
291 s->codec.out.start = 0;
294 static void tsc210x_audio_out_cb(struct tsc210x_state_s *s, int free_b)
296 if (s->codec.out.len >= free_b) {
297 tsc210x_out_flush(s, free_b);
298 return;
301 s->codec.out.size = MIN(free_b, 16384);
302 qemu_irq_raise(s->codec.tx_start);
305 static void tsc2102_audio_rate_update(struct tsc210x_state_s *s)
307 const struct tsc210x_rate_info_s *rate;
309 s->codec.tx_rate = 0;
310 s->codec.rx_rate = 0;
311 if (s->dac_power & (1 << 15)) /* PWDNC */
312 return;
314 for (rate = tsc2102_rates; rate->rate; rate ++)
315 if (rate->dsor == (s->audio_ctrl1 & 0x3f) && /* DACFS */
316 rate->fsref == ((s->audio_ctrl3 >> 13) & 1))/* REFFS */
317 break;
318 if (!rate->rate) {
319 printf("%s: unknown sampling rate configured\n", __FUNCTION__);
320 return;
323 s->codec.tx_rate = rate->rate;
326 static void tsc2102_audio_output_update(struct tsc210x_state_s *s)
328 int enable;
329 audsettings_t fmt;
331 if (s->dac_voice[0]) {
332 tsc210x_out_flush(s, s->codec.out.len);
333 s->codec.out.size = 0;
334 AUD_set_active_out(s->dac_voice[0], 0);
335 AUD_close_out(&s->card, s->dac_voice[0]);
336 s->dac_voice[0] = 0;
338 s->codec.cts = 0;
340 enable =
341 (~s->dac_power & (1 << 15)) && /* PWDNC */
342 (~s->dac_power & (1 << 10)); /* DAPWDN */
343 if (!enable || !s->codec.tx_rate)
344 return;
346 /* Force our own sampling rate even in slave DAC mode */
347 fmt.endianness = 0;
348 fmt.nchannels = 2;
349 fmt.freq = s->codec.tx_rate;
350 fmt.fmt = AUD_FMT_S16;
352 s->dac_voice[0] = AUD_open_out(&s->card, s->dac_voice[0],
353 "tsc2102.sink", s, (void *) tsc210x_audio_out_cb, &fmt);
354 if (s->dac_voice[0]) {
355 s->codec.cts = 1;
356 AUD_set_active_out(s->dac_voice[0], 1);
360 static uint16_t tsc2102_data_register_read(struct tsc210x_state_s *s, int reg)
362 switch (reg) {
363 case 0x00: /* X */
364 s->dav &= 0xfbff;
365 return TSC_CUT_RESOLUTION(X_TRANSFORM(s), s->precision) +
366 (s->noise & 3);
368 case 0x01: /* Y */
369 s->noise ++;
370 s->dav &= 0xfdff;
371 return TSC_CUT_RESOLUTION(Y_TRANSFORM(s), s->precision) ^
372 (s->noise & 3);
374 case 0x02: /* Z1 */
375 s->dav &= 0xfeff;
376 return TSC_CUT_RESOLUTION(Z1_TRANSFORM(s), s->precision) -
377 (s->noise & 3);
379 case 0x03: /* Z2 */
380 s->dav &= 0xff7f;
381 return TSC_CUT_RESOLUTION(Z2_TRANSFORM(s), s->precision) |
382 (s->noise & 3);
384 case 0x04: /* KPData */
385 if ((s->model & 0xff00) == 0x2300) {
386 if (s->kb.intr && (s->kb.mode & 2)) {
387 s->kb.intr = 0;
388 qemu_irq_raise(s->kbint);
390 return s->kb.down;
393 return 0xffff;
395 case 0x05: /* BAT1 */
396 s->dav &= 0xffbf;
397 return TSC_CUT_RESOLUTION(BAT1_VAL, s->precision) +
398 (s->noise & 6);
400 case 0x06: /* BAT2 */
401 s->dav &= 0xffdf;
402 return TSC_CUT_RESOLUTION(BAT2_VAL, s->precision);
404 case 0x07: /* AUX1 */
405 s->dav &= 0xffef;
406 return TSC_CUT_RESOLUTION(AUX1_VAL, s->precision);
408 case 0x08: /* AUX2 */
409 s->dav &= 0xfff7;
410 return 0xffff;
412 case 0x09: /* TEMP1 */
413 s->dav &= 0xfffb;
414 return TSC_CUT_RESOLUTION(TEMP1_VAL, s->precision) -
415 (s->noise & 5);
417 case 0x0a: /* TEMP2 */
418 s->dav &= 0xfffd;
419 return TSC_CUT_RESOLUTION(TEMP2_VAL, s->precision) ^
420 (s->noise & 3);
422 case 0x0b: /* DAC */
423 s->dav &= 0xfffe;
424 return 0xffff;
426 default:
427 #ifdef TSC_VERBOSE
428 fprintf(stderr, "tsc2102_data_register_read: "
429 "no such register: 0x%02x\n", reg);
430 #endif
431 return 0xffff;
435 static uint16_t tsc2102_control_register_read(
436 struct tsc210x_state_s *s, int reg)
438 switch (reg) {
439 case 0x00: /* TSC ADC */
440 return (s->pressure << 15) | ((!s->busy) << 14) |
441 (s->nextfunction << 10) | (s->nextprecision << 8) | s->filter;
443 case 0x01: /* Status / Keypad Control */
444 if ((s->model & 0xff00) == 0x2100)
445 return (s->pin_func << 14) | ((!s->enabled) << 13) |
446 (s->host_mode << 12) | ((!!s->dav) << 11) | s->dav;
447 else
448 return (s->kb.intr << 15) | ((s->kb.scan || !s->kb.down) << 14) |
449 (s->kb.debounce << 11);
451 case 0x02: /* DAC Control */
452 if ((s->model & 0xff00) == 0x2300)
453 return s->dac_power & 0x8000;
454 else
455 goto bad_reg;
457 case 0x03: /* Reference */
458 return s->ref;
460 case 0x04: /* Reset */
461 return 0xffff;
463 case 0x05: /* Configuration */
464 return s->timing;
466 case 0x06: /* Secondary configuration */
467 if ((s->model & 0xff00) == 0x2100)
468 goto bad_reg;
469 return ((!s->dav) << 15) | ((s->kb.mode & 1) << 14) | s->pll[2];
471 case 0x10: /* Keypad Mask */
472 if ((s->model & 0xff00) == 0x2100)
473 goto bad_reg;
474 return s->kb.mask;
476 default:
477 bad_reg:
478 #ifdef TSC_VERBOSE
479 fprintf(stderr, "tsc2102_control_register_read: "
480 "no such register: 0x%02x\n", reg);
481 #endif
482 return 0xffff;
486 static uint16_t tsc2102_audio_register_read(struct tsc210x_state_s *s, int reg)
488 int l_ch, r_ch;
489 uint16_t val;
491 switch (reg) {
492 case 0x00: /* Audio Control 1 */
493 return s->audio_ctrl1;
495 case 0x01:
496 return 0xff00;
498 case 0x02: /* DAC Volume Control */
499 return s->volume;
501 case 0x03:
502 return 0x8b00;
504 case 0x04: /* Audio Control 2 */
505 l_ch = 1;
506 r_ch = 1;
507 if (s->softstep && !(s->dac_power & (1 << 10))) {
508 l_ch = (qemu_get_clock(vm_clock) >
509 s->volume_change + TSC_SOFTSTEP_DELAY);
510 r_ch = (qemu_get_clock(vm_clock) >
511 s->volume_change + TSC_SOFTSTEP_DELAY);
514 return s->audio_ctrl2 | (l_ch << 3) | (r_ch << 2);
516 case 0x05: /* Stereo DAC Power Control */
517 return 0x2aa0 | s->dac_power |
518 (((s->dac_power & (1 << 10)) &&
519 (qemu_get_clock(vm_clock) >
520 s->powerdown + TSC_POWEROFF_DELAY)) << 6);
522 case 0x06: /* Audio Control 3 */
523 val = s->audio_ctrl3 | 0x0001;
524 s->audio_ctrl3 &= 0xff3f;
525 return val;
527 case 0x07: /* LCH_BASS_BOOST_N0 */
528 case 0x08: /* LCH_BASS_BOOST_N1 */
529 case 0x09: /* LCH_BASS_BOOST_N2 */
530 case 0x0a: /* LCH_BASS_BOOST_N3 */
531 case 0x0b: /* LCH_BASS_BOOST_N4 */
532 case 0x0c: /* LCH_BASS_BOOST_N5 */
533 case 0x0d: /* LCH_BASS_BOOST_D1 */
534 case 0x0e: /* LCH_BASS_BOOST_D2 */
535 case 0x0f: /* LCH_BASS_BOOST_D4 */
536 case 0x10: /* LCH_BASS_BOOST_D5 */
537 case 0x11: /* RCH_BASS_BOOST_N0 */
538 case 0x12: /* RCH_BASS_BOOST_N1 */
539 case 0x13: /* RCH_BASS_BOOST_N2 */
540 case 0x14: /* RCH_BASS_BOOST_N3 */
541 case 0x15: /* RCH_BASS_BOOST_N4 */
542 case 0x16: /* RCH_BASS_BOOST_N5 */
543 case 0x17: /* RCH_BASS_BOOST_D1 */
544 case 0x18: /* RCH_BASS_BOOST_D2 */
545 case 0x19: /* RCH_BASS_BOOST_D4 */
546 case 0x1a: /* RCH_BASS_BOOST_D5 */
547 return s->filter_data[reg - 0x07];
549 case 0x1b: /* PLL Programmability 1 */
550 return s->pll[0];
552 case 0x1c: /* PLL Programmability 2 */
553 return s->pll[1];
555 case 0x1d: /* Audio Control 4 */
556 return (!s->softstep) << 14;
558 default:
559 #ifdef TSC_VERBOSE
560 fprintf(stderr, "tsc2102_audio_register_read: "
561 "no such register: 0x%02x\n", reg);
562 #endif
563 return 0xffff;
567 static void tsc2102_data_register_write(
568 struct tsc210x_state_s *s, int reg, uint16_t value)
570 switch (reg) {
571 case 0x00: /* X */
572 case 0x01: /* Y */
573 case 0x02: /* Z1 */
574 case 0x03: /* Z2 */
575 case 0x05: /* BAT1 */
576 case 0x06: /* BAT2 */
577 case 0x07: /* AUX1 */
578 case 0x08: /* AUX2 */
579 case 0x09: /* TEMP1 */
580 case 0x0a: /* TEMP2 */
581 return;
583 default:
584 #ifdef TSC_VERBOSE
585 fprintf(stderr, "tsc2102_data_register_write: "
586 "no such register: 0x%02x\n", reg);
587 #endif
591 static void tsc2102_control_register_write(
592 struct tsc210x_state_s *s, int reg, uint16_t value)
594 switch (reg) {
595 case 0x00: /* TSC ADC */
596 s->host_mode = value >> 15;
597 s->enabled = !(value & 0x4000);
598 if (s->busy && !s->enabled)
599 qemu_del_timer(s->timer);
600 s->busy &= s->enabled;
601 s->nextfunction = (value >> 10) & 0xf;
602 s->nextprecision = (value >> 8) & 3;
603 s->filter = value & 0xff;
604 return;
606 case 0x01: /* Status / Keypad Control */
607 if ((s->model & 0xff00) == 0x2100)
608 s->pin_func = value >> 14;
609 else {
610 s->kb.scan = (value >> 14) & 1;
611 s->kb.debounce = (value >> 11) & 7;
612 if (s->kb.intr && s->kb.scan) {
613 s->kb.intr = 0;
614 qemu_irq_raise(s->kbint);
617 return;
619 case 0x02: /* DAC Control */
620 if ((s->model & 0xff00) == 0x2300) {
621 s->dac_power &= 0x7fff;
622 s->dac_power |= 0x8000 & value;
623 } else
624 goto bad_reg;
625 break;
627 case 0x03: /* Reference */
628 s->ref = value & 0x1f;
629 return;
631 case 0x04: /* Reset */
632 if (value == 0xbb00) {
633 if (s->busy)
634 qemu_del_timer(s->timer);
635 tsc210x_reset(s);
636 #ifdef TSC_VERBOSE
637 } else {
638 fprintf(stderr, "tsc2102_control_register_write: "
639 "wrong value written into RESET\n");
640 #endif
642 return;
644 case 0x05: /* Configuration */
645 s->timing = value & 0x3f;
646 #ifdef TSC_VERBOSE
647 if (value & ~0x3f)
648 fprintf(stderr, "tsc2102_control_register_write: "
649 "wrong value written into CONFIG\n");
650 #endif
651 return;
653 case 0x06: /* Secondary configuration */
654 if ((s->model & 0xff00) == 0x2100)
655 goto bad_reg;
656 s->kb.mode = value >> 14;
657 s->pll[2] = value & 0x3ffff;
658 return;
660 case 0x10: /* Keypad Mask */
661 if ((s->model & 0xff00) == 0x2100)
662 goto bad_reg;
663 s->kb.mask = value;
664 return;
666 default:
667 bad_reg:
668 #ifdef TSC_VERBOSE
669 fprintf(stderr, "tsc2102_control_register_write: "
670 "no such register: 0x%02x\n", reg);
671 #endif
675 static void tsc2102_audio_register_write(
676 struct tsc210x_state_s *s, int reg, uint16_t value)
678 switch (reg) {
679 case 0x00: /* Audio Control 1 */
680 s->audio_ctrl1 = value & 0x0f3f;
681 #ifdef TSC_VERBOSE
682 if ((value & ~0x0f3f) || ((value & 7) != ((value >> 3) & 7)))
683 fprintf(stderr, "tsc2102_audio_register_write: "
684 "wrong value written into Audio 1\n");
685 #endif
686 tsc2102_audio_rate_update(s);
687 if (s->audio)
688 tsc2102_audio_output_update(s);
689 return;
691 case 0x01:
692 #ifdef TSC_VERBOSE
693 if (value != 0xff00)
694 fprintf(stderr, "tsc2102_audio_register_write: "
695 "wrong value written into reg 0x01\n");
696 #endif
697 return;
699 case 0x02: /* DAC Volume Control */
700 s->volume = value;
701 s->volume_change = qemu_get_clock(vm_clock);
702 return;
704 case 0x03:
705 #ifdef TSC_VERBOSE
706 if (value != 0x8b00)
707 fprintf(stderr, "tsc2102_audio_register_write: "
708 "wrong value written into reg 0x03\n");
709 #endif
710 return;
712 case 0x04: /* Audio Control 2 */
713 s->audio_ctrl2 = value & 0xf7f2;
714 #ifdef TSC_VERBOSE
715 if (value & ~0xf7fd)
716 fprintf(stderr, "tsc2102_audio_register_write: "
717 "wrong value written into Audio 2\n");
718 #endif
719 return;
721 case 0x05: /* Stereo DAC Power Control */
722 if ((value & ~s->dac_power) & (1 << 10))
723 s->powerdown = qemu_get_clock(vm_clock);
725 s->dac_power = value & 0x9543;
726 #ifdef TSC_VERBOSE
727 if ((value & ~0x9543) != 0x2aa0)
728 fprintf(stderr, "tsc2102_audio_register_write: "
729 "wrong value written into Power\n");
730 #endif
731 tsc2102_audio_rate_update(s);
732 if (s->audio)
733 tsc2102_audio_output_update(s);
734 return;
736 case 0x06: /* Audio Control 3 */
737 s->audio_ctrl3 &= 0x00c0;
738 s->audio_ctrl3 |= value & 0xf800;
739 #ifdef TSC_VERBOSE
740 if (value & ~0xf8c7)
741 fprintf(stderr, "tsc2102_audio_register_write: "
742 "wrong value written into Audio 3\n");
743 #endif
744 if (s->audio)
745 tsc2102_audio_output_update(s);
746 return;
748 case 0x07: /* LCH_BASS_BOOST_N0 */
749 case 0x08: /* LCH_BASS_BOOST_N1 */
750 case 0x09: /* LCH_BASS_BOOST_N2 */
751 case 0x0a: /* LCH_BASS_BOOST_N3 */
752 case 0x0b: /* LCH_BASS_BOOST_N4 */
753 case 0x0c: /* LCH_BASS_BOOST_N5 */
754 case 0x0d: /* LCH_BASS_BOOST_D1 */
755 case 0x0e: /* LCH_BASS_BOOST_D2 */
756 case 0x0f: /* LCH_BASS_BOOST_D4 */
757 case 0x10: /* LCH_BASS_BOOST_D5 */
758 case 0x11: /* RCH_BASS_BOOST_N0 */
759 case 0x12: /* RCH_BASS_BOOST_N1 */
760 case 0x13: /* RCH_BASS_BOOST_N2 */
761 case 0x14: /* RCH_BASS_BOOST_N3 */
762 case 0x15: /* RCH_BASS_BOOST_N4 */
763 case 0x16: /* RCH_BASS_BOOST_N5 */
764 case 0x17: /* RCH_BASS_BOOST_D1 */
765 case 0x18: /* RCH_BASS_BOOST_D2 */
766 case 0x19: /* RCH_BASS_BOOST_D4 */
767 case 0x1a: /* RCH_BASS_BOOST_D5 */
768 s->filter_data[reg - 0x07] = value;
769 return;
771 case 0x1b: /* PLL Programmability 1 */
772 s->pll[0] = value & 0xfffc;
773 #ifdef TSC_VERBOSE
774 if (value & ~0xfffc)
775 fprintf(stderr, "tsc2102_audio_register_write: "
776 "wrong value written into PLL 1\n");
777 #endif
778 return;
780 case 0x1c: /* PLL Programmability 2 */
781 s->pll[1] = value & 0xfffc;
782 #ifdef TSC_VERBOSE
783 if (value & ~0xfffc)
784 fprintf(stderr, "tsc2102_audio_register_write: "
785 "wrong value written into PLL 2\n");
786 #endif
787 return;
789 case 0x1d: /* Audio Control 4 */
790 s->softstep = !(value & 0x4000);
791 #ifdef TSC_VERBOSE
792 if (value & ~0x4000)
793 fprintf(stderr, "tsc2102_audio_register_write: "
794 "wrong value written into Audio 4\n");
795 #endif
796 return;
798 default:
799 #ifdef TSC_VERBOSE
800 fprintf(stderr, "tsc2102_audio_register_write: "
801 "no such register: 0x%02x\n", reg);
802 #endif
806 /* This handles most of the chip logic. */
807 static void tsc210x_pin_update(struct tsc210x_state_s *s)
809 int64_t expires;
810 int pin_state;
812 switch (s->pin_func) {
813 case 0:
814 pin_state = s->pressure;
815 break;
816 case 1:
817 pin_state = !!s->dav;
818 break;
819 case 2:
820 default:
821 pin_state = s->pressure && !s->dav;
824 if (!s->enabled)
825 pin_state = 0;
827 if (pin_state != s->irq) {
828 s->irq = pin_state;
829 qemu_set_irq(s->pint, !s->irq);
832 switch (s->nextfunction) {
833 case TSC_MODE_XY_SCAN:
834 case TSC_MODE_XYZ_SCAN:
835 if (!s->pressure)
836 return;
837 break;
839 case TSC_MODE_X:
840 case TSC_MODE_Y:
841 case TSC_MODE_Z:
842 if (!s->pressure)
843 return;
844 /* Fall through */
845 case TSC_MODE_BAT1:
846 case TSC_MODE_BAT2:
847 case TSC_MODE_AUX:
848 case TSC_MODE_TEMP1:
849 case TSC_MODE_TEMP2:
850 if (s->dav)
851 s->enabled = 0;
852 break;
854 case TSC_MODE_AUX_SCAN:
855 case TSC_MODE_PORT_SCAN:
856 break;
858 case TSC_MODE_NO_SCAN:
859 case TSC_MODE_XX_DRV:
860 case TSC_MODE_YY_DRV:
861 case TSC_MODE_YX_DRV:
862 default:
863 return;
866 if (!s->enabled || s->busy || s->dav)
867 return;
869 s->busy = 1;
870 s->precision = s->nextprecision;
871 s->function = s->nextfunction;
872 expires = qemu_get_clock(vm_clock) + (ticks_per_sec >> 10);
873 qemu_mod_timer(s->timer, expires);
876 static uint16_t tsc210x_read(struct tsc210x_state_s *s)
878 uint16_t ret = 0x0000;
880 if (!s->command)
881 fprintf(stderr, "tsc210x_read: SPI underrun!\n");
883 switch (s->page) {
884 case TSC_DATA_REGISTERS_PAGE:
885 ret = tsc2102_data_register_read(s, s->offset);
886 if (!s->dav)
887 qemu_irq_raise(s->davint);
888 break;
889 case TSC_CONTROL_REGISTERS_PAGE:
890 ret = tsc2102_control_register_read(s, s->offset);
891 break;
892 case TSC_AUDIO_REGISTERS_PAGE:
893 ret = tsc2102_audio_register_read(s, s->offset);
894 break;
895 default:
896 cpu_abort(cpu_single_env, "tsc210x_read: wrong memory page\n");
899 tsc210x_pin_update(s);
901 /* Allow sequential reads. */
902 s->offset ++;
903 s->state = 0;
904 return ret;
907 static void tsc210x_write(struct tsc210x_state_s *s, uint16_t value)
910 * This is a two-state state machine for reading
911 * command and data every second time.
913 if (!s->state) {
914 s->command = value >> 15;
915 s->page = (value >> 11) & 0x0f;
916 s->offset = (value >> 5) & 0x3f;
917 s->state = 1;
918 } else {
919 if (s->command)
920 fprintf(stderr, "tsc210x_write: SPI overrun!\n");
921 else
922 switch (s->page) {
923 case TSC_DATA_REGISTERS_PAGE:
924 tsc2102_data_register_write(s, s->offset, value);
925 break;
926 case TSC_CONTROL_REGISTERS_PAGE:
927 tsc2102_control_register_write(s, s->offset, value);
928 break;
929 case TSC_AUDIO_REGISTERS_PAGE:
930 tsc2102_audio_register_write(s, s->offset, value);
931 break;
932 default:
933 cpu_abort(cpu_single_env,
934 "tsc210x_write: wrong memory page\n");
937 tsc210x_pin_update(s);
938 s->state = 0;
942 uint32_t tsc210x_txrx(void *opaque, uint32_t value, int len)
944 struct tsc210x_state_s *s = opaque;
945 uint32_t ret = 0;
947 if (len != 16)
948 cpu_abort(cpu_single_env, "%s: FIXME: bad SPI word width %i\n",
949 __FUNCTION__, len);
951 /* TODO: sequential reads etc - how do we make sure the host doesn't
952 * unintentionally read out a conversion result from a register while
953 * transmitting the command word of the next command? */
954 if (!value || (s->state && s->command))
955 ret = tsc210x_read(s);
956 if (value || (s->state && !s->command))
957 tsc210x_write(s, value);
959 return ret;
962 static void tsc210x_timer_tick(void *opaque)
964 struct tsc210x_state_s *s = opaque;
966 /* Timer ticked -- a set of conversions has been finished. */
968 if (!s->busy)
969 return;
971 s->busy = 0;
972 s->dav |= mode_regs[s->function];
973 tsc210x_pin_update(s);
974 qemu_irq_lower(s->davint);
977 static void tsc210x_touchscreen_event(void *opaque,
978 int x, int y, int z, int buttons_state)
980 struct tsc210x_state_s *s = opaque;
981 int p = s->pressure;
983 if (buttons_state) {
984 s->x = x;
985 s->y = y;
987 s->pressure = !!buttons_state;
990 * Note: We would get better responsiveness in the guest by
991 * signaling TS events immediately, but for now we simulate
992 * the first conversion delay for sake of correctness.
994 if (p != s->pressure)
995 tsc210x_pin_update(s);
998 static void tsc210x_i2s_swallow(struct tsc210x_state_s *s)
1000 if (s->dac_voice[0])
1001 tsc210x_out_flush(s, s->codec.out.len);
1002 else
1003 s->codec.out.len = 0;
1006 static void tsc210x_i2s_set_rate(struct tsc210x_state_s *s, int in, int out)
1008 s->i2s_tx_rate = out;
1009 s->i2s_rx_rate = in;
1012 static void tsc210x_save(QEMUFile *f, void *opaque)
1014 struct tsc210x_state_s *s = (struct tsc210x_state_s *) opaque;
1015 int64_t now = qemu_get_clock(vm_clock);
1016 int i;
1018 qemu_put_be16(f, s->x);
1019 qemu_put_be16(f, s->y);
1020 qemu_put_byte(f, s->pressure);
1022 qemu_put_byte(f, s->state);
1023 qemu_put_byte(f, s->page);
1024 qemu_put_byte(f, s->offset);
1025 qemu_put_byte(f, s->command);
1027 qemu_put_byte(f, s->irq);
1028 qemu_put_be16s(f, &s->dav);
1030 qemu_put_timer(f, s->timer);
1031 qemu_put_byte(f, s->enabled);
1032 qemu_put_byte(f, s->host_mode);
1033 qemu_put_byte(f, s->function);
1034 qemu_put_byte(f, s->nextfunction);
1035 qemu_put_byte(f, s->precision);
1036 qemu_put_byte(f, s->nextprecision);
1037 qemu_put_byte(f, s->filter);
1038 qemu_put_byte(f, s->pin_func);
1039 qemu_put_byte(f, s->ref);
1040 qemu_put_byte(f, s->timing);
1041 qemu_put_be32(f, s->noise);
1043 qemu_put_be16s(f, &s->audio_ctrl1);
1044 qemu_put_be16s(f, &s->audio_ctrl2);
1045 qemu_put_be16s(f, &s->audio_ctrl3);
1046 qemu_put_be16s(f, &s->pll[0]);
1047 qemu_put_be16s(f, &s->pll[1]);
1048 qemu_put_be16s(f, &s->volume);
1049 qemu_put_be64(f, (uint64_t) (s->volume_change - now));
1050 qemu_put_be64(f, (uint64_t) (s->powerdown - now));
1051 qemu_put_byte(f, s->softstep);
1052 qemu_put_be16s(f, &s->dac_power);
1054 for (i = 0; i < 0x14; i ++)
1055 qemu_put_be16s(f, &s->filter_data[i]);
1058 static int tsc210x_load(QEMUFile *f, void *opaque, int version_id)
1060 struct tsc210x_state_s *s = (struct tsc210x_state_s *) opaque;
1061 int64_t now = qemu_get_clock(vm_clock);
1062 int i;
1064 s->x = qemu_get_be16(f);
1065 s->y = qemu_get_be16(f);
1066 s->pressure = qemu_get_byte(f);
1068 s->state = qemu_get_byte(f);
1069 s->page = qemu_get_byte(f);
1070 s->offset = qemu_get_byte(f);
1071 s->command = qemu_get_byte(f);
1073 s->irq = qemu_get_byte(f);
1074 qemu_get_be16s(f, &s->dav);
1076 qemu_get_timer(f, s->timer);
1077 s->enabled = qemu_get_byte(f);
1078 s->host_mode = qemu_get_byte(f);
1079 s->function = qemu_get_byte(f);
1080 s->nextfunction = qemu_get_byte(f);
1081 s->precision = qemu_get_byte(f);
1082 s->nextprecision = qemu_get_byte(f);
1083 s->filter = qemu_get_byte(f);
1084 s->pin_func = qemu_get_byte(f);
1085 s->ref = qemu_get_byte(f);
1086 s->timing = qemu_get_byte(f);
1087 s->noise = qemu_get_be32(f);
1089 qemu_get_be16s(f, &s->audio_ctrl1);
1090 qemu_get_be16s(f, &s->audio_ctrl2);
1091 qemu_get_be16s(f, &s->audio_ctrl3);
1092 qemu_get_be16s(f, &s->pll[0]);
1093 qemu_get_be16s(f, &s->pll[1]);
1094 qemu_get_be16s(f, &s->volume);
1095 s->volume_change = (int64_t) qemu_get_be64(f) + now;
1096 s->powerdown = (int64_t) qemu_get_be64(f) + now;
1097 s->softstep = qemu_get_byte(f);
1098 qemu_get_be16s(f, &s->dac_power);
1100 for (i = 0; i < 0x14; i ++)
1101 qemu_get_be16s(f, &s->filter_data[i]);
1103 s->busy = qemu_timer_pending(s->timer);
1104 qemu_set_irq(s->pint, !s->irq);
1105 qemu_set_irq(s->davint, !s->dav);
1107 return 0;
1110 struct uwire_slave_s *tsc2102_init(qemu_irq pint, AudioState *audio)
1112 struct tsc210x_state_s *s;
1114 s = (struct tsc210x_state_s *)
1115 qemu_mallocz(sizeof(struct tsc210x_state_s));
1116 memset(s, 0, sizeof(struct tsc210x_state_s));
1117 s->x = 160;
1118 s->y = 160;
1119 s->pressure = 0;
1120 s->precision = s->nextprecision = 0;
1121 s->timer = qemu_new_timer(vm_clock, tsc210x_timer_tick, s);
1122 s->pint = pint;
1123 s->model = 0x2102;
1124 s->name = "tsc2102";
1125 s->audio = audio;
1127 s->tr[0] = 0;
1128 s->tr[1] = 1;
1129 s->tr[2] = 1;
1130 s->tr[3] = 0;
1131 s->tr[4] = 1;
1132 s->tr[5] = 0;
1133 s->tr[6] = 1;
1134 s->tr[7] = 0;
1136 s->chip.opaque = s;
1137 s->chip.send = (void *) tsc210x_write;
1138 s->chip.receive = (void *) tsc210x_read;
1140 s->codec.opaque = s;
1141 s->codec.tx_swallow = (void *) tsc210x_i2s_swallow;
1142 s->codec.set_rate = (void *) tsc210x_i2s_set_rate;
1143 s->codec.in.fifo = s->in_fifo;
1144 s->codec.out.fifo = s->out_fifo;
1146 tsc210x_reset(s);
1148 qemu_add_mouse_event_handler(tsc210x_touchscreen_event, s, 1,
1149 "QEMU TSC2102-driven Touchscreen");
1151 if (s->audio)
1152 AUD_register_card(s->audio, s->name, &s->card);
1154 qemu_register_reset((void *) tsc210x_reset, s);
1155 register_savevm(s->name, -1, 0,
1156 tsc210x_save, tsc210x_load, s);
1158 return &s->chip;
1161 struct uwire_slave_s *tsc2301_init(qemu_irq penirq, qemu_irq kbirq,
1162 qemu_irq dav, AudioState *audio)
1164 struct tsc210x_state_s *s;
1166 s = (struct tsc210x_state_s *)
1167 qemu_mallocz(sizeof(struct tsc210x_state_s));
1168 memset(s, 0, sizeof(struct tsc210x_state_s));
1169 s->x = 400;
1170 s->y = 240;
1171 s->pressure = 0;
1172 s->precision = s->nextprecision = 0;
1173 s->timer = qemu_new_timer(vm_clock, tsc210x_timer_tick, s);
1174 s->pint = penirq;
1175 s->kbint = kbirq;
1176 s->davint = dav;
1177 s->model = 0x2301;
1178 s->name = "tsc2301";
1179 s->audio = audio;
1181 s->tr[0] = 0;
1182 s->tr[1] = 1;
1183 s->tr[2] = 1;
1184 s->tr[3] = 0;
1185 s->tr[4] = 1;
1186 s->tr[5] = 0;
1187 s->tr[6] = 1;
1188 s->tr[7] = 0;
1190 s->chip.opaque = s;
1191 s->chip.send = (void *) tsc210x_write;
1192 s->chip.receive = (void *) tsc210x_read;
1194 s->codec.opaque = s;
1195 s->codec.tx_swallow = (void *) tsc210x_i2s_swallow;
1196 s->codec.set_rate = (void *) tsc210x_i2s_set_rate;
1197 s->codec.in.fifo = s->in_fifo;
1198 s->codec.out.fifo = s->out_fifo;
1200 tsc210x_reset(s);
1202 qemu_add_mouse_event_handler(tsc210x_touchscreen_event, s, 1,
1203 "QEMU TSC2301-driven Touchscreen");
1205 if (s->audio)
1206 AUD_register_card(s->audio, s->name, &s->card);
1208 qemu_register_reset((void *) tsc210x_reset, s);
1209 register_savevm(s->name, -1, 0, tsc210x_save, tsc210x_load, s);
1211 return &s->chip;
1214 struct i2s_codec_s *tsc210x_codec(struct uwire_slave_s *chip)
1216 struct tsc210x_state_s *s = (struct tsc210x_state_s *) chip->opaque;
1218 return &s->codec;
1222 * Use tslib generated calibration data to generate ADC input values
1223 * from the touchscreen. Assuming 12-bit precision was used during
1224 * tslib calibration.
1226 void tsc210x_set_transform(struct uwire_slave_s *chip,
1227 struct mouse_transform_info_s *info)
1229 struct tsc210x_state_s *s = (struct tsc210x_state_s *) chip->opaque;
1230 #if 0
1231 int64_t ltr[8];
1233 ltr[0] = (int64_t) info->a[1] * info->y;
1234 ltr[1] = (int64_t) info->a[4] * info->x;
1235 ltr[2] = (int64_t) info->a[1] * info->a[3] -
1236 (int64_t) info->a[4] * info->a[0];
1237 ltr[3] = (int64_t) info->a[2] * info->a[4] -
1238 (int64_t) info->a[5] * info->a[1];
1239 ltr[4] = (int64_t) info->a[0] * info->y;
1240 ltr[5] = (int64_t) info->a[3] * info->x;
1241 ltr[6] = (int64_t) info->a[4] * info->a[0] -
1242 (int64_t) info->a[1] * info->a[3];
1243 ltr[7] = (int64_t) info->a[2] * info->a[3] -
1244 (int64_t) info->a[5] * info->a[0];
1246 /* Avoid integer overflow */
1247 s->tr[0] = ltr[0] >> 11;
1248 s->tr[1] = ltr[1] >> 11;
1249 s->tr[2] = muldiv64(ltr[2], 1, info->a[6]);
1250 s->tr[3] = muldiv64(ltr[3], 1 << 4, ltr[2]);
1251 s->tr[4] = ltr[4] >> 11;
1252 s->tr[5] = ltr[5] >> 11;
1253 s->tr[6] = muldiv64(ltr[6], 1, info->a[6]);
1254 s->tr[7] = muldiv64(ltr[7], 1 << 4, ltr[6]);
1255 #else
1257 /* This version assumes touchscreen X & Y axis are parallel or
1258 * perpendicular to LCD's X & Y axis in some way. */
1259 if (abs(info->a[0]) > abs(info->a[1])) {
1260 s->tr[0] = 0;
1261 s->tr[1] = -info->a[6] * info->x;
1262 s->tr[2] = info->a[0];
1263 s->tr[3] = -info->a[2] / info->a[0];
1264 s->tr[4] = info->a[6] * info->y;
1265 s->tr[5] = 0;
1266 s->tr[6] = info->a[4];
1267 s->tr[7] = -info->a[5] / info->a[4];
1268 } else {
1269 s->tr[0] = info->a[6] * info->y;
1270 s->tr[1] = 0;
1271 s->tr[2] = info->a[1];
1272 s->tr[3] = -info->a[2] / info->a[1];
1273 s->tr[4] = 0;
1274 s->tr[5] = -info->a[6] * info->x;
1275 s->tr[6] = info->a[3];
1276 s->tr[7] = -info->a[5] / info->a[3];
1279 s->tr[0] >>= 11;
1280 s->tr[1] >>= 11;
1281 s->tr[3] <<= 4;
1282 s->tr[4] >>= 11;
1283 s->tr[5] >>= 11;
1284 s->tr[7] <<= 4;
1285 #endif
1288 void tsc210x_key_event(struct uwire_slave_s *chip, int key, int down)
1290 struct tsc210x_state_s *s = (struct tsc210x_state_s *) chip->opaque;
1292 if (down)
1293 s->kb.down |= 1 << key;
1294 else
1295 s->kb.down &= ~(1 << key);
1297 if (down && (s->kb.down & ~s->kb.mask) && !s->kb.intr) {
1298 s->kb.intr = 1;
1299 qemu_irq_lower(s->kbint);
1300 } else if (s->kb.intr && !(s->kb.down & ~s->kb.mask) &&
1301 !(s->kb.mode & 1)) {
1302 s->kb.intr = 0;
1303 qemu_irq_raise(s->kbint);