1 files changed, 124 insertions, 0 deletions
diff --git a/tests/lock/flock_test.php b/tests/lock/flock_test.php
new file mode 100644
index 0000000000..554b7e57f4
--- /dev/null
+++ b/tests/lock/flock_test.php
@@ -0,0 +1,124 @@
+<?php
+/**
+*
+* This file is part of the phpBB Forum Software package.
+*
+* @copyright (c) phpBB Limited <https://www.phpbb.com>
+* @license GNU General Public License, version 2 (GPL-2.0)
+*
+* For full copyright and license information, please see
+* the docs/CREDITS.txt file.
+*
+*/
+
+class phpbb_lock_flock_test extends phpbb_test_case
+{
+	public function test_lock()
+	{
+		$path = __DIR__ . '/../tmp/precious';
+
+		$lock = new \phpbb\lock\flock($path);
+		$ok = $lock->acquire();
+		$this->assertTrue($ok);
+		$lock->release();
+	}
+
+	public function test_consecutive_locking()
+	{
+		$path = __DIR__ . '/../tmp/precious';
+
+		$lock = new \phpbb\lock\flock($path);
+		$ok = $lock->acquire();
+		$this->assertTrue($ok);
+		$this->assertTrue($lock->owns_lock());
+		$lock->release();
+		$this->assertFalse($lock->owns_lock());
+
+		$ok = $lock->acquire();
+		$this->assertTrue($ok);
+		$this->assertTrue($lock->owns_lock());
+		$lock->release();
+		$this->assertFalse($lock->owns_lock());
+
+		$ok = $lock->acquire();
+		$this->assertTrue($ok);
+		$this->assertTrue($lock->owns_lock());
+		$lock->release();
+		$this->assertFalse($lock->owns_lock());
+	}
+
+	/* This hangs the process.
+	public function test_concurrent_locking_fail()
+	{
+		$path = __DIR__ . '/../tmp/precious';
+
+		$lock1 = new \phpbb\lock\flock($path);
+		$ok = $lock1->acquire();
+		$this->assertTrue($ok);
+
+		$lock2 = new \phpbb\lock\flock($path);
+		$ok = $lock2->acquire();
+		$this->assertFalse($ok);
+
+		$lock->release();
+		$ok = $lock2->acquire();
+		$this->assertTrue($ok);
+	}
+	*/
+
+	public function test_concurrent_locking()
+	{
+		if (!function_exists('pcntl_fork'))
+		{
+			$this->markTestSkipped('pcntl extension and pcntl_fork are required for this test');
+		}
+
+		$path = __DIR__ . '/../tmp/precious';
+
+		$pid = pcntl_fork();
+		if ($pid)
+		{
+			// parent
+			// wait 0.5 s, acquire the lock, note how long it took
+			sleep(1);
+
+			$lock = new \phpbb\lock\flock($path);
+			$start = microtime(true);
+			$ok = $lock->acquire();
+			$delta = microtime(true) - $start;
+			$this->assertTrue($ok);
+			$this->assertTrue($lock->owns_lock());
+			$this->assertGreaterThan(0.5, $delta, 'First lock acquired too soon');
+
+			$lock->release();
+			$this->assertFalse($lock->owns_lock());
+
+			// acquire again, this should be instantaneous
+			$start = microtime(true);
+			$ok = $lock->acquire();
+			$delta = microtime(true) - $start;
+			$this->assertTrue($ok);
+			$this->assertTrue($lock->owns_lock());
+			$this->assertLessThan(0.1, $delta, 'Second lock not acquired instantaneously');
+
+			// reap the child
+			$status = null;
+			pcntl_waitpid($pid, $status);
+		}
+		else
+		{
+			// child
+			// immediately acquire the lock and sleep for 2 s
+			$lock = new \phpbb\lock\flock($path);
+			$ok = $lock->acquire();
+			$this->assertTrue($ok);
+			$this->assertTrue($lock->owns_lock());
+			sleep(2);
+			$lock->release();
+			$this->assertFalse($lock->owns_lock());
+
+			// and go away silently
+			pcntl_exec('/usr/bin/env', array('true'));
+		}
+	}
+}