Statistics
| Branch: | Revision:

root / hw / tsc210x.c @ 9a393c6c

History | View | Annotate | Download (27.8 kB)

1
/*
2
 * TI TSC2102 (touchscreen/sensors/audio controller) emulator.
3
 *
4
 * Copyright (c) 2006 Andrzej Zaborowski  <balrog@zabor.org>
5
 *
6
 * This program is free software; you can redistribute it and/or
7
 * modify it under the terms of the GNU General Public License as
8
 * published by the Free Software Foundation; either version 2 of
9
 * the License, or (at your option) any later version.
10
 *
11
 * This program is distributed in the hope that it will be useful,
12
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
13
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14
 * GNU General Public License for more details.
15
 *
16
 * You should have received a copy of the GNU General Public License
17
 * along with this program; if not, write to the Free Software
18
 * Foundation, Inc., 59 Temple Place, Suite 330, Boston,
19
 * MA 02111-1307 USA
20
 */
21

    
22
#include "hw.h"
23
#include "audio/audio.h"
24
#include "qemu-timer.h"
25
#include "console.h"
26
#include "omap.h"
27

    
28
#define TSC_DATA_REGISTERS_PAGE                0x0
29
#define TSC_CONTROL_REGISTERS_PAGE        0x1
30
#define TSC_AUDIO_REGISTERS_PAGE        0x2
31

    
32
#define TSC_VERBOSE
33

    
34
#define TSC_CUT_RESOLUTION(value, p)        ((value) >> (16 - resolution[p]))
35

    
36
struct tsc210x_state_s {
37
    qemu_irq pint;
38
    QEMUTimer *timer;
39
    QEMUSoundCard card;
40
    struct uwire_slave_s chip;
41
    struct i2s_codec_s codec;
42
    uint8_t in_fifo[16384];
43
    uint8_t out_fifo[16384];
44

    
45
    int x, y;
46
    int pressure;
47

    
48
    int state, page, offset, irq;
49
    uint16_t command, dav;
50

    
51
    int busy;
52
    int enabled;
53
    int host_mode;
54
    int function;
55
    int nextfunction;
56
    int precision;
57
    int nextprecision;
58
    int filter;
59
    int pin_func;
60
    int ref;
61
    int timing;
62
    int noise;
63

    
64
    uint16_t audio_ctrl1;
65
    uint16_t audio_ctrl2;
66
    uint16_t audio_ctrl3;
67
    uint16_t pll[2];
68
    uint16_t volume;
69
    int64_t volume_change;
70
    int softstep;
71
    uint16_t dac_power;
72
    int64_t powerdown;
73
    uint16_t filter_data[0x14];
74

    
75
    const char *name;
76
    SWVoiceIn *adc_voice[1];
77
    SWVoiceOut *dac_voice[1];
78
    int i2s_rx_rate;
79
    int i2s_tx_rate;
80
    AudioState *audio;
81
};
82

    
83
static const int resolution[4] = { 12, 8, 10, 12 };
84

    
85
#define TSC_MODE_NO_SCAN        0x0
86
#define TSC_MODE_XY_SCAN        0x1
87
#define TSC_MODE_XYZ_SCAN        0x2
88
#define TSC_MODE_X                0x3
89
#define TSC_MODE_Y                0x4
90
#define TSC_MODE_Z                0x5
91
#define TSC_MODE_BAT1                0x6
92
#define TSC_MODE_BAT2                0x7
93
#define TSC_MODE_AUX                0x8
94
#define TSC_MODE_AUX_SCAN        0x9
95
#define TSC_MODE_TEMP1                0xa
96
#define TSC_MODE_PORT_SCAN        0xb
97
#define TSC_MODE_TEMP2                0xc
98
#define TSC_MODE_XX_DRV                0xd
99
#define TSC_MODE_YY_DRV                0xe
100
#define TSC_MODE_YX_DRV                0xf
101

    
102
static const uint16_t mode_regs[16] = {
103
    0x0000,        /* No scan */
104
    0x0600,        /* X, Y scan */
105
    0x0780,        /* X, Y, Z scan */
106
    0x0400,        /* X */
107
    0x0200,        /* Y */
108
    0x0180,        /* Z */
109
    0x0040,        /* BAT1 */
110
    0x0030,        /* BAT2 */
111
    0x0010,        /* AUX */
112
    0x0010,        /* AUX scan */
113
    0x0004,        /* TEMP1 */
114
    0x0070,        /* Port scan */
115
    0x0002,        /* TEMP2 */
116
    0x0000,        /* X+, X- drivers */
117
    0x0000,        /* Y+, Y- drivers */
118
    0x0000,        /* Y+, X- drivers */
119
};
120

    
121
/*
122
 * Convert screen coordinates to arbitrary values that the
123
 * touchscreen in my Palm Tungsten E device returns.
124
 * This shouldn't really matter (because the guest system
125
 * should calibrate the touchscreen anyway), but let's
126
 * imitate some real hardware.
127
 */
128
#define X_TRANSFORM(value)                \
129
    ((3850 - ((int) (value) * (3850 - 250) / 32768)) << 4)
130
#define Y_TRANSFORM(value)                \
131
    ((150 + ((int) (value) * (3037 - 150) / 32768)) << 4)
132
#define Z1_TRANSFORM(s)                        \
133
    ((400 - ((s)->x >> 7) + ((s)->pressure << 10)) << 4)
