2004-11-07 21:04:02 +03:00
|
|
|
/*
|
2005-10-30 21:58:22 +03:00
|
|
|
* QEMU WAV audio driver
|
|
|
|
*
|
|
|
|
* Copyright (c) 2004-2005 Vassili Karpov (malc)
|
|
|
|
*
|
2004-11-07 21:04:02 +03:00
|
|
|
* 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.
|
|
|
|
*/
|
2016-01-18 20:33:52 +03:00
|
|
|
#include "qemu/osdep.h"
|
2016-03-15 17:36:13 +03:00
|
|
|
#include "qemu/host-utils.h"
|
2012-12-17 21:20:00 +04:00
|
|
|
#include "qemu/timer.h"
|
2019-03-09 01:34:24 +03:00
|
|
|
#include "qapi/opts-visitor.h"
|
2007-11-17 20:14:51 +03:00
|
|
|
#include "audio.h"
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
#define AUDIO_CAP "wav"
|
|
|
|
#include "audio_int.h"
|
2004-11-10 02:09:44 +03:00
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
typedef struct WAVVoiceOut {
|
|
|
|
HWVoiceOut hw;
|
2011-09-20 17:16:27 +04:00
|
|
|
FILE *f;
|
2004-11-10 02:09:44 +03:00
|
|
|
int64_t old_ticks;
|
|
|
|
void *pcm_buf;
|
|
|
|
int total_samples;
|
2005-10-30 21:58:22 +03:00
|
|
|
} WAVVoiceOut;
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2009-09-18 11:37:39 +04:00
|
|
|
static int wav_run_out (HWVoiceOut *hw, int live)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
2005-10-30 21:58:22 +03:00
|
|
|
WAVVoiceOut *wav = (WAVVoiceOut *) hw;
|
2009-09-18 11:37:39 +04:00
|
|
|
int rpos, decr, samples;
|
2004-11-07 21:04:02 +03:00
|
|
|
uint8_t *dst;
|
2008-12-04 01:48:44 +03:00
|
|
|
struct st_sample *src;
|
2013-08-21 19:03:08 +04:00
|
|
|
int64_t now = qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL);
|
2004-11-07 21:04:02 +03:00
|
|
|
int64_t ticks = now - wav->old_ticks;
|
2009-09-18 08:16:03 +04:00
|
|
|
int64_t bytes =
|
2016-03-21 19:02:30 +03:00
|
|
|
muldiv64(ticks, hw->info.bytes_per_second, NANOSECONDS_PER_SECOND);
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
if (bytes > INT_MAX) {
|
|
|
|
samples = INT_MAX >> hw->info.shift;
|
|
|
|
}
|
|
|
|
else {
|
|
|
|
samples = bytes >> hw->info.shift;
|
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2004-11-11 19:55:09 +03:00
|
|
|
wav->old_ticks = now;
|
2004-11-07 21:04:02 +03:00
|
|
|
decr = audio_MIN (live, samples);
|
|
|
|
samples = decr;
|
|
|
|
rpos = hw->rpos;
|
|
|
|
while (samples) {
|
|
|
|
int left_till_end_samples = hw->samples - rpos;
|
|
|
|
int convert_samples = audio_MIN (samples, left_till_end_samples);
|
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
src = hw->mix_buf + rpos;
|
|
|
|
dst = advance (wav->pcm_buf, rpos << hw->info.shift);
|
2004-11-07 21:04:02 +03:00
|
|
|
|
|
|
|
hw->clip (dst, src, convert_samples);
|
2011-09-20 17:16:27 +04:00
|
|
|
if (fwrite (dst, convert_samples << hw->info.shift, 1, wav->f) != 1) {
|
|
|
|
dolog ("wav_run_out: fwrite of %d bytes failed\nReaons: %s\n",
|
|
|
|
convert_samples << hw->info.shift, strerror (errno));
|
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
|
|
|
|
rpos = (rpos + convert_samples) % hw->samples;
|
|
|
|
samples -= convert_samples;
|
|
|
|
wav->total_samples += convert_samples;
|
|
|
|
}
|
|
|
|
|
|
|
|
hw->rpos = rpos;
|
2005-10-30 21:58:22 +03:00
|
|
|
return decr;
|
2004-11-07 21:04:02 +03:00
|
|
|
}
|
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
static int wav_write_out (SWVoiceOut *sw, void *buf, int len)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
2005-10-30 21:58:22 +03:00
|
|
|
return audio_pcm_sw_write (sw, buf, len);
|
2004-11-07 21:04:02 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
/* VICE code: Store number as little endian. */
|
|
|
|
static void le_store (uint8_t *buf, uint32_t val, int len)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++) {
|
|
|
|
buf[i] = (uint8_t) (val & 0xff);
|
|
|
|
val >>= 8;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2015-06-04 00:03:47 +03:00
|
|
|
static int wav_init_out(HWVoiceOut *hw, struct audsettings *as,
|
|
|
|
void *drv_opaque)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
2005-10-30 21:58:22 +03:00
|
|
|
WAVVoiceOut *wav = (WAVVoiceOut *) hw;
|
2005-11-05 21:55:28 +03:00
|
|
|
int bits16 = 0, stereo = 0;
|
2004-11-07 21:04:02 +03:00
|
|
|
uint8_t hdr[] = {
|
|
|
|
0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
|
|
|
|
0x45, 0x66, 0x6d, 0x74, 0x20, 0x10, 0x00, 0x00, 0x00, 0x01, 0x00,
|
|
|
|
0x02, 0x00, 0x44, 0xac, 0x00, 0x00, 0x10, 0xb1, 0x02, 0x00, 0x04,
|
|
|
|
0x00, 0x10, 0x00, 0x64, 0x61, 0x74, 0x61, 0x00, 0x00, 0x00, 0x00
|
|
|
|
};
|
2019-03-09 01:34:24 +03:00
|
|
|
Audiodev *dev = drv_opaque;
|
|
|
|
AudiodevWavOptions *wopts = &dev->u.wav;
|
|
|
|
struct audsettings wav_as = audiodev_to_audsettings(dev->u.wav.out);
|
|
|
|
const char *wav_path = wopts->has_path ? wopts->path : "qemu.wav";
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2005-11-05 21:55:28 +03:00
|
|
|
stereo = wav_as.nchannels == 2;
|
|
|
|
switch (wav_as.fmt) {
|
2019-03-09 01:34:13 +03:00
|
|
|
case AUDIO_FORMAT_S8:
|
|
|
|
case AUDIO_FORMAT_U8:
|
2005-10-30 21:58:22 +03:00
|
|
|
bits16 = 0;
|
2004-11-07 21:04:02 +03:00
|
|
|
break;
|
|
|
|
|
2019-03-09 01:34:13 +03:00
|
|
|
case AUDIO_FORMAT_S16:
|
|
|
|
case AUDIO_FORMAT_U16:
|
2004-11-07 21:04:02 +03:00
|
|
|
bits16 = 1;
|
|
|
|
break;
|
2007-02-18 01:19:29 +03:00
|
|
|
|
2019-03-09 01:34:13 +03:00
|
|
|
case AUDIO_FORMAT_S32:
|
|
|
|
case AUDIO_FORMAT_U32:
|
2007-02-18 01:19:29 +03:00
|
|
|
dolog ("WAVE files can not handle 32bit formats\n");
|
|
|
|
return -1;
|
2019-03-09 01:34:13 +03:00
|
|
|
|
|
|
|
default:
|
|
|
|
abort();
|
2004-11-07 21:04:02 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
hdr[34] = bits16 ? 0x10 : 0x08;
|
2005-11-05 21:55:28 +03:00
|
|
|
|
2006-07-05 01:47:22 +04:00
|
|
|
wav_as.endianness = 0;
|
|
|
|
audio_pcm_init_info (&hw->info, &wav_as);
|
2005-11-05 21:55:28 +03:00
|
|
|
|
|
|
|
hw->samples = 1024;
|
2018-02-03 11:43:02 +03:00
|
|
|
wav->pcm_buf = audio_calloc(__func__, hw->samples, 1 << hw->info.shift);
|
2005-10-30 21:58:22 +03:00
|
|
|
if (!wav->pcm_buf) {
|
2005-11-05 21:55:28 +03:00
|
|
|
dolog ("Could not allocate buffer (%d bytes)\n",
|
|
|
|
hw->samples << hw->info.shift);
|
2004-11-07 21:04:02 +03:00
|
|
|
return -1;
|
2005-10-30 21:58:22 +03:00
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
le_store (hdr + 22, hw->info.nchannels, 2);
|
|
|
|
le_store (hdr + 24, hw->info.freq, 4);
|
2005-11-05 21:55:28 +03:00
|
|
|
le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
|
|
|
|
le_store (hdr + 32, 1 << (bits16 + stereo), 2);
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2019-03-09 01:34:24 +03:00
|
|
|
wav->f = fopen(wav_path, "wb");
|
2004-11-07 21:04:02 +03:00
|
|
|
if (!wav->f) {
|
2005-10-30 21:58:22 +03:00
|
|
|
dolog ("Failed to open wave file `%s'\nReason: %s\n",
|
2019-03-09 01:34:24 +03:00
|
|
|
wav_path, strerror(errno));
|
2011-08-21 07:09:37 +04:00
|
|
|
g_free (wav->pcm_buf);
|
2004-11-11 19:55:09 +03:00
|
|
|
wav->pcm_buf = NULL;
|
2004-11-07 21:04:02 +03:00
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
2011-09-20 17:16:27 +04:00
|
|
|
if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
|
|
|
|
dolog ("wav_init_out: failed to write header\nReason: %s\n",
|
|
|
|
strerror(errno));
|
|
|
|
return -1;
|
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
static void wav_fini_out (HWVoiceOut *hw)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
2005-10-30 21:58:22 +03:00
|
|
|
WAVVoiceOut *wav = (WAVVoiceOut *) hw;
|
2004-11-07 21:04:02 +03:00
|
|
|
uint8_t rlen[4];
|
|
|
|
uint8_t dlen[4];
|
2005-11-20 19:22:16 +03:00
|
|
|
uint32_t datalen = wav->total_samples << hw->info.shift;
|
|
|
|
uint32_t rifflen = datalen + 36;
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2005-11-05 21:55:28 +03:00
|
|
|
if (!wav->f) {
|
2004-11-07 21:04:02 +03:00
|
|
|
return;
|
2005-10-30 21:58:22 +03:00
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
|
|
|
|
le_store (rlen, rifflen, 4);
|
|
|
|
le_store (dlen, datalen, 4);
|
|
|
|
|
2011-09-20 17:16:27 +04:00
|
|
|
if (fseek (wav->f, 4, SEEK_SET)) {
|
|
|
|
dolog ("wav_fini_out: fseek to rlen failed\nReason: %s\n",
|
|
|
|
strerror(errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fwrite (rlen, 4, 1, wav->f) != 1) {
|
|
|
|
dolog ("wav_fini_out: failed to write rlen\nReason: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fseek (wav->f, 32, SEEK_CUR)) {
|
|
|
|
dolog ("wav_fini_out: fseek to dlen failed\nReason: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fwrite (dlen, 4, 1, wav->f) != 1) {
|
|
|
|
dolog ("wav_fini_out: failed to write dlen\nReaons: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
|
2011-09-20 17:16:27 +04:00
|
|
|
doclose:
|
|
|
|
if (fclose (wav->f)) {
|
|
|
|
dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
|
|
|
|
wav->f, strerror (errno));
|
|
|
|
}
|
2004-11-07 21:04:02 +03:00
|
|
|
wav->f = NULL;
|
2004-11-11 19:55:09 +03:00
|
|
|
|
2011-08-21 07:09:37 +04:00
|
|
|
g_free (wav->pcm_buf);
|
2004-11-11 19:55:09 +03:00
|
|
|
wav->pcm_buf = NULL;
|
2004-11-07 21:04:02 +03:00
|
|
|
}
|
|
|
|
|
2005-10-30 21:58:22 +03:00
|
|
|
static int wav_ctl_out (HWVoiceOut *hw, int cmd, ...)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
|
|
|
(void) hw;
|
|
|
|
(void) cmd;
|
|
|
|
return 0;
|
|
|
|
}
|
|
|
|
|
2019-03-09 01:34:15 +03:00
|
|
|
static void *wav_audio_init(Audiodev *dev)
|
2004-11-07 21:04:02 +03:00
|
|
|
{
|
2019-03-09 01:34:24 +03:00
|
|
|
assert(dev->driver == AUDIODEV_DRIVER_WAV);
|
|
|
|
return dev;
|
2004-11-07 21:04:02 +03:00
|
|
|
}
|
|
|
|
|
|
|
|
static void wav_audio_fini (void *opaque)
|
|
|
|
{
|
|
|
|
ldebug ("wav_fini");
|
|
|
|
}
|
|
|
|
|
2008-10-06 22:08:30 +04:00
|
|
|
static struct audio_pcm_ops wav_pcm_ops = {
|
2009-08-11 04:31:15 +04:00
|
|
|
.init_out = wav_init_out,
|
|
|
|
.fini_out = wav_fini_out,
|
|
|
|
.run_out = wav_run_out,
|
|
|
|
.write = wav_write_out,
|
|
|
|
.ctl_out = wav_ctl_out,
|
2004-11-07 21:04:02 +03:00
|
|
|
};
|
|
|
|
|
2018-03-06 10:40:47 +03:00
|
|
|
static struct audio_driver wav_audio_driver = {
|
2009-08-11 04:31:14 +04:00
|
|
|
.name = "wav",
|
|
|
|
.descr = "WAV renderer http://wikipedia.org/wiki/WAV",
|
|
|
|
.init = wav_audio_init,
|
|
|
|
.fini = wav_audio_fini,
|
2009-08-11 20:48:02 +04:00
|
|
|
.pcm_ops = &wav_pcm_ops,
|
2009-08-11 04:31:14 +04:00
|
|
|
.can_be_default = 0,
|
|
|
|
.max_voices_out = 1,
|
|
|
|
.max_voices_in = 0,
|
|
|
|
.voice_size_out = sizeof (WAVVoiceOut),
|
|
|
|
.voice_size_in = 0
|
2004-11-07 21:04:02 +03:00
|
|
|
};
|
2018-03-06 10:40:47 +03:00
|
|
|
|
|
|
|
static void register_audio_wav(void)
|
|
|
|
{
|
|
|
|
audio_driver_register(&wav_audio_driver);
|
|
|
|
}
|
|
|
|
type_init(register_audio_wav);
|