[qemu.git] / hw / marvell_88w8618_audio.c

/*
 * Marvell 88w8618 audio emulation extracted from
 * Marvell MV88w8618 / Freecom MusicPal emulation.
 *
 * Copyright (c) 2008 Jan Kiszka
 *
 * This code is licenced under the GNU GPL v2.
 */
#include "sysbus.h"
#include "hw.h"
#include "i2c.h"
#include "sysbus.h"
#include "audio/audio.h"

#define MP_AUDIO_SIZE           0x00001000

/* Audio register offsets */
#define MP_AUDIO_PLAYBACK_MODE  0x00
#define MP_AUDIO_CLOCK_DIV      0x18
#define MP_AUDIO_IRQ_STATUS     0x20
#define MP_AUDIO_IRQ_ENABLE     0x24
#define MP_AUDIO_TX_START_LO    0x28
#define MP_AUDIO_TX_THRESHOLD   0x2C
#define MP_AUDIO_TX_STATUS      0x38
#define MP_AUDIO_TX_START_HI    0x40

/* Status register and IRQ enable bits */
#define MP_AUDIO_TX_HALF        (1 << 6)
#define MP_AUDIO_TX_FULL        (1 << 7)

/* Playback mode bits */
#define MP_AUDIO_16BIT_SAMPLE   (1 << 0)
#define MP_AUDIO_PLAYBACK_EN    (1 << 7)
#define MP_AUDIO_CLOCK_24MHZ    (1 << 9)
#define MP_AUDIO_MONO           (1 << 14)

typedef struct mv88w8618_audio_state {
    SysBusDevice busdev;
    qemu_irq irq;
    uint32_t playback_mode;
    uint32_t status;
    uint32_t irq_enable;
    uint32_t phys_buf;
    uint32_t target_buffer;
    uint32_t threshold;
    uint32_t play_pos;
    uint32_t last_free;
    uint32_t clock_div;
    DeviceState *wm;
} mv88w8618_audio_state;

static void mv88w8618_audio_callback(void *opaque, int free_out, int free_in)
{
    mv88w8618_audio_state *s = opaque;
    int16_t *codec_buffer;
    int8_t buf[4096];
    int8_t *mem_buffer;
    int pos, block_size;

    if (!(s->playback_mode & MP_AUDIO_PLAYBACK_EN)) {
        return;
    }
    if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE) {
        free_out <<= 1;
    }
    if (!(s->playback_mode & MP_AUDIO_MONO)) {
        free_out <<= 1;
    }
    block_size = s->threshold / 2;
    if (free_out - s->last_free < block_size) {
        return;
    }
    if (block_size > 4096) {
        return;
    }
    cpu_physical_memory_read(s->target_buffer + s->play_pos, (void *)buf,
                             block_size);
    mem_buffer = buf;
    if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE) {
        if (s->playback_mode & MP_AUDIO_MONO) {
            codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
            for (pos = 0; pos < block_size; pos += 2) {
                *codec_buffer++ = *(int16_t *)mem_buffer;
                *codec_buffer++ = *(int16_t *)mem_buffer;
                mem_buffer += 2;
            }
        } else {
            memcpy(wm8750_dac_buffer(s->wm, block_size >> 2),
                   (uint32_t *)mem_buffer, block_size);
        }
    } else {
        if (s->playback_mode & MP_AUDIO_MONO) {
            codec_buffer = wm8750_dac_buffer(s->wm, block_size);
            for (pos = 0; pos < block_size; pos++) {
                *codec_buffer++ = cpu_to_le16(256 * *mem_buffer);
                *codec_buffer++ = cpu_to_le16(256 * *mem_buffer++);
            }
        } else {
            codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
            for (pos = 0; pos < block_size; pos += 2) {
                *codec_buffer++ = cpu_to_le16(256 * *mem_buffer++);
                *codec_buffer++ = cpu_to_le16(256 * *mem_buffer++);
            }
        }
    }
    wm8750_dac_commit(s->wm);

    s->last_free = free_out - block_size;

    if (s->play_pos == 0) {
        s->status |= MP_AUDIO_TX_HALF;
        s->play_pos = block_size;
    } else {
        s->status |= MP_AUDIO_TX_FULL;
        s->play_pos = 0;
    }

    if (s->status & s->irq_enable) {
        qemu_irq_raise(s->irq);
    }
}

