<?php

/*

 * Enano - an open-source CMS capable of wiki functions, Drupal-like sidebar blocks, and everything in between

 * Copyright (C) 2006-2009 Dan Fuhry

 *

 * This program is Free Software; you can redistribute and/or modify it under the terms of the GNU General Public License

 * as published by the Free Software Foundation; either version 2 of the License, or (at your option) any later version.

 *

 * This program is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied

 * warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License for details.

 */

/**

 * Framework for caching arbitrary data around the site.

 * @package Enano

 * @subpackage Core

 * @author Dan Fuhry <dan@enanocms.org>

 * @license GNU General Public License

 */

class CacheManager

{

	public static function factory($backend = 'auto')

	{

		if ( function_exists('xcache_set') )

			return new CacheManager_XCache();

		else

			return new CacheManager_File();

	}

}

class CacheManager_XCache

{

	private $prefix;

	/**

	 * Constructor. Merely generates the prefix that will be prepended to cache objects.

	 */

	public function __construct()

	{

		global $crypto_key;

		$this->prefix = 'enano' . substr(md5($crypto_key), 0, 8) . '_';

	}

	/**

	 * @see CacheManager_File::fetch()

	 */

	public function fetch($cache_id)

	{

		return xcache_isset($this->prefix . $cache_id) ? xcache_get($this->prefix . $cache_id) : false;

	}

	/**

	 * @see CacheManager_File::store()

	 */

	public function store($cache_id, $data, $ttl = 20)

	{

		return xcache_set($this->prefix . $cache_id, $data, $ttl * 60);

	}

	/**

	 * @see CacheManager_File::purge()

	 */

	public function purge($cache_id)

	{

		return xcache_unset($this->prefix . $cache_id);

	}

}

class CacheManager_File

{

	/**

 	* Fetch a cached piece of data.

 	* @param string Cache ID. The timestamp is checked automatically.

 	*/

	public function fetch($cache_id)

	{

		if ( !preg_match('/^[a-z0-9_]+$/', $cache_id) )

		{

			throw new Exception('Cache ID must be letters, numbers, and underscores.');

		}

		$cache_file = ENANO_ROOT . "/cache/cache_$cache_id.php";

		if ( file_exists($cache_file) )

		{

			require($cache_file);

			if ( isset($_cache_data) && isset($_cache_ttl) && isset($_cache_timestamp) )

			{

				$cache_expire = $_cache_timestamp + ( 60 * $_cache_ttl);

				if ( $cache_expire >= time() || $_cache_ttl === -1 )

				{

					return $_cache_data;

				}

			}

		}

		return false;

	}

	/**

 	* Stores an array by var_export()ing it and saving it to disk.

 	* @param string Cache ID - human readable name for this store (letters, numbers, underscores)

 	* @param array Data to store

 	* @param int TTL for the cached array, in minutes. Defaults to 20. If set to -1, caches indefinitely.

 	* @return bool True on success, false on failure

 	*/

	public function store($cache_id, $data, $ttl = 20)

	{

		if ( getConfig('cache_thumbs') != '1' )

		{

			// caching disabled

			return false;

		}

		if ( !preg_match('/^[a-z0-9_]+$/', $cache_id) )

		{

			throw new Exception('Cache ID must be letters, numbers, and underscores.');

		}

		if ( !is_int($ttl) )

		{

			throw new Exception('TTL must be an integer');

		}

		$cache_file = ENANO_ROOT . "/cache/cache_$cache_id.php";

		if ( file_exists($cache_file) )

		{

			@unlink($cache_file);

		}

		$fh = @fopen($cache_file, 'w');

		if ( !$fh )

		{

			throw new Exception('Failed to open file for writing.');

		}

		$exported = Language::var_export_string($data);

		$now = time();

		$content = <<<EOF

<?php

/**

 * Automatically generated cache file.

 * Do not edit this file as it will expire and be overwritten $ttl minutes from its creation.

 */

\$_cache_ttl = $ttl;

\$_cache_timestamp = $now;

\$_cache_data = $exported;

EOF;

		fwrite($fh, $content);

		fclose($fh);

		return true;

	}

	/**

 	* Deletes a cached item.

 	* @param string Cache ID.

 	* @return bool true on success or if item doesn't exist, false on failure

 	*/

	public function purge($cache_id)

	{

		if ( !preg_match('/^[a-z0-9_]+$/', $cache_id) )

		{

			throw new Exception('Cache ID must be letters, numbers, and underscores.');

		}

		$cache_file = ENANO_ROOT . "/cache/cache_$cache_id.php";

		if ( file_exists($cache_file) )

		{

			if ( unlink($cache_file) )

			{

				return true;

			}

			return false;

		}

		return true;

	}

}