]> git.saurik.com Git - wxWidgets.git/blob - src/common/dynlib.cpp
Rework the wxCusor ctor taking wx stock number to provide as many cursors as
[wxWidgets.git] / src / common / dynlib.cpp
1 /////////////////////////////////////////////////////////////////////////////
2 // Name: src/common/dynlib.cpp
3 // Purpose: Dynamic library management
4 // Author: Guilhem Lavaux
5 // Modified by:
6 // Created: 20/07/98
7 // RCS-ID: $Id$
8 // Copyright: (c) 1998 Guilhem Lavaux
9 // 2000-2005 Vadim Zeitlin
10 // Licence: wxWindows licence
11 /////////////////////////////////////////////////////////////////////////////
12
13 //FIXME: This class isn't really common at all, it should be moved into
14 // platform dependent files (already done for Windows and Unix)
15
16 // ============================================================================
17 // declarations
18 // ============================================================================
19
20 // ----------------------------------------------------------------------------
21 // headers
22 // ----------------------------------------------------------------------------
23
24 #include "wx/wxprec.h"
25
26 #ifdef __BORLANDC__
27 #pragma hdrstop
28 #endif
29
30 #if wxUSE_DYNLIB_CLASS
31
32 #include "wx/dynlib.h"
33
34 #ifndef WX_PRECOMP
35 #include "wx/intl.h"
36 #include "wx/log.h"
37 #include "wx/app.h"
38 #include "wx/utils.h"
39 #endif //WX_PRECOMP
40
41 #include "wx/filefn.h"
42 #include "wx/filename.h" // for SplitPath()
43 #include "wx/platinfo.h"
44
45 #include "wx/arrimpl.cpp"
46
47 #if defined(__WXMAC__)
48 #include "wx/mac/private.h"
49 #endif
50
51 WX_DEFINE_USER_EXPORTED_OBJARRAY(wxDynamicLibraryDetailsArray)
52
53 // ============================================================================
54 // implementation
55 // ============================================================================
56
57 // ---------------------------------------------------------------------------
58 // wxDynamicLibrary
59 // ---------------------------------------------------------------------------
60
61 #if defined(__WXPM__) || defined(__EMX__)
62 const wxString wxDynamicLibrary::ms_dllext(_T(".dll"));
63 #elif defined(__WXMAC__) && !defined(__DARWIN__)
64 const wxString wxDynamicLibrary::ms_dllext; // empty string
65 #endif
66
67 // for MSW/Unix it is defined in platform-specific file
68 #if !(defined(__WXMSW__) || defined(__UNIX__)) || defined(__EMX__)
69
70 wxDllType wxDynamicLibrary::GetProgramHandle()
71 {
72 wxFAIL_MSG( wxT("GetProgramHandle() is not implemented under this platform"));
73 return 0;
74 }
75
76 #endif // __WXMSW__ || __UNIX__
77
78
79 bool wxDynamicLibrary::Load(const wxString& libnameOrig, int flags)
80 {
81 wxASSERT_MSG(m_handle == 0, _T("Library already loaded."));
82
83 // add the proper extension for the DLL ourselves unless told not to
84 wxString libname = libnameOrig;
85 if ( !(flags & wxDL_VERBATIM) )
86 {
87 // and also check that the libname doesn't already have it
88 wxString ext;
89 wxFileName::SplitPath(libname, NULL, NULL, &ext);
90 if ( ext.empty() )
91 {
92 libname += GetDllExt();
93 }
94 }
95
96 // different ways to load a shared library
97 //
98 // FIXME: should go to the platform-specific files!
99 #if defined(__WXMAC__) && !defined(__DARWIN__)
100 FSSpec myFSSpec;
101 Ptr myMainAddr;
102 Str255 myErrName;
103
104 wxMacFilename2FSSpec( libname , &myFSSpec );
105
106 if( GetDiskFragment( &myFSSpec,
107 0,
108 kCFragGoesToEOF,
109 "\p",
110 kPrivateCFragCopy,
111 &m_handle,
112 &myMainAddr,
113 myErrName ) != noErr )
114 {
115 wxLogSysError( _("Failed to load shared library '%s' Error '%s'"),
116 libname.c_str(),
117 wxMacMakeStringFromPascal( myErrName ).c_str() );
118 m_handle = 0;
119 }
120
121 #elif defined(__WXPM__) || defined(__EMX__)
122 char err[256] = "";
123 DosLoadModule(err, sizeof(err), libname.c_str(), &m_handle);
124 #else // this should be the only remaining branch eventually
125 m_handle = RawLoad(libname, flags);
126 #endif
127
128 if ( m_handle == 0 )
129 {
130 #ifdef wxHAVE_DYNLIB_ERROR
131 Error();
132 #else
133 wxLogSysError(_("Failed to load shared library '%s'"), libname.c_str());
134 #endif
135 }
136
137 return IsLoaded();
138 }
139
140 // for MSW and Unix this is implemented in the platform-specific file
141 //
142 // TODO: move the rest to os2/dlpm.cpp and mac/dlmac.cpp!
143 #if (!defined(__WXMSW__) && !defined(__UNIX__)) || defined(__EMX__)
144
145 /* static */
146 void wxDynamicLibrary::Unload(wxDllType handle)
147 {
148 #if defined(__OS2__) || defined(__EMX__)
149 DosFreeModule( handle );
150 #elif defined(__WXMAC__) && !defined(__DARWIN__)
151 CloseConnection( (CFragConnectionID*) &handle );
152 #else
153 #error "runtime shared lib support not implemented"
154 #endif
155 }
156
157 #endif // !(__WXMSW__ || __UNIX__)
158
159 void *wxDynamicLibrary::DoGetSymbol(const wxString &name, bool *success) const
160 {
161 wxCHECK_MSG( IsLoaded(), NULL,
162 _T("Can't load symbol from unloaded library") );
163
164 void *symbol = 0;
165
166 wxUnusedVar(symbol);
167 #if defined(__WXMAC__) && !defined(__DARWIN__)
168 Ptr symAddress;
169 CFragSymbolClass symClass;
170 Str255 symName;
171 #if TARGET_CARBON
172 c2pstrcpy( (StringPtr) symName, name.fn_str() );
173 #else
174 strcpy( (char *)symName, name.fn_str() );
175 c2pstr( (char *)symName );
176 #endif
177 if( FindSymbol( m_handle, symName, &symAddress, &symClass ) == noErr )
178 symbol = (void *)symAddress;
179 #elif defined(__WXPM__) || defined(__EMX__)
180 DosQueryProcAddr( m_handle, 1L, name.c_str(), (PFN*)symbol );
181 #else
182 symbol = RawGetSymbol(m_handle, name);
183 #endif
184
185 if ( success )
186 *success = symbol != NULL;
187
188 return symbol;
189 }
190
191 void *wxDynamicLibrary::GetSymbol(const wxString& name, bool *success) const
192 {
193 void *symbol = DoGetSymbol(name, success);
194 if ( !symbol )
195 {
196 #ifdef wxHAVE_DYNLIB_ERROR
197 Error();
198 #else
199 wxLogSysError(_("Couldn't find symbol '%s' in a dynamic library"),
200 name.c_str());
201 #endif
202 }
203
204 return symbol;
205 }
206
207 // ----------------------------------------------------------------------------
208 // informational methods
209 // ----------------------------------------------------------------------------
210
211 /*static*/
212 wxString
213 wxDynamicLibrary::CanonicalizeName(const wxString& name,
214 wxDynamicLibraryCategory cat)
215 {
216 wxString nameCanonic;
217
218 // under Unix the library names usually start with "lib" prefix, add it
219 #if defined(__UNIX__) && !defined(__EMX__)
220 switch ( cat )
221 {
222 default:
223 wxFAIL_MSG( _T("unknown wxDynamicLibraryCategory value") );
224 // fall through
225
226 case wxDL_MODULE:
227 // don't do anything for modules, their names are arbitrary
228 break;
229
230 case wxDL_LIBRARY:
231 // library names should start with "lib" under Unix
232 nameCanonic = _T("lib");
233 break;
234 }
235 #else // !__UNIX__
236 wxUnusedVar(cat);
237 #endif // __UNIX__/!__UNIX__
238
239 nameCanonic << name << GetDllExt();
240 return nameCanonic;
241 }
242
243 /*static*/
244 wxString wxDynamicLibrary::CanonicalizePluginName(const wxString& name,
245 wxPluginCategory cat)
246 {
247 wxString suffix;
248 if ( cat == wxDL_PLUGIN_GUI )
249 {
250 suffix = wxPlatformInfo::Get().GetPortIdShortName();
251 }
252 #if wxUSE_UNICODE
253 suffix << _T('u');
254 #endif
255 #ifdef __WXDEBUG__
256 suffix << _T('d');
257 #endif
258
259 if ( !suffix.empty() )
260 suffix = wxString(_T("_")) + suffix;
261
262 #define WXSTRINGIZE(x) #x
263 #if defined(__UNIX__) && !defined(__EMX__)
264 #if (wxMINOR_VERSION % 2) == 0
265 #define wxDLLVER(x,y,z) "-" WXSTRINGIZE(x) "." WXSTRINGIZE(y)
266 #else
267 #define wxDLLVER(x,y,z) "-" WXSTRINGIZE(x) "." WXSTRINGIZE(y) "." WXSTRINGIZE(z)
268 #endif
269 #else
270 #if (wxMINOR_VERSION % 2) == 0
271 #define wxDLLVER(x,y,z) WXSTRINGIZE(x) WXSTRINGIZE(y)
272 #else
273 #define wxDLLVER(x,y,z) WXSTRINGIZE(x) WXSTRINGIZE(y) WXSTRINGIZE(z)
274 #endif
275 #endif
276
277 suffix << wxString::FromAscii(wxDLLVER(wxMAJOR_VERSION, wxMINOR_VERSION,
278 wxRELEASE_NUMBER));
279 #undef wxDLLVER
280 #undef WXSTRINGIZE
281
282 #ifdef __WINDOWS__
283 // Add compiler identification:
284 #if defined(__GNUG__)
285 suffix << _T("_gcc");
286 #elif defined(__VISUALC__)
287 suffix << _T("_vc");
288 #elif defined(__WATCOMC__)
289 suffix << _T("_wat");
290 #elif defined(__BORLANDC__)
291 suffix << _T("_bcc");
292 #endif
293 #endif
294
295 return CanonicalizeName(name + suffix, wxDL_MODULE);
296 }
297
298 /*static*/
299 wxString wxDynamicLibrary::GetPluginsDirectory()
300 {
301 #ifdef __UNIX__
302 wxString format = wxGetInstallPrefix();
303 wxString dir;
304 format << wxFILE_SEP_PATH
305 << wxT("lib") << wxFILE_SEP_PATH
306 << wxT("wx") << wxFILE_SEP_PATH
307 #if (wxMINOR_VERSION % 2) == 0
308 << wxT("%i.%i");
309 dir.Printf(format.c_str(), wxMAJOR_VERSION, wxMINOR_VERSION);
310 #else
311 << wxT("%i.%i.%i");
312 dir.Printf(format.c_str(),
313 wxMAJOR_VERSION, wxMINOR_VERSION, wxRELEASE_NUMBER);
314 #endif
315 return dir;
316
317 #else // ! __UNIX__
318 return wxEmptyString;
319 #endif
320 }
321
322
323 #endif // wxUSE_DYNLIB_CLASS