02/06: Increase the batch size for fetching builds/narinfo files

[Christopher Baines]

cbaines pushed a commit to branch master
in repository data-service.

commit 33958eac792bffd1a0ce0e33fcdd2568954323e3
Author: Christopher Baines <address@hidden>
AuthorDate: Sat Mar 14 12:34:23 2020 +0000

    Increase the batch size for fetching builds/narinfo files
    
    To increase the likelyhood that all the builds and narinfo files for the
    latest revisions are fetched.
---
 guix-data-service/builds.scm    | 4 ++--
 guix-data-service/model/nar.scm | 2 +-
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/guix-data-service/builds.scm b/guix-data-service/builds.scm
index 09c61e0..cce36c9 100644
--- a/guix-data-service/builds.scm
+++ b/guix-data-service/builds.scm
@@ -522,7 +522,7 @@ WHERE derivation_output_details_set_id NOT IN (
      "
 )
 ORDER BY derivation_output_details_set_id, derivations.id
-LIMIT 15000"))
+LIMIT 30000"))
 
   (exec-query conn query (list (number->string build-server-id))))
 
@@ -606,7 +606,7 @@ WHERE NOT EXISTS (
      "
 )
 ORDER BY derivation_output_details_sets.id DESC, derivation_output_details.id
-LIMIT 15000"))
+LIMIT 30000"))
 
   (fold (lambda (row result)
           (match row
diff --git a/guix-data-service/model/nar.scm b/guix-data-service/model/nar.scm
index ff6a5d5..b9bde80 100644
--- a/guix-data-service/model/nar.scm
+++ b/guix-data-service/model/nar.scm
@@ -347,7 +347,7 @@ WHERE derivation_output_details.path NOT IN (
   )"))
      "
 ORDER BY derivation_output_details.id DESC
-LIMIT 10000"))
+LIMIT 100000"))
 
   (map car (exec-query conn query (list (number->string build-server-id)))))