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
39 #include <pulse/i18n.h>
41 #include <pulsecore/macro.h>
42 #include <pulsecore/mutex.h>
43 #include <pulsecore/thread.h>
44 #include <pulsecore/log.h>
46 #include "ltdl-bind-now.h"
49 #define PA_BIND_NOW RTLD_NOW
51 #define PA_BIND_NOW DL_NOW
56 #ifdef HAVE_LT_DLMUTEX_REGISTER
58 static pa_mutex
*libtool_mutex
= NULL
;
60 PA_STATIC_TLS_DECLARE_NO_FREE(libtool_tls
);
62 static void libtool_lock(void) {
63 pa_mutex_lock(libtool_mutex
);
66 static void libtool_unlock(void) {
67 pa_mutex_unlock(libtool_mutex
);
70 static void libtool_set_error(const char *error
) {
71 PA_STATIC_TLS_SET(libtool_tls
, (char*) error
);
74 static const char *libtool_get_error(void) {
75 return PA_STATIC_TLS_GET(libtool_tls
);
83 To avoid lazy relocations during runtime in our RT threads we add
84 our own shared object loader with uses RTLD_NOW if it is
85 available. The standard ltdl loader prefers RTLD_LAZY.
87 Please note that this loader doesn't have any influence on
88 relocations on any libraries that are already loaded into our
89 process, i.e. because the pulseaudio binary links directly to
90 them. To disable lazy relocations for those libraries it is possible
91 to set $LT_BIND_NOW before starting the pulsaudio binary.
94 #ifndef HAVE_LT_DLADVISE
95 static lt_module
bind_now_open(lt_user_data d
, const char *fname
)
97 static lt_module
bind_now_open(lt_user_data d
, const char *fname
, lt_dladvise advise
)
104 if (!(m
= dlopen(fname
, PA_BIND_NOW
))) {
105 libtool_set_error(dlerror());
112 static int bind_now_close(lt_user_data d
, lt_module m
) {
116 if (dlclose(m
) != 0){
117 libtool_set_error(dlerror());
124 static lt_ptr
bind_now_find_sym(lt_user_data d
, lt_module m
, const char *symbol
) {
130 if (!(ptr
= dlsym(m
, symbol
))) {
131 libtool_set_error(dlerror());
140 void pa_ltdl_init(void) {
143 # ifdef HAVE_STRUCT_LT_USER_DLLOADER
145 static const struct lt_user_dlloader loader
= {
146 .module_open
= bind_now_open
,
147 .module_close
= bind_now_close
,
148 .find_sym
= bind_now_find_sym
151 static const lt_dlvtable
*dlopen_loader
;
152 static lt_dlvtable bindnow_loader
;
156 pa_assert_se(lt_dlinit() == 0);
158 #ifdef HAVE_LT_DLMUTEX_REGISTER
159 pa_assert_se(libtool_mutex
= pa_mutex_new(TRUE
, FALSE
));
160 pa_assert_se(lt_dlmutex_register(libtool_lock
, libtool_unlock
, libtool_set_error
, libtool_get_error
) == 0);
164 # ifdef HAVE_STRUCT_LT_USER_DLLOADER
166 if (!(place
= lt_dlloader_find("dlopen")))
167 place
= lt_dlloader_next(NULL
);
169 /* Add our BIND_NOW loader as the default module loader. */
170 if (lt_dlloader_add(place
, &loader
, "bind-now-loader") != 0)
171 pa_log_warn(_("Failed to add bind-now-loader."));
173 /* Already initialised */
177 if (!(dlopen_loader
= lt_dlloader_find("dlopen"))) {
178 pa_log_warn(_("Failed to find original dlopen loader."));
182 memcpy(&bindnow_loader
, dlopen_loader
, sizeof(bindnow_loader
));
183 bindnow_loader
.name
= "bind-now-loader";
184 bindnow_loader
.module_open
= bind_now_open
;
185 bindnow_loader
.module_close
= bind_now_close
;
186 bindnow_loader
.find_sym
= bind_now_find_sym
;
187 bindnow_loader
.priority
= LT_DLLOADER_PREPEND
;
189 /* Add our BIND_NOW loader as the default module loader. */
190 if (lt_dlloader_add(&bindnow_loader
) != 0)
191 pa_log_warn(_("Failed to add bind-now-loader."));
196 void pa_ltdl_done(void) {
197 pa_assert_se(lt_dlexit() == 0);
199 #ifdef HAVE_LT_DLMUTEX_REGISTER
200 pa_mutex_free(libtool_mutex
);
201 libtool_mutex
= NULL
;