compat_putenv.c revision 1.2 1 1.2 christos /* $NetBSD: compat_putenv.c,v 1.2 2012/04/22 15:55:41 christos Exp $ */
2 1.1 christos
3 1.1 christos /*-
4 1.1 christos * Copyright (c) 2012 The NetBSD Foundation, Inc.
5 1.1 christos * All rights reserved.
6 1.1 christos *
7 1.1 christos * This code is derived from software contributed to The NetBSD Foundation
8 1.1 christos * by Christos Zoulas.
9 1.1 christos *
10 1.1 christos * Redistribution and use in source and binary forms, with or without
11 1.1 christos * modification, are permitted provided that the following conditions
12 1.1 christos * are met:
13 1.1 christos * 1. Redistributions of source code must retain the above copyright
14 1.1 christos * notice, this list of conditions and the following disclaimer.
15 1.1 christos * 2. Redistributions in binary form must reproduce the above copyright
16 1.1 christos * notice, this list of conditions and the following disclaimer in the
17 1.1 christos * documentation and/or other materials provided with the distribution.
18 1.1 christos *
19 1.1 christos * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
20 1.1 christos * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
21 1.1 christos * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
22 1.1 christos * PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
23 1.1 christos * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
24 1.1 christos * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
25 1.1 christos * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
26 1.1 christos * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
27 1.1 christos * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
28 1.1 christos * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
29 1.1 christos * POSSIBILITY OF SUCH DAMAGE.
30 1.1 christos */
31 1.1 christos #include <sys/cdefs.h>
32 1.1 christos #if defined(LIBC_SCCS) && !defined(lint)
33 1.2 christos __RCSID("$NetBSD: compat_putenv.c,v 1.2 2012/04/22 15:55:41 christos Exp $");
34 1.1 christos #endif /* LIBC_SCCS and not lint */
35 1.1 christos
36 1.1 christos #define __LIBC12_SOURCE__
37 1.1 christos #include "namespace.h"
38 1.1 christos
39 1.1 christos #include <assert.h>
40 1.2 christos #include <errno.h>
41 1.2 christos #include <stdlib.h>
42 1.1 christos #include <string.h>
43 1.1 christos #include <compat/include/stdlib.h>
44 1.1 christos
45 1.2 christos #include "env.h"
46 1.1 christos #include "reentrant.h"
47 1.1 christos #include "local.h"
48 1.1 christos
49 1.1 christos #ifdef __weak_alias
50 1.1 christos __weak_alias(putenv,_putenv)
51 1.1 christos #endif
52 1.1 christos
53 1.2 christos __warn_references(putenv,
54 1.1 christos "warning: reference to compatibility putenv();"
55 1.1 christos " include <stdlib.h> for correct reference")
56 1.1 christos
57 1.1 christos /*
58 1.1 christos * putenv(name) --
59 1.2 christos * This version implicitly copies the string for compatibility.
60 1.1 christos */
61 1.1 christos int
62 1.1 christos putenv(char *name)
63 1.1 christos {
64 1.2 christos size_t l_name;
65 1.1 christos char *copy;
66 1.2 christos int rv;
67 1.1 christos
68 1.1 christos _DIAGASSERT(name != NULL);
69 1.1 christos
70 1.2 christos l_name = __envvarnamelen(name, true);
71 1.2 christos if (l_name == 0) {
72 1.2 christos errno = EINVAL;
73 1.2 christos return -1;
74 1.2 christos }
75 1.2 christos
76 1.1 christos if ((copy = strdup(name)) == NULL)
77 1.1 christos return -1;
78 1.2 christos copy[l_name++] = '\0';
79 1.2 christos
80 1.2 christos rv = setenv(copy, copy + l_name, 1);
81 1.1 christos
82 1.2 christos free(copy);
83 1.2 christos return rv;
84 1.1 christos }
85