blob: a8798a1c42555aa456203b1d1755811f32d65e21 [file] [log] [blame]
bellard85571bc2004-11-07 18:04:02 +00001/*
bellard1d14ffa2005-10-30 18:58:22 +00002 * QEMU WAV audio driver
3 *
4 * Copyright (c) 2004-2005 Vassili Karpov (malc)
5 *
bellard85571bc2004-11-07 18:04:02 +00006 * Permission is hereby granted, free of charge, to any person obtaining a copy
7 * of this software and associated documentation files (the "Software"), to deal
8 * in the Software without restriction, including without limitation the rights
9 * to use, copy, modify, merge, publish, distribute, sublicense, and/or sell
10 * copies of the Software, and to permit persons to whom the Software is
11 * furnished to do so, subject to the following conditions:
12 *
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
15 *
16 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
17 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
18 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
19 * THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER
20 * LIABILITY, WHETHER IN AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM,
21 * OUT OF OR IN CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN
22 * THE SOFTWARE.
23 */
Markus Armbruster0b8fa322019-05-23 16:35:07 +020024
Peter Maydell6086a562016-01-18 17:33:52 +000025#include "qemu/osdep.h"
Paolo Bonzini87776ab2016-03-15 15:36:13 +010026#include "qemu/host-utils.h"
Markus Armbruster0b8fa322019-05-23 16:35:07 +020027#include "qemu/module.h"
Paolo Bonzini1de7afc2012-12-17 18:20:00 +010028#include "qemu/timer.h"
Kővágó, Zoltán0927d162019-03-08 23:34:24 +010029#include "qapi/opts-visitor.h"
pbrook87ecb682007-11-17 17:14:51 +000030#include "audio.h"
bellard85571bc2004-11-07 18:04:02 +000031
bellard1d14ffa2005-10-30 18:58:22 +000032#define AUDIO_CAP "wav"
33#include "audio_int.h"
bellardfb065182004-11-09 23:09:44 +000034
bellard1d14ffa2005-10-30 18:58:22 +000035typedef struct WAVVoiceOut {
36 HWVoiceOut hw;
Juan Quintela27acf662011-09-20 15:16:27 +020037 FILE *f;
Kővágó, Zoltán857271a2019-09-19 23:24:21 +020038 RateCtl rate;
bellardfb065182004-11-09 23:09:44 +000039 int total_samples;
bellard1d14ffa2005-10-30 18:58:22 +000040} WAVVoiceOut;
bellard85571bc2004-11-07 18:04:02 +000041
Kővágó, Zoltánef3612e2019-09-19 23:24:18 +020042static size_t wav_write_out(HWVoiceOut *hw, void *buf, size_t len)
bellard85571bc2004-11-07 18:04:02 +000043{
bellard1d14ffa2005-10-30 18:58:22 +000044 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
Volker Rümelin613fe022022-09-23 20:36:36 +020045 int64_t bytes = audio_rate_get_bytes(&wav->rate, &hw->info, len);
Kővágó, Zoltán2b9cce82019-10-13 21:58:02 +020046 assert(bytes % hw->info.bytes_per_frame == 0);
bellard85571bc2004-11-07 18:04:02 +000047
Kővágó, Zoltánef3612e2019-09-19 23:24:18 +020048 if (bytes && fwrite(buf, bytes, 1, wav->f) != 1) {
49 dolog("wav_write_out: fwrite of %" PRId64 " bytes failed\nReason: %s\n",
50 bytes, strerror(errno));
bellard85571bc2004-11-07 18:04:02 +000051 }
52
Kővágó, Zoltán2b9cce82019-10-13 21:58:02 +020053 wav->total_samples += bytes / hw->info.bytes_per_frame;
Kővágó, Zoltánef3612e2019-09-19 23:24:18 +020054 return bytes;
bellard85571bc2004-11-07 18:04:02 +000055}
56
bellard85571bc2004-11-07 18:04:02 +000057/* VICE code: Store number as little endian. */
58static void le_store (uint8_t *buf, uint32_t val, int len)
59{
60 int i;
61 for (i = 0; i < len; i++) {
62 buf[i] = (uint8_t) (val & 0xff);
63 val >>= 8;
64 }
65}
66
Kővágó, Zoltán5706db12015-06-03 23:03:47 +020067static int wav_init_out(HWVoiceOut *hw, struct audsettings *as,
68 void *drv_opaque)
bellard85571bc2004-11-07 18:04:02 +000069{
bellard1d14ffa2005-10-30 18:58:22 +000070 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
bellardc0fe3822005-11-05 18:55:28 +000071 int bits16 = 0, stereo = 0;
bellard85571bc2004-11-07 18:04:02 +000072 uint8_t hdr[] = {
73 0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
74 0x45, 0x66, 0x6d, 0x74, 0x20, 0x10, 0x00, 0x00, 0x00, 0x01, 0x00,
75 0x02, 0x00, 0x44, 0xac, 0x00, 0x00, 0x10, 0xb1, 0x02, 0x00, 0x04,
76 0x00, 0x10, 0x00, 0x64, 0x61, 0x74, 0x61, 0x00, 0x00, 0x00, 0x00
77 };
Kővágó, Zoltán0927d162019-03-08 23:34:24 +010078 Audiodev *dev = drv_opaque;
79 AudiodevWavOptions *wopts = &dev->u.wav;
80 struct audsettings wav_as = audiodev_to_audsettings(dev->u.wav.out);
Markus Armbrusterceb19c82022-11-04 17:06:49 +010081 const char *wav_path = wopts->path ?: "qemu.wav";
bellard85571bc2004-11-07 18:04:02 +000082
bellardc0fe3822005-11-05 18:55:28 +000083 stereo = wav_as.nchannels == 2;
84 switch (wav_as.fmt) {
Kővágó, Zoltán85bc5852019-03-08 23:34:13 +010085 case AUDIO_FORMAT_S8:
86 case AUDIO_FORMAT_U8:
bellard1d14ffa2005-10-30 18:58:22 +000087 bits16 = 0;
bellard85571bc2004-11-07 18:04:02 +000088 break;
89
Kővágó, Zoltán85bc5852019-03-08 23:34:13 +010090 case AUDIO_FORMAT_S16:
91 case AUDIO_FORMAT_U16:
bellard85571bc2004-11-07 18:04:02 +000092 bits16 = 1;
93 break;
thsf941aa22007-02-17 22:19:29 +000094
Kővágó, Zoltán85bc5852019-03-08 23:34:13 +010095 case AUDIO_FORMAT_S32:
96 case AUDIO_FORMAT_U32:
thsf941aa22007-02-17 22:19:29 +000097 dolog ("WAVE files can not handle 32bit formats\n");
98 return -1;
Kővágó, Zoltán85bc5852019-03-08 23:34:13 +010099
Daniel P. Berrangé5b4edd72021-03-03 17:43:13 +0000100 case AUDIO_FORMAT_F32:
101 dolog("WAVE files can not handle float formats\n");
102 return -1;
103
Kővágó, Zoltán85bc5852019-03-08 23:34:13 +0100104 default:
105 abort();
bellard85571bc2004-11-07 18:04:02 +0000106 }
107
108 hdr[34] = bits16 ? 0x10 : 0x08;
bellardc0fe3822005-11-05 18:55:28 +0000109
bellardd929eba2006-07-04 21:47:22 +0000110 wav_as.endianness = 0;
111 audio_pcm_init_info (&hw->info, &wav_as);
bellardc0fe3822005-11-05 18:55:28 +0000112
113 hw->samples = 1024;
bellard1d14ffa2005-10-30 18:58:22 +0000114 le_store (hdr + 22, hw->info.nchannels, 2);
115 le_store (hdr + 24, hw->info.freq, 4);
bellardc0fe3822005-11-05 18:55:28 +0000116 le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
117 le_store (hdr + 32, 1 << (bits16 + stereo), 2);
bellard85571bc2004-11-07 18:04:02 +0000118
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100119 wav->f = fopen(wav_path, "wb");
bellard85571bc2004-11-07 18:04:02 +0000120 if (!wav->f) {
bellard1d14ffa2005-10-30 18:58:22 +0000121 dolog ("Failed to open wave file `%s'\nReason: %s\n",
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100122 wav_path, strerror(errno));
bellard85571bc2004-11-07 18:04:02 +0000123 return -1;
124 }
125
Juan Quintela27acf662011-09-20 15:16:27 +0200126 if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
127 dolog ("wav_init_out: failed to write header\nReason: %s\n",
128 strerror(errno));
129 return -1;
130 }
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200131
132 audio_rate_start(&wav->rate);
bellard85571bc2004-11-07 18:04:02 +0000133 return 0;
134}
135
bellard1d14ffa2005-10-30 18:58:22 +0000136static void wav_fini_out (HWVoiceOut *hw)
bellard85571bc2004-11-07 18:04:02 +0000137{
bellard1d14ffa2005-10-30 18:58:22 +0000138 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
bellard85571bc2004-11-07 18:04:02 +0000139 uint8_t rlen[4];
140 uint8_t dlen[4];
Kővágó, Zoltán2b9cce82019-10-13 21:58:02 +0200141 uint32_t datalen = wav->total_samples * hw->info.bytes_per_frame;
bellard50903532005-11-20 16:22:16 +0000142 uint32_t rifflen = datalen + 36;
bellard85571bc2004-11-07 18:04:02 +0000143
bellardc0fe3822005-11-05 18:55:28 +0000144 if (!wav->f) {
bellard85571bc2004-11-07 18:04:02 +0000145 return;
bellard1d14ffa2005-10-30 18:58:22 +0000146 }
bellard85571bc2004-11-07 18:04:02 +0000147
148 le_store (rlen, rifflen, 4);
149 le_store (dlen, datalen, 4);
150
Juan Quintela27acf662011-09-20 15:16:27 +0200151 if (fseek (wav->f, 4, SEEK_SET)) {
152 dolog ("wav_fini_out: fseek to rlen failed\nReason: %s\n",
153 strerror(errno));
154 goto doclose;
155 }
156 if (fwrite (rlen, 4, 1, wav->f) != 1) {
157 dolog ("wav_fini_out: failed to write rlen\nReason: %s\n",
158 strerror (errno));
159 goto doclose;
160 }
161 if (fseek (wav->f, 32, SEEK_CUR)) {
162 dolog ("wav_fini_out: fseek to dlen failed\nReason: %s\n",
163 strerror (errno));
164 goto doclose;
165 }
166 if (fwrite (dlen, 4, 1, wav->f) != 1) {
167 dolog ("wav_fini_out: failed to write dlen\nReaons: %s\n",
168 strerror (errno));
169 goto doclose;
170 }
bellard85571bc2004-11-07 18:04:02 +0000171
Juan Quintela27acf662011-09-20 15:16:27 +0200172 doclose:
173 if (fclose (wav->f)) {
174 dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
175 wav->f, strerror (errno));
176 }
bellard85571bc2004-11-07 18:04:02 +0000177 wav->f = NULL;
bellard85571bc2004-11-07 18:04:02 +0000178}
179
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200180static void wav_enable_out(HWVoiceOut *hw, bool enable)
bellard85571bc2004-11-07 18:04:02 +0000181{
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200182 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
183
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200184 if (enable) {
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200185 audio_rate_start(&wav->rate);
186 }
bellard85571bc2004-11-07 18:04:02 +0000187}
188
Paolo Bonzinif6061732023-09-22 19:13:44 +0200189static void *wav_audio_init(Audiodev *dev, Error **errp)
bellard85571bc2004-11-07 18:04:02 +0000190{
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100191 assert(dev->driver == AUDIODEV_DRIVER_WAV);
192 return dev;
bellard85571bc2004-11-07 18:04:02 +0000193}
194
195static void wav_audio_fini (void *opaque)
196{
197 ldebug ("wav_fini");
198}
199
blueswir135f4b582008-10-06 18:08:30 +0000200static struct audio_pcm_ops wav_pcm_ops = {
Juan Quintela1dd3e4d2009-08-11 02:31:15 +0200201 .init_out = wav_init_out,
202 .fini_out = wav_fini_out,
Kővágó, Zoltánef3612e2019-09-19 23:24:18 +0200203 .write = wav_write_out,
Volker Rümelin98334382022-03-01 20:13:06 +0100204 .buffer_get_free = audio_generic_buffer_get_free,
Volker Rümelinfdc8c5f2020-01-23 08:49:39 +0100205 .run_buffer_out = audio_generic_run_buffer_out,
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200206 .enable_out = wav_enable_out,
bellard1d14ffa2005-10-30 18:58:22 +0000207};
208
Gerd Hoffmannd3893a32018-03-06 08:40:47 +0100209static struct audio_driver wav_audio_driver = {
Juan Quintelabee37f32009-08-11 02:31:14 +0200210 .name = "wav",
211 .descr = "WAV renderer http://wikipedia.org/wiki/WAV",
Juan Quintelabee37f32009-08-11 02:31:14 +0200212 .init = wav_audio_init,
213 .fini = wav_audio_fini,
malc98f9f482009-08-11 20:48:02 +0400214 .pcm_ops = &wav_pcm_ops,
Juan Quintelabee37f32009-08-11 02:31:14 +0200215 .max_voices_out = 1,
216 .max_voices_in = 0,
217 .voice_size_out = sizeof (WAVVoiceOut),
218 .voice_size_in = 0
bellard85571bc2004-11-07 18:04:02 +0000219};
Gerd Hoffmannd3893a32018-03-06 08:40:47 +0100220
221static void register_audio_wav(void)
222{
223 audio_driver_register(&wav_audio_driver);
224}
225type_init(register_audio_wav);