aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAvatar Ciaran McCreesh <ciaran.mccreesh@googlemail.com> 2006-02-15 01:49:50 +0000
committerAvatar Ciaran McCreesh <ciaran.mccreesh@googlemail.com> 2006-02-15 01:49:50 +0000
commit72c1b32e0aef036b75cc2a3462c8288587b9435a (patch)
treedd141a2a9f6b6300b7ec542d171d4d5c96c82159
parent831a0abeb3fbaa7022c1025aec782fdafee21de5 (diff)
downloadpaludis-72c1b32e0aef036b75cc2a3462c8288587b9435a.tar.gz
paludis-72c1b32e0aef036b75cc2a3462c8288587b9435a.tar.xz
Rather crude initial check deps exist
-rw-r--r--paludis/qa/deps_exist_check.cc127
-rw-r--r--paludis/qa/deps_exist_check.hh51
-rw-r--r--paludis/qa/files.m41
3 files changed, 179 insertions, 0 deletions
diff --git a/paludis/qa/deps_exist_check.cc b/paludis/qa/deps_exist_check.cc
new file mode 100644
index 0000000..1c85193
--- /dev/null
+++ b/paludis/qa/deps_exist_check.cc
@@ -0,0 +1,127 @@
+/* vim: set sw=4 sts=4 et foldmethod=syntax : */
+
+/*
+ * Copyright (c) 2006 Ciaran McCreesh <ciaranm@gentoo.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 "deps_exist_check.hh"
+#include <paludis/dep_parser.hh>
+#include <paludis/dep_atom_visitor.hh>
+#include <paludis/any_dep_atom.hh>
+#include <paludis/all_dep_atom.hh>
+#include <paludis/package_dep_atom.hh>
+#include <paludis/block_dep_atom.hh>
+#include <paludis/use_dep_atom.hh>
+
+using namespace paludis;
+using namespace paludis::qa;
+
+namespace
+{
+ struct Checker :
+ DepAtomVisitorTypes::ConstVisitor
+ {
+ CheckResult & result;
+ const std::string role;
+ const Environment * env;
+
+ Checker(CheckResult & rr, const std::string & r, const Environment * e) :
+ result(rr),
+ role(r),
+ env(e)
+ {
+ }
+
+ void visit(const PackageDepAtom * const p)
+ {
+ if (env->package_database()->query(p)->empty())
+ result << Message(qal_major, "No match for " + role + " entry '"
+ + stringify(*p) + "'");
+ }
+
+ void visit(const AllDepAtom * const a)
+ {
+ std::for_each(a->begin(), a->end(), accept_visitor(this));
+ }
+
+ void visit(const AnyDepAtom * const a)
+ {
+ std::for_each(a->begin(), a->end(), accept_visitor(this));
+ }
+
+ void visit(const UseDepAtom * const u)
+ {
+ std::for_each(u->begin(), u->end(), accept_visitor(this));
+ }
+
+ void visit(const BlockDepAtom * const b)
+ {
+ if (env->package_database()->query(b->blocked_atom())->empty())
+ result << Message(qal_maybe, "No match for " + role + " block '!"
+ + stringify(*b->blocked_atom()) + "'");
+ }
+ };
+}
+
+DepsExistCheck::DepsExistCheck()
+{
+}
+
+CheckResult
+DepsExistCheck::operator() (const EbuildCheckData & e) const
+{
+ CheckResult result(stringify(e.get<ecd_name>()) + "-" + stringify(e.get<ecd_version>()),
+ identifier());
+
+ try
+ {
+ PackageDatabaseEntry ee(e.get<ecd_name>(), e.get<ecd_version>(),
+ e.get<ecd_environment>()->package_database()->favourite_repository());
+ VersionMetadata::ConstPointer metadata(
+ e.get<ecd_environment>()->package_database()->fetch_metadata(ee));
+
+ Checker depend_checker(result, "DEPEND", e.get<ecd_environment>());
+ std::string depend(metadata->get(vmk_depend));
+ DepParser::parse(depend)->accept(&depend_checker);
+
+ Checker rdepend_checker(result, "RDEPEND", e.get<ecd_environment>());
+ std::string rdepend(metadata->get(vmk_rdepend));
+ DepParser::parse(rdepend)->accept(&rdepend_checker);
+
+ Checker pdepend_checker(result, "PDEPEND", e.get<ecd_environment>());
+ std::string pdepend(metadata->get(vmk_pdepend));
+ DepParser::parse(pdepend)->accept(&pdepend_checker);
+ }
+ catch (const InternalError &)
+ {
+ throw;
+ }
+ catch (const Exception & e)
+ {
+ result << Message(qal_fatal, "Caught Exception '" + e.message() + "' ("
+ + e.what() + ")");
+ }
+
+ return result;
+}
+
+const std::string &
+DepsExistCheck::identifier()
+{
+ static const std::string id("deps exist");
+ return id;
+}
+
diff --git a/paludis/qa/deps_exist_check.hh b/paludis/qa/deps_exist_check.hh
new file mode 100644
index 0000000..42ca983
--- /dev/null
+++ b/paludis/qa/deps_exist_check.hh
@@ -0,0 +1,51 @@
+/* vim: set sw=4 sts=4 et foldmethod=syntax : */
+
+/*
+ * Copyright (c) 2006 Ciaran McCreesh <ciaranm@gentoo.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
+ */
+
+#ifndef PALUDIS_GUARD_PALUDIS_QA_DEPS_EXIST_CHECK_HH
+#define PALUDIS_GUARD_PALUDIS_QA_DEPS_EXIST_CHECK_HH 1
+
+#include <paludis/qa/ebuild_check.hh>
+#include <string>
+
+namespace paludis
+{
+ namespace qa
+ {
+ class DepsExistCheck :
+ public EbuildCheck
+ {
+ public:
+ DepsExistCheck();
+
+ CheckResult operator() (const EbuildCheckData &) const;
+
+ static const std::string & identifier();
+
+ virtual std::string describe() const
+ {
+ return "Checks that packages in *DEPEND exist";
+ }
+ };
+
+ static const EbuildCheckMaker::RegisterMaker register_deps_exist_check(
+ DepsExistCheck::identifier(), &make_ebuild_check<DepsExistCheck>);
+ }
+}
+
+#endif
diff --git a/paludis/qa/files.m4 b/paludis/qa/files.m4
index 6c2b80b..f288967 100644
--- a/paludis/qa/files.m4
+++ b/paludis/qa/files.m4
@@ -12,6 +12,7 @@ add(`changelog_check', `hh', `cc')
add(`check', `hh', `cc')
add(`check_result', `hh', `cc', `test')
add(`create_metadata_check', `hh', `cc')
+add(`deps_exist_check', `hh', `cc')
add(`description_check', `hh', `cc')
add(`ebuild_check', `hh', `cc')
add(`environment', `hh', `cc')