2007-11-18 01:14:51 +08:00
|
|
|
#include "hw/hw.h"
|
2012-12-18 01:19:49 +08:00
|
|
|
#include "monitor/monitor.h"
|
2007-11-18 01:14:51 +08:00
|
|
|
#include "audio.h"
|
2006-07-05 00:51:32 +08:00
|
|
|
|
|
|
|
typedef struct {
|
2011-09-20 21:16:28 +08:00
|
|
|
FILE *f;
|
2006-07-05 00:51:32 +08:00
|
|
|
int bytes;
|
2006-07-17 02:57:03 +08:00
|
|
|
char *path;
|
|
|
|
int freq;
|
|
|
|
int bits;
|
|
|
|
int nchannels;
|
|
|
|
CaptureVoiceOut *cap;
|
2006-07-05 00:51:32 +08:00
|
|
|
} WAVState;
|
|
|
|
|
|
|
|
/* VICE code: Store number as little endian. */
|
|
|
|
static void le_store (uint8_t *buf, uint32_t val, int len)
|
|
|
|
{
|
|
|
|
int i;
|
|
|
|
for (i = 0; i < len; i++) {
|
|
|
|
buf[i] = (uint8_t) (val & 0xff);
|
|
|
|
val >>= 8;
|
|
|
|
}
|
|
|
|
}
|
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
static void wav_notify (void *opaque, audcnotification_e cmd)
|
2006-07-05 00:51:32 +08:00
|
|
|
{
|
2006-07-17 02:57:03 +08:00
|
|
|
(void) opaque;
|
|
|
|
(void) cmd;
|
|
|
|
}
|
2006-07-05 00:51:32 +08:00
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
static void wav_destroy (void *opaque)
|
|
|
|
{
|
|
|
|
WAVState *wav = opaque;
|
|
|
|
uint8_t rlen[4];
|
|
|
|
uint8_t dlen[4];
|
|
|
|
uint32_t datalen = wav->bytes;
|
|
|
|
uint32_t rifflen = datalen + 36;
|
2011-09-20 21:16:28 +08:00
|
|
|
Monitor *mon = cur_mon;
|
2006-07-05 00:51:32 +08:00
|
|
|
|
2006-08-08 05:35:12 +08:00
|
|
|
if (wav->f) {
|
|
|
|
le_store (rlen, rifflen, 4);
|
|
|
|
le_store (dlen, datalen, 4);
|
2007-02-18 06:19:29 +08:00
|
|
|
|
2011-09-20 21:16:28 +08:00
|
|
|
if (fseek (wav->f, 4, SEEK_SET)) {
|
|
|
|
monitor_printf (mon, "wav_destroy: rlen fseek failed\nReason: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fwrite (rlen, 4, 1, wav->f) != 1) {
|
|
|
|
monitor_printf (mon, "wav_destroy: rlen fwrite failed\nReason %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fseek (wav->f, 32, SEEK_CUR)) {
|
|
|
|
monitor_printf (mon, "wav_destroy: dlen fseek failed\nReason %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
if (fwrite (dlen, 1, 4, wav->f) != 4) {
|
|
|
|
monitor_printf (mon, "wav_destroy: dlen fwrite failed\nReason %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto doclose;
|
|
|
|
}
|
|
|
|
doclose:
|
|
|
|
if (fclose (wav->f)) {
|
2014-05-10 07:55:20 +08:00
|
|
|
error_report("wav_destroy: fclose failed: %s", strerror(errno));
|
2011-09-20 21:16:28 +08:00
|
|
|
}
|
2006-07-05 00:51:32 +08:00
|
|
|
}
|
2007-02-18 06:19:29 +08:00
|
|
|
|
2011-08-21 11:09:37 +08:00
|
|
|
g_free (wav->path);
|
2006-07-05 00:51:32 +08:00
|
|
|
}
|
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
static void wav_capture (void *opaque, void *buf, int size)
|
2006-07-05 00:51:32 +08:00
|
|
|
{
|
|
|
|
WAVState *wav = opaque;
|
|
|
|
|
2011-09-20 21:16:28 +08:00
|
|
|
if (fwrite (buf, size, 1, wav->f) != 1) {
|
|
|
|
monitor_printf (cur_mon, "wav_capture: fwrite error\nReason: %s",
|
|
|
|
strerror (errno));
|
|
|
|
}
|
2006-07-05 00:51:32 +08:00
|
|
|
wav->bytes += size;
|
|
|
|
}
|
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
static void wav_capture_destroy (void *opaque)
|
|
|
|
{
|
|
|
|
WAVState *wav = opaque;
|
|
|
|
|
|
|
|
AUD_del_capture (wav->cap, wav);
|
|
|
|
}
|
|
|
|
|
|
|
|
static void wav_capture_info (void *opaque)
|
|
|
|
{
|
|
|
|
WAVState *wav = opaque;
|
|
|
|
char *path = wav->path;
|
|
|
|
|
2011-09-20 21:16:28 +08:00
|
|
|
monitor_printf (cur_mon, "Capturing audio(%d,%d,%d) to %s: %d bytes\n",
|
|
|
|
wav->freq, wav->bits, wav->nchannels,
|
|
|
|
path ? path : "<not available>", wav->bytes);
|
2006-07-17 02:57:03 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
static struct capture_ops wav_capture_ops = {
|
|
|
|
.destroy = wav_capture_destroy,
|
|
|
|
.info = wav_capture_info
|
|
|
|
};
|
|
|
|
|
|
|
|
int wav_start_capture (CaptureState *s, const char *path, int freq,
|
|
|
|
int bits, int nchannels)
|
2006-07-05 00:51:32 +08:00
|
|
|
{
|
2009-03-06 07:01:23 +08:00
|
|
|
Monitor *mon = cur_mon;
|
2006-07-05 00:51:32 +08:00
|
|
|
WAVState *wav;
|
|
|
|
uint8_t hdr[] = {
|
|
|
|
0x52, 0x49, 0x46, 0x46, 0x00, 0x00, 0x00, 0x00, 0x57, 0x41, 0x56,
|
|
|
|
0x45, 0x66, 0x6d, 0x74, 0x20, 0x10, 0x00, 0x00, 0x00, 0x01, 0x00,
|
|
|
|
0x02, 0x00, 0x44, 0xac, 0x00, 0x00, 0x10, 0xb1, 0x02, 0x00, 0x04,
|
|
|
|
0x00, 0x10, 0x00, 0x64, 0x61, 0x74, 0x61, 0x00, 0x00, 0x00, 0x00
|
|
|
|
};
|
2008-12-04 06:48:44 +08:00
|
|
|
struct audsettings as;
|
2006-07-05 00:51:32 +08:00
|
|
|
struct audio_capture_ops ops;
|
2006-07-17 02:57:03 +08:00
|
|
|
int stereo, bits16, shift;
|
|
|
|
CaptureVoiceOut *cap;
|
|
|
|
|
|
|
|
if (bits != 8 && bits != 16) {
|
2011-09-20 21:16:28 +08:00
|
|
|
monitor_printf (mon, "incorrect bit count %d, must be 8 or 16\n", bits);
|
2006-07-17 02:57:03 +08:00
|
|
|
return -1;
|
|
|
|
}
|
|
|
|
|
|
|
|
if (nchannels != 1 && nchannels != 2) {
|
2011-09-20 21:16:28 +08:00
|
|
|
monitor_printf (mon, "incorrect channel count %d, must be 1 or 2\n",
|
|
|
|
nchannels);
|
2006-07-17 02:57:03 +08:00
|
|
|
return -1;
|
|
|
|
}
|
2006-07-05 00:51:32 +08:00
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
stereo = nchannels == 2;
|
|
|
|
bits16 = bits == 16;
|
2006-07-05 00:51:32 +08:00
|
|
|
|
|
|
|
as.freq = freq;
|
|
|
|
as.nchannels = 1 << stereo;
|
|
|
|
as.fmt = bits16 ? AUD_FMT_S16 : AUD_FMT_U8;
|
2006-07-05 05:47:22 +08:00
|
|
|
as.endianness = 0;
|
2006-07-05 00:51:32 +08:00
|
|
|
|
2006-07-17 02:57:03 +08:00
|
|
|
ops.notify = wav_notify;
|
|
|
|
ops.capture = wav_capture;
|
|
|
|
ops.destroy = wav_destroy;
|
2006-07-05 00:51:32 +08:00
|
|
|
|
2011-08-21 11:09:37 +08:00
|
|
|
wav = g_malloc0 (sizeof (*wav));
|
2006-07-05 00:51:32 +08:00
|
|
|
|
|
|
|
shift = bits16 + stereo;
|
|
|
|
hdr[34] = bits16 ? 0x10 : 0x08;
|
|
|
|
|
|
|
|
le_store (hdr + 22, as.nchannels, 2);
|
|
|
|
le_store (hdr + 24, freq, 4);
|
|
|
|
le_store (hdr + 28, freq << shift, 4);
|
|
|
|
le_store (hdr + 32, 1 << shift, 2);
|
|
|
|
|
2011-09-20 21:16:28 +08:00
|
|
|
wav->f = fopen (path, "wb");
|
2006-07-05 00:51:32 +08:00
|
|
|
if (!wav->f) {
|
2011-09-20 21:16:28 +08:00
|
|
|
monitor_printf (mon, "Failed to open wave file `%s'\nReason: %s\n",
|
|
|
|
path, strerror (errno));
|
2011-08-21 11:09:37 +08:00
|
|
|
g_free (wav);
|
2006-07-17 02:57:03 +08:00
|
|
|
return -1;
|
2006-07-05 00:51:32 +08:00
|
|
|
}
|
|
|
|
|
2011-08-21 11:09:37 +08:00
|
|
|
wav->path = g_strdup (path);
|
2006-07-17 02:57:03 +08:00
|
|
|
wav->bits = bits;
|
|
|
|
wav->nchannels = nchannels;
|
|
|
|
wav->freq = freq;
|
|
|
|
|
2011-09-20 21:16:28 +08:00
|
|
|
if (fwrite (hdr, sizeof (hdr), 1, wav->f) != 1) {
|
|
|
|
monitor_printf (mon, "Failed to write header\nReason: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
goto error_free;
|
|
|
|
}
|
2006-07-17 02:57:03 +08:00
|
|
|
|
2009-05-14 07:11:35 +08:00
|
|
|
cap = AUD_add_capture (&as, &ops, wav);
|
2006-07-17 02:57:03 +08:00
|
|
|
if (!cap) {
|
2011-09-20 21:16:28 +08:00
|
|
|
monitor_printf (mon, "Failed to add audio capture\n");
|
|
|
|
goto error_free;
|
2006-07-17 02:57:03 +08:00
|
|
|
}
|
|
|
|
|
|
|
|
wav->cap = cap;
|
|
|
|
s->opaque = wav;
|
|
|
|
s->ops = wav_capture_ops;
|
|
|
|
return 0;
|
2011-09-20 21:16:28 +08:00
|
|
|
|
|
|
|
error_free:
|
|
|
|
g_free (wav->path);
|
|
|
|
if (fclose (wav->f)) {
|
|
|
|
monitor_printf (mon, "Failed to close wave file\nReason: %s\n",
|
|
|
|
strerror (errno));
|
|
|
|
}
|
|
|
|
g_free (wav);
|
|
|
|
return -1;
|
2006-07-05 00:51:32 +08:00
|
|
|
}
|