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*/
46int
47execle(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