user: implement mlibc as the libc, finally.
It's finally done.. Signed-off-by: kaguya <vpshinomiya@protonmail.com>
This commit is contained in:
@@ -0,0 +1,99 @@
|
||||
|
||||
#include <bits/ensure.h>
|
||||
#include <dlfcn.h>
|
||||
|
||||
#include <mlibc/debug.hpp>
|
||||
|
||||
struct __dlapi_symbol {
|
||||
const char *file;
|
||||
void *base;
|
||||
const char *symbol;
|
||||
void *address;
|
||||
const void *elf_symbol;
|
||||
void *link_map;
|
||||
};
|
||||
|
||||
extern "C" const char *__dlapi_error();
|
||||
extern "C" void *__dlapi_open(const char *, int, void *);
|
||||
extern "C" void *__dlapi_resolve(void *, const char *, void *, const char *);
|
||||
extern "C" int __dlapi_reverse(const void *, __dlapi_symbol *);
|
||||
extern "C" int __dlapi_close(void *);
|
||||
extern "C" int __dlapi_find_object(void *__address, dl_find_object *__result);
|
||||
|
||||
int dlclose(void *handle) {
|
||||
return __dlapi_close(handle);
|
||||
}
|
||||
|
||||
char *dlerror(void) {
|
||||
return const_cast<char *>(__dlapi_error());
|
||||
}
|
||||
|
||||
[[gnu::noinline]]
|
||||
void *dlopen(const char *file, int flags) {
|
||||
auto ra = __builtin_extract_return_addr(__builtin_return_address(0));
|
||||
return __dlapi_open(file, flags, ra);
|
||||
}
|
||||
|
||||
[[gnu::noinline]]
|
||||
void *dlsym(void *__restrict handle, const char *__restrict string) {
|
||||
auto ra = __builtin_extract_return_addr(__builtin_return_address(0));
|
||||
return __dlapi_resolve(handle, string, ra, nullptr);
|
||||
}
|
||||
|
||||
[[gnu::noinline]]
|
||||
void *dlvsym(void *__restrict handle, const char *__restrict string, const char *__restrict version) {
|
||||
auto ra = __builtin_extract_return_addr(__builtin_return_address(0));
|
||||
return __dlapi_resolve(handle, string, ra, version);
|
||||
}
|
||||
|
||||
//gnu extensions
|
||||
|
||||
#if __MLIBC_GLIBC_OPTION
|
||||
|
||||
int dladdr(const void *ptr, Dl_info *out) {
|
||||
__dlapi_symbol info;
|
||||
if(__dlapi_reverse(ptr, &info))
|
||||
return 0;
|
||||
|
||||
out->dli_fname = info.file;
|
||||
out->dli_fbase = info.base;
|
||||
out->dli_sname = info.symbol;
|
||||
out->dli_saddr = info.address;
|
||||
return 1;
|
||||
}
|
||||
|
||||
int dladdr1(const void *ptr, Dl_info *out, void **extra, int flags) {
|
||||
__dlapi_symbol info;
|
||||
if(__dlapi_reverse(ptr, &info)) {
|
||||
return 0;
|
||||
}
|
||||
|
||||
out->dli_fname = info.file;
|
||||
out->dli_fbase = info.base;
|
||||
out->dli_sname = info.symbol;
|
||||
out->dli_saddr = info.address;
|
||||
|
||||
switch(flags) {
|
||||
case RTLD_DL_SYMENT:
|
||||
*const_cast<const void **>(extra) = info.elf_symbol;
|
||||
break;
|
||||
case RTLD_DL_LINKMAP:
|
||||
*extra = info.link_map;
|
||||
break;
|
||||
default:
|
||||
break;
|
||||
}
|
||||
|
||||
return 1;
|
||||
}
|
||||
|
||||
int dlinfo(void *__restrict, int, void *__restrict) {
|
||||
__ensure(!"dlinfo() not implemented");
|
||||
__builtin_unreachable();
|
||||
}
|
||||
|
||||
int _dl_find_object(void *address, struct dl_find_object *result) {
|
||||
return __dlapi_find_object(address, result);
|
||||
}
|
||||
|
||||
#endif // __MLIBC_GLIBC_OPTION
|
||||
Reference in New Issue
Block a user