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
33 #include <polyp/timeval.h>
34 #include <polyp/xmalloc.h>
36 #include <polypcore/core-subscribe.h>
37 #include <polypcore/log.h>
38 #include <polypcore/core-util.h>
42 #define PA_SYMBOL_INIT "pa__init"
43 #define PA_SYMBOL_DONE "pa__done"
45 #define UNLOAD_POLL_TIME 2
47 /* lt_dlsym() violates ISO C, so confide the breakage into this function to
49 typedef void (*fnptr
)(void);
50 static inline fnptr
lt_dlsym_fn(lt_dlhandle handle
, const char *symbol
) {
51 return (fnptr
) (long) lt_dlsym(handle
, symbol
);
54 static void timeout_callback(pa_mainloop_api
*m
, pa_time_event
*e
, PA_GCC_UNUSED
const struct timeval
*tv
, void *userdata
) {
55 pa_core
*c
= userdata
;
57 assert(c
&& c
->mainloop
== m
&& c
->module_auto_unload_event
== e
);
59 pa_module_unload_unused(c
);
61 pa_gettimeofday(&ntv
);
62 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
63 m
->time_restart(e
, &ntv
);
66 pa_module
* pa_module_load(pa_core
*c
, const char *name
, const char *argument
) {
72 if (c
->disallow_module_loading
)
75 m
= pa_xmalloc(sizeof(pa_module
));
77 m
->name
= pa_xstrdup(name
);
78 m
->argument
= pa_xstrdup(argument
);
80 if (!(m
->dl
= lt_dlopenext(name
))) {
81 pa_log(__FILE__
": Failed to open module \"%s\": %s", name
, lt_dlerror());
85 if (!(m
->init
= (int (*)(pa_core
*_c
, pa_module
*_m
)) lt_dlsym_fn(m
->dl
, PA_SYMBOL_INIT
))) {
86 pa_log(__FILE__
": Failed to load module \"%s\": symbol \""PA_SYMBOL_INIT
"\" not found.", name
);
90 if (!(m
->done
= (void (*)(pa_core
*_c
, pa_module
*_m
)) lt_dlsym_fn(m
->dl
, PA_SYMBOL_DONE
))) {
91 pa_log(__FILE__
": Failed to load module \"%s\": symbol \""PA_SYMBOL_DONE
"\" not found.", name
);
99 m
->unload_requested
= 0;
102 if (m
->init(c
, m
) < 0) {
103 pa_log_error(__FILE__
": Failed to load module \"%s\" (argument: \"%s\"): initialization failed.", name
, argument
? argument
: "");
108 c
->modules
= pa_idxset_new(NULL
, NULL
);
110 if (!c
->module_auto_unload_event
) {
112 pa_gettimeofday(&ntv
);
113 ntv
.tv_sec
+= UNLOAD_POLL_TIME
;
114 c
->module_auto_unload_event
= c
->mainloop
->time_new(c
->mainloop
, &ntv
, timeout_callback
, c
);
116 assert(c
->module_auto_unload_event
);
119 r
= pa_idxset_put(c
->modules
, m
, &m
->index
);
120 assert(r
>= 0 && m
->index
!= PA_IDXSET_INVALID
);
122 pa_log_info(__FILE__
": Loaded \"%s\" (index: #%u; argument: \"%s\").", m
->name
, m
->index
, m
->argument
? m
->argument
: "");
124 pa_subscription_post(c
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_NEW
, m
->index
);
131 pa_xfree(m
->argument
);
143 static void pa_module_free(pa_module
*m
) {
144 assert(m
&& m
->done
&& m
->core
);
146 if (m
->core
->disallow_module_loading
)
149 pa_log_info(__FILE__
": Unloading \"%s\" (index: #%u).", m
->name
, m
->index
);
155 pa_log_info(__FILE__
": Unloaded \"%s\" (index: #%u).", m
->name
, m
->index
);
157 pa_subscription_post(m
->core
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_REMOVE
, m
->index
);
160 pa_xfree(m
->argument
);
164 void pa_module_unload(pa_core
*c
, pa_module
*m
) {
168 if (!(m
= pa_idxset_remove_by_data(c
->modules
, m
, NULL
)))
174 void pa_module_unload_by_index(pa_core
*c
, uint32_t idx
) {
176 assert(c
&& idx
!= PA_IDXSET_INVALID
);
179 if (!(m
= pa_idxset_remove_by_index(c
->modules
, idx
)))
185 static void free_callback(void *p
, PA_GCC_UNUSED
void *userdata
) {
191 void pa_module_unload_all(pa_core
*c
) {
197 pa_idxset_free(c
->modules
, free_callback
, NULL
);
200 if (c
->module_auto_unload_event
) {
201 c
->mainloop
->time_free(c
->module_auto_unload_event
);
202 c
->module_auto_unload_event
= NULL
;
205 if (c
->module_defer_unload_event
) {
206 c
->mainloop
->defer_free(c
->module_defer_unload_event
);
207 c
->module_defer_unload_event
= NULL
;
211 static int unused_callback(void *p
, PA_GCC_UNUSED
uint32_t idx
, int *del
, void *userdata
) {
213 time_t *now
= userdata
;
214 assert(p
&& del
&& now
);
216 if (m
->n_used
== 0 && m
->auto_unload
&& m
->last_used_time
+m
->core
->module_idle_time
<= *now
) {
224 void pa_module_unload_unused(pa_core
*c
) {
232 pa_idxset_foreach(c
->modules
, unused_callback
, &now
);
235 static int unload_callback(void *p
, PA_GCC_UNUSED
uint32_t idx
, int *del
, PA_GCC_UNUSED
void *userdata
) {
239 if (m
->unload_requested
) {
247 static void defer_cb(pa_mainloop_api
*api
, pa_defer_event
*e
, void *userdata
) {
248 pa_core
*core
= userdata
;
249 api
->defer_enable(e
, 0);
254 pa_idxset_foreach(core
->modules
, unload_callback
, NULL
);
258 void pa_module_unload_request(pa_module
*m
) {
261 m
->unload_requested
= 1;
263 if (!m
->core
->module_defer_unload_event
)
264 m
->core
->module_defer_unload_event
= m
->core
->mainloop
->defer_new(m
->core
->mainloop
, defer_cb
, m
->core
);
266 m
->core
->mainloop
->defer_enable(m
->core
->module_defer_unload_event
, 1);
269 void pa_module_set_used(pa_module
*m
, int used
) {
272 if (m
->n_used
!= used
)
273 pa_subscription_post(m
->core
, PA_SUBSCRIPTION_EVENT_MODULE
|PA_SUBSCRIPTION_EVENT_CHANGE
, m
->index
);
275 if (m
->n_used
!= used
&& used
== 0)
276 time(&m
->last_used_time
);
281 pa_modinfo
*pa_module_get_info(pa_module
*m
) {
284 return pa_modinfo_get_by_handle(m
->dl
);