2 This file is part of PulseAudio.
4 Copyright 2004-2008 Lennart Poettering
5 Copyright 2006 Pierre Ossman <ossman@cendio.se> for Cendio AB
7 PulseAudio is free software; you can redistribute it and/or modify
8 it under the terms of the GNU Lesser General Public License as published
9 by the Free Software Foundation; either version 2 of the License,
10 or (at your option) any later version.
12 PulseAudio is distributed in the hope that it will be useful, but
13 WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
15 General Public License for more details.
17 You should have received a copy of the GNU Lesser General Public License
18 along with PulseAudio; if not, write to the Free Software
19 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
30 #include <sys/types.h>
44 #include <pulse/mainloop.h>
45 #include <pulse/channelmap.h>
46 #include <pulse/timeval.h>
47 #include <pulse/util.h>
48 #include <pulse/volume.h>
49 #include <pulse/xmalloc.h>
51 #include <pulsecore/sink-input.h>
52 #include <pulsecore/sample-util.h>
53 #include <pulsecore/play-memchunk.h>
54 #include <pulsecore/core-subscribe.h>
55 #include <pulsecore/namereg.h>
56 #include <pulsecore/sound-file.h>
57 #include <pulsecore/core-util.h>
58 #include <pulsecore/log.h>
59 #include <pulsecore/core-error.h>
60 #include <pulsecore/macro.h>
62 #include "core-scache.h"
64 #define UNLOAD_POLL_TIME 60
66 static void timeout_callback(pa_mainloop_api
*m
, pa_time_event
*e
, const struct timeval
*tv
, void *userdata
) {
67 pa_core
*c
= userdata
;
71 pa_assert(c
->mainloop
== m
);
72 pa_assert(c
->scache_auto_unload_event
== e
);
74 pa_scache_unload_unused(c
);
76 pa_gettimeofday(&ntv
);
77 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
78 m
->time_restart(e
, &ntv
);
81 static void free_entry(pa_scache_entry
*e
) {
84 pa_namereg_unregister(e
->core
, e
->name
);
85 pa_subscription_post(e
->core
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_REMOVE
, e
->index
);
87 pa_xfree(e
->filename
);
88 if (e
->memchunk
.memblock
)
89 pa_memblock_unref(e
->memchunk
.memblock
);
91 pa_proplist_free(e
->proplist
);
95 static pa_scache_entry
* scache_add_item(pa_core
*c
, const char *name
) {
101 if ((e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, FALSE
))) {
102 if (e
->memchunk
.memblock
)
103 pa_memblock_unref(e
->memchunk
.memblock
);
105 pa_xfree(e
->filename
);
106 pa_proplist_clear(e
->proplist
);
108 pa_assert(e
->core
== c
);
110 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
112 e
= pa_xnew(pa_scache_entry
, 1);
114 if (!pa_namereg_register(c
, name
, PA_NAMEREG_SAMPLE
, e
, TRUE
)) {
119 e
->name
= pa_xstrdup(name
);
121 e
->proplist
= pa_proplist_new();
124 c
->scache
= pa_idxset_new(pa_idxset_trivial_hash_func
, pa_idxset_trivial_compare_func
);
126 pa_idxset_put(c
->scache
, e
, &e
->index
);
128 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_NEW
, e
->index
);
131 e
->last_used_time
= 0;
132 pa_memchunk_reset(&e
->memchunk
);
135 e
->last_used_time
= 0;
137 pa_sample_spec_init(&e
->sample_spec
);
138 pa_channel_map_init(&e
->channel_map
);
139 pa_cvolume_init(&e
->volume
);
141 pa_proplist_sets(e
->proplist
, PA_PROP_MEDIA_ROLE
, "event");
146 int pa_scache_add_item(
149 const pa_sample_spec
*ss
,
150 const pa_channel_map
*map
,
151 const pa_memchunk
*chunk
,
156 char st
[PA_SAMPLE_SPEC_SNPRINT_MAX
];
161 pa_assert(!ss
|| pa_sample_spec_valid(ss
));
162 pa_assert(!map
|| (pa_channel_map_valid(map
) && ss
&& pa_channel_map_compatible(map
, ss
)));
165 pa_channel_map_init_extend(&tmap
, ss
->channels
, PA_CHANNEL_MAP_DEFAULT
);
169 if (chunk
&& chunk
->length
> PA_SCACHE_ENTRY_SIZE_MAX
)
172 if (!(e
= scache_add_item(c
, name
)))
175 pa_sample_spec_init(&e
->sample_spec
);
176 pa_channel_map_init(&e
->channel_map
);
177 pa_cvolume_init(&e
->volume
);
180 e
->sample_spec
= *ss
;
181 pa_cvolume_reset(&e
->volume
, ss
->channels
);
185 e
->channel_map
= *map
;
188 e
->memchunk
= *chunk
;
189 pa_memblock_ref(e
->memchunk
.memblock
);
193 pa_proplist_update(e
->proplist
, PA_UPDATE_REPLACE
, p
);
198 pa_log_debug("Created sample \"%s\" (#%d), %lu bytes with sample spec %s",
199 name
, e
->index
, (unsigned long) e
->memchunk
.length
,
200 pa_sample_spec_snprint(st
, sizeof(st
), &e
->sample_spec
));
205 int pa_scache_add_file(pa_core
*c
, const char *name
, const char *filename
, uint32_t *idx
) {
215 if (ExpandEnvironmentStrings(filename
, buf
, MAX_PATH
))
223 if (pa_sound_file_load(c
->mempool
, filename
, &ss
, &map
, &chunk
) < 0)
226 p
= pa_proplist_new();
227 pa_proplist_sets(p
, PA_PROP_MEDIA_FILENAME
, filename
);
228 r
= pa_scache_add_item(c
, name
, &ss
, &map
, &chunk
, p
, idx
);
229 pa_memblock_unref(chunk
.memblock
);
235 int pa_scache_add_file_lazy(pa_core
*c
, const char *name
, const char *filename
, uint32_t *idx
) {
241 if (ExpandEnvironmentStrings(filename
, buf
, MAX_PATH
))
249 if (!(e
= scache_add_item(c
, name
)))
253 e
->filename
= pa_xstrdup(filename
);
255 pa_proplist_sets(e
->proplist
, PA_PROP_MEDIA_FILENAME
, filename
);
257 if (!c
->scache_auto_unload_event
) {
259 pa_gettimeofday(&ntv
);
260 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
261 c
->scache_auto_unload_event
= c
->mainloop
->time_new(c
->mainloop
, &ntv
, timeout_callback
, c
);
270 int pa_scache_remove_item(pa_core
*c
, const char *name
) {
276 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, 0)))
279 pa_assert_se(pa_idxset_remove_by_data(c
->scache
, e
, NULL
) == e
);
281 pa_log_debug("Removed sample \"%s\"", name
);
288 static void free_cb(void *p
, void *userdata
) {
289 pa_scache_entry
*e
= p
;
295 void pa_scache_free(pa_core
*c
) {
299 pa_idxset_free(c
->scache
, free_cb
, NULL
);
303 if (c
->scache_auto_unload_event
)
304 c
->mainloop
->time_free(c
->scache_auto_unload_event
);
307 int pa_scache_play_item(pa_core
*c
, const char *name
, pa_sink
*sink
, pa_volume_t volume
, pa_proplist
*p
, uint32_t *sink_input_idx
) {
316 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, FALSE
)))
319 if (e
->lazy
&& !e
->memchunk
.memblock
) {
320 pa_channel_map old_channel_map
= e
->channel_map
;
322 if (pa_sound_file_load(c
->mempool
, e
->filename
, &e
->sample_spec
, &e
->channel_map
, &e
->memchunk
) < 0)
325 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
327 if (pa_cvolume_valid(&e
->volume
))
328 pa_cvolume_remap(&e
->volume
, &old_channel_map
, &e
->channel_map
);
330 pa_cvolume_reset(&e
->volume
, e
->sample_spec
.channels
);
333 if (!e
->memchunk
.memblock
)
336 pa_log_debug("Playing sample \"%s\" on \"%s\"", name
, sink
->name
);
338 pa_cvolume_set(&r
, e
->volume
.channels
, volume
);
339 pa_sw_cvolume_multiply(&r
, &r
, &e
->volume
);
341 merged
= pa_proplist_new();
343 pa_proplist_setf(merged
, PA_PROP_MEDIA_NAME
, "Sample %s", name
);
345 pa_proplist_update(merged
, PA_UPDATE_REPLACE
, e
->proplist
);
348 pa_proplist_update(merged
, PA_UPDATE_REPLACE
, p
);
350 if (pa_play_memchunk(sink
, &e
->sample_spec
, &e
->channel_map
, &e
->memchunk
, &r
, merged
, sink_input_idx
) < 0) {
351 pa_proplist_free(merged
);
355 pa_proplist_free(merged
);
358 time(&e
->last_used_time
);
363 int pa_scache_play_item_by_name(pa_core
*c
, const char *name
, const char*sink_name
, pa_bool_t autoload
, pa_volume_t volume
, pa_proplist
*p
, uint32_t *sink_input_idx
) {
369 if (!(sink
= pa_namereg_get(c
, sink_name
, PA_NAMEREG_SINK
, autoload
)))
372 return pa_scache_play_item(c
, name
, sink
, volume
, p
, sink_input_idx
);
375 const char *pa_scache_get_name_by_id(pa_core
*c
, uint32_t id
) {
379 pa_assert(id
!= PA_IDXSET_INVALID
);
381 if (!c
->scache
|| !(e
= pa_idxset_get_by_index(c
->scache
, id
)))
387 uint32_t pa_scache_get_id_by_name(pa_core
*c
, const char *name
) {
393 if (!(e
= pa_namereg_get(c
, name
, PA_NAMEREG_SAMPLE
, FALSE
)))
394 return PA_IDXSET_INVALID
;
399 size_t pa_scache_total_size(pa_core
*c
) {
406 if (!c
->scache
|| !pa_idxset_size(c
->scache
))
409 for (e
= pa_idxset_first(c
->scache
, &idx
); e
; e
= pa_idxset_next(c
->scache
, &idx
))
410 if (e
->memchunk
.memblock
)
411 sum
+= e
->memchunk
.length
;
416 void pa_scache_unload_unused(pa_core
*c
) {
423 if (!c
->scache
|| !pa_idxset_size(c
->scache
))
428 for (e
= pa_idxset_first(c
->scache
, &idx
); e
; e
= pa_idxset_next(c
->scache
, &idx
)) {
430 if (!e
->lazy
|| !e
->memchunk
.memblock
)
433 if (e
->last_used_time
+ c
->scache_idle_time
> now
)
436 pa_memblock_unref(e
->memchunk
.memblock
);
437 pa_memchunk_reset(&e
->memchunk
);
439 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_SAMPLE_CACHE
|PA_SUBSCRIPTION_EVENT_CHANGE
, e
->index
);
443 static void add_file(pa_core
*c
, const char *pathname
) {
447 pa_core_assert_ref(c
);
450 e
= pa_path_get_filename(pathname
);
452 if (stat(pathname
, &st
) < 0) {
453 pa_log("stat('%s'): %s", pathname
, pa_cstrerror(errno
));
457 #if defined(S_ISREG) && defined(S_ISLNK)
458 if (S_ISREG(st
.st_mode
) || S_ISLNK(st
.st_mode
))
460 pa_scache_add_file_lazy(c
, e
, pathname
, NULL
);
463 int pa_scache_add_directory_lazy(pa_core
*c
, const char *pathname
) {
466 pa_core_assert_ref(c
);
469 /* First try to open this as directory */
470 if (!(dir
= opendir(pathname
))) {
474 /* If that fails, try to open it as shell glob */
476 if (glob(pathname
, GLOB_ERR
|GLOB_NOSORT
, NULL
, &p
) < 0) {
477 pa_log("failed to open directory '%s': %s", pathname
, pa_cstrerror(errno
));
481 for (i
= 0; i
< p
.gl_pathc
; i
++)
482 add_file(c
, p
.gl_pathv
[i
]);
491 while ((e
= readdir(dir
))) {
494 if (e
->d_name
[0] == '.')
497 pa_snprintf(p
, sizeof(p
), "%s/%s", pathname
, e
->d_name
);