From 47c482bdcc40d57d871accf576a6c19ac4c08039 Mon Sep 17 00:00:00 2001 From: Christopher Baines Date: Tue, 9 May 2023 08:55:09 +0100 Subject: [PATCH] Set lock_timeout for some data deletion transactions As these can cause deadlocks. This will probably cause errors, so some retrying will need to be added. --- guix-data-service/data-deletion.scm | 4 ++++ 1 file changed, 4 insertions(+) diff --git a/guix-data-service/data-deletion.scm b/guix-data-service/data-deletion.scm index 29272ac..918656e 100644 --- a/guix-data-service/data-deletion.scm +++ b/guix-data-service/data-deletion.scm @@ -212,6 +212,8 @@ WHERE id IN ( conn 'delete-revisions-from-branch) + (exec-query conn "SET LOCAL lock_timeout = '5s';") + (delete-from-git-commits conn) (delete-jobs conn) @@ -581,6 +583,8 @@ WHERE NOT EXISTS ( " SET CONSTRAINTS derivations_by_output_details_set_derivation_id_fkey DEFERRED") + (exec-query conn "SET LOCAL lock_timeout = '5s';") + (maybe-delete-derivation conn derivation-id)))))) derivations)))))