20acef0b20a8889babdd865f64dc8cd306448450
[silc.git] / lib / silcutil / silcdll.c
1 /*
2
3   silcdll.c
4
5   Author: Pekka Riikonen <priikone@silcnet.org>
6
7   Copyright (C) 2007 Pekka Riikonen
8
9   This program is free software; you can redistribute it and/or modify
10   it under the terms of the GNU General Public License as published by
11   the Free Software Foundation; version 2 of the License.
12
13   This program is distributed in the hope that it will be useful,
14   but WITHOUT ANY WARRANTY; without even the implied warranty of
15   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16   GNU General Public License for more details.
17
18 */
19
20 #include "silc.h"
21
22 /* Load shared object */
23
24 SilcDll silc_dll_load(const char *object_path)
25 {
26 #ifdef SILC_UNIX
27 #if defined(HAVE_DLOPEN)
28 #if defined(RTLD_NOW)
29   return dlopen(object_path, RTLD_NOW);
30 #elif defined(RTLD_LAZY)
31   return dlopen(object_path, RTLD_LAZY);
32 #else
33   return dlopen(object_path, 0);
34 #endif /* RTLD_NOW */
35 #endif /* HAVE_DLOPEN */
36 #elif SILC_WIN32
37   return LoadLibrary(object_path);
38 #else
39   /* XXX Symbian */
40 #endif /* SILC_UNIX */
41   SILC_LOG_ERROR(("Shared objects are not supported on this platform"));
42   return NULL;
43 }
44
45 /* Close shared object */
46
47 void silc_dll_close(SilcDll dll)
48 {
49 #ifdef SILC_UNIX
50   dlclose(dll);
51 #elif SILC_WIN32
52   FreeLibrary(dll);
53 #else
54   /* XXX Symbian */
55 #endif /* SILC_UNIX */
56 }
57
58 /* Get symbol address from shared object */
59
60 void *silc_dll_getsym(SilcDll dll, const char *symbol)
61 {
62 #ifdef SILC_UNIX
63   return (void *)dlsym(dll, symbol);
64 #elif SILC_WIN32
65   return (void *)GetProcAddress(dll, symbol);
66 #else
67   /* XXX Symbian */
68 #endif /* SILC_UNIX */
69   SILC_LOG_ERROR(("Shared objects are not supported on this platform"));
70   return NULL;
71 }
72
73 /* Get error string */
74
75 const char *silc_dll_error(SilcDll dll)
76 {
77 #ifdef SILC_UNIX
78   return dlerror();
79 #elif SILC_WIN32
80   return NULL;
81 #else
82   /* XXX Symbian */
83 #endif /* SILC_UNIX */
84   return NULL;
85 }