134
#define Z2_TRANSFORM(s)                        \
135
    ((4000 + ((s)->y >> 7) - ((s)->pressure << 10)) << 4)
136

    
137
#define BAT1_VAL                        0x8660
138
#define BAT2_VAL                        0x0000
139
#define AUX1_VAL                        0x35c0
140
#define AUX2_VAL                        0xffff
141
#define TEMP1_VAL                        0x8c70
142
#define TEMP2_VAL                        0xa5b0
143

    
144
#define TSC_POWEROFF_DELAY                50
145
#define TSC_SOFTSTEP_DELAY                50
146

    
147
static void tsc210x_reset(struct tsc210x_state_s *s)
148
{
149
    s->state = 0;
150
    s->pin_func = 2;
151
    s->enabled = 0;
152
    s->busy = 0;
153
    s->nextfunction = 0;
154
    s->ref = 0;
155
    s->timing = 0;
156
    s->irq = 0;
157
    s->dav = 0;
158

    
159
    s->audio_ctrl1 = 0x0000;
160
    s->audio_ctrl2 = 0x4410;
161
    s->audio_ctrl3 = 0x0000;
162
    s->pll[0] = 0x1004;
163
    s->pll[1] = 0x0000;
164
    s->volume = 0xffff;
165
    s->dac_power = 0x8540;
166
    s->softstep = 1;
167
    s->volume_change = 0;
168
    s->powerdown = 0;
169
    s->filter_data[0x00] = 0x6be3;
170
    s->filter_data[0x01] = 0x9666;
171
    s->filter_data[0x02] = 0x675d;
172
    s->filter_data[0x03] = 0x6be3;
173
    s->filter_data[0x04] = 0x9666;
174
    s->filter_data[0x05] = 0x675d;
175
    s->filter_data[0x06] = 0x7d83;
176
    s->filter_data[0x07] = 0x84ee;
177
    s->filter_data[0x08] = 0x7d83;
178
    s->filter_data[0x09] = 0x84ee;
179
    s->filter_data[0x0a] = 0x6be3;
180
    s->filter_data[0x0b] = 0x9666;
181
    s->filter_data[0x0c] = 0x675d;
182
    s->filter_data[0x0d] = 0x6be3;
183
    s->filter_data[0x0e] = 0x9666;
184
    s->filter_data[0x0f] = 0x675d;
185
    s->filter_data[0x10] = 0x7d83;
186
    s->filter_data[0x11] = 0x84ee;
187
    s->filter_data[0x12] = 0x7d83;
188
    s->filter_data[0x13] = 0x84ee;
189

    
190
    s->i2s_tx_rate = 0;
191
    s->i2s_rx_rate = 0;
192

    
193
    qemu_set_irq(s->pint, !s->irq);
194
}
195

    
196
struct tsc210x_rate_info_s {
197
    int rate;
198
    int dsor;
199
    int fsref;
200
};
201

    
202
/*  { rate,  dsor,  fsref } */
203
static const struct tsc210x_rate_info_s tsc2101_rates[] = {
204
    /* Fsref / 6.0 */
205
    { 7350,        7,        1 },
206
    { 8000,        7,        0 },
207
    /* Fsref / 5.5 */
208
    { 8018,        6,        1 },
209
    { 8727,        6,        0 },
210
    /* Fsref / 5.0 */
211
    { 8820,        5,        1 },
212
    { 9600,        5,        0 },
213
    /* Fsref / 4.0 */
214
    { 11025,        4,        1 },
215
    { 12000,        4,        0 },
216
    /* Fsref / 3.0 */
217
    { 14700,        3,        1 },
218
    { 16000,        3,        0 },
219
    /* Fsref / 2.0 */
220
    { 22050,        2,        1 },
221
    { 24000,        2,        0 },
222
    /* Fsref / 1.5 */
223
    { 29400,        1,        1 },
224
    { 32000,        1,        0 },
225
    /* Fsref */
226
    { 44100,        0,        1 },
227
    { 48000,        0,        0 },
228

    
229
    { 0,        0,         0 },
230
};
231

    
232
/*  { rate,   dsor, fsref }        */
233
static const struct tsc210x_rate_info_s tsc2102_rates[] = {
234
    /* Fsref / 6.0 */
235
    { 7350,        63,        1 },
236
    { 8000,        63,        0 },
237
    /* Fsref / 6.0 */
238
    { 7350,        54,        1 },
239
    { 8000,        54,        0 },
240
    /* Fsref / 5.0 */
241
    { 8820,        45,        1 },
242
    { 9600,        45,        0 },
243
    /* Fsref / 4.0 */
244
    { 11025,        36,        1 },
245
    { 12000,        36,        0 },
246
    /* Fsref / 3.0 */
247
    { 14700,        27,        1 },
248
    { 16000,        27,        0 },
249
    /* Fsref / 2.0 */
250
    { 22050,        18,        1 },
251
    { 24000,        18,        0 },
252
    /* Fsref / 1.5 */
253
    { 29400,        9,        1 },
254
    { 32000,        9,        0 },
255
    /* Fsref */
256
    { 44100,        0,        1 },
257
    { 48000,        0,        0 },
258

    
259
    { 0,        0,         0 },
260
};
261

    
262
static inline void tsc210x_out_flush(struct tsc210x_state_s *s, int len)
263
{
264
    uint8_t *data = s->codec.out.fifo + s->codec.out.start;
265
    uint8_t *end = data + len;
266

    
267
    while (data < end)
268
        data += AUD_write(s->dac_voice[0], data, end - data) ?: (end - data);
269

    
270
    s->codec.out.len -= len;
271
    if (s->codec.out.len)
272
        memmove(s->codec.out.fifo, end, s->codec.out.len);
273
    s->codec.out.start = 0;
274
}
275

    
276
static void tsc210x_audio_out_cb(struct tsc210x_state_s *s, int free_b)
277
{
278
    if (s->codec.out.len >= free_b) {
279
        tsc210x_out_flush(s, free_b);
280
        return;
281
    }
282

    
283
    s->codec.out.size = MIN(free_b, 16384);
284
    qemu_irq_raise(s->codec.tx_start);
285
}
286

    
287
static void tsc2102_audio_rate_update(struct tsc210x_state_s *s)
288
{
289
    const struct tsc210x_rate_info_s *rate;
290

    
291
    s->codec.tx_rate = 0;
292
    s->codec.rx_rate = 0;
293
    if (s->dac_power & (1 << 15))                                /* PWDNC */
294
        return;
295

    
296
    for (rate = tsc2102_rates; rate->rate; rate ++)
297
        if (rate->dsor == (s->audio_ctrl1 & 0x3f) &&                /* DACFS */
298
                        rate->fsref == ((s->audio_ctrl3 >> 13) & 1))/* REFFS */
299
            break;
300
    if (!rate->rate) {
301
        printf("%s: unknown sampling rate configured\n", __FUNCTION__);
302
        return;
303
    }
304

    
305
    s->codec.tx_rate = rate->rate;
306
}
307

    
308
static void tsc2102_audio_output_update(struct tsc210x_state_s *s)
309
{
310
    int enable;
311
    audsettings_t fmt;
312

    
313
    if (s->dac_voice[0]) {
314
        tsc210x_out_flush(s, s->codec.out.len);
315
        s->codec.out.size = 0;
316
        AUD_set_active_out(s->dac_voice[0], 0);
317
        AUD_close_out(&s->card, s->dac_voice[0]);
318
        s->dac_voice[0] = 0;
319
    }
320
    s->codec.cts = 0;
321

    
322
    enable =
323
            (~s->dac_power & (1 << 15)) &&                        /* PWDNC */
324
            (~s->dac_power & (1 << 10));                        /* DAPWDN */
325
    if (!enable || !s->codec.tx_rate)
326
        return;
327

    
328
    /* Force our own sampling rate even in slave DAC mode */
329
    fmt.endianness = 0;
330
    fmt.nchannels = 2;
331
    fmt.freq = s->codec.tx_rate;
332
    fmt.fmt = AUD_FMT_S16;
333

    
334
    s->dac_voice[0] = AUD_open_out(&s->card, s->dac_voice[0],
335
                    "tsc2102.sink", s, (void *) tsc210x_audio_out_cb, &fmt);
336
    if (s->dac_voice[0]) {
337
        s->codec.cts = 1;
338
        AUD_set_active_out(s->dac_voice[0], 1);
339
    }
340
}
341

    
342
static uint16_t tsc2102_data_register_read(struct tsc210x_state_s *s, int reg)
343
{
344
    switch (reg) {
345
    case 0x00:        /* X */
346
        s->dav &= 0xfbff;
347
        return TSC_CUT_RESOLUTION(X_TRANSFORM(s->x), s->precision) +
348
                (s->noise & 3);
349

    
350
    case 0x01:        /* Y */
351
        s->noise ++;
352
        s->dav &= 0xfdff;
353
        return TSC_CUT_RESOLUTION(Y_TRANSFORM(s->y), s->precision) ^
354
                (s->noise & 3);
355

    
356
    case 0x02:        /* Z1 */
357
        s->dav &= 0xfeff;
358
        return TSC_CUT_RESOLUTION(Z1_TRANSFORM(s), s->precision) -
359
                (s->noise & 3);
360

    
361
    case 0x03:        /* Z2 */
362
        s->dav &= 0xff7f;
363
        return TSC_CUT_RESOLUTION(Z2_TRANSFORM(s), s->precision) |
364
                (s->noise & 3);
365

    
366
    case 0x04:        /* KPData */
367
        return 0xffff;
368

    
369
    case 0x05:        /* BAT1 */
370
        s->dav &= 0xffbf;
371
        return TSC_CUT_RESOLUTION(BAT1_VAL, s->precision) +
372
                (s->noise & 6);
373

    
374
    case 0x06:        /* BAT2 */
375
        s->dav &= 0xffdf;
376
        return TSC_CUT_RESOLUTION(BAT2_VAL, s->precision);
377

    
378
    case 0x07:        /* AUX1 */
379
        s->dav &= 0xffef;
380
        return TSC_CUT_RESOLUTION(AUX1_VAL, s->precision);
381

    
382
    case 0x08:        /* AUX2 */
383
        s->dav &= 0xfff7;
384
        return 0xffff;
385

    
386
    case 0x09:        /* TEMP1 */
387
        s->dav &= 0xfffb;
388
        return TSC_CUT_RESOLUTION(TEMP1_VAL, s->precision) -
389
                (s->noise & 5);
390

    
391
    case 0x0a:        /* TEMP2 */
392
        s->dav &= 0xfffd;
393
        return TSC_CUT_RESOLUTION(TEMP2_VAL, s->precision) ^
394
                (s->noise & 3);
395

    
396
    case 0x0b:        /* DAC */
397
        s->dav &= 0xfffe;
398
        return 0xffff;
399

    
400
    default:
401
#ifdef TSC_VERBOSE
402
        fprintf(stderr, "tsc2102_data_register_read: "
403
                        "no such register: 0x%02x\n", reg);
404
#endif
405
        return 0xffff;
406
    }
407
}
408

    
409
static uint16_t tsc2102_control_register_read(
410
                struct tsc210x_state_s *s, int reg)