static void mv88w8618_audio_clock_update(mv88w8618_audio_state *s)
{
    int rate;

    if (s->playback_mode & MP_AUDIO_CLOCK_24MHZ) {
        rate = 24576000 / 64; /* 24.576MHz */
    } else {
        rate = 11289600 / 64; /* 11.2896MHz */
    }
    rate /= ((s->clock_div >> 8) & 0xff) + 1;

    wm8750_set_bclk_in(s->wm, rate);
}

static uint32_t mv88w8618_audio_read(void *opaque, target_phys_addr_t offset)
{
    mv88w8618_audio_state *s = opaque;

    switch (offset) {
    case MP_AUDIO_PLAYBACK_MODE:
        return s->playback_mode;

    case MP_AUDIO_CLOCK_DIV:
        return s->clock_div;

    case MP_AUDIO_IRQ_STATUS:
        return s->status;

    case MP_AUDIO_IRQ_ENABLE:
        return s->irq_enable;

    case MP_AUDIO_TX_STATUS:
        return s->play_pos >> 2;

    default:
        return 0;
    }
}

static void mv88w8618_audio_write(void *opaque, target_phys_addr_t offset,
                                 uint32_t value)
{
    mv88w8618_audio_state *s = opaque;

    switch (offset) {
    case MP_AUDIO_PLAYBACK_MODE:
        if (value & MP_AUDIO_PLAYBACK_EN &&
            !(s->playback_mode & MP_AUDIO_PLAYBACK_EN)) {
            s->status = 0;
            s->last_free = 0;
            s->play_pos = 0;
        }
        s->playback_mode = value;
        mv88w8618_audio_clock_update(s);
        break;

    case MP_AUDIO_CLOCK_DIV:
        s->clock_div = value;
        s->last_free = 0;
        s->play_pos = 0;
        mv88w8618_audio_clock_update(s);
        break;

    case MP_AUDIO_IRQ_STATUS:
        s->status &= ~value;
        break;

    case MP_AUDIO_IRQ_ENABLE:
        s->irq_enable = value;
        if (s->status & s->irq_enable) {
            qemu_irq_raise(s->irq);
        }
        break;

    case MP_AUDIO_TX_START_LO:
        s->phys_buf = (s->phys_buf & 0xFFFF0000) | (value & 0xFFFF);
        s->target_buffer = s->phys_buf;
        s->play_pos = 0;
        s->last_free = 0;
        break;

    case MP_AUDIO_TX_THRESHOLD:
        s->threshold = (value + 1) * 4;
        break;

    case MP_AUDIO_TX_START_HI:
        s->phys_buf = (s->phys_buf & 0xFFFF) | (value << 16);
        s->target_buffer = s->phys_buf;
        s->play_pos = 0;
        s->last_free = 0;
        break;
    }
}

static void mv88w8618_audio_reset(DeviceState *d)
{
    mv88w8618_audio_state *s = FROM_SYSBUS(mv88w8618_audio_state,
                                           sysbus_from_qdev(d));

    s->playback_mode = 0;
    s->status = 0;
    s->irq_enable = 0;
    s->clock_div = 0;
    s->threshold = 0;
    s->phys_buf = 0;
}

static CPUReadMemoryFunc * const mv88w8618_audio_readfn[] = {
    mv88w8618_audio_read,
    mv88w8618_audio_read,
    mv88w8618_audio_read
};

static CPUWriteMemoryFunc * const mv88w8618_audio_writefn[] = {
    mv88w8618_audio_write,
    mv88w8618_audio_write,
    mv88w8618_audio_write
};

