sb16.c 30.9 KB
Newer Older
B
bellard 已提交
1 2 3
/*
 * QEMU Soundblaster 16 emulation
 * 
B
bellard 已提交
4
 * Copyright (c) 2003-2004 Vassili Karpov (malc)
B
bellard 已提交
5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25
 * 
 * Permission is hereby granted, free of charge, to any person obtaining a copy
 * of this software and associated documentation files (the "Software"), to deal
 * in the Software without restriction, including without limitation the rights
 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
 * copies of the Software, and to permit persons to whom the Software is
 * furnished to do so, subject to the following conditions:
 *
 * The above copyright notice and this permission notice shall be included in
 * all copies or substantial portions of the Software.
 *
 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
 * THE SOFTWARE.
 */
#include "vl.h"

B
bellard 已提交
26
#define LENOFA(a) ((int) (sizeof(a)/sizeof(a[0])))
B
bellard 已提交
27

B
bellard 已提交
28 29 30 31 32 33 34 35
#define dolog(...) AUD_log ("sb16", __VA_ARGS__)
#ifdef DEBUG
#define ldebug(...) dolog (__VA_ARGS__)
#else
#define ldebug(...)
#endif

/* #define DEBUG */
B
bellard 已提交
36
/* #define DEBUG_SB16_MOST */
B
bellard 已提交
37

B
bellard 已提交
38
#define IO_READ_PROTO(name)                             \
B
bellard 已提交
39
    uint32_t name (void *opaque, uint32_t nport)
B
bellard 已提交
40
#define IO_WRITE_PROTO(name)                                    \
B
bellard 已提交
41
    void name (void *opaque, uint32_t nport, uint32_t val)
B
bellard 已提交
42

B
bellard 已提交
43
static const char e3[] = "COPYRIGHT (C) CREATIVE TECHNOLOGY LTD, 1992.";
B
bellard 已提交
44

B
bellard 已提交
45 46 47 48 49 50 51
static struct {
    int ver_lo;
    int ver_hi;
    int irq;
    int dma;
    int hdma;
    int port;
B
bellard 已提交
52
} conf = {5, 4, 5, 1, 5, 0x220};
B
bellard 已提交
53

54
typedef struct SB16State {
B
bellard 已提交
55 56 57 58 59 60
    int irq;
    int dma;
    int hdma;
    int port;
    int ver;

B
bellard 已提交
61 62 63 64 65
    int in_index;
    int out_data_len;
    int fmt_stereo;
    int fmt_signed;
    int fmt_bits;
B
bellard 已提交
66
    audfmt_e fmt;
B
bellard 已提交
67
    int dma_auto;
B
bellard 已提交
68
    int block_size;
B
bellard 已提交
69 70 71 72 73 74 75
    int fifo;
    int freq;
    int time_const;
    int speaker;
    int needed_bytes;
    int cmd;
    int use_hdma;
B
bellard 已提交
76 77
    int highspeed;
    int can_write;
B
bellard 已提交
78 79 80

    int v2x6;

B
bellard 已提交
81 82 83 84 85 86 87 88 89
    uint8_t csp_param;
    uint8_t csp_value;
    uint8_t csp_mode;
    uint8_t csp_regs[256];
    uint8_t csp_index;
    uint8_t csp_reg83[4];
    int csp_reg83r;
    int csp_reg83w;

B
bellard 已提交
90
    uint8_t in2_data[10];
B
bellard 已提交
91 92 93 94
    uint8_t out_data[50];
    uint8_t test_reg;
    uint8_t last_read_byte;
    int nzero;
B
bellard 已提交
95 96 97

    int left_till_irq;

B
bellard 已提交
98 99 100 101 102 103
    int dma_running;
    int bytes_per_second;
    int align;
    SWVoice *voice;

    QEMUTimer *ts, *aux_ts;
104 105
    /* mixer state */
    int mixer_nreg;
B
bellard 已提交
106
    uint8_t mixer_regs[256];
107
} SB16State;
B
bellard 已提交
108

109 110
/* XXX: suppress that and use a context */
static struct SB16State dsp;
B
bellard 已提交
111

B
bellard 已提交
112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146
static int magic_of_irq (int irq)
{
    switch (irq) {
    case 5:
        return 2;
    case 7:
        return 4;
    case 9:
        return 1;
    case 10:
        return 8;
    default:
        dolog ("bad irq %d\n", irq);
        return 2;
    }
}

static int irq_of_magic (int magic)
{
    switch (magic) {
    case 1:
        return 9;
    case 2:
        return 5;
    case 4:
        return 7;
    case 8:
        return 10;
    default:
        dolog ("bad irq magic %d\n", magic);
        return -1;
    }
}

#if 0
147 148
static void log_dsp (SB16State *dsp)
{
B
bellard 已提交
149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164
    ldebug ("%s:%s:%d:%s:dmasize=%d:freq=%d:const=%d:speaker=%d\n",
            dsp->fmt_stereo ? "Stereo" : "Mono",
            dsp->fmt_signed ? "Signed" : "Unsigned",
            dsp->fmt_bits,
            dsp->dma_auto ? "Auto" : "Single",
            dsp->block_size,
            dsp->freq,
            dsp->time_const,
            dsp->speaker);
}
#endif

static void speaker (SB16State *s, int on)
{
    s->speaker = on;
    /* AUD_enable (s->voice, on); */
B
bellard 已提交
165 166
}

B
bellard 已提交
167
static void control (SB16State *s, int hold)
B
bellard 已提交
168
{
B
bellard 已提交
169 170 171 172 173
    int dma = s->use_hdma ? s->hdma : s->dma;
    s->dma_running = hold;

    ldebug ("hold %d high %d dma %d\n", hold, s->use_hdma, dma);

B
bellard 已提交
174
    if (hold) {
B
bellard 已提交
175 176
        DMA_hold_DREQ (dma);
        AUD_enable (s->voice, 1);
B
bellard 已提交
177 178
    }
    else {
B
bellard 已提交
179 180
        DMA_release_DREQ (dma);
        AUD_enable (s->voice, 0);
B
bellard 已提交
181 182 183
    }
}

B
bellard 已提交
184
static void aux_timer (void *opaque)
B
bellard 已提交
185
{
B
bellard 已提交
186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230
    SB16State *s = opaque;
    s->can_write = 1;
    pic_set_irq (s->irq, 1);
}

#define DMA8_AUTO 1
#define DMA8_HIGH 2