411
{
412
    switch (reg) {
413
    case 0x00:        /* TSC ADC */
414
        return (s->pressure << 15) | ((!s->busy) << 14) |
415
                (s->nextfunction << 10) | (s->nextprecision << 8) | s->filter; 
416

    
417
    case 0x01:        /* Status */
418
        return (s->pin_func << 14) | ((!s->enabled) << 13) |
419
                (s->host_mode << 12) | ((!!s->dav) << 11) | s->dav;
420

    
421
    case 0x03:        /* Reference */
422
        return s->ref;
423

    
424
    case 0x04:        /* Reset */
425
        return 0xffff;
426

    
427
    case 0x05:        /* Configuration */
428
        return s->timing;
429

    
430
    default:
431
#ifdef TSC_VERBOSE
432
        fprintf(stderr, "tsc2102_control_register_read: "
433
                        "no such register: 0x%02x\n", reg);
434
#endif
435
        return 0xffff;
436
    }
437
}
438

    
439
static uint16_t tsc2102_audio_register_read(struct tsc210x_state_s *s, int reg)
440
{
441
    int l_ch, r_ch;
442
    uint16_t val;
443

    
444
    switch (reg) {
445
    case 0x00:        /* Audio Control 1 */
446
        return s->audio_ctrl1;
447

    
448
    case 0x01:
449
        return 0xff00;
450

    
451
    case 0x02:        /* DAC Volume Control */
452
        return s->volume;
453

    
454
    case 0x03:
455
        return 0x8b00;
456

    
457
    case 0x04:        /* Audio Control 2 */
458
        l_ch = 1;
459
        r_ch = 1;
460
        if (s->softstep && !(s->dac_power & (1 << 10))) {
461
            l_ch = (qemu_get_clock(vm_clock) >
462
                            s->volume_change + TSC_SOFTSTEP_DELAY);
463
            r_ch = (qemu_get_clock(vm_clock) >
464
                            s->volume_change + TSC_SOFTSTEP_DELAY);
465
        }
466

    
467
        return s->audio_ctrl2 | (l_ch << 3) | (r_ch << 2);
468

    
469
    case 0x05:        /* Stereo DAC Power Control */
470
        return 0x2aa0 | s->dac_power |
471
                (((s->dac_power & (1 << 10)) &&
472
                  (qemu_get_clock(vm_clock) >
473
                   s->powerdown + TSC_POWEROFF_DELAY)) << 6);
474

    
475
    case 0x06:        /* Audio Control 3 */
476
        val = s->audio_ctrl3 | 0x0001;
477
        s->audio_ctrl3 &= 0xff3f;
478
        return val;
479

    
480
    case 0x07:        /* LCH_BASS_BOOST_N0 */
481
    case 0x08:        /* LCH_BASS_BOOST_N1 */
482
    case 0x09:        /* LCH_BASS_BOOST_N2 */
483
    case 0x0a:        /* LCH_BASS_BOOST_N3 */
484
    case 0x0b:        /* LCH_BASS_BOOST_N4 */
485
    case 0x0c:        /* LCH_BASS_BOOST_N5 */
486
    case 0x0d:        /* LCH_BASS_BOOST_D1 */
487
    case 0x0e:        /* LCH_BASS_BOOST_D2 */
488
    case 0x0f:        /* LCH_BASS_BOOST_D4 */
489
    case 0x10:        /* LCH_BASS_BOOST_D5 */
490
    case 0x11:        /* RCH_BASS_BOOST_N0 */
491
    case 0x12:        /* RCH_BASS_BOOST_N1 */
492
    case 0x13:        /* RCH_BASS_BOOST_N2 */
493
    case 0x14:        /* RCH_BASS_BOOST_N3 */
494
    case 0x15:        /* RCH_BASS_BOOST_N4 */
495
    case 0x16:        /* RCH_BASS_BOOST_N5 */
496
    case 0x17:        /* RCH_BASS_BOOST_D1 */
497
    case 0x18:        /* RCH_BASS_BOOST_D2 */
498
    case 0x19:        /* RCH_BASS_BOOST_D4 */
499
    case 0x1a:        /* RCH_BASS_BOOST_D5 */
500
        return s->filter_data[reg - 0x07];
501

    
502
    case 0x1b:        /* PLL Programmability 1 */
503
        return s->pll[0];
504

    
505
    case 0x1c:        /* PLL Programmability 2 */
506
        return s->pll[1];
507

    
508
    case 0x1d:        /* Audio Control 4 */
509
        return (!s->softstep) << 14;
510

    
511
    default:
512
#ifdef TSC_VERBOSE
513
        fprintf(stderr, "tsc2102_audio_register_read: "
514
                        "no such register: 0x%02x\n", reg);
515
#endif
516
        return 0xffff;
517
    }
518
}
519

    
520
static void tsc2102_data_register_write(
521
                struct tsc210x_state_s *s, int reg, uint16_t value)
