SDL-1.2.14
[sdl_omap.git] / src / loadso / dlopen / SDL_sysloadso.c
1 /*
2     SDL - Simple DirectMedia Layer
3     Copyright (C) 1997-2009 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
34 void *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
44 void *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
62 void SDL_UnloadObject(void *handle)
63 {
64         if ( handle != NULL ) {
65                 dlclose(handle);
66         }
67 }
68
69 #endif /* SDL_LOADSO_DLOPEN */