static void dma_cmd8 (SB16State *s, int mask, int dma_len)
{
    s->fmt = AUD_FMT_U8;
    s->use_hdma = 0;
    s->fmt_bits = 8;
    s->fmt_signed = 0;
    s->fmt_stereo = (s->mixer_regs[0x0e] & 2) != 0;
    if (-1 == s->time_const) {
        s->freq = 11025;
    }
    else {
        int tmp = (256 - s->time_const);
        s->freq = (1000000 + (tmp / 2)) / tmp;
    }

    if (-1 != dma_len)
        s->block_size = dma_len + 1;

    s->freq >>= s->fmt_stereo;
    s->left_till_irq = s->block_size;
    s->bytes_per_second = (s->freq << s->fmt_stereo);
    /* s->highspeed = (mask & DMA8_HIGH) != 0; */
    s->dma_auto = (mask & DMA8_AUTO) != 0;
    s->align = (1 << s->fmt_stereo) - 1;

    ldebug ("freq %d, stereo %d, sign %d, bits %d, "
            "dma %d, auto %d, fifo %d, high %d\n",
            s->freq, s->fmt_stereo, s->fmt_signed, s->fmt_bits,
            s->block_size, s->dma_auto, s->fifo, s->highspeed);

    if (s->freq)
        s->voice = AUD_open (s->voice, "sb16", s->freq,
                             1 << s->fmt_stereo, s->fmt);

    control (s, 1);
    speaker (s, 1);
}
B
bellard 已提交
231

B
bellard 已提交
232 233 234 235 236 237 238
static void dma_cmd (SB16State *s, uint8_t cmd, uint8_t d0, int dma_len)
{
    s->use_hdma = cmd < 0xc0;
    s->fifo = (cmd >> 1) & 1;
    s->dma_auto = (cmd >> 2) & 1;
    s->fmt_signed = (d0 >> 4) & 1;
    s->fmt_stereo = (d0 >> 5) & 1;
B
bellard 已提交
239 240 241

    switch (cmd >> 4) {
    case 11:
B
bellard 已提交
242
        s->fmt_bits = 16;
B
bellard 已提交
243 244 245
        break;

    case 12:
B
bellard 已提交
246
        s->fmt_bits = 8;
B
bellard 已提交
247 248 249
        break;
    }

B
bellard 已提交
250 251 252 253 254 255 256 257 258
    if (-1 != s->time_const) {
#if 1
        int tmp = 256 - s->time_const;
        s->freq = (1000000 + (tmp / 2)) / tmp;
#else
        /* s->freq = 1000000 / ((255 - s->time_const) << s->fmt_stereo); */
        s->freq = 1000000 / ((255 - s->time_const));
#endif
        s->time_const = -1;
B
bellard 已提交
259 260
    }

B
bellard 已提交
261 262 263 264
    s->block_size = dma_len + 1;
    s->block_size <<= (s->fmt_bits == 16);
    if (!s->dma_auto)           /* Miles Sound System ? */
        s->block_size <<= s->fmt_stereo;
B
bellard 已提交
265

B
bellard 已提交
266 267 268 269
    ldebug ("freq %d, stereo %d, sign %d, bits %d, "
            "dma %d, auto %d, fifo %d, high %d\n",
            s->freq, s->fmt_stereo, s->fmt_signed, s->fmt_bits,
            s->block_size, s->dma_auto, s->fifo, s->highspeed);
B
bellard 已提交
270

B
bellard 已提交
271 272 273
    if (16 == s->fmt_bits) {
        if (s->fmt_signed) {
            s->fmt = AUD_FMT_S16;
B
bellard 已提交
274 275
        }
        else {
B
bellard 已提交
276
            s->fmt = AUD_FMT_U16;
B
bellard 已提交
277 278 279
        }
    }
    else {
B
bellard 已提交
280 281
        if (s->fmt_signed) {
            s->fmt = AUD_FMT_S8;
B
bellard 已提交
282 283
        }
        else {
B
bellard 已提交
284
            s->fmt = AUD_FMT_U8;
B
bellard 已提交
285 286 287
        }
    }

B
bellard 已提交
288
    s->left_till_irq = s->block_size;
B
bellard 已提交
289

B
bellard 已提交
290 291 292
    s->bytes_per_second = (s->freq << s->fmt_stereo) << (s->fmt_bits == 16);
    s->highspeed = 0;
    s->align = (1 << (s->fmt_stereo + (s->fmt_bits == 16))) - 1;
B
bellard 已提交
293

B
bellard 已提交
294 295 296
    if (s->freq)
        s->voice = AUD_open (s->voice, "sb16", s->freq,
                             1 << s->fmt_stereo, s->fmt);
B
bellard 已提交
297

B
bellard 已提交
298 299
    control (s, 1);
    speaker (s, 1);
B
bellard 已提交
300 301
}

B
bellard 已提交
302
static inline void dsp_out_data (SB16State *s, uint8_t val)
B
bellard 已提交
303
{
B
bellard 已提交
304 305 306
    ldebug ("outdata %#x\n", val);
    if (s->out_data_len < sizeof (s->out_data))
        s->out_data[s->out_data_len++] = val;
B
bellard 已提交
307 308
}

B
bellard 已提交
309
static inline uint8_t dsp_get_data (SB16State *s)
B
bellard 已提交
310
{
B
bellard 已提交
311 312 313 314
    if (s->in_index)
        return s->in2_data[--s->in_index];
    else {
        dolog ("buffer underflow\n");
B
bellard 已提交
315
        return 0;
B
bellard 已提交
316
    }
B
bellard 已提交
317 318
}

