1 #include "hw/hw.h"
2 #include "monitor.h"
3 #include "audio.h"
4
5 typedef struct {
6 QEMUFile *f;
7 int bytes;
8 char *path;
9 int freq;
10 int bits;
11 int nchannels;
12 CaptureVoiceOut *cap;
13 } WAVState;
14
15 /* VICE code: Store number as little endian. */
le_store(uint8_t * buf,uint32_t val,int len)16 static void le_store (uint8_t *buf, uint32_t val, int len)
17 {
18 int i;
19 for (i = 0; i < len; i++) {
20 buf[i] = (uint8_t) (val & 0xff);
21 val >>= 8;
22 }
23 }
24
wav_notify(void * opaque,audcnotification_e cmd)25 static void wav_notify (void *opaque, audcnotification_e cmd)
26 {
27 (void) opaque;
28 (void) cmd;
29 }
30
wav_destroy(void * opaque)31 static void wav_destroy (void *opaque)
32 {
33 WAVState *wav = opaque;
34 uint8_t rlen[4];
35 uint8_t dlen[4];
36 uint32_t datalen = wav->bytes;
37 uint32_t rifflen = datalen + 36;
38
39 if (wav->f) {
40 le_store (rlen, rifflen, 4);
41 le_store (dlen, datalen, 4);
42
43 qemu_fseek (wav->f, 4, SEEK_SET);
44 qemu_put_buffer (wav->f, rlen, 4);
45
46 qemu_fseek (wav->f, 32, SEEK_CUR);
47 qemu_put_buffer (wav->f, dlen, 4);
48 qemu_fclose (wav->f);
49 }
50
51 qemu_free (wav->path);
52 }
53
wav_capture(void * opaque,void * buf,int size)54 static void wav_capture (void *opaque, void *buf, int size)
55 {
56 WAVState *wav = opaque;
57
58 qemu_put_buffer (wav->f, buf, size);
59 wav->bytes += size;
60 }
61
wav_capture_destroy(void * opaque)62 static void wav_capture_destroy (void *opaque)
63 {
64 WAVState *wav = opaque;
65
66 AUD_del_capture (wav->cap, wav);
67 }
68
wav_capture_info(void * opaque)69 static void wav_capture_info (void *opaque)
70 {
71 WAVState *wav = opaque;
72 char *path = wav->path;
73
74 monitor_printf(cur_mon, "Capturing audio(%d,%d,%d) to %s: %d bytes\n",
75 wav->freq, wav->bits, wav->nchannels,
76 path ? path : "<not available>", wav->bytes);
77 }
78
79 static struct capture_ops wav_capture_ops = {
80 .destroy = wav_capture_destroy,
81 .info = wav_capture_info
82 };
83
wav_start_capture(CaptureState * s,const char * path,int freq,int bits,int nchannels)84 int wav_start_capture (CaptureState *s, const char *path, int freq,
85 int bits, int nchannels)
86 {
87 Monitor *mon = cur_mon;
88 WAVState *wav;
89 uint8_t hdr[] = {
90 0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
91 0x45, 0x66, 0x6d, 0x74, 0x20, 0x10, 0x00, 0x00, 0x00, 0x01, 0x00,
92 0x02, 0x00, 0x44, 0xac, 0x00, 0x00, 0x10, 0xb1, 0x02, 0x00, 0x04,
93 0x00, 0x10, 0x00, 0x64, 0x61, 0x74, 0x61, 0x00, 0x00, 0x00, 0x00
94 };
95 struct audsettings as;
96 struct audio_capture_ops ops;
97 int stereo, bits16, shift;
98 CaptureVoiceOut *cap;
99
100 if (bits != 8 && bits != 16) {
101 monitor_printf(mon, "incorrect bit count %d, must be 8 or 16\n", bits);
102 return -1;
103 }
104
105 if (nchannels != 1 && nchannels != 2) {
106 monitor_printf(mon, "incorrect channel count %d, must be 1 or 2\n",
107 nchannels);
108 return -1;
109 }
110
111 stereo = nchannels == 2;
112 bits16 = bits == 16;
113
114 as.freq = freq;
115 as.nchannels = 1 << stereo;
116 as.fmt = bits16 ? AUD_FMT_S16 : AUD_FMT_U8;
117 as.endianness = 0;
118
119 ops.notify = wav_notify;
120 ops.capture = wav_capture;
121 ops.destroy = wav_destroy;
122
123 wav = qemu_mallocz (sizeof (*wav));
124
125 shift = bits16 + stereo;
126 hdr[34] = bits16 ? 0x10 : 0x08;
127
128 le_store (hdr + 22, as.nchannels, 2);
129 le_store (hdr + 24, freq, 4);
130 le_store (hdr + 28, freq << shift, 4);
131 le_store (hdr + 32, 1 << shift, 2);
132
133 wav->f = qemu_fopen (path, "wb");
134 if (!wav->f) {
135 monitor_printf(mon, "Failed to open wave file `%s'\nReason: %s\n",
136 path, strerror (errno));
137 qemu_free (wav);
138 return -1;
139 }
140
141 wav->path = qemu_strdup (path);
142 wav->bits = bits;
143 wav->nchannels = nchannels;
144 wav->freq = freq;
145
146 qemu_put_buffer (wav->f, hdr, sizeof (hdr));
147
148 cap = AUD_add_capture (&as, &ops, wav);
149 if (!cap) {
150 monitor_printf(mon, "Failed to add audio capture\n");
151 qemu_free (wav->path);
152 qemu_fclose (wav->f);
153 qemu_free (wav);
154 return -1;
155 }
156
157 wav->cap = cap;
158 s->opaque = wav;
159 s->ops = wav_capture_ops;
160 return 0;
161 }
162