1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
|
/*
* BRLTTY - A background process providing access to the console screen (when in
* text mode) for a blind person using a refreshable braille display.
*
* Copyright (C) 1995-2024 by The BRLTTY Developers.
*
* BRLTTY comes with ABSOLUTELY NO WARRANTY.
*
* This is free software, placed under the terms of the
* GNU Lesser General Public License, as published by the Free Software
* Foundation; either version 2.1 of the License, or (at your option) any
* later version. Please see the file LICENSE-LGPL for details.
*
* Web Page: http://brltty.app/
*
* This software is maintained by Dave Mielke <dave@mielke.cc>.
*/
#include "prologue.h"
#include <dlfcn.h>
#ifdef __MSDOS__
#include <debug/syms.h>
#include "program.h"
#endif /* __MSDOS__ */
#include "log.h"
#include "dynld.h"
static void
clearError (void) {
dlerror();
}
static int
logError (void) {
const char *error = dlerror();
if (!error) return 1;
logMessage(LOG_ERR, "%s", error);
return 0;
}
static inline int
getSharedObjectLoadFlags (void) {
int flags = 0;
#ifdef DL_LAZY
flags |= DL_LAZY;
#else /* DL_LAZY */
flags |= RTLD_LAZY | RTLD_GLOBAL;
#endif /* DL_LAZY */
return flags;
}
void *
loadSharedObject (const char *path) {
void *object;
clearError();
object = dlopen(path, getSharedObjectLoadFlags());
if (!object) logError();
return object;
}
void
unloadSharedObject (void *object) {
clearError();
if (dlclose(object)) logError();
}
int
findSharedSymbol (void *object, const char *symbol, void *pointerAddress) {
void **address = pointerAddress;
clearError(); /* clear any previous error condition */
*address = dlsym(object, symbol);
return logError();
}
const char *
getSharedSymbolName (void *address, ptrdiff_t *offset) {
#if defined(__MSDOS__)
{
static int symsInitialized = 0;
if (!symsInitialized) {
syms_init((char *)programPath);
symsInitialized = 1;
}
}
{
unsigned long delta;
char *name = syms_val2name((unsigned long)address, &delta);
if (name) {
if (offset) *offset = delta;
return name;
}
}
#elif defined(__linux__) || defined(__ANDROID__)
Dl_info info;
if (dladdr(address, &info)) {
if (offset) *offset = address - info.dli_saddr;
return info.dli_sname;
}
#endif /* get symbol name */
return NULL;
}
|