B
bellard 已提交
319
static void command (SB16State *s, uint8_t cmd)
B
bellard 已提交
320
{
B
bellard 已提交
321
    ldebug ("command %#x\n", cmd);
B
bellard 已提交
322 323

    if (cmd > 0xaf && cmd < 0xd0) {
B
bellard 已提交
324 325 326
        if (cmd & 8) {
            dolog ("ADC not yet supported (command %#x)\n", cmd);
        }
B
bellard 已提交
327 328 329 330 331 332

        switch (cmd >> 4) {
        case 11:
        case 12:
            break;
        default:
B
bellard 已提交
333
            dolog ("%#x wrong bits\n", cmd);
B
bellard 已提交
334
        }
B
bellard 已提交
335
        s->needed_bytes = 3;
B
bellard 已提交
336 337 338
    }
    else {
        switch (cmd) {
B
bellard 已提交
339
        case 0x03:
B
bellard 已提交
340 341 342
            dsp_out_data (s, 0x10); /* s->csp_param); */
            goto warn;

B
bellard 已提交
343
        case 0x04:
B
bellard 已提交
344 345
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
346 347

        case 0x05:
B
bellard 已提交
348 349 350 351 352 353
            s->needed_bytes = 2;
            goto warn;

        case 0x08:
            /* __asm__ ("int3"); */
            goto warn;
B
bellard 已提交
354

B
bellard 已提交
355
        case 0x0e:
B
bellard 已提交
356 357 358 359 360 361
            s->needed_bytes = 2;
            goto warn;

        case 0x09:
            dsp_out_data (s, 0xf8);
            goto warn;
B
bellard 已提交
362 363

        case 0x0f:
B
bellard 已提交
364 365
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
366

B
bellard 已提交
367
        case 0x10:
B
bellard 已提交
368 369
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
370 371

        case 0x14:
B
bellard 已提交
372 373
            s->needed_bytes = 2;
            s->block_size = 0;
B
bellard 已提交
374 375
            break;

B
bellard 已提交
376 377 378
        case 0x20:              /* Direct ADC, Juice/PL */
            dsp_out_data (s, 0xff);
            goto warn;
B
bellard 已提交
379 380

        case 0x35:
B
bellard 已提交
381
            dolog ("MIDI command(0x35) not implemented\n");
B
bellard 已提交
382 383 384
            break;

        case 0x40:
B
bellard 已提交
385 386 387
            s->freq = -1;
            s->time_const = -1;
            s->needed_bytes = 1;
B
bellard 已提交
388 389 390
            break;

        case 0x41:
B
bellard 已提交
391 392 393
            s->freq = -1;
            s->time_const = -1;
            s->needed_bytes = 2;
B
bellard 已提交
394 395
            break;

B
bellard 已提交
396 397 398 399 400 401
        case 0x42:
            s->freq = -1;
            s->time_const = -1;
            s->needed_bytes = 2;
            goto warn;

B
bellard 已提交
402
        case 0x45:
B
bellard 已提交
403 404 405
            dsp_out_data (s, 0xaa);
            goto warn;

B
bellard 已提交
406 407 408 409
        case 0x47:                /* Continue Auto-Initialize DMA 16bit */
            break;

        case 0x48:
B
bellard 已提交
410
            s->needed_bytes = 2;
B
bellard 已提交
411 412 413
            break;

        case 0x80:
B
bellard 已提交
414
            s->needed_bytes = 2;
B
bellard 已提交
415 416 417 418
            break;

        case 0x90:
        case 0x91:
B
bellard 已提交
419 420
            dma_cmd8 (s, ((cmd & 1) == 0) | DMA8_HIGH, -1);
            break;
B
bellard 已提交
421

B
bellard 已提交
422 423 424
        case 0xd0:              /* halt DMA operation. 8bit */
            control (s, 0);
            break;
B
bellard 已提交
425

B
bellard 已提交
426 427
        case 0xd1:              /* speaker on */
            speaker (s, 1);
B
bellard 已提交
428 429
            break;

B
bellard 已提交
430 431 432
        case 0xd3:              /* speaker off */
            speaker (s, 0);
            break;
B
bellard 已提交
433

B
bellard 已提交
434 435
        case 0xd4:              /* continue DMA operation. 8bit */
            control (s, 1);
B
bellard 已提交
436 437
            break;

B
bellard 已提交
438 439
        case 0xd5:              /* halt DMA operation. 16bit */
            control (s, 0);
B
bellard 已提交
440 441
            break;

B
bellard 已提交
442 443
        case 0xd6:              /* continue DMA operation. 16bit */
            control (s, 1);
B
bellard 已提交
444 445
            break;

B
bellard 已提交
446 447 448
        case 0xd9:              /* exit auto-init DMA after this block. 16bit */
            s->dma_auto = 0;
            break;
B
bellard 已提交
449

B
bellard 已提交
450 451
        case 0xda:              /* exit auto-init DMA after this block. 8bit */
            s->dma_auto = 0;
B
bellard 已提交
452 453 454
            break;

        case 0xe0:
B
bellard 已提交
455 456
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
457 458

        case 0xe1:
B
bellard 已提交
459 460 461 462 463 464 465
            dsp_out_data (s, s->ver & 0xff);
            dsp_out_data (s, s->ver >> 8);
            break;

        case 0xe2:
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
466

B
bellard 已提交
467 468 469
        case 0xe3:
            {
                int i;
B
bellard 已提交
470 471
                for (i = sizeof (e3) - 1; i >= 0; --i)
                    dsp_out_data (s, e3[i]);
B
bellard 已提交
472
            }
B
bellard 已提交
473
            break;
B
bellard 已提交
474

B
bellard 已提交
475
        case 0xe4:              /* write test reg */
B
bellard 已提交
476
            s->needed_bytes = 1;
B
bellard 已提交
477 478
            break;

B
bellard 已提交
479 480 481 482
        case 0xe7:
            dolog ("Attempt to probe for ESS (0xe7)?\n");
            return;

B
bellard 已提交
483
        case 0xe8:              /* read test reg */
B
bellard 已提交
484
            dsp_out_data (s, s->test_reg);
B
bellard 已提交
485 486
            break;

B
bellard 已提交
487
        case 0xf2:
B
bellard 已提交
488 489 490 491 492
        case 0xf3:
            dsp_out_data (s, 0xaa);
            s->mixer_regs[0x82] |= (cmd == 0xf2) ? 1 : 2;
            pic_set_irq (s->irq, 1);
            break;
B
bellard 已提交
493

B
bellard 已提交
494
        case 0xf9:
B
bellard 已提交
495 496
            s->needed_bytes = 1;
            goto warn;
B
bellard 已提交
497 498

        case 0xfa:
B
bellard 已提交
499 500
            dsp_out_data (s, 0);
            goto warn;
B
bellard 已提交
501 502

        case 0xfc:              /* FIXME */
B
bellard 已提交
503 504
            dsp_out_data (s, 0);
            goto warn;
B
bellard 已提交
505

B
bellard 已提交
506
        default:
B
bellard 已提交
507
            dolog ("unrecognized command %#x\n", cmd);
B
bellard 已提交
508
            return;
B
bellard 已提交
509 510
        }
    }
B
bellard 已提交
511 512 513 514

    s->cmd = cmd;
    if (!s->needed_bytes)
        ldebug ("\n");
B
bellard 已提交
515 516
    return;

B
bellard 已提交
517
 warn:
B
bellard 已提交
518
    dolog ("warning: command %#x,%d is not trully understood yet\n",
B
bellard 已提交
519 520
           cmd, s->needed_bytes);
    s->cmd = cmd;
B
bellard 已提交
521 522 523
    return;
}

