1 1.3 christos /* $NetBSD: compat_putenv.c,v 1.3 2015/01/20 18:31:24 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.3 christos __RCSID("$NetBSD: compat_putenv.c,v 1.3 2015/01/20 18:31:24 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 "local.h" 47 1.1 christos 48 1.1 christos #ifdef __weak_alias 49 1.1 christos __weak_alias(putenv,_putenv) 50 1.1 christos #endif 51 1.1 christos 52 1.2 christos __warn_references(putenv, 53 1.1 christos "warning: reference to compatibility putenv();" 54 1.1 christos " include <stdlib.h> for correct reference") 55 1.1 christos 56 1.1 christos /* 57 1.1 christos * putenv(name) -- 58 1.2 christos * This version implicitly copies the string for compatibility. 59 1.1 christos */ 60 1.1 christos int 61 1.1 christos putenv(char *name) 62 1.1 christos { 63 1.2 christos size_t l_name; 64 1.1 christos char *copy; 65 1.2 christos int rv; 66 1.1 christos 67 1.1 christos _DIAGASSERT(name != NULL); 68 1.1 christos 69 1.2 christos l_name = __envvarnamelen(name, true); 70 1.2 christos if (l_name == 0) { 71 1.2 christos errno = EINVAL; 72 1.2 christos return -1; 73 1.2 christos } 74 1.2 christos 75 1.1 christos if ((copy = strdup(name)) == NULL) 76 1.1 christos return -1; 77 1.2 christos copy[l_name++] = '\0'; 78 1.2 christos 79 1.2 christos rv = setenv(copy, copy + l_name, 1); 80 1.1 christos 81 1.2 christos free(copy); 82 1.2 christos return rv; 83 1.1 christos } 84