* OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
* THE SOFTWARE.
*/
-#include <stdio.h>
-#include <stdlib.h>
-#include <inttypes.h>
-
#include "vl.h"
#define MIN(a, b) ((a)>(b)?(b):(a))
#define LENOFA(a) ((int) (sizeof(a)/sizeof(a[0])))
-#define DEREF(x) (void)x
-#define log(...) fprintf (stderr, "sb16: " __VA_ARGS__)
-#define Fail(...) do { \
+#define log(...) do { \
fprintf (stderr, "sb16: " __VA_ARGS__); \
- abort (); \
+ fputc ('\n', stderr); \
} while (0)
/* #define DEBUG_SB16 */
#endif
#define IO_READ_PROTO(name) \
- uint32_t name (struct CPUState *env, uint32_t nport)
+ uint32_t name (void *opaque, uint32_t nport)
#define IO_WRITE_PROTO(name) \
- void name (struct CPUState *env, uint32_t nport, uint32_t val)
+ void name (void *opaque, uint32_t nport, uint32_t val)
+
+static const char e3[] = "COPYRIGHT (C) CREATIVE TECHNOLOGY LTD, 1992.";
static struct {
int ver_lo;
static int mix_block, noirq;
-static struct mixer {
- int nreg;
- uint8_t regs[0x83];
-} mixer;
-
-static struct dsp {
+typedef struct SB16State {
int in_index;
int out_data_len;
int fmt_stereo;
int v2x6;
uint8_t in_data[10];
- uint8_t out_data[10];
+ uint8_t out_data[50];
int left_till_irq;
-} dsp;
-#define nocmd ~0
+ /* mixer state */
+ int mixer_nreg;
+ uint8_t mixer_regs[256];
+} SB16State;
-static void log_dsp (const char *cap)
-{
- DEREF (cap);
+/* XXX: suppress that and use a context */
+static struct SB16State dsp;
+static void log_dsp (SB16State *dsp)
+{
linfo ("%c:%c:%d:%c:dmabuf=%d:pos=%d:freq=%d:timeconst=%d:speaker=%d\n",
- dsp.fmt_stereo ? 'S' : 'M',
- dsp.fmt_signed ? 'S' : 'U',
- dsp.fmt_bits,
- dsp.dma_auto ? 'a' : 's',
- dsp.dma_buffer_size,
- dsp.dma_pos,
- dsp.freq,
- dsp.time_const,
- dsp.speaker);
+ dsp->fmt_stereo ? 'S' : 'M',
+ dsp->fmt_signed ? 'S' : 'U',
+ dsp->fmt_bits,
+ dsp->dma_auto ? 'a' : 's',
+ dsp->dma_buffer_size,
+ dsp->dma_pos,
+ dsp->freq,
+ dsp->time_const,
+ dsp->speaker);
}
static void control (int hold)
dsp.speaker = 1;
}
-static void command (uint8_t cmd)
+static inline void dsp_out_data(SB16State *dsp, int val)
{
- char *msg;
-
- msg = (char *) -1;
+ if (dsp->out_data_len < sizeof(dsp->out_data))
+ dsp->out_data[dsp->out_data_len++] = val;
+}
+static void command (SB16State *dsp, uint8_t cmd)
+{
linfo ("%#x\n", cmd);
if (cmd > 0xaf && cmd < 0xd0) {
case 12:
break;
default:
- msg = "wrong bits";
+ log("%#x wrong bits", cmd);
goto error;
}
- dsp.needed_bytes = 3;
+ dsp->needed_bytes = 3;
}
else {
switch (cmd) {
/* IMS uses those when probing for sound devices */
return;
+ case 0x04:
+ dsp->needed_bytes = 1;
+ break;
+
+ case 0x05:
+ case 0x0e:
+ dsp->needed_bytes = 2;
+ break;
+
+ case 0x0f:
+ dsp->needed_bytes = 1;
+ dsp_out_data (dsp, 0);
+ break;
+
case 0x10:
- dsp.needed_bytes = 1;
+ dsp->needed_bytes = 1;
break;
case 0x14:
- dsp.needed_bytes = 2;
- dsp.dma_buffer_size = 0;
+ dsp->needed_bytes = 2;
+ dsp->dma_buffer_size = 0;
break;
case 0x20:
- dsp.out_data[dsp.out_data_len++] = 0xff;
+ dsp_out_data(dsp, 0xff);
break;
case 0x35:
break;
case 0x40:
- dsp.freq = -1;
- dsp.time_const = -1;
- dsp.needed_bytes = 1;
+ dsp->freq = -1;
+ dsp->time_const = -1;
+ dsp->needed_bytes = 1;
break;
case 0x41:
case 0x42:
- dsp.freq = -1;
- dsp.time_const = -1;
- dsp.needed_bytes = 2;
+ dsp->freq = -1;
+ dsp->time_const = -1;
+ dsp->needed_bytes = 2;
break;
case 0x47: /* Continue Auto-Initialize DMA 16bit */
break;
case 0x48:
- dsp.needed_bytes = 2;
+ dsp->needed_bytes = 2;
break;
case 0x27: /* ????????? */
return;
case 0x80:
- cmd = nocmd;
+ cmd = -1;
break;
case 0x90:
uint8_t d0;
d0 = 4;
- if (dsp.fmt_signed) d0 |= 16;
- if (dsp.fmt_stereo) d0 |= 32;
+ /* if (dsp->fmt_signed) d0 |= 16; */
+ /* if (dsp->fmt_stereo) d0 |= 32; */
dma_cmd (cmd == 0x90 ? 0xc4 : 0xc0, d0, -1);
- cmd = nocmd;
+ cmd = -1;
break;
}
return;
case 0xd1:
- dsp.speaker = 1;
+ dsp->speaker = 1;
break;
case 0xd3:
- dsp.speaker = 0;
+ dsp->speaker = 0;
return;
case 0xd4:
case 0xd9:
control (0);
- dsp.dma_auto = 0;
+ dsp->dma_auto = 0;
return;
case 0xda:
control (0);
- dsp.dma_auto = 0;
+ dsp->dma_auto = 0;
break;
case 0xe0:
- dsp.needed_bytes = 1;
+ dsp->needed_bytes = 1;
break;
case 0xe1:
- dsp.out_data[dsp.out_data_len++] = sb.ver_lo;
- dsp.out_data[dsp.out_data_len++] = sb.ver_hi;
+ dsp_out_data(dsp, sb.ver_lo);
+ dsp_out_data(dsp, sb.ver_hi);
return;
+ case 0xe3:
+ {
+ int i;
+ for (i = sizeof (e3) - 1; i >= 0; --i)
+ dsp_out_data (dsp, e3[i]);
+ return;
+ }
+
case 0xf2:
- dsp.out_data[dsp.out_data_len++] = 0xaa;
- mixer.regs[0x82] |= mixer.regs[0x80];
+ dsp_out_data(dsp, 0xaa);
+ dsp->mixer_regs[0x82] |= dsp->mixer_regs[0x80];
pic_set_irq (sb.irq, 1);
return;
default:
- msg = "is unknown";
+ log("%#x is unknown", cmd);
goto error;
}
}
- dsp.cmd = cmd;
+ dsp->cmd = cmd;
return;
error:
- Fail ("%#x %s", cmd, msg);
return;
}
-static void complete (void)
+static void complete (SB16State *dsp)
{
linfo ("complete command %#x, in_index %d, needed_bytes %d\n",
- dsp.cmd, dsp.in_index, dsp.needed_bytes);
+ dsp->cmd, dsp->in_index, dsp->needed_bytes);
- if (dsp.cmd > 0xaf && dsp.cmd < 0xd0) {
+ if (dsp->cmd > 0xaf && dsp->cmd < 0xd0) {
int d0, d1, d2;
- d0 = dsp.in_data[0];
- d1 = dsp.in_data[1];
- d2 = dsp.in_data[2];
+ d0 = dsp->in_data[0];
+ d1 = dsp->in_data[1];
+ d2 = dsp->in_data[2];
ldebug ("d0 = %d, d1 = %d, d2 = %d\n",
d0, d1, d2);
- dma_cmd (dsp.cmd, d0, d1 + (d2 << 8));
+ dma_cmd (dsp->cmd, d0, d1 + (d2 << 8));
}
else {
- switch (dsp.cmd) {
+ switch (dsp->cmd) {
+ case 0x05:
+ case 0x04:
+ case 0x0e:
+ case 0x0f:
+ break;
case 0x10:
break;
int save_left;
int save_pos;
- d0 = dsp.in_data[0];
- d1 = dsp.in_data[1];
+ d0 = dsp->in_data[0];
+ d1 = dsp->in_data[1];
- save_left = dsp.left_till_irq;
- save_pos = dsp.dma_pos;
+ save_left = dsp->left_till_irq;
+ save_pos = dsp->dma_pos;
dma_cmd (0xc0, 0, d0 + (d1 << 8));
- dsp.left_till_irq = save_left;
- dsp.dma_pos = save_pos;
+ dsp->left_till_irq = save_left;
+ dsp->dma_pos = save_pos;
linfo ("set buffer size data[%d, %d] %d pos %d\n",
- d0, d1, dsp.dma_buffer_size, dsp.dma_pos);
+ d0, d1, dsp->dma_buffer_size, dsp->dma_pos);
break;
}
case 0x40:
- dsp.time_const = dsp.in_data[0];
- linfo ("set time const %d\n", dsp.time_const);
+ dsp->time_const = dsp->in_data[0];
+ linfo ("set time const %d\n", dsp->time_const);
break;
case 0x41:
case 0x42:
- dsp.freq = dsp.in_data[1] + (dsp.in_data[0] << 8);
+ dsp->freq = dsp->in_data[1] + (dsp->in_data[0] << 8);
linfo ("set freq %#x, %#x = %d\n",
- dsp.in_data[1], dsp.in_data[0], dsp.freq);
+ dsp->in_data[1], dsp->in_data[0], dsp->freq);
break;
case 0x48:
- dsp.dma_buffer_size = dsp.in_data[1] + (dsp.in_data[0] << 8);
+ dsp->dma_buffer_size = dsp->in_data[1] + (dsp->in_data[0] << 8);
linfo ("set dma len %#x, %#x = %d\n",
- dsp.in_data[1], dsp.in_data[0], dsp.dma_buffer_size);
+ dsp->in_data[1], dsp->in_data[0], dsp->dma_buffer_size);
break;
case 0xe0:
- dsp.out_data_len = 1;
- linfo ("data = %#x\n", dsp.in_data[0]);
- dsp.out_data[0] = dsp.in_data[0] ^ 0xff;
+ dsp->out_data_len = 0;
+ linfo ("data = %#x\n", dsp->in_data[0]);
+ dsp_out_data(dsp, dsp->in_data[0] ^ 0xff);
break;
default:
- goto error;
+ log ("unrecognized command %#x", dsp->cmd);
+ return;
}
}
- dsp.cmd = -1;
+ dsp->cmd = -1;
return;
-
- error:
- Fail ("unrecognized command %#x", dsp.cmd);
}
static IO_WRITE_PROTO (dsp_write)
{
+ SB16State *dsp = opaque;
int iport;
iport = nport - sb.port;
+ ldebug ("write %#x %#x\n", nport, iport);
switch (iport) {
case 0x6:
+ control (0);
if (0 == val)
- dsp.v2x6 = 0;
- else if ((1 == val) && (0 == dsp.v2x6)) {
- dsp.v2x6 = 1;
- dsp.out_data[dsp.out_data_len++] = 0xaa;
+ dsp->v2x6 = 0;
+ else if ((1 == val) && (0 == dsp->v2x6)) {
+ dsp->v2x6 = 1;
+ dsp_out_data(dsp, 0xaa);
}
else
- dsp.v2x6 = ~0;
+ dsp->v2x6 = ~0;
break;
case 0xc: /* write data or command | write status */
- if (0 == dsp.needed_bytes) {
- command (val);
- if (0 == dsp.needed_bytes) {
- log_dsp (__func__);
+ if (0 == dsp->needed_bytes) {
+ command (dsp, val);
+ if (0 == dsp->needed_bytes) {
+ log_dsp (dsp);
}
}
else {
- dsp.in_data[dsp.in_index++] = val;
- if (dsp.in_index == dsp.needed_bytes) {
- dsp.needed_bytes = 0;
- dsp.in_index = 0;
- complete ();
- log_dsp (__func__);
+ dsp->in_data[dsp->in_index++] = val;
+ if (dsp->in_index == dsp->needed_bytes) {
+ dsp->needed_bytes = 0;
+ dsp->in_index = 0;
+ complete (dsp);
+ log_dsp (dsp);
}
}
break;
default:
- Fail ("(nport=%#x, val=%#x)", nport, val);
+ log ("(nport=%#x, val=%#x)", nport, val);
+ break;
}
}
static IO_READ_PROTO (dsp_read)
{
- char *msg;
+ SB16State *dsp = opaque;
int iport, retval;
- msg = (char *) -1;
iport = nport - sb.port;
switch (iport) {
return 0;
case 0xa: /* read data */
- if (dsp.out_data_len) {
- retval = dsp.out_data[--dsp.out_data_len];
- }
- else {
-#if 1
- lwarn ("empty output buffer\n");
- retval = 0;
-#else
- msg = "empty output buffer";
+ if (dsp->out_data_len) {
+ retval = dsp->out_data[--dsp->out_data_len];
+ } else {
+ log("empty output buffer");
goto error;
-#endif
}
break;
break;
case 0xd: /* timer interrupt clear */
+ log("timer interrupt clear");
goto error;
case 0xe: /* data available status | irq 8 ack */
/* XXX drop pic irq line here? */
ldebug ("8 ack\n");
- retval = (0 == dsp.out_data_len) ? 0 : 0x80;
- mixer.regs[0x82] &= ~mixer.regs[0x80];
+ retval = (0 == dsp->out_data_len) ? 0 : 0x80;
+ dsp->mixer_regs[0x82] &= ~dsp->mixer_regs[0x80];
pic_set_irq (sb.irq, 0);
break;
/* XXX drop pic irq line here? */
ldebug ("16 ack\n");
retval = 0xff;
- mixer.regs[0x82] &= ~mixer.regs[0x80];
+ dsp->mixer_regs[0x82] &= ~dsp->mixer_regs[0x80];
pic_set_irq (sb.irq, 0);
break;
return retval;
error:
- Fail ("(nport=%#x) %s", nport, msg);
+ return 0;
}
static IO_WRITE_PROTO(mixer_write_indexb)
{
- mixer.nreg = val & 0xff;
+ SB16State *dsp = opaque;
+ dsp->mixer_nreg = val;
}
static IO_WRITE_PROTO(mixer_write_datab)
{
- mixer.regs[mixer.nreg] = val;
+ SB16State *dsp = opaque;
+
+ if (dsp->mixer_nreg > 0x83)
+ return;
+ dsp->mixer_regs[dsp->mixer_nreg] = val;
}
static IO_WRITE_PROTO(mixer_write_indexw)
{
- mixer_write_indexb (env, nport, val & 0xff);
- mixer_write_datab (env, nport, (val >> 8) & 0xff);
+ mixer_write_indexb (opaque, nport, val & 0xff);
+ mixer_write_datab (opaque, nport, (val >> 8) & 0xff);
}
static IO_READ_PROTO(mixer_read)
{
- return mixer.regs[mixer.nreg];
+ SB16State *dsp = opaque;
+ return dsp->mixer_regs[dsp->mixer_nreg];
}
void SB16_run (void)
static int write_audio (uint32_t addr, int len, int size)
{
int temp, net;
+ uint8_t tmpbuf[4096];
temp = size;
left_till_end = len - dsp.dma_pos;
to_copy = MIN (temp, left_till_end);
-
- copied = AUD_write ((void *) (addr + dsp.dma_pos), to_copy);
+ if (to_copy > sizeof(tmpbuf))
+ to_copy = sizeof(tmpbuf);
+ cpu_physical_memory_read(addr + dsp.dma_pos, tmpbuf, to_copy);
+ copied = AUD_write (tmpbuf, to_copy);
temp -= copied;
dsp.dma_pos += copied;
return net;
}
-static int SB_read_DMA (uint32_t addr, int size, int *_irq)
+static int SB_read_DMA (void *opaque, target_ulong addr, int size)
{
+ SB16State *dsp = opaque;
int free, till, copy, written;
- if (0 == dsp.speaker)
+ if (0 == dsp->speaker)
return 0;
- if (dsp.left_till_irq < 0) {
- dsp.left_till_irq += dsp.dma_buffer_size;
- return dsp.dma_pos;
+ if (dsp->left_till_irq < 0) {
+ dsp->left_till_irq += dsp->dma_buffer_size;
+ return dsp->dma_pos;
}
free = AUD_get_free ();
if ((free <= 0) || (0 == size)) {
- return dsp.dma_pos;
+ return dsp->dma_pos;
}
if (mix_block > 0) {
copy = free;
}
- till = dsp.left_till_irq;
+ till = dsp->left_till_irq;
ldebug ("addr:%#010x free:%d till:%d size:%d\n",
addr, free, till, size);
if (till <= copy) {
- if (0 == dsp.dma_auto) {
+ if (0 == dsp->dma_auto) {
copy = till;
}
}
written = write_audio (addr, size, copy);
- dsp.left_till_irq -= written;
+ dsp->left_till_irq -= written;
AUD_adjust_estimate (free - written);
- if (dsp.left_till_irq <= 0) {
- mixer.regs[0x82] |= mixer.regs[0x80];
+ if (dsp->left_till_irq <= 0) {
+ dsp->mixer_regs[0x82] |= dsp->mixer_regs[0x80];
if (0 == noirq) {
ldebug ("request irq\n");
- *_irq = sb.irq;
+ pic_set_irq(sb.irq, 1);
}
- if (0 == dsp.dma_auto) {
+ if (0 == dsp->dma_auto) {
control (0);
}
}
ldebug ("pos %5d free %5d size %5d till % 5d copy %5d dma size %5d\n",
- dsp.dma_pos, free, size, dsp.left_till_irq, copy,
- dsp.dma_buffer_size);
+ dsp->dma_pos, free, size, dsp->left_till_irq, copy,
+ dsp->dma_buffer_size);
- if (dsp.left_till_irq <= 0) {
- dsp.left_till_irq += dsp.dma_buffer_size;
+ if (dsp->left_till_irq <= 0) {
+ dsp->left_till_irq += dsp->dma_buffer_size;
}
- return dsp.dma_pos;
-}
-
-static int dma_misc_handler (int moo)
-{
- return -1;
+ return dsp->dma_pos;
}
static int magic_of_irq (int irq)
case 10:
return 8;
default:
- log ("bad irq %d\n", irq);
+ log ("bad irq %d", irq);
return 2;
}
}
+#if 0
static int irq_of_magic (int magic)
{
switch (magic) {
case 8:
return 10;
default:
- log ("bad irq magic %d\n", magic);
+ log ("bad irq magic %d", magic);
return 2;
}
}
+#endif
void SB16_init (void)
{
+ SB16State *s = &dsp;
int i;
static const uint8_t dsp_write_ports[] = {0x6, 0xc};
static const uint8_t dsp_read_ports[] = {0x6, 0xa, 0xc, 0xd, 0xe, 0xf};
- mixer.regs[0x0e] = ~0;
- mixer.regs[0x80] = magic_of_irq (sb.irq);
- mixer.regs[0x81] = 0x20 | (sb.dma << 1);
+ memset(s->mixer_regs, 0xff, sizeof(s->mixer_regs));
- DEREF (irq_of_magic);
+ s->mixer_regs[0x0e] = ~0;
+ s->mixer_regs[0x80] = magic_of_irq (sb.irq);
+ s->mixer_regs[0x81] = 0x20 | (sb.dma << 1);
for (i = 0x30; i < 0x48; i++) {
- mixer.regs[i] = 0x20;
+ s->mixer_regs[i] = 0x20;
}
for (i = 0; i < LENOFA (dsp_write_ports); i++) {
- register_ioport_write (sb.port + dsp_write_ports[i], 1, dsp_write, 1);
+ register_ioport_write (sb.port + dsp_write_ports[i], 1, 1, dsp_write, s);
}
for (i = 0; i < LENOFA (dsp_read_ports); i++) {
- register_ioport_read (sb.port + dsp_read_ports[i], 1, dsp_read, 1);
+ register_ioport_read (sb.port + dsp_read_ports[i], 1, 1, dsp_read, s);
}
- register_ioport_write (sb.port + 0x4, 1, mixer_write_indexb, 1);
- register_ioport_write (sb.port + 0x4, 1, mixer_write_indexw, 2);
- register_ioport_read (sb.port + 0x5, 1, mixer_read, 1);
- register_ioport_write (sb.port + 0x5, 1, mixer_write_datab, 1);
+ register_ioport_write (sb.port + 0x4, 1, 1, mixer_write_indexb, s);
+ register_ioport_write (sb.port + 0x4, 1, 2, mixer_write_indexw, s);
+ register_ioport_read (sb.port + 0x5, 1, 1, mixer_read, s);
+ register_ioport_write (sb.port + 0x5, 1, 1, mixer_write_datab, s);
- DMA_register_channel (sb.hdma, SB_read_DMA, dma_misc_handler);
- DMA_register_channel (sb.dma, SB_read_DMA, dma_misc_handler);
+ DMA_register_channel (sb.hdma, SB_read_DMA, s);
+ DMA_register_channel (sb.dma, SB_read_DMA, s);
}