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
|
/* $NetBSD: buwrapper.c,v 1.1 1999/01/04 22:37:30 tv Exp $ */
#include <err.h>
#include <stdlib.h>
#include <string.h>
#include <sysexits.h>
#include <unistd.h>
/*
* Wrapper for binutils programs.
*
* This frontend sets the appropriate environment variables that tell
* binutils programs which target will be used.
*/
static const char binsubdir[] = "libexec/binutils";
#define PATHLEN sizeof(PREFIX) + sizeof(binsubdir) + 20
int main(int argc, char **argv) {
char path[PATHLEN], *p, *prog;
/* quickly find last part of path component */
if (p = strrchr(argv[0], '/'))
p++;
else
p = argv[0];
if (prog = strrchr(p, '-'))
prog++;
else
prog = p;
/* make program pathname */
snprintf(path, PATHLEN, "%s/%s/%s", PREFIX, binsubdir, prog);
/* set up environment */
setenv("GNUTARGET", GNUTARGET, 1);
#ifdef LDEMULATION
setenv("LDEMULATION", LDEMULATION, 1);
#endif
#ifdef LD_RPATH_LINK
setenv("LD_RPATH_LINK", LD_RPATH_LINK, 1);
#endif
/* run it! */
execv(path, argv);
/* we shouldn't get here. */
err(EX_OSERR, "(buwrapper): exec %s", path);
}
|
