-/* +------------------------------------+
- * | Inspire Internet Relay Chat Daemon |
- * +------------------------------------+
+/*
+ * InspIRCd -- Internet Relay Chat Daemon
*
- * InspIRCd is copyright (C) 2002-2006 ChatSpike-Dev.
- * E-mail:
- * <brain@chatspike.net>
- * <Craig@chatspike.net>
- *
- * Written by Craig Edwards, Craig McLure, and others.
- * This program is free but copyrighted software; see
- * the file COPYING for details.
+ * Copyright (C) 2020 Matt Schatz <genius3000@g3k.solutions>
+ * Copyright (C) 2017-2020 Sadie Powell <sadie@witchery.services>
+ * Copyright (C) 2014 Attila Molnar <attilamolnar@hush.com>
+ * Copyright (C) 2012 Robby <robby@chatbelgie.be>
+ * Copyright (C) 2012 ChrisTX <xpipe@hotmail.de>
+ * Copyright (C) 2009-2010 Daniel De Graaf <danieldg@inspircd.org>
+ * Copyright (C) 2009 Uli Schlachter <psychon@inspircd.org>
+ * Copyright (C) 2007 Robin Burchell <robin+git@viroteck.net>
+ * Copyright (C) 2007 Dennis Friis <peavey@inspircd.org>
+ * Copyright (C) 2006, 2010 Craig Edwards <brain@inspircd.org>
*
- * ---------------------------------------------------
+ * This file is part of InspIRCd. InspIRCd 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, version 2.
+ *
+ * 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, see <http://www.gnu.org/licenses/>.
*/
-using namespace std;
-#include "inspircd_config.h"
-#include "globals.h"
-#include "dynamic.h"
-
-#ifndef STATIC_LINK
-#include <dlfcn.h>
-#else
-#include "modlist.h"
+#include "inspircd.h"
+#ifndef _WIN32
+# include <dlfcn.h>
#endif
-#include "inspstring.h"
-#include "helperfuncs.h"
-#include <unistd.h>
-#include <sys/types.h>
-#include <stdio.h>
+/** The extension that dynamic libraries end with. */
+#define DLL_EXTENSION ".so"
-DLLManager::DLLManager(char *fname)
+DLLManager::DLLManager(const std::string& name)
+ : lib(NULL)
+ , libname(name)
{
-#ifdef STATIC_LINK
- this->staticname[0] = '\0';
- log(DEBUG,"Loading core-compiled module '%s'",fname);
- for (int j = 0; modsyms[j].name; j++)
+ static size_t extlen = strlen(DLL_EXTENSION);
+ if (name.length() <= extlen || name.compare(name.length() - extlen, name.length(), DLL_EXTENSION))
{
- log(DEBUG,"Check %s",modsyms[j].name);
- if (!strcmp(modsyms[j].name,fname))
- {
- log(DEBUG,"Found %s",fname);
- strlcpy(this->staticname,fname,1020);
- err = 0;
- return;
- }
+ err.assign(name + " is not a module (no " DLL_EXTENSION " extension)");
+ return;
}
- err = "Module is not statically compiled into the ircd";
+
+#ifdef _WIN32
+ lib = LoadLibraryA(name.c_str());
#else
- // Copy the library to a temp location, this makes recompiles
- // a little safer if the ircd is running at the time as the
- // shared libraries are mmap()ed and not doing this causes
- // segfaults.
- FILE* x = fopen(fname,"rb");
- char tmpfile_template[255];
- char buffer[65536];
- snprintf(tmpfile_template, 255, "/tmp/inspircd_file.so.%d.XXXXXXXXXX",getpid());
- int fd = mkstemp(tmpfile_template);
- while (!feof(x))
- {
- int n = fread(buffer, 1, 65535, x);
- if (n)
- write(fd,buffer,n);
- }
-
- // Try to open the library now and get any error message.
-
- h = dlopen(tmpfile_template, RTLD_NOW );
- err = (char*)dlerror();
- close(fd);
+ lib = dlopen(name.c_str(), RTLD_NOW|RTLD_LOCAL);
#endif
+
+ if (!lib)
+ RetrieveLastError();
}
DLLManager::~DLLManager()
{
-#ifndef STATIC_LINK
- // close the library if it isn't null
- if (h != 0)
- dlclose(h);
+ if (!lib)
+ return;
+
+#ifdef _WIN32
+ FreeLibrary(lib);
+#else
+ dlclose(lib);
#endif
}
-
-
-#ifdef STATIC_LINK
-
-bool DLLManager::GetSymbol(initfunc* &v, char *sym_name)
+Module* DLLManager::CallInit()
{
- log(DEBUG,"Symbol search...");
- for (int j = 0; modsyms[j].name; j++)
+ if (!lib)
+ return NULL;
+
+ const unsigned long* abi = GetSymbol<const unsigned long>(MODULE_STR_ABI);
+ if (!abi)
{
- if (!strcmp(this->staticname,modsyms[j].name))
- {
- log(DEBUG,"Loading symbol...");
- v = modsyms[j].value;
- err = 0;
- return true;
- }
+ err.assign(libname + " is not a module (no ABI symbol)");
+ return NULL;
+ }
+ else if (*abi != MODULE_ABI)
+ {
+ const char* version = GetVersion();
+ err.assign(InspIRCd::Format("%s was built against %s (%lu) which is too %s to use with %s (%lu).",
+ libname.c_str(), version ? version : "an unknown version", *abi,
+ *abi < MODULE_ABI ? "old" : "new", INSPIRCD_VERSION, MODULE_ABI));
+ return NULL;
}
- err = "Module symbol missing from the core";
- return false;
-}
-#else
+ union
+ {
+ void* vptr;
+ Module* (*fptr)();
+ };
-bool DLLManager::GetSymbol(void **v, char *sym_name)
-{
- // try extract a symbol from the library
- // get any error message is there is any
-
- if(h != 0)
+ vptr = GetSymbol(MODULE_STR_INIT);
+ if (!vptr)
{
- *v = dlsym( h, sym_name );
- err = (char*)dlerror();
- if( err == 0 )
- return true;
- else
- return false;
+ err.assign(libname + " is not a module (no init symbol)");
+ return NULL;
}
- else
- {
- return false;
- }
-}
-#endif
+ return (*fptr)();
+}
-DLLFactoryBase::DLLFactoryBase(char *fname, char *factory) : DLLManager(fname)
+void* DLLManager::GetSymbol(const char* name) const
{
- // try get the factory function if there is no error yet
-
- factory_func = 0;
-
- if(LastError() == 0)
- {
-#ifdef STATIC_LINK
- GetSymbol( factory_func, factory ? factory : (char*)"init_module" );
+ if (!lib)
+ return NULL;
+
+#if defined _WIN32
+ return GetProcAddress(lib, name);
#else
- GetSymbol( (void **)&factory_func, factory ? factory : (char*)"init_module" );
+ return dlsym(lib, name);
#endif
- }
}
-
-DLLFactoryBase::~DLLFactoryBase()
+void DLLManager::RetrieveLastError()
{
+#if defined _WIN32
+ char errmsg[500];
+ DWORD dwErrorCode = GetLastError();
+ if (FormatMessageA(FORMAT_MESSAGE_FROM_SYSTEM | FORMAT_MESSAGE_IGNORE_INSERTS, NULL, dwErrorCode, MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), (LPSTR)errmsg, _countof(errmsg), NULL) == 0)
+ sprintf_s(errmsg, _countof(errmsg), "Error code: %u", dwErrorCode);
+ SetLastError(ERROR_SUCCESS);
+ err = errmsg;
+#else
+ const char* errmsg = dlerror();
+ err = errmsg ? errmsg : "Unknown error";
+#endif
+
+ std::string::size_type p;
+ while ((p = err.find_last_of("\r\n")) != std::string::npos)
+ err.erase(p, 1);
}