src/loadso/macos/SDL_loadso.c
changeset 1173 e9cf8c1b4590
child 1312 c9b51268668f
     1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/src/loadso/macos/SDL_loadso.c	Thu Nov 17 03:15:05 2005 +0000
     1.3 @@ -0,0 +1,119 @@
     1.4 +/*
     1.5 +    SDL - Simple DirectMedia Layer
     1.6 +    Copyright (C) 1997-2004 Sam Lantinga
     1.7 +
     1.8 +    This library is free software; you can redistribute it and/or
     1.9 +    modify it under the terms of the GNU Library General Public
    1.10 +    License as published by the Free Software Foundation; either
    1.11 +    version 2 of the License, or (at your option) any later version.
    1.12 +
    1.13 +    This library is distributed in the hope that it will be useful,
    1.14 +    but WITHOUT ANY WARRANTY; without even the implied warranty of
    1.15 +    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    1.16 +    Library General Public License for more details.
    1.17 +
    1.18 +    You should have received a copy of the GNU Library General Public
    1.19 +    License along with this library; if not, write to the Free
    1.20 +    Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
    1.21 +
    1.22 +    Sam Lantinga
    1.23 +    slouken@libsdl.org
    1.24 +*/
    1.25 +
    1.26 +#ifdef SAVE_RCSID
    1.27 +static char rcsid =
    1.28 + "@(#) $Id$";
    1.29 +#endif
    1.30 +
    1.31 +/* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
    1.32 +/* System dependent library loading routines                           */
    1.33 +
    1.34 +#if !SDL_INTERNAL_BUILDING_LOADSO
    1.35 +#error Do not compile directly...compile src/SDL_loadso.c instead!
    1.36 +#endif
    1.37 +
    1.38 +#if !defined(macintosh)
    1.39 +#error Compiling for the wrong platform?
    1.40 +#endif
    1.41 +
    1.42 +#include <stdio.h>
    1.43 +#include <string.h>
    1.44 +#define OLDP2C 1
    1.45 +#include <Strings.h>
    1.46 +#include <CodeFragments.h>
    1.47 +#include <Errors.h>
    1.48 +
    1.49 +#include "SDL_types.h"
    1.50 +#include "SDL_error.h"
    1.51 +#include "SDL_loadso.h"
    1.52 +
    1.53 +void *SDL_LoadObject(const char *sofile)
    1.54 +{
    1.55 +	void *handle = NULL;
    1.56 +	const char *loaderror = NULL;
    1.57 +	CFragConnectionID library_id;
    1.58 +	Ptr mainAddr;
    1.59 +	Str255 errName;
    1.60 +	OSErr error;
    1.61 +	char psofile[512];
    1.62 +
    1.63 +	strncpy(psofile, sofile, SDL_TABLESIZE(psofile));
    1.64 +	psofile[SDL_TABLESIZE(psofile)-1] = '\0';
    1.65 +	error = GetSharedLibrary(C2PStr(psofile), kCompiledCFragArch,
    1.66 +			kLoadCFrag, &library_id, &mainAddr, errName);
    1.67 +	switch (error) {
    1.68 +		case noErr:
    1.69 +			loaderror = NULL;
    1.70 +			break;
    1.71 +		case cfragNoLibraryErr:
    1.72 +			loaderror = "Library not found";
    1.73 +			break;
    1.74 +		case cfragUnresolvedErr:
    1.75 +			loaderror = "Unabled to resolve symbols";
    1.76 +			break;
    1.77 +		case cfragNoPrivateMemErr:
    1.78 +		case cfragNoClientMemErr:
    1.79 +			loaderror = "Out of memory";
    1.80 +			break;
    1.81 +		default:
    1.82 +			loaderror = "Unknown Code Fragment Manager error";
    1.83 +			break;
    1.84 +	}
    1.85 +	if ( loaderror == NULL ) {
    1.86 +		handle = (void *)(library_id);
    1.87 +	} else {
    1.88 +		SDL_SetError("Failed loading %s: %s", sofile, loaderror);
    1.89 +	}
    1.90 +	return(handle);
    1.91 +}
    1.92 +
    1.93 +void *SDL_LoadFunction(void *handle, const char *name)
    1.94 +{
    1.95 +	void *symbol = NULL;
    1.96 +	const char *loaderror = NULL;
    1.97 +	CFragSymbolClass class;
    1.98 +	CFragConnectionID library_id = (CFragConnectionID)handle;
    1.99 +	char pname[512];
   1.100 +
   1.101 +	strncpy(pname, name, SDL_TABLESIZE(pname));
   1.102 +	pname[SDL_TABLESIZE(pname)-1] = '\0';
   1.103 +	if ( FindSymbol(library_id, C2PStr(pname),
   1.104 +	                (char **)&symbol, &class) != noErr ) {
   1.105 +		loaderror = "Symbol not found";
   1.106 +	}
   1.107 +
   1.108 +	if ( symbol == NULL ) {
   1.109 +		SDL_SetError("Failed loading %s: %s", name, loaderror);
   1.110 +	}
   1.111 +	return(symbol);
   1.112 +}
   1.113 +
   1.114 +void SDL_UnloadObject(void *handle)
   1.115 +{
   1.116 +	CFragConnectionID library_id;
   1.117 +	if ( handle != NULL ) {
   1.118 +		library_id = (CFragConnectionID)handle;
   1.119 +		CloseConnection(&library_id);
   1.120 +	}
   1.121 +}
   1.122 +