B
bellard 已提交
524 525 526 527 528 529 530 531 532 533 534 535 536 537 538
static uint16_t dsp_get_lohi (SB16State *s)
{
    uint8_t hi = dsp_get_data (s);
    uint8_t lo = dsp_get_data (s);
    return (hi << 8) | lo;
}

static uint16_t dsp_get_hilo (SB16State *s)
{
    uint8_t lo = dsp_get_data (s);
    uint8_t hi = dsp_get_data (s);
    return (hi << 8) | lo;
}

static void complete (SB16State *s)
B
bellard 已提交
539
{
B
bellard 已提交
540
    int d0, d1, d2;
B
bellard 已提交
541 542
    ldebug ("complete command %#x, in_index %d, needed_bytes %d\n",
            s->cmd, s->in_index, s->needed_bytes);
B
bellard 已提交
543

B
bellard 已提交
544 545 546 547
    if (s->cmd > 0xaf && s->cmd < 0xd0) {
        d2 = dsp_get_data (s);
        d1 = dsp_get_data (s);
        d0 = dsp_get_data (s);
B
bellard 已提交
548

B
bellard 已提交
549 550 551 552 553 554 555 556 557
        if (s->cmd & 8) {
            dolog ("ADC params cmd = %#x d0 = %d, d1 = %d, d2 = %d\n",
                   s->cmd, d0, d1, d2);
        }
        else {
            ldebug ("cmd = %#x d0 = %d, d1 = %d, d2 = %d\n",
                    s->cmd, d0, d1, d2);
            dma_cmd (s, s->cmd, d0, d1 + (d2 << 8));
        }
B
bellard 已提交
558 559
    }
    else {
B
bellard 已提交
560
        switch (s->cmd) {
B
bellard 已提交
561
        case 0x04:
B
bellard 已提交
562 563 564 565
            s->csp_mode = dsp_get_data (s);
            s->csp_reg83r = 0;
            s->csp_reg83w = 0;
            ldebug ("CSP command 0x04: mode=%#x\n", s->csp_mode);
B
bellard 已提交
566 567
            break;

B
bellard 已提交
568 569 570 571 572 573
        case 0x05:
            s->csp_param = dsp_get_data (s);
            s->csp_value = dsp_get_data (s);
            ldebug ("CSP command 0x05: param=%#x value=%#x\n",
                    s->csp_param,
                    s->csp_value);
B
bellard 已提交
574
            break;
B
bellard 已提交
575

B
bellard 已提交
576
        case 0x0e:
B
bellard 已提交
577 578 579 580 581 582 583 584 585 586
            d0 = dsp_get_data (s);
            d1 = dsp_get_data (s);
            ldebug ("write CSP register %d <- %#x\n", d1, d0);
            if (d1 == 0x83) {
                ldebug ("0x83[%d] <- %#x\n", s->csp_reg83r, d0);
                s->csp_reg83[s->csp_reg83r % 4] = d0;
                s->csp_reg83r += 1;
            }
            else
                s->csp_regs[d1] = d0;
B
bellard 已提交
587 588
            break;

B
bellard 已提交
589 590 591 592 593 594 595 596 597 598 599 600 601 602
        case 0x0f:
            d0 = dsp_get_data (s);
            ldebug ("read CSP register %#x -> %#x, mode=%#x\n",
                    d0, s->csp_regs[d0], s->csp_mode);
            if (d0 == 0x83) {
                ldebug ("0x83[%d] -> %#x\n",
                        s->csp_reg83w,
                        s->csp_reg83[s->csp_reg83w % 4]);
                dsp_out_data (s, s->csp_reg83[s->csp_reg83w % 4]);
                s->csp_reg83w += 1;
            }
            else
                dsp_out_data (s, s->csp_regs[d0]);
            break;
B
bellard 已提交
603

B
bellard 已提交
604 605 606 607
        case 0x10:
            d0 = dsp_get_data (s);
            dolog ("cmd 0x10 d0=%#x\n", d0);
            break;
B
bellard 已提交
608

B
bellard 已提交
609 610 611 612 613
        case 0x14:
            dma_cmd8 (s, 0, dsp_get_lohi (s));
            /* s->can_write = 0; */
            /* qemu_mod_timer (s->aux_ts, qemu_get_clock (vm_clock) + (ticks_per_sec * 320) / 1000000); */
            break;
B
bellard 已提交
614 615

        case 0x40:
B
bellard 已提交
616 617
            s->time_const = dsp_get_data (s);
            ldebug ("set time const %d\n", s->time_const);
B
bellard 已提交
618 619
            break;

B
bellard 已提交
620 621
        case 0x42:              /* FT2 sets output freq with this, go figure */
            dolog ("cmd 0x42 might not do what it think it should\n");
B
bellard 已提交
622

B
bellard 已提交
623 624 625
        case 0x41:
            s->freq = dsp_get_hilo (s);
            ldebug ("set freq %d\n", s->freq);
B
bellard 已提交
626 627 628
            break;

        case 0x48:
B
bellard 已提交
629 630 631 632 633 634 635 636 637 638 639 640 641 642 643 644 645 646 647 648 649
            s->block_size = dsp_get_lohi (s);
            /* s->highspeed = 1; */
            ldebug ("set dma block len %d\n", s->block_size);
            break;

        case 0x80:
            {
                int samples, bytes;
                int64_t ticks;

                if (-1 == s->freq)
                    s->freq = 11025;
                samples = dsp_get_lohi (s);
                bytes = samples << s->fmt_stereo << (s->fmt_bits == 16);
                ticks = ticks_per_sec / (s->freq / bytes);
                if (ticks < ticks_per_sec / 1024)
                    pic_set_irq (s->irq, 1);
                else
                    qemu_mod_timer (s->aux_ts, qemu_get_clock (vm_clock) + ticks);
                ldebug ("mix silence %d %d %lld\n", samples, bytes, ticks);
            }
B
bellard 已提交
650 651 652
            break;

        case 0xe0:
B
bellard 已提交
653 654 655 656
            d0 = dsp_get_data (s);
            s->out_data_len = 0;
            ldebug ("E0 data = %#x\n", d0);
            dsp_out_data(s, ~d0);
B
bellard 已提交
657 658
            break;

B
bellard 已提交
659 660 661
        case 0xe2:
            d0 = dsp_get_data (s);
            dolog ("E2 = %#x\n", d0);
B
bellard 已提交
662 663
            break;

B
bellard 已提交
664 665 666
        case 0xe4:
            s->test_reg = dsp_get_data (s);
            break;
B
bellard 已提交
667 668

        case 0xf9:
B
bellard 已提交
669 670
            d0 = dsp_get_data (s);
            ldebug ("command 0xf9 with %#x\n", d0);
B
bellard 已提交
671
            switch (d0) {
B
bellard 已提交
672 673 674 675 676 677 678 679
            case 0x0e:
                dsp_out_data (s, 0xff);
                break;

            case 0x0f:
                dsp_out_data (s, 0x07);
                break;

B
bellard 已提交
680
            case 0x37:
B
bellard 已提交
681 682 683
                dsp_out_data (s, 0x38);
                break;

B
bellard 已提交
684
            default:
B
bellard 已提交
685 686
                dsp_out_data (s, 0x00);
                break;
B
bellard 已提交
687
            }
B
bellard 已提交
688 689 690
            break;

        default:
B
bellard 已提交
691
            dolog ("complete: unrecognized command %#x\n", s->cmd);
692
            return;
B
bellard 已提交
693 694 695
        }
    }

B
bellard 已提交
696 697
    ldebug ("\n");
    s->cmd = -1;
B
bellard 已提交
698 699 700
    return;
}

