1*0a6a1f1dSLionel Sambuc //
2*0a6a1f1dSLionel Sambuc // Automated Testing Framework (atf)
3*0a6a1f1dSLionel Sambuc //
4*0a6a1f1dSLionel Sambuc // Copyright (c) 2007 The NetBSD Foundation, Inc.
5*0a6a1f1dSLionel Sambuc // All rights reserved.
6*0a6a1f1dSLionel Sambuc //
7*0a6a1f1dSLionel Sambuc // Redistribution and use in source and binary forms, with or without
8*0a6a1f1dSLionel Sambuc // modification, are permitted provided that the following conditions
9*0a6a1f1dSLionel Sambuc // are met:
10*0a6a1f1dSLionel Sambuc // 1. Redistributions of source code must retain the above copyright
11*0a6a1f1dSLionel Sambuc // notice, this list of conditions and the following disclaimer.
12*0a6a1f1dSLionel Sambuc // 2. Redistributions in binary form must reproduce the above copyright
13*0a6a1f1dSLionel Sambuc // notice, this list of conditions and the following disclaimer in the
14*0a6a1f1dSLionel Sambuc // documentation and/or other materials provided with the distribution.
15*0a6a1f1dSLionel Sambuc //
16*0a6a1f1dSLionel Sambuc // THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND
17*0a6a1f1dSLionel Sambuc // CONTRIBUTORS ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
18*0a6a1f1dSLionel Sambuc // INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF
19*0a6a1f1dSLionel Sambuc // MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.
20*0a6a1f1dSLionel Sambuc // IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS BE LIABLE FOR ANY
21*0a6a1f1dSLionel Sambuc // DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
22*0a6a1f1dSLionel Sambuc // DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE
23*0a6a1f1dSLionel Sambuc // GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
24*0a6a1f1dSLionel Sambuc // INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER
25*0a6a1f1dSLionel Sambuc // IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
26*0a6a1f1dSLionel Sambuc // OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN
27*0a6a1f1dSLionel Sambuc // IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28*0a6a1f1dSLionel Sambuc //
29*0a6a1f1dSLionel Sambuc
30*0a6a1f1dSLionel Sambuc extern "C" {
31*0a6a1f1dSLionel Sambuc #include <errno.h>
32*0a6a1f1dSLionel Sambuc #include <stdlib.h>
33*0a6a1f1dSLionel Sambuc #include <string.h>
34*0a6a1f1dSLionel Sambuc }
35*0a6a1f1dSLionel Sambuc
36*0a6a1f1dSLionel Sambuc #include <cassert>
37*0a6a1f1dSLionel Sambuc
38*0a6a1f1dSLionel Sambuc #include "env.hpp"
39*0a6a1f1dSLionel Sambuc #include "exceptions.hpp"
40*0a6a1f1dSLionel Sambuc
41*0a6a1f1dSLionel Sambuc namespace impl = tools::env;
42*0a6a1f1dSLionel Sambuc #define IMPL_NAME "tools::env"
43*0a6a1f1dSLionel Sambuc
44*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
45*0a6a1f1dSLionel Sambuc // Free functions.
46*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
47*0a6a1f1dSLionel Sambuc
48*0a6a1f1dSLionel Sambuc std::string
get(const std::string & name)49*0a6a1f1dSLionel Sambuc impl::get(const std::string& name)
50*0a6a1f1dSLionel Sambuc {
51*0a6a1f1dSLionel Sambuc const char* val = getenv(name.c_str());
52*0a6a1f1dSLionel Sambuc assert(val != NULL);
53*0a6a1f1dSLionel Sambuc return val;
54*0a6a1f1dSLionel Sambuc }
55*0a6a1f1dSLionel Sambuc
56*0a6a1f1dSLionel Sambuc bool
has(const std::string & name)57*0a6a1f1dSLionel Sambuc impl::has(const std::string& name)
58*0a6a1f1dSLionel Sambuc {
59*0a6a1f1dSLionel Sambuc return getenv(name.c_str()) != NULL;
60*0a6a1f1dSLionel Sambuc }
61*0a6a1f1dSLionel Sambuc
62*0a6a1f1dSLionel Sambuc void
set(const std::string & name,const std::string & val)63*0a6a1f1dSLionel Sambuc impl::set(const std::string& name, const std::string& val)
64*0a6a1f1dSLionel Sambuc {
65*0a6a1f1dSLionel Sambuc if (setenv(name.c_str(), val.c_str(), 1) == -1)
66*0a6a1f1dSLionel Sambuc throw tools::system_error(IMPL_NAME "::set",
67*0a6a1f1dSLionel Sambuc "Cannot set environment variable '" + name +
68*0a6a1f1dSLionel Sambuc "' to '" + val + "'",
69*0a6a1f1dSLionel Sambuc errno);
70*0a6a1f1dSLionel Sambuc }
71*0a6a1f1dSLionel Sambuc
72*0a6a1f1dSLionel Sambuc void
unset(const std::string & name)73*0a6a1f1dSLionel Sambuc impl::unset(const std::string& name)
74*0a6a1f1dSLionel Sambuc {
75*0a6a1f1dSLionel Sambuc unsetenv(name.c_str());
76*0a6a1f1dSLionel Sambuc }
77