1/*
2    SDL - Simple DirectMedia Layer
3    Copyright (C) 1997-2006 Sam Lantinga
4
5    This library is free software; you can redistribute it and/or
6    modify it under the terms of the GNU Lesser General Public
7    License as published by the Free Software Foundation; either
8    version 2.1 of the License, or (at your option) any later version.
9
10    This library is distributed in the hope that it will be useful,
11    but WITHOUT ANY WARRANTY; without even the implied warranty of
12    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13    Lesser General Public License for more details.
14
15    You should have received a copy of the GNU Lesser General Public
16    License along with this library; if not, write to the Free Software
17    Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA  02110-1301  USA
18
19    Sam Lantinga
20    slouken@libsdl.org
21*/
22#include "SDL_config.h"
23
24#ifdef SDL_LOADSO_DLOPEN
25
26/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
27/* System dependent library loading routines                           */
28
29#include <stdio.h>
30#include <dlfcn.h>
31
32#include "SDL_loadso.h"
33
34void *SDL_LoadObject(const char *sofile)
35{
36	void *handle = dlopen(sofile, RTLD_NOW);
37	const char *loaderror = (char *)dlerror();
38	if ( handle == NULL ) {
39		SDL_SetError("Failed loading %s: %s", sofile, loaderror);
40	}
41	return(handle);
42}
43
44void *SDL_LoadFunction(void *handle, const char *name)
45{
46	void *symbol = dlsym(handle, name);
47	if ( symbol == NULL ) {
48		/* append an underscore for platforms that need that. */
49		size_t len = 1+SDL_strlen(name)+1;
50		char *_name = SDL_stack_alloc(char, len);
51		_name[0] = '_';
52		SDL_strlcpy(&_name[1], name, len);
53		symbol = dlsym(handle, _name);
54		SDL_stack_free(_name);
55		if ( symbol == NULL ) {
56			SDL_SetError("Failed loading %s: %s", name, (const char *)dlerror());
57		}
58	}
59	return(symbol);
60}
61
62void SDL_UnloadObject(void *handle)
63{
64	if ( handle != NULL ) {
65		dlclose(handle);
66	}
67}
68
69#endif /* SDL_LOADSO_DLOPEN */
70