<?php

/**!info**

{

	"Plugin Name"  : "plugin_speciallog_title",

	"Plugin URI"   : "http://enanocms.org/",

	"Description"  : "plugin_speciallog_desc",

	"Author"       : "Dan Fuhry",

	"Version"      : "1.1.6",

	"Author URI"   : "http://enanocms.org/"

}

**!*/

/*

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

 */

function SpecialLog_paths_init()

{

	register_special_page('Log', 'specialpage_log');

}

function page_Special_Log()

{

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

	global $lang;

	global $output;

	// FIXME: This doesn't currently prohibit viewing of aggregate logs that might include a page for which

	// we don't have permission to view history. It does, however, block access if a list of pages is given

	// and one of those doesn't allow history_view.

	// FIXME: This is a real hack. We're trying to get permissions on a random non-existent article, which

	// effectively forces calculation to occur based on site-wide permissions.

	$pid = '';

	for ( $i = 0; $i < 32; $i++ )

	{

		$pid .= chr(mt_rand(32, 126));

	}

	$perms = $session->fetch_page_acl($pid, 'Article');

	$perms_changed = false;

	require_once(ENANO_ROOT . '/includes/log.php');

	$log = new LogDisplay();

	$page = 1;

	$pagesize = 50;

	$fmt = 'full';

	if ( $params = $paths->getAllParams() )

	{

		if ( $params === 'AddFilter' && !empty($_POST['type']) && !empty($_POST['value']) )

		{

			$type = $_POST['type'];

			if ( $type == 'within' )

				$value = strval(intval($_POST['value']['within'])) . $_POST['value']['withinunits'];

			else

				$value = $_POST['value'][$type];

			if ( !ctype_digit($value) )

				$value = str_replace('/', '.2f', sanitize_page_id($value));

			if ( $value !== '0' && (empty($value) || ( $type == 'within' && intval($value) == 0 )) )

			{

				$adderror = $lang->get('log_err_addfilter_field_empty');

			}

			else

			{

				$append = ( !empty($_POST['existing_filters']) ) ? "{$_POST['existing_filters']}/" : '';

				$url = makeUrlNS('Special', "Log/{$append}{$type}={$value}");

				redirect($url, '', '', 0);

			}

		}

		$params = explode('/', $params);

		foreach ( $params as $i => $param )

		{

			$param = str_replace('.2f', '/', dirtify_page_id($param));

			if ( preg_match('/^([a-z]+)!?=(.+?)$/', $param, $match) )

			{

				$name =& $match[1];

				$value =& $match[2];

				switch($name)

				{

					case 'resultpage':

						$page = intval($value);

						break;

					case 'size':

						$pagesize = intval($value);

						break;

					case 'fmt':

						switch($value)

						{

							case 'barenaked':

							case 'ajax':

								$fmt = 'naked';

								$output = new Output_Naked();

								break;

						}

						break;

					case 'page':

						// tolerate slashes

						$j = $i;

						while ( true )

						{

							if ( isset($params[++$j]) )

							{

								if ( preg_match('/^([a-z]+)!?=(.+?)$/', $params[$j]) )

									break;

								$value .= '/' . $params[$j];

							}

							else

							{

								break;

							}

						}

						if ( get_class($perms) == 'sessionManager' )

						{

							unset($perms);

							list($pid, $ns) = RenderMan::strToPageID($value);

							$perms = $session->fetch_page_acl($pid, $ns);

							if ( !$perms->get_permissions('history_view') )

							{

								die_friendly($lang->get('etc_access_denied_short'), '<p>' . $lang->get('log_err_access_denied') . '</p>');

							}

						}

						// no break here on purpose

					default:

						try

						{

							$log->add_criterion($name, $value);

						}

						catch ( Exception $e )

						{

						}

						break;

				}

			}

		}

	}

	if ( !$perms->get_permissions('history_view') )

	{

		die_friendly($lang->get('etc_access_denied_short'), '<p>' . $lang->get('log_err_access_denied') . '</p>');

	}

	$page--;

	$rowcount = $log->get_row_count();

	$paramsbit = rtrim(preg_replace('|/?resultpage=([0-9]+)/?|', '/', $paths->getAllParams()), '/');

	$paramsbit = ( !empty($paramsbit) ) ? "/$paramsbit" : '';

	$result_url = makeUrlNS('Special', 'Log' . $paramsbit . '/resultpage=%s', false, true);

	$paginator = generate_paginator($page, ceil($rowcount / $pagesize), $result_url);

	$dataset = $log->get_data($page * $pagesize, $pagesize);

	$output->header();

	// breadcrumbs

	if ( $fmt != 'naked' )

	{

		echo '<div class="breadcrumbs" style="font-weight: normal;" id="log-breadcrumbs">';

		echo speciallog_generate_breadcrumbs($log->get_criteria());

		echo '</div>';

	// form

	?>

	<!-- Begin filter add form -->

	<form action="<?php echo makeUrlNS('Special', 'Log/AddFilter', false, true); ?>" method="post" enctype="multipart/form-data">

		<?php

		// serialize parameters

		$params_pre = rtrim(preg_replace('#/?resultpage=[0-9]+/?#', '/', $paths->getAllParams()), '/');

		echo '<input type="hidden" name="existing_filters" value="' . htmlspecialchars($params_pre) . '" />';

		?>

		<script type="text/javascript">//<![CDATA[

			addOnloadHook(function()

				{

					load_component('jquery');

					$('#log_addfilter_select').change(function()

						{

							var value = $(this).val();

							$('.log_addfilter').hide();

							$('#log_addform_' + value).show();

						});

					$('#log_addform_' + $('#log_addfilter_select').val()).show();

				});

		// ]]>

		</script>

		<?php

		if ( isset($adderror) )

		{

			echo '<div class="error-box">' . $adderror . '</div>';

		}

		?>

		<div class="tblholder">

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

			<tr>

				<th colspan="2">

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

				</th>

			</tr>

			<tr>

			<td class="row1" style="width: 50%; text-align: right;">

					<select name="type" id="log_addfilter_select">

						<option value="user"><?php echo $lang->get('log_form_filtertype_user'); ?></option>

						<option value="page"><?php echo $lang->get('log_form_filtertype_page'); ?></option>

						<option value="within"><?php echo $lang->get('log_form_filtertype_within'); ?></option>

						<option value="action"><?php echo $lang->get('log_form_filtertype_action'); ?></option>

						<option value="minor"><?php echo $lang->get('log_form_filtertype_minor'); ?></option>

					</select>

				</td>

				<td class="row1" style="width: 50%; text-align: left;">

					<div class="log_addfilter" id="log_addform_user">

						<input type="text" class="autofill username" name="value[user]" size="40" />

					</div>

					<div class="log_addfilter" id="log_addform_page">

						<input type="text" class="autofill page" name="value[page]" size="40" />

					</div>

					<div class="log_addfilter" id="log_addform_within">

						<input type="text" name="value[within]" size="7" />

						<select name="value[withinunits]">

							<option value="d"><?php echo $lang->get('etc_unit_days'); ?></option>

							<option value="w"><?php echo $lang->get('etc_unit_weeks'); ?></option>

							<option value="m"><?php echo $lang->get('etc_unit_months'); ?></option>

							<option value="y"><?php echo $lang->get('etc_unit_years'); ?></option>

						</select>

					</div>

					<div class="log_addfilter" id="log_addform_action">

						<select name="value[action]">

							<option value="rename"><?php echo $lang->get('log_formaction_rename'); ?></option>

							<option value="create"><?php echo $lang->get('log_formaction_create'); ?></option>

							<option value="delete"><?php echo $lang->get('log_formaction_delete'); ?></option>

							<option value="protect"><?php echo $lang->get('log_action_protect'); ?></option>

							<option value="edit"><?php echo $lang->get('log_action_edit'); ?></option>

							<option value="edit"><?php echo $lang->get('log_formaction_reupload'); ?></option>

							<option value="edit"><?php echo $lang->get('log_formaction_votereset'); ?></option>

						</select>

					</div>

					<div class="log_addfilter" id="log_addform_minor">

						<label>

							<input type="radio" name="value[minor]" value="1" checked="checked" />

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

						</label>

						<label>

							<input type="radio" name="value[minor]" value="0" />

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

						</label>

					</div>

				</td>

			</tr>

			<tr>

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

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

				</th>

			</tr>

		</table>

		</div>

	</form>

	<!-- End filter add form -->

	<?php

	}

	// start of actual log output area

	if ( $fmt != 'naked' )

	{

		echo '<div id="log-body">';

	}

	if ( $rowcount > 0 )

	{

		// we have some results, show pagination + result list

		echo '<h3 style="float: left;">' . $lang->get('log_heading_logdisplay') . '</h3>';

		echo $paginator;

		// padding

		echo '<div style="height: 10px; clear: both;"></div>';

		foreach ( $dataset as $row )

		{

			echo LogDisplay::render_row($row) . '<br />';

		}

		echo $paginator;

	}

	else

	{

		// no results

		echo '<h2 class="emptymessage">' . $lang->get('log_msg_no_results') . '</h2>';

	}

	if ( $fmt != 'naked' )

		echo '</div> <!-- div#log-body -->';

	$output->footer();

}

