Lines 1-75
Link Here
|
1 |
#include <dlfcn.h> |
|
|
2 |
#include <nlist.h> |
3 |
|
4 |
static int add_compile_args(int ac, char *av[], int kflag) |
5 |
{ |
6 |
av[ac++] = "-fPIC"; |
7 |
return(ac); |
8 |
} |
9 |
|
10 |
|
11 |
static int add_link_args(int ac, char *av[], int kflag) |
12 |
{ |
13 |
av[ac++] = findenv("CNETLD", CNETLD); |
14 |
av[ac++] = "ld"; |
15 |
av[ac++] = "-shared"; |
16 |
return(ac); |
17 |
} |
18 |
|
19 |
|
20 |
static void data_segments(int n, void *handle, char *so_filenm) |
21 |
{ |
22 |
extern int nlist(const char *, struct nlist *); |
23 |
|
24 |
typedef struct _c { |
25 |
char *so_filenm; |
26 |
unsigned long length_data; |
27 |
char *incore_data; |
28 |
char *original_data; |
29 |
struct _c *next; |
30 |
} CACHE; |
31 |
|
32 |
static CACHE *chd = (CACHE *)NULL; |
33 |
CACHE *cp = chd; |
34 |
|
35 |
NODE *np = &NP[n]; |
36 |
struct nlist nls[3]; |
37 |
|
38 |
while(cp != (CACHE *)NULL) { |
39 |
if(strcmp(cp->so_filenm, so_filenm) == 0) |
40 |
goto found; |
41 |
cp = cp->next; |
42 |
} |
43 |
|
44 |
nls[0].n_name = "__DYNAMIC"; |
45 |
nls[1].n_name = "_end"; |
46 |
nls[2].n_name = (char *)NULL; |
47 |
|
48 |
if(nlist(so_filenm, nls) != 0) { |
49 |
fprintf(stderr,"%s: cannot load symbols from %s\n", |
50 |
argv0,so_filenm); |
51 |
++nerrors; |
52 |
return; |
53 |
} |
54 |
|
55 |
cp = (CACHE *)malloc(sizeof(CACHE)); |
56 |
cp->so_filenm = strdup(so_filenm); |
57 |
cp->length_data = (nls[1].n_value - nls[0].n_value); |
58 |
cp->incore_data = (char *)((long)dlsym(handle,"end") - cp->length_data); |
59 |
cp->original_data = (char *)malloc(cp->length_data); |
60 |
memcpy(cp->original_data, cp->incore_data, cp->length_data); |
61 |
cp->next = chd; |
62 |
chd = cp; |
63 |
|
64 |
if(vflag) |
65 |
fprintf(stderr,"%s dataseg=0x%08lx len(dataseg)=%ld\n", |
66 |
so_filenm, (long)cp->incore_data, cp->length_data); |
67 |
found: |
68 |
|
69 |
np->length_data[0] = cp->length_data; |
70 |
np->incore_data[0] = cp->incore_data; |
71 |
np->original_data[0] = cp->original_data; |
72 |
|
73 |
np->private_data[0] = (char *)malloc(cp->length_data); |
74 |
memcpy(np->private_data[0], cp->original_data, cp->length_data); |
75 |
} |