#define _BSD_SOURCE

#include <stdlib.h>
#include <dlfcn.h>
#include "psxglue.h"
#include "pthread_impl.h"

extern struct __ldso_vtbl * __ldso_vtbl;

int __dladdr(const void * addr, Dl_info * info)
{
	return __ldso_vtbl->dladdr(addr,info);
}

int __dlinfo(void * dso, int req, void * res)
{
	return __ldso_vtbl->dlinfo(dso,req,res);
}

void *__dlsym(void * restrict p, const char * restrict s, void * restrict ra)
{
	return __ldso_vtbl->dlsym(p,s,ra);
}

void * dlopen(const char * file, int mode)
{
	return __ldso_vtbl->dlopen(
		file,mode,
		getenv("LD_LIBRARY_PATH"),
		0);
}

int dlclose(void *p)
{
        return __ldso_vtbl->dlclose(p);
}

char * dlerror(void)
{
	return __ldso_vtbl->dlerror();
}

void __reset_tls(void)
{
	__ldso_vtbl->reset_tls();
}

void *__copy_tls(unsigned char * mem)
{
	/**
	 * this is always the simple case, since:
	 * emutls is based on PE named sections; and
	 * tls allocation and initialization are handled by clone(2)
	**/

        pthread_t td;
	uintptr_t addr;

	addr = (uintptr_t)mem;
	addr >>= 4;
	addr <<= 4;
	addr +=  16;

	td = (struct __pthread *)addr;
	td->dtv = 0;

	return td;
}