[12.x] Allow easier opting out of DatabaseLock prune lottery (#58152)

* easy no lottery

* move pruning to separate method

Author: cosmastech

src/Illuminate/Cache/DatabaseLock.php

@@ -28,7 +28,7 @@ class DatabaseLock extends Lock
     /**
      * The prune probability odds.
      *
-     * @var array
+     * @var array{int, int}|null
      */
     protected $lottery;
 
@@ -47,7 +47,7 @@ class DatabaseLock extends Lock
      * @param  string  $name
      * @param  int  $seconds
      * @param  string|null  $owner
-     * @param  array  $lottery
+     * @param  array{int, int}|null  $lottery
      * @param  int  $defaultTimeoutInSeconds
      */
     public function __construct(Connection $connection, $table, $name, $seconds, $owner = null, $lottery = [2, 100], $defaultTimeoutInSeconds = 86400)
@@ -65,7 +65,7 @@ public function __construct(Connection $connection, $table, $name, $seconds, $ow
      *
      * @return bool
      *
-     * @throws Throwable
+     * @throws \Throwable
      */
     public function acquire()
     {
@@ -90,16 +90,8 @@ public function acquire()
             $acquired = $updated >= 1;
         }
 
-        if (random_int(1, $this->lottery[1]) <= $this->lottery[0]) {
-            try {
-                $this->connection->table($this->table)
-                    ->where('expiration', '<=', $this->currentTime())
-                    ->delete();
-            } catch (Throwable $e) {
-                if (! $this->causedByConcurrencyError($e)) {
-                    throw $e;
-                }
-            }
+        if (count($this->lottery ?? []) === 2 && random_int(1, $this->lottery[1]) <= $this->lottery[0]) {
+            $this->pruneExpiredLocks();
         }
 
         return $acquired;
@@ -148,6 +140,26 @@ public function forceRelease()
             ->delete();
     }
 
+    /**
+     * Deletes locks that are past expiration.
+     *
+     * @return void
+     *
+     * @throws \Throwable
+     */
+    public function pruneExpiredLocks()
+    {
+        try {
+            $this->connection->table($this->table)
+                ->where('expiration', '<=', $this->currentTime())
+                ->delete();
+        } catch (Throwable $e) {
+            if (! $this->causedByConcurrencyError($e)) {
+                throw $e;
+            }
+        }
+    }
+
     /**
      * Returns the owner value written into the driver for this lock.
      *