_stdlib.cpp

Go to the documentation of this file.

#include <dcl/Config.h>     
 
#include <errno.h>
#if defined(_AIX) || defined(__sun__)
    #include <alloca.h>
#endif
#include <stdlib.h>         // alloca
#include <string.h>         // strchr, strlen
#include <dcl/_stdlib.h>
 
#include <dcl/Object.h>     // __T(str)
#include <dcl/String.h>
 
#include "__strumbs.h"
 
#if __DCL_HAVE_THIS_FILE__
#undef __THIS_FILE__
static const char_t __UNUSED__ __THIS_FILE__[] = __T("dcl/_stdlib.cpp");
#endif
 
__DCL_BEGIN_NAMESPACE
 
#ifdef __WINNT__
DCLCAPI int setenv(const char* _name, const char* _value, int _overwrite)
{
    if (_name == NULL || *_name == '\0' || strchr(_name, '=')
        || _value == NULL) {
        errno = EINVAL;
        return -1;
    }
 
    if (!_overwrite && getenv(_name)) {
        return 0;
    }
 
    char* sz = (char*) alloca(strlen(_name) + strlen(_value) + 2);
    strcpy(sz, _name);
    strcat(sz, "=");
    strcat(sz, _value);
    return _putenv(sz);
}
 
DCLCAPI int unsetenv(const char* _name)
{
    if (_name == NULL || *_name == '\0' || strchr(_name, '=')) {
        errno = EINVAL;
        return -1;
    }
 
    char* sz = (char*) alloca(strlen(_name) + 2);
    strcpy(sz, _name);
    strcat(sz, "=");
    return _putenv(sz);
}
#endif
 
int __getenv(const String& _name, String& _value)
{
    STRTOMBS_ER(_name, name);
    char* s = getenv(name);
    if (s) {
        MBSTOSTR_ER(s, (size_t) -1, _value);
        return 0;
    }
    errno = ENOENT;
    return -1;
}
 
int __setenv(const String& _name, const String& _value, bool _overwrite)
{
    STRTOMBS_ER(_name, name);
    STRTOMBS_ER(_value, value);
    return setenv(name, value, _overwrite ? 1 : 0);
}
 
int __unsetenv(const String& _name)
{
    STRTOMBS_ER(_name, name);
    return unsetenv(name);
}
 
#ifndef __WINNT__
int __realpath(const String& _path, String& _resolved)
{
    char resolved[PATH_MAX + 1];
    STRTOMBS_ER(_path, path);
    char* s = ::realpath(path, resolved);
    if (s) {
        MBSTOSTR_ER(s, (size_t)-1, _resolved);
        return 0;
    }
    return -1;
}
#endif  // __WINNT__
 
__DCL_END_NAMESPACE