hw/input/tsc210x.c

   1 /*
   2  * TI TSC2102 (touchscreen/sensors/audio controller) emulator.
   3  * TI TSC2301 (touchscreen/sensors/keypad).
   4  *
   5  * Copyright (c) 2006 Andrzej Zaborowski  <balrog@zabor.org>
   6  * Copyright (C) 2008 Nokia Corporation
   7  *
   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.
  12  *
  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.
  17  *
  18  * You should have received a copy of the GNU General Public License along
  19  * with this program; if not, see <http://www.gnu.org/licenses/>.
  20  */
  21
  22 #include "qemu/osdep.h"
  23 #include "qemu/log.h"
  24 #include "hw/hw.h"
  25 #include "audio/audio.h"
  26 #include "qemu/timer.h"
  27 #include "sysemu/reset.h"
  28 #include "ui/console.h"
  29 #include "hw/arm/omap.h"            /* For I2SCodec */
  30 #include "hw/input/tsc2xxx.h"
  31 #include "hw/irq.h"
  32 #include "migration/vmstate.h"
  33
  34 #define TSC_DATA_REGISTERS_PAGE         0x0
  35 #define TSC_CONTROL_REGISTERS_PAGE      0x1
  36 #define TSC_AUDIO_REGISTERS_PAGE        0x2
  37
  38 #define TSC_VERBOSE
  39
  40 #define TSC_CUT_RESOLUTION(value, p)    ((value) >> (16 - resolution[p]))
  41
  42 typedef struct {
  43     qemu_irq pint;
  44     qemu_irq kbint;
  45     qemu_irq davint;
  46     QEMUTimer *timer;
  47     QEMUSoundCard card;
  48     uWireSlave chip;
  49     I2SCodec codec;
  50     uint8_t in_fifo[16384];
  51     uint8_t out_fifo[16384];
  52     uint16_t model;
  53
  54     int32_t x, y;
  55     bool pressure;
  56
  57     uint8_t page, offset;
  58     uint16_t dav;
  59
  60     bool state;
  61     bool irq;
  62     bool command;
  63     bool busy;
  64     bool enabled;
  65     bool host_mode;
  66     uint8_t function, nextfunction;
  67     uint8_t precision, nextprecision;
  68     uint8_t filter;
  69     uint8_t pin_func;
  70     uint8_t ref;
  71     uint8_t timing;
  72     uint8_t noise;
  73
  74     uint16_t audio_ctrl1;
  75     uint16_t audio_ctrl2;
  76     uint16_t audio_ctrl3;
  77     uint16_t pll[3];
  78     uint16_t volume;
  79     int64_t volume_change;
  80     bool softstep;
  81     uint16_t dac_power;
  82     int64_t powerdown;
  83     uint16_t filter_data[0x14];
  84
  85     const char *name;
  86     SWVoiceIn *adc_voice[1];
  87     SWVoiceOut *dac_voice[1];
  88     int i2s_rx_rate;
  89     int i2s_tx_rate;
  90
  91     int tr[8];
  92
  93     struct {
  94         uint16_t down;
  95         uint16_t mask;
  96         int scan;
  97         int debounce;
  98         int mode;
  99         int intr;
 100     } kb;
 101     int64_t now; /* Time at migration */
 102 } TSC210xState;
 103
 104 static const int resolution[4] = { 12, 8, 10, 12 };
 105
 106 #define TSC_MODE_NO_SCAN        0x0
 107 #define TSC_MODE_XY_SCAN        0x1
 108 #define TSC_MODE_XYZ_SCAN       0x2
 109 #define TSC_MODE_X              0x3
 110 #define TSC_MODE_Y              0x4
 111 #define TSC_MODE_Z              0x5
 112 #define TSC_MODE_BAT1           0x6
 113 #define TSC_MODE_BAT2           0x7
 114 #define TSC_MODE_AUX            0x8
 115 #define TSC_MODE_AUX_SCAN       0x9
 116 #define TSC_MODE_TEMP1          0xa
 117 #define TSC_MODE_PORT_SCAN      0xb
 118 #define TSC_MODE_TEMP2          0xc
 119 #define TSC_MODE_XX_DRV         0xd
 120 #define TSC_MODE_YY_DRV         0xe
 121 #define TSC_MODE_YX_DRV         0xf
 122
 123 static const uint16_t mode_regs[16] = {
 124     0x0000,     /* No scan */
 125     0x0600,     /* X, Y scan */
 126     0x0780,     /* X, Y, Z scan */
 127     0x0400,     /* X */
 128     0x0200,     /* Y */
 129     0x0180,     /* Z */
 130     0x0040,     /* BAT1 */
 131     0x0030,     /* BAT2 */
 132     0x0010,     /* AUX */
 133     0x0010,     /* AUX scan */
 134     0x0004,     /* TEMP1 */
 135     0x0070,     /* Port scan */
 136     0x0002,     /* TEMP2 */
 137     0x0000,     /* X+, X- drivers */
 138     0x0000,     /* Y+, Y- drivers */
 139     0x0000,     /* Y+, X- drivers */
 140 };
 141
 142 #define X_TRANSFORM(s)                  \
 143     ((s->y * s->tr[0] - s->x * s->tr[1]) / s->tr[2] + s->tr[3])
 144 #define Y_TRANSFORM(s)                  \
 145     ((s->y * s->tr[4] - s->x * s->tr[5]) / s->tr[6] + s->tr[7])
 146 #define Z1_TRANSFORM(s)                 \
 147     ((400 - ((s)->x >> 7) + ((s)->pressure << 10)) << 4)
 148 #define Z2_TRANSFORM(s)                 \
 149     ((4000 + ((s)->y >> 7) - ((s)->pressure << 10)) << 4)
 150
 151 #define BAT1_VAL                        0x8660
 152 #define BAT2_VAL                        0x0000
 153 #define AUX1_VAL                        0x35c0
 154 #define AUX2_VAL                        0xffff
 155 #define TEMP1_VAL                       0x8c70
 156 #define TEMP2_VAL                       0xa5b0
 157
 158 #define TSC_POWEROFF_DELAY              50
 159 #define TSC_SOFTSTEP_DELAY              50
 160
 161 static void tsc210x_reset(TSC210xState *s)
 162 {
 163     s->state = false;
 164     s->pin_func = 2;
 165     s->enabled = false;
 166     s->busy = false;
 167     s->nextfunction = 0;
 168     s->ref = 0;
 169     s->timing = 0;
 170     s->irq = false;
 171     s->dav = 0;
 172
 173     s->audio_ctrl1 = 0x0000;
 174     s->audio_ctrl2 = 0x4410;
 175     s->audio_ctrl3 = 0x0000;
 176     s->pll[0] = 0x1004;
 177     s->pll[1] = 0x0000;
 178     s->pll[2] = 0x1fff;
 179     s->volume = 0xffff;
 180     s->dac_power = 0x8540;
 181     s->softstep = true;
 182     s->volume_change = 0;
 183     s->powerdown = 0;
 184     s->filter_data[0x00] = 0x6be3;
 185     s->filter_data[0x01] = 0x9666;
 186     s->filter_data[0x02] = 0x675d;
 187     s->filter_data[0x03] = 0x6be3;
 188     s->filter_data[0x04] = 0x9666;
 189     s->filter_data[0x05] = 0x675d;
 190     s->filter_data[0x06] = 0x7d83;
 191     s->filter_data[0x07] = 0x84ee;
 192     s->filter_data[0x08] = 0x7d83;
 193     s->filter_data[0x09] = 0x84ee;
 194     s->filter_data[0x0a] = 0x6be3;
 195     s->filter_data[0x0b] = 0x9666;
 196     s->filter_data[0x0c] = 0x675d;
 197     s->filter_data[0x0d] = 0x6be3;
 198     s->filter_data[0x0e] = 0x9666;
 199     s->filter_data[0x0f] = 0x675d;
 200     s->filter_data[0x10] = 0x7d83;
 201     s->filter_data[0x11] = 0x84ee;
 202     s->filter_data[0x12] = 0x7d83;
 203     s->filter_data[0x13] = 0x84ee;
 204
 205     s->i2s_tx_rate = 0;
 206     s->i2s_rx_rate = 0;
 207
 208     s->kb.scan = 1;
 209     s->kb.debounce = 0;
 210     s->kb.mask = 0x0000;
 211     s->kb.mode = 3;
 212     s->kb.intr = 0;
 213
 214     qemu_set_irq(s->pint, !s->irq);
 215     qemu_set_irq(s->davint, !s->dav);
 216     qemu_irq_raise(s->kbint);
 217 }
 218
 219 typedef struct {
 220     int rate;
 221     int dsor;
 222     int fsref;
 223 } TSC210xRateInfo;
 224
 225 /*  { rate,   dsor, fsref }     */
 226 static const TSC210xRateInfo tsc2102_rates[] = {
 227     /* Fsref / 6.0 */
 228     { 7350,     63,     1 },
 229     { 8000,     63,     0 },
 230     /* Fsref / 6.0 */
 231     { 7350,     54,     1 },
 232     { 8000,     54,     0 },
 233     /* Fsref / 5.0 */
 234     { 8820,     45,     1 },
 235     { 9600,     45,     0 },
 236     /* Fsref / 4.0 */
 237     { 11025,    36,     1 },
 238     { 12000,    36,     0 },
 239     /* Fsref / 3.0 */
 240     { 14700,    27,     1 },
 241     { 16000,    27,     0 },
 242     /* Fsref / 2.0 */
 243     { 22050,    18,     1 },
 244     { 24000,    18,     0 },
 245     /* Fsref / 1.5 */
 246     { 29400,    9,      1 },
 247     { 32000,    9,      0 },
 248     /* Fsref */
 249     { 44100,    0,      1 },
 250     { 48000,    0,      0 },
 251
 252     { 0,        0,      0 },
 253 };
 254
 255 static inline void tsc210x_out_flush(TSC210xState *s, int len)
 256 {
 257     uint8_t *data = s->codec.out.fifo + s->codec.out.start;
 258     uint8_t *end = data + len;
 259
 260     while (data < end)
 261         data += AUD_write(s->dac_voice[0], data, end - data) ?: (end - data);
 262
 263     s->codec.out.len -= len;
 264     if (s->codec.out.len)
 265         memmove(s->codec.out.fifo, end, s->codec.out.len);
 266     s->codec.out.start = 0;
 267 }
 268
 269 static void tsc210x_audio_out_cb(TSC210xState *s, int free_b)
 270 {
 271     if (s->codec.out.len >= free_b) {
 272         tsc210x_out_flush(s, free_b);
 273         return;
 274     }
 275
 276     s->codec.out.size = MIN(free_b, 16384);
 277     qemu_irq_raise(s->codec.tx_start);
 278 }
 279
 280 static void tsc2102_audio_rate_update(TSC210xState *s)
 281 {
 282     const TSC210xRateInfo *rate;
 283
 284     s->codec.tx_rate = 0;
 285     s->codec.rx_rate = 0;
 286     if (s->dac_power & (1 << 15))                               /* PWDNC */
 287         return;
 288
 289     for (rate = tsc2102_rates; rate->rate; rate ++)
 290         if (rate->dsor == (s->audio_ctrl1 & 0x3f) &&            /* DACFS */
 291                         rate->fsref == ((s->audio_ctrl3 >> 13) & 1))/* REFFS */
 292             break;
 293     if (!rate->rate) {
 294         printf("%s: unknown sampling rate configured\n", __func__);
 295         return;
 296     }
 297
 298     s->codec.tx_rate = rate->rate;
 299 }
 300
 301 static void tsc2102_audio_output_update(TSC210xState *s)
 302 {
 303     int enable;
 304     struct audsettings fmt;
 305
 306     if (s->dac_voice[0]) {
 307         tsc210x_out_flush(s, s->codec.out.len);
 308         s->codec.out.size = 0;
 309         AUD_set_active_out(s->dac_voice[0], 0);
 310         AUD_close_out(&s->card, s->dac_voice[0]);
 311         s->dac_voice[0] = NULL;
 312     }
 313     s->codec.cts = 0;
 314
 315     enable =
 316             (~s->dac_power & (1 << 15)) &&                      /* PWDNC */
 317             (~s->dac_power & (1 << 10));                        /* DAPWDN */
 318     if (!enable || !s->codec.tx_rate)
 319         return;
 320
 321     /* Force our own sampling rate even in slave DAC mode */
 322     fmt.endianness = 0;
 323     fmt.nchannels = 2;
 324     fmt.freq = s->codec.tx_rate;
 325     fmt.fmt = AUDIO_FORMAT_S16;
 326
 327     s->dac_voice[0] = AUD_open_out(&s->card, s->dac_voice[0],
 328                     "tsc2102.sink", s, (void *) tsc210x_audio_out_cb, &fmt);
 329     if (s->dac_voice[0]) {
 330         s->codec.cts = 1;
 331         AUD_set_active_out(s->dac_voice[0], 1);
 332     }
 333 }
 334
 335 static uint16_t tsc2102_data_register_read(TSC210xState *s, int reg)
 336 {
 337     switch (reg) {
 338     case 0x00:  /* X */
 339         s->dav &= 0xfbff;
 340         return TSC_CUT_RESOLUTION(X_TRANSFORM(s), s->precision) +
 341                 (s->noise & 3);
 342
 343     case 0x01:  /* Y */
 344         s->noise ++;
 345         s->dav &= 0xfdff;
 346         return TSC_CUT_RESOLUTION(Y_TRANSFORM(s), s->precision) ^
 347                 (s->noise & 3);
 348
 349     case 0x02:  /* Z1 */
 350         s->dav &= 0xfeff;
 351         return TSC_CUT_RESOLUTION(Z1_TRANSFORM(s), s->precision) -
 352                 (s->noise & 3);
 353
 354     case 0x03:  /* Z2 */
 355         s->dav &= 0xff7f;
 356         return TSC_CUT_RESOLUTION(Z2_TRANSFORM(s), s->precision) |
 357                 (s->noise & 3);
 358
 359     case 0x04:  /* KPData */
 360         if ((s->model & 0xff00) == 0x2300) {
 361             if (s->kb.intr && (s->kb.mode & 2)) {
 362                 s->kb.intr = 0;
 363                 qemu_irq_raise(s->kbint);
 364             }
 365             return s->kb.down;
 366         }
 367
 368         return 0xffff;
 369
 370     case 0x05:  /* BAT1 */
 371         s->dav &= 0xffbf;
 372         return TSC_CUT_RESOLUTION(BAT1_VAL, s->precision) +
 373                 (s->noise & 6);
 374
 375     case 0x06:  /* BAT2 */
 376         s->dav &= 0xffdf;
 377         return TSC_CUT_RESOLUTION(BAT2_VAL, s->precision);
 378
 379     case 0x07:  /* AUX1 */
 380         s->dav &= 0xffef;
 381         return TSC_CUT_RESOLUTION(AUX1_VAL, s->precision);
 382
 383     case 0x08:  /* AUX2 */
 384         s->dav &= 0xfff7;
 385         return 0xffff;
 386
 387     case 0x09:  /* TEMP1 */
 388         s->dav &= 0xfffb;
 389         return TSC_CUT_RESOLUTION(TEMP1_VAL, s->precision) -
 390                 (s->noise & 5);
 391
 392     case 0x0a:  /* TEMP2 */
 393         s->dav &= 0xfffd;
 394         return TSC_CUT_RESOLUTION(TEMP2_VAL, s->precision) ^
 395                 (s->noise & 3);
 396
 397     case 0x0b:  /* DAC */
 398         s->dav &= 0xfffe;
 399         return 0xffff;
 400
 401     default:
 402 #ifdef TSC_VERBOSE
 403         fprintf(stderr, "tsc2102_data_register_read: "
 404                         "no such register: 0x%02x\n", reg);
 405 #endif
 406         return 0xffff;
 407     }
 408 }
 409
 410 static uint16_t tsc2102_control_register_read(
 411                 TSC210xState *s, int reg)
 412 {
 413     switch (reg) {
 414     case 0x00:  /* TSC ADC */
 415         return (s->pressure << 15) | ((!s->busy) << 14) |
 416                 (s->nextfunction << 10) | (s->nextprecision << 8) | s->filter;
 417
 418     case 0x01:  /* Status / Keypad Control */
 419         if ((s->model & 0xff00) == 0x2100)
 420             return (s->pin_func << 14) | ((!s->enabled) << 13) |
 421                     (s->host_mode << 12) | ((!!s->dav) << 11) | s->dav;
 422         else
 423             return (s->kb.intr << 15) | ((s->kb.scan || !s->kb.down) << 14) |
 424                     (s->kb.debounce << 11);
 425
 426     case 0x02:  /* DAC Control */
 427         if ((s->model & 0xff00) == 0x2300)
 428             return s->dac_power & 0x8000;
 429         else
 430             goto bad_reg;
 431
 432     case 0x03:  /* Reference */
 433         return s->ref;
 434
 435     case 0x04:  /* Reset */
 436         return 0xffff;
 437
 438     case 0x05:  /* Configuration */
 439         return s->timing;
 440
 441     case 0x06:  /* Secondary configuration */
 442         if ((s->model & 0xff00) == 0x2100)
 443             goto bad_reg;
 444         return ((!s->dav) << 15) | ((s->kb.mode & 1) << 14) | s->pll[2];
 445
 446     case 0x10:  /* Keypad Mask */
 447         if ((s->model & 0xff00) == 0x2100)
 448             goto bad_reg;
 449         return s->kb.mask;
 450
 451     default:
 452     bad_reg:
 453 #ifdef TSC_VERBOSE
 454         fprintf(stderr, "tsc2102_control_register_read: "
 455                         "no such register: 0x%02x\n", reg);
 456 #endif
 457         return 0xffff;
 458     }
 459 }
 460
 461 static uint16_t tsc2102_audio_register_read(TSC210xState *s, int reg)
 462 {
 463     int l_ch, r_ch;
 464     uint16_t val;
 465
 466     switch (reg) {
 467     case 0x00:  /* Audio Control 1 */
 468         return s->audio_ctrl1;
 469
 470     case 0x01:
 471         return 0xff00;
 472
 473     case 0x02:  /* DAC Volume Control */
 474         return s->volume;
 475
 476     case 0x03:
 477         return 0x8b00;
 478
 479     case 0x04:  /* Audio Control 2 */
 480         l_ch = 1;
 481         r_ch = 1;
 482         if (s->softstep && !(s->dac_power & (1 << 10))) {
 483             l_ch = (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) >
 484                             s->volume_change + TSC_SOFTSTEP_DELAY);
 485             r_ch = (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) >
 486                             s->volume_change + TSC_SOFTSTEP_DELAY);
 487         }
 488
 489         return s->audio_ctrl2 | (l_ch << 3) | (r_ch << 2);
 490
 491     case 0x05:  /* Stereo DAC Power Control */
 492         return 0x2aa0 | s->dac_power |
 493                 (((s->dac_power & (1 << 10)) &&
 494                   (qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) >
 495                    s->powerdown + TSC_POWEROFF_DELAY)) << 6);
 496
 497     case 0x06:  /* Audio Control 3 */
 498         val = s->audio_ctrl3 | 0x0001;
 499         s->audio_ctrl3 &= 0xff3f;
 500         return val;
 501
 502     case 0x07:  /* LCH_BASS_BOOST_N0 */
 503     case 0x08:  /* LCH_BASS_BOOST_N1 */
 504     case 0x09:  /* LCH_BASS_BOOST_N2 */
 505     case 0x0a:  /* LCH_BASS_BOOST_N3 */
 506     case 0x0b:  /* LCH_BASS_BOOST_N4 */
 507     case 0x0c:  /* LCH_BASS_BOOST_N5 */
 508     case 0x0d:  /* LCH_BASS_BOOST_D1 */
 509     case 0x0e:  /* LCH_BASS_BOOST_D2 */
 510     case 0x0f:  /* LCH_BASS_BOOST_D4 */
 511     case 0x10:  /* LCH_BASS_BOOST_D5 */
 512     case 0x11:  /* RCH_BASS_BOOST_N0 */
 513     case 0x12:  /* RCH_BASS_BOOST_N1 */
 514     case 0x13:  /* RCH_BASS_BOOST_N2 */
 515     case 0x14:  /* RCH_BASS_BOOST_N3 */
 516     case 0x15:  /* RCH_BASS_BOOST_N4 */
 517     case 0x16:  /* RCH_BASS_BOOST_N5 */
 518     case 0x17:  /* RCH_BASS_BOOST_D1 */
 519     case 0x18:  /* RCH_BASS_BOOST_D2 */
 520     case 0x19:  /* RCH_BASS_BOOST_D4 */
 521     case 0x1a:  /* RCH_BASS_BOOST_D5 */
 522         return s->filter_data[reg - 0x07];
 523
 524     case 0x1b:  /* PLL Programmability 1 */
 525         return s->pll[0];
 526
 527     case 0x1c:  /* PLL Programmability 2 */
 528         return s->pll[1];
 529
 530     case 0x1d:  /* Audio Control 4 */
 531         return (!s->softstep) << 14;
 532
 533     default:
 534 #ifdef TSC_VERBOSE
 535         fprintf(stderr, "tsc2102_audio_register_read: "
 536                         "no such register: 0x%02x\n", reg);
 537 #endif
 538         return 0xffff;
 539     }
 540 }
 541
 542 static void tsc2102_data_register_write(
 543                 TSC210xState *s, int reg, uint16_t value)
 544 {
 545     switch (reg) {
 546     case 0x00:  /* X */
 547     case 0x01:  /* Y */
 548     case 0x02:  /* Z1 */
 549     case 0x03:  /* Z2 */
 550     case 0x05:  /* BAT1 */
 551     case 0x06:  /* BAT2 */
 552     case 0x07:  /* AUX1 */
 553     case 0x08:  /* AUX2 */
 554     case 0x09:  /* TEMP1 */
 555     case 0x0a:  /* TEMP2 */
 556         return;
 557
 558     default:
 559         qemu_log_mask(LOG_GUEST_ERROR, "tsc2102_data_register_write: "
 560                                        "no such register: 0x%02x\n", reg);
 561     }
 562 }
 563
 564 static void tsc2102_control_register_write(
 565                 TSC210xState *s, int reg, uint16_t value)
 566 {
 567     switch (reg) {
 568     case 0x00:  /* TSC ADC */
 569         s->host_mode = value >> 15;
 570         s->enabled = !(value & 0x4000);
 571         if (s->busy && !s->enabled)
 572             timer_del(s->timer);
 573         s->busy = s->busy && s->enabled;
 574         s->nextfunction = (value >> 10) & 0xf;
 575         s->nextprecision = (value >> 8) & 3;
 576         s->filter = value & 0xff;
 577         return;
 578
 579     case 0x01:  /* Status / Keypad Control */
 580         if ((s->model & 0xff00) == 0x2100)
 581             s->pin_func = value >> 14;
 582         else {
 583             s->kb.scan = (value >> 14) & 1;
 584             s->kb.debounce = (value >> 11) & 7;
 585             if (s->kb.intr && s->kb.scan) {
 586                 s->kb.intr = 0;
 587                 qemu_irq_raise(s->kbint);
 588             }
 589         }
 590         return;
 591
 592     case 0x02:  /* DAC Control */
 593         if ((s->model & 0xff00) == 0x2300) {
 594             s->dac_power &= 0x7fff;
 595             s->dac_power |= 0x8000 & value;
 596         } else
 597             goto bad_reg;
 598         break;
 599
 600     case 0x03:  /* Reference */
 601         s->ref = value & 0x1f;
 602         return;
 603
 604     case 0x04:  /* Reset */
 605         if (value == 0xbb00) {
 606             if (s->busy)
 607                 timer_del(s->timer);
 608             tsc210x_reset(s);
 609 #ifdef TSC_VERBOSE
 610         } else {
 611             fprintf(stderr, "tsc2102_control_register_write: "
 612                             "wrong value written into RESET\n");
 613 #endif
 614         }
 615         return;
 616
 617     case 0x05:  /* Configuration */
 618         s->timing = value & 0x3f;
 619 #ifdef TSC_VERBOSE
 620         if (value & ~0x3f)
 621             fprintf(stderr, "tsc2102_control_register_write: "
 622                             "wrong value written into CONFIG\n");
 623 #endif
 624         return;
 625
 626     case 0x06:  /* Secondary configuration */
 627         if ((s->model & 0xff00) == 0x2100)
 628             goto bad_reg;
 629         s->kb.mode = value >> 14;
 630         s->pll[2] = value & 0x3ffff;
 631         return;
 632
 633     case 0x10:  /* Keypad Mask */
 634         if ((s->model & 0xff00) == 0x2100)
 635             goto bad_reg;
 636         s->kb.mask = value;
 637         return;
 638
 639     default:
 640     bad_reg:
 641         qemu_log_mask(LOG_GUEST_ERROR, "tsc2102_control_register_write: "
 642                                        "no such register: 0x%02x\n", reg);
 643     }
 644 }
 645
 646 static void tsc2102_audio_register_write(
 647                 TSC210xState *s, int reg, uint16_t value)
 648 {
 649     switch (reg) {
 650     case 0x00:  /* Audio Control 1 */
 651         s->audio_ctrl1 = value & 0x0f3f;
 652 #ifdef TSC_VERBOSE
 653         if ((value & ~0x0f3f) || ((value & 7) != ((value >> 3) & 7)))
 654             fprintf(stderr, "tsc2102_audio_register_write: "
 655                             "wrong value written into Audio 1\n");
 656 #endif
 657         tsc2102_audio_rate_update(s);
 658         tsc2102_audio_output_update(s);
 659         return;
 660
 661     case 0x01:
 662 #ifdef TSC_VERBOSE
 663         if (value != 0xff00)
 664             fprintf(stderr, "tsc2102_audio_register_write: "
 665                             "wrong value written into reg 0x01\n");
 666 #endif
 667         return;
 668
 669     case 0x02:  /* DAC Volume Control */
 670         s->volume = value;
 671         s->volume_change = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 672         return;
 673
 674     case 0x03:
 675 #ifdef TSC_VERBOSE
 676         if (value != 0x8b00)
 677             fprintf(stderr, "tsc2102_audio_register_write: "
 678                             "wrong value written into reg 0x03\n");
 679 #endif
 680         return;
 681
 682     case 0x04:  /* Audio Control 2 */
 683         s->audio_ctrl2 = value & 0xf7f2;
 684 #ifdef TSC_VERBOSE
 685         if (value & ~0xf7fd)
 686             fprintf(stderr, "tsc2102_audio_register_write: "
 687                             "wrong value written into Audio 2\n");
 688 #endif
 689         return;
 690
 691     case 0x05:  /* Stereo DAC Power Control */
 692         if ((value & ~s->dac_power) & (1 << 10))
 693             s->powerdown = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 694
 695         s->dac_power = value & 0x9543;
 696 #ifdef TSC_VERBOSE
 697         if ((value & ~0x9543) != 0x2aa0)
 698             fprintf(stderr, "tsc2102_audio_register_write: "
 699                             "wrong value written into Power\n");
 700 #endif
 701         tsc2102_audio_rate_update(s);
 702         tsc2102_audio_output_update(s);
 703         return;
 704
 705     case 0x06:  /* Audio Control 3 */
 706         s->audio_ctrl3 &= 0x00c0;
 707         s->audio_ctrl3 |= value & 0xf800;
 708 #ifdef TSC_VERBOSE
 709         if (value & ~0xf8c7)
 710             fprintf(stderr, "tsc2102_audio_register_write: "
 711                             "wrong value written into Audio 3\n");
 712 #endif
 713         tsc2102_audio_output_update(s);
 714         return;
 715
 716     case 0x07:  /* LCH_BASS_BOOST_N0 */
 717     case 0x08:  /* LCH_BASS_BOOST_N1 */
 718     case 0x09:  /* LCH_BASS_BOOST_N2 */
 719     case 0x0a:  /* LCH_BASS_BOOST_N3 */
 720     case 0x0b:  /* LCH_BASS_BOOST_N4 */
 721     case 0x0c:  /* LCH_BASS_BOOST_N5 */
 722     case 0x0d:  /* LCH_BASS_BOOST_D1 */
 723     case 0x0e:  /* LCH_BASS_BOOST_D2 */
 724     case 0x0f:  /* LCH_BASS_BOOST_D4 */
 725     case 0x10:  /* LCH_BASS_BOOST_D5 */
 726     case 0x11:  /* RCH_BASS_BOOST_N0 */
 727     case 0x12:  /* RCH_BASS_BOOST_N1 */
 728     case 0x13:  /* RCH_BASS_BOOST_N2 */
 729     case 0x14:  /* RCH_BASS_BOOST_N3 */
 730     case 0x15:  /* RCH_BASS_BOOST_N4 */
 731     case 0x16:  /* RCH_BASS_BOOST_N5 */
 732     case 0x17:  /* RCH_BASS_BOOST_D1 */
 733     case 0x18:  /* RCH_BASS_BOOST_D2 */
 734     case 0x19:  /* RCH_BASS_BOOST_D4 */
 735     case 0x1a:  /* RCH_BASS_BOOST_D5 */
 736         s->filter_data[reg - 0x07] = value;
 737         return;
 738
 739     case 0x1b:  /* PLL Programmability 1 */
 740         s->pll[0] = value & 0xfffc;
 741 #ifdef TSC_VERBOSE
 742         if (value & ~0xfffc)
 743             fprintf(stderr, "tsc2102_audio_register_write: "
 744                             "wrong value written into PLL 1\n");
 745 #endif
 746         return;
 747
 748     case 0x1c:  /* PLL Programmability 2 */
 749         s->pll[1] = value & 0xfffc;
 750 #ifdef TSC_VERBOSE
 751         if (value & ~0xfffc)
 752             fprintf(stderr, "tsc2102_audio_register_write: "
 753                             "wrong value written into PLL 2\n");
 754 #endif
 755         return;
 756
 757     case 0x1d:  /* Audio Control 4 */
 758         s->softstep = !(value & 0x4000);
 759 #ifdef TSC_VERBOSE
 760         if (value & ~0x4000)
 761             fprintf(stderr, "tsc2102_audio_register_write: "
 762                             "wrong value written into Audio 4\n");
 763 #endif
 764         return;
 765
 766     default:
 767         qemu_log_mask(LOG_GUEST_ERROR, "tsc2102_audio_register_write: "
 768                                        "no such register: 0x%02x\n", reg);
 769     }
 770 }
 771
 772 /* This handles most of the chip logic.  */
 773 static void tsc210x_pin_update(TSC210xState *s)
 774 {
 775     int64_t expires;
 776     bool pin_state;
 777
 778     switch (s->pin_func) {
 779     case 0:
 780         pin_state = s->pressure;
 781         break;
 782     case 1:
 783         pin_state = !!s->dav;
 784         break;
 785     case 2:
 786     default:
 787         pin_state = s->pressure && !s->dav;
 788     }
 789
 790     if (!s->enabled)
 791         pin_state = false;
 792
 793     if (pin_state != s->irq) {
 794         s->irq = pin_state;
 795         qemu_set_irq(s->pint, !s->irq);
 796     }
 797
 798     switch (s->nextfunction) {
 799     case TSC_MODE_XY_SCAN:
 800     case TSC_MODE_XYZ_SCAN:
 801         if (!s->pressure)
 802             return;
 803         break;
 804
 805     case TSC_MODE_X:
 806     case TSC_MODE_Y:
 807     case TSC_MODE_Z:
 808         if (!s->pressure)
 809             return;
 810         /* Fall through */
 811     case TSC_MODE_BAT1:
 812     case TSC_MODE_BAT2:
 813     case TSC_MODE_AUX:
 814     case TSC_MODE_TEMP1:
 815     case TSC_MODE_TEMP2:
 816         if (s->dav)
 817             s->enabled = false;
 818         break;
 819
 820     case TSC_MODE_AUX_SCAN:
 821     case TSC_MODE_PORT_SCAN:
 822         break;
 823
 824     case TSC_MODE_NO_SCAN:
 825     case TSC_MODE_XX_DRV:
 826     case TSC_MODE_YY_DRV:
 827     case TSC_MODE_YX_DRV:
 828     default:
 829         return;
 830     }
 831
 832     if (!s->enabled || s->busy || s->dav)
 833         return;
 834
 835     s->busy = true;
 836     s->precision = s->nextprecision;
 837     s->function = s->nextfunction;
 838     expires = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL) +
 839         (NANOSECONDS_PER_SECOND >> 10);
 840     timer_mod(s->timer, expires);
 841 }
 842
 843 static uint16_t tsc210x_read(TSC210xState *s)
 844 {
 845     uint16_t ret = 0x0000;
 846
 847     if (!s->command)
 848         fprintf(stderr, "tsc210x_read: SPI underrun!\n");
 849
 850     switch (s->page) {
 851     case TSC_DATA_REGISTERS_PAGE:
 852         ret = tsc2102_data_register_read(s, s->offset);
 853         if (!s->dav)
 854             qemu_irq_raise(s->davint);
 855         break;
 856     case TSC_CONTROL_REGISTERS_PAGE:
 857         ret = tsc2102_control_register_read(s, s->offset);
 858         break;
 859     case TSC_AUDIO_REGISTERS_PAGE:
 860         ret = tsc2102_audio_register_read(s, s->offset);
 861         break;
 862     default:
 863         hw_error("tsc210x_read: wrong memory page\n");
 864     }
 865
 866     tsc210x_pin_update(s);
 867
 868     /* Allow sequential reads.  */
 869     s->offset ++;
 870     s->state = false;
 871     return ret;
 872 }
 873
 874 static void tsc210x_write(TSC210xState *s, uint16_t value)
 875 {
 876     /*
 877      * This is a two-state state machine for reading
 878      * command and data every second time.
 879      */
 880     if (!s->state) {
 881         s->command = (value >> 15) != 0;
 882         s->page = (value >> 11) & 0x0f;
 883         s->offset = (value >> 5) & 0x3f;
 884         s->state = true;
 885     } else {
 886         if (s->command)
 887             fprintf(stderr, "tsc210x_write: SPI overrun!\n");
 888         else
 889             switch (s->page) {
 890             case TSC_DATA_REGISTERS_PAGE:
 891                 tsc2102_data_register_write(s, s->offset, value);
 892                 break;
 893             case TSC_CONTROL_REGISTERS_PAGE:
 894                 tsc2102_control_register_write(s, s->offset, value);
 895                 break;
 896             case TSC_AUDIO_REGISTERS_PAGE:
 897                 tsc2102_audio_register_write(s, s->offset, value);
 898                 break;
 899             default:
 900                 hw_error("tsc210x_write: wrong memory page\n");
 901             }
 902
 903         tsc210x_pin_update(s);
 904         s->state = false;
 905     }
 906 }
 907
 908 uint32_t tsc210x_txrx(void *opaque, uint32_t value, int len)
 909 {
 910     TSC210xState *s = opaque;
 911     uint32_t ret = 0;
 912
 913     if (len != 16)
 914         hw_error("%s: FIXME: bad SPI word width %i\n", __func__, len);
 915
 916     /* TODO: sequential reads etc - how do we make sure the host doesn't
 917      * unintentionally read out a conversion result from a register while
 918      * transmitting the command word of the next command?  */
 919     if (!value || (s->state && s->command))
 920         ret = tsc210x_read(s);
 921     if (value || (s->state && !s->command))
 922         tsc210x_write(s, value);
 923
 924     return ret;
 925 }
 926
 927 static void tsc210x_timer_tick(void *opaque)
 928 {
 929     TSC210xState *s = opaque;
 930
 931     /* Timer ticked -- a set of conversions has been finished.  */
 932
 933     if (!s->busy)
 934         return;
 935
 936     s->busy = false;
 937     s->dav |= mode_regs[s->function];
 938     tsc210x_pin_update(s);
 939     qemu_irq_lower(s->davint);
 940 }
 941
 942 static void tsc210x_touchscreen_event(void *opaque,
 943                 int x, int y, int z, int buttons_state)
 944 {
 945     TSC210xState *s = opaque;
 946     int p = s->pressure;
 947
 948     if (buttons_state) {
 949         s->x = x;
 950         s->y = y;
 951     }
 952     s->pressure = !!buttons_state;
 953
 954     /*
 955      * Note: We would get better responsiveness in the guest by
 956      * signaling TS events immediately, but for now we simulate
 957      * the first conversion delay for sake of correctness.
 958      */
 959     if (p != s->pressure)
 960         tsc210x_pin_update(s);
 961 }
 962
 963 static void tsc210x_i2s_swallow(TSC210xState *s)
 964 {
 965     if (s->dac_voice[0])
 966         tsc210x_out_flush(s, s->codec.out.len);
 967     else
 968         s->codec.out.len = 0;
 969 }
 970
 971 static void tsc210x_i2s_set_rate(TSC210xState *s, int in, int out)
 972 {
 973     s->i2s_tx_rate = out;
 974     s->i2s_rx_rate = in;
 975 }
 976
 977 static int tsc210x_pre_save(void *opaque)
 978 {
 979     TSC210xState *s = (TSC210xState *) opaque;
 980     s->now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 981
 982     return 0;
 983 }
 984
 985 static int tsc210x_post_load(void *opaque, int version_id)
 986 {
 987     TSC210xState *s = (TSC210xState *) opaque;
 988     int64_t now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
 989
 990     if (s->function >= ARRAY_SIZE(mode_regs)) {
 991         return -EINVAL;
 992     }
 993     if (s->nextfunction >= ARRAY_SIZE(mode_regs)) {
 994         return -EINVAL;
 995     }
 996     if (s->precision >= ARRAY_SIZE(resolution)) {
 997         return -EINVAL;
 998     }
 999     if (s->nextprecision >= ARRAY_SIZE(resolution)) {
1000         return -EINVAL;
1001     }
1002
1003     s->volume_change -= s->now;
1004     s->volume_change += now;
1005     s->powerdown -= s->now;
1006     s->powerdown += now;
1007
1008     s->busy = timer_pending(s->timer);
1009     qemu_set_irq(s->pint, !s->irq);
1010     qemu_set_irq(s->davint, !s->dav);
1011
1012     return 0;
1013 }
1014
1015 static VMStateField vmstatefields_tsc210x[] = {
1016     VMSTATE_BOOL(enabled, TSC210xState),
1017     VMSTATE_BOOL(host_mode, TSC210xState),
1018     VMSTATE_BOOL(irq, TSC210xState),
1019     VMSTATE_BOOL(command, TSC210xState),
1020     VMSTATE_BOOL(pressure, TSC210xState),
1021     VMSTATE_BOOL(softstep, TSC210xState),
1022     VMSTATE_BOOL(state, TSC210xState),
1023     VMSTATE_UINT16(dav, TSC210xState),
1024     VMSTATE_INT32(x, TSC210xState),
1025     VMSTATE_INT32(y, TSC210xState),
1026     VMSTATE_UINT8(offset, TSC210xState),
1027     VMSTATE_UINT8(page, TSC210xState),
1028     VMSTATE_UINT8(filter, TSC210xState),
1029     VMSTATE_UINT8(pin_func, TSC210xState),
1030     VMSTATE_UINT8(ref, TSC210xState),
1031     VMSTATE_UINT8(timing, TSC210xState),
1032     VMSTATE_UINT8(noise, TSC210xState),
1033     VMSTATE_UINT8(function, TSC210xState),
1034     VMSTATE_UINT8(nextfunction, TSC210xState),
1035     VMSTATE_UINT8(precision, TSC210xState),
1036     VMSTATE_UINT8(nextprecision, TSC210xState),
1037     VMSTATE_UINT16(audio_ctrl1, TSC210xState),
1038     VMSTATE_UINT16(audio_ctrl2, TSC210xState),
1039     VMSTATE_UINT16(audio_ctrl3, TSC210xState),
1040     VMSTATE_UINT16_ARRAY(pll, TSC210xState, 3),
1041     VMSTATE_UINT16(volume, TSC210xState),
1042     VMSTATE_UINT16(dac_power, TSC210xState),
1043     VMSTATE_INT64(volume_change, TSC210xState),
1044     VMSTATE_INT64(powerdown, TSC210xState),
1045     VMSTATE_INT64(now, TSC210xState),
1046     VMSTATE_UINT16_ARRAY(filter_data, TSC210xState, 0x14),
1047     VMSTATE_TIMER_PTR(timer, TSC210xState),
1048     VMSTATE_END_OF_LIST()
1049 };
1050
1051 static const VMStateDescription vmstate_tsc2102 = {
1052     .name = "tsc2102",
1053     .version_id = 1,
1054     .minimum_version_id = 1,
1055     .pre_save = tsc210x_pre_save,
1056     .post_load = tsc210x_post_load,
1057     .fields = vmstatefields_tsc210x,
1058 };
1059
1060 static const VMStateDescription vmstate_tsc2301 = {
1061     .name = "tsc2301",
1062     .version_id = 1,
1063     .minimum_version_id = 1,
1064     .pre_save = tsc210x_pre_save,
1065     .post_load = tsc210x_post_load,
1066     .fields = vmstatefields_tsc210x,
1067 };
1068
1069 uWireSlave *tsc2102_init(qemu_irq pint)
1070 {
1071     TSC210xState *s;
1072
1073     s = g_new0(TSC210xState, 1);
1074     s->x = 160;
1075     s->y = 160;
1076     s->pressure = 0;
1077     s->precision = s->nextprecision = 0;
1078     s->timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, tsc210x_timer_tick, s);
1079     s->pint = pint;
1080     s->model = 0x2102;
1081     s->name = "tsc2102";
1082
1083     s->tr[0] = 0;
1084     s->tr[1] = 1;
1085     s->tr[2] = 1;
1086     s->tr[3] = 0;
1087     s->tr[4] = 1;
1088     s->tr[5] = 0;
1089     s->tr[6] = 1;
1090     s->tr[7] = 0;
1091
1092     s->chip.opaque = s;
1093     s->chip.send = (void *) tsc210x_write;
1094     s->chip.receive = (void *) tsc210x_read;
1095
1096     s->codec.opaque = s;
1097     s->codec.tx_swallow = (void *) tsc210x_i2s_swallow;
1098     s->codec.set_rate = (void *) tsc210x_i2s_set_rate;
1099     s->codec.in.fifo = s->in_fifo;
1100     s->codec.out.fifo = s->out_fifo;
1101
1102     tsc210x_reset(s);
1103
1104     qemu_add_mouse_event_handler(tsc210x_touchscreen_event, s, 1,
1105                     "QEMU TSC2102-driven Touchscreen");
1106
1107     AUD_register_card(s->name, &s->card);
1108
1109     qemu_register_reset((void *) tsc210x_reset, s);
1110     vmstate_register(NULL, 0, &vmstate_tsc2102, s);
1111
1112     return &s->chip;
1113 }
1114
1115 uWireSlave *tsc2301_init(qemu_irq penirq, qemu_irq kbirq, qemu_irq dav)
1116 {
1117     TSC210xState *s;
1118
1119     s = g_new0(TSC210xState, 1);
1120     s->x = 400;
1121     s->y = 240;
1122     s->pressure = 0;
1123     s->precision = s->nextprecision = 0;
1124     s->timer = timer_new_ns(QEMU_CLOCK_VIRTUAL, tsc210x_timer_tick, s);
1125     s->pint = penirq;
1126     s->kbint = kbirq;
1127     s->davint = dav;
1128     s->model = 0x2301;
1129     s->name = "tsc2301";
1130
1131     s->tr[0] = 0;
1132     s->tr[1] = 1;
1133     s->tr[2] = 1;
1134     s->tr[3] = 0;
1135     s->tr[4] = 1;
1136     s->tr[5] = 0;
1137     s->tr[6] = 1;
1138     s->tr[7] = 0;
1139
1140     s->chip.opaque = s;
1141     s->chip.send = (void *) tsc210x_write;
1142     s->chip.receive = (void *) tsc210x_read;
1143
1144     s->codec.opaque = s;
1145     s->codec.tx_swallow = (void *) tsc210x_i2s_swallow;
1146     s->codec.set_rate = (void *) tsc210x_i2s_set_rate;
1147     s->codec.in.fifo = s->in_fifo;
1148     s->codec.out.fifo = s->out_fifo;
1149
1150     tsc210x_reset(s);
1151
1152     qemu_add_mouse_event_handler(tsc210x_touchscreen_event, s, 1,
1153                     "QEMU TSC2301-driven Touchscreen");
1154
1155     AUD_register_card(s->name, &s->card);
1156
1157     qemu_register_reset((void *) tsc210x_reset, s);
1158     vmstate_register(NULL, 0, &vmstate_tsc2301, s);
1159
1160     return &s->chip;
1161 }
1162
1163 I2SCodec *tsc210x_codec(uWireSlave *chip)
1164 {
1165     TSC210xState *s = (TSC210xState *) chip->opaque;
1166
1167     return &s->codec;
1168 }
1169
1170 /*
1171  * Use tslib generated calibration data to generate ADC input values
1172  * from the touchscreen.  Assuming 12-bit precision was used during
1173  * tslib calibration.
1174  */
1175 void tsc210x_set_transform(uWireSlave *chip,
1176                 MouseTransformInfo *info)
1177 {
1178     TSC210xState *s = (TSC210xState *) chip->opaque;
1179 #if 0
1180     int64_t ltr[8];
1181
1182     ltr[0] = (int64_t) info->a[1] * info->y;
1183     ltr[1] = (int64_t) info->a[4] * info->x;
1184     ltr[2] = (int64_t) info->a[1] * info->a[3] -
1185             (int64_t) info->a[4] * info->a[0];
1186     ltr[3] = (int64_t) info->a[2] * info->a[4] -
1187             (int64_t) info->a[5] * info->a[1];
1188     ltr[4] = (int64_t) info->a[0] * info->y;
1189     ltr[5] = (int64_t) info->a[3] * info->x;
1190     ltr[6] = (int64_t) info->a[4] * info->a[0] -
1191             (int64_t) info->a[1] * info->a[3];
1192     ltr[7] = (int64_t) info->a[2] * info->a[3] -
1193             (int64_t) info->a[5] * info->a[0];
1194
1195     /* Avoid integer overflow */
1196     s->tr[0] = ltr[0] >> 11;
1197     s->tr[1] = ltr[1] >> 11;
1198     s->tr[2] = muldiv64(ltr[2], 1, info->a[6]);
1199     s->tr[3] = muldiv64(ltr[3], 1 << 4, ltr[2]);
1200     s->tr[4] = ltr[4] >> 11;
1201     s->tr[5] = ltr[5] >> 11;
1202     s->tr[6] = muldiv64(ltr[6], 1, info->a[6]);
1203     s->tr[7] = muldiv64(ltr[7], 1 << 4, ltr[6]);
1204 #else
1205
1206     /* This version assumes touchscreen X & Y axis are parallel or
1207      * perpendicular to LCD's  X & Y axis in some way.  */
1208     if (abs(info->a[0]) > abs(info->a[1])) {
1209         s->tr[0] = 0;
1210         s->tr[1] = -info->a[6] * info->x;
1211         s->tr[2] = info->a[0];
1212         s->tr[3] = -info->a[2] / info->a[0];
1213         s->tr[4] = info->a[6] * info->y;
1214         s->tr[5] = 0;
1215         s->tr[6] = info->a[4];
1216         s->tr[7] = -info->a[5] / info->a[4];
1217     } else {
1218         s->tr[0] = info->a[6] * info->y;
1219         s->tr[1] = 0;
1220         s->tr[2] = info->a[1];
1221         s->tr[3] = -info->a[2] / info->a[1];
1222         s->tr[4] = 0;
1223         s->tr[5] = -info->a[6] * info->x;
1224         s->tr[6] = info->a[3];
1225         s->tr[7] = -info->a[5] / info->a[3];
1226     }
1227
1228     s->tr[0] >>= 11;
1229     s->tr[1] >>= 11;
1230     s->tr[3] <<= 4;
1231     s->tr[4] >>= 11;
1232     s->tr[5] >>= 11;
1233     s->tr[7] <<= 4;
1234 #endif
1235 }
1236
1237 void tsc210x_key_event(uWireSlave *chip, int key, int down)
1238 {
1239     TSC210xState *s = (TSC210xState *) chip->opaque;
1240
1241     if (down)
1242         s->kb.down |= 1 << key;
1243     else
1244         s->kb.down &= ~(1 << key);
1245
1246     if (down && (s->kb.down & ~s->kb.mask) && !s->kb.intr) {
1247         s->kb.intr = 1;
1248         qemu_irq_lower(s->kbint);
1249     } else if (s->kb.intr && !(s->kb.down & ~s->kb.mask) &&
1250                     !(s->kb.mode & 1)) {
1251         s->kb.intr = 0;
1252         qemu_irq_raise(s->kbint);
1253     }
1254 }