static int mv88w8618_audio_init(SysBusDevice *dev)
{
    mv88w8618_audio_state *s = FROM_SYSBUS(mv88w8618_audio_state, dev);
    int iomemtype;

    sysbus_init_irq(dev, &s->irq);

    wm8750_data_req_set(s->wm, mv88w8618_audio_callback, s);

    iomemtype = cpu_register_io_memory(mv88w8618_audio_readfn,
                                       mv88w8618_audio_writefn, s,
                                       DEVICE_NATIVE_ENDIAN);
    sysbus_init_mmio(dev, MP_AUDIO_SIZE, iomemtype);

    return 0;
}

static const VMStateDescription mv88w8618_audio_vmsd = {
    .name = "mv88w8618_audio",
    .version_id = 1,
    .minimum_version_id = 1,
    .minimum_version_id_old = 1,
    .fields = (VMStateField[]) {
        VMSTATE_UINT32(playback_mode, mv88w8618_audio_state),
        VMSTATE_UINT32(status, mv88w8618_audio_state),
        VMSTATE_UINT32(irq_enable, mv88w8618_audio_state),
        VMSTATE_UINT32(phys_buf, mv88w8618_audio_state),
        VMSTATE_UINT32(target_buffer, mv88w8618_audio_state),
        VMSTATE_UINT32(threshold, mv88w8618_audio_state),
        VMSTATE_UINT32(play_pos, mv88w8618_audio_state),
        VMSTATE_UINT32(last_free, mv88w8618_audio_state),
        VMSTATE_UINT32(clock_div, mv88w8618_audio_state),
        VMSTATE_END_OF_LIST()
    }
};

static SysBusDeviceInfo mv88w8618_audio_info = {
    .init = mv88w8618_audio_init,
    .qdev.name  = "mv88w8618_audio",
    .qdev.size  = sizeof(mv88w8618_audio_state),
    .qdev.reset = mv88w8618_audio_reset,
    .qdev.vmsd  = &mv88w8618_audio_vmsd,
    .qdev.props = (Property[]) {
        {
            .name   = "wm8750",
            .info   = &qdev_prop_ptr,
            .offset = offsetof(mv88w8618_audio_state, wm),
        },
        {/* end of list */}
    }
};

static void mv88w8618_register_devices(void)
{
    sysbus_register_withprop(&mv88w8618_audio_info);
}

device_init(mv88w8618_register_devices)
Commit	Line	Data
ef07b491 AZ	1	/*
	2	* Marvell 88w8618 audio emulation extracted from
	3	* Marvell MV88w8618 / Freecom MusicPal emulation.
	4	*
	5	* Copyright (c) 2008 Jan Kiszka
	6	*
	7	* This code is licenced under the GNU GPL v2.
	8	*/
	9	#include "sysbus.h"
	10	#include "hw.h"
	11	#include "i2c.h"
	12	#include "sysbus.h"
	13	#include "audio/audio.h"
	14
	15	#define MP_AUDIO_SIZE 0x00001000
	16
	17	/* Audio register offsets */
	18	#define MP_AUDIO_PLAYBACK_MODE 0x00
	19	#define MP_AUDIO_CLOCK_DIV 0x18
	20	#define MP_AUDIO_IRQ_STATUS 0x20
	21	#define MP_AUDIO_IRQ_ENABLE 0x24
	22	#define MP_AUDIO_TX_START_LO 0x28
	23	#define MP_AUDIO_TX_THRESHOLD 0x2C
	24	#define MP_AUDIO_TX_STATUS 0x38
	25	#define MP_AUDIO_TX_START_HI 0x40
	26
	27	/* Status register and IRQ enable bits */
	28	#define MP_AUDIO_TX_HALF (1 << 6)
	29	#define MP_AUDIO_TX_FULL (1 << 7)
	30
	31	/* Playback mode bits */
	32	#define MP_AUDIO_16BIT_SAMPLE (1 << 0)
	33	#define MP_AUDIO_PLAYBACK_EN (1 << 7)
	34	#define MP_AUDIO_CLOCK_24MHZ (1 << 9)
	35	#define MP_AUDIO_MONO (1 << 14)
	36
