LUMIERA.clone/src/common/plugin-dynlib.c

/*
  PluginDynlib  -  Lumiera Plugin loader for dynamic libraries

  Copyright (C)         Lumiera.org
    2008,               Christian Thaeter <ct@pipapo.org>

  This program is free software; you can redistribute it and/or
  modify it under the terms of the GNU General Public License as
  published by the Free Software Foundation; either version 2 of
  the License, or (at your option) any later version.

  This program is distributed in the hope that it will be useful,
  but WITHOUT ANY WARRANTY; without even the implied warranty of
  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  GNU General Public License for more details.

  You should have received a copy of the GNU General Public License
  along with this program; if not, write to the Free Software
  Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

* *****************************************************/


/** @file plugin-dynlib.c
 ** Implementation of plugin loader for dynamic libraries.
 */

#include "include/logging.h"
#include "lib/tmpbuf.h"
#include "common/plugin.h"

#include <dlfcn.h>
#include <nobug.h>


LumieraPlugin
lumiera_plugin_load_DYNLIB (const char* name)
{
  TRACE (pluginloader_dbg, "load DYNLIB: %s", name);
  REQUIRE (name);
  LumieraPlugin self = lumiera_plugin_new (name);
  LumieraInterface plugin = NULL;

  void* handle = dlopen (name, RTLD_LAZY|RTLD_LOCAL);
  if (handle)
    {
      plugin = (LumieraInterface) dlsym (handle, LUMIERA_INTERFACE_DSTRING (lumieraorg__plugin, 0, lumieraorg_plugin));

      if (!plugin)
        LUMIERA_ERROR_SET (pluginloader, PLUGIN_WTF, name);
    }
  else
    LUMIERA_ERROR_SET (pluginloader_dbg, PLUGIN_OPEN, lumiera_tmpbuf_snprintf (4096, "%s: %s", name, dlerror()));

  return lumiera_plugin_init (self, handle, plugin);
}


void
lumiera_plugin_unload_DYNLIB (LumieraPlugin self)
{
  TRACE (pluginloader_dbg);
  void* handle = lumiera_plugin_handle (self);
  if (handle)
    dlclose (handle);
    ///////////////////////////////////////////////////////////////////TICKET #1034 : on Debian the process dies when unloading gtk_gui.lum (_dl_close: Assertion `map->l_init_called' failed!)
}