Return to execl.c CVS log

Up to [cvs.NetBSD.org] / src / lib / libc / gen

Annotation of src/lib/libc/gen/execl.c, Revision 1.17

1.17    ! joerg       1: /*     $NetBSD: execl.c,v 1.16 2008/01/09 11:26:03 simonb Exp $        */
1.1       jtc         2:
                      3: /*-
                      4:  * Copyright (c) 1991, 1993
                      5:  *     The Regents of the University of California.  All rights reserved.
                      6:  *
                      7:  * Redistribution and use in source and binary forms, with or without
                      8:  * modification, are permitted provided that the following conditions
                      9:  * are met:
                     10:  * 1. Redistributions of source code must retain the above copyright
                     11:  *    notice, this list of conditions and the following disclaimer.
                     12:  * 2. Redistributions in binary form must reproduce the above copyright
                     13:  *    notice, this list of conditions and the following disclaimer in the
                     14:  *    documentation and/or other materials provided with the distribution.
1.11      agc        15:  * 3. Neither the name of the University nor the names of its contributors
1.1       jtc        16:  *    may be used to endorse or promote products derived from this software
                     17:  *    without specific prior written permission.
                     18:  *
                     19:  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
                     20:  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
                     21:  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
                     22:  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
                     23:  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
                     24:  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
                     25:  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
                     26:  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
                     27:  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
                     28:  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
                     29:  * SUCH DAMAGE.
                     30:  */
                     31:
1.3       christos   32: #include <sys/cdefs.h>
1.1       jtc        33: #if defined(LIBC_SCCS) && !defined(lint)
                     34: #if 0
                     35: static char sccsid[] = "@(#)exec.c     8.1 (Berkeley) 6/4/93";
                     36: #else
1.17    ! joerg      37: __RCSID("$NetBSD: execl.c,v 1.16 2008/01/09 11:26:03 simonb Exp $");
1.1       jtc        38: #endif
                     39: #endif /* LIBC_SCCS and not lint */
                     40:
1.4       jtc        41: #include "namespace.h"
1.15      he         42: #include <errno.h>
1.8       wiz        43: #include <stdarg.h>
1.1       jtc        44: #include <stdlib.h>
                     45: #include <unistd.h>
1.6       kleink     46: #include "reentrant.h"
1.1       jtc        47:
1.4       jtc        48: #ifdef __weak_alias
1.7       mycroft    49: __weak_alias(execl,_execl)
1.4       jtc        50: #endif
                     51:
1.1       jtc        52:
                     53: extern char **environ;
                     54:
                     55: int
                     56: execl(const char *name, const char *arg, ...)
                     57: {
1.6       kleink     58:        int r;
1.1       jtc        59:        va_list ap;
                     60:        char **argv;
                     61:        int i;
                     62:
1.8       wiz        63:        va_start(ap, arg);
1.5       mjacob     64:        for (i = 2; va_arg(ap, char *) != NULL; i++)
1.13      christos   65:                continue;
1.1       jtc        66:        va_end(ap);
                     67:
1.14      rtr        68:        if ((argv = alloca(i * sizeof (char *))) == NULL) {
                     69:                errno = ENOMEM;
                     70:                return -1;
                     71:        }
1.1       jtc        72:
1.8       wiz        73:        va_start(ap, arg);
1.13      christos   74:        argv[0] = __UNCONST(arg);
                     75:        for (i = 1; (argv[i] = va_arg(ap, char *)) != NULL; i++)
                     76:                continue;
1.1       jtc        77:        va_end(ap);
                     78:
1.6       kleink     79:        r = execve(name, argv, environ);
1.13      christos   80:        return r;
1.1       jtc        81: }