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 (at) 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 */ 70