From cbd8296c7b86f7fc368d1133da3be3670b7923be Mon Sep 17 00:00:00 2001 From: Boris Kolpackov Date: Wed, 9 Dec 2015 11:32:50 +0200 Subject: Clean up command names, add aliases --- bpkg/rep-fetch.cxx | 245 ----------------------------------------------------- 1 file changed, 245 deletions(-) delete mode 100644 bpkg/rep-fetch.cxx (limited to 'bpkg/rep-fetch.cxx') diff --git a/bpkg/rep-fetch.cxx b/bpkg/rep-fetch.cxx deleted file mode 100644 index 1136e98..0000000 --- a/bpkg/rep-fetch.cxx +++ /dev/null @@ -1,245 +0,0 @@ -// file : bpkg/rep-fetch.cxx -*- C++ -*- -// copyright : Copyright (c) 2014-2015 Code Synthesis Ltd -// license : MIT; see accompanying LICENSE file - -#include - -#include -#include - -#include - -#include -#include -#include -#include -#include -#include -#include - -using namespace std; -using namespace butl; - -namespace bpkg -{ - static void - rep_fetch (const common_options& co, - transaction& t, - const shared_ptr& r) - { - tracer trace ("rep_fetch(rep)"); - - database& db (t.database ()); - tracer_guard tg (db, trace); - - const repository_location& rl (r->location); - level4 ([&]{trace << r->name << " " << rl;}); - assert (rl.absolute () || rl.remote ()); - - // The fetch_*() functions below will be quiet at level 1, which - // can be quite confusing if the download hangs. - // - if (verb >= (rl.remote () ? 1 : 2)) - text << "fetching " << r->name; - - r->fetched = true; // Mark as being fetched. - - // Load the 'repositories' file and use it to populate the - // prerequisite and complement repository sets. - // - repository_manifests rms (fetch_repositories (co, rl, true)); - - for (repository_manifest& rm: rms) - { - repository_role rr (rm.effective_role ()); - - if (rr == repository_role::base) - continue; // Entry for this repository. - - // If the location is relative, complete it using this repository - // as a base. - // - if (rm.location.relative ()) - { - try - { - rm.location = repository_location (rm.location, rl); - } - catch (const invalid_argument& e) - { - fail << "invalid relative repository location '" << rm.location - << "': " << e.what () << - info << "base repository location is " << rl; - } - } - - // We might already have this repository in the database. - // - shared_ptr pr ( - db.find ( - rm.location.canonical_name ())); - - if (pr == nullptr) - { - pr = make_shared (move (rm.location)); - db.persist (pr); // Enter into session, important if recursive. - } - - // Load the prerequisite repository unless it has already been - // (or is already being) fetched. - // - if (!pr->fetched) - rep_fetch (co, t, pr); - - // @@ What if we have duplicated? Ideally, we would like to check - // this once and as early as possible. The original idea was to - // do it during manifest parsing and serialization. But at that - // stage we have no way of completing relative locations (which - // is required to calculate canonical names). Current thinking is - // that we should have something like rep-verify (similar to - // pkg-verify) that performs (potentially expensive) repository - // verifications, including making sure prerequisites can be - // satisfied from the listed repositories, etc. Perhaps we can - // also re-use some of that functionality here. I.e., instead of - // calling the "naked" fetch_repositories() above, we will call - // a function from rep-verify that will perform extra verifications. - // - // @@ Also check for self-prerequisite. - // - switch (rr) - { - case repository_role::complement: - { - level4 ([&]{trace << pr->name << " complement of " << r->name;}); - r->complements.insert (lazy_shared_ptr (db, pr)); - break; - } - case repository_role::prerequisite: - { - level4 ([&]{trace << pr->name << " prerequisite of " << r->name;}); - r->prerequisites.insert (lazy_weak_ptr (db, pr)); - break; - } - case repository_role::base: - assert (false); - } - } - - // Load the 'packages' file. - // - // @@ We need to check that that 'repositories' file hasn't - // changed since. - // - package_manifests pms (fetch_packages (co, rl, true)); - - // "Suspend" session while persisting packages to reduce memory - // consumption. - // - session& s (session::current ()); - session::reset_current (); - - for (package_manifest& pm: pms) - { - // We might already have this package in the database. - // - bool persist (false); - - shared_ptr p ( - db.find ( - available_package_id (pm.name, pm.version))); - - if (p == nullptr) - { - p = make_shared (move (pm)); - persist = true; - } - - // This repository shouldn't already be in the location set since - // that would mean it has already been loaded and we shouldn't be - // here. - // - p->locations.push_back ( - package_location {lazy_shared_ptr (db, r), - move (*pm.location)}); - - if (persist) - db.persist (p); - else - db.update (p); - } - - session::current (s); // "Resume". - - // Save the changes to the repository object. - // - db.update (r); - } - - int - rep_fetch (const rep_fetch_options& o, cli::scanner&) - { - tracer trace ("rep_fetch"); - - dir_path c (o.directory ()); - level4 ([&]{trace << "configuration: " << c;}); - - database db (open (c, trace)); - transaction t (db.begin ()); - session s; // Repository dependencies can have cycles. - - shared_ptr root (db.load ("")); - const auto& ua (root->complements); // User-added repositories. - - if (ua.empty ()) - fail << "configuration " << c << " has no repositories" << - info << "use 'bpkg rep-add' to add a repository"; - - // Clean repositories and available packages. At the end only - // repositories that were explicitly added by the user and the - // special root repository should remain. - // - db.erase_query (); - - for (shared_ptr r: pointer_result (db.query ())) - { - if (r == root) - { - level5 ([&]{trace << "skipping root";}); - } - else if (ua.find (lazy_shared_ptr (db, r)) != ua.end ()) - { - level4 ([&]{trace << "cleaning " << r->name;}); - - r->complements.clear (); - r->prerequisites.clear (); - r->fetched = false; - db.update (r); - } - else - { - level4 ([&]{trace << "erasing " << r->name;}); - db.erase (r); - } - } - - // Now recursively fetch prerequisite/complement repositories and - // their packages. - // - for (const lazy_shared_ptr& lp: ua) - rep_fetch (o, t, lp.load ()); - - size_t rcount, pcount; - if (verb) - { - rcount = db.query_value (); - pcount = db.query_value (); - } - - t.commit (); - - if (verb) - text << pcount << " package(s) in " << rcount << " repository(s)"; - - return 0; - } -} -- cgit v1.1