121 lines
2.3 KiB
C++
121 lines
2.3 KiB
C++
/**
|
|
* \brief DL interface bindings
|
|
* \author Sebastian Sumpf
|
|
* \date 2014-10-24
|
|
*
|
|
* Wrap Genode's shared library interface onto libc semantics.
|
|
*/
|
|
|
|
#include <base/env.h>
|
|
#include <base/printf.h>
|
|
#include <base/shared_object.h>
|
|
#include <base/snprintf.h>
|
|
|
|
extern "C" {
|
|
#include <dlfcn.h>
|
|
}
|
|
|
|
using namespace Genode;
|
|
|
|
enum { MAX_ERR = 128 };
|
|
static char err_str[MAX_ERR];
|
|
|
|
char *dlerror(void)
|
|
{
|
|
return err_str;
|
|
}
|
|
|
|
|
|
static Shared_object *to_object(void *handle)
|
|
{
|
|
return static_cast<Shared_object *>(handle);
|
|
}
|
|
|
|
|
|
void *dlopen(const char *name, int mode)
|
|
{
|
|
int supported = RTLD_LAZY | RTLD_NOW | RTLD_LOCAL | RTLD_NODELETE;
|
|
|
|
/* error on unsupported mode values */
|
|
if (mode & ~supported) {
|
|
snprintf(err_str, MAX_ERR, "Unsupported mode 0x%x\n", mode & ~supported);
|
|
PERR("dlopen: %s", err_str);
|
|
return nullptr;
|
|
}
|
|
|
|
Shared_object *obj = 0;
|
|
unsigned flags = mode & RTLD_NOW ? Shared_object::NOW : Shared_object::LAZY;
|
|
flags |= mode & RTLD_NODELETE ? Shared_object::KEEP : 0;
|
|
|
|
try {
|
|
obj = new (env()->heap()) Shared_object(name, flags);
|
|
} catch (...) {
|
|
snprintf(err_str, MAX_ERR, "Unable to open file %s\n", name);
|
|
}
|
|
|
|
return (void *)obj;
|
|
}
|
|
|
|
|
|
void *dlsym(void *handle, const char *name)
|
|
{
|
|
if (handle == nullptr || handle == RTLD_NEXT || handle == RTLD_DEFAULT ||
|
|
handle == RTLD_SELF) {
|
|
snprintf(err_str, MAX_ERR, "Unsupported handle %p\n", handle);
|
|
return nullptr;
|
|
}
|
|
|
|
try {
|
|
return to_object(handle)->lookup(name);
|
|
} catch (...) {
|
|
snprintf(err_str, MAX_ERR, "Symbol '%s' not found\n", name);
|
|
}
|
|
|
|
return nullptr;
|
|
}
|
|
|
|
|
|
int dladdr(const void *addr, Dl_info *dlip)
|
|
{
|
|
try {
|
|
Address_info info((addr_t)addr);
|
|
dlip->dli_fname = info.path;
|
|
dlip->dli_fbase = (void *)info.base;
|
|
dlip->dli_sname = info.name;
|
|
dlip->dli_saddr = (void *)info.addr;
|
|
} catch (...) {
|
|
snprintf(err_str, MAX_ERR, "Symbol %p at not found", addr);
|
|
return 0;
|
|
}
|
|
|
|
return 1;
|
|
}
|
|
|
|
|
|
int dlclose(void *handle)
|
|
{
|
|
destroy(env()->heap(), to_object(handle));
|
|
return 0;
|
|
}
|
|
|
|
|
|
int dlinfo(void *handle, int request, void *p)
|
|
{
|
|
PERR("%s not implemented", __func__);
|
|
return 0;
|
|
}
|
|
|
|
|
|
dlfunc_t dlfunc(void *handle, const char *name)
|
|
{
|
|
PERR("%s not implemented", __func__);
|
|
return 0;
|
|
}
|
|
|
|
|
|
void *dlvsym(void *handle, const char *name, const char *version)
|
|
{
|
|
PERR("%s not implemented", __func__);
|
|
return nullptr;
|
|
}
|