source: roaraudio/libroar/roardl.c @ 3364:12ef15758cae

Last change on this file since 3364:12ef15758cae was 3364:12ef15758cae, checked in by phi, 14 years ago

added roar_dl_errstr()

File size: 4.2 KB
Line 
1//roardl.c:
2
3/*
4 *      Copyright (C) Philipp 'ph3-der-loewe' Schafft - 2010
5 *
6 *  This file is part of libroar a part of RoarAudio,
7 *  a cross-platform sound system for both, home and professional use.
8 *  See README for details.
9 *
10 *  This file is free software; you can redistribute it and/or modify
11 *  it under the terms of the GNU General Public License version 3
12 *  as published by the Free Software Foundation.
13 *
14 *  libroar 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 software; see the file COPYING.  If not, write to
21 *  the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA.
22 *
23 *  NOTE for everyone want's to change something and send patches:
24 *  read README and HACKING! There a addition information on
25 *  the license of this document you need to read before you send
26 *  any patches.
27 *
28 *  NOTE for uses of non-GPL (LGPL,...) software using libesd, libartsc
29 *  or libpulse*:
30 *  The libs libroaresd, libroararts and libroarpulse link this lib
31 *  and are therefore GPL. Because of this it may be illigal to use
32 *  them with any software that uses libesd, libartsc or libpulse*.
33 */
34
35#include "libroar.h"
36
37#if defined(ROAR_HAVE_LIBDL)
38static void * _roardl2ldl (struct roar_dl_lhandle * lhandle) {
39 if ( lhandle == ROAR_DL_HANDLE_DEFAULT )
40  return RTLD_DEFAULT;
41
42 if ( lhandle == ROAR_DL_HANDLE_NEXT )
43  return RTLD_NEXT;
44
45 return lhandle->handle;
46}
47#endif
48
49struct roar_dl_lhandle * roar_dl_open(const char * filename, int flags, int ra_init) {
50 struct roar_dl_lhandle * ret = NULL;
51
52 // early errors just return.
53
54 if ( flags != ROAR_DL_FLAG_DEFAUTS )
55  return NULL;
56
57 if ( (ret = roar_mm_malloc(sizeof(struct roar_dl_lhandle))) == NULL )
58  return NULL;
59
60 memset(ret, 0, sizeof(struct roar_dl_lhandle));
61
62#if defined(ROAR_HAVE_LIBDL)
63 ret->handle = dlopen(filename, RTLD_NOW);
64
65 if ( ret->handle == NULL ) {
66  roar_mm_free(ret);
67  return NULL;
68 }
69#else
70 roar_mm_free(ret);
71 return NULL;
72#endif
73
74 if ( ret == NULL )
75  return NULL;
76
77 if ( ra_init ) {
78  roar_dl_ra_init(ret, NULL);
79 }
80
81 return ret;
82}
83
84int                      roar_dl_close(struct roar_dl_lhandle * lhandle) {
85 int ret = -1;
86
87 if ( lhandle == ROAR_DL_HANDLE_DEFAULT )
88  return -1;
89 if ( lhandle == ROAR_DL_HANDLE_NEXT )
90  return -1;
91
92 if ( lhandle->lib != NULL && lhandle->lib->unload != NULL )
93  lhandle->lib->unload(lhandle->para, lhandle->lib);
94
95#if defined(ROAR_HAVE_LIBDL)
96 ret = dlclose(_roardl2ldl(lhandle));
97#else
98 ret = -1;
99#endif
100
101 roar_mm_free(lhandle);
102
103 return ret;
104}
105
106void                   * roar_dl_getsym(struct roar_dl_lhandle * lhandle, const char * sym, int type) {
107#if defined(ROAR_HAVE_LIBDL)
108 return dlsym(_roardl2ldl(lhandle), sym);
109#else
110 return NULL;
111#endif
112}
113
114int                      roar_dl_ra_init(struct roar_dl_lhandle * lhandle, const char * prefix) {
115#define _SUFFIX "_roaraudio_library_init"
116 char name[80] = _SUFFIX;
117 struct roar_dl_libraryinst * (*func)(struct roar_dl_librarypara * para);
118 struct roar_dl_libraryinst * lib;
119 struct roar_dl_librarypara * para = NULL;
120 int i;
121
122 if ( (void*)lhandle < (void*)128 ) {
123  if ( prefix == NULL )
124   return -1;
125 } else {
126  para = lhandle->para;
127 }
128
129
130 if ( prefix != NULL ) {
131  strcpy(name, "_");
132  strcat(name, prefix);
133  strcat(name, _SUFFIX);
134 }
135
136 ROAR_DBG("roar_dl_ra_init(lhandle=%p, prefix='%s'): name='%s'", lhandle, prefix, name);
137
138 if ( (func = roar_dl_getsym(lhandle, name, -1)) == NULL )
139  return -1;
140
141 ROAR_DBG("roar_dl_ra_init(lhandle=%p, prefix='%s'): func=%p", lhandle, prefix, func);
142
143 lib = func(para);
144
145 if ( lib == NULL )
146  return -1;
147
148 if ( lib->version != ROAR_DL_LIBINST_VERSION )
149  return -1;
150
151 if ( sizeof(struct roar_dl_libraryinst) > lib->len )
152  return -1;
153
154 if ( !((void*)lhandle < (void*)128) ) {
155  lhandle->lib = lib;
156 }
157
158 for (i = 0; i < ROAR_DL_FN_MAX; i++) {
159  if ( lib->func[i] != NULL )
160   lib->func[i](para, lib);
161 }
162
163 return 0;
164}
165
166char *                   roar_dl_errstr(struct roar_dl_lhandle * lhandle) {
167#if defined(ROAR_HAVE_LIBDL)
168 return dlerror();
169#else
170 return NULL;
171#endif
172}
173
174//ll
Note: See TracBrowser for help on using the repository browser.