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