Archipelago » qemu

/*

 * QEMU Soundblaster 16 emulation

 * 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

    int dma_running;

    int bytes_per_second;

    int align;

    /* mixer state */

    int mixer_nreg;

    uint8_t mixer_regs[256];

/* XXX: suppress that and use a context */

static struct SB16State dsp;

static int magic_of_irq (int irq)

{

    switch (irq) {

    if (hold) {

        DMA_hold_DREQ (dma);

    }

    else {

        DMA_release_DREQ (dma);

    }

}

        s->freq = (1000000 + (tmp / 2)) / tmp;

    }

        s->block_size = dma_len << s->fmt_stereo;

    else {

        /* This is apparently the only way to make both Act1/PL

           and SecondReality/FC work

    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);

    control (s, 1);

    speaker (s, 1);

    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;

    control (s, 1);

    speaker (s, 1);

static inline void dsp_out_data (SB16State *s, uint8_t val)

{

    ldebug ("outdata %#x\n", val);

        s->out_data[s->out_data_len++] = val;

}

static inline uint8_t dsp_get_data (SB16State *s)

{

        return s->in2_data[--s->in_index];

    else {

        dolog ("buffer underflow\n");

        return 0;

        s->needed_bytes = 3;

    }

    else {

        switch (cmd) {

        case 0x03:

            dsp_out_data (s, 0x10); /* s->csp_param); */

            goto warn;

        case 0x35:

            break;

        case 0x40:

            s->needed_bytes = 2;

            break;

        case 0x80:

            s->needed_bytes = 2;

            break;

            s->dma_auto = 0;

            break;

            s->needed_bytes = 1;

        case 0xe1:

            dsp_out_data (s, s->ver & 0xff);

        case 0xe7:

            dolog ("Attempt to probe for ESS (0xe7)?\n");

        case 0xe8:              /* read test reg */

            dsp_out_data (s, s->test_reg);

            goto warn;

        default:

        }

    }

        ldebug ("\n");

    return;

 warn:

    dolog ("warning: command %#x,%d is not truly understood yet\n",

           cmd, s->needed_bytes);

}

static uint16_t dsp_get_lohi (SB16State *s)

                s->csp_reg83[s->csp_reg83r % 4] = d0;

                s->csp_reg83r += 1;

            }

                s->csp_regs[d1] = d0;

            break;

        case 0x0f:

                dsp_out_data (s, s->csp_reg83[s->csp_reg83w % 4]);

                s->csp_reg83w += 1;

            }

                dsp_out_data (s, s->csp_regs[d0]);

            break;

        case 0x10:

            break;

        case 0x42:              /* FT2 sets output freq with this, go figure */

            dolog ("cmd 0x42 might not do what it think it should\n");

        case 0x41:

            s->freq = dsp_get_hilo (s);

            ldebug ("set freq %d\n", s->freq);

            ldebug ("set dma block len %d\n", s->block_size);

            break;

        case 0x80:

            {

                int freq, samples, bytes;

                samples = dsp_get_lohi (s) + 1;

                bytes = samples << s->fmt_stereo << (s->fmt_bits == 16);

                ticks = (bytes * ticks_per_sec) / freq;

                    pic_set_irq (s->irq, 1);

                ldebug ("mix silence %d %d %lld\n", samples, bytes, ticks);

            }

            break;

            d0 = dsp_get_data (s);

            s->out_data_len = 0;

            ldebug ("E0 data = %#x\n", d0);

            break;

        case 0xe2:

    s->nzero = 0;

    s->highspeed = 0;

    s->v2x6 = 0;

    dsp_out_data(s, 0xaa);

    speaker (s, 0);

                    pic_set_irq (s->irq, 0);

                    control (s, 0);

                }

                    reset (s);

            }

            s->v2x6 = 0;

            break;

            s->last_read_byte = retval;

        }

        else {

            retval = s->last_read_byte;

            /* goto error; */

        }

        goto error;

    }

        ldebug ("read %#x -> %#x\n", nport, retval);

    return retval;

 error:

    return 0xff;

}

    SB16State *s = opaque;

    ldebug ("mixer_write [%#x] <- %#x\n", s->mixer_nreg, val);

        return;

    switch (s->mixer_nreg) {

    case 0x00:

        {

            int irq = irq_of_magic (val);

            ldebug ("setting irq to %d (val=%#x)\n", irq, val);

                s->irq = irq;

        }

        break;

            dma = lsbindex (val & 0xf);

            hdma = lsbindex (val & 0xf0);

#if 0

            s->dma = dma;

            s->hdma = hdma;

        return;

    default:

        break;

    }

{

    SB16State *s = opaque;

#ifndef DEBUG_SB16_MOST

    ldebug ("mixer_read[%#x] -> %#x\n",

            s->mixer_nreg, s->mixer_regs[s->mixer_nreg]);

    return s->mixer_regs[s->mixer_nreg];

}

        int to_copy, copied;

        to_copy = audio_MIN (temp, left);

            to_copy = sizeof(tmpbuf);

        copied = DMA_read_memory (nchan, tmpbuf, dma_pos, to_copy);

        copied = AUD_write (s->voice, tmpbuf, copied);

        dma_pos = (dma_pos + copied) % dma_len;

        net += copied;

            break;

    }

    return net;

static int SB_read_DMA (void *opaque, int nchan, int dma_pos, int dma_len)

{

    SB16State *s = opaque;

    if (s->left_till_irq < 0) {

        s->left_till_irq = s->block_size;

    }

    }

    copy = free;

    till = s->left_till_irq;

#ifdef DEBUG_SB16_MOST

#endif

    if (till <= copy) {

        s->left_till_irq = s->block_size + s->left_till_irq;

    }

    return dma_pos;

}

{

    SB16State *s = opaque;

}

static void SB_save (QEMUFile *f, void *opaque)

{

    SB16State *s = opaque;

        return -EINVAL;

    qemu_get_be32s (f, &s->irq);

    qemu_get_be32s (f, &s->dma);

    qemu_get_buffer (f, s->mixer_regs, 256);

    if (s->voice) {

        s->voice = NULL;

    }

    if (s->dma_running) {

        control (s, 1);

        speaker (s, s->speaker);

    static const uint8_t dsp_write_ports[] = {0x6, 0xc};

    static const uint8_t dsp_read_ports[] = {0x6, 0xa, 0xc, 0xd, 0xe, 0xf};

    s->irq = conf.irq;

    s->dma = conf.dma;

    s->hdma = conf.hdma;

    reset_mixer (s);

    s->aux_ts = qemu_new_timer (vm_clock, aux_timer, s);

    for (i = 0; i < LENOFA (dsp_write_ports); i++) {

        register_ioport_write (s->port + dsp_write_ports[i], 1, 1, dsp_write, s);

    DMA_register_channel (s->dma, SB_read_DMA, s);

    s->can_write = 1;

    register_savevm ("sb16", 0, 1, SB_save, SB_load, s);

}