blob: e46d834bd3af26afe23563a7d2b959eae1ef9e46 [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;
Kővágó, Zoltán857271a2019-09-19 23:24:21 +020045 int64_t bytes = audio_rate_get_bytes(&hw->info, &wav->rate, 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);
81 const char *wav_path = wopts->has_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
100 default:
101 abort();
bellard85571bc2004-11-07 18:04:02 +0000102 }
103
104 hdr[34] = bits16 ? 0x10 : 0x08;
bellardc0fe3822005-11-05 18:55:28 +0000105
bellardd929eba2006-07-04 21:47:22 +0000106 wav_as.endianness = 0;
107 audio_pcm_init_info (&hw->info, &wav_as);
bellardc0fe3822005-11-05 18:55:28 +0000108
109 hw->samples = 1024;
bellard1d14ffa2005-10-30 18:58:22 +0000110 le_store (hdr + 22, hw->info.nchannels, 2);
111 le_store (hdr + 24, hw->info.freq, 4);
bellardc0fe3822005-11-05 18:55:28 +0000112 le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
113 le_store (hdr + 32, 1 << (bits16 + stereo), 2);
bellard85571bc2004-11-07 18:04:02 +0000114
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100115 wav->f = fopen(wav_path, "wb");
bellard85571bc2004-11-07 18:04:02 +0000116 if (!wav->f) {
bellard1d14ffa2005-10-30 18:58:22 +0000117 dolog ("Failed to open wave file `%s'\nReason: %s\n",
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100118 wav_path, strerror(errno));
bellard85571bc2004-11-07 18:04:02 +0000119 return -1;
120 }
121
Juan Quintela27acf662011-09-20 15:16:27 +0200122 if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
123 dolog ("wav_init_out: failed to write header\nReason: %s\n",
124 strerror(errno));
125 return -1;
126 }
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200127
128 audio_rate_start(&wav->rate);
bellard85571bc2004-11-07 18:04:02 +0000129 return 0;
130}
131
bellard1d14ffa2005-10-30 18:58:22 +0000132static void wav_fini_out (HWVoiceOut *hw)
bellard85571bc2004-11-07 18:04:02 +0000133{
bellard1d14ffa2005-10-30 18:58:22 +0000134 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
bellard85571bc2004-11-07 18:04:02 +0000135 uint8_t rlen[4];
136 uint8_t dlen[4];
Kővágó, Zoltán2b9cce82019-10-13 21:58:02 +0200137 uint32_t datalen = wav->total_samples * hw->info.bytes_per_frame;
bellard50903532005-11-20 16:22:16 +0000138 uint32_t rifflen = datalen + 36;
bellard85571bc2004-11-07 18:04:02 +0000139
bellardc0fe3822005-11-05 18:55:28 +0000140 if (!wav->f) {
bellard85571bc2004-11-07 18:04:02 +0000141 return;
bellard1d14ffa2005-10-30 18:58:22 +0000142 }
bellard85571bc2004-11-07 18:04:02 +0000143
144 le_store (rlen, rifflen, 4);
145 le_store (dlen, datalen, 4);
146
Juan Quintela27acf662011-09-20 15:16:27 +0200147 if (fseek (wav->f, 4, SEEK_SET)) {
148 dolog ("wav_fini_out: fseek to rlen failed\nReason: %s\n",
149 strerror(errno));
150 goto doclose;
151 }
152 if (fwrite (rlen, 4, 1, wav->f) != 1) {
153 dolog ("wav_fini_out: failed to write rlen\nReason: %s\n",
154 strerror (errno));
155 goto doclose;
156 }
157 if (fseek (wav->f, 32, SEEK_CUR)) {
158 dolog ("wav_fini_out: fseek to dlen failed\nReason: %s\n",
159 strerror (errno));
160 goto doclose;
161 }
162 if (fwrite (dlen, 4, 1, wav->f) != 1) {
163 dolog ("wav_fini_out: failed to write dlen\nReaons: %s\n",
164 strerror (errno));
165 goto doclose;
166 }
bellard85571bc2004-11-07 18:04:02 +0000167
Juan Quintela27acf662011-09-20 15:16:27 +0200168 doclose:
169 if (fclose (wav->f)) {
170 dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
171 wav->f, strerror (errno));
172 }
bellard85571bc2004-11-07 18:04:02 +0000173 wav->f = NULL;
bellard85571bc2004-11-07 18:04:02 +0000174}
175
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200176static void wav_enable_out(HWVoiceOut *hw, bool enable)
bellard85571bc2004-11-07 18:04:02 +0000177{
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200178 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
179
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200180 if (enable) {
Kővágó, Zoltán857271a2019-09-19 23:24:21 +0200181 audio_rate_start(&wav->rate);
182 }
bellard85571bc2004-11-07 18:04:02 +0000183}
184
Kővágó, Zoltán71830222019-03-08 23:34:15 +0100185static void *wav_audio_init(Audiodev *dev)
bellard85571bc2004-11-07 18:04:02 +0000186{
Kővágó, Zoltán0927d162019-03-08 23:34:24 +0100187 assert(dev->driver == AUDIODEV_DRIVER_WAV);
188 return dev;
bellard85571bc2004-11-07 18:04:02 +0000189}
190
191static void wav_audio_fini (void *opaque)
192{
193 ldebug ("wav_fini");
194}
195
blueswir135f4b582008-10-06 18:08:30 +0000196static struct audio_pcm_ops wav_pcm_ops = {
Juan Quintela1dd3e4d2009-08-11 02:31:15 +0200197 .init_out = wav_init_out,
198 .fini_out = wav_fini_out,
Kővágó, Zoltánef3612e2019-09-19 23:24:18 +0200199 .write = wav_write_out,
Kővágó, Zoltán571a8c52019-09-19 23:24:22 +0200200 .enable_out = wav_enable_out,
bellard1d14ffa2005-10-30 18:58:22 +0000201};
202
Gerd Hoffmannd3893a32018-03-06 08:40:47 +0100203static struct audio_driver wav_audio_driver = {
Juan Quintelabee37f32009-08-11 02:31:14 +0200204 .name = "wav",
205 .descr = "WAV renderer http://wikipedia.org/wiki/WAV",
Juan Quintelabee37f32009-08-11 02:31:14 +0200206 .init = wav_audio_init,
207 .fini = wav_audio_fini,
malc98f9f482009-08-11 20:48:02 +0400208 .pcm_ops = &wav_pcm_ops,
Juan Quintelabee37f32009-08-11 02:31:14 +0200209 .can_be_default = 0,
210 .max_voices_out = 1,
211 .max_voices_in = 0,
212 .voice_size_out = sizeof (WAVVoiceOut),
213 .voice_size_in = 0
bellard85571bc2004-11-07 18:04:02 +0000214};
Gerd Hoffmannd3893a32018-03-06 08:40:47 +0100215
216static void register_audio_wav(void)
217{
218 audio_driver_register(&wav_audio_driver);
219}
220type_init(register_audio_wav);