aboutsummaryrefslogtreecommitdiff
path: root/paludis/environments/paludis/package_mask_conf.cc
blob: 6fa7f48e8df56e893f9318da46894d8444a7ce0c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
/* vim: set sw=4 sts=4 et foldmethod=syntax : */

/*
 * Copyright (c) 2007, 2008 Ciaran McCreesh
 *
 * 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 "package_mask_conf.hh"
#include <paludis/environment.hh>
#include <paludis/hashed_containers.hh>
#include <paludis/name.hh>
#include <paludis/dep_spec.hh>
#include <paludis/user_dep_spec.hh>
#include <paludis/match_package.hh>
#include <paludis/util/config_file.hh>
#include <paludis/package_id.hh>
#include <paludis/environments/paludis/paludis_environment.hh>
#include <paludis/environments/paludis/bashable_conf.hh>
#include <paludis/util/log.hh>
#include <paludis/util/wrapped_forward_iterator.hh>
#include <paludis/util/options.hh>
#include <paludis/util/tokeniser.hh>
#include <paludis/util/private_implementation_pattern-impl.hh>
#include <paludis/util/indirect_iterator-impl.hh>
#include <paludis/util/mutex.hh>
#include <list>
#include <algorithm>
#include <paludis/util/tr1_functional.hh>

using namespace paludis;
using namespace paludis::paludis_environment;

typedef std::list<std::pair<SetName, tr1::shared_ptr<const SetSpecTree::ConstItem> > > Sets;

namespace paludis
{
    template<>
    struct Implementation<PackageMaskConf>
    {
        const PaludisEnvironment * const env;
        std::list<tr1::shared_ptr<const PackageDepSpec> > masks;
        mutable Sets sets;
        mutable Mutex set_mutex;

        Implementation(const PaludisEnvironment * const e) :
            env(e)
        {
        }
    };
}

PackageMaskConf::PackageMaskConf(const PaludisEnvironment * const e) :
    PrivateImplementationPattern<PackageMaskConf>(new Implementation<PackageMaskConf>(e))
{
}

PackageMaskConf::~PackageMaskConf()
{
}

void
PackageMaskConf::add(const FSEntry & filename)
{
    Context context("When adding source '" + stringify(filename) + "' as a package mask or unmask file:");

    tr1::shared_ptr<LineConfigFile> f(make_bashable_conf(filename));
    if (! f)
        return;

    for (LineConfigFile::ConstIterator line(f->begin()), line_end(f->end()) ;
            line != line_end ; ++line)
    {
        if (std::string::npos == line->find("/"))
            _imp->sets.push_back(std::make_pair(SetName(*line), tr1::shared_ptr<const SetSpecTree::ConstItem>()));
        else
            _imp->masks.push_back(tr1::shared_ptr<PackageDepSpec>(new PackageDepSpec(parse_user_package_dep_spec(
                                *line, UserPackageDepSpecOptions() + updso_allow_wildcards))));
    }
}

bool
PackageMaskConf::query(const PackageID & e) const
{
    using namespace tr1::placeholders;
    if (indirect_iterator(_imp->masks.end()) != std::find_if(
            indirect_iterator(_imp->masks.begin()),
            indirect_iterator(_imp->masks.end()),
            tr1::bind(&match_package, tr1::ref(*_imp->env), _1, tr1::cref(e))))
        return true;

    {
        Lock lock(_imp->set_mutex);

        for (Sets::iterator it(_imp->sets.begin()),
                 it_end(_imp->sets.end()); it_end != it; ++it)
        {
            if (! it->second)
            {
                it->second = _imp->env->set(it->first);
                if (! it->second)
                {
                    Log::get_instance()->message(ll_warning, lc_no_context) << "Set name '"
                        << it->first << "' does not exist";
                    it->second.reset(new ConstTreeSequence<SetSpecTree, AllDepSpec>(
                                tr1::shared_ptr<AllDepSpec>(new AllDepSpec)));
                }
            }

            if (match_package_in_set(*_imp->env, *it->second, e))
                return true;
        }
    }

    return false;
}