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 

    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 */