qemu

FORK: QEMU emulator
git clone https://git.neptards.moe/neptards/qemu.git
Log | Files | Refs | Submodules | LICENSE

wavaudio.c (6452B)


      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->has_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     default:
    101         abort();
    102     }
    103 
    104     hdr[34] = bits16 ? 0x10 : 0x08;
    105 
    106     wav_as.endianness = 0;
    107     audio_pcm_init_info (&hw->info, &wav_as);
    108 
    109     hw->samples = 1024;
    110     le_store (hdr + 22, hw->info.nchannels, 2);
    111     le_store (hdr + 24, hw->info.freq, 4);
    112     le_store (hdr + 28, hw->info.freq << (bits16 + stereo), 4);
    113     le_store (hdr + 32, 1 << (bits16 + stereo), 2);
    114 
    115     wav->f = fopen(wav_path, "wb");
    116     if (!wav->f) {
    117         dolog ("Failed to open wave file `%s'\nReason: %s\n",
    118                wav_path, strerror(errno));
    119         return -1;
    120     }
    121 
    122     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     }
    127 
    128     audio_rate_start(&wav->rate);
    129     return 0;
    130 }
    131 
    132 static void wav_fini_out (HWVoiceOut *hw)
    133 {
    134     WAVVoiceOut *wav = (WAVVoiceOut *) hw;
    135     uint8_t rlen[4];
    136     uint8_t dlen[4];
    137     uint32_t datalen = wav->total_samples * hw->info.bytes_per_frame;
    138     uint32_t rifflen = datalen + 36;
    139 
    140     if (!wav->f) {
    141         return;
    142     }
    143 
    144     le_store (rlen, rifflen, 4);
    145     le_store (dlen, datalen, 4);
    146 
    147     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     }
    167 
    168  doclose:
    169     if (fclose (wav->f))  {
    170         dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
    171                wav->f, strerror (errno));
    172     }
    173     wav->f = NULL;
    174 }
    175 
    176 static void wav_enable_out(HWVoiceOut *hw, bool enable)
    177 {
    178     WAVVoiceOut *wav = (WAVVoiceOut *) hw;
    179 
    180     if (enable) {
    181         audio_rate_start(&wav->rate);
    182     }
    183 }
    184 
    185 static void *wav_audio_init(Audiodev *dev)
    186 {
    187     assert(dev->driver == AUDIODEV_DRIVER_WAV);
    188     return dev;
    189 }
    190 
    191 static void wav_audio_fini (void *opaque)
    192 {
    193     ldebug ("wav_fini");
    194 }
    195 
    196 static struct audio_pcm_ops wav_pcm_ops = {
    197     .init_out = wav_init_out,
    198     .fini_out = wav_fini_out,
    199     .write    = wav_write_out,
    200     .buffer_get_free = audio_generic_buffer_get_free,
    201     .run_buffer_out = audio_generic_run_buffer_out,
    202     .enable_out = wav_enable_out,
    203 };
    204 
    205 static struct audio_driver wav_audio_driver = {
    206     .name           = "wav",
    207     .descr          = "WAV renderer http://wikipedia.org/wiki/WAV",
    208     .init           = wav_audio_init,
    209     .fini           = wav_audio_fini,
    210     .pcm_ops        = &wav_pcm_ops,
    211     .can_be_default = 0,
    212     .max_voices_out = 1,
    213     .max_voices_in  = 0,
    214     .voice_size_out = sizeof (WAVVoiceOut),
    215     .voice_size_in  = 0
    216 };
    217 
    218 static void register_audio_wav(void)
    219 {
    220     audio_driver_register(&wav_audio_driver);
    221 }
    222 type_init(register_audio_wav);