]> code.delx.au - pulseaudio/blob - src/pulsecore/sound-file.c
remap: Change remapping function argument type from void to int16_t / float as approp...
[pulseaudio] / 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 <unistd.h>
27 #include <fcntl.h>
28 #include <errno.h>
29
30 #include <sndfile.h>
31
32 #include <pulse/sample.h>
33 #include <pulsecore/log.h>
34 #include <pulsecore/macro.h>
35 #include <pulsecore/core-error.h>
36 #include <pulsecore/core-util.h>
37 #include <pulsecore/core-scache.h>
38 #include <pulsecore/sndfile-util.h>
39
40 #include "sound-file.h"
41
42 int pa_sound_file_load(
43 pa_mempool *pool,
44 const char *fname,
45 pa_sample_spec *ss,
46 pa_channel_map *map,
47 pa_memchunk *chunk,
48 pa_proplist *p) {
49
50 SNDFILE *sf = NULL;
51 SF_INFO sfi;
52 int ret = -1;
53 size_t l;
54 sf_count_t (*readf_function)(SNDFILE *sndfile, void *ptr, sf_count_t frames) = NULL;
55 void *ptr = NULL;
56 int fd;
57
58 pa_assert(fname);
59 pa_assert(ss);
60 pa_assert(chunk);
61
62 pa_memchunk_reset(chunk);
63
64 if ((fd = pa_open_cloexec(fname, O_RDONLY, 0)) < 0) {
65 pa_log("Failed to open file %s: %s", fname, pa_cstrerror(errno));
66 goto finish;
67 }
68
69 #ifdef HAVE_POSIX_FADVISE
70 if (posix_fadvise(fd, 0, 0, POSIX_FADV_SEQUENTIAL) < 0) {
71 pa_log_warn("POSIX_FADV_SEQUENTIAL failed: %s", pa_cstrerror(errno));
72 goto finish;
73 } else
74 pa_log_debug("POSIX_FADV_SEQUENTIAL succeeded.");
75 #endif
76
77 pa_zero(sfi);
78 if (!(sf = sf_open_fd(fd, SFM_READ, &sfi, 1))) {
79 pa_log("Failed to open file %s", fname);
80 goto finish;
81 }
82
83 fd = -1;
84
85 if (pa_sndfile_read_sample_spec(sf, ss) < 0) {
86 pa_log("Failed to determine file sample format.");
87 goto finish;
88 }
89
90 if ((map && pa_sndfile_read_channel_map(sf, map) < 0)) {
91 if (ss->channels > 2)
92 pa_log("Failed to determine file channel map, synthesizing one.");
93 pa_channel_map_init_extend(map, ss->channels, PA_CHANNEL_MAP_DEFAULT);
94 }
95
96 if (p)
97 pa_sndfile_init_proplist(sf, p);
98
99 if ((l = pa_frame_size(ss) * (size_t) sfi.frames) > PA_SCACHE_ENTRY_SIZE_MAX) {
100 pa_log("File too large");
101 goto finish;
102 }
103
104 chunk->memblock = pa_memblock_new(pool, l);
105 chunk->index = 0;
106 chunk->length = l;
107
108 readf_function = pa_sndfile_readf_function(ss);
109
110 ptr = pa_memblock_acquire(chunk->memblock);
111
112 if ((readf_function && readf_function(sf, ptr, sfi.frames) != sfi.frames) ||
113 (!readf_function && sf_read_raw(sf, ptr, (sf_count_t) l) != (sf_count_t) l)) {
114 pa_log("Premature file end");
115 goto finish;
116 }
117
118 ret = 0;
119
120 finish:
121
122 if (sf)
123 sf_close(sf);
124
125 if (ptr)
126 pa_memblock_release(chunk->memblock);
127
128 if (ret != 0 && chunk->memblock)
129 pa_memblock_unref(chunk->memblock);
130
131 if (fd >= 0)
132 pa_close(fd);
133
134 return ret;
135 }
136
137 int pa_sound_file_too_big_to_cache(const char *fname) {
138
139 SNDFILE*sf = NULL;
140 SF_INFO sfi;
141 pa_sample_spec ss;
142
143 pa_assert(fname);
144
145 pa_zero(sfi);
146 if (!(sf = sf_open(fname, SFM_READ, &sfi))) {
147 pa_log("Failed to open file %s", fname);
148 return -1;
149 }
150
151 if (pa_sndfile_read_sample_spec(sf, &ss) < 0) {
152 pa_log("Failed to determine file sample format.");
153 sf_close(sf);
154 return -1;
155 }
156
157 sf_close(sf);
158
159 if ((pa_frame_size(&ss) * (size_t) sfi.frames) > PA_SCACHE_ENTRY_SIZE_MAX) {
160 pa_log("File too large: %s", fname);
161 return 1;
162 }
163
164 return 0;
165 }