code.delx.au - pulseaudio/blob - src/pulsecore/ltdl-helper.c

   1 /***
   2   This file is part of PulseAudio.
   3
   4   Copyright 2004-2006 Lennart Poettering
   5   Copyright 2006 Pierre Ossman <ossman@cendio.se> for Cendio AB
   6
   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.
  11
  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.
  16
  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
  20   USA.
  21 ***/
  22
  23 #ifdef HAVE_CONFIG_H
  24 #include <config.h>
  25 #endif
  26
  27 #include <stdlib.h>
  28 #include <ctype.h>
  29
  30 #include <pulse/xmalloc.h>
  31 #include <pulse/util.h>
  32
  33 #include <pulsecore/core-util.h>
  34 #include <pulsecore/macro.h>
  35
  36 #include "ltdl-helper.h"
  37
  38 pa_void_func_t pa_load_sym(lt_dlhandle handle, const char *module, const char *symbol) {
  39     char *sn, *c;
  40     pa_void_func_t f;
  41
  42     pa_assert(handle);
  43     pa_assert(symbol);
  44
  45     if ((f = ((pa_void_func_t) (size_t) lt_dlsym(handle, symbol))))
  46         return f;
  47
  48     if (!module)
  49         return NULL;
  50
  51     /* As the .la files might have been cleansed from the system, we should
  52      * try with the ltdl prefix as well. */
  53
  54     sn = pa_sprintf_malloc("%s_LTX_%s", module, symbol);
  55
  56     for (c = sn; *c; c++)
  57         if (!isalnum(*c))
  58             *c = '_';
  59
  60     f = (pa_void_func_t) (size_t) lt_dlsym(handle, sn);
  61     pa_xfree(sn);
  62
  63     return f;
  64 }