522
{
523
    switch (reg) {
524
    case 0x00:        /* X */
525
    case 0x01:        /* Y */
526
    case 0x02:        /* Z1 */
527
    case 0x03:        /* Z2 */
528
    case 0x05:        /* BAT1 */
529
    case 0x06:        /* BAT2 */
530
    case 0x07:        /* AUX1 */
531
    case 0x08:        /* AUX2 */
532
    case 0x09:        /* TEMP1 */
533
    case 0x0a:        /* TEMP2 */
534
        return;
535

    
536
    default:
537
#ifdef TSC_VERBOSE
538
        fprintf(stderr, "tsc2102_data_register_write: "
539
                        "no such register: 0x%02x\n", reg);
540
#endif
541
    }
542
}
543

    
544
static void tsc2102_control_register_write(
545
                struct tsc210x_state_s *s, int reg, uint16_t value)
546
{
547
    switch (reg) {
548
    case 0x00:        /* TSC ADC */
549
        s->host_mode = value >> 15;
550
        s->enabled = !(value & 0x4000);
551
        if (s->busy && !s->enabled)
552
            qemu_del_timer(s->timer);
553
        s->busy &= s->enabled;
554
        s->nextfunction = (value >> 10) & 0xf;
555
        s->nextprecision = (value >> 8) & 3;
556
        s->filter = value & 0xff;
557
        return;
558

    
559
    case 0x01:        /* Status */
560
        s->pin_func = value >> 14;
561
        return;
562

    
563
    case 0x03:        /* Reference */
564
        s->ref = value & 0x1f;
565
        return;
566

    
567
    case 0x04:        /* Reset */
568
        if (value == 0xbb00) {
569
            if (s->busy)
570
                qemu_del_timer(s->timer);
571
            tsc210x_reset(s);
572
#ifdef TSC_VERBOSE
573
        } else {
574
            fprintf(stderr, "tsc2102_control_register_write: "
575
                            "wrong value written into RESET\n");
576
#endif
577
        }
578
        return;
579

    
580
    case 0x05:        /* Configuration */
581
        s->timing = value & 0x3f;
582
#ifdef TSC_VERBOSE
583
        if (value & ~0x3f)
584
            fprintf(stderr, "tsc2102_control_register_write: "
585
                            "wrong value written into CONFIG\n");
586
#endif
587
        return;
588

    
589
    default:
590
#ifdef TSC_VERBOSE
591
        fprintf(stderr, "tsc2102_control_register_write: "
592
                        "no such register: 0x%02x\n", reg);
593
#endif
594
    }
595
}
596

    
597
static void tsc2102_audio_register_write(
598
                struct tsc210x_state_s *s, int reg, uint16_t value)
