Mercurial > sdl-ios-xcode
annotate src/loadso/macos/SDL_loadso.c @ 1358:c71e05b4dc2e
More header massaging... works great on Windows. ;-)
author | Sam Lantinga <slouken@libsdl.org> |
---|---|
date | Fri, 10 Feb 2006 06:48:43 +0000 |
parents | 3692456e7b0f |
children |
rev | line source |
---|---|
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
1 /* |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
2 SDL - Simple DirectMedia Layer |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
3 Copyright (C) 1997-2006 Sam Lantinga |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
4 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
5 This library is free software; you can redistribute it and/or |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
6 modify it under the terms of the GNU Lesser General Public |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
7 License as published by the Free Software Foundation; either |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
8 version 2.1 of the License, or (at your option) any later version. |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
9 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
10 This library is distributed in the hope that it will be useful, |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
11 but WITHOUT ANY WARRANTY; without even the implied warranty of |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
13 Lesser General Public License for more details. |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
14 |
1312
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
15 You should have received a copy of the GNU Lesser General Public |
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
16 License along with this library; if not, write to the Free Software |
c9b51268668f
Updated copyright information and removed rcs id lines (problematic in branch merges)
Sam Lantinga <slouken@libsdl.org>
parents:
1173
diff
changeset
|
17 Foundation, Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
18 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
19 Sam Lantinga |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
20 slouken@libsdl.org |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
21 */ |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
22 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
23 /* * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * * */ |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
24 /* System dependent library loading routines */ |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
25 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
26 #if !SDL_INTERNAL_BUILDING_LOADSO |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
27 #error Do not compile directly...compile src/SDL_loadso.c instead! |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
28 #endif |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
29 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
30 #if !defined(macintosh) |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
31 #error Compiling for the wrong platform? |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
32 #endif |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
33 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
34 #include <stdio.h> |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
35 #include <string.h> |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
36 #define OLDP2C 1 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
37 #include <Strings.h> |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
38 #include <CodeFragments.h> |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
39 #include <Errors.h> |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
40 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
41 #include "SDL_loadso.h" |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
42 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
43 void *SDL_LoadObject(const char *sofile) |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
44 { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
45 void *handle = NULL; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
46 const char *loaderror = NULL; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
47 CFragConnectionID library_id; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
48 Ptr mainAddr; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
49 Str255 errName; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
50 OSErr error; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
51 char psofile[512]; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
52 |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
53 SDL_strncpy(psofile, sofile, SDL_TABLESIZE(psofile)); |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
54 psofile[SDL_TABLESIZE(psofile)-1] = '\0'; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
55 error = GetSharedLibrary(C2PStr(psofile), kCompiledCFragArch, |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
56 kLoadCFrag, &library_id, &mainAddr, errName); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
57 switch (error) { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
58 case noErr: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
59 loaderror = NULL; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
60 break; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
61 case cfragNoLibraryErr: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
62 loaderror = "Library not found"; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
63 break; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
64 case cfragUnresolvedErr: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
65 loaderror = "Unabled to resolve symbols"; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
66 break; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
67 case cfragNoPrivateMemErr: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
68 case cfragNoClientMemErr: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
69 loaderror = "Out of memory"; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
70 break; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
71 default: |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
72 loaderror = "Unknown Code Fragment Manager error"; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
73 break; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
74 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
75 if ( loaderror == NULL ) { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
76 handle = (void *)(library_id); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
77 } else { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
78 SDL_SetError("Failed loading %s: %s", sofile, loaderror); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
79 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
80 return(handle); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
81 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
82 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
83 void *SDL_LoadFunction(void *handle, const char *name) |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
84 { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
85 void *symbol = NULL; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
86 const char *loaderror = NULL; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
87 CFragSymbolClass class; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
88 CFragConnectionID library_id = (CFragConnectionID)handle; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
89 char pname[512]; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
90 |
1336
3692456e7b0f
Use SDL_ prefixed versions of C library functions.
Sam Lantinga <slouken@libsdl.org>
parents:
1312
diff
changeset
|
91 SDL_strncpy(pname, name, SDL_TABLESIZE(pname)); |
1173
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
92 pname[SDL_TABLESIZE(pname)-1] = '\0'; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
93 if ( FindSymbol(library_id, C2PStr(pname), |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
94 (char **)&symbol, &class) != noErr ) { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
95 loaderror = "Symbol not found"; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
96 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
97 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
98 if ( symbol == NULL ) { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
99 SDL_SetError("Failed loading %s: %s", name, loaderror); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
100 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
101 return(symbol); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
102 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
103 |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
104 void SDL_UnloadObject(void *handle) |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
105 { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
106 CFragConnectionID library_id; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
107 if ( handle != NULL ) { |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
108 library_id = (CFragConnectionID)handle; |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
109 CloseConnection(&library_id); |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
110 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
111 } |
e9cf8c1b4590
Split up src/SDL_loadso.c into platform directories.
Ryan C. Gordon <icculus@icculus.org>
parents:
diff
changeset
|
112 |