src/pulsecore/sound-file.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   Copyright 2004-2006 Lennart Poettering
   5
   6   PulseAudio is free software; you can redistribute it and/or modify
   7   it under the terms of the GNU Lesser General Public License as published
   8   by the Free Software Foundation; either version 2.1 of the License,
   9   or (at your option) any later version.
  10
  11   PulseAudio 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 Lesser General Public License
  17   along with PulseAudio; 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 <string.h>
  27 #include <unistd.h>
  28 #include <fcntl.h>
  29 #include <errno.h>
  30
  31 #include <sndfile.h>
  32
  33 #include <pulse/sample.h>
  34 #include <pulsecore/log.h>
  35 #include <pulsecore/macro.h>
  36 #include <pulsecore/core-error.h>
  37 #include <pulsecore/core-util.h>
  38 #include <pulsecore/core-scache.h>
  39 #include <pulsecore/sndfile-util.h>
  40
  41 #include "sound-file.h"
  42
  43 int pa_sound_file_load(
  44         pa_mempool *pool,
  45         const char *fname,
  46         pa_sample_spec *ss,
  47         pa_channel_map *map,
  48         pa_memchunk *chunk,
  49         pa_proplist *p) {
  50
  51     SNDFILE *sf = NULL;
  52     SF_INFO sfi;
  53     int ret = -1;
  54     size_t l;
  55     sf_count_t (*readf_function)(SNDFILE *sndfile, void *ptr, sf_count_t frames) = NULL;
  56     void *ptr = NULL;
  57     int fd;
  58
  59     pa_assert(fname);
  60     pa_assert(ss);
  61     pa_assert(chunk);
  62
  63     pa_memchunk_reset(chunk);
  64
  65     if ((fd = pa_open_cloexec(fname, O_RDONLY, 0)) < 0) {
  66         pa_log("Failed to open file %s: %s", fname, pa_cstrerror(errno));
  67         goto finish;
  68     }
  69
  70 #ifdef HAVE_POSIX_FADVISE
  71     if (posix_fadvise(fd, 0, 0, POSIX_FADV_SEQUENTIAL) < 0) {
  72         pa_log_warn("POSIX_FADV_SEQUENTIAL failed: %s", pa_cstrerror(errno));
  73         goto finish;
  74     } else
  75         pa_log_debug("POSIX_FADV_SEQUENTIAL succeeded.");
  76 #endif
  77
  78     pa_zero(sfi);
  79     if (!(sf = sf_open_fd(fd, SFM_READ, &sfi, 1))) {
  80         pa_log("Failed to open file %s", fname);
  81         goto finish;
  82     }
  83
  84     fd = -1;
  85
  86     if (pa_sndfile_read_sample_spec(sf, ss) < 0) {
  87         pa_log("Failed to determine file sample format.");
  88         goto finish;
  89     }
  90
  91     if ((map && pa_sndfile_read_channel_map(sf, map) < 0)) {
  92         if (ss->channels > 2)
  93             pa_log("Failed to determine file channel map, synthesizing one.");
  94         pa_channel_map_init_extend(map, ss->channels, PA_CHANNEL_MAP_DEFAULT);
  95     }
  96
  97     if (p)
  98         pa_sndfile_init_proplist(sf, p);
  99
 100     if ((l = pa_frame_size(ss) * (size_t) sfi.frames) > PA_SCACHE_ENTRY_SIZE_MAX) {
 101         pa_log("File too large");
 102         goto finish;
 103     }
 104
 105     chunk->memblock = pa_memblock_new(pool, l);
 106     chunk->index = 0;
 107     chunk->length = l;
 108
 109     readf_function = pa_sndfile_readf_function(ss);
 110
 111     ptr = pa_memblock_acquire(chunk->memblock);
 112
 113     if ((readf_function && readf_function(sf, ptr, sfi.frames) != sfi.frames) ||
 114         (!readf_function && sf_read_raw(sf, ptr, (sf_count_t) l) != (sf_count_t) l)) {
 115         pa_log("Premature file end");
 116         goto finish;
 117     }
 118
 119     ret = 0;
 120
 121 finish:
 122
 123     if (sf)
 124         sf_close(sf);
 125
 126     if (ptr)
 127         pa_memblock_release(chunk->memblock);
 128
 129     if (ret != 0 && chunk->memblock)
 130         pa_memblock_unref(chunk->memblock);
 131
 132     if (fd >= 0)
 133         pa_close(fd);
 134
 135     return ret;
 136 }
 137
 138 int pa_sound_file_too_big_to_cache(const char *fname) {
 139
 140     SNDFILE*sf = NULL;
 141     SF_INFO sfi;
 142     pa_sample_spec ss;
 143
 144     pa_assert(fname);
 145
 146     pa_zero(sfi);
 147     if (!(sf = sf_open(fname, SFM_READ, &sfi))) {
 148         pa_log("Failed to open file %s", fname);
 149         return -1;
 150     }
 151
 152     if (pa_sndfile_read_sample_spec(sf, &ss) < 0) {
 153         pa_log("Failed to determine file sample format.");
 154         sf_close(sf);
 155         return -1;
 156     }
 157
 158     sf_close(sf);
 159
 160     if ((pa_frame_size(&ss) * (size_t) sfi.frames) > PA_SCACHE_ENTRY_SIZE_MAX) {
 161         pa_log("File too large: %s", fname);
 162         return 1;
 163     }
 164
 165     return 0;
 166 }