4 This file is part of polypaudio.
6 polypaudio 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 of the License,
9 or (at your option) any later version.
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.
16 You should have received a copy of the GNU Lesser 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
30 #include <sys/types.h>
44 #include <polyp/mainloop.h>
45 #include <polyp/channelmap.h>
46 #include <polyp/volume.h>
47 #include <polypcore/sink-input.h>
48 #include <polypcore/sample-util.h>
49 #include <polypcore/play-memchunk.h>
50 #include <polypcore/xmalloc.h>
51 #include <polypcore/core-subscribe.h>
52 #include <polypcore/namereg.h>
53 #include <polypcore/sound-file.h>
54 #include <polypcore/util.h>
55 #include <polypcore/log.h>
57 #include "core-scache.h"
59 #define UNLOAD_POLL_TIME 2
61 static void timeout_callback(pa_mainloop_api
*m
, pa_time_event
*e
, PA_GCC_UNUSED
const struct timeval
*tv
, void *userdata
) {
62 pa_core
*c
= userdata
;
64 assert(c
&& c
->mainloop
== m
&& c
->scache_auto_unload_event
== e
);
66 pa_scache_unload_unused(c
);
68 pa_gettimeofday(&ntv
);
69 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
70 m
->time_restart(e
, &ntv
);
73 static void free_entry(pa_scache_entry
*e
) {
75 pa_namereg_unregister(e
->core
, e
->name
);
76 pa_subscription_post(e
->core
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_REMOVE
, e
->index
);
78 pa_xfree(e
->filename
);
79 if (e
->memchunk
.memblock
)
80 pa_memblock_unref(e
->memchunk
.memblock
);
84 static pa_scache_entry
* scache_add_item(pa_core
*c
, const char *name
) {
88 if ((e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, 0))) {
89 if (e
->memchunk
.memblock
)
90 pa_memblock_unref(e
->memchunk
.memblock
);
92 pa_xfree(e
->filename
);
96 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
98 e
= pa_xmalloc(sizeof(pa_scache_entry
));
100 if (!pa_namereg_register(c
, name
, PA_NAMEREG_SAMPLE
, e
, 1)) {
105 e
->name
= pa_xstrdup(name
);
109 c
->scache
= pa_idxset_new(pa_idxset_trivial_hash_func
, pa_idxset_trivial_compare_func
);
113 pa_idxset_put(c
->scache
, e
, &e
->index
);
115 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_NEW
, e
->index
);
118 pa_cvolume_reset(&e
->volume
, PA_CHANNELS_MAX
);
119 e
->last_used_time
= 0;
120 e
->memchunk
.memblock
= NULL
;
121 e
->memchunk
.index
= e
->memchunk
.length
= 0;
124 e
->last_used_time
= 0;
126 memset(&e
->sample_spec
, 0, sizeof(pa_sample_spec
));
131 int pa_scache_add_item(pa_core
*c
, const char *name
, const pa_sample_spec
*ss
, const pa_channel_map
*map
, const pa_memchunk
*chunk
, uint32_t *idx
) {
135 if (!(e
= scache_add_item(c
, name
)))
139 e
->sample_spec
= *ss
;
140 pa_channel_map_init_auto(&e
->channel_map
, ss
->channels
);
144 e
->channel_map
= *map
;
147 e
->memchunk
= *chunk
;
148 pa_memblock_ref(e
->memchunk
.memblock
);
157 int pa_scache_add_file(pa_core
*c
, const char *name
, const char *filename
, uint32_t *idx
) {
165 if (ExpandEnvironmentStrings(filename
, buf
, MAX_PATH
))
169 if (pa_sound_file_load(filename
, &ss
, &chunk
, c
->memblock_stat
) < 0)
172 r
= pa_scache_add_item(c
, name
, &ss
, NULL
, &chunk
, idx
);
173 pa_memblock_unref(chunk
.memblock
);
178 int pa_scache_add_file_lazy(pa_core
*c
, const char *name
, const char *filename
, uint32_t *idx
) {
184 if (ExpandEnvironmentStrings(filename
, buf
, MAX_PATH
))
190 if (!(e
= scache_add_item(c
, name
)))
194 e
->filename
= pa_xstrdup(filename
);
196 if (!c
->scache_auto_unload_event
) {
198 pa_gettimeofday(&ntv
);
199 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
200 c
->scache_auto_unload_event
= c
->mainloop
->time_new(c
->mainloop
, &ntv
, timeout_callback
, c
);
209 int pa_scache_remove_item(pa_core
*c
, const char *name
) {
213 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, 0)))
216 if (pa_idxset_remove_by_data(c
->scache
, e
, NULL
) != e
)
223 static void free_cb(void *p
, PA_GCC_UNUSED
void *userdata
) {
224 pa_scache_entry
*e
= p
;
229 void pa_scache_free(pa_core
*c
) {
233 pa_idxset_free(c
->scache
, free_cb
, NULL
);
237 if (c
->scache_auto_unload_event
)
238 c
->mainloop
->time_free(c
->scache_auto_unload_event
);
241 int pa_scache_play_item(pa_core
*c
, const char *name
, pa_sink
*sink
, const pa_cvolume
*volume
) {
245 assert(c
&& name
&& sink
);
247 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, 1)))
250 if (e
->lazy
&& !e
->memchunk
.memblock
) {
251 if (pa_sound_file_load(e
->filename
, &e
->sample_spec
, &e
->memchunk
, c
->memblock_stat
) < 0)
254 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
257 if (!e
->memchunk
.memblock
)
260 t
= pa_sprintf_malloc("sample:%s", name
);
262 if (pa_play_memchunk(sink
, t
, &e
->sample_spec
, &e
->channel_map
, &e
->memchunk
, pa_sw_cvolume_multiply(&r
, volume
, &e
->volume
)) < 0) {
270 time(&e
->last_used_time
);
275 const char * pa_scache_get_name_by_id(pa_core
*c
, uint32_t id
) {
277 assert(c
&& id
!= PA_IDXSET_INVALID
);
279 if (!c
->scache
|| !(e
= pa_idxset_get_by_index(c
->scache
, id
)))
285 uint32_t pa_scache_get_id_by_name(pa_core
*c
, const char *name
) {
289 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, 0)))
290 return PA_IDXSET_INVALID
;
295 uint32_t pa_scache_total_size(pa_core
*c
) {
297 uint32_t idx
, sum
= 0;
300 if (!c
->scache
|| !pa_idxset_size(c
->scache
))
303 for (e
= pa_idxset_first(c
->scache
, &idx
); e
; e
= pa_idxset_next(c
->scache
, &idx
))
304 if (e
->memchunk
.memblock
)
305 sum
+= e
->memchunk
.length
;
310 void pa_scache_unload_unused(pa_core
*c
) {
316 if (!c
->scache
|| !pa_idxset_size(c
->scache
))
321 for (e
= pa_idxset_first(c
->scache
, &idx
); e
; e
= pa_idxset_next(c
->scache
, &idx
)) {
323 if (!e
->lazy
|| !e
->memchunk
.memblock
)
326 if (e
->last_used_time
+ c
->scache_idle_time
> now
)
329 pa_memblock_unref(e
->memchunk
.memblock
);
330 e
->memchunk
.memblock
= NULL
;
331 e
->memchunk
.index
= e
->memchunk
.length
= 0;
333 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
337 static void add_file(pa_core
*c
, const char *pathname
) {
341 e
= pa_path_get_filename(pathname
);
343 if (stat(pathname
, &st
) < 0) {
344 pa_log(__FILE__
": stat('%s') failed: %s", pathname
, strerror(errno
));
348 #if defined(S_ISREG) && defined(S_ISLNK)
349 if (S_ISREG(st
.st_mode
) || S_ISLNK(st
.st_mode
))
351 pa_scache_add_file_lazy(c
, e
, pathname
, NULL
);
354 int pa_scache_add_directory_lazy(pa_core
*c
, const char *pathname
) {
356 assert(c
&& pathname
);
358 /* First try to open this as directory */
359 if (!(dir
= opendir(pathname
))) {
363 /* If that fails, try to open it as shell glob */
365 if (glob(pathname
, GLOB_ERR
|GLOB_NOSORT
, NULL
, &p
) < 0) {
366 pa_log(__FILE__
": Failed to open directory: %s", strerror(errno
));
370 for (i
= 0; i
< p
.gl_pathc
; i
++)
371 add_file(c
, p
.gl_pathv
[i
]);
380 while ((e
= readdir(dir
))) {
383 if (e
->d_name
[0] == '.')
386 snprintf(p
, sizeof(p
), "%s/%s", pathname
, e
->d_name
);