aboutsummaryrefslogtreecommitdiff
path: root/guix-data-service/web/controller.scm
diff options
context:
space:
mode:
authorChristopher Baines <mail@cbaines.net>2024-02-10 10:11:29 +0000
committerChristopher Baines <mail@cbaines.net>2024-02-10 10:11:29 +0000
commit76712e2b007d502eba51bfcc122f6f4acfe7ae10 (patch)
tree7d3287e9e33c7021d5fd1de0a0575561594f06b8 /guix-data-service/web/controller.scm
parent26f517d9c20d357c5df6c87690ec92c970755b9b (diff)
downloaddata-service-76712e2b007d502eba51bfcc122f6f4acfe7ae10.tar
data-service-76712e2b007d502eba51bfcc122f6f4acfe7ae10.tar.gz
Instrument resource pool checkout failures
As I've got no idea why the resource pools sometimes stop working.
Diffstat (limited to 'guix-data-service/web/controller.scm')
-rw-r--r--guix-data-service/web/controller.scm7
1 files changed, 6 insertions, 1 deletions
diff --git a/guix-data-service/web/controller.scm b/guix-data-service/web/controller.scm
index de7ba7c..1ac081b 100644
--- a/guix-data-service/web/controller.scm
+++ b/guix-data-service/web/controller.scm
@@ -190,7 +190,12 @@
(waiters . ,(make-gauge-metric
registry
"resource_pool_waiters_total"
- #:labels '(pool_name)))))
+ #:labels '(pool_name)))
+ (checkout-failure-count
+ . ,(make-gauge-metric
+ registry
+ "resource_pool_checkout_failures_total"
+ #:labels '(pool_name)))))
(gc-metrics-updater
(get-gc-metrics-updater registry))