ef07b491 AZ	37	typedef struct mv88w8618_audio_state {
	38	SysBusDevice busdev;
	39	qemu_irq irq;
	40	uint32_t playback_mode;
	41	uint32_t status;
	42	uint32_t irq_enable;
d5b61ddd	43	uint32_t phys_buf;
ef07b491	44	uint32_t target_buffer;
d5b61ddd JK	45	uint32_t threshold;
	46	uint32_t play_pos;
	47	uint32_t last_free;
ef07b491 AZ	48	uint32_t clock_div;
	49	DeviceState *wm;
	50	} mv88w8618_audio_state;
	51
	52	static void mv88w8618_audio_callback(void *opaque, int free_out, int free_in)
	53	{
	54	mv88w8618_audio_state *s = opaque;
	55	int16_t *codec_buffer;
	56	int8_t buf[4096];
	57	int8_t *mem_buffer;
	58	int pos, block_size;
	59
49fedd0d	60	if (!(s->playback_mode & MP_AUDIO_PLAYBACK_EN)) {
ef07b491	61	return;
49fedd0d JK	62	}
49fedd0d JK	63	if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE) {
ef07b491	64	free_out <<= 1;
49fedd0d JK	65	}
49fedd0d JK	66	if (!(s->playback_mode & MP_AUDIO_MONO)) {
ef07b491	67	free_out <<= 1;
49fedd0d	68	}
ef07b491	69	block_size = s->threshold / 2;
49fedd0d	70	if (free_out - s->last_free < block_size) {
ef07b491	71	return;
49fedd0d JK	72	}
49fedd0d JK	73	if (block_size > 4096) {
ef07b491	74	return;
49fedd0d	75	}
ef07b491 AZ	76	cpu_physical_memory_read(s->target_buffer + s->play_pos, (void *)buf,
	77	block_size);
	78	mem_buffer = buf;
	79	if (s->playback_mode & MP_AUDIO_16BIT_SAMPLE) {
	80	if (s->playback_mode & MP_AUDIO_MONO) {
	81	codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
	82	for (pos = 0; pos < block_size; pos += 2) {
	83	codec_buffer++ = (int16_t *)mem_buffer;
	84	codec_buffer++ = (int16_t *)mem_buffer;
	85	mem_buffer += 2;
	86	}
49fedd0d	87	} else {
ef07b491 AZ	88	memcpy(wm8750_dac_buffer(s->wm, block_size >> 2),
ef07b491 AZ	89	(uint32_t *)mem_buffer, block_size);
49fedd0d	90	}
ef07b491 AZ	91	} else {
	92	if (s->playback_mode & MP_AUDIO_MONO) {
	93	codec_buffer = wm8750_dac_buffer(s->wm, block_size);
	94	for (pos = 0; pos < block_size; pos++) {
	95	codec_buffer++ = cpu_to_le16(256 *mem_buffer);
	96	codec_buffer++ = cpu_to_le16(256 *mem_buffer++);
	97	}
	98	} else {
	99	codec_buffer = wm8750_dac_buffer(s->wm, block_size >> 1);
	100	for (pos = 0; pos < block_size; pos += 2) {
	101	codec_buffer++ = cpu_to_le16(256 *mem_buffer++);
	102	codec_buffer++ = cpu_to_le16(256 *mem_buffer++);
	103	}
	104	}
	105	}
	106	wm8750_dac_commit(s->wm);
	107
	108	s->last_free = free_out - block_size;
	109
	110	if (s->play_pos == 0) {
	111	s->status \|= MP_AUDIO_TX_HALF;
	112	s->play_pos = block_size;
	113	} else {
	114	s->status \|= MP_AUDIO_TX_FULL;
	115	s->play_pos = 0;
	116	}
	117
