Added test to see if memcache is available.

git-svn-id: https://code.elgg.org/elgg/trunk@2411 36083f99-b078-4883-b0ff-0f9b5a30f544

1 files changed, 25 insertions, 0 deletions

diff --git a/engine/lib/memcache.php b/engine/lib/memcache.php
index 8afef6302..ec3ebc783 100644
--- a/engine/lib/memcache.php
+++ b/engine/lib/memcache.php
@@ -213,4 +213,29 @@
 			$this->save_persistent_keylist();
 		}*/
 	}
+	
+	/**
+	 * Return true if memcache is available and configured.
+	 *
+	 * @return bool
+	 */
+	function is_memcache_available()
+	{
+		global $CONFIG;
+		
+		static $memcache_available;
+		
+		if ((!isset($CONFIG->memcache)) || (!$CONFIG->memcache))
+			return false;
+		
+		if (($memcache_available!==true) && ($memcache_available!==false)) // If we haven't set variable to something
+		{
+			try {
+				$tmp = new ElggMemcache();
+				$memcache_available = true; // No exception thrown so we have memcache available
+			} catch (Exception $e) { $memcache_available = false; }
+		}
+		
+		return $memcache_available;
+	}
 ?>
\ No newline at end of file