File: exec.c

package info (click to toggle)
purelibc 1.0.8-1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid, trixie
  • size: 192 kB
  • sloc: ansic: 2,271; makefile: 3
file content (122 lines) | stat: -rw-r--r-- 3,083 bytes parent folder | download | duplicates (3)
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
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
/* This is part of pure_libc (a project related to ViewOS and Virtual Square)
 * 
 * exec.c: exec to execve conversion
 * 
 * Copyright 2006-2017 Renzo Davoli University of Bologna - Italy
 * 
 * This program is free software; you can redistribute it and/or
 * modify it under the terms of the GNU Lesser General Public
 * License as published by the Free Software Foundation; either
 * version 2.1 of the License, or (at your option) any later version.
 * 
 * The GNU C Library is distributed in the hope that it will be useful,
 * but WITHOUT ANY WARRANTY; without even the implied warranty of
 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 * Lesser General Public License for more details.
 * 
 * You should have received a copy of the GNU Lesser General Public
 * License along with the GNU C Library; if not, write to the Free
 * Software Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA
 * 02110-1301, USA.
 */ 

#include <config.h>
#include <unistd.h>
#include <assert.h>
#include <stdarg.h>
#include <alloca.h>
#include <string.h>
#include <errno.h>
#include <stdlib.h>
#include <limits.h>

#define _PURE_DEFAULT_PATH "/bin:/usr/bin"

int execl(const char *path, const char *arg, ...){
	va_list ap;
	int argc=2,i;
	va_start(ap,arg);
	while(va_arg(ap,char *) != 0)
		argc++;
	va_end(ap);
	char *argv[argc];
	argv[0]=(char *)arg;
	va_start(ap,arg);
	for (i=1;i<argc;i++)
		argv[i]=va_arg(ap,char*);
	argv[i]=(char *) 0;
	va_end(ap);
	return execve(path,argv,environ);
}

int execlp(const char *file, const char *arg, ...){
	va_list ap;
	int argc=2,i;
	va_start(ap,arg);
	while(va_arg(ap,char *) != 0)
		argc++;
	va_end(ap);
	char *argv[argc];
	argv[0]=(char *)arg;
	va_start(ap,arg);
	for (i=1;i<argc;i++)
		argv[i]=va_arg(ap,char*);
	va_end(ap);
	return execvp(file,argv);
}

int execle(const char *path, const char *arg , .../*, char * const envp[]*/){
	va_list ap;
	int argc=2,i;
	char **envp;
	va_start(ap,arg);
	while(va_arg(ap,char *) != 0)
		argc++;
	va_end(ap);
	char *argv[argc];
	argv[0]=(char *)arg;
	va_start(ap,arg);
	for (i=1;i<argc;i++)
		argv[i]=va_arg(ap,char*);
	envp=va_arg(ap,char**);
	va_end(ap);
	return execve(path,argv,envp);
}

int execv(const char *path, char *const argv[]){
	return execve(path,argv,environ);
}

int execvp(const char *file, char *const argv[]){
	if(strchr(file,'/') != NULL)
		return execve(file,argv,environ);
	else {
		char *path;
		char *envpath;
		char *pathelem;
		char buf[PATH_MAX];
		if ((envpath=getenv("PATH")) == NULL)
			envpath=_PURE_DEFAULT_PATH;
		path=strdup(envpath);
		while((pathelem=strsep(&path,":")) != NULL){
			if (*pathelem != 0) {
				register int i,j;
				for (i=0; i<PATH_MAX && pathelem[i]; i++)
					buf[i]=pathelem[i];
				if(buf[i-1] != '/' && i<PATH_MAX)
					buf[i++]='/';
				for (j=0; i<PATH_MAX && file[j]; j++,i++)
					buf[i]=file[j];
				buf[i]=0;
				if (execve(buf,argv,environ)<0 &&
						((errno != ENOENT) && (errno != ENOTDIR) && (errno != EACCES))) {
					free(path);
					return -1;
				}
			}
		}
		free(path);
		errno = ENOENT;
		return -1;
	}
}