1251875Speter/* Licensed to the Apache Software Foundation (ASF) under one or more 2251875Speter * contributor license agreements. See the NOTICE file distributed with 3251875Speter * this work for additional information regarding copyright ownership. 4251875Speter * The ASF licenses this file to You under the Apache License, Version 2.0 5251875Speter * (the "License"); you may not use this file except in compliance with 6251875Speter * the License. You may obtain a copy of the License at 7251875Speter * 8251875Speter * http://www.apache.org/licenses/LICENSE-2.0 9251875Speter * 10251875Speter * Unless required by applicable law or agreed to in writing, software 11251875Speter * distributed under the License is distributed on an "AS IS" BASIS, 12251875Speter * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. 13251875Speter * See the License for the specific language governing permissions and 14251875Speter * limitations under the License. 15251875Speter */ 16251875Speter 17251875Speter#define APR_WANT_STRFUNC 18251875Speter#include "apr_want.h" 19251875Speter#include "apr.h" 20251875Speter#include "apr_private.h" 21251875Speter#include "apr_env.h" 22251875Speter#include "apr_strings.h" 23251875Speter 24251875Speter#if APR_HAVE_UNISTD_H 25251875Speter#include <unistd.h> 26251875Speter#endif 27251875Speter#if APR_HAVE_STDLIB_H 28251875Speter#include <stdlib.h> 29251875Speter#endif 30251875Speter 31251875SpeterAPR_DECLARE(apr_status_t) apr_env_get(char **value, 32251875Speter const char *envvar, 33251875Speter apr_pool_t *pool) 34251875Speter{ 35251875Speter#ifdef HAVE_GETENV 36251875Speter 37251875Speter char *val = getenv(envvar); 38251875Speter if (!val) 39251875Speter return APR_ENOENT; 40251875Speter *value = val; 41251875Speter return APR_SUCCESS; 42251875Speter 43251875Speter#else 44251875Speter return APR_ENOTIMPL; 45251875Speter#endif 46251875Speter} 47251875Speter 48251875Speter 49251875SpeterAPR_DECLARE(apr_status_t) apr_env_set(const char *envvar, 50251875Speter const char *value, 51251875Speter apr_pool_t *pool) 52251875Speter{ 53251875Speter#if defined(HAVE_SETENV) 54251875Speter 55251875Speter if (0 > setenv(envvar, value, 1)) 56251875Speter return APR_ENOMEM; 57251875Speter return APR_SUCCESS; 58251875Speter 59251875Speter#elif defined(HAVE_PUTENV) 60251875Speter 61251875Speter if (0 > putenv(apr_pstrcat(pool, envvar, "=", value, NULL))) 62251875Speter return APR_ENOMEM; 63251875Speter return APR_SUCCESS; 64251875Speter 65251875Speter#else 66251875Speter return APR_ENOTIMPL; 67251875Speter#endif 68251875Speter} 69251875Speter 70251875Speter 71251875SpeterAPR_DECLARE(apr_status_t) apr_env_delete(const char *envvar, apr_pool_t *pool) 72251875Speter{ 73251875Speter#ifdef HAVE_UNSETENV 74251875Speter 75251875Speter unsetenv(envvar); 76251875Speter return APR_SUCCESS; 77251875Speter 78251875Speter#else 79251875Speter /* hint: some platforms allow envvars to be unset via 80251875Speter * putenv("varname")... that isn't Single Unix spec, 81251875Speter * but if your platform doesn't have unsetenv() it is 82251875Speter * worth investigating and potentially adding a 83251875Speter * configure check to decide when to use that form of 84251875Speter * putenv() here 85251875Speter */ 86251875Speter return APR_ENOTIMPL; 87251875Speter#endif 88251875Speter} 89