From 1756069330b8633b46ffe5bcd42a85d5aa902825 Mon Sep 17 00:00:00 2001
From: Peter Taoussanis <peter@taoensso.com>
Date: Mon, 5 Aug 2024 17:52:10 +0200
Subject: [PATCH] [nop] Tune internal handler rate limits

---
 src/taoensso/telemere/files.clj  | 3 ++-
 src/taoensso/telemere/utils.cljc | 4 ++--
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/src/taoensso/telemere/files.clj b/src/taoensso/telemere/files.clj
index 18c1ba9..77eb51e 100644
--- a/src/taoensso/telemere/files.clj
+++ b/src/taoensso/telemere/files.clj
@@ -325,7 +325,7 @@
          >max-file-size?
          (when   max-file-size
            (let [max-file-size (long max-file-size)
-                 rl (enc/rate-limiter-once-per 2500)]
+                 rl (enc/rate-limiter-once-per 250)]
              (fn [] (and (not (rl)) (> (.length main-file) max-file-size)))))
 
          prev-timestamp_ (enc/latom nil) ; Initially nil
@@ -395,6 +395,7 @@
   (.setLastModified (utils/as-file "test/logs/app6.log")
     (enc/as-udt "1999-01-01T01:00:00.00Z"))
 
+  (let [f (utils/as-file "test/logs/app6.log")] (enc/qb 1e5 (.length f)))
   (let [hfn
         (handler:file
           {:path "test/logs/app6.log"
diff --git a/src/taoensso/telemere/utils.cljc b/src/taoensso/telemere/utils.cljc
index d78b401..e237e03 100644
--- a/src/taoensso/telemere/utils.cljc
+++ b/src/taoensso/telemere/utils.cljc
@@ -219,7 +219,7 @@
                true))
 
            file-exists!
-           (let [rl (enc/rate-limiter-once-per 250)]
+           (let [rl (enc/rate-limiter-once-per 100)]
              (fn []
                (or (rl) (.exists file)
                  (throw (java.io.IOException. "File doesn't exist")))))
@@ -344,7 +344,7 @@
                true))
 
            conn-okay!
-           (let [rl (enc/rate-limiter-once-per 250)]
+           (let [rl (enc/rate-limiter-once-per 100)]
              (fn []
                (or
                  (rl)