From 00d96647149737d9bad63ab50c39f51faf52aefe Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Mon, 3 Feb 2020 09:57:26 +0100 Subject: Query builds for system test derivations --- guix-data-service/builds.scm | 17 +++++++++++++++++ 1 file changed, 17 insertions(+) diff --git a/guix-data-service/builds.scm b/guix-data-service/builds.scm index 64b04ad..35a0c61 100644 --- a/guix-data-service/builds.scm +++ b/guix-data-service/builds.scm @@ -467,6 +467,23 @@ WHERE NOT EXISTS ( (string-join (map quote-string revision-commits) ",") ")")) " + UNION ALL + SELECT derivations_by_output_details_set.derivation_output_details_set_id + FROM guix_revision_system_test_derivations + INNER JOIN derivations_by_output_details_set + ON guix_revision_system_test_derivations.derivation_id = + derivations_by_output_details_set.derivation_id + INNER JOIN guix_revisions + ON guix_revisions.id = guix_revision_system_test_derivations.guix_revision_id +" + (if (null? revision-commits) + "" + (string-append + " + WHERE guix_revisions.commit IN (" + (string-join (map quote-string revision-commits) ",") + ")")) + " ) ORDER BY derivation_output_details_sets.id, derivation_output_details.id LIMIT 15000")) -- cgit v1.2.3