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
|
/* ISC license. */
#include <string.h>
#include <skalibs/sgetopt.h>
#include <skalibs/strerr2.h>
#include <skalibs/djbunix.h>
#include <execline/execline.h>
#define USAGE "tryexec [ -n ] [ -c ] [ -l ] [ -a argv0 ] { command... } remainder..."
int main (int argc, char const **argv, char const *const *envp)
{
char const *env_zero[1] = { 0 } ;
char const *executable = 0 ;
char const *argv0 = 0 ;
char const **dom = 0 ;
char const **sub = 0 ;
char const *const *dom_envp = envp ;
int not = 0, dash = 0 ;
PROG = "tryexec" ;
{
subgetopt_t l = SUBGETOPT_ZERO ;
for (;;)
{
int opt = subgetopt_r(argc, argv, "ncla:", &l) ;
if (opt == -1) break ;
switch (opt)
{
case 'n' : not = 1 ; break ;
case 'c' : dom_envp = env_zero ; break ;
case 'l' : dash = 1 ; break ;
case 'a' : argv0 = l.arg ; break ;
default : strerr_dieusage(100, USAGE) ;
}
}
argc -= l.ind ; argv += l.ind ;
}
{
int argc1 = el_semicolon(argv) ;
if (!argc1) strerr_dief1x(100, "empty block") ;
if (argc1 >= argc) strerr_dief1x(100, "unterminated block") ;
if (not && argc1 == argc - 1)
strerr_dief1x(100, "empty remainder not allowed with -n") ;
argv[argc1] = 0 ;
dom = argv + not * (argc1 + 1) ;
sub = argv + !not * (argc1 + 1) ;
}
executable = dom[0] ;
if (argv0) dom[0] = argv0 ;
if (dash)
{
size_t n = strlen(dom[0]) ;
char dashed[n+2] ;
dashed[0] = '-' ;
memcpy(dashed+1, dom[0], n+1) ;
dom[0] = dashed ;
pathexec_run(executable, dom, dom_envp) ;
}
else pathexec_run(executable, dom, dom_envp) ;
xpathexec0_run(sub, envp) ;
}
|
