1N/A/***********************************************************************
1N/A* *
1N/A* This software is part of the ast package *
1N/A* Copyright (c) 1985-2011 AT&T Intellectual Property *
1N/A* and is licensed under the *
1N/A* Common Public License, Version 1.0 *
1N/A* by AT&T Intellectual Property *
1N/A* *
1N/A* A copy of the License is available at *
1N/A* http://www.opensource.org/licenses/cpl1.0.txt *
1N/A* (with md5 checksum 059e8cd6165cb4c31e351f2b69388fd9) *
1N/A* *
1N/A* Information and Software Systems Research *
1N/A* AT&T Research *
1N/A* Florham Park NJ *
1N/A* *
1N/A* Glenn Fowler <gsf@research.att.com> *
1N/A* David Korn <dgk@research.att.com> *
1N/A* Phong Vo <kpv@research.att.com> *
1N/A* *
1N/A***********************************************************************/
1N/A#pragma prototyped
1N/A
1N/A/*
1N/A * OBSOLETE 20030321 -- use spawnveg()
1N/A */
1N/A
1N/A#include <ast_lib.h>
1N/A
1N/A#if !_lib_spawnve
1N/A#define spawnve ______spawnve
1N/A#endif
1N/A#if !_lib_spawnvpe
1N/A#define spawnvpe ______spawnvpe
1N/A#endif
1N/A#if !_lib_spawnvp
1N/A#define spawnvp ______spawnvp
1N/A#endif
1N/A#if !_lib_spawnlp
1N/A#define spawnlp ______spawnlp
1N/A#endif
1N/A
1N/A#include <ast.h>
1N/A#include <error.h>
1N/A
1N/A#if !_lib_spawnve
1N/A#undef spawnve
1N/A#endif
1N/A#if !_lib_spawnvpe
1N/A#undef spawnvpe
1N/A#endif
1N/A#if !_lib_spawnvp
1N/A#undef spawnvp
1N/A#endif
1N/A#if !_lib_spawnlp
1N/A#undef spawnlp
1N/A#endif
1N/A
1N/A#if defined(__EXPORT__)
1N/A#define extern __EXPORT__
1N/A#endif
1N/A
1N/A#if _lib_spawnve
1N/A
1N/ANoN(spawnve)
1N/A
1N/A#else
1N/A
1N/Aextern pid_t
1N/Aspawnve(const char* cmd, char* const argv[], char* const envv[])
1N/A{
1N/A return spawnveg(cmd, argv, envv, 0);
1N/A}
1N/A
1N/A#endif
1N/A
1N/A#if _lib_spawnvpe
1N/A
1N/ANoN(spawnvpe)
1N/A
1N/A#else
1N/A
1N/Aextern pid_t
1N/Aspawnvpe(const char* name, char* const argv[], char* const envv[])
1N/A{
1N/A register const char* path = name;
1N/A pid_t pid;
1N/A char buffer[PATH_MAX];
1N/A
1N/A if (*path != '/')
1N/A path = pathpath(name, NULL, PATH_REGULAR|PATH_EXECUTE, buffer, sizeof(buffer));
1N/A if ((pid = spawnve(path, argv, envv)) >= 0)
1N/A return pid;
1N/A if (errno == ENOEXEC)
1N/A {
1N/A register char** newargv;
1N/A register char** ov;
1N/A register char** nv;
1N/A
1N/A for (ov = (char**)argv; *ov++;);
1N/A if (newargv = newof(0, char*, ov + 1 - (char**)argv, 0))
1N/A {
1N/A nv = newargv;
1N/A *nv++ = "sh";
1N/A *nv++ = (char*)path;
1N/A ov = (char**)argv;
1N/A while (*nv++ = *++ov);
1N/A path = pathshell();
1N/A pid = spawnve(path, newargv, environ);
1N/A free(newargv);
1N/A }
1N/A else
1N/A errno = ENOMEM;
1N/A }
1N/A return pid;
1N/A}
1N/A
1N/A#endif
1N/A
1N/A#if _lib_spawnvp
1N/A
1N/ANoN(spawnvp)
1N/A
1N/A#else
1N/A
1N/Aextern pid_t
1N/Aspawnvp(const char* name, char* const argv[])
1N/A{
1N/A return spawnvpe(name, argv, environ);
1N/A}
1N/A
1N/A#endif
1N/A
1N/A#if _lib_spawnlp
1N/A
1N/ANoN(spawnlp)
1N/A
1N/A#else
1N/A
1N/Aextern pid_t
1N/Aspawnlp(const char* name, const char* arg, ...)
1N/A{
1N/A va_list ap;
1N/A pid_t pid;
1N/A
1N/A va_start(ap, arg);
1N/A pid = spawnvp(name, (char* const*)&arg);
1N/A va_end(ap);
1N/A return pid;
1N/A}
1N/A
1N/A#endif