B
bellard 已提交
701 702 703 704 705 706 707 708 709 710 711 712 713 714 715 716 717 718 719 720 721 722 723 724
static void reset (SB16State *s)
{
    pic_set_irq (s->irq, 0);
    if (s->dma_auto) {
        pic_set_irq (s->irq, 1);
        pic_set_irq (s->irq, 0);
    }

    s->mixer_regs[0x82] = 0;
    s->dma_auto = 0;
    s->in_index = 0;
    s->out_data_len = 0;
    s->left_till_irq = 0;
    s->needed_bytes = 0;
    s->block_size = -1;
    s->nzero = 0;
    s->highspeed = 0;
    s->v2x6 = 0;

    dsp_out_data(s, 0xaa);
    speaker (s, 0);
    control (s, 0);
}

B
bellard 已提交
725 726
static IO_WRITE_PROTO (dsp_write)
{
B
bellard 已提交
727
    SB16State *s = opaque;
B
bellard 已提交
728 729
    int iport;

B
bellard 已提交
730
    iport = nport - s->port;
B
bellard 已提交
731

B
bellard 已提交
732
    ldebug ("write %#x <- %#x\n", nport, val);
B
bellard 已提交
733
    switch (iport) {
B
bellard 已提交
734 735 736 737 738 739 740 741 742 743 744 745 746 747 748 749 750 751 752 753 754 755 756 757 758 759 760 761 762 763 764 765 766 767 768 769 770
    case 0x06:
        switch (val) {
        case 0x00:
            if (s->v2x6 == 1) {
                if (0 && s->highspeed) {
                    s->highspeed = 0;
                    pic_set_irq (s->irq, 0);
                    control (s, 0);
                }
                else
                    reset (s);
            }
            s->v2x6 = 0;
            break;

        case 0x01:
        case 0x03:              /* FreeBSD kludge */
            s->v2x6 = 1;
            break;

        case 0xc6:
            s->v2x6 = 0;        /* Prince of Persia, csp.sys, diagnose.exe */
            break;

        case 0xb8:              /* Panic */
            reset (s);
            break;

        case 0x39:
            dsp_out_data (s, 0x38);
            reset (s);
            s->v2x6 = 0x39;
            break;

        default:
            s->v2x6 = val;
            break;
B
bellard 已提交
771 772 773
        }
        break;

B
bellard 已提交
774 775 776 777 778 779 780 781 782
    case 0x0c:                  /* write data or command | write status */
/*         if (s->highspeed) */
/*             break; */

        if (0 == s->needed_bytes) {
            command (s, val);
#if 0
            if (0 == s->needed_bytes) {
                log_dsp (s);
B
bellard 已提交
783
            }
B
bellard 已提交
784
#endif
B
bellard 已提交
785 786
        }
        else {
B
bellard 已提交
787
            if (s->in_index == sizeof (s->in2_data)) {
B
bellard 已提交
788 789 790
                dolog ("in data overrun\n");
            }
            else {
B
bellard 已提交
791 792 793 794 795 796 797 798
                s->in2_data[s->in_index++] = val;
                if (s->in_index == s->needed_bytes) {
                    s->needed_bytes = 0;
                    complete (s);
#if 0
                    log_dsp (s);
#endif
                }
B
bellard 已提交
799 800 801 802 803
            }
        }
        break;

    default:
B
bellard 已提交
804
        ldebug ("(nport=%#x, val=%#x)\n", nport, val);
805
        break;
B
bellard 已提交
806 807 808 809 810
    }
}

static IO_READ_PROTO (dsp_read)
{
B
bellard 已提交
811 812
    SB16State *s = opaque;
    int iport, retval, ack = 0;
B
bellard 已提交
813

B
bellard 已提交
814
    iport = nport - s->port;
B
bellard 已提交
815 816

    switch (iport) {
B
bellard 已提交
817 818
    case 0x06:                  /* reset */
        retval = 0xff;
B
bellard 已提交
819
        break;
B
bellard 已提交
820

B
bellard 已提交
821 822 823 824 825 826
    case 0x0a:                  /* read data */
        if (s->out_data_len) {
            retval = s->out_data[--s->out_data_len];
            s->last_read_byte = retval;
        }
        else {
B
bellard 已提交
827
            dolog ("empty output buffer\n");
B
bellard 已提交
828
            retval = s->last_read_byte;
B
bellard 已提交
829
            /* goto error; */
B
bellard 已提交
830 831 832
        }
        break;

B
bellard 已提交
833 834
    case 0x0c:                  /* 0 can write */
        retval = s->can_write ? 0 : 0x80;
B
bellard 已提交
835 836
        break;

B
bellard 已提交
837 838 839 840
    case 0x0d:                  /* timer interrupt clear */
        /* dolog ("timer interrupt clear\n"); */
        retval = 0;
        break;
B
bellard 已提交
841

B
bellard 已提交
842 843 844 845 846 847 848
    case 0x0e:                  /* data available status | irq 8 ack */
        retval = (!s->out_data_len || s->highspeed) ? 0 : 0x80;
        if (s->mixer_regs[0x82] & 1) {
            ack = 1;
            s->mixer_regs[0x82] &= 1;
            pic_set_irq (s->irq, 0);
        }
B
bellard 已提交
849 850
        break;

B
bellard 已提交
851
    case 0x0f:                  /* irq 16 ack */
B
bellard 已提交
852
        retval = 0xff;
B
bellard 已提交
853 854 855 856 857
        if (s->mixer_regs[0x82] & 2) {
            ack = 1;
            s->mixer_regs[0x82] &= 2;
            pic_set_irq (s->irq, 0);
        }
B
bellard 已提交
858 859 860 861 862 863
        break;

    default:
        goto error;
    }

B
bellard 已提交
864 865
    if (!ack)
        ldebug ("read %#x -> %#x\n", nport, retval);
B
bellard 已提交
866 867 868 869

    return retval;

 error:
B
bellard 已提交
870
    dolog ("WARNING dsp_read %#x error\n", nport);
B
bellard 已提交
871
    return 0xff;
B
bellard 已提交
872 873
}

