2 This file is part of PulseAudio.
4 Copyright 2004-2006 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
34 #include <pulse/timeval.h>
35 #include <pulse/xmalloc.h>
37 #include <pulsecore/core-subscribe.h>
38 #include <pulsecore/log.h>
39 #include <pulsecore/core-util.h>
40 #include <pulsecore/macro.h>
41 #include <pulsecore/ltdl-helper.h>
45 #define PA_SYMBOL_INIT "pa__init"
46 #define PA_SYMBOL_DONE "pa__done"
47 #define PA_SYMBOL_LOAD_ONCE "pa__load_once"
49 #define UNLOAD_POLL_TIME 2
51 static void timeout_callback(pa_mainloop_api
*m
, pa_time_event
*e
, const struct timeval
*tv
, void *userdata
) {
52 pa_core
*c
= PA_CORE(userdata
);
55 pa_core_assert_ref(c
);
56 pa_assert(c
->mainloop
== m
);
57 pa_assert(c
->module_auto_unload_event
== e
);
59 pa_module_unload_unused(c
);
61 pa_gettimeofday(&ntv
);
62 pa_timeval_add(&ntv
, UNLOAD_POLL_TIME
*PA_USEC_PER_SEC
);
63 m
->time_restart(e
, &ntv
);
66 pa_module
* pa_module_load(pa_core
*c
, const char *name
, const char *argument
) {
68 pa_bool_t (*load_once
)(void);
73 if (c
->disallow_module_loading
)
76 m
= pa_xnew(pa_module
, 1);
77 m
->name
= pa_xstrdup(name
);
78 m
->argument
= pa_xstrdup(argument
);
81 if (!(m
->dl
= lt_dlopenext(name
))) {
82 pa_log("Failed to open module \"%s\": %s", name
, lt_dlerror());
86 if ((load_once
= (pa_bool_t (*)(void)) pa_load_sym(m
->dl
, name
, PA_SYMBOL_LOAD_ONCE
))) {
88 m
->load_once
= load_once();
90 if (m
->load_once
&& c
->modules
) {
93 /* OK, the module only wants to be loaded once, let's make sure it is */
95 for (i
= pa_idxset_first(c
->modules
, &idx
); i
; i
= pa_idxset_next(c
->modules
, &idx
)) {
96 if (strcmp(name
, i
->name
) == 0) {
97 pa_log("Module \"%s\" should be loaded once at most. Refusing to load.", name
);
104 if (!(m
->init
= (int (*)(pa_module
*_m
)) pa_load_sym(m
->dl
, name
, PA_SYMBOL_INIT
))) {
105 pa_log("Failed to load module \"%s\": symbol \""PA_SYMBOL_INIT
"\" not found.", name
);
109 m
->done
= (void (*)(pa_module
*_m
)) pa_load_sym(m
->dl
, name
, PA_SYMBOL_DONE
);
113 m
->auto_unload
= FALSE
;
114 m
->unload_requested
= FALSE
;
116 if (m
->init(m
) < 0) {
117 pa_log_error("Failed to load module \"%s\" (argument: \"%s\"): initialization failed.", name
, argument
? argument
: "");
122 c
->modules
= pa_idxset_new(NULL
, NULL
);
124 if (m
->auto_unload
&& !c
->module_auto_unload_event
) {
126 pa_gettimeofday(&ntv
);
127 pa_timeval_add(&ntv
, UNLOAD_POLL_TIME
*PA_USEC_PER_SEC
);
128 c
->module_auto_unload_event
= c
->mainloop
->time_new(c
->mainloop
, &ntv
, timeout_callback
, c
);
131 pa_assert_se(pa_idxset_put(c
->modules
, m
, &m
->index
) >= 0);
132 pa_assert(m
->index
!= PA_IDXSET_INVALID
);
134 pa_log_info("Loaded \"%s\" (index: #%u; argument: \"%s\").", m
->name
, m
->index
, m
->argument
? m
->argument
: "");
136 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_NEW
, m
->index
);
143 pa_xfree(m
->argument
);
155 static void pa_module_free(pa_module
*m
) {
159 pa_log_info("Unloading \"%s\" (index: #%u).", m
->name
, m
->index
);
166 pa_log_info("Unloaded \"%s\" (index: #%u).", m
->name
, m
->index
);
168 pa_subscription_post(m
->core
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_REMOVE
, m
->index
);
171 pa_xfree(m
->argument
);
175 void pa_module_unload(pa_core
*c
, pa_module
*m
, pa_bool_t force
) {
179 if (m
->core
->disallow_module_loading
&& !force
)
182 if (!(m
= pa_idxset_remove_by_data(c
->modules
, m
, NULL
)))
188 void pa_module_unload_by_index(pa_core
*c
, uint32_t idx
, pa_bool_t force
) {
191 pa_assert(idx
!= PA_IDXSET_INVALID
);
193 if (c
->disallow_module_loading
&& !force
)
196 if (!(m
= pa_idxset_remove_by_index(c
->modules
, idx
)))
202 void pa_module_unload_all(pa_core
*c
) {
208 while ((m
= pa_idxset_steal_first(c
->modules
, NULL
)))
211 pa_idxset_free(c
->modules
, NULL
, NULL
);
215 if (c
->module_auto_unload_event
) {
216 c
->mainloop
->time_free(c
->module_auto_unload_event
);
217 c
->module_auto_unload_event
= NULL
;
220 if (c
->module_defer_unload_event
) {
221 c
->mainloop
->defer_free(c
->module_defer_unload_event
);
222 c
->module_defer_unload_event
= NULL
;
226 void pa_module_unload_unused(pa_core
*c
) {
238 while ((m
= pa_idxset_iterate(c
->modules
, &state
, NULL
))) {
246 if (m
->last_used_time
+ m
->core
->module_idle_time
> now
)
249 pa_module_unload(c
, m
, FALSE
);
253 static void defer_cb(pa_mainloop_api
*api
, pa_defer_event
*e
, void *userdata
) {
255 pa_core
*c
= PA_CORE(userdata
);
258 pa_core_assert_ref(c
);
259 api
->defer_enable(e
, 0);
264 while ((m
= pa_idxset_iterate(c
->modules
, &state
, NULL
)))
265 if (m
->unload_requested
)
266 pa_module_unload(c
, m
, TRUE
);
269 void pa_module_unload_request(pa_module
*m
, pa_bool_t force
) {
272 if (m
->core
->disallow_module_loading
&& !force
)
275 m
->unload_requested
= TRUE
;
277 if (!m
->core
->module_defer_unload_event
)
278 m
->core
->module_defer_unload_event
= m
->core
->mainloop
->defer_new(m
->core
->mainloop
, defer_cb
, m
->core
);
280 m
->core
->mainloop
->defer_enable(m
->core
->module_defer_unload_event
, 1);
283 void pa_module_set_used(pa_module
*m
, int used
) {
286 if (m
->n_used
!= used
)
287 pa_subscription_post(m
->core
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_CHANGE
, m
->index
);
289 if (used
== 0 && m
->n_used
> 0)
290 time(&m
->last_used_time
);
295 pa_modinfo
*pa_module_get_info(pa_module
*m
) {
298 return pa_modinfo_get_by_handle(m
->dl
, m
->name
);