aboutsummaryrefslogtreecommitdiffstats
path: root/include/lock.php
blob: e7e176eeec22aef020a3924f98ddcd36cdb06f00 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
<?php

// Provide some ability to lock a PHP function so that multiple processes
// can't run the function concurrently
if(! function_exists('lock_function')) {
function lock_function($fn_name, $block = true, $wait_sec = 2) {
	if( $wait_sec == 0 )
		$wait_sec = 2;	// don't let the user pick a value that's likely to crash the system

	$got_lock = false;

	do {
		q("LOCK TABLE locks WRITE");
		$r = q("SELECT locked FROM locks WHERE name = '%s' LIMIT 1",
			dbesc($fn_name)
		);

		if((count($r)) && (! $r[0]['locked'])) {
			q("UPDATE locks SET locked = 1 WHERE name = '%s' LIMIT 1",
				dbesc($fn_name)
			);
			$got_lock = true;
		}
		elseif(! $r) { // the Boolean value for count($r) should be equivalent to the Boolean value of $r
			q("INSERT INTO locks ( name, locked ) VALUES ( '%s', 1 )",
				dbesc($fn_name)
			);
			$got_lock = true;
		}

		q("UNLOCK TABLES");

		if(($block) && (! $got_lock))
			sleep($wait_sec);

	} while(($block) && (! $got_lock));

	logger('lock_function: function ' . $fn_name . ' with blocking = ' . $block . ' got_lock = ' . $got_lock, LOGGER_DEBUG);
	
	return $got_lock;
}}


if(! function_exists('block_on_function_lock')) {
function block_on_function_lock($fn_name, $wait_sec = 2) {
	if( $wait_sec == 0 )
		$wait_sec = 2;	// don't let the user pick a value that's likely to crash the system

	do {
		$r = q("SELECT locked FROM locks WHERE name = '%s' LIMIT 1",
				dbesc(fn_name)
		     );

		if(count($r) && $r[0]['locked'])
			sleep($wait_sec);

	} while(count($r) && $r[0]['locked']);

	return;
}}


if(! function_exists('unlock_function')) {
function unlock_function(fn_name) {
	//$r = q("LOCK TABLE lock WRITE");
	$r = q("UPDATE locks SET locked = 0 WHERE name = '%s' LIMIT 1",
			dbesc(fn_name)
	     );
	//$r = q("UNLOCK TABLES");

	logger('unlock_function: released lock for function ' . fn_name, LOGGER_DEBUG);

	return;
}}

?>