Douglas Bischoff's Fix for Plugins on OSX.
[blender-staging.git] / source / blender / blenlib / intern / dynlib.c
1 /**
2  * $Id$
3  *
4  * ***** BEGIN GPL/BL DUAL LICENSE BLOCK *****
5  *
6  * This program is free software; you can redistribute it and/or
7  * modify it under the terms of the GNU General Public License
8  * as published by the Free Software Foundation; either version 2
9  * of the License, or (at your option) any later version. The Blender
10  * Foundation also sells licenses for use in proprietary software under
11  * the Blender License.  See http://www.blender.org/BL/ for information
12  * about this.
13  *
14  * This program is distributed in the hope that it will be useful,
15  * but WITHOUT ANY WARRANTY; without even the implied warranty of
16  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
17  * GNU General Public License for more details.
18  *
19  * You should have received a copy of the GNU General Public License
20  * along with this program; if not, write to the Free Software Foundation,
21  * Inc., 59 Temple Place - Suite 330, Boston, MA  02111-1307, USA.
22  *
23  * The Original Code is Copyright (C) 2001-2002 by NaN Holding BV.
24  * All rights reserved.
25  *
26  * The Original Code is: all of this file.
27  *
28  * Contributor(s): none yet.
29  *
30  * ***** END GPL/BL DUAL LICENSE BLOCK *****
31  */
32 #include <stdlib.h>
33 #include "../PIL_dynlib.h"
34
35 #ifdef HAVE_CONFIG_H
36 #include <config.h>
37 #endif
38
39 #if !defined(CHAR_MAX)
40 #define CHAR_MAX 255
41 #endif
42
43 /*
44  * XXX, should use mallocN so we can see
45  * handle's not being released. fixme zr
46  */
47  
48 #ifdef WIN32
49
50 #include <windows.h>
51
52 struct PILdynlib {
53         void *handle;
54 };
55
56 PILdynlib *PIL_dynlib_open(char *name) {
57         void *handle= LoadLibrary(name);
58
59         if (handle) {   
60                 PILdynlib *lib= malloc(sizeof(*lib));
61                 lib->handle= handle;
62                 
63                 return lib;
64         } else {
65                 return NULL;
66         }
67 }
68
69 void *PIL_dynlib_find_symbol(PILdynlib* lib, char *symname) {
70         return GetProcAddress(lib->handle, symname);
71 }
72
73 char *PIL_dynlib_get_error_as_string(PILdynlib* lib) {
74         int err;
75
76         /* if lib is NULL reset the last error code */
77         if (!lib) {
78                 SetLastError(ERROR_SUCCESS);
79                 return NULL;
80         }
81
82         err= GetLastError();
83         if (err) {
84                 static char buf[1024];
85
86                 if (FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_IGNORE_INSERTS, 
87                                         NULL, 
88                                         err, 
89                                         MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), 
90                                         buf, 
91                                         sizeof(buf), 
92                                         NULL))
93                         return buf;
94         }
95         
96         return NULL;
97 }
98
99 void PIL_dynlib_close(PILdynlib *lib) {
100         FreeLibrary(lib->handle);
101         
102         free(lib);
103 }
104
105 #else   /* Unix & MacOS X */
106
107 #include <dlfcn.h>
108
109 struct PILdynlib {
110         void *handle;
111 };
112
113 PILdynlib *PIL_dynlib_open(char *name) {
114         void *handle= dlopen(name, RTLD_LAZY);
115
116         if (handle) {   
117                 PILdynlib *lib= malloc(sizeof(*lib));
118                 lib->handle= handle;
119                 
120                 return lib;
121         } else {
122                 return NULL;
123         }
124 }
125
126 void *PIL_dynlib_find_symbol(PILdynlib* lib, char *symname) {
127         return dlsym(lib->handle, symname);
128 }
129
130 char *PIL_dynlib_get_error_as_string(PILdynlib* lib) {
131         return dlerror();
132 }
133         
134 void PIL_dynlib_close(PILdynlib *lib) {
135         dlclose(lib->handle);
136         
137         free(lib);
138 }
139
140 #endif