1 /***********************************************************************
2 *                                                                      *
3 *               This software is part of the ast package               *
4 *          Copyright (c) 1985-2011 AT&T Intellectual Property          *
5 *                      and is licensed under the                       *
6 *                 Eclipse Public License, Version 1.0                  *
7 *                    by AT&T Intellectual Property                     *
8 *                                                                      *
9 *                A copy of the License is available at                 *
10 *          http://www.eclipse.org/org/documents/epl-v10.html           *
11 *         (with md5 checksum b35adb5213ca9657e911e9befb180842)         *
12 *                                                                      *
13 *              Information and Software Systems Research               *
14 *                            AT&T Research                             *
15 *                           Florham Park NJ                            *
16 *                                                                      *
17 *                 Glenn Fowler <gsf@research.att.com>                  *
18 *                  David Korn <dgk@research.att.com>                   *
19 *                   Phong Vo <kpv@research.att.com>                    *
20 *                                                                      *
21 ***********************************************************************/
22 #pragma prototyped
23 
24 #include <ast_lib.h>
25 
26 #if _lib_execvpe
27 
28 #include <ast.h>
29 
30 NoN(execvpe)
31 
32 #else
33 
34 #if defined(__EXPORT__)
35 __EXPORT__ int execvpe(const char*, char* const[], char* const[]);
36 #endif
37 
38 #include <ast.h>
39 #include <errno.h>
40 
41 #if defined(__EXPORT__)
42 #define extern	__EXPORT__
43 #endif
44 
45 extern int
46 execvpe(const char* name, char* const argv[], char* const envv[])
47 {
48 	register const char*	path = name;
49 	char			buffer[PATH_MAX];
50 
51 	if (*path != '/' && !(path = pathpath(name, NULL, PATH_REGULAR|PATH_EXECUTE, buffer, sizeof(buffer))))
52 		path = name;
53 	execve(path, argv, envv);
54 	if (errno == ENOEXEC)
55 	{
56 		register char**	newargv;
57 		register char**	ov;
58 		register char**	nv;
59 
60 		for (ov = (char**)argv; *ov++;);
61 		if (newargv = newof(0, char*, ov + 1 - (char**)argv, 0))
62 		{
63 			nv = newargv;
64 			*nv++ = "sh";
65 			*nv++ = (char*)path;
66 			ov = (char**)argv;
67 			while (*nv++ = *++ov);
68 			path = pathshell();
69 			execve(path, newargv, envv);
70 			free(newargv);
71 		}
72 		else
73 			errno = ENOMEM;
74 	}
75 	return -1;
76 }
77 
78 #endif
79