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

   1 /* $Id$ */
   2
   3 /***
   4   This file is part of PulseAudio.
   5
   6   Copyright 2004-2006 Lennart Poettering
   7   Copyright 2006 Pierre Ossman <ossman@cendio.se> for Cendio AB
   8
   9   PulseAudio is free software; you can redistribute it and/or modify
  10   it under the terms of the GNU Lesser General Public License as published
  11   by the Free Software Foundation; either version 2 of the License,
  12   or (at your option) any later version.
  13
  14   PulseAudio is distributed in the hope that it will be useful, but
  15   WITHOUT ANY WARRANTY; without even the implied warranty of
  16   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
  17   General Public License for more details.
  18
  19   You should have received a copy of the GNU Lesser General Public License
  20   along with PulseAudio; if not, write to the Free Software
  21   Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
  22   USA.
  23 ***/
  24
  25 #ifdef HAVE_CONFIG_H
  26 #include <config.h>
  27 #endif
  28
  29 #include <stdlib.h>
  30 #include <ctype.h>
  31
  32 #include <pulse/xmalloc.h>
  33 #include <pulse/util.h>
  34
  35 #include <pulsecore/core-util.h>
  36 #include <pulsecore/macro.h>
  37
  38 #include "ltdl-helper.h"
  39
  40 pa_void_func_t pa_load_sym(lt_dlhandle handle, const char *module, const char *symbol) {
  41     char *sn, *c;
  42     pa_void_func_t f;
  43
  44     pa_assert(handle);
  45     pa_assert(module);
  46     pa_assert(symbol);
  47
  48     if ((f = ((pa_void_func_t) (long) lt_dlsym(handle, symbol))))
  49         return f;
  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) (long) lt_dlsym(handle, sn);
  61     pa_xfree(sn);
  62
  63     return f;
  64 }