1 /* === S Y N F I G ========================================================= */
5 ** $Id: module.cpp,v 1.1.1.1 2005/01/04 01:23:14 darco Exp $
8 ** Copyright (c) 2002-2005 Robert B. Quattlebaum Jr., Adrian Bentley
10 ** This package is free software; you can redistribute it and/or
11 ** modify it under the terms of the GNU General Public License as
12 ** published by the Free Software Foundation; either version 2 of
13 ** the License, or (at your option) any later version.
15 ** This package is distributed in the hope that it will be useful,
16 ** but WITHOUT ANY WARRANTY; without even the implied warranty of
17 ** MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
18 ** General Public License for more details.
21 /* ========================================================================= */
23 /* === H E A D E R S ======================================================= */
25 #define SYNFIG_NO_ANGLE
37 #include <ETL/stringf>
40 /* === M A C R O S ========================================================= */
42 /* === G L O B A L S ======================================================= */
46 using namespace synfig;
48 Module::Book *synfig::Module::book_;
50 /* === P R O C E D U R E S ================================================= */
53 Module::subsys_init(const String &prefix)
55 #ifndef SYNFIG_LTDL_NO_STATIC
56 //LTDL_SET_PRELOADED_SYMBOLS();
61 error(_("Errors on lt_dlinit()"));
66 lt_dladdsearchdir(".");
67 lt_dladdsearchdir("~/.synfig/modules");
68 lt_dladdsearchdir((prefix+"/lib/synfig/modules").c_str());
70 lt_dladdsearchdir(LIBDIR"/synfig/modules");
73 lt_dladdsearchdir("/Library/Frameworks/synfig.framework/Resources/modules");
75 lt_dladdsearchdir("/usr/local/lib/synfig/modules");
76 lt_dladdsearchdir(".");
92 register_default_modules()
104 synfig::Module::Register(Module::Handle mod)
106 book()[mod->Name()]=mod;
110 synfig::Module::Register(const String &module_name, ProgressCallback *callback)
114 if(callback)callback->task(strprintf(_("Attempting to register \"%s\""),module_name.c_str()));
116 module=lt_dlopenext((string("lib")+module_name).c_str());
117 if(!module)module=lt_dlopenext(module_name.c_str());
121 if(callback)callback->error(strprintf(_("Unable to find module \"%s\" (%s)"),module_name.c_str(),lt_dlerror()));
125 if(callback)callback->task(strprintf(_("Found module \"%s\""),module_name.c_str()));
127 Module::constructor_type constructor=NULL;
132 // if(callback)callback->task(string("looking for -> ")+module_name+"_LTX_new_instance()");
133 constructor=(Module::constructor_type )lt_dlsym(module,(module_name+"_LTX_new_instance").c_str());
138 // if(callback)callback->task(string("looking for -> lib")+module_name+"_LTX_new_instance()");
139 constructor=(Module::constructor_type )lt_dlsym(module,(string("lib")+module_name+"_LTX_new_instance").c_str());
143 // if(callback)callback->task(string("looking for -> lib")+module_name+"_LTX_new_instance()");
144 constructor=(Module::constructor_type )lt_dlsym(module,(string("_lib")+module_name+"_LTX_new_instance").c_str());
148 // if(callback)callback->task(string("looking for -> lib")+module_name+"_LTX_new_instance()");
149 constructor=(Module::constructor_type )lt_dlsym(module,(string("_")+module_name+"_LTX_new_instance").c_str());
154 // if(callback)callback->task(strprintf("Executing callback for \"%s\"",module_name.c_str()));
155 mod=handle<Module>((*constructor)(callback));
159 if(callback)callback->error(strprintf(_("Unable to find entrypoint in module \"%s\" (%s)"),module_name.c_str(),lt_dlerror()));
163 // if(callback)callback->task(strprintf("Done executing callback for \"%s\"",module_name.c_str()));
167 // if(callback)callback->task(strprintf("Registering \"%s\"",module_name.c_str()));
172 if(callback)callback->error(_("Entrypoint did not return a module."));
176 if(callback)callback->task(strprintf(_("Success for \"%s\""),module_name.c_str()));