599
{
600
    switch (reg) {
601
    case 0x00:        /* Audio Control 1 */
602
        s->audio_ctrl1 = value & 0x0f3f;
603
#ifdef TSC_VERBOSE
604
        if ((value & ~0x0f3f) || ((value & 7) != ((value >> 3) & 7)))
605
            fprintf(stderr, "tsc2102_audio_register_write: "
606
                            "wrong value written into Audio 1\n");
607
#endif
608
        tsc2102_audio_rate_update(s);
609
        if (s->audio)
610
            tsc2102_audio_output_update(s);
611
        return;
612

    
613
    case 0x01:
614
#ifdef TSC_VERBOSE
615
        if (value != 0xff00)
616
            fprintf(stderr, "tsc2102_audio_register_write: "
617
                            "wrong value written into reg 0x01\n");
618
#endif
619
        return;
620

    
621
    case 0x02:        /* DAC Volume Control */
622
        s->volume = value;
623
        s->volume_change = qemu_get_clock(vm_clock);
624
        return;
625

    
626
    case 0x03:
627
#ifdef TSC_VERBOSE
628
        if (value != 0x8b00)
629
            fprintf(stderr, "tsc2102_audio_register_write: "
630
                            "wrong value written into reg 0x03\n");
631
#endif
632
        return;
633

    
634
    case 0x04:        /* Audio Control 2 */
635
        s->audio_ctrl2 = value & 0xf7f2;
636
#ifdef TSC_VERBOSE
637
        if (value & ~0xf7fd)
638
            fprintf(stderr, "tsc2102_audio_register_write: "
639
                            "wrong value written into Audio 2\n");
640
#endif
641
        return;
642

    
643
    case 0x05:        /* Stereo DAC Power Control */
644
        if ((value & ~s->dac_power) & (1 << 10))
645
            s->powerdown = qemu_get_clock(vm_clock);
646

    
647
        s->dac_power = value & 0x9543;
648
#ifdef TSC_VERBOSE
649
        if ((value & ~0x9543) != 0x2aa0)
650
            fprintf(stderr, "tsc2102_audio_register_write: "
651
                            "wrong value written into Power\n");
652
#endif
653
        tsc2102_audio_rate_update(s);
654
        if (s->audio)
655
            tsc2102_audio_output_update(s);
656
        return;
657

    
658
    case 0x06:        /* Audio Control 3 */
659
        s->audio_ctrl3 &= 0x00c0;
660
        s->audio_ctrl3 |= value & 0xf800;
661
#ifdef TSC_VERBOSE
662
        if (value & ~0xf8c7)
663
            fprintf(stderr, "tsc2102_audio_register_write: "
664
                            "wrong value written into Audio 3\n");
665
#endif
666
        if (s->audio)
667
            tsc2102_audio_output_update(s);
668
        return;
669

    
670
    case 0x07:        /* LCH_BASS_BOOST_N0 */
671
    case 0x08:        /* LCH_BASS_BOOST_N1 */
672
    case 0x09:        /* LCH_BASS_BOOST_N2 */
673
    case 0x0a:        /* LCH_BASS_BOOST_N3 */
674
    case 0x0b:        /* LCH_BASS_BOOST_N4 */
675
    case 0x0c:        /* LCH_BASS_BOOST_N5 */
676
    case 0x0d:        /* LCH_BASS_BOOST_D1 */
677
    case 0x0e:        /* LCH_BASS_BOOST_D2 */
678
    case 0x0f:        /* LCH_BASS_BOOST_D4 */
679
    case 0x10:        /* LCH_BASS_BOOST_D5 */
680
    case 0x11:        /* RCH_BASS_BOOST_N0 */
681
    case 0x12:        /* RCH_BASS_BOOST_N1 */
682
    case 0x13:        /* RCH_BASS_BOOST_N2 */
683
    case 0x14:        /* RCH_BASS_BOOST_N3 */
684
    case 0x15:        /* RCH_BASS_BOOST_N4 */
685
    case 0x16:        /* RCH_BASS_BOOST_N5 */
686
    case 0x17:        /* RCH_BASS_BOOST_D1 */
687
    case 0x18:        /* RCH_BASS_BOOST_D2 */
688
    case 0x19:        /* RCH_BASS_BOOST_D4 */
689
    case 0x1a:        /* RCH_BASS_BOOST_D5 */
690
        s->filter_data[reg - 0x07] = value;
691
        return;
692

    
693
    case 0x1b:        /* PLL Programmability 1 */
694
        s->pll[0] = value & 0xfffc;
695
#ifdef TSC_VERBOSE
696
        if (value & ~0xfffc)
697
            fprintf(stderr, "tsc2102_audio_register_write: "
698
                            "wrong value written into PLL 1\n");
699
#endif
700
        return;
701

    
702
    case 0x1c:        /* PLL Programmability 2 */
703
        s->pll[1] = value & 0xfffc;
704
#ifdef TSC_VERBOSE
705
        if (value & ~0xfffc)
706
            fprintf(stderr, "tsc2102_audio_register_write: "
707
                            "wrong value written into PLL 2\n");
708
#endif
709
        return;
710

    
711
    case 0x1d:        /* Audio Control 4 */
712
        s->softstep = !(value & 0x4000);
713
#ifdef TSC_VERBOSE
714
        if (value & ~0x4000)
715
            fprintf(stderr, "tsc2102_audio_register_write: "
716
                            "wrong value written into Audio 4\n");
717
#endif
718
        return;
719

    
720
    default:
721
#ifdef TSC_VERBOSE
722
        fprintf(stderr, "tsc2102_audio_register_write: "
723
                        "no such register: 0x%02x\n", reg);
724
#endif
725
    }
726
}
727

    
728
/* This handles most of the chip logic.  */
729
static void tsc210x_pin_update(struct tsc210x_state_s *s)
730
{
731
    int64_t expires;
732
    int pin_state;
733

    
734
    switch (s->pin_func) {
735
    case 0:
736
        pin_state = s->pressure;
737
        break;
738
    case 1:
739
        pin_state = !!s->dav;
740
        break;
741
    case 2:
742
    default:
743
        pin_state = s->pressure && !s->dav;
744
    }
745

    
746
    if (!s->enabled)
747
        pin_state = 0;
748

    
749
    if (pin_state != s->irq) {
750
        s->irq = pin_state;
751
        qemu_set_irq(s->pint, !s->irq);
752
    }
753

    
754
    switch (s->nextfunction) {
755
    case TSC_MODE_XY_SCAN:
756
    case TSC_MODE_XYZ_SCAN:
757
        if (!s->pressure)
758
            return;
759
        break;
760

    
761
    case TSC_MODE_X:
762
    case TSC_MODE_Y:
763
    case TSC_MODE_Z:
764
        if (!s->pressure)
765
            return;
766
        /* Fall through */
767
    case TSC_MODE_BAT1:
768
    case TSC_MODE_BAT2:
769
    case TSC_MODE_AUX:
770
    case TSC_MODE_TEMP1:
771
    case TSC_MODE_TEMP2:
772
        if (s->dav)
773
            s->enabled = 0;
774
        break;
775

    
776
    case TSC_MODE_AUX_SCAN:
777
    case TSC_MODE_PORT_SCAN:
778
        break;
779

    
780
    case TSC_MODE_NO_SCAN:
781
    case TSC_MODE_XX_DRV:
782
    case TSC_MODE_YY_DRV:
783
    case TSC_MODE_YX_DRV:
784
    default:
785
        return;
786
    }
787

    
788
    if (!s->enabled || s->busy)
789
        return;
790

    
791
    s->busy = 1;
792
    s->precision = s->nextprecision;
793
    s->function = s->nextfunction;
794
    expires = qemu_get_clock(vm_clock) + (ticks_per_sec >> 10);
795
    qemu_mod_timer(s->timer, expires);
796
}
797

    
798
static uint16_t tsc210x_read(struct tsc210x_state_s *s)
799
{
800
    uint16_t ret = 0x0000;
801

    
802
    if (!s->command)
803
        fprintf(stderr, "tsc210x_read: SPI underrun!\n");
804

    
805
    switch (s->page) {
806
    case TSC_DATA_REGISTERS_PAGE:
807
        ret = tsc2102_data_register_read(s, s->offset);
808
        break;
809
    case TSC_CONTROL_REGISTERS_PAGE:
810
        ret = tsc2102_control_register_read(s, s->offset);
811
        break;
812
    case TSC_AUDIO_REGISTERS_PAGE:
813
        ret = tsc2102_audio_register_read(s, s->offset);
814
        break;
815
    default:
816
        cpu_abort(cpu_single_env, "tsc210x_read: wrong memory page\n");
817
    }
818

    
819
    tsc210x_pin_update(s);
820

    
821
    /* Allow sequential reads.  */
822
    s->offset ++;
823
    s->state = 0;
824
    return ret;
825
}
826

    
827
static void tsc210x_write(struct tsc210x_state_s *s, uint16_t value)
828
{
829
    /*
830
     * This is a two-state state machine for reading
831
     * command and data every second time.
832
     */
833
    if (!s->state) {
834
        s->command = value >> 15;
835
        s->page = (value >> 11) & 0x0f;
836
        s->offset = (value >> 5) & 0x3f;
837
        s->state = 1;
838
    } else {
839
        if (s->command)
840
            fprintf(stderr, "tsc210x_write: SPI overrun!\n");
841
        else
842
            switch (s->page) {
843
            case TSC_DATA_REGISTERS_PAGE:
844
                tsc2102_data_register_write(s, s->offset, value);
845
                break;
846
            case TSC_CONTROL_REGISTERS_PAGE:
847
                tsc2102_control_register_write(s, s->offset, value);
848
                break;
849
            case TSC_AUDIO_REGISTERS_PAGE:
850
                tsc2102_audio_register_write(s, s->offset, value);
851
                break;
852
            default:
853
                cpu_abort(cpu_single_env,
854
                                "tsc210x_write: wrong memory page\n");
855
            }
856

    
857
        tsc210x_pin_update(s);
858
        s->state = 0;
859
    }
860
}
861

    
862
static void tsc210x_timer_tick(void *opaque)
863
{
864
    struct tsc210x_state_s *s = opaque;
865

    
866
    /* Timer ticked -- a set of conversions has been finished.  */
867

    
868
    if (!s->busy)
869
        return;
870

    
871
    s->busy = 0;
872
    s->dav |= mode_regs[s->function];
873
    tsc210x_pin_update(s);
874
}
875

    
876
static void tsc210x_touchscreen_event(void *opaque,
877
                int x, int y, int z, int buttons_state)
