1 /*
2 * QEMU WAV audio driver
3 *
4 * Copyright (c) 2004-2005 Vassili Karpov (malc)
5 *
6 * 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 */
24
25 #include "qemu/osdep.h"
26 #include "qemu/host-utils.h"
27 #include "qemu/module.h"
28 #include "qemu/timer.h"
29 #include "qapi/opts-visitor.h"
30 #include "audio.h"
31
32 #define AUDIO_CAP "wav"
33 #include "audio_int.h"
34
35 typedef struct WAVVoiceOut {
36 HWVoiceOut hw;
37 FILE *f;
38 RateCtl rate;
39 int total_samples;
40 } WAVVoiceOut;
41
wav_write_out(HWVoiceOut * hw,void * buf,size_t len)42 static size_t wav_write_out(HWVoiceOut *hw, void *buf, size_t len)
43 {
44 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
45 int64_t bytes = audio_rate_get_bytes(&wav->rate, &hw->info, len);
46 assert(bytes % hw->info.bytes_per_frame == 0);
47
48 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));
51 }
52
53 wav->total_samples += bytes / hw->info.bytes_per_frame;
54 return bytes;
55 }
56
57 /* VICE code: Store number as little endian. */
le_store(uint8_t * buf,uint32_t val,int len)58 static 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
wav_init_out(HWVoiceOut * hw,struct audsettings * as,void * drv_opaque)67 static int wav_init_out(HWVoiceOut *hw, struct audsettings *as,
68 void *drv_opaque)
69 {
70 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
71 int bits16 = 0, stereo = 0;
72 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 };
78 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->path ?: "qemu.wav";
82
83 stereo = wav_as.nchannels == 2;
84 switch (wav_as.fmt) {
85 case AUDIO_FORMAT_S8:
86 case AUDIO_FORMAT_U8:
87 bits16 = 0;
88 break;
89
90 case AUDIO_FORMAT_S16:
91 case AUDIO_FORMAT_U16:
92 bits16 = 1;
93 break;
94
95 case AUDIO_FORMAT_S32:
96 case AUDIO_FORMAT_U32:
97 dolog ("WAVE files can not handle 32bit formats\n");
98 return -1;
99
100 case AUDIO_FORMAT_F32:
101 dolog("WAVE files can not handle float formats\n");
102 return -1;
103
104 default:
105 abort();
106 }
107
108 hdr[34] = bits16 ? 0x10 : 0x08;
109
110 wav_as.endianness = 0;
111 audio_pcm_init_info (&hw->info, &wav_as);
112
113 hw->samples = 1024;
114 le_store (hdr + 22, hw->info.nchannels, 2);
115 le_store (hdr + 24, hw->info.freq, 4);
116 le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
117 le_store (hdr + 32, 1 << (bits16 + stereo), 2);
118
119 wav->f = fopen(wav_path, "wb");
120 if (!wav->f) {
121 dolog ("Failed to open wave file `%s'\nReason: %s\n",
122 wav_path, strerror(errno));
123 return -1;
124 }
125
126 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 }
131
132 audio_rate_start(&wav->rate);
133 return 0;
134 }
135
wav_fini_out(HWVoiceOut * hw)136 static void wav_fini_out (HWVoiceOut *hw)
137 {
138 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
139 uint8_t rlen[4];
140 uint8_t dlen[4];
141 uint32_t datalen = wav->total_samples * hw->info.bytes_per_frame;
142 uint32_t rifflen = datalen + 36;
143
144 if (!wav->f) {
145 return;
146 }
147
148 le_store (rlen, rifflen, 4);
149 le_store (dlen, datalen, 4);
150
151 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 }
171
172 doclose:
173 if (fclose (wav->f)) {
174 dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
175 wav->f, strerror (errno));
176 }
177 wav->f = NULL;
178 }
179
wav_enable_out(HWVoiceOut * hw,bool enable)180 static void wav_enable_out(HWVoiceOut *hw, bool enable)
181 {
182 WAVVoiceOut *wav = (WAVVoiceOut *) hw;
183
184 if (enable) {
185 audio_rate_start(&wav->rate);
186 }
187 }
188
wav_audio_init(Audiodev * dev,Error ** errp)189 static void *wav_audio_init(Audiodev *dev, Error **errp)
190 {
191 assert(dev->driver == AUDIODEV_DRIVER_WAV);
192 return dev;
193 }
194
wav_audio_fini(void * opaque)195 static void wav_audio_fini (void *opaque)
196 {
197 ldebug ("wav_fini");
198 }
199
200 static struct audio_pcm_ops wav_pcm_ops = {
201 .init_out = wav_init_out,
202 .fini_out = wav_fini_out,
203 .write = wav_write_out,
204 .buffer_get_free = audio_generic_buffer_get_free,
205 .run_buffer_out = audio_generic_run_buffer_out,
206 .enable_out = wav_enable_out,
207 };
208
209 static struct audio_driver wav_audio_driver = {
210 .name = "wav",
211 .descr = "WAV renderer http://wikipedia.org/wiki/WAV",
212 .init = wav_audio_init,
213 .fini = wav_audio_fini,
214 .pcm_ops = &wav_pcm_ops,
215 .max_voices_out = 1,
216 .max_voices_in = 0,
217 .voice_size_out = sizeof (WAVVoiceOut),
218 .voice_size_in = 0
219 };
220
register_audio_wav(void)221 static void register_audio_wav(void)
222 {
223 audio_driver_register(&wav_audio_driver);
224 }
225 type_init(register_audio_wav);
226