Home | History | Annotate | Download | only in audio
      1 #include <stdio.h>
      2 #include "monitor/monitor.h"
      3 #include "audio.h"
      4 
      5 typedef struct {
      6     FILE *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. */
     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 
     25 static void wav_notify (void *opaque, audcnotification_e cmd)
     26 {
     27     (void) opaque;
     28     (void) cmd;
     29 }
     30 
     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         fseek (wav->f, 4, SEEK_SET);
     44         fwrite(rlen, 4, 1, wav->f);
     45 
     46         fseek (wav->f, 32, SEEK_CUR);
     47         fwrite(dlen, 4, 1, wav->f);
     48         fclose (wav->f);
     49     }
     50 
     51     g_free (wav->path);
     52 }
     53 
     54 static void wav_capture (void *opaque, void *buf, int size)
     55 {
     56     WAVState *wav = opaque;
     57 
     58     fwrite(buf, size, 1, wav->f);
     59     wav->bytes += size;
     60 }
     61 
     62 static void wav_capture_destroy (void *opaque)
     63 {
     64     WAVState *wav = opaque;
     65 
     66     AUD_del_capture (wav->cap, wav);
     67 }
     68 
     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 
     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 = g_malloc0 (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 = 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         g_free (wav);
    138         return -1;
    139     }
    140 
    141     wav->path = g_strdup (path);
    142     wav->bits = bits;
    143     wav->nchannels = nchannels;
    144     wav->freq = freq;
    145 
    146     fwrite(hdr, sizeof(hdr), 1, wav->f);
    147 
    148     cap = AUD_add_capture (&as, &ops, wav);
    149     if (!cap) {
    150         monitor_printf(mon, "Failed to add audio capture\n");
    151         g_free (wav->path);
    152         fclose (wav->f);
    153         g_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