878
{
879
    struct tsc210x_state_s *s = opaque;
880
    int p = s->pressure;
881

    
882
    if (buttons_state) {
883
        s->x = x;
884
        s->y = y;
885
    }
886
    s->pressure = !!buttons_state;
887

    
888
    /*
889
     * Note: We would get better responsiveness in the guest by
890
     * signaling TS events immediately, but for now we simulate
891
     * the first conversion delay for sake of correctness.
892
     */
893
    if (p != s->pressure)
894
        tsc210x_pin_update(s);
895
}
896

    
897
static void tsc210x_i2s_swallow(struct tsc210x_state_s *s)
898
{
899
    if (s->dac_voice[0])
900
        tsc210x_out_flush(s, s->codec.out.len);
901
    else
902
        s->codec.out.len = 0;
903
}
904

    
905
static void tsc210x_i2s_set_rate(struct tsc210x_state_s *s, int in, int out)
906
{
907
    s->i2s_tx_rate = out;
908
    s->i2s_rx_rate = in;
909
}
910

    
911
static void tsc210x_save(QEMUFile *f, void *opaque)
912
{
913
    struct tsc210x_state_s *s = (struct tsc210x_state_s *) opaque;
914
    int64_t now = qemu_get_clock(vm_clock);
915
    int i;
916

    
917
    qemu_put_be16(f, s->x);
918
    qemu_put_be16(f, s->y);
919
    qemu_put_byte(f, s->pressure);
920

    
921
    qemu_put_byte(f, s->state);
922
    qemu_put_byte(f, s->page);
923
    qemu_put_byte(f, s->offset);
924
    qemu_put_byte(f, s->command);
925

    
926
    qemu_put_byte(f, s->irq);
927
    qemu_put_be16s(f, &s->dav);
928

    
929
    qemu_put_timer(f, s->timer);
930
    qemu_put_byte(f, s->enabled);
931
    qemu_put_byte(f, s->host_mode);
932
    qemu_put_byte(f, s->function);
933
    qemu_put_byte(f, s->nextfunction);
934
    qemu_put_byte(f, s->precision);
935
    qemu_put_byte(f, s->nextprecision);
936
    qemu_put_byte(f, s->filter);
937
    qemu_put_byte(f, s->pin_func);
938
    qemu_put_byte(f, s->ref);
939
    qemu_put_byte(f, s->timing);
940
    qemu_put_be32(f, s->noise);
941

    
942
    qemu_put_be16s(f, &s->audio_ctrl1);
943
    qemu_put_be16s(f, &s->audio_ctrl2);
944
    qemu_put_be16s(f, &s->audio_ctrl3);
945
    qemu_put_be16s(f, &s->pll[0]);
946
    qemu_put_be16s(f, &s->pll[1]);
947
    qemu_put_be16s(f, &s->volume);
948
    qemu_put_be64(f, (uint64_t) (s->volume_change - now));
949
    qemu_put_be64(f, (uint64_t) (s->powerdown - now));
950
    qemu_put_byte(f, s->softstep);
951
    qemu_put_be16s(f, &s->dac_power);
952

    
953
    for (i = 0; i < 0x14; i ++)
954
        qemu_put_be16s(f, &s->filter_data[i]);
955
}
956

    
957
static int tsc210x_load(QEMUFile *f, void *opaque, int version_id)
958
{
959
    struct tsc210x_state_s *s = (struct tsc210x_state_s *) opaque;
960
    int64_t now = qemu_get_clock(vm_clock);
961
    int i;
962

    
963
    s->x = qemu_get_be16(f);
964
    s->y = qemu_get_be16(f);
965
    s->pressure = qemu_get_byte(f);
966

    
967
    s->state = qemu_get_byte(f);
968
    s->page = qemu_get_byte(f);
969
    s->offset = qemu_get_byte(f);
970
    s->command = qemu_get_byte(f);
971

    
972
    s->irq = qemu_get_byte(f);
973
    qemu_get_be16s(f, &s->dav);
974

    
975
    qemu_get_timer(f, s->timer);
976
    s->enabled = qemu_get_byte(f);
977
    s->host_mode = qemu_get_byte(f);
978
    s->function = qemu_get_byte(f);
979
    s->nextfunction = qemu_get_byte(f);
980
    s->precision = qemu_get_byte(f);
981
    s->nextprecision = qemu_get_byte(f);
982
    s->filter = qemu_get_byte(f);
983
    s->pin_func = qemu_get_byte(f);
984
    s->ref = qemu_get_byte(f);
985
    s->timing = qemu_get_byte(f);
986
    s->noise = qemu_get_be32(f);
987

    
988
    qemu_get_be16s(f, &s->audio_ctrl1);
989
    qemu_get_be16s(f, &s->audio_ctrl2);
990
    qemu_get_be16s(f, &s->audio_ctrl3);
991
    qemu_get_be16s(f, &s->pll[0]);
992
    qemu_get_be16s(f, &s->pll[1]);
993
    qemu_get_be16s(f, &s->volume);
994
    s->volume_change = (int64_t) qemu_get_be64(f) + now;
995
    s->powerdown = (int64_t) qemu_get_be64(f) + now;
996
    s->softstep = qemu_get_byte(f);
997
    qemu_get_be16s(f, &s->dac_power);
998

    
999
    for (i = 0; i < 0x14; i ++)
1000
        qemu_get_be16s(f, &s->filter_data[i]);
1001

    
1002
    s->busy = qemu_timer_pending(s->timer);
1003
    qemu_set_irq(s->pint, !s->irq);
1004

    
1005
    return 0;
1006
}
1007

    
1008
static int tsc2102_iid = 0;
1009

    
1010
struct uwire_slave_s *tsc2102_init(qemu_irq pint, AudioState *audio)
1011
{
1012
    struct tsc210x_state_s *s;
1013

    
1014
    s = (struct tsc210x_state_s *)
1015
            qemu_mallocz(sizeof(struct tsc210x_state_s));
1016
    memset(s, 0, sizeof(struct tsc210x_state_s));
1017
    s->x = 160;
1018
    s->y = 160;
1019
    s->pressure = 0;
1020
    s->precision = s->nextprecision = 0;
1021
    s->timer = qemu_new_timer(vm_clock, tsc210x_timer_tick, s);
1022
    s->pint = pint;
1023
    s->name = "tsc2102";
1024
    s->audio = audio;
1025

    
1026
    s->chip.opaque = s;
1027
    s->chip.send = (void *) tsc210x_write;
1028
    s->chip.receive = (void *) tsc210x_read;
1029

    
1030
    s->codec.opaque = s;
1031
    s->codec.tx_swallow = (void *) tsc210x_i2s_swallow;
1032
    s->codec.set_rate = (void *) tsc210x_i2s_set_rate;
1033
    s->codec.in.fifo = s->in_fifo;
1034
    s->codec.out.fifo = s->out_fifo;
1035

    
1036
    tsc210x_reset(s);
1037

    
1038
    qemu_add_mouse_event_handler(tsc210x_touchscreen_event, s, 1,
1039
                    "QEMU TSC2102-driven Touchscreen");
1040

    
1041
    if (s->audio)
1042
        AUD_register_card(s->audio, s->name, &s->card);
1043

    
1044
    qemu_register_reset((void *) tsc210x_reset, s);
1045
    register_savevm(s->name, tsc2102_iid ++, 0,
1046
                    tsc210x_save, tsc210x_load, s);
1047

    
1048
    return &s->chip;
1049
}
1050

    
1051
struct i2s_codec_s *tsc210x_codec(struct uwire_slave_s *chip)
1052
{
1053
    struct tsc210x_state_s *s = (struct tsc210x_state_s *) chip->opaque;
1054

    
1055
    return &s->codec;
1056
}