1/*************************************************************************** 2 * _ _ ____ _ 3 * Project ___| | | | _ \| | 4 * / __| | | | |_) | | 5 * | (__| |_| | _ <| |___ 6 * \___|\___/|_| \_\_____| 7 * 8 * Copyright (C) 1998 - 2009, Daniel Stenberg, <daniel@haxx.se>, et al. 9 * 10 * This software is licensed as described in the file COPYING, which 11 * you should have received as part of this distribution. The terms 12 * are also available at http://curl.haxx.se/docs/copyright.html. 13 * 14 * You may opt to use, copy, modify, merge, publish, distribute and/or sell 15 * copies of the Software, and permit persons to whom the Software is 16 * furnished to do so, under the terms of the COPYING file. 17 * 18 * This software is distributed on an "AS IS" basis, WITHOUT WARRANTY OF ANY 19 * KIND, either express or implied. 20 * 21 ***************************************************************************/ 22 23#include "setup.h" 24 25#include <stdio.h> 26#include <stdlib.h> 27#include <string.h> 28 29#ifdef __VMS 30#include <unixlib.h> 31#endif 32 33#include <curl/curl.h> 34#include "curl_memory.h" 35 36#include "memdebug.h" 37 38static 39char *GetEnv(const char *variable) 40{ 41#ifdef _WIN32_WCE 42 return NULL; 43#else 44#ifdef WIN32 45 char env[MAX_PATH]; /* MAX_PATH is from windef.h */ 46 char *temp = getenv(variable); 47 env[0] = '\0'; 48 if(temp != NULL) 49 ExpandEnvironmentStrings(temp, env, sizeof(env)); 50 return (env[0] != '\0')?strdup(env):NULL; 51#else 52 char *env = getenv(variable); 53#ifdef __VMS 54 if(env && strcmp("HOME",variable) == 0) 55 env = decc_translate_vms(env); 56#endif 57 return (env && env[0])?strdup(env):NULL; 58#endif 59#endif 60} 61 62char *curl_getenv(const char *v) 63{ 64 return GetEnv(v); 65} 66