diff options
author | 2006-10-11 20:56:59 +0000 | |
---|---|---|
committer | 2006-10-11 20:56:59 +0000 | |
commit | e3b86134db7baada7b3a1e779e7d6d046ab53a1a (patch) | |
tree | 6acb3c0de68e1b95dbba8f0e00f770b8f31e4bac /0.8.0/paludis/environment/default/default_environment_TEST.cc | |
parent | ab9cdb1150d97449e857cd55fe706377c9ab2422 (diff) | |
download | paludis-0.8.0.tar.gz paludis-0.8.0.tar.xz |
Tag release 0.8.00.8.0
Diffstat (limited to '0.8.0/paludis/environment/default/default_environment_TEST.cc')
-rw-r--r-- | 0.8.0/paludis/environment/default/default_environment_TEST.cc | 131 |
1 files changed, 131 insertions, 0 deletions
diff --git a/0.8.0/paludis/environment/default/default_environment_TEST.cc b/0.8.0/paludis/environment/default/default_environment_TEST.cc new file mode 100644 index 000000000..fcad357e7 --- /dev/null +++ b/0.8.0/paludis/environment/default/default_environment_TEST.cc @@ -0,0 +1,131 @@ +/* vim: set sw=4 sts=4 et foldmethod=syntax : */ + +/* + * Copyright (c) 2006 Ciaran McCreesh <ciaranm@ciaranm.org> + * + * This file is part of the Paludis package manager. Paludis is free software; + * you can redistribute it and/or modify it under the terms of the GNU General + * Public License version 2, as published by the Free Software Foundation. + * + * Paludis is distributed in the hope that it will be useful, but WITHOUT ANY + * WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS + * FOR A PARTICULAR PURPOSE. See the GNU General Public License for more + * details. + * + * You should have received a copy of the GNU General Public License along with + * this program; if not, write to the Free Software Foundation, Inc., 59 Temple + * Place, Suite 330, Boston, MA 02111-1307 USA + */ + +#include "default_environment.hh" +#include "default_config.hh" +#include <paludis/util/fs_entry.hh> +#include <test/test_runner.hh> +#include <test/test_framework.hh> +#include <cstdlib> + +using namespace paludis; +using namespace test; + +namespace test_cases +{ + struct TestDefaultEnvironmentUse : TestCase + { + TestDefaultEnvironmentUse() : TestCase("use") { } + + void run() + { + setenv("PALUDIS_HOME", stringify(FSEntry::cwd() / "default_environment_TEST_dir" / "home1").c_str(), 1); + unsetenv("PALUDIS_SKIP_CONFIG"); + DefaultConfig::destroy_instance(); + DefaultEnvironment::destroy_instance(); + + Environment * env(DefaultEnvironment::get_instance()); + + TEST_CHECK(env->query_use(UseFlagName("foo"), 0)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), 0)); + + PackageDatabaseEntry pde(QualifiedPackageName("cat-one/pkg-one"), VersionSpec("1"), RepositoryName("foo")); + TEST_CHECK(env->query_use(UseFlagName("foo"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("moo"), &pde)); + + TEST_CHECK(env->query_use(UseFlagName("more_exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("exp_two"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_one"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("third_exp_two"), &pde)); + + PackageDatabaseEntry f(QualifiedPackageName("cat-one/pkg-two"), VersionSpec("3"), RepositoryName("foo")); + TEST_CHECK(env->query_use(UseFlagName("third_exp_one"), &f)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_two"), &f)); + } + } default_environment_use_test; + + struct TestDefaultEnvironmentUseMinusStar : TestCase + { + TestDefaultEnvironmentUseMinusStar() : TestCase("use -*") { } + + void run() + { + setenv("PALUDIS_HOME", stringify(FSEntry::cwd() / "default_environment_TEST_dir" / "home2").c_str(), 1); + unsetenv("PALUDIS_SKIP_CONFIG"); + DefaultConfig::destroy_instance(); + DefaultEnvironment::destroy_instance(); + + Environment * env(DefaultEnvironment::get_instance()); + + TEST_CHECK(env->query_use(UseFlagName("foo"), 0)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), 0)); + + PackageDatabaseEntry pde(QualifiedPackageName("cat-one/pkg-one"), VersionSpec("1"), RepositoryName("foo")); + TEST_CHECK(env->query_use(UseFlagName("foo"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("moo"), &pde)); + + TEST_CHECK(env->query_use(UseFlagName("more_exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("exp_two"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_one"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("third_exp_two"), &pde)); + + PackageDatabaseEntry f(QualifiedPackageName("cat-one/pkg-two"), VersionSpec("3"), RepositoryName("foo")); + TEST_CHECK(! env->query_use(UseFlagName("third_exp_one"), &f)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_two"), &f)); + } + } default_environment_use_test_minus_star; + + struct TestDefaultEnvironmentUseMinusPartialStar : TestCase + { + TestDefaultEnvironmentUseMinusPartialStar() : TestCase("use -* partial") { } + + void run() + { + setenv("PALUDIS_HOME", stringify(FSEntry::cwd() / "default_environment_TEST_dir" / "home3").c_str(), 1); + unsetenv("PALUDIS_SKIP_CONFIG"); + DefaultConfig::destroy_instance(); + DefaultEnvironment::destroy_instance(); + + Environment * env(DefaultEnvironment::get_instance()); + + TEST_CHECK(env->query_use(UseFlagName("foo"), 0)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), 0)); + + PackageDatabaseEntry pde(QualifiedPackageName("cat-one/pkg-one"), VersionSpec("1"), RepositoryName("foo")); + TEST_CHECK(env->query_use(UseFlagName("foo"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("foofoo"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("moo"), &pde)); + + TEST_CHECK(env->query_use(UseFlagName("more_exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("exp_two"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("exp_one"), &pde)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_one"), &pde)); + TEST_CHECK(! env->query_use(UseFlagName("third_exp_two"), &pde)); + + PackageDatabaseEntry f(QualifiedPackageName("cat-one/pkg-two"), VersionSpec("3"), RepositoryName("foo")); + TEST_CHECK(! env->query_use(UseFlagName("third_exp_one"), &f)); + TEST_CHECK(env->query_use(UseFlagName("third_exp_two"), &f)); + } + } default_environment_use_test_minus_star_partial; +} + |