B
bellard 已提交
874 875 876 877 878 879 880 881 882 883 884 885 886 887 888 889 890 891 892 893 894 895 896 897 898 899 900 901 902 903
static void reset_mixer (SB16State *s)
{
    int i;

    memset (s->mixer_regs, 0xff, 0x7f);
    memset (s->mixer_regs + 0x83, 0xff, sizeof (s->mixer_regs) - 0x83);

    s->mixer_regs[0x02] = 4;    /* master volume 3bits */
    s->mixer_regs[0x06] = 4;    /* MIDI volume 3bits */
    s->mixer_regs[0x08] = 0;    /* CD volume 3bits */
    s->mixer_regs[0x0a] = 0;    /* voice volume 2bits */

    /* d5=input filt, d3=lowpass filt, d1,d2=input source */
    s->mixer_regs[0x0c] = 0;

    /* d5=output filt, d1=stereo switch */
    s->mixer_regs[0x0e] = 0;

    /* voice volume L d5,d7, R d1,d3 */
    s->mixer_regs[0x04] = (4 << 5) | (4 << 1);
    /* master ... */
    s->mixer_regs[0x22] = (4 << 5) | (4 << 1);
    /* MIDI ... */
    s->mixer_regs[0x26] = (4 << 5) | (4 << 1);

    for (i = 0x30; i < 0x48; i++) {
        s->mixer_regs[i] = 0x20;
    }
}

B
bellard 已提交
904 905
static IO_WRITE_PROTO(mixer_write_indexb)
{
B
bellard 已提交
906 907
    SB16State *s = opaque;
    s->mixer_nreg = val;
B
bellard 已提交
908 909 910 911
}

static IO_WRITE_PROTO(mixer_write_datab)
{
B
bellard 已提交
912 913 914 915 916
    SB16State *s = opaque;

    ldebug ("mixer_write [%#x] <- %#x\n", s->mixer_nreg, val);
    if (s->mixer_nreg > sizeof (s->mixer_regs))
        return;
B
bellard 已提交
917

B
bellard 已提交
918
    switch (s->mixer_nreg) {
B
bellard 已提交
919
    case 0x00:
B
bellard 已提交
920
        reset_mixer (s);
B
bellard 已提交
921 922 923
        break;

    case 0x80:
B
bellard 已提交
924 925 926 927 928 929
        {
            int irq = irq_of_magic (val);
            ldebug ("setting irq to %d (val=%#x)\n", irq, val);
            if (irq > 0)
                s->irq = irq;
        }
B
bellard 已提交
930
        break;
B
bellard 已提交
931

B
bellard 已提交
932 933 934
    case 0x81:
        {
            int dma, hdma;
B
bellard 已提交
935

B
bellard 已提交
936 937 938 939 940 941 942 943 944 945
            dma = lsbindex (val & 0xf);
            hdma = lsbindex (val & 0xf0);
            dolog ("attempt to set DMA register 8bit %d, 16bit %d (val=%#x)\n",
                   dma, hdma, val);
#if 0
            s->dma = dma;
            s->hdma = hdma;
#endif
        }
        break;
B
bellard 已提交
946

B
bellard 已提交
947 948 949 950
    case 0x82:
        dolog ("attempt to write into IRQ status register (val=%#x)\n",
               val);
        return;
B
bellard 已提交
951

B
bellard 已提交
952 953 954 955 956 957 958
    default:
        if (s->mixer_nreg >= 0x80)
            dolog ("attempt to write mixer[%#x] <- %#x\n", s->mixer_nreg, val);
        break;
    }

    s->mixer_regs[s->mixer_nreg] = val;
B
bellard 已提交
959 960
}

B
bellard 已提交
961 962
static IO_WRITE_PROTO(mixer_write_indexw)
{
B
bellard 已提交
963 964
    mixer_write_indexb (opaque, nport, val & 0xff);
    mixer_write_datab (opaque, nport, (val >> 8) & 0xff);
B
bellard 已提交
965 966 967 968
}

static IO_READ_PROTO(mixer_read)
{
B
bellard 已提交
969 970 971 972
    SB16State *s = opaque;
    ldebug ("mixer_read[%#x] -> %#x\n",
            s->mixer_nreg, s->mixer_regs[s->mixer_nreg]);
    return s->mixer_regs[s->mixer_nreg];
B
bellard 已提交
973 974
}

B
bellard 已提交
975 976
static int write_audio (SB16State *s, int nchan, int dma_pos,
                        int dma_len, int len)
B
bellard 已提交
977 978
{
    int temp, net;
979
    uint8_t tmpbuf[4096];
B
bellard 已提交
980

B
bellard 已提交
981
    temp = len;
B
bellard 已提交
982 983 984
    net = 0;

    while (temp) {
B
bellard 已提交
985 986
        int left = dma_len - dma_pos;
        int to_copy, copied;
B
bellard 已提交
987

B
bellard 已提交
988
        to_copy = audio_MIN (temp, left);
989 990
        if (to_copy > sizeof(tmpbuf))
            to_copy = sizeof(tmpbuf);
B
bellard 已提交
991

B
bellard 已提交
992 993
        copied = DMA_read_memory (nchan, tmpbuf, dma_pos, to_copy);
        copied = AUD_write (s->voice, tmpbuf, copied);
B
bellard 已提交
994

B
bellard 已提交
995 996
        temp -= copied;
        dma_pos = (dma_pos + copied) % dma_len;
B
bellard 已提交
997 998
        net += copied;

B
bellard 已提交
999 1000
        if (!copied)
            break;
B
bellard 已提交
1001 1002 1003 1004 1005
    }

    return net;
}

