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 #include <atf-c++.hpp>
31*0a6a1f1dSLionel Sambuc
32*0a6a1f1dSLionel Sambuc #include "env.hpp"
33*0a6a1f1dSLionel Sambuc
34*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
35*0a6a1f1dSLionel Sambuc // Test cases for the free functions.
36*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
37*0a6a1f1dSLionel Sambuc
38*0a6a1f1dSLionel Sambuc ATF_TEST_CASE(has_get);
ATF_TEST_CASE_HEAD(has_get)39*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_HEAD(has_get)
40*0a6a1f1dSLionel Sambuc {
41*0a6a1f1dSLionel Sambuc set_md_var("descr", "Tests the has and get functions");
42*0a6a1f1dSLionel Sambuc }
ATF_TEST_CASE_BODY(has_get)43*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_BODY(has_get)
44*0a6a1f1dSLionel Sambuc {
45*0a6a1f1dSLionel Sambuc ATF_REQUIRE(tools::env::has("PATH"));
46*0a6a1f1dSLionel Sambuc ATF_REQUIRE(!tools::env::get("PATH").empty());
47*0a6a1f1dSLionel Sambuc
48*0a6a1f1dSLionel Sambuc ATF_REQUIRE(!tools::env::has("_UNDEFINED_VARIABLE_"));
49*0a6a1f1dSLionel Sambuc }
50*0a6a1f1dSLionel Sambuc
51*0a6a1f1dSLionel Sambuc ATF_TEST_CASE(set);
ATF_TEST_CASE_HEAD(set)52*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_HEAD(set)
53*0a6a1f1dSLionel Sambuc {
54*0a6a1f1dSLionel Sambuc set_md_var("descr", "Tests the set function");
55*0a6a1f1dSLionel Sambuc }
ATF_TEST_CASE_BODY(set)56*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_BODY(set)
57*0a6a1f1dSLionel Sambuc {
58*0a6a1f1dSLionel Sambuc ATF_REQUIRE(tools::env::has("PATH"));
59*0a6a1f1dSLionel Sambuc const std::string& oldval = tools::env::get("PATH");
60*0a6a1f1dSLionel Sambuc tools::env::set("PATH", "foo-bar");
61*0a6a1f1dSLionel Sambuc ATF_REQUIRE(tools::env::get("PATH") != oldval);
62*0a6a1f1dSLionel Sambuc ATF_REQUIRE_EQ(tools::env::get("PATH"), "foo-bar");
63*0a6a1f1dSLionel Sambuc
64*0a6a1f1dSLionel Sambuc ATF_REQUIRE(!tools::env::has("_UNDEFINED_VARIABLE_"));
65*0a6a1f1dSLionel Sambuc tools::env::set("_UNDEFINED_VARIABLE_", "foo2-bar2");
66*0a6a1f1dSLionel Sambuc ATF_REQUIRE_EQ(tools::env::get("_UNDEFINED_VARIABLE_"), "foo2-bar2");
67*0a6a1f1dSLionel Sambuc }
68*0a6a1f1dSLionel Sambuc
69*0a6a1f1dSLionel Sambuc ATF_TEST_CASE(unset);
ATF_TEST_CASE_HEAD(unset)70*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_HEAD(unset)
71*0a6a1f1dSLionel Sambuc {
72*0a6a1f1dSLionel Sambuc set_md_var("descr", "Tests the unset function");
73*0a6a1f1dSLionel Sambuc }
ATF_TEST_CASE_BODY(unset)74*0a6a1f1dSLionel Sambuc ATF_TEST_CASE_BODY(unset)
75*0a6a1f1dSLionel Sambuc {
76*0a6a1f1dSLionel Sambuc ATF_REQUIRE(tools::env::has("PATH"));
77*0a6a1f1dSLionel Sambuc tools::env::unset("PATH");
78*0a6a1f1dSLionel Sambuc ATF_REQUIRE(!tools::env::has("PATH"));
79*0a6a1f1dSLionel Sambuc }
80*0a6a1f1dSLionel Sambuc
81*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
82*0a6a1f1dSLionel Sambuc // Main.
83*0a6a1f1dSLionel Sambuc // ------------------------------------------------------------------------
84*0a6a1f1dSLionel Sambuc
ATF_INIT_TEST_CASES(tcs)85*0a6a1f1dSLionel Sambuc ATF_INIT_TEST_CASES(tcs)
86*0a6a1f1dSLionel Sambuc {
87*0a6a1f1dSLionel Sambuc // Add the test cases for the free functions.
88*0a6a1f1dSLionel Sambuc ATF_ADD_TEST_CASE(tcs, has_get);
89*0a6a1f1dSLionel Sambuc ATF_ADD_TEST_CASE(tcs, set);
90*0a6a1f1dSLionel Sambuc ATF_ADD_TEST_CASE(tcs, unset);
91*0a6a1f1dSLionel Sambuc }
92