89c21a9af558ddee23eb40f061fdcb24a74c1c9b
[blender.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 /*
40  * XXX, should use mallocN so we can see
41  * handle's not being released. fixme zr
42  */
43  
44 #ifdef WIN32
45
46 #include <windows.h>
47
48 struct PILdynlib {
49         void *handle;
50 };
51
52 PILdynlib *PIL_dynlib_open(char *name) {
53         void *handle= LoadLibrary(name);
54
55         if (handle) {   
56                 PILdynlib *lib= malloc(sizeof(*lib));
57                 lib->handle= handle;
58                 
59                 return lib;
60         } else {
61                 return NULL;
62         }
63 }
64
65 void *PIL_dynlib_find_symbol(PILdynlib* lib, char *symname) {
66         return GetProcAddress(lib->handle, symname);
67 }
68
69 char *PIL_dynlib_get_error_as_string(PILdynlib* lib) {
70         int err;
71
72         /* if lib is NULL reset the last error code */
73         if (!lib) {
74                 SetLastError(ERROR_SUCCESS);
75                 return NULL;
76         }
77
78         err= GetLastError();
79         if (err) {
80                 static char buf[1024];
81
82                 if (FormatMessage(FORMAT_MESSAGE_FROM_SYSTEM|FORMAT_MESSAGE_IGNORE_INSERTS, 
83                                         NULL, 
84                                         err, 
85                                         MAKELANGID(LANG_NEUTRAL, SUBLANG_DEFAULT), 
86                                         buf, 
87                                         sizeof(buf), 
88                                         NULL))
89                         return buf;
90         }
91         
92         return NULL;
93 }
94
95 void PIL_dynlib_close(PILdynlib *lib) {
96         FreeLibrary(lib->handle);
97         
98         free(lib);
99 }
100
101 #else
102 #ifdef __APPLE__
103
104 PILdynlib *PIL_dynlib_open(char *name) {
105         return NULL;
106 }
107
108 void *PIL_dynlib_find_symbol(PILdynlib* lib, char *symname) {
109         return NULL;
110 }
111
112 char *PIL_dynlib_get_error_as_string(PILdynlib* lib) {
113         return "Plugins are currently unsupported on OSX";
114 }
115         
116 void PIL_dynlib_close(PILdynlib *lib) {
117         ;
118 }
119
120 #else   /* Unix */
121
122 #include <dlfcn.h>
123
124 struct PILdynlib {
125         void *handle;
126 };
127
128 PILdynlib *PIL_dynlib_open(char *name) {
129         void *handle= dlopen(name, RTLD_LAZY);
130
131         if (handle) {   
132                 PILdynlib *lib= malloc(sizeof(*lib));
133                 lib->handle= handle;
134                 
135                 return lib;
136         } else {
137                 return NULL;
138         }
139 }
140
141 void *PIL_dynlib_find_symbol(PILdynlib* lib, char *symname) {
142         return dlsym(lib->handle, symname);
143 }
144
145 char *PIL_dynlib_get_error_as_string(PILdynlib* lib) {
146         return dlerror();
147 }
148         
149 void PIL_dynlib_close(PILdynlib *lib) {
150         dlclose(lib->handle);
151         
152         free(lib);
153 }
154
155 #endif
156 #endif