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 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. */ 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 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 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 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 189 static void *wav_audio_init(Audiodev *dev, Error **errp) 190 { 191 assert(dev->driver == AUDIODEV_DRIVER_WAV); 192 return dev; 193 } 194 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 221 static void register_audio_wav(void) 222 { 223 audio_driver_register(&wav_audio_driver); 224 } 225 type_init(register_audio_wav); 226