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
|
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
#include <stdio.h>
#include <errno.h>
#include <dlfcn.h>
#include <limits.h>
#include "triton_p.h"
#include "memdebug.h"
struct module_t
{
struct list_head entry;
char *name;
void *handle;
};
static LIST_HEAD(modules);
int load_modules(const char *name)
{
struct conf_sect_t *sect;
struct conf_option_t *opt;
char *fname;
char *path = MODULE_PATH;
char *ptr1, *ptr2;
struct module_t *m;
void *h;
sect = conf_get_section(name);
if (!sect) {
fprintf(stderr, "loader: section '%s' not found\n", name);
return -1;
}
fname = _malloc(PATH_MAX);
list_for_each_entry(opt, §->items, entry) {
if (!strcmp(opt->name,"path") && opt->val) {
path = opt->val;
continue;
}
strcpy(fname, path);
strcat(fname, "/");
strcat(fname, opt->name);
if (access(fname, F_OK)) {
strcpy(fname, path);
strcat(fname, "/lib");
strcat(fname, opt->name);
strcat(fname, ".so");
if (access(fname, F_OK)) {
strcpy(fname, opt->name);
if (access(opt->name, F_OK)) {
triton_log_error("loader: '%s' not found", opt->name);
continue;
}
}
}
h = dlopen(fname, RTLD_LAZY | RTLD_GLOBAL);
if (!h) {
triton_log_error("loader: failed to load '%s': %s", opt->name, dlerror());
_free(fname);
return -1;
}
ptr1 = fname;
while (1) {
ptr2 = strchr(ptr1, '/');
if (!ptr2)
break;
ptr1 = ptr2 + 1;
}
if (!strncmp(ptr1, "lib", 3))
ptr1 += 3;
ptr2 = strstr(ptr1, ".so\x0");
if (ptr2)
*ptr2 = 0;
m = _malloc(sizeof(*m));
m->name = _strdup(ptr1);
m->handle = h;
list_add_tail(&m->entry, &modules);
}
_free(fname);
return 0;
}
int __export triton_module_loaded(const char *name)
{
struct module_t *m;
list_for_each_entry(m, &modules, entry) {
if (strcmp(m->name, name))
continue;
return 1;
}
return 0;
}
|
