/* * WM8750 audio CODEC. * * Copyright (c) 2006 Openedhand Ltd. * Written by Andrzej Zaborowski * * This file is licensed under GNU GPL. */ #include "hw.h" #include "i2c.h" #include "audio/audio.h" #define IN_PORT_N 3 #define OUT_PORT_N 3 #define CODEC "wm8750" struct wm_rate_s; struct wm8750_s { i2c_slave i2c; uint8_t i2c_data[2]; int i2c_len; QEMUSoundCard card; SWVoiceIn *adc_voice[IN_PORT_N]; SWVoiceOut *dac_voice[OUT_PORT_N]; int enable; void (*data_req)(void *, int, int); void *opaque; uint8_t data_in[4096]; uint8_t data_out[4096]; int idx_in, req_in; int idx_out, req_out; SWVoiceOut **out[2]; uint8_t outvol[7], outmute[2]; SWVoiceIn **in[2]; uint8_t invol[4], inmute[2]; uint8_t diff[2], pol, ds, monomix[2], alc, mute; uint8_t path[4], mpath[2], power, format; uint32_t inmask, outmask; const struct wm_rate_s *rate; }; static inline void wm8750_in_load(struct wm8750_s *s) { int acquired; if (s->idx_in + s->req_in <= sizeof(s->data_in)) return; s->idx_in = audio_MAX(0, (int) sizeof(s->data_in) - s->req_in); acquired = AUD_read(*s->in[0], s->data_in + s->idx_in, sizeof(s->data_in) - s->idx_in); } static inline void wm8750_out_flush(struct wm8750_s *s) { int sent = 0; while (sent < s->idx_out) sent += AUD_write(*s->out[0], s->data_out + sent, s->idx_out - sent) ?: s->idx_out; s->idx_out = 0; } static void wm8750_audio_in_cb(void *opaque, int avail_b) { struct wm8750_s *s = (struct wm8750_s *) opaque; s->req_in = avail_b; s->data_req(s->opaque, s->req_out >> 2, avail_b >> 2); } static void wm8750_audio_out_cb(void *opaque, int free_b) { struct wm8750_s *s = (struct wm8750_s *) opaque; if (s->idx_out >= free_b) { s->idx_out = free_b; s->req_out = 0; wm8750_out_flush(s); } else s->req_out = free_b - s->idx_out; s->data_req(s->opaque, s->req_out >> 2, s->req_in >> 2); } struct wm_rate_s { int adc; int adc_hz; int dac; int dac_hz; }; static const struct wm_rate_s wm_rate_table[] = { { 256, 48000, 256, 48000 }, /* SR: 00000 */ { 384, 48000, 384, 48000 }, /* SR: 00001 */ { 256, 48000, 1536, 8000 }, /* SR: 00010 */ { 384, 48000, 2304, 8000 }, /* SR: 00011 */ { 1536, 8000, 256, 48000 }, /* SR: 00100 */ { 2304, 8000, 384, 48000 }, /* SR: 00101 */ { 1536, 8000, 1536, 8000 }, /* SR: 00110 */ { 2304, 8000, 2304, 8000 }, /* SR: 00111 */ { 1024, 12000, 1024, 12000 }, /* SR: 01000 */ { 1526, 12000, 1536, 12000 }, /* SR: 01001 */ { 768, 16000, 768, 16000 }, /* SR: 01010 */ { 1152, 16000, 1152, 16000 }, /* SR: 01011 */ { 384, 32000, 384, 32000 }, /* SR: 01100 */ { 576, 32000, 576, 32000 }, /* SR: 01101 */ { 128, 96000, 128, 96000 }, /* SR: 01110 */ { 192, 96000, 192, 96000 }, /* SR: 01111 */ { 256, 44100, 256, 44100 }, /* SR: 10000 */ { 384, 44100, 384, 44100 }, /* SR: 10001 */ { 256, 44100, 1408, 8018 }, /* SR: 10010 */ { 384, 44100, 2112, 8018 }, /* SR: 10011 */ { 1408, 8018, 256, 44100 }, /* SR: 10100 */ { 2112, 8018, 384, 44100 }, /* SR: 10101 */ { 1408, 8018, 1408, 8018 }, /* SR: 10110 */ { 2112, 8018, 2112, 8018 }, /* SR: 10111 */ { 1024, 11025, 1024, 11025 }, /* SR: 11000 */ { 1536, 11025, 1536, 11025 }, /* SR: 11001 */ { 512, 22050, 512, 22050 }, /* SR: 11010 */ { 768, 22050, 768, 22050 }, /* SR: 11011 */ { 512, 24000, 512, 24000 }, /* SR: 11100 */ { 768, 24000, 768, 24000 }, /* SR: 11101 */ { 128, 88200, 128, 88200 }, /* SR: 11110 */ { 192, 88200, 192, 88200 }, /* SR: 11111 */ }; static void wm8750_set_format(struct wm8750_s *s) { int i; audsettings_t in_fmt; audsettings_t out_fmt; audsettings_t monoout_fmt; wm8750_out_flush(s); if (s->in[0] && *s->in[0]) AUD_set_active_in(*s->in[0], 0); if (s->out[0] && *s->out[0]) AUD_set_active_out(*s->out[0], 0); for (i = 0; i < IN_PORT_N; i ++) if (s->adc_voice[i]) { AUD_close_in(&s->card, s->adc_voice[i]); s->adc_voice[i] = 0; } for (i = 0; i < OUT_PORT_N; i ++) if (s->dac_voice[i]) { AUD_close_out(&s->card, s->dac_voice[i]); s->dac_voice[i] = 0; } if (!s->enable) return; /* Setup input */ in_fmt.endianness = 0; in_fmt.nchannels = 2; in_fmt.freq = s->rate->adc_hz; in_fmt.fmt = AUD_FMT_S16; s->adc_voice[0] = AUD_open_in(&s->card, s->adc_voice[0], CODEC ".input1", s, wm8750_audio_in_cb, &in_fmt); s->adc_voice[1] = AUD_open_in(&s->card, s->adc_voice[1], CODEC ".input2", s, wm8750_audio_in_cb, &in_fmt); s->adc_voice[2] = AUD_open_in(&s->card, s->adc_voice[2], CODEC ".input3", s, wm8750_audio_in_cb, &in_fmt); /* Setup output */ out_fmt.endianness = 0; out_fmt.nchannels = 2; out_fmt.freq = s->rate->dac_hz; out_fmt.fmt = AUD_FMT_S16; monoout_fmt.endianness = 0; monoout_fmt.nchannels = 1; monoout_fmt.freq = s->rate->dac_hz; monoout_fmt.fmt = AUD_FMT_S16; s->dac_voice[0] = AUD_open_out(&s->card, s->dac_voice[0], CODEC ".speaker", s, wm8750_audio_out_cb, &out_fmt); s->dac_voice[1] = AUD_open_out(&s->card, s->dac_voice[1], CODEC ".headphone", s, wm8750_audio_out_cb, &out_fmt); /* MONOMIX is also in stereo for simplicity */ s->dac_voice[2] = AUD_open_out(&s->card, s->dac_voice[2], CODEC ".monomix", s, wm8750_audio_out_cb, &out_fmt); /* no sense emulating OUT3 which is a mix of other outputs */ /* We should connect the left and right channels to their * respective inputs/outputs but we have completely no need * for mixing or combining paths to different ports, so we * connect both channels to where the left channel is routed. */ if (s->in[0] && *s->in[0]) AUD_set_active_in(*s->in[0], 1); if (s->out[0] && *s->out[0]) AUD_set_active_out(*s->out[0], 1); } static void inline wm8750_mask_update(struct wm8750_s *s) { #define R_ONLY 0x0000ffff #define L_ONLY 0xffff0000 #define BOTH (R_ONLY | L_ONLY) #define NONE (R_ONLY & L_ONLY) s->inmask = (s->inmute[0] ? R_ONLY : BOTH) & (s->inmute[1] ? L_ONLY : BOTH) & (s->mute ? NONE : BOTH); s->outmask = (s->outmute[0] ? R_ONLY : BOTH) & (s->outmute[1] ? L_ONLY : BOTH) & (s->mute ? NONE : BOTH); } void wm8750_reset(i2c_slave *i2c) { struct wm8750_s *s = (struct wm8750_s *) i2c; s->rate = &wm_rate_table[0]; s->enable = 0; wm8750_set_format(s); s->diff[0] = 0; s->diff[1] = 0; s->ds = 0; s->alc = 0; s->in[0] = &s->adc_voice[0]; s->invol[0] = 0x17; s->invol[1] = 0x17; s->invol[2] = 0xc3; s->invol[3] = 0xc3; s->out[0] = &s->dac_voice[0]; s->outvol[0] = 0xff; s->outvol[1] = 0xff; s->outvol[2] = 0x79; s->outvol[3] = 0x79; s->outvol[4] = 0x79; s->outvol[5] = 0x79; s->inmute[0] = 0; s->inmute[1] = 0; s->outmute[0] = 0; s->outmute[1] = 0; s->mute = 1; s->path[0] = 0; s->path[1] = 0; s->path[2] = 0; s->path[3] = 0; s->mpath[0] = 0; s->mpath[1] = 0; s->format = 0x0a; s->idx_in = sizeof(s->data_in); s->req_in = 0; s->idx_out = 0; s->req_out = 0; wm8750_mask_update(s); s->i2c_len = 0; } static void wm8750_event(i2c_slave *i2c, enum i2c_event event) { struct wm8750_s *s = (struct wm8750_s *) i2c; switch (event) { case I2C_START_SEND: s->i2c_len = 0; break; case I2C_FINISH: #ifdef VERBOSE if (s->i2c_len < 2) printf("%s: message too short (%i bytes)\n", __FUNCTION__, s->i2c_len); #endif break; default: break; } } #define WM8750_LINVOL 0x00 #define WM8750_RINVOL 0x01 #define WM8750_LOUT1V 0x02 #define WM8750_ROUT1V 0x03 #define WM8750_ADCDAC 0x05 #define WM8750_IFACE 0x07 #define WM8750_SRATE 0x08 #define WM8750_LDAC 0x0a #define WM8750_RDAC 0x0b #define WM8750_BASS 0x0c #define WM8750_TREBLE 0x0d #define WM8750_RESET 0x0f #define WM8750_3D 0x10 #define WM8750_ALC1 0x11 #define WM8750_ALC2 0x12 #define WM8750_ALC3 0x13 #define WM8750_NGATE 0x14 #define WM8750_LADC 0x15 #define WM8750_RADC 0x16 #define WM8750_ADCTL1 0x17 #define WM8750_ADCTL2 0x18 #define WM8750_PWR1 0x19 #define WM8750_PWR2 0x1a #define WM8750_ADCTL3 0x1b #define WM8750_ADCIN 0x1f #define WM8750_LADCIN 0x20 #define WM8750_RADCIN 0x21 #define WM8750_LOUTM1 0x22 #define WM8750_LOUTM2 0x23 #define WM8750_ROUTM1 0x24 #define WM8750_ROUTM2 0x25 #define WM8750_MOUTM1 0x26 #define WM8750_MOUTM2 0x27 #define WM8750_LOUT2V 0x28 #define WM8750_ROUT2V 0x29 #define WM8750_MOUTV 0x2a static int wm8750_tx(i2c_slave *i2c, uint8_t data) { struct wm8750_s *s = (struct wm8750_s *) i2c; uint8_t cmd; uint16_t value; if (s->i2c_len >= 2) { printf("%s: long message (%i bytes)\n", __FUNCTION__, s->i2c_len); #ifdef VERBOSE return 1; #endif } s->i2c_data[s->i2c_len ++] = data; if (s->i2c_len != 2) return 0; cmd = s->i2c_data[0] >> 1; value = ((s->i2c_data[0] << 8) | s->i2c_data[1]) & 0x1ff; switch (cmd) { case WM8750_LADCIN: /* ADC Signal Path Control (Left) */ s->diff[0] = (((value >> 6) & 3) == 3); /* LINSEL */ if (s->diff[0]) s->in[0] = &s->adc_voice[0 + s->ds * 1]; else s->in[0] = &s->adc_voice[((value >> 6) & 3) * 1 + 0]; break; case WM8750_RADCIN: /* ADC Signal Path Control (Right) */ s->diff[1] = (((value >> 6) & 3) == 3); /* RINSEL */ if (s->diff[1]) s->in[1] = &s->adc_voice[0 + s->ds * 1]; else s->in[1] = &s->adc_voice[((value >> 6) & 3) * 1 + 0]; break; case WM8750_ADCIN: /* ADC Input Mode */ s->ds = (value >> 8) & 1; /* DS */ if (s->diff[0]) s->in[0] = &s->adc_voice[0 + s->ds * 1]; if (s->diff[1]) s->in[1] = &s->adc_voice[0 + s->ds * 1]; s->monomix[0] = (value >> 6) & 3; /* MONOMIX */ break; case WM8750_ADCTL1: /* Additional Control (1) */ s->monomix[1] = (value >> 1) & 1; /* DMONOMIX */ break; case WM8750_PWR1: /* Power Management (1) */ s->enable = ((value >> 6) & 7) == 3; /* VMIDSEL, VREF */ wm8750_set_format(s); break; case WM8750_LINVOL: /* Left Channel PGA */ s->invol[0] = value & 0x3f; /* LINVOL */ s->inmute[0] = (value >> 7) & 1; /* LINMUTE */ wm8750_mask_update(s); break; case WM8750_RINVOL: /* Right Channel PGA */ s->invol[1] = value & 0x3f; /* RINVOL */ s->inmute[1] = (value >> 7) & 1; /* RINMUTE */ wm8750_mask_update(s); break; case WM8750_ADCDAC: /* ADC and DAC Control */ s->pol = (value >> 5) & 3; /* ADCPOL */ s->mute = (value >> 3) & 1; /* DACMU */ wm8750_mask_update(s); break; case WM8750_ADCTL3: /* Additional Control (3) */ break; case WM8750_LADC: /* Left ADC Digital Volume */ s->invol[2] = value & 0xff; /* LADCVOL */ break; case WM8750_RADC: /* Right ADC Digital Volume */ s->invol[3] = value & 0xff; /* RADCVOL */ break; case WM8750_ALC1: /* ALC Control (1) */ s->alc = (value >> 7) & 3; /* ALCSEL */ break; case WM8750_NGATE: /* Noise Gate Control */ case WM8750_3D: /* 3D enhance */ break; case WM8750_LDAC: /* Left Channel Digital Volume */ s->outvol[0] = value & 0xff; /* LDACVOL */ break; case WM8750_RDAC: /* Right Channel Digital Volume */ s->outvol[1] = value & 0xff; /* RDACVOL */ break; case WM8750_BASS: /* Bass Control */ break; case WM8750_LOUTM1: /* Left Mixer Control (1) */ s->path[0] = (value >> 8) & 1; /* LD2LO */ break; case WM8750_LOUTM2: /* Left Mixer Control (2) */ s->path[1] = (value >> 8) & 1; /* RD2LO */ break; case WM8750_ROUTM1: /* Right Mixer Control (1) */ s->path[2] = (value >> 8) & 1; /* LD2RO */ break; case WM8750_ROUTM2: /* Right Mixer Control (2) */ s->path[3] = (value >> 8) & 1; /* RD2RO */ break; case WM8750_MOUTM1: /* Mono Mixer Control (1) */ s->mpath[0] = (value >> 8) & 1; /* LD2MO */ break; case WM8750_MOUTM2: /* Mono Mixer Control (2) */ s->mpath[1] = (value >> 8) & 1; /* RD2MO */ break; case WM8750_LOUT1V: /* LOUT1 Volume */ s->outvol[2] = value & 0x7f; /* LOUT2VOL */ break; case WM8750_LOUT2V: /* LOUT2 Volume */ s->outvol[4] = value & 0x7f; /* LOUT2VOL */ break; case WM8750_ROUT1V: /* ROUT1 Volume */ s->outvol[3] = value & 0x7f; /* ROUT2VOL */ break; case WM8750_ROUT2V: /* ROUT2 Volume */ s->outvol[5] = value & 0x7f; /* ROUT2VOL */ break; case WM8750_MOUTV: /* MONOOUT Volume */ s->outvol[6] = value & 0x7f; /* MONOOUTVOL */ break; case WM8750_ADCTL2: /* Additional Control (2) */ break; case WM8750_PWR2: /* Power Management (2) */ s->power = value & 0x7e; break; case WM8750_IFACE: /* Digital Audio Interface Format */ #ifdef VERBOSE if (value & 0x40) /* MS */ printf("%s: attempt to enable Master Mode\n", __FUNCTION__); #endif s->format = value; wm8750_set_format(s); break; case WM8750_SRATE: /* Clocking and Sample Rate Control */ s->rate = &wm_rate_table[(value >> 1) & 0x1f]; wm8750_set_format(s); break; case WM8750_RESET: /* Reset */ wm8750_reset(&s->i2c); break; #ifdef VERBOSE default: printf("%s: unknown register %02x\n", __FUNCTION__, cmd); #endif } return 0; } static int wm8750_rx(i2c_slave *i2c) { return 0x00; } static void wm8750_save(QEMUFile *f, void *opaque) { struct wm8750_s *s = (struct wm8750_s *) opaque; int i; qemu_put_8s(f, &s->i2c_data[0]); qemu_put_8s(f, &s->i2c_data[1]); qemu_put_be32(f, s->i2c_len); qemu_put_be32(f, s->enable); qemu_put_be32(f, s->idx_in); qemu_put_be32(f, s->req_in); qemu_put_be32(f, s->idx_out); qemu_put_be32(f, s->req_out); for (i = 0; i < 7; i ++) qemu_put_8s(f, &s->outvol[i]); for (i = 0; i < 2; i ++) qemu_put_8s(f, &s->outmute[i]); for (i = 0; i < 4; i ++) qemu_put_8s(f, &s->invol[i]); for (i = 0; i < 2; i ++) qemu_put_8s(f, &s->inmute[i]); for (i = 0; i < 2; i ++) qemu_put_8s(f, &s->diff[i]); qemu_put_8s(f, &s->pol); qemu_put_8s(f, &s->ds); for (i = 0; i < 2; i ++) qemu_put_8s(f, &s->monomix[i]); qemu_put_8s(f, &s->alc); qemu_put_8s(f, &s->mute); for (i = 0; i < 4; i ++) qemu_put_8s(f, &s->path[i]); for (i = 0; i < 2; i ++) qemu_put_8s(f, &s->mpath[i]); qemu_put_8s(f, &s->format); qemu_put_8s(f, &s->power); qemu_put_be32s(f, &s->inmask); qemu_put_be32s(f, &s->outmask); qemu_put_byte(f, (s->rate - wm_rate_table) / sizeof(*s->rate)); i2c_slave_save(f, &s->i2c); } static int wm8750_load(QEMUFile *f, void *opaque, int version_id) { struct wm8750_s *s = (struct wm8750_s *) opaque; int i; qemu_get_8s(f, &s->i2c_data[0]); qemu_get_8s(f, &s->i2c_data[1]); s->i2c_len = qemu_get_be32(f); s->enable = qemu_get_be32(f); s->idx_in = qemu_get_be32(f); s->req_in = qemu_get_be32(f); s->idx_out = qemu_get_be32(f); s->req_out = qemu_get_be32(f); for (i = 0; i < 7; i ++) qemu_get_8s(f, &s->outvol[i]); for (i = 0; i < 2; i ++) qemu_get_8s(f, &s->outmute[i]); for (i = 0; i < 4; i ++) qemu_get_8s(f, &s->invol[i]); for (i = 0; i < 2; i ++) qemu_get_8s(f, &s->inmute[i]); for (i = 0; i < 2; i ++) qemu_get_8s(f, &s->diff[i]); qemu_get_8s(f, &s->pol); qemu_get_8s(f, &s->ds); for (i = 0; i < 2; i ++) qemu_get_8s(f, &s->monomix[i]); qemu_get_8s(f, &s->alc); qemu_get_8s(f, &s->mute); for (i = 0; i < 4; i ++) qemu_get_8s(f, &s->path[i]); for (i = 0; i < 2; i ++) qemu_get_8s(f, &s->mpath[i]); qemu_get_8s(f, &s->format); qemu_get_8s(f, &s->power); qemu_get_be32s(f, &s->inmask); qemu_get_be32s(f, &s->outmask); s->rate = &wm_rate_table[(uint8_t) qemu_get_byte(f) & 0x1f]; i2c_slave_load(f, &s->i2c); return 0; } static int wm8750_iid = 0; i2c_slave *wm8750_init(i2c_bus *bus, AudioState *audio) { struct wm8750_s *s = (struct wm8750_s *) i2c_slave_init(bus, 0, sizeof(struct wm8750_s)); s->i2c.event = wm8750_event; s->i2c.recv = wm8750_rx; s->i2c.send = wm8750_tx; AUD_register_card(audio, CODEC, &s->card); wm8750_reset(&s->i2c); register_savevm(CODEC, wm8750_iid ++, 0, wm8750_save, wm8750_load, s); return &s->i2c; } #if 0 static void wm8750_fini(i2c_slave *i2c) { struct wm8750_s *s = (struct wm8750_s *) i2c; wm8750_reset(&s->i2c); AUD_remove_card(&s->card); qemu_free(s); } #endif void wm8750_data_req_set(i2c_slave *i2c, void (*data_req)(void *, int, int), void *opaque) { struct wm8750_s *s = (struct wm8750_s *) i2c; s->data_req = data_req; s->opaque = opaque; } void wm8750_dac_dat(void *opaque, uint32_t sample) { struct wm8750_s *s = (struct wm8750_s *) opaque; uint32_t *data = (uint32_t *) &s->data_out[s->idx_out]; *data = sample & s->outmask; s->req_out -= 4; s->idx_out += 4; if (s->idx_out >= sizeof(s->data_out) || s->req_out <= 0) wm8750_out_flush(s); } uint32_t wm8750_adc_dat(void *opaque) { struct wm8750_s *s = (struct wm8750_s *) opaque; uint32_t *data; if (s->idx_in >= sizeof(s->data_in)) wm8750_in_load(s); data = (uint32_t *) &s->data_in[s->idx_in]; s->req_in -= 4; s->idx_in += 4; return *data & s->inmask; }