[9.x] Make throttle lock acquisition retry configurable for concurrency limiter

src/Illuminate/Redis/Limiters/ConcurrencyLimiter.php

@@ -58,12 +58,13 @@ public function __construct($redis, $name, $maxLocks, $releaseAfter)
      *
      * @param  int  $timeout
      * @param  callable|null  $callback
-     * @return bool
+     * @param  int  $sleep
+     * @return mixed
      *
      * @throws \Illuminate\Contracts\Redis\LimiterTimeoutException
      * @throws \Throwable
      */
-    public function block($timeout, $callback = null)
+    public function block($timeout, $callback = null, $sleep = 250)
     {
         $starting = time();
 
@@ -74,7 +75,7 @@ public function block($timeout, $callback = null)
                 throw new LimiterTimeoutException;
             }
 
-            usleep(250 * 1000);
+            usleep($sleep * 1000);
         }
 
         if (is_callable($callback)) {

src/Illuminate/Redis/Limiters/ConcurrencyLimiterBuilder.php

@@ -44,6 +44,13 @@ class ConcurrencyLimiterBuilder
      */
     public $timeout = 3;
 
+    /**
+     * The number of milliseconds to wait between attempts to acquire the lock.
+     *
+     * @var int
+     */
+    public $sleep = 250;
+
     /**
      * Create a new builder instance.
      *
@@ -96,6 +103,19 @@ public function block($timeout)
         return $this;
     }
 
+    /**
+     * The number of milliseconds to wait between lock acquisition attempts.
+     *
+     * @param  int  $sleep
+     * @return $this
+     */
+    public function sleep($sleep)
+    {
+        $this->sleep = $sleep;
+
+        return $this;
+    }
+
     /**
      * Execute the given callback if a lock is obtained, otherwise call the failure callback.
      *
@@ -110,7 +130,7 @@ public function then(callable $callback, callable $failure = null)
         try {
             return (new ConcurrencyLimiter(
                 $this->connection, $this->name, $this->maxLocks, $this->releaseAfter
-            ))->block($this->timeout, $callback);
+            ))->block($this->timeout, $callback, $this->sleep);
         } catch (LimiterTimeoutException $e) {
             if ($failure) {
                 return $failure($e);