From 27981ca30f85655ca487257418b19a17f962b0c3 Mon Sep 17 00:00:00 2001
From: Andrew Dolgov <fox@bah.spb.su>
Date: Mon, 13 Feb 2006 14:08:23 +0100
Subject: warn if daemon process is not running on server

---
 functions.php | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)

(limited to 'functions.php')

diff --git a/functions.php b/functions.php
index 55e785488..f813b6baa 100644
--- a/functions.php
+++ b/functions.php
@@ -928,6 +928,22 @@
 		} 
 	}
 
+	function file_is_locked($filename) {
+		error_reporting(0);
+		$fp = fopen($filename, "r");
+		error_reporting(DEFAULT_ERROR_LEVEL);
+		if ($fp) {
+			if (flock($fp, LOCK_EX | LOCK_NB)) {
+				flock($fp, LOCK_UN);
+				fclose($fp);
+				return false;
+			}
+			fclose($fp);
+			return true;
+		}
+		return false;
+	}
+
 	function make_lockfile($filename) {
 		$fp = fopen($filename, "w");
 
-- 
cgit v1.2.3