code.delx.au - pulseaudio/blob - polyp/sound-file-stream.c

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of polypaudio.
   5
   6   polypaudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU General Public License as published
   8   by the Free Software Foundation; either version 2 of the License,
   9   or (at your option) any later version.
  10
  11   polypaudio is distributed in the hope that it will be useful, but
  12   WITHOUT ANY WARRANTY; without even the implied warranty of
  13   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  14   General Public License for more details.
  15
  16   You should have received a copy of the GNU General Public License
  17   along with polypaudio; if not, write to the Free Software
  18   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  19   USA.
  20 ***/
  21
  22 #ifdef HAVE_CONFIG_H
  23 #include <config.h>
  24 #endif
  25
  26 #include <stdlib.h>
  27 #include <assert.h>
  28 #include <stdio.h>
  29 #include <string.h>
  30
  31 #include <sndfile.h>
  32
  33 #include "sound-file-stream.h"
  34 #include "sink-input.h"
  35 #include "xmalloc.h"
  36 #include "log.h"
  37
  38 #define BUF_SIZE (1024*10)
  39
  40 struct userdata {
  41     SNDFILE *sndfile;
  42     struct pa_sink_input *sink_input;
  43     struct pa_memchunk memchunk;
  44 };
  45
  46 static void free_userdata(struct userdata *u) {
  47     assert(u);
  48     if (u->sink_input) {
  49         pa_sink_input_disconnect(u->sink_input);
  50         pa_sink_input_unref(u->sink_input);
  51     }
  52
  53     if (u->memchunk.memblock)
  54         pa_memblock_unref(u->memchunk.memblock);
  55     if (u->sndfile)
  56         sf_close(u->sndfile);
  57
  58     pa_xfree(u);
  59 }
  60
  61 static void sink_input_kill(struct pa_sink_input *i) {
  62     assert(i && i->userdata);
  63     free_userdata(i->userdata);
  64 }
  65
  66 static void si_kill(struct pa_mainloop_api *m, void *i) {
  67     sink_input_kill(i);
  68 }
  69
  70 static int sink_input_peek(struct pa_sink_input *i, struct pa_memchunk *chunk) {
  71     struct userdata *u;
  72     assert(i && chunk && i->userdata);
  73     u = i->userdata;
  74
  75     if (!u->memchunk.memblock) {
  76         uint32_t fs = pa_frame_size(&i->sample_spec);
  77         sf_count_t samples = BUF_SIZE/fs;
  78
  79         u->memchunk.memblock = pa_memblock_new(BUF_SIZE, i->sink->core->memblock_stat);
  80         u->memchunk.index = 0;
  81         samples = sf_readf_float(u->sndfile, u->memchunk.memblock->data, samples);
  82         u->memchunk.length = samples*fs;
  83
  84         if (!u->memchunk.length) {
  85             pa_memblock_unref(u->memchunk.memblock);
  86             u->memchunk.memblock = NULL;
  87             u->memchunk.index = u->memchunk.length = 0;
  88             pa_mainloop_api_once(i->sink->core->mainloop, si_kill, i);
  89             return -1;
  90         }
  91     }
  92
  93     *chunk = u->memchunk;
  94     pa_memblock_ref(chunk->memblock);
  95     assert(chunk->length);
  96     return 0;
  97 }
  98
  99 static void sink_input_drop(struct pa_sink_input *i, const struct pa_memchunk*chunk, size_t length) {
 100     struct userdata *u;
 101     assert(i && chunk && length && i->userdata);
 102     u = i->userdata;
 103
 104     assert(!memcmp(chunk, &u->memchunk, sizeof(chunk)));
 105     assert(length <= u->memchunk.length);
 106
 107     u->memchunk.index += length;
 108     u->memchunk.length -= length;
 109
 110     if (u->memchunk.length <= 0) {
 111         pa_memblock_unref(u->memchunk.memblock);
 112         u->memchunk.memblock = NULL;
 113         u->memchunk.index = u->memchunk.length = 0;
 114     }
 115 }
 116
 117 int pa_play_file(struct pa_sink *sink, const char *fname, pa_volume_t volume) {
 118     struct userdata *u = NULL;
 119     SF_INFO sfinfo;
 120     struct pa_sample_spec ss;
 121     assert(sink && fname);
 122
 123     if (volume <= 0)
 124         goto fail;
 125
 126     u = pa_xmalloc(sizeof(struct userdata));
 127     u->sink_input = NULL;
 128     u->memchunk.memblock = NULL;
 129     u->memchunk.index = u->memchunk.length = 0;
 130     u->sndfile = NULL;
 131
 132     memset(&sfinfo, 0, sizeof(sfinfo));
 133
 134     if (!(u->sndfile = sf_open(fname, SFM_READ, &sfinfo))) {
 135         pa_log(__FILE__": Failed to open file %s\n", fname);
 136         goto fail;
 137     }
 138
 139     ss.format = PA_SAMPLE_FLOAT32;
 140     ss.rate = sfinfo.samplerate;
 141     ss.channels = sfinfo.channels;
 142
 143     if (!pa_sample_spec_valid(&ss)) {
 144         pa_log(__FILE__": Unsupported sample format in file %s\n", fname);
 145         goto fail;
 146     }
 147
 148     if (!(u->sink_input = pa_sink_input_new(sink, fname, &ss, 0)))
 149         goto fail;
 150
 151     u->sink_input->volume = volume;
 152     u->sink_input->peek = sink_input_peek;
 153     u->sink_input->drop = sink_input_drop;
 154     u->sink_input->kill = sink_input_kill;
 155     u->sink_input->userdata = u;
 156
 157     pa_sink_notify(sink);
 158
 159     return 0;
 160
 161 fail:
 162     if (u)
 163         free_userdata(u);
 164
 165     return -1;
 166 }