2 * QEMU WAV audio driver
4 * Copyright (c) 2004-2005 Vassili Karpov (malc)
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:
13 * The above copyright notice and this permission notice shall be included in
14 * all copies or substantial portions of the Software.
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
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"
32 #define AUDIO_CAP "wav"
33 #include "audio_int.h"
35 typedef struct WAVVoiceOut
{
42 static size_t wav_write_out(HWVoiceOut
*hw
, void *buf
, size_t len
)
44 WAVVoiceOut
*wav
= (WAVVoiceOut
*) hw
;
45 int64_t now
= qemu_clock_get_ns(QEMU_CLOCK_VIRTUAL
);
46 int64_t ticks
= now
- wav
->old_ticks
;
48 muldiv64(ticks
, hw
->info
.bytes_per_second
, NANOSECONDS_PER_SECOND
);
50 bytes
= MIN(bytes
, len
);
51 bytes
= bytes
>> hw
->info
.shift
<< hw
->info
.shift
;
54 if (bytes
&& fwrite(buf
, bytes
, 1, wav
->f
) != 1) {
55 dolog("wav_write_out: fwrite of %" PRId64
" bytes failed\nReason: %s\n",
56 bytes
, strerror(errno
));
59 wav
->total_samples
+= bytes
>> hw
->info
.shift
;
63 /* VICE code: Store number as little endian. */
64 static void le_store (uint8_t *buf
, uint32_t val
, int len
)
67 for (i
= 0; i
< len
; i
++) {
68 buf
[i
] = (uint8_t) (val
& 0xff);
73 static int wav_init_out(HWVoiceOut
*hw
, struct audsettings
*as
,
76 WAVVoiceOut
*wav
= (WAVVoiceOut
*) hw
;
77 int bits16
= 0, stereo
= 0;
79 0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
80 0x45, 0x66, 0x6d, 0x74, 0x20, 0x10, 0x00, 0x00, 0x00, 0x01, 0x00,
81 0x02, 0x00, 0x44, 0xac, 0x00, 0x00, 0x10, 0xb1, 0x02, 0x00, 0x04,
82 0x00, 0x10, 0x00, 0x64, 0x61, 0x74, 0x61, 0x00, 0x00, 0x00, 0x00
84 Audiodev
*dev
= drv_opaque
;
85 AudiodevWavOptions
*wopts
= &dev
->u
.wav
;
86 struct audsettings wav_as
= audiodev_to_audsettings(dev
->u
.wav
.out
);
87 const char *wav_path
= wopts
->has_path
? wopts
->path
: "qemu.wav";
89 stereo
= wav_as
.nchannels
== 2;
96 case AUDIO_FORMAT_S16
:
97 case AUDIO_FORMAT_U16
:
101 case AUDIO_FORMAT_S32
:
102 case AUDIO_FORMAT_U32
:
103 dolog ("WAVE files can not handle 32bit formats\n");
110 hdr
[34] = bits16
? 0x10 : 0x08;
112 wav_as
.endianness
= 0;
113 audio_pcm_init_info (&hw
->info
, &wav_as
);
116 le_store (hdr
+ 22, hw
->info
.nchannels
, 2);
117 le_store (hdr
+ 24, hw
->info
.freq
, 4);
118 le_store (hdr
+ 28, hw
->info
.freq
<< (bits16
+ stereo
), 4);
119 le_store (hdr
+ 32, 1 << (bits16
+ stereo
), 2);
121 wav
->f
= fopen(wav_path
, "wb");
123 dolog ("Failed to open wave file `%s'\nReason: %s\n",
124 wav_path
, strerror(errno
));
128 if (fwrite (hdr
, sizeof (hdr
), 1, wav
->f
) != 1) {
129 dolog ("wav_init_out: failed to write header\nReason: %s\n",
136 static void wav_fini_out (HWVoiceOut
*hw
)
138 WAVVoiceOut
*wav
= (WAVVoiceOut
*) hw
;
141 uint32_t datalen
= wav
->total_samples
<< hw
->info
.shift
;
142 uint32_t rifflen
= datalen
+ 36;
148 le_store (rlen
, rifflen
, 4);
149 le_store (dlen
, datalen
, 4);
151 if (fseek (wav
->f
, 4, SEEK_SET
)) {
152 dolog ("wav_fini_out: fseek to rlen failed\nReason: %s\n",
156 if (fwrite (rlen
, 4, 1, wav
->f
) != 1) {
157 dolog ("wav_fini_out: failed to write rlen\nReason: %s\n",
161 if (fseek (wav
->f
, 32, SEEK_CUR
)) {
162 dolog ("wav_fini_out: fseek to dlen failed\nReason: %s\n",
166 if (fwrite (dlen
, 4, 1, wav
->f
) != 1) {
167 dolog ("wav_fini_out: failed to write dlen\nReaons: %s\n",
173 if (fclose (wav
->f
)) {
174 dolog ("wav_fini_out: fclose %p failed\nReason: %s\n",
175 wav
->f
, strerror (errno
));
180 static int wav_ctl_out (HWVoiceOut
*hw
, int cmd
, ...)
187 static void *wav_audio_init(Audiodev
*dev
)
189 assert(dev
->driver
== AUDIODEV_DRIVER_WAV
);
193 static void wav_audio_fini (void *opaque
)
198 static struct audio_pcm_ops wav_pcm_ops
= {
199 .init_out
= wav_init_out
,
200 .fini_out
= wav_fini_out
,
201 .write
= wav_write_out
,
202 .ctl_out
= wav_ctl_out
,
205 static struct audio_driver wav_audio_driver
= {
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
,
214 .voice_size_out
= sizeof (WAVVoiceOut
),
218 static void register_audio_wav(void)
220 audio_driver_register(&wav_audio_driver
);
222 type_init(register_audio_wav
);