/* * QEMU WAV audio driver * * Copyright (c) 2004-2005 Vassili Karpov (malc) * * 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. */ #include "qemu/osdep.h" #include "qemu/host-utils.h" #include "qemu/module.h" #include "qemu/timer.h" #include "qapi/opts-visitor.h" #include "audio.h" #define AUDIO_CAP "wav" #include "audio_int.h" typedef struct WAVVoiceOut { HWVoiceOut hw; FILE *f; RateCtl rate; int total_samples; } WAVVoiceOut; static size_t wav_write_out(HWVoiceOut *hw, void *buf, size_t len) { WAVVoiceOut *wav = (WAVVoiceOut *) hw; int64_t bytes = audio_rate_get_bytes(&hw->info, &wav->rate, len); assert(bytes % hw->info.bytes_per_frame == 0); if (bytes && fwrite(buf, bytes, 1, wav->f) != 1) { dolog("wav_write_out: fwrite of %" PRId64 " bytes failed\nReason: %s\n", bytes, strerror(errno)); } wav->total_samples += bytes / hw->info.bytes_per_frame; return bytes; } /* 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; } } static int wav_init_out(HWVoiceOut *hw, struct audsettings *as, void *drv_opaque) { WAVVoiceOut *wav = (WAVVoiceOut *) hw; int bits16 = 0, stereo = 0; 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 }; 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"; stereo = wav_as.nchannels == 2; switch (wav_as.fmt) { case AUDIO_FORMAT_S8: case AUDIO_FORMAT_U8: bits16 = 0; break; case AUDIO_FORMAT_S16: case AUDIO_FORMAT_U16: bits16 = 1; break; case AUDIO_FORMAT_S32: case AUDIO_FORMAT_U32: dolog ("WAVE files can not handle 32bit formats\n"); return -1; default: abort(); } hdr[34] = bits16 ? 0x10 : 0x08; wav_as.endianness = 0; audio_pcm_init_info (&hw->info, &wav_as); hw->samples = 1024; le_store (hdr + 22, hw->info.nchannels, 2); le_store (hdr + 24, hw->info.freq, 4); le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4); le_store (hdr + 32, 1 << (bits16 + stereo), 2); wav->f = fopen(wav_path, "wb"); if (!wav->f) { dolog ("Failed to open wave file `%s'\nReason: %s\n", wav_path, strerror(errno)); return -1; } if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) { dolog ("wav_init_out: failed to write header\nReason: %s\n", strerror(errno)); return -1; } audio_rate_start(&wav->rate); return 0; } static void wav_fini_out (HWVoiceOut *hw) { WAVVoiceOut *wav = (WAVVoiceOut *) hw; uint8_t rlen[4]; uint8_t dlen[4]; uint32_t datalen = wav->total_samples * hw->info.bytes_per_frame; uint32_t rifflen = datalen + 36; if (!wav->f) { return; } le_store (rlen, rifflen, 4); le_store (dlen, datalen, 4); 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; } doclose: if (fclose (wav->f)) { dolog ("wav_fini_out: fclose %p failed\nReason: %s\n", wav->f, strerror (errno)); } wav->f = NULL; } static void wav_enable_out(HWVoiceOut *hw, bool enable) { WAVVoiceOut *wav = (WAVVoiceOut *) hw; if (enable) { audio_rate_start(&wav->rate); } } static void *wav_audio_init(Audiodev *dev) { assert(dev->driver == AUDIODEV_DRIVER_WAV); return dev; } static void wav_audio_fini (void *opaque) { ldebug ("wav_fini"); } static struct audio_pcm_ops wav_pcm_ops = { .init_out = wav_init_out, .fini_out = wav_fini_out, .write = wav_write_out, .run_buffer_out = audio_generic_run_buffer_out, .enable_out = wav_enable_out, }; static struct audio_driver wav_audio_driver = { .name = "wav", .descr = "WAV renderer http://wikipedia.org/wiki/WAV", .init = wav_audio_init, .fini = wav_audio_fini, .pcm_ops = &wav_pcm_ops, .can_be_default = 0, .max_voices_out = 1, .max_voices_in = 0, .voice_size_out = sizeof (WAVVoiceOut), .voice_size_in = 0 }; static void register_audio_wav(void) { audio_driver_register(&wav_audio_driver); } type_init(register_audio_wav);