xref: /titanic_41/usr/src/lib/libc/port/sys/execle.c (revision 0bb073995ac5a95bd35f2dd790df1ea3d8c2d507)
1 /*
2  * CDDL HEADER START
3  *
4  * The contents of this file are subject to the terms of the
5  * Common Development and Distribution License (the "License").
6  * You may not use this file except in compliance with the License.
7  *
8  * You can obtain a copy of the license at usr/src/OPENSOLARIS.LICENSE
9  * or http://www.opensolaris.org/os/licensing.
10  * See the License for the specific language governing permissions
11  * and limitations under the License.
12  *
13  * When distributing Covered Code, include this CDDL HEADER in each
14  * file and include the License file at usr/src/OPENSOLARIS.LICENSE.
15  * If applicable, add the following below this CDDL HEADER, with the
16  * fields enclosed by brackets "[]" replaced with your own identifying
17  * information: Portions Copyright [yyyy] [name of copyright owner]
18  *
19  * CDDL HEADER END
20  */
21 
22 /*
23  * Copyright 2008 Sun Microsystems, Inc.  All rights reserved.
24  * Use is subject to license terms.
25  */
26 
27 /*	Copyright (c) 1988 AT&T	*/
28 /*	  All Rights Reserved  	*/
29 
30 #pragma ident	"%Z%%M%	%I%	%E% SMI"
31 
32 /*
33  *	execle(file, arg1, arg2, ..., 0, envp)
34  */
35 
36 #pragma weak _execle = execle
37 
38 #include "lint.h"
39 #include <sys/types.h>
40 #include <alloca.h>
41 #include <malloc.h>
42 #include <stdarg.h>
43 #include <unistd.h>
44 
45 /*VARARGS1*/
46 int
47 execle(const char *file, const char *arg0, ...)
48 {
49 	char **argp;
50 	va_list args;
51 	char **argvec;
52 	register  char  **environmentp;
53 	int err;
54 	int nargs = 0;
55 	char *nextarg;
56 
57 	/*
58 	 * count the number of arguments in the variable argument list
59 	 * and allocate an argument vector for them on the stack,
60 	 * adding space at the end for a terminating null pointer
61 	 */
62 
63 	va_start(args, arg0);
64 	while (va_arg(args, char *) != (char *)0) {
65 		nargs++;
66 	}
67 
68 	/*
69 	 * save the environment pointer, which is at the end of the
70 	 * variable argument list
71 	 */
72 
73 	environmentp = va_arg(args, char **);
74 	va_end(args);
75 
76 	/*
77 	 * load the arguments in the variable argument list
78 	 * into the argument vector, and add the terminating null pointer
79 	 */
80 
81 	va_start(args, arg0);
82 	/* workaround for bugid 1242839 */
83 	argvec = (char **)alloca((size_t)((nargs + 2) * sizeof (char *)));
84 	argp = argvec;
85 	*argp++ = (char *)arg0;
86 	while ((nextarg = va_arg(args, char *)) != (char *)0) {
87 		*argp++ = nextarg;
88 	}
89 	va_end(args);
90 	*argp = (char *)0;
91 
92 	/*
93 	 * call execve()
94 	 */
95 
96 	err = execve(file, argvec, environmentp);
97 	return (err);
98 }
99