Mercurial > sdl-ios-xcode

comparison src/loadso/os2/SDL_loadso.c @ 1190:173c063d4f55

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
OS/2 port! This was mostly, if not entirely, written by "Doodle" and "Caetano": doodle@scenergy.dfmk.hu daniel@caetano.eng.br --ryan.
author Ryan C. Gordon <icculus@icculus.org>
date Wed, 23 Nov 2005 07:29:56 +0000
parents
children c9b51268668f
comparison
equal deleted inserted replaced
1189:c96b326b90ba 1190:173c063d4f55
1 /*
2 SDL - Simple DirectMedia Layer
3 Copyright (C) 1997-2004 Sam Lantinga
4
5 This library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Library General Public
7 License as published by the Free Software Foundation; either
8 version 2 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 Library General Public License for more details.
14
15 You should have received a copy of the GNU Library General Public
16 License along with this library; if not, write to the Free
17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
18
19 Sam Lantinga
20 slouken@libsdl.org
21 */
22
23 #ifdef SAVE_RCSID
24 static char rcsid =
25 "@(#) $Id$";
26 #endif
27
28 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */
29 /* System dependent library loading routines */
30
31 #if !SDL_INTERNAL_BUILDING_LOADSO
32 #error Do not compile directly...compile src/SDL_loadso.c instead!
33 #endif
34
35 #if !defined(__OS2__)
36 #error Compiling for the wrong platform?
37 #endif
38
39 #include <stdio.h>
40 #define INCL_DOSERRORS
41 #define INCL_DOSMODULEMGR
42 #include <os2.h>
43
44 #include "SDL_types.h"
45 #include "SDL_error.h"
46 #include "SDL_loadso.h"
47
48 void *SDL_LoadObject(const char *sofile)
49 {
50 HMODULE handle = NULL;
51 char buf[512];
52 APIRET ulrc = DosLoadModule(buf, sizeof (buf), (char *) sofile, &handle);
53
54 /* Generate an error message if all loads failed */
55 if ((ulrc != NO_ERROR) || (handle == NULL))
56 SDL_SetError("Failed loading %s: %s", sofile, buf);
57
58 return((void *) handle);
59 }
60
61 void *SDL_LoadFunction(void *handle, const char *name)
62 {
63 const char *loaderror = "Unknown error";
64 void *symbol = NULL;
65 APIRET ulrc = DosQueryProcAddr((HMODULE)handle, 0, (char *)name, &symbol);
66 if (ulrc == ERROR_INVALID_HANDLE)
67 loaderror = "Invalid module handle";
68 else if (ulrc == ERROR_INVALID_NAME)
69 loaderror = "Symbol not found";
70
71 if (symbol == NULL)
72 SDL_SetError("Failed loading %s: %s", name, loaderror);
73
74 return(symbol);
75 }
76
77 void SDL_UnloadObject(void *handle)
78 {
79 if ( handle != NULL )
80 DosFreeModule((HMODULE) handle);
81 }
82