B
bellard 已提交
1006
static int SB_read_DMA (void *opaque, int nchan, int dma_pos, int dma_len)
B
bellard 已提交
1007
{
B
bellard 已提交
1008 1009
    SB16State *s = opaque;
    int free, rfree, till, copy, written, elapsed;
B
bellard 已提交
1010

B
bellard 已提交
1011 1012
    if (s->left_till_irq < 0) {
        s->left_till_irq = s->block_size;
B
bellard 已提交
1013 1014
    }

B
bellard 已提交
1015 1016 1017 1018
    elapsed = AUD_calc_elapsed (s->voice);
    free = elapsed;/* AUD_get_free (s->voice); */
    rfree = free;
    free = audio_MIN (free, elapsed) & ~s->align;
B
bellard 已提交
1019

B
bellard 已提交
1020 1021
    if ((free <= 0) || !dma_len) {
        return dma_pos;
B
bellard 已提交
1022 1023
    }

B
bellard 已提交
1024 1025
    copy = free;
    till = s->left_till_irq;
B
bellard 已提交
1026

B
bellard 已提交
1027
#ifdef DEBUG_SB16_MOST
B
bellard 已提交
1028 1029
    dolog ("pos:%06d free:%d,%d till:%d len:%d\n",
           dma_pos, free, AUD_get_free (s->voice), till, dma_len);
B
bellard 已提交
1030 1031
#endif

B
bellard 已提交
1032
    if (till <= copy) {
B
bellard 已提交
1033
        if (0 == s->dma_auto) {
B
bellard 已提交
1034 1035 1036 1037
            copy = till;
        }
    }

B
bellard 已提交
1038 1039 1040
    written = write_audio (s, nchan, dma_pos, dma_len, copy);
    dma_pos = (dma_pos + written) % dma_len;
    s->left_till_irq -= written;
B
bellard 已提交
1041

B
bellard 已提交
1042 1043 1044 1045 1046 1047
    if (s->left_till_irq <= 0) {
        s->mixer_regs[0x82] |= (nchan & 4) ? 2 : 1;
        pic_set_irq (s->irq, 1);
        if (0 == s->dma_auto) {
            control (s, 0);
            speaker (s, 0);
B
bellard 已提交
1048 1049 1050
        }
    }

B
bellard 已提交
1051
#ifdef DEBUG_SB16_MOST
B
bellard 已提交
1052
    ldebug ("pos %5d free %5d size %5d till % 5d copy %5d dma size %5d\n",
B
bellard 已提交
1053
            dma_pos, free, dma_len, s->left_till_irq, copy, s->block_size);
B
bellard 已提交
1054
#endif
B
bellard 已提交
1055

B
bellard 已提交
1056 1057
    while (s->left_till_irq <= 0) {
        s->left_till_irq = s->block_size + s->left_till_irq;
B
bellard 已提交
1058 1059
    }

B
bellard 已提交
1060 1061
    AUD_adjust (s->voice, written);
    return dma_pos;
B
bellard 已提交
1062 1063
}

B
bellard 已提交
1064
void SB_timer (void *opaque)
B
bellard 已提交
1065
{
B
bellard 已提交
1066 1067 1068
    SB16State *s = opaque;
    AUD_run ();
    qemu_mod_timer (s->ts, qemu_get_clock (vm_clock) + 1);
B
bellard 已提交
1069 1070
}

B
bellard 已提交
1071
static void SB_save (QEMUFile *f, void *opaque)
B
bellard 已提交
1072
{
B
bellard 已提交
1073 1074 1075 1076 1077 1078 1079 1080 1081 1082 1083 1084 1085 1086 1087 1088 1089 1090 1091 1092 1093 1094 1095 1096 1097 1098 1099 1100 1101 1102 1103 1104 1105 1106 1107 1108 1109 1110 1111 1112 1113 1114 1115 1116 1117 1118 1119 1120 1121
    SB16State *s = opaque;

    qemu_put_be32s (f, &s->irq);
    qemu_put_be32s (f, &s->dma);
    qemu_put_be32s (f, &s->hdma);
    qemu_put_be32s (f, &s->port);
    qemu_put_be32s (f, &s->ver);
    qemu_put_be32s (f, &s->in_index);
    qemu_put_be32s (f, &s->out_data_len);
    qemu_put_be32s (f, &s->fmt_stereo);
    qemu_put_be32s (f, &s->fmt_signed);
    qemu_put_be32s (f, &s->fmt_bits);
    qemu_put_be32s (f, &s->fmt);
    qemu_put_be32s (f, &s->dma_auto);
    qemu_put_be32s (f, &s->block_size);
    qemu_put_be32s (f, &s->fifo);
    qemu_put_be32s (f, &s->freq);
    qemu_put_be32s (f, &s->time_const);
    qemu_put_be32s (f, &s->speaker);
    qemu_put_be32s (f, &s->needed_bytes);
    qemu_put_be32s (f, &s->cmd);
    qemu_put_be32s (f, &s->use_hdma);
    qemu_put_be32s (f, &s->highspeed);
    qemu_put_be32s (f, &s->can_write);
    qemu_put_be32s (f, &s->v2x6);

    qemu_put_8s (f, &s->csp_param);
    qemu_put_8s (f, &s->csp_value);
    qemu_put_8s (f, &s->csp_mode);
    qemu_put_8s (f, &s->csp_param);
    qemu_put_buffer (f, s->csp_regs, 256);
    qemu_put_8s (f, &s->csp_index);
    qemu_put_buffer (f, s->csp_reg83, 4);
    qemu_put_be32s (f, &s->csp_reg83r);
    qemu_put_be32s (f, &s->csp_reg83w);

    qemu_put_buffer (f, s->in2_data, sizeof (s->in2_data));
    qemu_put_buffer (f, s->out_data, sizeof (s->out_data));
    qemu_put_8s (f, &s->test_reg);
    qemu_put_8s (f, &s->last_read_byte);

    qemu_put_be32s (f, &s->nzero);
    qemu_put_be32s (f, &s->left_till_irq);
    qemu_put_be32s (f, &s->dma_running);
    qemu_put_be32s (f, &s->bytes_per_second);
    qemu_put_be32s (f, &s->align);

    qemu_put_be32s (f, &s->mixer_nreg);
    qemu_put_buffer (f, s->mixer_regs, 256);
B
bellard 已提交
1122 1123
}