function speciallog_generate_breadcrumbs($criteria)

{

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

	global $lang;

	if ( count($criteria) == 0 )

	{

		return $lang->get('log_msg_no_filters');

	}

	$html = array();

	foreach ( $criteria as $criterion )

	{

		list($type, $value) = $criterion;

		switch($type)

		{

			case 'user':

				$rank_info = $session->get_user_rank($value);

				$user_link = '<a href="' . makeUrlNS('User', $value, false, true) . '" style="' . $rank_info['rank_style'] . '" title="' . htmlspecialchars($lang->get($rank_info['rank_title'])) . '">';

				$user_link .= htmlspecialchars(str_replace('_', ' ', $value)) . '</a>';

				$crumb = $lang->get('log_breadcrumb_author', array('user' => $user_link));

				break;

			case 'page':

				list($pid, $ns) = RenderMan::strToPageID($value);

				$ns = namespace_factory($pid, $ns);

				$exist = $ns->exists() ? '' : ' class="wikilink-nonexistent"';

				$crumb = $lang->get('log_breadcrumb_page', array('page' => '<a' . $exist . ' href="' . makeUrl($value, false, true) . '">' . htmlspecialchars($ns->title) . '</a>'));

				break;

			case 'action':

				$action = ( $lang->get("log_formaction_{$value}") === "log_formaction_{$value}" ) ? $lang->get("log_action_{$value}") : $lang->get("log_formaction_{$value}");

				$crumb = $lang->get('log_breadcrumb_action', array('action' => htmlspecialchars($action)));

				break;

			case 'minor':

				$crumb = $value == '1' ? $lang->get('log_form_filtertype_minor_yes') : $lang->get('log_form_filtertype_minor_no');

				break;

			case 'within':

				$value = intval($value);

				if ( $value % 31536000 == 0 )

				{

					$n = $value / 31536000;

					$value = "$n " . $lang->get( $n > 1 ? 'etc_unit_years' : 'etc_unit_year' );

				}

				else if ( $value % 2592000 == 0 )

				{

					$n = $value / 2592000;

					$value = "$n " . $lang->get( $n > 1 ? 'etc_unit_months' : 'etc_unit_month' );

				}

				else if ( $value % 604800 == 0 )

				{

					$n = $value / 604800;

					$value = "$n " . $lang->get( $n > 1 ? 'etc_unit_weeks' : 'etc_unit_week' );

				}

				else if ( $value % 86400 == 0 )

				{

					$n = $value / 86400;

					$value = "$n " . $lang->get( $n > 1 ? 'etc_unit_days' : 'etc_unit_day' );

				}

				else

				{

					$value = "$value " . $lang->get( $value > 1 ? 'etc_unit_seconds' : 'etc_unit_second' );

				}

				$crumb = $lang->get('log_breadcrumb_within', array('time' => $value));

				break;

		}

		$html[] = $crumb . ' ' . speciallog_crumb_remove_link($criterion);

	}

	return implode(' » ', $html);

}

function speciallog_crumb_remove_link($criterion)

{

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

	global $lang;

	list($type, $value) = $criterion;

	$params = explode('/', dirtify_page_id($paths->getAllParams()));

	foreach ( $params as $i => $param )

	{

		if ( $param === "$type=$value" )

		{

			unset($params[$i]);

			break;

		}

		else if ( $type === 'within' )

		{

			list($ptype, $pvalue) = explode('=', $param);

			if ( $ptype !== 'within' )

				continue;

			$lastchar = substr($pvalue, -1);

			$amt = intval($pvalue);

			switch($lastchar)

			{

				case 'd':

					$amt = $amt * 86400;

					break;

				case 'w':

					$amt = $amt * 604800;

					break;

				case 'm':

					$amt = $amt * 2592000;

					break;

				case 'y':

					$amt = $amt * 31536000;

					break;

			}

			if ( $amt === $value )

			{

				unset($params[$i]);

				break;

			}

		}

	}

	if ( count($params) > 0 )

	{

		$params = implode('/', $params);

		$url = makeUrlNS('Special', "Log/$params", false, true);

	}

	else

	{

		$url = makeUrlNS('Special', "Log", false, true);

	}

	return '<sup><a href="' . $url . '">(x)</a></sup>';

}