49fedd0d	118	if (s->status & s->irq_enable) {
ef07b491	119	qemu_irq_raise(s->irq);
49fedd0d	120	}
ef07b491 AZ	121	}
	122
	123	static void mv88w8618_audio_clock_update(mv88w8618_audio_state *s)
	124	{
	125	int rate;
	126
49fedd0d	127	if (s->playback_mode & MP_AUDIO_CLOCK_24MHZ) {
ef07b491	128	rate = 24576000 / 64; /* 24.576MHz */
49fedd0d	129	} else {
ef07b491	130	rate = 11289600 / 64; /* 11.2896MHz */
49fedd0d	131	}
ef07b491 AZ	132	rate /= ((s->clock_div >> 8) & 0xff) + 1;
	133
	134	wm8750_set_bclk_in(s->wm, rate);
	135	}
	136
c227f099	137	static uint32_t mv88w8618_audio_read(void *opaque, target_phys_addr_t offset)
ef07b491 AZ	138	{
	139	mv88w8618_audio_state *s = opaque;
	140
	141	switch (offset) {
	142	case MP_AUDIO_PLAYBACK_MODE:
	143	return s->playback_mode;
	144
	145	case MP_AUDIO_CLOCK_DIV:
	146	return s->clock_div;
	147
	148	case MP_AUDIO_IRQ_STATUS:
	149	return s->status;
	150
	151	case MP_AUDIO_IRQ_ENABLE:
	152	return s->irq_enable;
	153
	154	case MP_AUDIO_TX_STATUS:
	155	return s->play_pos >> 2;
	156
	157	default:
	158	return 0;
	159	}
	160	}
	161
c227f099	162	static void mv88w8618_audio_write(void *opaque, target_phys_addr_t offset,
ef07b491 AZ	163	uint32_t value)
	164	{
	165	mv88w8618_audio_state *s = opaque;
	166
	167	switch (offset) {
	168	case MP_AUDIO_PLAYBACK_MODE:
	169	if (value & MP_AUDIO_PLAYBACK_EN &&
	170	!(s->playback_mode & MP_AUDIO_PLAYBACK_EN)) {
	171	s->status = 0;
	172	s->last_free = 0;
	173	s->play_pos = 0;
	174	}
	175	s->playback_mode = value;
	176	mv88w8618_audio_clock_update(s);
	177	break;
	178
	179	case MP_AUDIO_CLOCK_DIV:
	180	s->clock_div = value;
	181	s->last_free = 0;
	182	s->play_pos = 0;
	183	mv88w8618_audio_clock_update(s);
	184	break;
	185
	186	case MP_AUDIO_IRQ_STATUS:
	187	s->status &= ~value;
	188	break;
	189
	190	case MP_AUDIO_IRQ_ENABLE:
	191	s->irq_enable = value;
49fedd0d	192	if (s->status & s->irq_enable) {
ef07b491	193	qemu_irq_raise(s->irq);
49fedd0d	194	}
ef07b491 AZ	195	break;
	196
	197	case MP_AUDIO_TX_START_LO:
	198	s->phys_buf = (s->phys_buf & 0xFFFF0000) \| (value & 0xFFFF);
	199	s->target_buffer = s->phys_buf;
	200	s->play_pos = 0;
	201	s->last_free = 0;
	202	break;
	203
	204	case MP_AUDIO_TX_THRESHOLD:
	205	s->threshold = (value + 1) * 4;
	206	break;
	207
	208	case MP_AUDIO_TX_START_HI:
	209	s->phys_buf = (s->phys_buf & 0xFFFF) \| (value << 16);
	210	s->target_buffer = s->phys_buf;
	211	s->play_pos = 0;
	212	s->last_free = 0;
	213	break;
	214	}
	215	}
	216
