<?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.

 */

// Cache manager - regenerate and clear various cached values

function page_Admin_CacheManager()

{

	global $db, $session, $paths, $template, $plugins; // Common objects

	global $lang;

	global $cache;

	if ( $session->auth_level < USER_LEVEL_ADMIN || $session->user_level < USER_LEVEL_ADMIN )

	{

		$login_link = makeUrlNS('Special', 'Login/' . $paths->nslist['Special'] . 'Administration', 'level=' . USER_LEVEL_ADMIN, true);

		echo '<h3>' . $lang->get('adm_err_not_auth_title') . '</h3>';

		echo '<p>' . $lang->get('adm_err_not_auth_body', array( 'login_link' => $login_link )) . '</p>';

		return;

	}

	// validation/actions

	if ( isset($_POST['refresh']) || isset($_POST['clear']) )

	{

		$success = false;

		$target = ( isset($_POST['refresh']) ) ? $_POST['refresh'] : $_POST['clear'];

		$do_refresh = isset($_POST['refresh']);

		switch ( $target )

		{

			case 'page':

				$success = $cache->purge('page_meta');

				if ( $do_refresh && $success )

					$success = $paths->update_metadata_cache();

				break;

			case 'ranks':

				$success = $cache->purge('ranks');

				if ( $do_refresh && $success )

					$success = generate_cache_userranks();

				break;

			case 'sidebar':

				$success = $cache->purge('anon_sidebar');

				break;

			case 'plugins':

				$success = $cache->purge('plugins');

				if ( $do_refresh && $success )

					$success = $plugins->generate_plugins_cache();

				break;

			case 'template':

				if ( $dh = opendir(ENANO_ROOT . '/cache') )

				{

					while ( $file = @readdir($dh) )

					{

						$fullpath = ENANO_ROOT . "/cache/$file";

						// we don't want to mess with directories

						if ( !is_file($fullpath) )

							continue;

						if ( preg_match('/\.(?:tpl|css)\.php$/', $file) )

						{

							unlink($fullpath);

						}

					}

					$success = true;

				}

				break;

			case 'aes':

				$success = @unlink(ENANO_ROOT . '/cache/aes_decrypt.php');

				break;

			case 'lang':

				if ( $dh = opendir(ENANO_ROOT . '/cache') )

				{

					while ( $file = @readdir($dh) )

					{

						$fullpath = ENANO_ROOT . "/cache/$file";

						// we don't want to mess with directories

						if ( !is_file($fullpath) )

							continue;

						if ( preg_match('/^lang_json_(?:[a-f0-9]+?)\.php$/', $file) || preg_match('/^(?:cache_)?lang_(?:[0-9]+?)\.php$/', $file) )

							unlink($fullpath);

					}

					$success = true;

				}

				if ( $do_refresh && $success )

				{

					// for each language in the database, call regen_caches()

					$q = $db->sql_query('SELECT lang_id FROM ' . table_prefix . 'language;');

					if ( !$q )

						$db->_die();

					while ( $row = $db->fetchrow($q) )

					{

						$lang_local = ( $row['lang_id'] == $lang->lang_id ) ? $lang : new Language($row['lang_id']);

						$success = $lang_local->regen_caches();

						if ( !$success )

							break 2;

					}

				}

				break;

			case 'js':

				if ( $dh = opendir(ENANO_ROOT . '/cache') )

				{

					while ( $file = @readdir($dh) )

					{

						$fullpath = ENANO_ROOT . "/cache/$file";

						// we don't want to mess with directories

						if ( !is_file($fullpath) )

							continue;

						// compressed javascript

						if ( preg_match('/^jsres_(?:[A-z0-9_-]+)\.js\.json$/', $file) )

							unlink($fullpath);

						// tinymce stuff

						else if ( preg_match('/^tiny_mce_(?:[a-f0-9]+)\.gz$/', $file) )

							unlink($fullpath);

					}

					$success = true;

				}

				break;

			case 'thumbs':

				if ( $dh = opendir(ENANO_ROOT . '/cache') )

				{

					while ( $file = @readdir($dh) )

					{

						$fullpath = ENANO_ROOT . "/cache/$file";

						// we don't want to mess with directories

						if ( !is_file($fullpath) )

							continue;

						if ( preg_match('/^(?:[a-z0-9\._,-]+)-(?:[0-9]{10})-[0-9]+x[0-9]+\.([a-z0-9_-]+)$/i', $file) )

							unlink($fullpath);

					}

					$success = true;

				}

				break;

			case 'wikieditnotice':

				$cache->purge('wiki_edit_notice');

				if ( $do_refresh )

					$template->get_wiki_edit_notice();

				$success = true;

				break;

			case 'all':

				$success = purge_all_caches();

				if ( $do_refresh )

				{

					//

					// refresh all static (non-incremental) caches

					//

					// pages

					$success = $paths->update_metadata_cache();

					if ( !$success )

						break;

					// user ranks

					$success = generate_cache_userranks();

					if ( !$success )

						break;

					// plugins

					$success = $plugins->generate_plugins_cache();

					if ( !$success )

						break;

					// wiki edit notice

					$template->get_wiki_edit_notice();

					// languages

					$q = $db->sql_query('SELECT lang_id FROM ' . table_prefix . 'language;');

					if ( !$q )

						$db->_die();

					while ( $row = $db->fetchrow($q) )

					{

						$lang_local = ( $row['lang_id'] == $lang->lang_id ) ? $lang : new Language($row['lang_id']);

						$success = $lang_local->regen_caches();

						if ( !$success )

							break 2;

					}

				}

				break;

			default:

				$code = $plugins->setHook('acp_cache_manager_action');

				foreach ( $code as $cmd )

				{

					eval($cmd);

				}

				break;

		}

		if ( $success )

		{

			echo '<div class="info-box">' . $lang->get('acpcm_msg_action_success') . '</div>';

		}

		else

		{

			echo '<div class="error-box">' . $lang->get('acpcm_err_action_failed') . '</div>';

		}

	}

	else if ( isset($_POST['save']) )

	{

		$config_value = ( isset($_POST['cache_thumbs']) ) ? '1' : '0';

		setConfig('cache_thumbs', $config_value);

		echo '<div class="info-box">' . $lang->get('acpcm_msg_action_success') . '</div>';

	}

	echo '<h3><img alt=" " src="' . scriptPath . '/images/icons/applets/cachemanager.png" />&nbsp;&nbsp;&nbsp;' . $lang->get('acpcm_heading_main') . '</h3>';

	echo '<p>' . $lang->get('acpcm_intro') . '</p>';

	echo '<div class="warning-box">' . $lang->get('acpcm_msg_refresh_warning') . '</div>';

	acp_start_form();

	?>

	<div class="tblholder">

		<table border="0" cellspacing="1" cellpadding="4">

			<!-- HEADER -->

			<tr>

				<th colspan="2">

					<?php echo $lang->get('acpcm_table_header'); ?>

				</th>

			</tr>

			<!-- ENABLE CACHE -->

			<tr>

				<td class="row1" colspan="2">

					<label>

						<input type="checkbox" name="cache_thumbs"<?php if ( getConfig('cache_thumbs') == '1' ) echo ' checked="checked"'; ?> />

						<?php echo $lang->get('acpcm_lbl_enable_cache'); ?>

					</label>

					<br />

					<small>

						<?php echo $lang->get('acpcm_hint_enable_cache'); ?>

					</small>

				</td>

			</tr>

			<!-- CLEAR ALL -->

			<tr>

			<td class="row2" style="width: 120px; text-align: center;">

					<button name="clear" value="all"><?php echo $lang->get('acpcm_btn_clear_all'); ?></button>

				</td>

				<td class="row2">

					<?php echo $lang->get('acpcm_hint_clear_all'); ?>

				</td>

			</tr>

			<?php

			// if caching is disabled, might as well break off here

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

			?>

			<!-- REFRESH ALL -->

			<tr>

				<td class="row1" style="text-align: center;">

					<button name="refresh" value="all"><?php echo $lang->get('acpcm_btn_refresh_all'); ?></button>

				</td>

				<td class="row1">

					<?php echo $lang->get('acpcm_hint_refresh_all'); ?>

				</td>

			</tr>

			<!-- INDIVIDUAL CACHES -->

			<tr>

				<th class="subhead" colspan="2">

					<?php echo $lang->get('acpcm_th_individual_caches'); ?>

				</th>

			</tr>

			<?php

			$class = 'row2';

			$cache_list = array('page', 'ranks', 'sidebar', 'plugins', 'template', 'aes', 'lang', 'js', 'thumbs', 'wikieditnotice');

			$code = $plugins->setHook('acp_cache_manager_list_caches');

			foreach ( $code as $cmd )

			{

				eval($cmd);

			}

			foreach ( $cache_list as $target )

			{

				$class = ( $class == 'row1' ) ? 'row2' : 'row1';

				?><tr>

				<td class="<?php echo $class; ?>" style="text-align: center;">

					<button name="refresh" value="<?php echo $target; ?>"<?php if ( in_array($target, array('template', 'sidebar', 'aes', 'js', 'thumbs')) ) echo ' disabled="disabled"'; ?>>

						<?php echo $lang->get('acpcm_btn_refresh'); ?>

					</button>

					<button name="clear" value="<?php echo $target; ?>">

						<?php echo $lang->get('acpcm_btn_clear'); ?>

					</button>

				</td>

				<td class="<?php echo $class; ?>">

					<b><?php echo $lang->get("acpcm_cache_{$target}_desc_title"); ?></b> &ndash;

					<?php echo $lang->get("acpcm_cache_{$target}_desc_body"); ?>

				</td>

				</tr>

			<?php

			}

			// getConfig('cache_thumbs') == '1'

			endif;

			?>

			<!-- SAVE CHANGES -->

			<tr>

				<th colspan="2" class="subhead">

					<input type="submit" name="save" value="<?php echo $lang->get('etc_save_changes'); ?>" style="font-weight: bold;" />

					<input type="submit" name="cancel" value="<?php echo $lang->get('etc_cancel'); ?>" />

				</th>

			</tr>

		</table>

	</div>

	<?php

	echo '</form>';

}

?>