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
|
#include <errno.h>
#include <stdlib.h>
#include <string.h>
#include <unistd.h>
int main(int argc, char** argv) {
#include "toolname.h"
#include "link_args.h"
char *s, *path, *newpath, *prgdir, *cwd, **newargv, *tool;
size_t size, s_s, s_cwd, s_prgdir, s_path, s_toolname;
int i;
for (link_args_c =0; link_args[link_args_c] != NULL; link_args_c++) {}
if ((prgdir=strdup(argv[0])) == NULL) {
return 66;
}
s = strrchr(prgdir, '/');
if (s == NULL) {
prgdir = getenv("CC_REAL_DIRECTORY");
if (prgdir == NULL) {
prgdir = ".";
}
} else {
*s = '\0';
}
if (*prgdir != '/') {
/* called by non-absolute path, need to prefix with cwd */
for (size = 1024;; size *= 2) {
if ((cwd=(char*)malloc(size)) == NULL) {
return 66;
}
if (getcwd(cwd, size) != NULL) {
break;
}
if (errno != ERANGE) {
return 66;
}
}
s = prgdir;
s_s = strlen(s);
s_cwd = strlen(cwd);
if ((prgdir=(char*)malloc(s_cwd + 1 + s_s + 1))==NULL) {
return 66;
}
strcpy(prgdir, cwd);
strcpy(&prgdir[s_cwd], "/");
strcpy(&prgdir[s_cwd+1], s);
}
/* prgdir is now our best guess for the directory argv[0] is located in */
path = getenv("PATH");
if (path == NULL) {
path = prgdir;
} else {
s_path = strlen(path);
s_prgdir = strlen(prgdir);
if ((newpath=(char*)malloc(s_prgdir + 1 + s_path + 1)) == NULL) {
return 66;
}
strcpy(newpath, prgdir);
strcpy(&newpath[s_prgdir], ":");
strcpy(&newpath[s_prgdir+1], path);
path = newpath;
}
setenv("PATH", path, 1);
if ((newargv=(char**)malloc((argc + link_args_c + 1)*sizeof(char*)))==NULL) {
return 66;
}
for (i=0; i<argc; i++) {
newargv[i] = argv[i];
}
for (i=0; i < link_args_c; i++) {
newargv[argc+i] = link_args[i];
}
newargv[argc+link_args_c] = NULL;
s_prgdir = strlen(prgdir);
s_toolname = strlen(toolname);
if ((tool=(char*)malloc(s_prgdir+1+s_toolname+1))==NULL) {
return 66;
}
strcpy(tool, prgdir);
strcpy(&tool[s_prgdir], "/");
strcpy(&tool[s_prgdir+1], toolname);
execv(tool, newargv);
return 65; /* exec failed */
}
|