B
bellard 已提交
1124
static int SB_load (QEMUFile *f, void *opaque, int version_id)
B
bellard 已提交
1125
{
B
bellard 已提交
1126 1127 1128 1129 1130 1131 1132 1133 1134 1135 1136 1137 1138 1139 1140 1141 1142 1143 1144 1145 1146 1147 1148 1149 1150 1151 1152 1153 1154 1155 1156 1157 1158 1159 1160 1161 1162 1163 1164 1165 1166 1167 1168 1169 1170 1171 1172 1173 1174 1175 1176 1177 1178
    SB16State *s = opaque;

    if (version_id != 1)
        return -EINVAL;

    qemu_get_be32s (f, &s->irq);
    qemu_get_be32s (f, &s->dma);
    qemu_get_be32s (f, &s->hdma);
    qemu_get_be32s (f, &s->port);
    qemu_get_be32s (f, &s->ver);
    qemu_get_be32s (f, &s->in_index);
    qemu_get_be32s (f, &s->out_data_len);
    qemu_get_be32s (f, &s->fmt_stereo);
    qemu_get_be32s (f, &s->fmt_signed);
    qemu_get_be32s (f, &s->fmt_bits);
    qemu_get_be32s (f, &s->fmt);
    qemu_get_be32s (f, &s->dma_auto);
    qemu_get_be32s (f, &s->block_size);
    qemu_get_be32s (f, &s->fifo);
    qemu_get_be32s (f, &s->freq);
    qemu_get_be32s (f, &s->time_const);
    qemu_get_be32s (f, &s->speaker);
    qemu_get_be32s (f, &s->needed_bytes);
    qemu_get_be32s (f, &s->cmd);
    qemu_get_be32s (f, &s->use_hdma);
    qemu_get_be32s (f, &s->highspeed);
    qemu_get_be32s (f, &s->can_write);
    qemu_get_be32s (f, &s->v2x6);

    qemu_get_8s (f, &s->csp_param);
    qemu_get_8s (f, &s->csp_value);
    qemu_get_8s (f, &s->csp_mode);
    qemu_get_8s (f, &s->csp_param);
    qemu_get_buffer (f, s->csp_regs, 256);
    qemu_get_8s (f, &s->csp_index);
    qemu_get_buffer (f, s->csp_reg83, 4);
    qemu_get_be32s (f, &s->csp_reg83r);
    qemu_get_be32s (f, &s->csp_reg83w);

    qemu_get_buffer (f, s->in2_data, sizeof (s->in2_data));
    qemu_get_buffer (f, s->out_data, sizeof (s->out_data));
    qemu_get_8s (f, &s->test_reg);
    qemu_get_8s (f, &s->last_read_byte);

    qemu_get_be32s (f, &s->nzero);
    qemu_get_be32s (f, &s->left_till_irq);
    qemu_get_be32s (f, &s->dma_running);
    qemu_get_be32s (f, &s->bytes_per_second);
    qemu_get_be32s (f, &s->align);

    qemu_get_be32s (f, &s->mixer_nreg);
    qemu_get_buffer (f, s->mixer_regs, 256);

B
bellard 已提交
1179 1180 1181 1182
    if (s->voice) {
        AUD_close (s->voice);
        s->voice = NULL;
    }
B
bellard 已提交
1183 1184 1185 1186 1187 1188 1189 1190

    if (s->dma_running) {
        if (s->freq)
            s->voice = AUD_open (s->voice, "sb16", s->freq,
                                 1 << s->fmt_stereo, s->fmt);

        control (s, 1);
        speaker (s, s->speaker);
B
bellard 已提交
1191
    }
B
bellard 已提交
1192
    return 0;
B
bellard 已提交
1193 1194
}

B
bellard 已提交
1195 1196
void SB16_init (void)
{
1197
    SB16State *s = &dsp;
B
bellard 已提交
1198 1199 1200 1201
    int i;
    static const uint8_t dsp_write_ports[] = {0x6, 0xc};
    static const uint8_t dsp_read_ports[] = {0x6, 0xa, 0xc, 0xd, 0xe, 0xf};

B
bellard 已提交
1202 1203 1204 1205 1206 1207 1208 1209 1210
    s->ts = qemu_new_timer (vm_clock, SB_timer, s);
    if (!s->ts)
        return;

    s->irq = conf.irq;
    s->dma = conf.dma;
    s->hdma = conf.hdma;
    s->port = conf.port;
    s->ver = conf.ver_lo | (conf.ver_hi << 8);
B
bellard 已提交
1211

B
bellard 已提交
1212 1213 1214 1215 1216 1217 1218 1219 1220 1221 1222
    s->mixer_regs[0x80] = magic_of_irq (s->irq);
    s->mixer_regs[0x81] = (1 << s->dma) | (1 << s->hdma);
    s->mixer_regs[0x82] = 2 << 5;

    s->csp_regs[5] = 1;
    s->csp_regs[9] = 0xf8;

    reset_mixer (s);
    s->aux_ts = qemu_new_timer (vm_clock, aux_timer, s);
    if (!s->aux_ts)
        return;
B
bellard 已提交
1223 1224

    for (i = 0; i < LENOFA (dsp_write_ports); i++) {
B
bellard 已提交
1225
        register_ioport_write (s->port + dsp_write_ports[i], 1, 1, dsp_write, s);
B
bellard 已提交
1226 1227 1228
    }

    for (i = 0; i < LENOFA (dsp_read_ports); i++) {
B
bellard 已提交
1229
        register_ioport_read (s->port + dsp_read_ports[i], 1, 1, dsp_read, s);
B
bellard 已提交
1230 1231
    }

B
bellard 已提交
1232 1233 1234 1235
    register_ioport_write (s->port + 0x4, 1, 1, mixer_write_indexb, s);
    register_ioport_write (s->port + 0x4, 1, 2, mixer_write_indexw, s);
    register_ioport_read (s->port + 0x5, 1, 1, mixer_read, s);
    register_ioport_write (s->port + 0x5, 1, 1, mixer_write_datab, s);
B
bellard 已提交
1236

B
bellard 已提交
1237 1238 1239
    DMA_register_channel (s->hdma, SB_read_DMA, s);
    DMA_register_channel (s->dma, SB_read_DMA, s);
    s->can_write = 1;
B
bellard 已提交
1240

B
bellard 已提交
1241 1242
    qemu_mod_timer (s->ts, qemu_get_clock (vm_clock) + 1);
    register_savevm ("sb16", 0, 1, SB_save, SB_load, s);
B
bellard 已提交
1243
}