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