d5b61ddd	217	static void mv88w8618_audio_reset(DeviceState *d)
ef07b491	218	{
d5b61ddd JK	219	mv88w8618_audio_state *s = FROM_SYSBUS(mv88w8618_audio_state,
d5b61ddd JK	220	sysbus_from_qdev(d));
ef07b491 AZ	221
	222	s->playback_mode = 0;
	223	s->status = 0;
	224	s->irq_enable = 0;
267c4840 JK	225	s->clock_div = 0;
	226	s->threshold = 0;
	227	s->phys_buf = 0;
ef07b491 AZ	228	}
ef07b491 AZ	229
d60efc6b	230	static CPUReadMemoryFunc * const mv88w8618_audio_readfn[] = {
ef07b491 AZ	231	mv88w8618_audio_read,
	232	mv88w8618_audio_read,
	233	mv88w8618_audio_read
	234	};
	235
d60efc6b	236	static CPUWriteMemoryFunc * const mv88w8618_audio_writefn[] = {
ef07b491 AZ	237	mv88w8618_audio_write,
	238	mv88w8618_audio_write,
	239	mv88w8618_audio_write
	240	};
	241
81a322d4	242	static int mv88w8618_audio_init(SysBusDevice *dev)
ef07b491 AZ	243	{
	244	mv88w8618_audio_state *s = FROM_SYSBUS(mv88w8618_audio_state, dev);
	245	int iomemtype;
	246
	247	sysbus_init_irq(dev, &s->irq);
	248
	249	wm8750_data_req_set(s->wm, mv88w8618_audio_callback, s);
	250
	251	iomemtype = cpu_register_io_memory(mv88w8618_audio_readfn,
2507c12a AG	252	mv88w8618_audio_writefn, s,
2507c12a AG	253	DEVICE_NATIVE_ENDIAN);
ef07b491 AZ	254	sysbus_init_mmio(dev, MP_AUDIO_SIZE, iomemtype);
ef07b491 AZ	255
81a322d4	256	return 0;
ef07b491 AZ	257	}
ef07b491 AZ	258
d5b61ddd JK	259	static const VMStateDescription mv88w8618_audio_vmsd = {
	260	.name = "mv88w8618_audio",
	261	.version_id = 1,
	262	.minimum_version_id = 1,
	263	.minimum_version_id_old = 1,
	264	.fields = (VMStateField[]) {
	265	VMSTATE_UINT32(playback_mode, mv88w8618_audio_state),
	266	VMSTATE_UINT32(status, mv88w8618_audio_state),
	267	VMSTATE_UINT32(irq_enable, mv88w8618_audio_state),
	268	VMSTATE_UINT32(phys_buf, mv88w8618_audio_state),
	269	VMSTATE_UINT32(target_buffer, mv88w8618_audio_state),
	270	VMSTATE_UINT32(threshold, mv88w8618_audio_state),
	271	VMSTATE_UINT32(play_pos, mv88w8618_audio_state),
	272	VMSTATE_UINT32(last_free, mv88w8618_audio_state),
	273	VMSTATE_UINT32(clock_div, mv88w8618_audio_state),
	274	VMSTATE_END_OF_LIST()
	275	}
	276	};
	277
ef07b491 AZ	278	static SysBusDeviceInfo mv88w8618_audio_info = {
	279	.init = mv88w8618_audio_init,
	280	.qdev.name = "mv88w8618_audio",
	281	.qdev.size = sizeof(mv88w8618_audio_state),
267c4840	282	.qdev.reset = mv88w8618_audio_reset,
d5b61ddd	283	.qdev.vmsd = &mv88w8618_audio_vmsd,
ef07b491 AZ	284	.qdev.props = (Property[]) {
	285	{
	286	.name = "wm8750",
	287	.info = &qdev_prop_ptr,
	288	.offset = offsetof(mv88w8618_audio_state, wm),
	289	},
	290	{/* end of list */}
	291	}
	292	};
ef07b491 AZ	293
	294	static void mv88w8618_register_devices(void)
	295	{
ef07b491	296	sysbus_register_withprop(&mv88w8618_audio_info);
ef07b491 AZ	297	}
	298
	299	device_init(mv88w8618_register_devices)