mirror of
https://github.com/signalwire/freeswitch.git
synced 2025-02-12 05:05:51 +00:00
133 lines
3.6 KiB
C
Executable File
133 lines
3.6 KiB
C
Executable File
/*
|
|
* Cross Platform dso/dll load abstraction
|
|
* Copyright(C) 2008 Michael Jerris
|
|
*
|
|
* You may opt to use, copy, modify, merge, publish, distribute and/or sell
|
|
* copies of the Software, and permit persons to whom the Software is
|
|
* furnished to do so.
|
|
*
|
|
* This work is provided under this license on an "as is" basis, without warranty of any kind,
|
|
* either expressed or implied, including, without limitation, warranties that the covered code
|
|
* is free of defects, merchantable, fit for a particular purpose or non-infringing. The entire
|
|
* risk as to the quality and performance of the covered code is with you. Should any covered
|
|
* code prove defective in any respect, you (not the initial developer or any other contributor)
|
|
* assume the cost of any necessary servicing, repair or correction. This disclaimer of warranty
|
|
* constitutes an essential part of this license. No use of any covered code is authorized hereunder
|
|
* except under this disclaimer.
|
|
*
|
|
*/
|
|
|
|
#include "ks.h"
|
|
|
|
#ifdef WIN32
|
|
#include <windows.h>
|
|
#include <stdio.h>
|
|
|
|
KS_DECLARE(ks_status_t) ks_dso_destroy(ks_dso_lib_t *lib) {
|
|
if (lib && *lib) {
|
|
FreeLibrary(*lib);
|
|
*lib = NULL;
|
|
}
|
|
return KS_STATUS_SUCCESS;
|
|
}
|
|
|
|
KS_DECLARE(ks_dso_lib_t) ks_dso_open(const char *path, char **err) {
|
|
HINSTANCE lib;
|
|
#ifdef UNICODE
|
|
size_t len = strlen(path) + 1;
|
|
wchar_t *wpath = malloc(len);
|
|
|
|
size_t converted;
|
|
mbstowcs_s(&converted, wpath, len, path, _TRUNCATE);
|
|
#else
|
|
char * wpath = path;
|
|
#endif
|
|
lib = LoadLibraryEx(wpath, NULL, 0);
|
|
|
|
if (!lib) {
|
|
LoadLibraryEx(wpath, NULL, LOAD_WITH_ALTERED_SEARCH_PATH);
|
|
}
|
|
|
|
if (!lib) {
|
|
DWORD error = GetLastError();
|
|
char tmp[80];
|
|
sprintf(tmp, "dll open error [%lu]\n", error);
|
|
*err = strdup(tmp);
|
|
}
|
|
|
|
#ifdef UNICODE
|
|
free(wpath);
|
|
#endif
|
|
return lib;
|
|
}
|
|
|
|
KS_DECLARE(void*) ks_dso_func_sym(ks_dso_lib_t lib, const char *sym, char **err) {
|
|
FARPROC func = GetProcAddress(lib, sym);
|
|
if (!func) {
|
|
DWORD error = GetLastError();
|
|
char tmp[80];
|
|
sprintf(tmp, "dll sym error [%lu]\n", error);
|
|
*err = strdup(tmp);
|
|
}
|
|
return (void *)(intptr_t)func; // this should really be addr - ks_dso_func_data
|
|
}
|
|
|
|
#else
|
|
|
|
/*
|
|
** {========================================================================
|
|
** This is an implementation of loadlib based on the dlfcn interface.
|
|
** The dlfcn interface is available in Linux, SunOS, Solaris, IRIX, FreeBSD,
|
|
** NetBSD, AIX 4.2, HPUX 11, and probably most other Unix flavors, at least
|
|
** as an emulation layer on top of native functions.
|
|
** =========================================================================
|
|
*/
|
|
|
|
#include <dlfcn.h>
|
|
|
|
KS_DECLARE(ks_status_t) ks_dso_destroy(ks_dso_lib_t *lib) {
|
|
int rc;
|
|
if (lib && *lib) {
|
|
rc = dlclose(*lib);
|
|
if (rc) {
|
|
//ks_log(KS_LOG_ERROR, "Failed to close lib %p: %s\n", *lib, dlerror());
|
|
return KS_STATUS_FAIL;
|
|
}
|
|
//ks_log(KS_LOG_DEBUG, "lib %p was closed with success\n", *lib);
|
|
*lib = NULL;
|
|
return KS_STATUS_SUCCESS;
|
|
}
|
|
//ks_log(KS_LOG_ERROR, "Invalid pointer provided to ks_dso_destroy\n");
|
|
return KS_STATUS_FAIL;
|
|
}
|
|
|
|
KS_DECLARE(ks_dso_lib_t) ks_dso_open(const char *path, char **err) {
|
|
void *lib = dlopen(path, RTLD_NOW | RTLD_LOCAL);
|
|
if (lib == NULL) {
|
|
*err = strdup(dlerror());
|
|
}
|
|
return lib;
|
|
}
|
|
|
|
KS_DECLARE(void *) ks_dso_func_sym(ks_dso_lib_t lib, const char *sym, char **err) {
|
|
void *func = dlsym(lib, sym);
|
|
if (!func) {
|
|
*err = strdup(dlerror());
|
|
}
|
|
return func;
|
|
}
|
|
#endif
|
|
|
|
/* }====================================================== */
|
|
|
|
/* For Emacs:
|
|
* Local Variables:
|
|
* mode:c
|
|
* indent-tabs-mode:t
|
|
* tab-width:4
|
|
* c-basic-offset:4
|
|
* End:
|
|
* For VIM:
|
|
* vim:set softtabstop=4 shiftwidth=4 tabstop=4 noet:
|
|
*/
|