Enano CMS (1.1.x): comparison includes/functions.php

equal deleted inserted replaced

-:de56132c008d
+:bdac73ed481e
 * @return string Configuration value, or bool(false) if the value is not set
 */
 function getConfig($n, $default = false)
 {
-global $enano_config;
+	global $enano_config;
-if ( isset( $enano_config[ $n ] ) )
+	if ( isset( $enano_config[ $n ] ) )
-{
+	{
-return $enano_config[$n];
+		return $enano_config[$n];
-}
+	}
-else
+	else
-{
+	{
-return $default;
+		return $default;
-}
+	}
 }
 /**
 * Update or change a configuration value.
 * @param string The identifier of the value ("site_name" etc.)
 * @return null
 */
 function setConfig($n, $v)
 {
-global $enano_config, $db;
+	global $enano_config, $db;
-if ( isset($enano_config[$n]) )
+	if ( isset($enano_config[$n]) )
-{
+	{
-if ( $enano_config[$n] === $v )
+		if ( $enano_config[$n] === $v )
-{
+		{
-// configuration already matches this value
+			// configuration already matches this value
-return true;
+			return true;
-}
+		}
-}
+	}
-$enano_config[$n] = $v;
+	$enano_config[$n] = $v;
-if ( $v === false )
+	if ( $v === false )
-unset($enano_config[$n]);
+		unset($enano_config[$n]);
-$v = $db->escape($v);
+	$v = $db->escape($v);
-$e = $db->sql_query('DELETE FROM '.table_prefix.'config WHERE config_name=\''.$n.'\';');
+	$e = $db->sql_query('DELETE FROM '.table_prefix.'config WHERE config_name=\''.$n.'\';');
-if ( !$e )
+	if ( !$e )
-{
+	{
-$db->_die('Error during generic setConfig() call row deletion.');
+		$db->_die('Error during generic setConfig() call row deletion.');
-}
+	}
-if ( $v !== false )
+	if ( $v !== false )
-{
+	{
-$e = $db->sql_query('INSERT INTO '.table_prefix.'config(config_name, config_value) VALUES(\''.$n.'\', \''.$v.'\')');
+		$e = $db->sql_query('INSERT INTO '.table_prefix.'config(config_name, config_value) VALUES(\''.$n.'\', \''.$v.'\')');
-if ( !$e )
+		if ( !$e )
-{
+		{
-$db->_die('Error during generic setConfig() call row insertion.');
+			$db->_die('Error during generic setConfig() call row insertion.');
-}
+		}
-}
+	}
 }
 /**
 * Create a URI for an internal link.
 * @param string The full identifier of the page to link to (Special:Administration)
 * @return string
 */
 if ( !function_exists('makeUrl') )
 {
-function makeUrl($t, $query = false, $escape = false)
+	function makeUrl($t, $query = false, $escape = false)
-{
+	{
-global $db, $session, $paths, $template, $plugins; // Common objects
+		global $db, $session, $paths, $template, $plugins; // Common objects
-$flags = '';
+		$flags = '';
-$sep = urlSeparator;
+		$sep = urlSeparator;
-$t = sanitize_page_id($t);
+		$t = sanitize_page_id($t);
-if ( isset($_GET['printable'] ) )
+		if ( isset($_GET['printable'] ) )
-{
+		{
-$flags .= $sep . 'printable=yes';
+			$flags .= $sep . 'printable=yes';
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset($_GET['theme'] ) )
+		if ( isset($_GET['theme'] ) )
-{
+		{
-$flags .= $sep . 'theme='.$session->theme;
+			$flags .= $sep . 'theme='.$session->theme;
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset($_GET['style'] ) )
+		if ( isset($_GET['style'] ) )
-{
+		{
-$flags .= $sep . 'style='.$session->style;
+			$flags .= $sep . 'style='.$session->style;
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )
+		if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )
-{
+		{
-$flags .= $sep . 'lang=' . urlencode($_GET['lang']);
+			$flags .= $sep . 'lang=' . urlencode($_GET['lang']);
-$sep = '&';
+			$sep = '&';
-}
+		}
-$url = is_object($session) ? $session->append_sid(contentPath.$t.$flags) : contentPath . $t . $flags;
+		$url = is_object($session) ? $session->append_sid(contentPath.$t.$flags) : contentPath . $t . $flags;
-if($query)
+		if($query)
-{
+		{
-$sep = strstr($url, '?') ? '&' : '?';
+			$sep = strstr($url, '?') ? '&' : '?';
-$url = $url . $sep . $query;
+			$url = $url . $sep . $query;
-}
+		}
-return ($escape) ? htmlspecialchars($url) : $url;
+		return ($escape) ? htmlspecialchars($url) : $url;
-}
+	}
 }
 /**
 * Create a URI for an internal link, and be namespace-friendly. Watch out for this one because it's different from most other Enano functions, in that the namespace is the first parameter.
 * @param string The namespace ID
 * @return string
 */
 if ( !function_exists('makeUrlNS') )
 {
-function makeUrlNS($n, $t, $query = false, $escape = false)
+	function makeUrlNS($n, $t, $query = false, $escape = false)
-{
+	{
-global $db, $session, $paths, $template, $plugins; // Common objects
+		global $db, $session, $paths, $template, $plugins; // Common objects
-$flags = '';
+		$flags = '';
-if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
+		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
-{
+		{
-$sep = urlSeparator;
+			$sep = urlSeparator;
-}
+		}
-else
+		else
-{
+		{
-$sep = (strstr($_SERVER['REQUEST_URI'], '?')) ? '&' : '?';
+			$sep = (strstr($_SERVER['REQUEST_URI'], '?')) ? '&' : '?';
-}
+		}
-if ( isset( $_GET['printable'] ) ) {
+		if ( isset( $_GET['printable'] ) ) {
-$flags .= $sep . 'printable';
+			$flags .= $sep . 'printable';
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset( $_GET['theme'] ) )
+		if ( isset( $_GET['theme'] ) )
-{
+		{
-$flags .= $sep . 'theme='.$session->theme;
+			$flags .= $sep . 'theme='.$session->theme;
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset( $_GET['style'] ) )
+		if ( isset( $_GET['style'] ) )
-{
+		{
-$flags .= $sep . 'style='.$session->style;
+			$flags .= $sep . 'style='.$session->style;
-$sep = '&';
+			$sep = '&';
-}
+		}
-if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )
+		if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )
-{
+		{
-$flags .= $sep . 'lang=' . urlencode($_GET['lang']);
+			$flags .= $sep . 'lang=' . urlencode($_GET['lang']);
-$sep = '&';
+			$sep = '&';
-}
+		}
-$ns_prefix = "$n:";
+		$ns_prefix = "$n:";
-if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
+		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
-{
+		{
-$ns_prefix = ( isset($paths->nslist[$n]) ) ? $paths->nslist[$n] : $n . substr($paths->nslist['Special'], -1);
+			$ns_prefix = ( isset($paths->nslist[$n]) ) ? $paths->nslist[$n] : $n . substr($paths->nslist['Special'], -1);
-$url = contentPath . $ns_prefix . $t . $flags;
+			$url = contentPath . $ns_prefix . $t . $flags;
-}
+		}
-else
+		else
-{
+		{
-// If the path manager hasn't been initted yet, take an educated guess at what the URI should be
+			// If the path manager hasn't been initted yet, take an educated guess at what the URI should be
-$url = contentPath . $n . ':' . $t . $flags;
+			$url = contentPath . $n . ':' . $t . $flags;
-}
+		}
-if($query)
+		if($query)
-{
+		{
-if(strstr($url, '?'))
+			if(strstr($url, '?'))
-{
+			{
-$sep =  '&';
+				$sep =  '&';
-}
+			}
-else
+			else
-{
+			{
-$sep = '?';
+				$sep = '?';
-}
+			}
-$url = $url . $sep . $query . $flags;
+			$url = $url . $sep . $query . $flags;
-}
+		}
-if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
+		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))
-{
+		{
-$url = $session->append_sid($url);
+			$url = $session->append_sid($url);
-}
+		}
-return ($escape) ? htmlspecialchars($url) : $url;
+		return ($escape) ? htmlspecialchars($url) : $url;
-}
+	}
 }
 /**
 * Create a URI for an internal link, be namespace-friendly, and add http://hostname/scriptpath to the beginning if possible. Watch out for this one because it's different from most other Enano functions, in that the namespace is the first parameter.
 * @param string The namespace ID
 * @return string
 */
 function makeUrlComplete($n, $t, $query = false, $escape = false)
 {
-return get_server_url() . makeUrlNS($n, $t, $query, $escape);
+	return get_server_url() . makeUrlNS($n, $t, $query, $escape);
 }
 /**
 * Returns an http:// URL for this server.
 * @return string
 */
 function get_server_url()
 {
-$server_name = false;
+	$server_name = false;
-if ( isset($_SERVER['HTTP_HOST']) )
+	if ( isset($_SERVER['HTTP_HOST']) )
-	$server_name = $_SERVER['HTTP_HOST'];
+		$server_name = $_SERVER['HTTP_HOST'];
-else if ( isset($_SERVER['SERVER_NAME']) )
+	else if ( isset($_SERVER['SERVER_NAME']) )
-	$server_name = $_SERVER['SERVER_NAME'];
+		$server_name = $_SERVER['SERVER_NAME'];
-else
+	else
-$server_name = 'localhost';
+		$server_name = 'localhost';
-return 'http' . ( $GLOBALS['is_https'] ) . '://' . $server_name;
+	return 'http' . ( $GLOBALS['is_https'] ) . '://' . $server_name;
 }
 /**
 * Returns the full page ID string of the main page.
 * @return string
 */
 function get_main_page($force_logged_in = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$logged_in = false;
+	$logged_in = false;
-if ( is_object($session) && !$force_logged_in )
+	if ( is_object($session) && !$force_logged_in )
-{
+	{
-$logged_in = $session->user_logged_in;
+		$logged_in = $session->user_logged_in;
-}
+	}
-else if ( $force_logged_in )
+	else if ( $force_logged_in )
-{
+	{
-$logged_in = true;
+		$logged_in = true;
-}
+	}
-return $logged_in && getConfig('main_page_alt_enable', '0') == '1' ? getConfig('main_page_alt', getConfig('main_page', 'Main_Page')) : getConfig('main_page', 'Main_Page');
+	return $logged_in && getConfig('main_page_alt_enable', '0') == '1' ? getConfig('main_page_alt', getConfig('main_page', 'Main_Page')) : getConfig('main_page', 'Main_Page');
 }
 /**
 * Get the requested page title, taking into account all the different possible URL parsing schemes.
 * @param bool If true (default), runs the result through sanitize_page_id().
 * @return string
 */
 function get_title($sanitize = true, $chop_special = false)
 {
-$title = '';
+	$title = '';
-if ( isset($_GET['title']) )
+	if ( isset($_GET['title']) )
-{
+	{
-$title = $_GET['title'];
+		$title = $_GET['title'];
-}
+	}
-else if ( isset($_SERVER['PATH_INFO']) )
+	else if ( isset($_SERVER['PATH_INFO']) )
-{
+	{
-// fix for apache + CGI (occurred on a GoDaddy server, thanks mm3)
+		// fix for apache + CGI (occurred on a GoDaddy server, thanks mm3)
-if ( @substr(@$_SERVER['GATEWAY_INTERFACE'], 0, 3) === 'CGI' && $_SERVER['PATH_INFO'] == scriptPath . '/index.php' )
+		if ( @substr(@$_SERVER['GATEWAY_INTERFACE'], 0, 3) === 'CGI' && $_SERVER['PATH_INFO'] == scriptPath . '/index.php' )
-{
+		{
-// do nothing; ignore PATH_INFO
+			// do nothing; ignore PATH_INFO
-}
+		}
-else
+		else
-{
+		{
-$title = substr($_SERVER['PATH_INFO'], ( strpos($_SERVER['PATH_INFO'], '/') ) + 1 );
+			$title = substr($_SERVER['PATH_INFO'], ( strpos($_SERVER['PATH_INFO'], '/') ) + 1 );
-}
+		}
-}
+	}
-else
+	else
-{
+	{
-// This method really isn't supported because apache has a habit of passing dots as underscores, thus corrupting the request
+		// This method really isn't supported because apache has a habit of passing dots as underscores, thus corrupting the request
-// If you really want to try it, the URI format is yoursite.com/?/Page_title
+		// If you really want to try it, the URI format is yoursite.com/?/Page_title
-if ( !empty($_SERVER['QUERY_STRING']) && substr($_SERVER['QUERY_STRING'], 0, 1) == '/' )
+		if ( !empty($_SERVER['QUERY_STRING']) && substr($_SERVER['QUERY_STRING'], 0, 1) == '/' )
-{
+		{
-$pos = ( ($_ = strpos($_SERVER['QUERY_STRING'], '&')) !== false ) ? $_ - 1: 0x7FFFFFFF;
+			$pos = ( ($_ = strpos($_SERVER['QUERY_STRING'], '&')) !== false ) ? $_ - 1: 0x7FFFFFFF;
-$title = substr($_SERVER['QUERY_STRING'], 1, $pos);
+			$title = substr($_SERVER['QUERY_STRING'], 1, $pos);
-}
+		}
-}
+	}
-if ( $chop_special )
+	if ( $chop_special )
-{
+	{
-list(, $ns) = RenderMan::strToPageID($title);
+		list(, $ns) = RenderMan::strToPageID($title);
-if ( $ns == 'Special' || $ns == 'Admin' )
+		if ( $ns == 'Special' || $ns == 'Admin' )
-{
+		{
-list($title) = explode('/', $title);
+			list($title) = explode('/', $title);
-}
+		}
-}
+	}
-return ( $sanitize ) ? sanitize_page_id($title) : $title;
+	return ( $sanitize ) ? sanitize_page_id($title) : $title;
 }
 /**
 * Returns true if we are allowed to have a page with a fully blank URL string. This page magically exists when you set the main page to blank.
 * @return bool
 */
 function have_blank_urlname_page()
 {
-return getConfig('main_page', 'Main_Page') == '' || getConfig('main_page', getConfig('main_page', 'Main_Page')) == '';
+	return getConfig('main_page', 'Main_Page') == '' || getConfig('main_page', getConfig('main_page', 'Main_Page')) == '';
 }
 /**
 * Enano replacement for date(). Accounts for individual users' timezone preferences.
 * @param string Date-formatted string
 * @return string Formatted string
 */
 function enano_date($string, $timestamp = false)
 {
-if ( !is_int($timestamp) && !is_double($timestamp) && strval(intval($timestamp)) !== $timestamp )
+	if ( !is_int($timestamp) && !is_double($timestamp) && strval(intval($timestamp)) !== $timestamp )
-$timestamp = time();
+		$timestamp = time();
-if ( is_int($string) )
+	if ( is_int($string) )
-{
+	{
-global $session, $lang;
+		global $session, $lang;
-$date_fmt = is_object($session) ? $session->date_format : DATE_4;
+		$date_fmt = is_object($session) ? $session->date_format : DATE_4;
-$time_fmt = is_object($session) ? $session->time_format : TIME_24_NS;
+		$time_fmt = is_object($session) ? $session->time_format : TIME_24_NS;
-// within a week? use a relative date
+		// within a week? use a relative date
-if ( $timestamp + ( 86400 * 7 ) >= time() && $string & ED_DATE && is_object($lang) && is_object($session) && !($string & ED_DATE_FULL) )
+		if ( $timestamp + ( 86400 * 7 ) >= time() && $string & ED_DATE && is_object($lang) && is_object($session) && !($string & ED_DATE_FULL) )
-{
+		{
-$relative_date = get_relative_date($timestamp);
+			$relative_date = get_relative_date($timestamp);
-if ( $string === ED_DATE )
+			if ( $string === ED_DATE )
-// why do more work if we're done?
+				// why do more work if we're done?
-return $relative_date;
+				return $relative_date;
-}
+		}
-$flags = $string;
+		$flags = $string;
-$string = array();
+		$string = array();
-if ( $flags & ED_DATE && !isset($relative_date) )
+		if ( $flags & ED_DATE && !isset($relative_date) )
-$string[] = $date_fmt;
+			$string[] = $date_fmt;
-if ( $flags & ED_TIME )
+		if ( $flags & ED_TIME )
-$string[] = $time_fmt;
+			$string[] = $time_fmt;
-$string = implode(' ', $string);
+		$string = implode(' ', $string);
-}
+	}
-// perform timestamp offset
+	// perform timestamp offset
-global $timezone;
+	global $timezone;
-// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp
+	// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp
-$timestamp = $timestamp + ( $timezone * 60 );
+	$timestamp = $timestamp + ( $timezone * 60 );
-// are we in DST?
+	// are we in DST?
-global $dst_params;
+	global $dst_params;
-$dst_offset = 0;
+	$dst_offset = 0;
-if ( check_timestamp_dst($timestamp, $dst_params[0], $dst_params[1], $dst_params[2], $dst_params[3]) )
+	if ( check_timestamp_dst($timestamp, $dst_params[0], $dst_params[1], $dst_params[2], $dst_params[3]) )
-{
+	{
-// offset for DST
+		// offset for DST
-$timestamp += ( $dst_params[4] * 60 );
+		$timestamp += ( $dst_params[4] * 60 );
-$dst_offset = $dst_params[4];
+		$dst_offset = $dst_params[4];
-}
+	}
-// Does this date string include a timezone? If so, gmdate() will report UTC, which is wrong
+	// Does this date string include a timezone? If so, gmdate() will report UTC, which is wrong
-// FIXME This is kind of a halfass replacement...
+	// FIXME This is kind of a halfass replacement...
-foreach ( array('e', 'T', 'O', 'P') as $char )
+	foreach ( array('e', 'T', 'O', 'P') as $char )
-{
+	{
-if ( ($pos = strpos($string, $char)) !== false )
+		if ( ($pos = strpos($string, $char)) !== false )
-{
+		{
-if ( $string{ $pos - 1 } != '\\' )
+			if ( $string{ $pos - 1 } != '\\' )
-{
+			{
-// add in our own timezone string
+				// add in our own timezone string
-// FIXME: l10n? (do we need to? does anyone really not know what "GMT" means? even uglier escaping?)
+				// FIXME: l10n? (do we need to? does anyone really not know what "GMT" means? even uglier escaping?)
-$tzi = '\\G\\M\\T';
+				$tzi = '\\G\\M\\T';
-$tzo = $timezone + $dst_offset;
+				$tzo = $timezone + $dst_offset;
-$sign = $tzo > 0 ? '+' : '-';
+				$sign = $tzo > 0 ? '+' : '-';
-$tzi .= $sign . (intval(abs($tzo / 60)));
+				$tzi .= $sign . (intval(abs($tzo / 60)));
-if ( $tzo % 60 )
+				if ( $tzo % 60 )
-$tzi .= sprintf(":%02d", abs($tzo) % 60);
+					$tzi .= sprintf(":%02d", abs($tzo) % 60);
-$string = substr($string, 0, $pos) . $tzi . substr($string, $pos + 1);
+				$string = substr($string, 0, $pos) . $tzi . substr($string, $pos + 1);
-}
+			}
-}
+		}
-}
+	}
-// Let PHP do the work for us =)
+	// Let PHP do the work for us =)
-$result = gmdate($string, $timestamp);
+	$result = gmdate($string, $timestamp);
-if ( isset($relative_date) )
+	if ( isset($relative_date) )
-{
+	{
-$result = "$relative_date, $result";
+		$result = "$relative_date, $result";
-}
+	}
-return $result;
+	return $result;
 }
 /**
 * Get a relative date ("Today"/"Yesterday"/"N days ago")
 * @param int Timestamp
 * @return string
 */
 function get_relative_date($time)
 {
-global $lang, $session;
+	global $lang, $session;
-// Our formatting string to pass to enano_date()
+	// Our formatting string to pass to enano_date()
-// This should not include minute/second info, only today's date in whatever format suits your fancy
+	// This should not include minute/second info, only today's date in whatever format suits your fancy
-$formatstring = $session->date_format;
+	$formatstring = $session->date_format;
-// Today's date
+	// Today's date
-$today = enano_date($formatstring);
+	$today = enano_date($formatstring);
-// Yesterday's date
+	// Yesterday's date
-$yesterday = enano_date($formatstring, (time() - (24*60*60)));
+	$yesterday = enano_date($formatstring, (time() - (24*60*60)));
-// Date on the input
+	// Date on the input
-$then = enano_date($formatstring, $time);
+	$then = enano_date($formatstring, $time);
-// "X days ago" logic
+	// "X days ago" logic
-for ( $i = 2; $i <= 6; $i++ )
+	for ( $i = 2; $i <= 6; $i++ )
-{
+	{
-// hours_in_day * minutes_in_hour * seconds_in_minute * num_days
+		// hours_in_day * minutes_in_hour * seconds_in_minute * num_days
-$offset = 24 * 60 * 60 * $i;
+		$offset = 24 * 60 * 60 * $i;
-$days_ago = enano_date($formatstring, (time() - $offset));
+		$days_ago = enano_date($formatstring, (time() - $offset));
-// so does the input timestamp match the date from $i days ago?
+		// so does the input timestamp match the date from $i days ago?
-if ( $then == $days_ago )
+		if ( $then == $days_ago )
-{
+		{
-// yes, return $i
+			// yes, return $i
-return $lang->get('userfuncs_ml_date_daysago', array('days_ago' => $i));
+			return $lang->get('userfuncs_ml_date_daysago', array('days_ago' => $i));
-}
+		}
-}
+	}
-// either yesterday, today, or before 6 days ago
+	// either yesterday, today, or before 6 days ago
-switch($then)
+	switch($then)
-{
+	{
-case $today:
+		case $today:
-return $lang->get('userfuncs_ml_date_today');
+			return $lang->get('userfuncs_ml_date_today');
-case $yesterday:
+		case $yesterday:
-return $lang->get('userfuncs_ml_date_yesterday');
+			return $lang->get('userfuncs_ml_date_yesterday');
-default:
+		default:
-return $then;
+			return $then;
-}
+	}
-//     .--.
+	//     .--.
-//    |o_o |
+	//    |o_o |
-//    |!_/ |
+	//    |!_/ |
-//   //   \ \
+	//   //   \ \
-//  (|     | )
+	//  (|     | )
-// /'\_   _/`\
+	// /'\_   _/`\
-// \___)=(___/
+	// \___)=(___/
-return 'Linux rocks!';
+	return 'Linux rocks!';
 }
 /**
 * Determine if a timestamp is within DST.
 * @param int Timestamp
 * @return bool
 */
 function check_timestamp_dst($time, $start_month, $start_sunday, $end_month, $end_sunday)
 {
-static $sundays = array(FIRST_SUNDAY, SECOND_SUNDAY, THIRD_SUNDAY, LAST_SUNDAY);
+	static $sundays = array(FIRST_SUNDAY, SECOND_SUNDAY, THIRD_SUNDAY, LAST_SUNDAY);
-// perform timestamp offset
+	// perform timestamp offset
-global $timezone;
+	global $timezone;
-// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp
+	// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp
-$time = $time + ( $timezone * 60 );
+	$time = $time + ( $timezone * 60 );
-$year = intval(gmdate('Y', $time));
+	$year = intval(gmdate('Y', $time));
-// one-pass validation
+	// one-pass validation
-if ( !in_array($start_sunday, $sundays) || !in_array($end_sunday, $sundays) ||
+	if ( !in_array($start_sunday, $sundays) || !in_array($end_sunday, $sundays) ||
-$start_month < 1 || $start_month > 12 || $end_month < 1 || $end_month > 12 )
+			$start_month < 1 || $start_month > 12 || $end_month < 1 || $end_month > 12 )
-return false;
+		return false;
-// get timestamp of the selected sunday (start)
+	// get timestamp of the selected sunday (start)
-$dst_start = get_sunday_timestamp($start_month, $start_sunday, $year);
+	$dst_start = get_sunday_timestamp($start_month, $start_sunday, $year);
-$dst_end   = get_sunday_timestamp($end_month, $end_sunday, $year);
+	$dst_end   = get_sunday_timestamp($end_month, $end_sunday, $year);
-if ( $dst_start > $dst_end )
+	if ( $dst_start > $dst_end )
-{
+	{
-// start time is past the end time, this means we're in the southern hemisphere
+		// start time is past the end time, this means we're in the southern hemisphere
-// as a result, if we're within the range, DST is NOT in progress.
+		// as a result, if we're within the range, DST is NOT in progress.
-return !( $time >= $dst_start && $time <= $dst_end );
+		return !( $time >= $dst_start && $time <= $dst_end );
-}
+	}
-return $time >= $dst_start && $time <= $dst_end;
+	return $time >= $dst_start && $time <= $dst_end;
 }
 /**
 * Returns a timestamp for the given *_SUNDAY index.
 * @param int Month
 * @return int
 */
 function get_sunday_timestamp($month, $sunday, $year)
 {
-$days_in_month = array(
+	$days_in_month = array(
-1 => 31,
+		1 => 31,
-2 => $year % 4 == 0 && ( $year % 100 != 0 || ( $year % 100 == 0 && $year % 400 == 0 ) ) ? 29 : 28,
+		2 => $year % 4 == 0 && ( $year % 100 != 0 || ( $year % 100 == 0 && $year % 400 == 0 ) ) ? 29 : 28,
-3 => 31,
+		3 => 31,
-4 => 30,
+		4 => 30,
-5 => 31,
+		5 => 31,
-6 => 30,
+		6 => 30,
-7 => 31,
+		7 => 31,
-8 => 31,
+		8 => 31,
-9 => 30,
+		9 => 30,
-10 => 31,
+		10 => 31,
-11 => 30,
+		11 => 30,
-12 => 31
+		12 => 31
-);
+	);
-$result = mktime(0, 0, 0, $month, 1, $year);
+	$result = mktime(0, 0, 0, $month, 1, $year);
-// hack. allows a specific day of the month to be set instead of a sunday. not a good place to do this.
+	// hack. allows a specific day of the month to be set instead of a sunday. not a good place to do this.
-if ( is_string($sunday) && substr($sunday, -1) === 'd' )
+	if ( is_string($sunday) && substr($sunday, -1) === 'd' )
-{
+	{
-$result += 86400 * ( intval($sunday) - 1);
+		$result += 86400 * ( intval($sunday) - 1);
-return $result;
+		return $result;
-}
+	}
-$tick = 0;
+	$tick = 0;
-$days_remaining = $days_in_month[$month];
+	$days_remaining = $days_in_month[$month];
-while ( true )
+	while ( true )
-{
+	{
-if ( date('D', $result) == 'Sun' )
+		if ( date('D', $result) == 'Sun' )
-{
+		{
-$tick++;
+			$tick++;
-if ( ( $tick == 1 && $sunday == FIRST_SUNDAY ) ||
+			if ( ( $tick == 1 && $sunday == FIRST_SUNDAY ) ||
-( $tick == 2 && $sunday == SECOND_SUNDAY ) ||
+					( $tick == 2 && $sunday == SECOND_SUNDAY ) ||
-( $tick == 3 && $sunday == THIRD_SUNDAY ) ||
+					( $tick == 3 && $sunday == THIRD_SUNDAY ) ||
-( $sunday == LAST_SUNDAY && $days_remaining < 7 ) )
+					( $sunday == LAST_SUNDAY && $days_remaining < 7 ) )
-break;
+				break;
-}
+		}
-$days_remaining--;
+		$days_remaining--;
-$result += 86400;
+		$result += 86400;
-}
+	}
-return $result;
+	return $result;
 }
 /**
 * Tells you the title for the given page ID string
 * @param string Page ID string (ex: Special:Administration)
 * @return string
 */
 function get_page_title($page_id, $show_ns = true)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$idata = RenderMan::strToPageID($page_id);
+	$idata = RenderMan::strToPageID($page_id);
-return get_page_title_ns($idata[0], $idata[1]);
+	return get_page_title_ns($idata[0], $idata[1]);
 }
 /**
 * Tells you the title for the given page ID and namespace
 * @param string Page ID
 * @return string
 */
 function get_page_title_ns($page_id, $namespace)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$ns = namespace_factory($page_id, $namespace);
+	$ns = namespace_factory($page_id, $namespace);
-return $ns->title;
+	return $ns->title;
 }
 /**
 * Redirect the user to the specified URL.
 * @param string $url The URL, either relative or absolute.
 * @param string $timeout Timeout, in seconds, to delay the redirect. Defaults to 3. If 0, sends a 307 Temporary Redirect.
 */
 function redirect($url, $title = 'etc_redirect_title', $message = 'etc_redirect_body', $timeout = 3)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang;
+	global $lang;
-// POST check added in 1.1.x because Firefox 3.0 asks us if we want to "resend the form
+	// POST check added in 1.1.x because Firefox 3.0 asks us if we want to "resend the form
-// data to the new location", which can be confusing for some users.
+	// data to the new location", which can be confusing for some users.
-$is_firefox_3 = ( strstr(@$_SERVER['HTTP_USER_AGENT'], 'Firefox/3.') ) ? true : false;
+	$is_firefox_3 = ( strstr(@$_SERVER['HTTP_USER_AGENT'], 'Firefox/3.') ) ? true : false;
-if ( $timeout == 0 && ( empty($_POST) || !$is_firefox_3 ) )
+	if ( $timeout == 0 && ( empty($_POST) || !$is_firefox_3 ) )
-{
+	{
-header('Location: ' . $url);
+		header('Location: ' . $url);
-header('Content-length: 0');
+		header('Content-length: 0');
-header('HTTP/1.1 307 Temporary Redirect');
+		header('HTTP/1.1 307 Temporary Redirect');
-// with 3xx codes HTTP clients expect a response of 0 bytes, so just die here
+		// with 3xx codes HTTP clients expect a response of 0 bytes, so just die here
-exit();
+		exit();
-}
+	}
-if ( !is_object($template) )
+	if ( !is_object($template) )
-{
+	{
-$template = new template_nodb();
+		$template = new template_nodb();
-$template->load_theme('oxygen', 'bleu', false);
+		$template->load_theme('oxygen', 'bleu', false);
-$template->assign_vars(array(
+		$template->assign_vars(array(
-'SITE_NAME' => 'Enano',
+				'SITE_NAME' => 'Enano',
-'SITE_DESC' => 'This site is experiencing a critical error and cannot load.',
+				'SITE_DESC' => 'This site is experiencing a critical error and cannot load.',
-'COPYRIGHT' => 'Powered by Enano CMS - &copy; 2006-2008 Dan Fuhry. This program is Free Software; see the <a href="' . scriptPath . '/install.php?mode=license">GPL file</a> included with this package for details.',
+				'COPYRIGHT' => 'Powered by Enano CMS - &copy; 2006-2008 Dan Fuhry. This program is Free Software; see the <a href="' . scriptPath . '/install.php?mode=license">GPL file</a> included with this package for details.',
-'PAGE_NAME' => htmlspecialchars($title)
+				'PAGE_NAME' => htmlspecialchars($title)
-));
+			));
-}
+	}
-$template->add_header('<meta http-equiv="refresh" content="' . $timeout . '; url=' . str_replace('"', '\\"', $url) . '" />');
+	$template->add_header('<meta http-equiv="refresh" content="' . $timeout . '; url=' . str_replace('"', '\\"', $url) . '" />');
-$template->add_header('<script type="text/javascript">
+	$template->add_header('<script type="text/javascript">
-function __r() {
+			function __r() {
-// FUNCTION AUTOMATICALLY GENERATED
+				// FUNCTION AUTOMATICALLY GENERATED
-window.location="' . str_replace('"', '\\"', $url) . '";
+				window.location="' . str_replace('"', '\\"', $url) . '";
-}
+			}
-setTimeout(\'__r();\', ' . $timeout . '000);
+			setTimeout(\'__r();\', ' . $timeout . '000);
-</script>
+		</script>
-');
+		');
-if ( get_class($template) == 'template_nodb' )
+	if ( get_class($template) == 'template_nodb' )
-$template->init_vars();
+		$template->init_vars();
-$template->assign_vars(array('PAGE_NAME' => $title));
+	$template->assign_vars(array('PAGE_NAME' => $title));
-$template->header(true);
+	$template->header(true);
-echo '<p>' . $message . '</p>';
+	echo '<p>' . $message . '</p>';
-$subst = array(
+	$subst = array(
-'timeout' => $timeout,
+			'timeout' => $timeout,
-'redirect_url' => str_replace('"', '\\"', $url)
+			'redirect_url' => str_replace('"', '\\"', $url)
-);
+		);
-echo '<p>' . $lang->get('etc_redirect_timeout', $subst) . '</p>';
+	echo '<p>' . $lang->get('etc_redirect_timeout', $subst) . '</p>';
-$template->footer(true);
+	$template->footer(true);
-$db->close();
+	$db->close();
-exit(0);
+	exit(0);
 }
 /**
 * Generates a confirmation form if a CSRF check fails. Will terminate execution.
 */
 function csrf_request_confirm()
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang, $output;
+	global $lang, $output;
-// If the token was overridden with the correct one, the user confirmed the action using this form. Continue exec.
+	// If the token was overridden with the correct one, the user confirmed the action using this form. Continue exec.
-if ( isset($_POST['cstok']) || isset($_GET['cstok']) )
+	if ( isset($_POST['cstok']) || isset($_GET['cstok']) )
-{
+	{
-// using the if() check makes sure that the token isn't in a cookie, since $_REQUEST includes $_COOKIE.
+		// using the if() check makes sure that the token isn't in a cookie, since $_REQUEST includes $_COOKIE.
-$token_check =& $_REQUEST['cstok'];
+		$token_check =& $_REQUEST['cstok'];
-if ( $token_check === $session->csrf_token )
+		if ( $token_check === $session->csrf_token )
-{
+		{
-// overridden token matches, continue exec
+			// overridden token matches, continue exec
-return true;
+			return true;
-}
+		}
-}
+	}
-@ob_end_clean();
+	@ob_end_clean();
-$output->set_title($lang->get('user_csrf_confirm_title'));
+	$output->set_title($lang->get('user_csrf_confirm_title'));
-$output->header();
+	$output->header();
-// initial info
+	// initial info
-echo '<p>' . $lang->get('user_csrf_confirm_body') . '</p>';
+	echo '<p>' . $lang->get('user_csrf_confirm_body') . '</p>';
-// start form
+	// start form
-$form_method = ( empty($_POST) ) ? 'get' : 'post';
+	$form_method = ( empty($_POST) ) ? 'get' : 'post';
-echo '<form action="' . htmlspecialchars($_SERVER['REQUEST_URI']) . '" method="' . $form_method . '" enctype="multipart/form-data">';
+	echo '<form action="' . htmlspecialchars($_SERVER['REQUEST_URI']) . '" method="' . $form_method . '" enctype="multipart/form-data">';
-echo '<fieldset enano:expand="closed">';
+	echo '<fieldset enano:expand="closed">';
-echo '<legend>' . $lang->get('user_csrf_confirm_btn_viewrequest') . '</legend><div>';
+	echo '<legend>' . $lang->get('user_csrf_confirm_btn_viewrequest') . '</legend><div>';
-if ( empty($_POST) )
+	if ( empty($_POST) )
-{
+	{
-// GET request
+		// GET request
-echo csrf_confirm_get_recursive();
+		echo csrf_confirm_get_recursive();
-}
+	}
-else
+	else
-{
+	{
-// POST request
+		// POST request
-echo csrf_confirm_post_recursive();
+		echo csrf_confirm_post_recursive();
-}
+	}
-echo '</div></fieldset>';
+	echo '</div></fieldset>';
-// insert the right CSRF token
+	// insert the right CSRF token
-echo '<input type="hidden" name="cstok" value="' . $session->csrf_token . '" />';
+	echo '<input type="hidden" name="cstok" value="' . $session->csrf_token . '" />';
-echo '<p><input type="submit" value="' . $lang->get('user_csrf_confirm_btn_continue') . '" /></p>';
+	echo '<p><input type="submit" value="' . $lang->get('user_csrf_confirm_btn_continue') . '" /></p>';
-echo '</form><script type="text/javascript">addOnloadHook(function(){load_component(\'expander\');});</script>';
+	echo '</form><script type="text/javascript">addOnloadHook(function(){load_component(\'expander\');});</script>';
-$output->footer();
+	$output->footer();
-exit;
+	exit;
 }
 function csrf_confirm_get_recursive($_inner = false, $pfx = false, $data = false)
 {
-// make posted arrays work right
+	// make posted arrays work right
-if ( !$data )
+	if ( !$data )
-( $_inner == 'post' ) ? $data =& $_POST : $data =& $_GET;
+		( $_inner == 'post' ) ? $data =& $_POST : $data =& $_GET;
-foreach ( $data as $key => $value )
+	foreach ( $data as $key => $value )
-{
+	{
-$pfx_this = ( empty($pfx) ) ? $key : "{$pfx}[{$key}]";
+		$pfx_this = ( empty($pfx) ) ? $key : "{$pfx}[{$key}]";
-if ( is_array($value) )
+		if ( is_array($value) )
-{
+		{
-csrf_confirm_get_recursive(true, $pfx_this, $value);
+			csrf_confirm_get_recursive(true, $pfx_this, $value);
-}
+		}
-else if ( empty($value) )
+		else if ( empty($value) )
-{
+		{
-echo htmlspecialchars($pfx_this . " = <nil>") . "<br />\n";
+			echo htmlspecialchars($pfx_this . " = <nil>") . "<br />\n";
-echo '<input type="hidden" name="' . htmlspecialchars($pfx_this) . '" value="" />';
+			echo '<input type="hidden" name="' . htmlspecialchars($pfx_this) . '" value="" />';
-}
+		}
-else
+		else
-{
+		{
-echo htmlspecialchars($pfx_this . " = " . $value) . "<br />\n";
+			echo htmlspecialchars($pfx_this . " = " . $value) . "<br />\n";
-echo '<input type="hidden" name="' . htmlspecialchars($pfx_this) . '" value="' . htmlspecialchars($value) . '" />';
+			echo '<input type="hidden" name="' . htmlspecialchars($pfx_this) . '" value="' . htmlspecialchars($value) . '" />';
-}
+		}
-}
+	}
 }
 function csrf_confirm_post_recursive()
 {
-csrf_confirm_get_recursive('post');
+	csrf_confirm_get_recursive('post');
 }
 // Removed wikiFormat() from here, replaced with RenderMan::render
 /**
 * @return bool True if the page exists, false otherwise
 */
 function isPage($p)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-static $ispage_cache = array();
+	static $ispage_cache = array();
-if ( isset($ispage_cache[$p]) )
+	if ( isset($ispage_cache[$p]) )
-return $ispage_cache[$p];
+		return $ispage_cache[$p];
-list($page_id, $namespace) = RenderMan::strToPageID($p);
+	list($page_id, $namespace) = RenderMan::strToPageID($p);
-$cdata = $paths->get_cdata($page_id, $namespace);
+	$cdata = $paths->get_cdata($page_id, $namespace);
-if ( !isset($cdata['page_exists']) )
+	if ( !isset($cdata['page_exists']) )
-{
+	{
-$class = ( class_exists($_ = "Namespace_$namespace") ) ? $_ : "Namespace_Default";
+		$class = ( class_exists($_ = "Namespace_$namespace") ) ? $_ : "Namespace_Default";
-$page = new $class($page_id, $namespace);
+		$page = new $class($page_id, $namespace);
-return $page->exists();
+		return $page->exists();
-}
+	}
-$ispage_cache[$p] = $cdata['page_exists'];
+	$ispage_cache[$p] = $cdata['page_exists'];
-return $cdata['page_exists'];
+	return $cdata['page_exists'];
 }
 /**
 * Returns the appropriate Namespace_* object for a page.
 * @param string Page ID
 * @param int Revision ID
 */
 function namespace_factory($page_id, $namespace, $revision_id = 0)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-static $objcache = array();
+	static $objcache = array();
-$pathskey = $paths->get_pathskey($page_id, $namespace) . ":$revision_id";
+	$pathskey = $paths->get_pathskey($page_id, $namespace) . ":$revision_id";
-if ( isset($objcache[$pathskey]) )
+	if ( isset($objcache[$pathskey]) )
-return $objcache[$pathskey];
+		return $objcache[$pathskey];
-if ( !class_exists("Namespace_$namespace") )
+	if ( !class_exists("Namespace_$namespace") )
-{
+	{
-if ( file_exists(ENANO_ROOT . "/includes/namespaces/" . strtolower($namespace) . ".php") )
+		if ( file_exists(ENANO_ROOT . "/includes/namespaces/" . strtolower($namespace) . ".php") )
-{
+		{
-require(ENANO_ROOT . "/includes/namespaces/" . strtolower($namespace) . ".php");
+			require(ENANO_ROOT . "/includes/namespaces/" . strtolower($namespace) . ".php");
-}
+		}
-}
+	}
-if ( class_exists("Namespace_$namespace") )
+	if ( class_exists("Namespace_$namespace") )
-{
+	{
-$class = "Namespace_$namespace";
+		$class = "Namespace_$namespace";
-$ns = new $class($page_id, $namespace, $revision_id);
+		$ns = new $class($page_id, $namespace, $revision_id);
-$objcache[$pathskey] = $ns;
+		$objcache[$pathskey] = $ns;
-return $ns;
+		return $ns;
-}
+	}
-else
+	else
-{
+	{
-$ns = new Namespace_Default($page_id, $namespace, $revision_id);
+		$ns = new Namespace_Default($page_id, $namespace, $revision_id);
-$objcache[$pathskey] = $ns;
+		$objcache[$pathskey] = $ns;
-return $ns;
+		return $ns;
-}
+	}
 }
 /**
 * These are some old functions that were used with the Midget codebase. They are deprecated and should not be used any more.
 */
 function arrayItemUp($arr, $keyname) {
-$keylist = array_keys($arr);
+	$keylist = array_keys($arr);
-$keyflop = array_flip($keylist);
+	$keyflop = array_flip($keylist);
-$idx = $keyflop[$keyname];
+	$idx = $keyflop[$keyname];
-$idxm = $idx - 1;
+	$idxm = $idx - 1;
-$temp = $arr[$keylist[$idxm]];
+	$temp = $arr[$keylist[$idxm]];
-if($arr[$keylist[0]] == $arr[$keyname]) return $arr;
+	if($arr[$keylist[0]] == $arr[$keyname]) return $arr;
-$arr[$keylist[$idxm]] = $arr[$keylist[$idx]];
+	$arr[$keylist[$idxm]] = $arr[$keylist[$idx]];
-$arr[$keylist[$idx]] = $temp;
+	$arr[$keylist[$idx]] = $temp;
-return $arr;
+	return $arr;
 }
 function arrayItemDown($arr, $keyname) {
-$keylist = array_keys($arr);
+	$keylist = array_keys($arr);
-$keyflop = array_flip($keylist);
+	$keyflop = array_flip($keylist);
-$idx = $keyflop[$keyname];
+	$idx = $keyflop[$keyname];
-$idxm = $idx + 1;
+	$idxm = $idx + 1;
-$temp = $arr[$keylist[$idxm]];
+	$temp = $arr[$keylist[$idxm]];
-$sz = sizeof($arr); $sz--;
+	$sz = sizeof($arr); $sz--;
-if($arr[$keylist[$sz]] == $arr[$keyname]) return $arr;
+	if($arr[$keylist[$sz]] == $arr[$keyname]) return $arr;
-$arr[$keylist[$idxm]]  =  $arr[$keylist[$idx]];
+	$arr[$keylist[$idxm]]  =  $arr[$keylist[$idx]];
-$arr[$keylist[$idx]]   =  $temp;
+	$arr[$keylist[$idx]]   =  $temp;
-return $arr;
+	return $arr;
 }
 function arrayItemTop($arr, $keyname) {
-$keylist = array_keys($arr);
+	$keylist = array_keys($arr);
-$keyflop = array_flip($keylist);
+	$keyflop = array_flip($keylist);
-$idx = $keyflop[$keyname];
+	$idx = $keyflop[$keyname];
-while( $orig != $arr[$keylist[0]] ) {
+	while( $orig != $arr[$keylist[0]] ) {
-// echo 'Keyname: '.$keylist[$idx] . '<br />'; flush(); ob_flush(); // Debugger
+		// echo 'Keyname: '.$keylist[$idx] . '<br />'; flush(); ob_flush(); // Debugger
-if($idx < 0) return $arr;
+		if($idx < 0) return $arr;
-if($keylist[$idx] == '' || $keylist[$idx] < 0 || !$keylist[$idx]) {
+		if($keylist[$idx] == '' || $keylist[$idx] < 0 || !$keylist[$idx]) {
-return $arr;
+			return $arr;
-}
+		}
-$arr = arrayItemUp($arr, $keylist[$idx]);
+		$arr = arrayItemUp($arr, $keylist[$idx]);
-$idx--;
+		$idx--;
-}
+	}
-return $arr;
+	return $arr;
 }
 function arrayItemBottom($arr, $keyname) {
-$b = $arr[$keyname];
+	$b = $arr[$keyname];
-unset($arr[$keyname]);
+	unset($arr[$keyname]);
-$arr[$keyname] = $b;
+	$arr[$keyname] = $b;
-unset($b);
+	unset($b);
-return $arr;
+	return $arr;
 }
 /**
 * Implementation of array_merge() that preserves key names. $arr2 takes precedence over $arr1.
 * @param array $arr1
 * @return array
 */
 function enano_safe_array_merge($arr1, $arr2)
 {
-$arr3 = $arr1;
+	$arr3 = $arr1;
-foreach($arr2 as $k => $v)
+	foreach($arr2 as $k => $v)
-{
+	{
-$arr3[$k] = $v;
+		$arr3[$k] = $v;
-}
+	}
-return $arr3;
+	return $arr3;
 }
 /**
 * Looks at all values in an array and casts them to integers if they are strings with digits. Recursive.
 * @param array Array to process
 * @return array
 */
 function integerize_array($arr)
 {
-if ( !is_array($arr) )
+	if ( !is_array($arr) )
-return $arr;
+		return $arr;
-foreach ( $arr as &$val )
+	foreach ( $arr as &$val )
-{
+	{
-if ( is_string($val) && ctype_digit($val) && strlen($val) < 10 )
+		if ( is_string($val) && ctype_digit($val) && strlen($val) < 10 )
-{
+		{
-$val = intval($val);
+			$val = intval($val);
-}
+		}
-else if ( is_array($val) )
+		else if ( is_array($val) )
-{
+		{
-$val = integerize_array($val);
+			$val = integerize_array($val);
-}
+		}
-}
+	}
-return $arr;
+	return $arr;
 }
 // Convert IP address to hex string
 // Input:  127.0.0.1  (string)
 // Output: 0x7f000001 (string)
 // Updated 12/8/06 to work with PHP4 and not use eval() (blech)
 function ip2hex($ip) {
-if ( preg_match('/^([0-9a-f:]+)$/', $ip) )
+	if ( preg_match('/^([0-9a-f:]+)$/', $ip) )
-{
+	{
-// this is an ipv6 address
+		// this is an ipv6 address
-return str_replace(':', '', $ip);
+		return str_replace(':', '', $ip);
-}
+	}
-$nums = explode('.', $ip);
+	$nums = explode('.', $ip);
-if(sizeof($nums) != 4) return false;
+	if(sizeof($nums) != 4) return false;
-$str = '0x';
+	$str = '0x';
-foreach($nums as $n)
+	foreach($nums as $n)
-{
+	{
-$byte = (string)dechex($n);
+		$byte = (string)dechex($n);
-if ( strlen($byte) < 2 )
+		if ( strlen($byte) < 2 )
-$byte = '0' . $byte;
+			$byte = '0' . $byte;
-}
+	}
-return $str;
+	return $str;
 }
 // Convert DWord to IP address
 // Input:  0x7f000001
 // Output: 127.0.0.1
 // Updated 12/8/06 to work with PHP4 and not use eval() (blech)
 function hex2ip($in) {
-if(substr($in, 0, 2) == '0x') $ip = substr($in, 2, 8);
+	if(substr($in, 0, 2) == '0x') $ip = substr($in, 2, 8);
-else $ip = substr($in, 0, 8);
+	else $ip = substr($in, 0, 8);
-$octets = enano_str_split($ip, 2);
+	$octets = enano_str_split($ip, 2);
-$str = '';
+	$str = '';
-$newoct = Array();
+	$newoct = Array();
-foreach($octets as $o)
+	foreach($octets as $o)
-{
+	{
-$o = (int)hexdec($o);
+		$o = (int)hexdec($o);
-$newoct[] = $o;
+		$newoct[] = $o;
-}
+	}
-return implode('.', $newoct);
+	return implode('.', $newoct);
 }
 // Function strip_php moved to RenderMan class
 /**
 * @param bool Added in 1.1.3. If true, only the error is output. Defaults to false.
 */
 function die_semicritical($t, $p, $no_wrapper = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$db->close();
+	$db->close();
-if ( @ob_get_status() )
+	if ( @ob_get_status() )
-ob_end_clean();
+		ob_end_clean();
-// If the config hasn't been fetched yet, call grinding_halt.
+	// If the config hasn't been fetched yet, call grinding_halt.
-if ( !defined('ENANO_CONFIG_FETCHED') )
+	if ( !defined('ENANO_CONFIG_FETCHED') )
-{
+	{
-grinding_halt($t, $p);
+		grinding_halt($t, $p);
-}
+	}
-// also do grinding_halt() if we're in CLI mode
+	// also do grinding_halt() if we're in CLI mode
-if ( defined('ENANO_CLI') )
+	if ( defined('ENANO_CLI') )
-{
+	{
-grinding_halt($t, $p);
+		grinding_halt($t, $p);
-}
+	}
-if ( $no_wrapper )
+	if ( $no_wrapper )
-{
+	{
-echo '<h2>' . htmlspecialchars($t) . '</h2>';
+		echo '<h2>' . htmlspecialchars($t) . '</h2>';
-echo "<p>$p</p>";
+		echo "<p>$p</p>";
-exit;
+		exit;
-}
+	}
-$output = new Output_Safe();
+	$output = new Output_Safe();
-$output->set_title($t);
+	$output->set_title($t);
-$output->header();
+	$output->header();
-echo $p;
+	echo $p;
-$output->footer();
+	$output->footer();
-exit;
+	exit;
 }
 /**
 * Halts Enano execution with a message. This doesn't have to be an error message, it's sometimes used to indicate success at an operation.
 * @param string The title of the message
 * @param string The body of the message, this can be HTML, and should be separated into paragraphs using the <p> tag
 */
 function die_friendly($t, $p)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( @ob_get_status() )
+	if ( @ob_get_status() )
-ob_end_clean();
+		ob_end_clean();
-global $output;
+	global $output;
-$output->set_title($t);
+	$output->set_title($t);
-$template->header();
+	$template->header();
-echo $p;
+	echo $p;
-$template->footer();
+	$template->footer();
-$db->close();
+	$db->close();
-exit;
+	exit;
 }
 /**
 * Immediately brings the site to a halt with an error message, and focuses on immediately closing the database connection and shutting down Enano in the event that an attack may happen. This should only be used very early on to indicate very severe errors, or if the site may be under attack (like if the DBAL detects a malicious query). In the vast majority of cases, die_semicritical() is more appropriate.
 * @param string The title of the error message
 * @param string The body of the message, this can be HTML, and should be separated into paragraphs using the <p> tag
 */
 function grinding_halt($t, $p)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( !defined('scriptPath') )
+	if ( !defined('scriptPath') )
-require( ENANO_ROOT . '/config.php' );
+		require( ENANO_ROOT . '/config.php' );
-if ( is_object($db) )
+	if ( is_object($db) )
-$db->close();
+		$db->close();
-if ( @ob_get_status() )
+	if ( @ob_get_status() )
-ob_end_clean();
+		ob_end_clean();
-if ( defined('ENANO_CLI') )
+	if ( defined('ENANO_CLI') )
-{
+	{
-// set console color
+		// set console color
-echo "\x1B[31;1m";
+		echo "\x1B[31;1m";
-// error title
+		// error title
-echo "Critical error in Enano runtime: ";
+		echo "Critical error in Enano runtime: ";
-// unbold
+		// unbold
-echo "$t\n";
+		echo "$t\n";
-// bold
+		// bold
-echo "\x1B[37;1m";
+		echo "\x1B[37;1m";
-echo "Error: ";
+		echo "Error: ";
-// unbold
+		// unbold
-echo "\x1B[0m";
+		echo "\x1B[0m";
-echo "$p\n";
+		echo "$p\n";
-exit(1);
+		exit(1);
-}
+	}
-$theme = ( defined('ENANO_CONFIG_FETCHED') ) ? getConfig('theme_default') : 'oxygen';
+	$theme = ( defined('ENANO_CONFIG_FETCHED') ) ? getConfig('theme_default') : 'oxygen';
-$style = ( defined('ENANO_CONFIG_FETCHED') ) ? '__foo__' : 'bleu';
+	$style = ( defined('ENANO_CONFIG_FETCHED') ) ? '__foo__' : 'bleu';
-$tpl = new template_nodb();
+	$tpl = new template_nodb();
-$tpl->load_theme($theme, $style);
+	$tpl->load_theme($theme, $style);
-$tpl->tpl_strings['SITE_NAME'] = 'Critical error';
+	$tpl->tpl_strings['SITE_NAME'] = 'Critical error';
-$tpl->tpl_strings['SITE_DESC'] = 'This website is experiencing a serious error and cannot load.';
+	$tpl->tpl_strings['SITE_DESC'] = 'This website is experiencing a serious error and cannot load.';
-$tpl->tpl_strings['COPYRIGHT'] = 'Unable to retrieve copyright information';
+	$tpl->tpl_strings['COPYRIGHT'] = 'Unable to retrieve copyright information';
-$tpl->tpl_strings['PAGE_NAME'] = $t;
+	$tpl->tpl_strings['PAGE_NAME'] = $t;
-$tpl->header();
+	$tpl->header();
-echo $p;
+	echo $p;
-$tpl->footer();
+	$tpl->footer();
-exit;
+	exit;
 }
 /**
 * Prints out the categorization box found on most regular pages. Doesn't take or return anything, but assumes that the page information is already set in $paths.
 */
 function show_category_info()
 {
-throw new Exception('show_category_info() is deprecated. Use Namespace_*::display_categories().');
+	throw new Exception('show_category_info() is deprecated. Use Namespace_*::display_categories().');
 }
 /**
 * Prints out the file information box seen on File: pages. Doesn't take or return anything, but assumes that the page information is already set in $paths, and expects $paths->namespace to be File.
 */
 function show_file_info($page = false)
 {
-throw new Exception('show_file_info() is deprecated. Use Namespace_File::show_info().');
+	throw new Exception('show_file_info() is deprecated. Use Namespace_File::show_info().');
 }
 /**
 * Shows header information on the current page. Currently this is only the delete-vote feature. Doesn't take or return anything, but assumes that the page information is already set in $paths.
 */
 function display_page_headers()
 {
-// Deprecated.
+	// Deprecated.
 }
 /**
 * Displays page footer information including file and category info. This also has the send_page_footers hook. Doesn't take or return anything, but assumes that the page information is already set in $paths.
 */
 function display_page_footers()
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( isset($_GET['nofooters']) )
+	if ( isset($_GET['nofooters']) )
-{
+	{
-return;
+		return;
-}
+	}
-$code = $plugins->setHook('send_page_footers');
+	$code = $plugins->setHook('send_page_footers');
-foreach ( $code as $cmd )
+	foreach ( $code as $cmd )
-{
+	{
-eval($cmd);
+		eval($cmd);
-}
+	}
 }
 /**
 * Show the "this is a redirector" notice
 * @param string Target Page ID
 * @param string Target Namespace
 */
 function display_redirect_notice($page_id, $namespace)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang, $output;
+	global $lang, $output;
-$url = makeUrlNS($namespace, $page_id, false, true);
+	$url = makeUrlNS($namespace, $page_id, false, true);
-$ns = namespace_factory($page_id, $namespace);
+	$ns = namespace_factory($page_id, $namespace);
-$page_data = $ns->get_cdata();
+	$page_data = $ns->get_cdata();
-$title = $page_data['name'];
+	$title = $page_data['name'];
-$cls = $ns->exists() ? '' : 'class="wikilink-nonexistent" ';
+	$cls = $ns->exists() ? '' : 'class="wikilink-nonexistent" ';
-$a = '<a ' . $cls . 'href="' . $url . '">' . $title . '</a>';
+	$a = '<a ' . $cls . 'href="' . $url . '">' . $title . '</a>';
-$redir_html = '<br /><div class="mdg-infobox">
+	$redir_html = '<br /><div class="mdg-infobox">
-<table border="0" width="100%" cellspacing="0" cellpadding="0">
+					<table border="0" width="100%" cellspacing="0" cellpadding="0">
-<tr>
+						<tr>
-<td valign="top">
+							<td valign="top">
-<img alt="Cute wet-floor icon" src="' . cdnPath . '/images/redirector.png" />
+								<img alt="Cute wet-floor icon" src="' . cdnPath . '/images/redirector.png" />
-</td>
+							</td>
-<td valign="top" style="padding-left: 10px;">
+							<td valign="top" style="padding-left: 10px;">
-' . $lang->get('page_msg_this_is_a_redirector', array( 'redirect_target' => $a )) . '
+								' . $lang->get('page_msg_this_is_a_redirector', array( 'redirect_target' => $a )) . '
-</td>
+							</td>
-</tr>
+						</tr>
-</table>
+					</table>
-</div>
+				</div>
-<br />
+				<br />
-<hr style="margin-left: 1em; width: 200px;" />';
+				<hr style="margin-left: 1em; width: 200px;" />';
-$output->add_after_header($redir_html);
+	$output->add_after_header($redir_html);
 }
 /**
 * Essentially an return code reader for a socket. Don't use this unless you're writing mail code and smtp_send_email doesn't cut it. Ported from phpBB's smtp.php.
 * @param socket A socket resource
 * @param string The expected response from the server, this needs to be exactly three characters.
 */
 function smtp_get_response($socket, $response, $line = __LINE__)
 {
-$server_response = '';
+	$server_response = '';
-while (substr($server_response, 3, 1) != ' ')
+	while (substr($server_response, 3, 1) != ' ')
-{
+	{
-if (!($server_response = fgets($socket, 256)))
+		if (!($server_response = fgets($socket, 256)))
-{
+		{
-die_friendly('SMTP Error', "<p>Couldn't get mail server response codes</p>");
+			die_friendly('SMTP Error', "<p>Couldn't get mail server response codes</p>");
-}
+		}
-}
+	}
-if (!(substr($server_response, 0, 3) == $response))
+	if (!(substr($server_response, 0, 3) == $response))
-{
+	{
-die_friendly('SMTP Error', "<p>Ran into problems sending mail. Response: $server_response</p>");
+		die_friendly('SMTP Error', "<p>Ran into problems sending mail. Response: $server_response</p>");
-}
+	}
 }
 /**
 * Wrapper for smtp_send_email_core that takes the sender as the fourth parameter instead of additional headers.
 * @param string E-mail address to send to
 * @param string Address of the sender
 */
 function smtp_send_email($to, $subject, $message, $from)
 {
-return smtp_send_email_core($to, $subject, $message, "From: <$from>\n");
+	return smtp_send_email_core($to, $subject, $message, "From: <$from>\n");
 }
 /**
 * Replacement or substitute for PHP's mail() builtin function.
 * @param string E-mail address to send to
 * @license GPL
 */
 function smtp_send_email_core($mail_to, $subject, $message, $headers = '')
 {
-// Fix any bare linefeeds in the message to make it RFC821 Compliant.
+	// Fix any bare linefeeds in the message to make it RFC821 Compliant.
-$message = preg_replace("#(?<!\r)\n#si", "\r\n", $message);
+	$message = preg_replace("#(?<!\r)\n#si", "\r\n", $message);
-if ($headers != '')
+	if ($headers != '')
-{
+	{
-if (is_array($headers))
+		if (is_array($headers))
-{
+		{
-if (sizeof($headers) > 1)
+			if (sizeof($headers) > 1)
-{
+			{
-$headers = join("\n", $headers);
+				$headers = join("\n", $headers);
-}
+			}
-else
+			else
-{
+			{
-$headers = $headers[0];
+				$headers = $headers[0];
-}
+			}
-}
+		}
-$headers = chop($headers);
+		$headers = chop($headers);
-// Make sure there are no bare linefeeds in the headers
+		// Make sure there are no bare linefeeds in the headers
-$headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
+		$headers = preg_replace('#(?<!\r)\n#si', "\r\n", $headers);
-// Ok this is rather confusing all things considered,
+		// Ok this is rather confusing all things considered,
-// but we have to grab bcc and cc headers and treat them differently
+		// but we have to grab bcc and cc headers and treat them differently
-// Something we really didn't take into consideration originally
+		// Something we really didn't take into consideration originally
-$header_array = explode("\r\n", $headers);
+		$header_array = explode("\r\n", $headers);
-@reset($header_array);
+		@reset($header_array);
-$headers = '';
+		$headers = '';
-$cc = '';
+		$cc = '';
-$bcc = '';
+		$bcc = '';
-while(list(, $header) = each($header_array))
+		while(list(, $header) = each($header_array))
-{
+		{
-if (preg_match('#^cc:#si', $header))
+			if (preg_match('#^cc:#si', $header))
-{
+			{
-$cc = preg_replace('#^cc:(.*)#si', '\1', $header);
+				$cc = preg_replace('#^cc:(.*)#si', '\1', $header);
-}
+			}
-else if (preg_match('#^bcc:#si', $header))
+			else if (preg_match('#^bcc:#si', $header))
-{
+			{
-$bcc = preg_replace('#^bcc:(.*)#si', '\1', $header);
+				$bcc = preg_replace('#^bcc:(.*)#si', '\1', $header);
-$header = '';
+				$header = '';
-}
+			}
-$headers .= ($header != '') ? $header . "\r\n" : '';
+			$headers .= ($header != '') ? $header . "\r\n" : '';
-}
+		}
-$headers = chop($headers);
+		$headers = chop($headers);
-$cc = explode(', ', $cc);
+		$cc = explode(', ', $cc);
-$bcc = explode(', ', $bcc);
+		$bcc = explode(', ', $bcc);
-}
+	}
-if (trim($subject) == '')
+	if (trim($subject) == '')
-{
+	{
-die_friendly(GENERAL_ERROR, "No email Subject specified");
+		die_friendly(GENERAL_ERROR, "No email Subject specified");
-}
+	}
-if (trim($message) == '')
+	if (trim($message) == '')
-{
+	{
-die_friendly(GENERAL_ERROR, "Email message was blank");
+		die_friendly(GENERAL_ERROR, "Email message was blank");
-}
+	}
-// setup SMTP
+	// setup SMTP
-$host = getConfig('smtp_server');
+	$host = getConfig('smtp_server');
-if ( empty($host) )
+	if ( empty($host) )
-return 'No smtp_host in config';
+		return 'No smtp_host in config';
-if ( strstr($host, ':' ) )
+	if ( strstr($host, ':' ) )
-{
+	{
-$n = explode(':', $host);
+		$n = explode(':', $host);
-$smtp_host = $n[0];
+		$smtp_host = $n[0];
-$port = intval($n[1]);
+		$port = intval($n[1]);
-}
+	}
-else
+	else
-{
+	{
-$smtp_host = $host;
+		$smtp_host = $host;
-$port = 25;
+		$port = 25;
-}
+	}
-$smtp_user = getConfig('smtp_user');
+	$smtp_user = getConfig('smtp_user');
-$smtp_pass = getConfig('smtp_password');
+	$smtp_pass = getConfig('smtp_password');
-// Ok we have error checked as much as we can to this point let's get on
+	// Ok we have error checked as much as we can to this point let's get on
-// it already.
+	// it already.
-if( !$socket = @fsockopen($smtp_host, $port, $errno, $errstr, 20) )
+	if( !$socket = @fsockopen($smtp_host, $port, $errno, $errstr, 20) )
-{
+	{
-die_friendly(GENERAL_ERROR, "Could not connect to smtp host : $errno : $errstr");
+		die_friendly(GENERAL_ERROR, "Could not connect to smtp host : $errno : $errstr");
-}
+	}
-// Wait for reply
+	// Wait for reply
-smtp_get_response($socket, "220", __LINE__);
+	smtp_get_response($socket, "220", __LINE__);
-// Do we want to use AUTH?, send RFC2554 EHLO, else send RFC821 HELO
+	// Do we want to use AUTH?, send RFC2554 EHLO, else send RFC821 HELO
-// This improved as provided by SirSir to accomodate
+	// This improved as provided by SirSir to accomodate
-if( !empty($smtp_user) && !empty($smtp_pass) )
+	if( !empty($smtp_user) && !empty($smtp_pass) )
-{
+	{
-enano_fputs($socket, "EHLO " . $smtp_host . "\r\n");
+		enano_fputs($socket, "EHLO " . $smtp_host . "\r\n");
-smtp_get_response($socket, "250", __LINE__);
+		smtp_get_response($socket, "250", __LINE__);
-enano_fputs($socket, "AUTH LOGIN\r\n");
+		enano_fputs($socket, "AUTH LOGIN\r\n");
-smtp_get_response($socket, "334", __LINE__);
+		smtp_get_response($socket, "334", __LINE__);
-enano_fputs($socket, base64_encode($smtp_user) . "\r\n");
+		enano_fputs($socket, base64_encode($smtp_user) . "\r\n");
-smtp_get_response($socket, "334", __LINE__);
+		smtp_get_response($socket, "334", __LINE__);
-enano_fputs($socket, base64_encode($smtp_pass) . "\r\n");
+		enano_fputs($socket, base64_encode($smtp_pass) . "\r\n");
-smtp_get_response($socket, "235", __LINE__);
+		smtp_get_response($socket, "235", __LINE__);
-}
+	}
-else
+	else
-{
+	{
-enano_fputs($socket, "HELO " . $smtp_host . "\r\n");
+		enano_fputs($socket, "HELO " . $smtp_host . "\r\n");
-smtp_get_response($socket, "250", __LINE__);
+		smtp_get_response($socket, "250", __LINE__);
-}
+	}
-// From this point onward most server response codes should be 250
+	// From this point onward most server response codes should be 250
-// Specify who the mail is from....
+	// Specify who the mail is from....
-enano_fputs($socket, "MAIL FROM: <" . getConfig('contact_email') . ">\r\n");
+	enano_fputs($socket, "MAIL FROM: <" . getConfig('contact_email') . ">\r\n");
-smtp_get_response($socket, "250", __LINE__);
+	smtp_get_response($socket, "250", __LINE__);
-// Specify each user to send to and build to header.
+	// Specify each user to send to and build to header.
-$to_header = '';
+	$to_header = '';
-// Add an additional bit of error checking to the To field.
+	// Add an additional bit of error checking to the To field.
-$mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
+	$mail_to = (trim($mail_to) == '') ? 'Undisclosed-recipients:;' : trim($mail_to);
-if (preg_match('#[^ ]+\@[^ ]+#', $mail_to))
+	if (preg_match('#[^ ]+\@[^ ]+#', $mail_to))
-{
+	{
-enano_fputs($socket, "RCPT TO: <$mail_to>\r\n");
+		enano_fputs($socket, "RCPT TO: <$mail_to>\r\n");
-smtp_get_response($socket, "250", __LINE__);
+		smtp_get_response($socket, "250", __LINE__);
-}
+	}
-// Ok now do the CC and BCC fields...
+	// Ok now do the CC and BCC fields...
-@reset($bcc);
+	@reset($bcc);
-while(list(, $bcc_address) = each($bcc))
+	while(list(, $bcc_address) = each($bcc))
-{
+	{
-// Add an additional bit of error checking to bcc header...
+		// Add an additional bit of error checking to bcc header...
-$bcc_address = trim($bcc_address);
+		$bcc_address = trim($bcc_address);
-if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address))
+		if (preg_match('#[^ ]+\@[^ ]+#', $bcc_address))
-{
+		{
-enano_fputs($socket, "RCPT TO: <$bcc_address>\r\n");
+			enano_fputs($socket, "RCPT TO: <$bcc_address>\r\n");
-smtp_get_response($socket, "250", __LINE__);
+			smtp_get_response($socket, "250", __LINE__);
-}
+		}
-}
+	}
-@reset($cc);
+	@reset($cc);
-while(list(, $cc_address) = each($cc))
+	while(list(, $cc_address) = each($cc))
-{
+	{
-// Add an additional bit of error checking to cc header
+		// Add an additional bit of error checking to cc header
-$cc_address = trim($cc_address);
+		$cc_address = trim($cc_address);
-if (preg_match('#[^ ]+\@[^ ]+#', $cc_address))
+		if (preg_match('#[^ ]+\@[^ ]+#', $cc_address))
-{
+		{
-enano_fputs($socket, "RCPT TO: <$cc_address>\r\n");
+			enano_fputs($socket, "RCPT TO: <$cc_address>\r\n");
-smtp_get_response($socket, "250", __LINE__);
+			smtp_get_response($socket, "250", __LINE__);
-}
+		}
-}
+	}
-// Ok now we tell the server we are ready to start sending data
+	// Ok now we tell the server we are ready to start sending data
-enano_fputs($socket, "DATA\r\n");
+	enano_fputs($socket, "DATA\r\n");
-// This is the last response code we look for until the end of the message.
+	// This is the last response code we look for until the end of the message.
-smtp_get_response($socket, "354", __LINE__);
+	smtp_get_response($socket, "354", __LINE__);
-// Send the Subject Line...
+	// Send the Subject Line...
-enano_fputs($socket, "Subject: $subject\r\n");
+	enano_fputs($socket, "Subject: $subject\r\n");
-// Now the To Header.
+	// Now the To Header.
-enano_fputs($socket, "To: $mail_to\r\n");
+	enano_fputs($socket, "To: $mail_to\r\n");
-// Now any custom headers....
+	// Now any custom headers....
-enano_fputs($socket, "$headers\r\n\r\n");
+	enano_fputs($socket, "$headers\r\n\r\n");
-// Ok now we are ready for the message...
+	// Ok now we are ready for the message...
-enano_fputs($socket, "$message\r\n");
+	enano_fputs($socket, "$message\r\n");
-// Ok the all the ingredients are mixed in let's cook this puppy...
+	// Ok the all the ingredients are mixed in let's cook this puppy...
-enano_fputs($socket, ".\r\n");
+	enano_fputs($socket, ".\r\n");
-smtp_get_response($socket, "250", __LINE__);
+	smtp_get_response($socket, "250", __LINE__);
-// Now tell the server we are done and close the socket...
+	// Now tell the server we are done and close the socket...
-enano_fputs($socket, "QUIT\r\n");
+	enano_fputs($socket, "QUIT\r\n");
-fclose($socket);
+	fclose($socket);
-return TRUE;
+	return TRUE;
 }
 /**
 * Tell which version of Enano we're running.
 * @param bool $long if true, uses English version names (e.g. alpha, beta, release candidate). If false (default) uses abbreviations (1.0a1, 1.0b3, 1.0RC2, etc.)
 * @return string
 */
 function enano_version($long = false, $no_nightly = false)
 {
-if ( !defined('ENANO_CONFIG_FETCHED') )
+	if ( !defined('ENANO_CONFIG_FETCHED') )
-{
+	{
-return function_exists('installer_enano_version') ? installer_enano_version() : $GLOBALS['enano_version'];
+		return function_exists('installer_enano_version') ? installer_enano_version() : $GLOBALS['enano_version'];
-}
+	}
-$r = getConfig('enano_version');
+	$r = getConfig('enano_version');
-$rc = ( $long ) ? ' release candidate ' : 'RC';
+	$rc = ( $long ) ? ' release candidate ' : 'RC';
-$b = ( $long ) ? ' beta ' : 'b';
+	$b = ( $long ) ? ' beta ' : 'b';
-$a = ( $long ) ? ' alpha ' : 'a';
+	$a = ( $long ) ? ' alpha ' : 'a';
-if($v = getConfig('enano_rc_version')) $r .= $rc.$v;
+	if($v = getConfig('enano_rc_version')) $r .= $rc.$v;
-if($v = getConfig('enano_beta_version')) $r .= $b.$v;
+	if($v = getConfig('enano_beta_version')) $r .= $b.$v;
-if($v = getConfig('enano_alpha_version')) $r .= $a.$v;
+	if($v = getConfig('enano_alpha_version')) $r .= $a.$v;
-if ( defined('ENANO_NIGHTLY') && !$no_nightly )
+	if ( defined('ENANO_NIGHTLY') && !$no_nightly )
-{
+	{
-$nightlytag  = ENANO_NIGHTLY_MONTH . '-' . ENANO_NIGHTLY_DAY . '-' . ENANO_NIGHTLY_YEAR;
+		$nightlytag  = ENANO_NIGHTLY_MONTH . '-' . ENANO_NIGHTLY_DAY . '-' . ENANO_NIGHTLY_YEAR;
-$nightlylong = ' nightly; build date: ' . ENANO_NIGHTLY_MONTH . '-' . ENANO_NIGHTLY_DAY . '-' . ENANO_NIGHTLY_YEAR;
+		$nightlylong = ' nightly; build date: ' . ENANO_NIGHTLY_MONTH . '-' . ENANO_NIGHTLY_DAY . '-' . ENANO_NIGHTLY_YEAR;
-$r = ( $long ) ? $r . $nightlylong : $r . '-nightly-' . $nightlytag;
+		$r = ( $long ) ? $r . $nightlylong : $r . '-nightly-' . $nightlytag;
-}
+	}
-return $r;
+	return $r;
 }
 /**
 * Give the codename of the release of Enano being run.
 * @return string
 */
 function enano_codename()
 {
-$names = array(
+	$names = array(
-'1.0RC1' => 'Leprechaun',
+			'1.0RC1' => 'Leprechaun',
-'1.0RC2' => 'Clurichaun',
+			'1.0RC2' => 'Clurichaun',
-'1.0RC3' => 'Druid',
+			'1.0RC3' => 'Druid',
-'1.0'    => 'Banshee',
+			'1.0'    => 'Banshee',
-'1.0.1'  => 'Loch Ness',
+			'1.0.1'  => 'Loch Ness',
-'1.0.1.1'=> 'Loch Ness internal bugfix build',
+			'1.0.1.1'=> 'Loch Ness internal bugfix build',
-'1.0.2b1'=> 'Coblynau unstable',
+			'1.0.2b1'=> 'Coblynau unstable',
-'1.0.2'  => 'Coblynau',
+			'1.0.2'  => 'Coblynau',
-'1.0.3'  => 'Dyrad',
+			'1.0.3'  => 'Dyrad',
-'1.1.1'  => 'Caoineag alpha 1',
+			'1.1.1'  => 'Caoineag alpha 1',
-'1.1.2'  => 'Caoineag alpha 2',
+			'1.1.2'  => 'Caoineag alpha 2',
-'1.1.3'  => 'Caoineag alpha 3',
+			'1.1.3'  => 'Caoineag alpha 3',
-'1.1.4'  => 'Caoineag alpha 4',
+			'1.1.4'  => 'Caoineag alpha 4',
-'1.1.5'  => 'Caoineag alpha 5',
+			'1.1.5'  => 'Caoineag alpha 5',
-'1.1.6'  => 'Caoineag beta 1',
+			'1.1.6'  => 'Caoineag beta 1',
-'1.1.7'  => 'Caoineag beta 2',
+			'1.1.7'  => 'Caoineag beta 2',
-'1.1.8'  => 'Caoineag beta 3',
+			'1.1.8'  => 'Caoineag beta 3',
-);
+		);
-$version = enano_version();
+	$version = enano_version();
-if ( isset($names[$version]) )
+	if ( isset($names[$version]) )
-{
+	{
-return $names[$version];
+		return $names[$version];
-}
+	}
-return 'Anonymous build';
+	return 'Anonymous build';
 }
 /**
 * Badly named function to send back eval'able Javascript code with an error message. Deprecated, use JSON instead.
 * @param string Message to send
 */
 function _die($t) {
-$_ob = 'document.getElementById("ajaxEditContainer").innerHTML = unescape(\'' . rawurlencode('' . $t . '') . '\')';
+	$_ob = 'document.getElementById("ajaxEditContainer").innerHTML = unescape(\'' . rawurlencode('' . $t . '') . '\')';
-die($_ob);
+	die($_ob);
 }
 /**
 * Same as _die(), but sends an SQL backtrace with the error message, and doesn't halt execution.
 * @param string Message to send
 */
 function jsdie($text) {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$text = rawurlencode($text . "\n\nSQL Backtrace:\n" . $db->sql_backtrace());
+	$text = rawurlencode($text . "\n\nSQL Backtrace:\n" . $db->sql_backtrace());
-echo 'document.getElementById("ajaxEditContainer").innerHTML = unescape(\''.$text.'\');';
+	echo 'document.getElementById("ajaxEditContainer").innerHTML = unescape(\''.$text.'\');';
 }
 /**
 * Capitalizes the first letter of a string
 * @param $text string the text to be transformed
 * @return string
 */
 function capitalize_first_letter($text)
 {
-return strtoupper(substr($text, 0, 1)) . substr($text, 1);
+	return strtoupper(substr($text, 0, 1)) . substr($text, 1);
 }
 /**
 * Checks if a value in a bitfield is on or off
 * @param $bitfield int the bit-field value
 * @return bool
 */
 function is_bit($bitfield, $value)
 {
-return ( $bitfield & $value ) ? true : false;
+	return ( $bitfield & $value ) ? true : false;
 }
 /**
 * Trims spaces/newlines from the beginning and end of a string
 * @param $text the text to process
 * @return string
 */
 function trim_spaces($text)
 {
-$d = true;
+	$d = true;
-while($d)
+	while($d)
-{
+	{
-$c = substr($text, 0, 1);
+		$c = substr($text, 0, 1);
-$a = substr($text, strlen($text)-1, strlen($text));
+		$a = substr($text, strlen($text)-1, strlen($text));
-if($c == "\n" || $c == "\r" || $c == "\t" || $c == ' ') $text = substr($text, 1, strlen($text));
+		if($c == "\n" || $c == "\r" || $c == "\t" || $c == ' ') $text = substr($text, 1, strlen($text));
-elseif($a == "\n" || $a == "\r" || $a == "\t" || $a == ' ') $text = substr($text, 0, strlen($text)-1);
+		elseif($a == "\n" || $a == "\r" || $a == "\t" || $a == ' ') $text = substr($text, 0, strlen($text)-1);
-else $d = false;
+		else $d = false;
-}
+	}
-return $text;
+	return $text;
 }
 /**
 * Enano-ese equivalent of str_split() which is only found in PHP5
 * @param $text string the text to split
 * @return array
 */
 function enano_str_split($text, $inc = 1)
 {
-if($inc < 1)
+	if($inc < 1)
-{
+	{
-return false;
+		return false;
-}
+	}
-if($inc >= strlen($text))
+	if($inc >= strlen($text))
-{
+	{
-return Array($text);
+		return Array($text);
-}
+	}
-$len = ceil(strlen($text) / $inc);
+	$len = ceil(strlen($text) / $inc);
-$ret = Array();
+	$ret = Array();
-for ( $i = 0; $i < strlen($text); $i = $i + $inc )
+	for ( $i = 0; $i < strlen($text); $i = $i + $inc )
-{
+	{
-$ret[] = substr($text, $i, $inc);
+		$ret[] = substr($text, $i, $inc);
-}
+	}
-return $ret;
+	return $ret;
 }
 /**
 * Converts a hexadecimal number to a binary string.
 * @param text string hexadecimal number
 * @return string
 */
 function hex2bin($text)
 {
-$arr = enano_str_split($text, 2);
+	$arr = enano_str_split($text, 2);
-$ret = '';
+	$ret = '';
-for ($i=0; $i<sizeof($arr); $i++)
+	for ($i=0; $i<sizeof($arr); $i++)
-{
+	{
-$ret .= chr(hexdec($arr[$i]));
+		$ret .= chr(hexdec($arr[$i]));
-}
+	}
-return $ret;
+	return $ret;
 }
 /**
 * Generates and/or prints a human-readable backtrace
 * @param bool $return - if true, this function returns a string, otherwise returns null and prints the backtrace
 * @return mixed
 */
 function enano_debug_print_backtrace($return = false)
 {
-ob_start();
+	ob_start();
-if ( !$return )
+	if ( !$return )
-echo '<pre>';
+		echo '<pre>';
-if ( function_exists('debug_print_backtrace') )
+	if ( function_exists('debug_print_backtrace') )
-{
+	{
-debug_print_backtrace();
+		debug_print_backtrace();
-}
+	}
-else
+	else
-{
+	{
-echo '<b>Warning:</b> No debug_print_backtrace() support!';
+		echo '<b>Warning:</b> No debug_print_backtrace() support!';
-}
+	}
-if ( !$return )
+	if ( !$return )
-echo '</pre>';
+		echo '</pre>';
-$c = ob_get_contents();
+	$c = ob_get_contents();
-ob_end_clean();
+	ob_end_clean();
-if($return) return $c;
+	if($return) return $c;
-else echo $c;
+	else echo $c;
-return null;
+	return null;
 }
 /**
 * Like rawurlencode(), but encodes all characters
 * @param string $text the text to encode
 * @return string
 */
 function hexencode($text, $prefix = '%', $suffix = '')
 {
-$arr = enano_str_split($text);
+	$arr = enano_str_split($text);
-$r = '';
+	$r = '';
-foreach($arr as $a)
+	foreach($arr as $a)
-{
+	{
-$nibble = (string)dechex(ord($a));
+		$nibble = (string)dechex(ord($a));
-if(strlen($nibble) == 1) $nibble = '0' . $nibble;
+		if(strlen($nibble) == 1) $nibble = '0' . $nibble;
-$r .= $prefix . $nibble . $suffix;
+		$r .= $prefix . $nibble . $suffix;
-}
+	}
-return $r;
+	return $r;
 }
 /**
 * Enano-ese equivalent of get_magic_quotes_gpc()
 * @return bool
 */
 function enano_get_magic_quotes_gpc()
 {
-if(function_exists('get_magic_quotes_gpc'))
+	if(function_exists('get_magic_quotes_gpc'))
-{
+	{
-return ( get_magic_quotes_gpc() == 1 );
+		return ( get_magic_quotes_gpc() == 1 );
-}
+	}
-else
+	else
-{
+	{
-return ( strtolower(@ini_get('magic_quotes_gpc')) == '1' );
+		return ( strtolower(@ini_get('magic_quotes_gpc')) == '1' );
-}
+	}
 }
 /**
 * Recursive stripslashes()
 * @param array
 * @return array
 */
 function stripslashes_recurse($arr)
 {
-foreach($arr as $k => $xxxx)
+	foreach($arr as $k => $xxxx)
-{
+	{
-$val =& $arr[$k];
+		$val =& $arr[$k];
-if(is_string($val))
+		if(is_string($val))
-$val = stripslashes($val);
+			$val = stripslashes($val);
-elseif(is_array($val))
+		elseif(is_array($val))
-$val = stripslashes_recurse($val);
+			$val = stripslashes_recurse($val);
-}
+	}
-return $arr;
+	return $arr;
 }
 /**
 * Recursive function to remove all NUL bytes from a string
 * @param array
 * @return array
 */
 function strip_nul_chars($arr)
 {
-foreach($arr as $k => $xxxx_unused)
+	foreach($arr as $k => $xxxx_unused)
-{
+	{
-$val =& $arr[$k];
+		$val =& $arr[$k];
-if(is_string($val))
+		if(is_string($val))
-$val = str_replace("\000", '', $val);
+			$val = str_replace("\000", '', $val);
-elseif(is_array($val))
+		elseif(is_array($val))
-$val = strip_nul_chars($val);
+			$val = strip_nul_chars($val);
-}
+	}
-return $arr;
+	return $arr;
 }
 /**
 * If magic_quotes_gpc is on, calls stripslashes() on everything in $_GET/$_POST/$_COOKIE. Also strips any NUL characters from incoming requests, as these are typically malicious.
 * @ignore - this doesn't work too well in my tests
 * @todo port version from the PHP manual
 * @return void
 */
 function strip_magic_quotes_gpc()
 {
-if(enano_get_magic_quotes_gpc())
+	if(enano_get_magic_quotes_gpc())
-{
+	{
-$_POST    = stripslashes_recurse($_POST);
+		$_POST    = stripslashes_recurse($_POST);
-$_GET     = stripslashes_recurse($_GET);
+		$_GET     = stripslashes_recurse($_GET);
-$_COOKIE  = stripslashes_recurse($_COOKIE);
+		$_COOKIE  = stripslashes_recurse($_COOKIE);
-$_REQUEST = stripslashes_recurse($_REQUEST);
+		$_REQUEST = stripslashes_recurse($_REQUEST);
-}
+	}
-$_POST    = strip_nul_chars($_POST);
+	$_POST    = strip_nul_chars($_POST);
-$_GET     = strip_nul_chars($_GET);
+	$_GET     = strip_nul_chars($_GET);
-$_COOKIE  = strip_nul_chars($_COOKIE);
+	$_COOKIE  = strip_nul_chars($_COOKIE);
-$_REQUEST = strip_nul_chars($_REQUEST);
+	$_REQUEST = strip_nul_chars($_REQUEST);
-$_POST    = decode_unicode_array($_POST);
+	$_POST    = decode_unicode_array($_POST);
-$_GET     = decode_unicode_array($_GET);
+	$_GET     = decode_unicode_array($_GET);
-$_COOKIE  = decode_unicode_array($_COOKIE);
+	$_COOKIE  = decode_unicode_array($_COOKIE);
-$_REQUEST = decode_unicode_array($_REQUEST);
+	$_REQUEST = decode_unicode_array($_REQUEST);
 }
 /**
 * A very basic single-character compression algorithm for binary strings/bitfields
 * @param string $bits the text to compress, should be only 1s and 0s
 * @return string
 */
 function compress_bitfield($bits)
 {
-if ( !preg_match('/^[01]+$/', $bits) )
+	if ( !preg_match('/^[01]+$/', $bits) )
-return false;
+		return false;
-$current = intval($bits{0});
+	$current = intval($bits{0});
-$clen = 0;
+	$clen = 0;
-$out = '';
+	$out = '';
-for ( $i = 0; $i < strlen($bits); $i++ )
+	for ( $i = 0; $i < strlen($bits); $i++ )
-{
+	{
-$cbit = intval($bits{$i});
+		$cbit = intval($bits{$i});
-if ( $cbit !== $current || $clen == 127 || $i == strlen($bits) - 1 )
+		if ( $cbit !== $current || $clen == 127 || $i == strlen($bits) - 1 )
-{
+		{
-if ( $i == strlen($bits) - 1 && $cbit === $current )
+			if ( $i == strlen($bits) - 1 && $cbit === $current )
-{
+			{
-$clen++;
+				$clen++;
-}
+			}
-// write chunk
+			// write chunk
-$byte = $clen;
+			$byte = $clen;
-if ( $current === 1 )
+			if ( $current === 1 )
-$byte |= 0x80;
+				$byte |= 0x80;
-$out .= chr($byte);
+			$out .= chr($byte);
-if ( $i == strlen($bits) - 1 && $cbit !== $current )
+			if ( $i == strlen($bits) - 1 && $cbit !== $current )
-{
+			{
-$out .= ( $cbit === 1 ) ? chr(0x81) : chr(0x1);
+				$out .= ( $cbit === 1 ) ? chr(0x81) : chr(0x1);
-}
+			}
-// reset
+			// reset
-$current = intval($cbit);
+			$current = intval($cbit);
-$clen = 0;
+			$clen = 0;
-}
+		}
-$clen++;
+		$clen++;
-}
+	}
-$crc = dechex(crc32($out));
+	$crc = dechex(crc32($out));
-while ( strlen($crc) < 8 )
+	while ( strlen($crc) < 8 )
-$crc = "0$crc";
+		$crc = "0$crc";
-return "cbf2:{$crc}" . hexencode($out, '', '');
+	return "cbf2:{$crc}" . hexencode($out, '', '');
 }
 // test case
 // $bf = '0111100010000000000000000000000100000000000000001110000000000000000101100000010100001100010000000000000000000000000000111111111111111111111100100001000000000000000000000000000000000000';
 // die('<pre>Original:  ' . " $bf\nCompressed: " . compress_bitfield($bf) . "\nProcessed:  ".uncompress_bitfield(compress_bitfield($bf)).'</pre>');
 * @return string the uncompressed, original (we hope) bitfield OR bool false on error
 */
 function uncompress_bitfield($bits)
 {
-if ( substr($bits, 0, 4) == 'cbf:' )
+	if ( substr($bits, 0, 4) == 'cbf:' )
-{
+	{
-return uncompress_bitfield_old($bits);
+		return uncompress_bitfield_old($bits);
-}
+	}
-if ( substr($bits, 0, 5) != 'cbf2:' )
+	if ( substr($bits, 0, 5) != 'cbf2:' )
-{
+	{
-echo __FUNCTION__.'(): ERROR: Invalid stream';
+		echo __FUNCTION__.'(): ERROR: Invalid stream';
-return false;
+		return false;
-}
+	}
-$bits = substr($bits, 5);
+	$bits = substr($bits, 5);
-$crc = substr($bits, 0, 8);
+	$crc = substr($bits, 0, 8);
-$bits = substr($bits, 8);
+	$bits = substr($bits, 8);
-$bits = hexdecode($bits);
+	$bits = hexdecode($bits);
-if ( dechex(crc32($bits)) !== $crc )
+	if ( dechex(crc32($bits)) !== $crc )
-{
+	{
-echo __FUNCTION__."(): ERROR: CRC failed";
+		echo __FUNCTION__."(): ERROR: CRC failed";
-return false;
+		return false;
-}
+	}
-$out = '';
+	$out = '';
-for ( $i = 0; $i < strlen($bits); $i++ )
+	for ( $i = 0; $i < strlen($bits); $i++ )
-{
+	{
-$byte = ord($bits{$i});
+		$byte = ord($bits{$i});
-$char = $byte & 0x80 ? '1' : '0';
+		$char = $byte & 0x80 ? '1' : '0';
-$byte &= ~0x80;
+		$byte &= ~0x80;
-for ( $j = 0; $j < $byte; $j++ )
+		for ( $j = 0; $j < $byte; $j++ )
-{
+		{
-$out .= $char;
+			$out .= $char;
-}
+		}
-}
+	}
-return $out;
+	return $out;
 }
 /**
 * Decompressor for old-format bitfields.
 * @param string
 * @access private
 */
 function uncompress_bitfield_old($bits)
 {
-if(substr($bits, 0, 4) != 'cbf:')
+	if(substr($bits, 0, 4) != 'cbf:')
-{
+	{
-echo __FUNCTION__.'(): ERROR: Invalid stream';
+		echo __FUNCTION__.'(): ERROR: Invalid stream';
-return false;
+		return false;
-}
+	}
-$len = intval(substr($bits, strpos($bits, 'len=')+4, strpos($bits, ';')-strpos($bits, 'len=')-4));
+	$len = intval(substr($bits, strpos($bits, 'len=')+4, strpos($bits, ';')-strpos($bits, 'len=')-4));
-$crc = substr($bits, strpos($bits, 'crc=')+4, 8);
+	$crc = substr($bits, strpos($bits, 'crc=')+4, 8);
-$data = substr($bits, strpos($bits, 'data=')+5, strpos($bits, '|end')-strpos($bits, 'data=')-5);
+	$data = substr($bits, strpos($bits, 'data=')+5, strpos($bits, '|end')-strpos($bits, 'data=')-5);
-$data = explode(',', $data);
+	$data = explode(',', $data);
-foreach($data as $a => $b)
+	foreach($data as $a => $b)
-{
+	{
-$d =& $data[$a];
+		$d =& $data[$a];
-$char = substr($d, 0, 1);
+		$char = substr($d, 0, 1);
-$dlen = intval(substr($d, 2, strlen($d)-1));
+		$dlen = intval(substr($d, 2, strlen($d)-1));
-$s = '';
+		$s = '';
-for($i=0;$i<$dlen;$i++,$s.=$char);
+		for($i=0;$i<$dlen;$i++,$s.=$char);
-$d = $s;
+		$d = $s;
-unset($s, $dlen, $char);
+		unset($s, $dlen, $char);
-}
+	}
-$decompressed = implode('', $data);
+	$decompressed = implode('', $data);
-$decompressed = substr($decompressed, 0, -1);
+	$decompressed = substr($decompressed, 0, -1);
-$dcrc = (string)dechex(crc32($decompressed));
+	$dcrc = (string)dechex(crc32($decompressed));
-if($dcrc != $crc)
+	if($dcrc != $crc)
-{
+	{
-echo __FUNCTION__.'(): ERROR: CRC check failed<br />debug info:<br />original crc: '.$crc.'<br />decomp\'ed crc: '.$dcrc.'<br />';
+		echo __FUNCTION__.'(): ERROR: CRC check failed<br />debug info:<br />original crc: '.$crc.'<br />decomp\'ed crc: '.$dcrc.'<br />';
-return false;
+		return false;
-}
+	}
-return $decompressed;
+	return $decompressed;
 }
 /**
 * Exports a MySQL table into a SQL string.
 * @param string $table The name of the table to export
 * @return string
 */
 function export_table($table, $structure = true, $data = true, $compact = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$struct_keys = '';
+	$struct_keys = '';
-$divider   = (!$compact) ? "\n" : "\n";
+	$divider   = (!$compact) ? "\n" : "\n";
-$spacer1   = (!$compact) ? "\n" : " ";
+	$spacer1   = (!$compact) ? "\n" : " ";
-$spacer2   = (!$compact) ? "  " : " ";
+	$spacer2   = (!$compact) ? "  " : " ";
-$rowspacer = (!$compact) ? "\n  " : " ";
+	$rowspacer = (!$compact) ? "\n  " : " ";
-$index_list = Array();
+	$index_list = Array();
-$cols = $db->sql_query('SHOW COLUMNS IN '.$table.';');
+	$cols = $db->sql_query('SHOW COLUMNS IN '.$table.';');
-if(!$cols)
+	if(!$cols)
-{
+	{
-echo 'export_table(): Error getting column list: '.$db->get_error_text().'<br />';
+		echo 'export_table(): Error getting column list: '.$db->get_error_text().'<br />';
-return false;
+		return false;
-}
+	}
-$col = Array();
+	$col = Array();
-$sqlcol = Array();
+	$sqlcol = Array();
-$collist = Array();
+	$collist = Array();
-$pri_keys = Array();
+	$pri_keys = Array();
-// Using fetchrow_num() here to compensate for MySQL l10n
+	// Using fetchrow_num() here to compensate for MySQL l10n
-while( $row = $db->fetchrow_num() )
+	while( $row = $db->fetchrow_num() )
-{
+	{
-$field =& $row[0];
+		$field =& $row[0];
-$type  =& $row[1];
+		$type  =& $row[1];
-$null  =& $row[2];
+		$null  =& $row[2];
-$key   =& $row[3];
+		$key   =& $row[3];
-$def   =& $row[4];
+		$def   =& $row[4];
-$extra =& $row[5];
+		$extra =& $row[5];
-$col[] = Array(
+		$col[] = Array(
-'name'=>$field,
+			'name'=>$field,
-'type'=>$type,
+			'type'=>$type,
-'null'=>$null,
+			'null'=>$null,
-'key'=>$key,
+			'key'=>$key,
-'default'=>$def,
+			'default'=>$def,
-'extra'=>$extra,
+			'extra'=>$extra,
-);
+			);
-$collist[] = $field;
+		$collist[] = $field;
-}
+	}
-if ( $structure )
+	if ( $structure )
-{
+	{
-$db->sql_query('SET SQL_QUOTE_SHOW_CREATE = 0;');
+		$db->sql_query('SET SQL_QUOTE_SHOW_CREATE = 0;');
-$struct = $db->sql_query('SHOW CREATE TABLE '.$table.';');
+		$struct = $db->sql_query('SHOW CREATE TABLE '.$table.';');
-if ( !$struct )
+		if ( !$struct )
-$db->_die();
+			$db->_die();
-$row = $db->fetchrow_num();
+		$row = $db->fetchrow_num();
-$db->free_result();
+		$db->free_result();
-$struct = $row[1];
+		$struct = $row[1];
-$struct = preg_replace("/\n\) ENGINE=(.+)$/", "\n);", $struct);
+		$struct = preg_replace("/\n\) ENGINE=(.+)$/", "\n);", $struct);
-unset($row);
+		unset($row);
-if ( $compact )
+		if ( $compact )
-{
+		{
-$struct_arr = explode("\n", $struct);
+			$struct_arr = explode("\n", $struct);
-foreach ( $struct_arr as $i => $leg )
+			foreach ( $struct_arr as $i => $leg )
-{
+			{
-if ( $i == 0 )
+				if ( $i == 0 )
-continue;
+					continue;
-$test = trim($leg);
+				$test = trim($leg);
-if ( empty($test) )
+				if ( empty($test) )
-{
+				{
-unset($struct_arr[$i]);
+					unset($struct_arr[$i]);
-continue;
+					continue;
-}
+				}
-$struct_arr[$i] = preg_replace('/^([\s]*)/', ' ', $leg);
+				$struct_arr[$i] = preg_replace('/^([\s]*)/', ' ', $leg);
-}
+			}
-$struct = implode("", $struct_arr);
+			$struct = implode("", $struct_arr);
-}
+		}
-}
+	}
-// Structuring complete
+	// Structuring complete
-if($data)
+	if($data)
-{
+	{
-$datq = $db->sql_query('SELECT * FROM '.$table.';');
+		$datq = $db->sql_query('SELECT * FROM '.$table.';');
-if(!$datq)
+		if(!$datq)
-{
+		{
-echo 'export_table(): Error getting column list: '.$db->get_error_text().'<br />';
+			echo 'export_table(): Error getting column list: '.$db->get_error_text().'<br />';
-return false;
+			return false;
-}
+		}
-if($db->numrows() < 1)
+		if($db->numrows() < 1)
-{
+		{
-if($structure) return $struct;
+			if($structure) return $struct;
-else return '';
+			else return '';
-}
+		}
-$rowdata = Array();
+		$rowdata = Array();
-$dataqs = Array();
+		$dataqs = Array();
-$insert_strings = Array();
+		$insert_strings = Array();
-$z = false;
+		$z = false;
-while($row = $db->fetchrow_num())
+		while($row = $db->fetchrow_num())
-{
+		{
-$z = false;
+			$z = false;
-foreach($row as $i => $cell)
+			foreach($row as $i => $cell)
-{
+			{
-$str = mysql_encode_column($cell, $col[$i]['type']);
+				$str = mysql_encode_column($cell, $col[$i]['type']);
-$rowdata[] = $str;
+				$rowdata[] = $str;
-}
+			}
-$dataqs2 = implode(",$rowspacer", $dataqs) . ",$rowspacer" . '( ' . implode(', ', $rowdata) . ' )';
+			$dataqs2 = implode(",$rowspacer", $dataqs) . ",$rowspacer" . '( ' . implode(', ', $rowdata) . ' )';
-$ins = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . $dataqs2 . ";";
+			$ins = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . $dataqs2 . ";";
-if ( strlen( $ins ) > MYSQL_MAX_PACKET_SIZE )
+			if ( strlen( $ins ) > MYSQL_MAX_PACKET_SIZE )
-{
+			{
-// We've exceeded the maximum allowed packet size for MySQL - separate this into a different query
+				// We've exceeded the maximum allowed packet size for MySQL - separate this into a different query
-$insert_strings[] = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . implode(",$rowspacer", $dataqs) . ";";;
+				$insert_strings[] = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . implode(",$rowspacer", $dataqs) . ";";;
-$dataqs = Array('( ' . implode(', ', $rowdata) . ' )');
+				$dataqs = Array('( ' . implode(', ', $rowdata) . ' )');
-$z = true;
+				$z = true;
-}
+			}
-else
+			else
-{
+			{
-$dataqs[] = '( ' . implode(', ', $rowdata) . ' )';
+				$dataqs[] = '( ' . implode(', ', $rowdata) . ' )';
-}
+			}
-$rowdata = Array();
+			$rowdata = Array();
-}
+		}
-if ( !$z )
+		if ( !$z )
-{
+		{
-$insert_strings[] = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . implode(",$rowspacer", $dataqs) . ";";;
+			$insert_strings[] = 'INSERT INTO '.$table.'( '.implode(',', $collist).' ) VALUES' . implode(",$rowspacer", $dataqs) . ";";;
-$dataqs = Array();
+			$dataqs = Array();
-}
+		}
-$datstring = implode($divider, $insert_strings);
+		$datstring = implode($divider, $insert_strings);
-}
+	}
-if($structure && !$data) return $struct;
+	if($structure && !$data) return $struct;
-elseif(!$structure && $data) return $datstring;
+	elseif(!$structure && $data) return $datstring;
-elseif($structure && $data) return $struct . $divider . $datstring;
+	elseif($structure && $data) return $struct . $divider . $datstring;
-elseif(!$structure && !$data) return '';
+	elseif(!$structure && !$data) return '';
 }
 /**
 * Encodes a string value for use in an INSERT statement for given column type $type.
 * @access private
 */
 function mysql_encode_column($input, $type)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-// Decide whether to quote the string or not
+	// Decide whether to quote the string or not
-if(substr($type, 0, 7) == 'varchar' || $type == 'datetime' || $type == 'text' || $type == 'tinytext' || $type == 'smalltext' || $type == 'longtext' || substr($type, 0, 4) == 'char')
+	if(substr($type, 0, 7) == 'varchar' || $type == 'datetime' || $type == 'text' || $type == 'tinytext' || $type == 'smalltext' || $type == 'longtext' || substr($type, 0, 4) == 'char')
-{
+	{
-$str = "'" . $db->escape($input) . "'";
+		$str = "'" . $db->escape($input) . "'";
-}
+	}
-elseif(in_array($type, Array('blob', 'longblob', 'mediumblob', 'smallblob')) || substr($type, 0, 6) == 'binary' || substr($type, 0, 9) == 'varbinary')
+	elseif(in_array($type, Array('blob', 'longblob', 'mediumblob', 'smallblob')) || substr($type, 0, 6) == 'binary' || substr($type, 0, 9) == 'varbinary')
-{
+	{
-$str = '0x' . hexencode($input, '', '');
+		$str = '0x' . hexencode($input, '', '');
-}
+	}
-elseif(is_null($input))
+	elseif(is_null($input))
-{
+	{
-$str = 'NULL';
+		$str = 'NULL';
-}
+	}
-else
+	else
-{
+	{
-$str = (string)$input;
+		$str = (string)$input;
-}
+	}
-return $str;
+	return $str;
 }
 /**
 * Creates an associative array defining which file extensions are allowed and which ones aren't
 * @return array keyname will be a file extension, value will be true or false
 */
 function fetch_allowed_extensions()
 {
-global $mime_types;
+	global $mime_types;
-$bits = getConfig('allowed_mime_types');
+	$bits = getConfig('allowed_mime_types');
-if(!$bits) return Array(false);
+	if(!$bits) return Array(false);
-$bits = uncompress_bitfield($bits);
+	$bits = uncompress_bitfield($bits);
-if(!$bits) return Array(false);
+	if(!$bits) return Array(false);
-$bits = enano_str_split($bits, 1);
+	$bits = enano_str_split($bits, 1);
-$ret = Array();
+	$ret = Array();
-$mt = array_keys($mime_types);
+	$mt = array_keys($mime_types);
-foreach($bits as $i => $b)
+	foreach($bits as $i => $b)
-{
+	{
-$ret[$mt[$i]] = ( $b == '1' ) ? true : false;
+		$ret[$mt[$i]] = ( $b == '1' ) ? true : false;
-}
+	}
-return $ret;
+	return $ret;
 }
 /**
 * Generates a random key suitable for encryption
 * @param int $len the length of the key
 * @return string a BINARY key
 */
 function randkey($len = 32)
 {
-$key = '';
+	$key = '';
-for($i=0;$i<$len;$i++)
+	for($i=0;$i<$len;$i++)
-{
+	{
-$key .= chr(mt_rand(0, 255));
+		$key .= chr(mt_rand(0, 255));
-}
+	}
-return $key;
+	return $key;
 }
 /**
 * Decodes a hex string.
 * @param string $hex The hex code to decode
 * @return string
 */
 function hexdecode($hex)
 {
-$hex = enano_str_split($hex, 2);
+	$hex = enano_str_split($hex, 2);
-$bin_key = '';
+	$bin_key = '';
-foreach($hex as $nibble)
+	foreach($hex as $nibble)
-{
+	{
-$byte = chr(hexdec($nibble));
+		$byte = chr(hexdec($nibble));
-$bin_key .= $byte;
+		$bin_key .= $byte;
-}
+	}
-return $bin_key;
+	return $bin_key;
 }
 /**
 * Enano's own (almost) bulletproof HTML sanitizer.
 * @param string $html The input HTML
 * @return string cleaned HTML
 */
 function sanitize_html($html, $filter_php = true)
 {
-// Random seed for substitution
+	// Random seed for substitution
-$rand_seed = md5( sha1(microtime()) . mt_rand() );
+	$rand_seed = md5( sha1(microtime()) . mt_rand() );
-// We need MediaWiki
+	// We need MediaWiki
-require_once(ENANO_ROOT . '/includes/wikiengine/TagSanitizer.php');
+	require_once(ENANO_ROOT . '/includes/wikiengine/TagSanitizer.php');
-// Strip out comments that are already escaped
+	// Strip out comments that are already escaped
-preg_match_all('/&lt;!--(.*?)--&gt;/', $html, $comment_match);
+	preg_match_all('/&lt;!--(.*?)--&gt;/', $html, $comment_match);
-$i = 0;
+	$i = 0;
-foreach ( $comment_match[0] as $comment )
+	foreach ( $comment_match[0] as $comment )
-{
+	{
-$html = str_replace_once($comment, "{HTMLCOMMENT:$i:$rand_seed}", $html);
+		$html = str_replace_once($comment, "{HTMLCOMMENT:$i:$rand_seed}", $html);
-$i++;
+		$i++;
-}
+	}
-// Strip out code sections that will be postprocessed by Text_Wiki
+	// Strip out code sections that will be postprocessed by Text_Wiki
-preg_match_all(';^<code(\s[^>]*)?>((?:(?R)|.)*?)</code>(\s|$);msi', $html, $code_match);
+	preg_match_all(';^<code(\s[^>]*)?>((?:(?R)|.)*?)</code>(\s|$);msi', $html, $code_match);
-$i = 0;
+	$i = 0;
-foreach ( $code_match[0] as $code )
+	foreach ( $code_match[0] as $code )
-{
+	{
-$html = str_replace_once($code, "{TW_CODE:$i:$rand_seed}", $html);
+		$html = str_replace_once($code, "{TW_CODE:$i:$rand_seed}", $html);
-$i++;
+		$i++;
-}
+	}
-$html = preg_replace('#<([a-z]+)([\s]+)([^>]+?)'.htmlalternatives('javascript:').'(.+?)>(.*?)</\\1>#is', '&lt;\\1\\2\\3javascript:\\59&gt;\\60&lt;/\\1&gt;', $html);
+	$html = preg_replace('#<([a-z]+)([\s]+)([^>]+?)'.htmlalternatives('javascript:').'(.+?)>(.*?)</\\1>#is', '&lt;\\1\\2\\3javascript:\\59&gt;\\60&lt;/\\1&gt;', $html);
-$html = preg_replace('#<([a-z]+)([\s]+)([^>]+?)'.htmlalternatives('javascript:').'(.+?)>#is', '&lt;\\1\\2\\3javascript:\\59&gt;', $html);
+	$html = preg_replace('#<([a-z]+)([\s]+)([^>]+?)'.htmlalternatives('javascript:').'(.+?)>#is', '&lt;\\1\\2\\3javascript:\\59&gt;', $html);
-if($filter_php)
+	if($filter_php)
-$html = str_replace(
+		$html = str_replace(
-Array('<?php',    '<?',    '<%',    '?>',    '%>'),
+			Array('<?php',    '<?',    '<%',    '?>',    '%>'),
-Array('&lt;?php', '&lt;?', '&lt;%', '?&gt;', '%&gt;'),
+			Array('&lt;?php', '&lt;?', '&lt;%', '?&gt;', '%&gt;'),
-$html);
+			$html);
-$tag_whitelist = array_keys ( setupAttributeWhitelist() );
+	$tag_whitelist = array_keys ( setupAttributeWhitelist() );
-if ( !$filter_php )
+	if ( !$filter_php )
-$tag_whitelist[] = '?php';
+		$tag_whitelist[] = '?php';
-// allow HTML comments
+	// allow HTML comments
-$tag_whitelist[] = '!--';
+	$tag_whitelist[] = '!--';
-$len = strlen($html);
+	$len = strlen($html);
-$in_quote = false;
+	$in_quote = false;
-$quote_char = '';
+	$quote_char = '';
-$tag_start = 0;
+	$tag_start = 0;
-$tag_name = '';
+	$tag_name = '';
-$in_tag = false;
+	$in_tag = false;
-$trk_name = false;
+	$trk_name = false;
-for ( $i = 0; $i < $len; $i++ )
+	for ( $i = 0; $i < $len; $i++ )
-{
+	{
-$chr = $html{$i};
+		$chr = $html{$i};
-$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
+		$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
-$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
+		$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
-if ( $in_quote && $in_tag )
+		if ( $in_quote && $in_tag )
-{
+		{
-if ( $quote_char == $chr && $prev != '\\' )
+			if ( $quote_char == $chr && $prev != '\\' )
-$in_quote = false;
+				$in_quote = false;
-}
+		}
-elseif ( ( $chr == '"' || $chr == "'" ) && $prev != '\\' && $in_tag )
+		elseif ( ( $chr == '"' || $chr == "'" ) && $prev != '\\' && $in_tag )
-{
+		{
-$in_quote = true;
+			$in_quote = true;
-$quote_char = $chr;
+			$quote_char = $chr;
-}
+		}
-if ( $chr == '<' && !$in_tag && $next != '/' )
+		if ( $chr == '<' && !$in_tag && $next != '/' )
-{
+		{
-// start of a tag
+			// start of a tag
-$tag_start = $i;
+			$tag_start = $i;
-$in_tag = true;
+			$in_tag = true;
-$trk_name = true;
+			$trk_name = true;
-}
+		}
-elseif ( !$in_quote && $in_tag && $chr == '>' )
+		elseif ( !$in_quote && $in_tag && $chr == '>' )
-{
+		{
-$full_tag = substr($html, $tag_start, ( $i - $tag_start ) + 1 );
+			$full_tag = substr($html, $tag_start, ( $i - $tag_start ) + 1 );
-$l = strlen($tag_name) + 2;
+			$l = strlen($tag_name) + 2;
-$attribs_only = trim( substr($full_tag, $l, ( strlen($full_tag) - $l - 1 ) ) );
+			$attribs_only = trim( substr($full_tag, $l, ( strlen($full_tag) - $l - 1 ) ) );
-// Debugging message
+			// Debugging message
-// echo htmlspecialchars($full_tag) . '<br />';
+			// echo htmlspecialchars($full_tag) . '<br />';
-if ( !in_array($tag_name, $tag_whitelist) && substr($tag_name, 0, 3) != '!--' )
+			if ( !in_array($tag_name, $tag_whitelist) && substr($tag_name, 0, 3) != '!--' )
-{
+			{
-// Illegal tag
+				// Illegal tag
-//echo $tag_name . ' ';
+				//echo $tag_name . ' ';
-$s = ( empty($attribs_only) ) ? '' : ' ';
+				$s = ( empty($attribs_only) ) ? '' : ' ';
-$sanitized = '&lt;' . $tag_name . $s . $attribs_only . '&gt;';
+				$sanitized = '&lt;' . $tag_name . $s . $attribs_only . '&gt;';
-$html = substr($html, 0, $tag_start) . $sanitized . substr($html, $i + 1);
+				$html = substr($html, 0, $tag_start) . $sanitized . substr($html, $i + 1);
-$html = str_replace('</' . $tag_name . '>', '&lt;/' . $tag_name . '&gt;', $html);
+				$html = str_replace('</' . $tag_name . '>', '&lt;/' . $tag_name . '&gt;', $html);
-$new_i = $tag_start + strlen($sanitized);
+				$new_i = $tag_start + strlen($sanitized);
-$len = strlen($html);
+				$len = strlen($html);
-$i = $new_i;
+				$i = $new_i;
-$in_tag = false;
+				$in_tag = false;
-$tag_name = '';
+				$tag_name = '';
-continue;
+				continue;
-}
+			}
-else
+			else
-{
+			{
-// If not filtering PHP, don't bother to strip
+				// If not filtering PHP, don't bother to strip
-if ( $tag_name == '?php' && !$filter_php )
+				if ( $tag_name == '?php' && !$filter_php )
-continue;
+					continue;
-// If this is a comment, likewise skip this "tag"
+				// If this is a comment, likewise skip this "tag"
-if ( $tag_name == '!--' )
+				if ( $tag_name == '!--' )
-continue;
+					continue;
-$f = fixTagAttributes( $attribs_only, $tag_name );
+				$f = fixTagAttributes( $attribs_only, $tag_name );
-$s = ( empty($f) ) ? '' : ' ';
+				$s = ( empty($f) ) ? '' : ' ';
-$sanitized = '<' . $tag_name . $f . '>';
+				$sanitized = '<' . $tag_name . $f . '>';
-$new_i = $tag_start + strlen($sanitized);
+				$new_i = $tag_start + strlen($sanitized);
-$html = substr($html, 0, $tag_start) . $sanitized . substr($html, $i + 1);
+				$html = substr($html, 0, $tag_start) . $sanitized . substr($html, $i + 1);
-$len = strlen($html);
+				$len = strlen($html);
-$i = $new_i;
+				$i = $new_i;
-$in_tag = false;
+				$in_tag = false;
-$tag_name = '';
+				$tag_name = '';
-continue;
+				continue;
-}
+			}
-}
+		}
-elseif ( $in_tag && $trk_name )
+		elseif ( $in_tag && $trk_name )
-{
+		{
-$is_alphabetical = ( strtolower($chr) != strtoupper($chr) || in_array($chr, array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9')) || $chr == '?' || $chr == '!' || $chr == '-' );
+			$is_alphabetical = ( strtolower($chr) != strtoupper($chr) || in_array($chr, array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9')) || $chr == '?' || $chr == '!' || $chr == '-' );
-if ( $is_alphabetical )
+			if ( $is_alphabetical )
-$tag_name .= $chr;
+				$tag_name .= $chr;
-else
+			else
-{
+			{
-$trk_name = false;
+				$trk_name = false;
-}
+			}
-}
+		}
-}
+	}
-// Vulnerability from ha.ckers.org/xss.html:
+	// Vulnerability from ha.ckers.org/xss.html:
-// <script src="http://foo.com/xss.js"
+	// <script src="http://foo.com/xss.js"
-// <
+	// <
-// The rule is so specific because everything else will have been filtered by now
+	// The rule is so specific because everything else will have been filtered by now
-$html = preg_replace('/<(script|iframe)(.+?)src=([^>]*)</i', '&lt;\\1\\2src=\\3&lt;', $html);
+	$html = preg_replace('/<(script|iframe)(.+?)src=([^>]*)</i', '&lt;\\1\\2src=\\3&lt;', $html);
-// Vulnerability reported by fuzion from nukeit.org:
+	// Vulnerability reported by fuzion from nukeit.org:
-// XSS in closing HTML tag style attribute
+	// XSS in closing HTML tag style attribute
-// Fix: escape all closing tags with non-whitelisted characters
+	// Fix: escape all closing tags with non-whitelisted characters
-$html = preg_replace('!</((?:[^>]*)([^a-z0-9_:>-]+)(?:[^>]*))>!i', '&lt;/\\1&gt;', $html);
+	$html = preg_replace('!</((?:[^>]*)([^a-z0-9_:>-]+)(?:[^>]*))>!i', '&lt;/\\1&gt;', $html);
-// Restore stripped comments
+	// Restore stripped comments
-$i = 0;
+	$i = 0;
-foreach ( $comment_match[0] as $comment )
+	foreach ( $comment_match[0] as $comment )
-{
+	{
-$html = str_replace_once("{HTMLCOMMENT:$i:$rand_seed}", $comment, $html);
+		$html = str_replace_once("{HTMLCOMMENT:$i:$rand_seed}", $comment, $html);
-$i++;
+		$i++;
-}
+	}
-// Restore stripped code
+	// Restore stripped code
-$i = 0;
+	$i = 0;
-foreach ( $code_match[0] as $code )
+	foreach ( $code_match[0] as $code )
-{
+	{
-$html = str_replace_once("{TW_CODE:$i:$rand_seed}", $code, $html);
+		$html = str_replace_once("{TW_CODE:$i:$rand_seed}", $code, $html);
-$i++;
+		$i++;
-}
+	}
-return $html;
+	return $html;
 }
 /**
 * Using the same parsing code as sanitize_html(), this function adds <litewiki> tags around certain block-level elements
 * @param string $html The input HTML
 */
 function wikiformat_process_block($html)
 {
-$tok1 = "<litewiki>";
+	$tok1 = "<litewiki>";
-$tok2 = "</litewiki>";
+	$tok2 = "</litewiki>";
-$block_tags = array('div', 'p', 'table', 'blockquote', 'pre');
+	$block_tags = array('div', 'p', 'table', 'blockquote', 'pre');
-$len = strlen($html);
+	$len = strlen($html);
-$in_quote = false;
+	$in_quote = false;
-$quote_char = '';
+	$quote_char = '';
-$tag_start = 0;
+	$tag_start = 0;
-$tag_name = '';
+	$tag_name = '';
-$in_tag = false;
+	$in_tag = false;
-$trk_name = false;
+	$trk_name = false;
-$diag = 0;
+	$diag = 0;
-$block_tagname = '';
+	$block_tagname = '';
-$in_blocksec = 0;
+	$in_blocksec = 0;
-$block_start = 0;
+	$block_start = 0;
-for ( $i = 0; $i < $len; $i++ )
+	for ( $i = 0; $i < $len; $i++ )
-{
+	{
-$chr = $html{$i};
+		$chr = $html{$i};
-$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
+		$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
-$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
+		$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
-// Are we inside of a quoted section?
+		// Are we inside of a quoted section?
-if ( $in_quote && $in_tag )
+		if ( $in_quote && $in_tag )
-{
+		{
-if ( $quote_char == $chr && $prev != '\\' )
+			if ( $quote_char == $chr && $prev != '\\' )
-$in_quote = false;
+				$in_quote = false;
-}
+		}
-elseif ( ( $chr == '"' || $chr == "'" ) && $prev != '\\' && $in_tag )
+		elseif ( ( $chr == '"' || $chr == "'" ) && $prev != '\\' && $in_tag )
-{
+		{
-$in_quote = true;
+			$in_quote = true;
-$quote_char = $chr;
+			$quote_char = $chr;
-}
+		}
-if ( $chr == '<' && !$in_tag && $next == '/' )
+		if ( $chr == '<' && !$in_tag && $next == '/' )
-{
+		{
-// Iterate through until we've got a tag name
+			// Iterate through until we've got a tag name
-$tag_name = '';
+			$tag_name = '';
-$i++;
+			$i++;
-while(true)
+			while(true)
-{
+			{
-$i++;
+				$i++;
-// echo $i . ' ';
+				// echo $i . ' ';
-$chr = $html{$i};
+				$chr = $html{$i};
-$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
+				$prev = ( $i == 0 ) ? '' : $html{ $i - 1 };
-$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
+				$next = ( ( $i + 1 ) == $len ) ? '' : $html { $i + 1 };
-$tag_name .= $chr;
+				$tag_name .= $chr;
-if ( $next == '>' )
+				if ( $next == '>' )
-break;
+					break;
-}
+			}
-// echo '<br />';
+			// echo '<br />';
-if ( in_array($tag_name, $block_tags) )
+			if ( in_array($tag_name, $block_tags) )
-{
+			{
-if ( $block_tagname == $tag_name )
+				if ( $block_tagname == $tag_name )
-{
+				{
-$in_blocksec -= 1;
+					$in_blocksec -= 1;
-if ( $in_blocksec == 0 )
+					if ( $in_blocksec == 0 )
-{
+					{
-$block_tagname = '';
+						$block_tagname = '';
-$i += 2;
+						$i += 2;
-// echo 'Finished wiki litewiki wraparound calc at pos: ' . $i;
+						// echo 'Finished wiki litewiki wraparound calc at pos: ' . $i;
-$full_litewiki = substr($html, $block_start, ( $i - $block_start ));
+						$full_litewiki = substr($html, $block_start, ( $i - $block_start ));
-$new_text = "{$tok1}{$full_litewiki}{$tok2}";
+						$new_text = "{$tok1}{$full_litewiki}{$tok2}";
-$html = substr($html, 0, $block_start) . $new_text . substr($html, $i);
+						$html = substr($html, 0, $block_start) . $new_text . substr($html, $i);
-$i += ( strlen($tok1) + strlen($tok2) ) - 1;
+						$i += ( strlen($tok1) + strlen($tok2) ) - 1;
-$len = strlen($html);
+						$len = strlen($html);
-//die('<pre>' . htmlspecialchars($html) . '</pre>');
+						//die('<pre>' . htmlspecialchars($html) . '</pre>');
-}
+					}
-}
+				}
-}
+			}
-$in_tag = false;
+			$in_tag = false;
-$in_quote = false;
+			$in_quote = false;
-$tag_name = '';
+			$tag_name = '';
-continue;
+			continue;
-}
+		}
-else if ( $chr == '<' && !$in_tag && $next != '/' )
+		else if ( $chr == '<' && !$in_tag && $next != '/' )
-{
+		{
-// start of a tag
+			// start of a tag
-$tag_start = $i;
+			$tag_start = $i;
-$in_tag = true;
+			$in_tag = true;
-$trk_name = true;
+			$trk_name = true;
-}
+		}
-else if ( !$in_quote && $in_tag && $chr == '>' )
+		else if ( !$in_quote && $in_tag && $chr == '>' )
-{
+		{
-if ( !in_array($tag_name, $block_tags) )
+			if ( !in_array($tag_name, $block_tags) )
-{
+			{
-// Inline tag - reset and go to the next one
+				// Inline tag - reset and go to the next one
-// echo '&lt;inline ' . $tag_name . '&gt; ';
+				// echo '&lt;inline ' . $tag_name . '&gt; ';
-$in_tag = false;
+				$in_tag = false;
-$tag_name = '';
+				$tag_name = '';
-continue;
+				continue;
-}
+			}
-else
+			else
-{
+			{
-// echo '&lt;block: ' . $tag_name . ' @ ' . $i . '&gt;<br/>';
+				// echo '&lt;block: ' . $tag_name . ' @ ' . $i . '&gt;<br/>';
-if ( $in_blocksec == 0 )
+				if ( $in_blocksec == 0 )
-{
+				{
-//die('Found a starting tag for a block element: ' . $tag_name . ' at pos ' . $tag_start);
+					//die('Found a starting tag for a block element: ' . $tag_name . ' at pos ' . $tag_start);
-$block_tagname = $tag_name;
+					$block_tagname = $tag_name;
-$block_start = $tag_start;
+					$block_start = $tag_start;
-$in_blocksec++;
+					$in_blocksec++;
-}
+				}
-else if ( $block_tagname == $tag_name )
+				else if ( $block_tagname == $tag_name )
-{
+				{
-$in_blocksec++;
+					$in_blocksec++;
-}
+				}
-$in_tag = false;
+				$in_tag = false;
-$tag_name = '';
+				$tag_name = '';
-continue;
+				continue;
-}
+			}
-}
+		}
-elseif ( $in_tag && $trk_name )
+		elseif ( $in_tag && $trk_name )
-{
+		{
-$is_alphabetical = ( strtolower($chr) != strtoupper($chr) || in_array($chr, array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9')) || $chr == '?' || $chr == '!' || $chr == '-' );
+			$is_alphabetical = ( strtolower($chr) != strtoupper($chr) || in_array($chr, array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9')) || $chr == '?' || $chr == '!' || $chr == '-' );
-if ( $is_alphabetical )
+			if ( $is_alphabetical )
-$tag_name .= $chr;
+				$tag_name .= $chr;
-else
+			else
-{
+			{
-$trk_name = false;
+				$trk_name = false;
-}
+			}
-}
+		}
-// Tokenization complete
+		// Tokenization complete
-}
+	}
-$regex = '/' . str_replace('/', '\\/', preg_quote($tok2)) . '([\s]*)' . preg_quote($tok1) . '/is';
+	$regex = '/' . str_replace('/', '\\/', preg_quote($tok2)) . '([\s]*)' . preg_quote($tok1) . '/is';
-// die(htmlspecialchars($regex));
+	// die(htmlspecialchars($regex));
-$html = preg_replace($regex, '\\1', $html);
+	$html = preg_replace($regex, '\\1', $html);
-return $html;
+	return $html;
 }
 function htmlalternatives($string)
 {
-$ret = '';
+	$ret = '';
-for ( $i = 0; $i < strlen($string); $i++ )
+	for ( $i = 0; $i < strlen($string); $i++ )
-{
+	{
-$chr = $string{$i};
+		$chr = $string{$i};
-$ch1 = ord($chr);
+		$ch1 = ord($chr);
-$ch2 = dechex($ch1);
+		$ch2 = dechex($ch1);
-$byte = '(&\\#([0]*){0,7}' . $ch1 . ';|\\\\([0]*){0,7}' . $ch1 . ';|\\\\([0]*){0,7}' . $ch2 . ';|&\\#x([0]*){0,7}' . $ch2 . ';|%([0]*){0,7}' . $ch2 . '|' . preg_quote($chr) . ')';
+		$byte = '(&\\#([0]*){0,7}' . $ch1 . ';|\\\\([0]*){0,7}' . $ch1 . ';|\\\\([0]*){0,7}' . $ch2 . ';|&\\#x([0]*){0,7}' . $ch2 . ';|%([0]*){0,7}' . $ch2 . '|' . preg_quote($chr) . ')';
-$ret .= $byte;
+		$ret .= $byte;
-$ret .= '([\s]){0,2}';
+		$ret .= '([\s]){0,2}';
-}
+	}
-return $ret;
+	return $ret;
 }
 /**
 * Generate HTML for a sprite image.
 * @param string Path to sprite image
 * @return object HTMLImageElement
 */
 function gen_sprite($path, $width, $height, $xpos, $ypos)
 {
-$html = '<img src="' . scriptPath . '/images/spacer.gif" width="' . $width . '" height="' . $height . '" ';
+	$html = '<img src="' . scriptPath . '/images/spacer.gif" width="' . $width . '" height="' . $height . '" ';
-$xpos = ( $xpos == 0 ) ? '0' : '-' . strval($xpos);
+	$xpos = ( $xpos == 0 ) ? '0' : '-' . strval($xpos);
-$ypos = ( $ypos == 0 ) ? '0' : '-' . strval($ypos);
+	$ypos = ( $ypos == 0 ) ? '0' : '-' . strval($ypos);
-$html .= 'style="background-image: url(' . $path . '); background-repeat: no-repeat; background-position: ' . $ypos . 'px ' . $xpos . 'px;"';
+	$html .= 'style="background-image: url(' . $path . '); background-repeat: no-repeat; background-position: ' . $ypos . 'px ' . $xpos . 'px;"';
-$html .= ' />';
+	$html .= ' />';
-return $html;
+	return $html;
 }
 /**
 * Portal function allowing spam-filtering plugins.
 * Hooking guide:
 * @example
 <code>
 $plugins->attachHook('spam_check', 'return my_spam_check($string);');
 function my_spam_check($string)
 {
-if ( stristr($string, 'viagra') )
+	if ( stristr($string, 'viagra') )
-return false;
+		return false;
-return true;
+	return true;
 }
 </code>
 * @param string String to check for spam
 * @param string Author name
 * @param string Author e-mail
 * @return bool
 */
 function spamalyze($string, $name = false, $email = false, $url = false, $ip = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( !$ip )
+	if ( !$ip )
-$ip =& $_SERVER['REMOTE_ADDR'];
+		$ip =& $_SERVER['REMOTE_ADDR'];
-$code = $plugins->setHook('spam_check');
+	$code = $plugins->setHook('spam_check');
-foreach ( $code as $cmd )
+	foreach ( $code as $cmd )
-{
+	{
-$result = eval($cmd);
+		$result = eval($cmd);
-if ( !$result )
+		if ( !$result )
-return false;
+			return false;
-}
+	}
-return true;
+	return true;
 }
 /**
 * Generates the HTML of a pagination control.
 * @param int Current page
 * @return string HTML
 */
 function generate_paginator($current_page, $num_pages, $result_url, $start_mult = 1, $start_add = 1)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang;
+	global $lang;
-$out = '';
+	$out = '';
-$i = 0;
+	$i = 0;
-// Build paginator
+	// Build paginator
-$pg_css = ( strpos($_SERVER['HTTP_USER_AGENT'], 'MSIE') ) ?
+	$pg_css = ( strpos($_SERVER['HTTP_USER_AGENT'], 'MSIE') ) ?
-// IE-specific hack
+						// IE-specific hack
-'display: block; width: 1px;':
+						'display: block; width: 1px;':
-// Other browsers
+						// Other browsers
-'display: table; margin: 10px 0 0 auto;';
+						'display: table; margin: 10px 0 0 auto;';
-$begin = '<div class="tblholder" style="'. $pg_css . '">
+	$begin = '<div class="tblholder" style="'. $pg_css . '">
-<table border="0" cellspacing="1" cellpadding="4">
+		<table border="0" cellspacing="1" cellpadding="4">
-<tr><th>' . $lang->get('paginate_lbl_page') . '</th>';
+			<tr><th>' . $lang->get('paginate_lbl_page') . '</th>';
-$block = '<td class="row1" style="text-align: center;">{LINK}</td>';
+	$block = '<td class="row1" style="text-align: center;">{LINK}</td>';
-$end = '</tr></table></div>';
+	$end = '</tr></table></div>';
-$blk = $template->makeParserText($block);
+	$blk = $template->makeParserText($block);
-$inner = '';
+	$inner = '';
-$cls = 'row2';
+	$cls = 'row2';
-if ( $num_pages < 5 )
+	if ( $num_pages < 5 )
-{
+	{
-for ( $i = 0; $i < $num_pages; $i++ )
+		for ( $i = 0; $i < $num_pages; $i++ )
-{
+		{
-$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
+			$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
-$offset = strval(($i * $start_mult) + $start_add);
+			$offset = strval(($i * $start_mult) + $start_add);
-$url = htmlspecialchars(sprintf($result_url, $offset));
+			$url = htmlspecialchars(sprintf($result_url, $offset));
-$j = $i + 1;
+			$j = $i + 1;
-$link = ( $i == $current_page ) ? "<b>$j</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>$j</a>";
+			$link = ( $i == $current_page ) ? "<b>$j</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>$j</a>";
-$blk->assign_vars(array(
+			$blk->assign_vars(array(
-'CLASS'=>$cls,
+				'CLASS'=>$cls,
-'LINK'=>$link
+				'LINK'=>$link
-));
+				));
-$inner .= $blk->run();
+			$inner .= $blk->run();
-}
+		}
-}
+	}
-else
+	else
-{
+	{
-if ( $current_page + 5 > $num_pages )
+		if ( $current_page + 5 > $num_pages )
-{
+		{
-$list = Array();
+			$list = Array();
-$tp = $current_page;
+			$tp = $current_page;
-if ( $current_page + 0 == $num_pages ) $tp = $tp - 3;
+			if ( $current_page + 0 == $num_pages ) $tp = $tp - 3;
-if ( $current_page + 1 == $num_pages ) $tp = $tp - 2;
+			if ( $current_page + 1 == $num_pages ) $tp = $tp - 2;
-if ( $current_page + 2 == $num_pages ) $tp = $tp - 1;
+			if ( $current_page + 2 == $num_pages ) $tp = $tp - 1;
-for ( $i = $tp - 1; $i <= $tp + 1; $i++ )
+			for ( $i = $tp - 1; $i <= $tp + 1; $i++ )
-{
+			{
-$list[] = $i;
+				$list[] = $i;
-}
+			}
-}
+		}
-else
+		else
-{
+		{
-$list = Array();
+			$list = Array();
-$current = $current_page;
+			$current = $current_page;
-$lower = ( $current < 3 ) ? 1 : $current - 1;
+			$lower = ( $current < 3 ) ? 1 : $current - 1;
-for ( $i = 0; $i < 3; $i++ )
+			for ( $i = 0; $i < 3; $i++ )
-{
+			{
-$list[] = $lower + $i;
+				$list[] = $lower + $i;
-}
+			}
-}
+		}
-$url = sprintf($result_url, $start_add);
+		$url = sprintf($result_url, $start_add);
-$link = ( 0 == $current_page ) ? "<b>" . $lang->get('paginate_btn_first') . "</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>&laquo; " . $lang->get('paginate_btn_first') . "</a>";
+		$link = ( 0 == $current_page ) ? "<b>" . $lang->get('paginate_btn_first') . "</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>&laquo; " . $lang->get('paginate_btn_first') . "</a>";
-$blk->assign_vars(array(
+		$blk->assign_vars(array(
-'CLASS'=>$cls,
+			'CLASS'=>$cls,
-'LINK'=>$link
+			'LINK'=>$link
-));
+			));
-$inner .= $blk->run();
+		$inner .= $blk->run();
-foreach ( $list as $i )
+		foreach ( $list as $i )
-{
+		{
-if ( $i == $num_pages )
+			if ( $i == $num_pages )
-break;
+				break;
-$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
+			$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
-$offset = strval(($i * $start_mult) + $start_add);
+			$offset = strval(($i * $start_mult) + $start_add);
-$url = sprintf($result_url, $offset);
+			$url = sprintf($result_url, $offset);
-$j = $i + 1;
+			$j = $i + 1;
-$link = ( $i == $current_page ) ? "<b>$j</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>$j</a>";
+			$link = ( $i == $current_page ) ? "<b>$j</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>$j</a>";
-$blk->assign_vars(array(
+			$blk->assign_vars(array(
-'CLASS'=>$cls,
+				'CLASS'=>$cls,
-'LINK'=>$link
+				'LINK'=>$link
-));
+				));
-$inner .= $blk->run();
+			$inner .= $blk->run();
-}
+		}
-// "Last" button
+		// "Last" button
-$total = (($num_pages - 1) * $start_mult) + $start_add;
+		$total = (($num_pages - 1) * $start_mult) + $start_add;
-if ( $current_page < $num_pages )
+		if ( $current_page < $num_pages )
-{
+		{
-$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
+			$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
-$offset = strval($total);
+			$offset = strval($total);
-$url = sprintf($result_url, $offset);
+			$url = sprintf($result_url, $offset);
-$link = ( $num_pages - 1 == $current_page ) ? "<b>" . $lang->get('paginate_btn_last') . "</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>" . $lang->get('paginate_btn_last') . " &raquo;</a>";
+			$link = ( $num_pages - 1 == $current_page ) ? "<b>" . $lang->get('paginate_btn_last') . "</b>" : "<a href=".'"'."$url".'"'." style='text-decoration: none;'>" . $lang->get('paginate_btn_last') . " &raquo;</a>";
-$blk->assign_vars(array(
+			$blk->assign_vars(array(
-'CLASS'=>$cls,
+				'CLASS'=>$cls,
-'LINK'=>$link
+				'LINK'=>$link
-));
+				));
-$inner .= $blk->run();
+			$inner .= $blk->run();
-}
+		}
-}
+	}
-$inner .= '<td class="row2" style="cursor: pointer;" onclick="paginator_goto(this, '.$current_page.', '.$num_pages.', '.$start_mult.', '.$start_add.', unescape(\'' . rawurlencode($result_url) . '\'));">&darr;</td>';
+	$inner .= '<td class="row2" style="cursor: pointer;" onclick="paginator_goto(this, '.$current_page.', '.$num_pages.', '.$start_mult.', '.$start_add.', unescape(\'' . rawurlencode($result_url) . '\'));">&darr;</td>';
-$paginator = "\n$begin$inner$end\n";
+	$paginator = "\n$begin$inner$end\n";
-return $paginator;
+	return $paginator;
 }
 /**
 * Paginates (breaks into multiple pages) a MySQL result resource, which is treated as unbuffered.
 * @param resource The MySQL result resource. This should preferably be an unbuffered query.
 * @return string
 */
 function paginate($q, $tpl_text, $num_results, $result_url, $start = 0, $perpage = 10, $callers = Array(), $header = '', $footer = '')
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$parser = $template->makeParserText($tpl_text);
+	$parser = $template->makeParserText($tpl_text);
-$num_pages = ceil ( $num_results / $perpage );
+	$num_pages = ceil ( $num_results / $perpage );
-$out = '';
+	$out = '';
-$this_page = ceil ( $start / $perpage );
+	$this_page = ceil ( $start / $perpage );
-$i = 0;
+	$i = 0;
-if ( $num_results > 0 )
+	if ( $num_results > 0 )
-{
+	{
-$paginator = generate_paginator($this_page, $num_pages, $result_url, $perpage, 0);
+		$paginator = generate_paginator($this_page, $num_pages, $result_url, $perpage, 0);
-$out .= $paginator;
+		$out .= $paginator;
-}
+	}
-$cls = 'row2';
+	$cls = 'row2';
-if ( $row = $db->fetchrow($q) )
+	if ( $row = $db->fetchrow($q) )
-{
+	{
-$i = 0;
+		$i = 0;
-$out .= $header;
+		$out .= $header;
-do {
+		do {
-$i++;
+			$i++;
-if ( $i <= $start )
+			if ( $i <= $start )
-{
+			{
-continue;
+				continue;
-}
+			}
-if ( ( $i - $start ) > $perpage )
+			if ( ( $i - $start ) > $perpage )
-{
+			{
-break;
+				break;
-}
+			}
-$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
+			$cls = ( $cls == 'row1' ) ? 'row2' : 'row1';
-foreach ( $row as $j => $val )
+			foreach ( $row as $j => $val )
-{
+			{
-if ( isset($callers[$j]) )
+				if ( isset($callers[$j]) )
-{
+				{
-$tmp = ( is_callable($callers[$j]) ) ? call_user_func($callers[$j], $val, $row) : $val;
+					$tmp = ( is_callable($callers[$j]) ) ? call_user_func($callers[$j], $val, $row) : $val;
-if ( is_string($tmp) )
+					if ( is_string($tmp) )
-{
+					{
-$row[$j] = $tmp;
+						$row[$j] = $tmp;
-}
+					}
-}
+				}
-}
+			}
-$parser->assign_vars($row);
+			$parser->assign_vars($row);
-$parser->assign_vars(array('_css_class' => $cls));
+			$parser->assign_vars(array('_css_class' => $cls));
-$out .= $parser->run();
+			$out .= $parser->run();
-} while ( $row = @$db->fetchrow($q) );
+		} while ( $row = @$db->fetchrow($q) );
-$out .= $footer;
+		$out .= $footer;
-}
+	}
-if ( $num_results > 0 )
+	if ( $num_results > 0 )
-$out .= $paginator;
+		$out .= $paginator;
-return $out;
+	return $out;
 }
 /**
 * This is the same as paginate(), but it processes an array instead of a MySQL result resource.
 * @param array The results. Each value is simply echoed.
 * @return string
 */
 function paginate_array($q, $num_results, $result_url, $start = 0, $perpage = 10, $header = '', $footer = '')
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang;
+	global $lang;
-$num_pages = ceil ( $num_results / $perpage );
+	$num_pages = ceil ( $num_results / $perpage );
-$out = '';
+	$out = '';
-$i = 0;
+	$i = 0;
-$this_page = ceil ( $start / $perpage );
+	$this_page = ceil ( $start / $perpage );
-$paginator = generate_paginator($this_page, $num_pages, $result_url, $perpage, 0);
+	$paginator = generate_paginator($this_page, $num_pages, $result_url, $perpage, 0);
-if ( $num_results > 1 )
+	if ( $num_results > 1 )
-{
+	{
-$out .= $paginator;
+		$out .= $paginator;
-}
+	}
-$cls = 'row2';
+	$cls = 'row2';
-if ( sizeof($q) > 0 )
+	if ( sizeof($q) > 0 )
-{
+	{
-$i = 0;
+		$i = 0;
-$out .= $header;
+		$out .= $header;
-foreach ( $q as $val ) {
+		foreach ( $q as $val ) {
-$i++;
+			$i++;
-if ( $i <= $start )
+			if ( $i <= $start )
-{
+			{
-continue;
+				continue;
-}
+			}
-if ( ( $i - $start ) > $perpage )
+			if ( ( $i - $start ) > $perpage )
-{
+			{
-break;
+				break;
-}
+			}
-$out .= $val;
+			$out .= $val;
-}
+		}
-$out .= $footer;
+		$out .= $footer;
-}
+	}
-if ( $num_results > 1 )
+	if ( $num_results > 1 )
-$out .= $paginator;
+		$out .= $paginator;
-return $out;
+	return $out;
 }
 /**
 * Enano version of fputs for debugging
 */
 function enano_fputs($socket, $data)
 {
-// echo '<pre>' . htmlspecialchars($data) . '</pre>';
+	// echo '<pre>' . htmlspecialchars($data) . '</pre>';
-// flush();
+	// flush();
-// ob_flush();
+	// ob_flush();
-// ob_end_flush();
+	// ob_end_flush();
-return fputs($socket, $data);
+	return fputs($socket, $data);
 }
 /**
 * Sanitizes a page URL string so that it can safely be stored in the database.
 * @param string Page ID to sanitize
 * @return string Cleaned text
 */
 function sanitize_page_id($page_id)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( isset($paths->nslist['User']) )
+	if ( isset($paths->nslist['User']) )
-{
+	{
-if ( preg_match('/^' . str_replace('/', '\\/', preg_quote($paths->nslist['User'])) . '/', $page_id) )
+		if ( preg_match('/^' . str_replace('/', '\\/', preg_quote($paths->nslist['User'])) . '/', $page_id) )
-{
+		{
-$ip = preg_replace('/^' . str_replace('/', '\\/', preg_quote($paths->nslist['User'])) . '/', '', $page_id);
+			$ip = preg_replace('/^' . str_replace('/', '\\/', preg_quote($paths->nslist['User'])) . '/', '', $page_id);
-if ( is_valid_ip($ip) )
+			if ( is_valid_ip($ip) )
-{
+			{
-return $page_id;
+				return $page_id;
-}
+			}
-}
+		}
-}
+	}
-if ( empty($page_id) )
+	if ( empty($page_id) )
-return '';
+		return '';
-// Remove character escapes
+	// Remove character escapes
-$page_id = dirtify_page_id($page_id);
+	$page_id = dirtify_page_id($page_id);
-$pid_clean = preg_replace('/[\w\.\/:;\(\)@\[\]=_-]/', 'X', $page_id);
+	$pid_clean = preg_replace('/[\w\.\/:;\(\)@\[\]=_-]/', 'X', $page_id);
-$pid_dirty = enano_str_split($pid_clean, 1);
+	$pid_dirty = enano_str_split($pid_clean, 1);
-foreach ( $pid_dirty as $id => $char )
+	foreach ( $pid_dirty as $id => $char )
-{
+	{
-if ( $char == 'X' )
+		if ( $char == 'X' )
-continue;
+			continue;
-$cid = ord($char);
+		$cid = ord($char);
-$cid = dechex($cid);
+		$cid = dechex($cid);
-$cid = strval($cid);
+		$cid = strval($cid);
-if ( strlen($cid) < 2 )
+		if ( strlen($cid) < 2 )
-{
+		{
-$cid = strtoupper("0$cid");
+			$cid = strtoupper("0$cid");
-}
+		}
-$pid_dirty[$id] = ".$cid";
+		$pid_dirty[$id] = ".$cid";
-}
+	}
-$pid_chars = enano_str_split($page_id, 1);
+	$pid_chars = enano_str_split($page_id, 1);
-$page_id_cleaned = '';
+	$page_id_cleaned = '';
-foreach ( $pid_chars as $id => $char )
+	foreach ( $pid_chars as $id => $char )
-{
+	{
-if ( $pid_dirty[$id] == 'X' )
+		if ( $pid_dirty[$id] == 'X' )
-$page_id_cleaned .= $char;
+			$page_id_cleaned .= $char;
-else
+		else
-$page_id_cleaned .= $pid_dirty[$id];
+			$page_id_cleaned .= $pid_dirty[$id];
-}
+	}
-// global $mime_types;
+	// global $mime_types;
-// $exts = array_keys($mime_types);
+	// $exts = array_keys($mime_types);
-// $exts = '(' . implode('|', $exts) . ')';
+	// $exts = '(' . implode('|', $exts) . ')';
-// $page_id_cleaned = preg_replace('/\.2e' . $exts . '$/', '.\\1', $page_id_cleaned);
+	// $page_id_cleaned = preg_replace('/\.2e' . $exts . '$/', '.\\1', $page_id_cleaned);
-return $page_id_cleaned;
+	return $page_id_cleaned;
 }
 /**
 * Removes character escapes in a page ID string
 * @param string Page ID string to dirty up
 * @return string
 */
 function dirtify_page_id($page_id)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-// First, replace spaces with underscores
+	// First, replace spaces with underscores
-$page_id = str_replace(' ', '_', $page_id);
+	$page_id = str_replace(' ', '_', $page_id);
-// Exception for userpages for IP addresses
+	// Exception for userpages for IP addresses
-$pid_ip_check = ( is_object($paths) ) ? preg_replace('+^' . preg_quote($paths->nslist['User']) . '+', '', $page_id) : $page_id;
+	$pid_ip_check = ( is_object($paths) ) ? preg_replace('+^' . preg_quote($paths->nslist['User']) . '+', '', $page_id) : $page_id;
-if ( is_valid_ip($pid_ip_check) )
+	if ( is_valid_ip($pid_ip_check) )
-{
+	{
-return $page_id;
+		return $page_id;
-}
+	}
-preg_match_all('/\.[a-f0-9][a-f0-9]/', $page_id, $matches);
+	preg_match_all('/\.[a-f0-9][a-f0-9]/', $page_id, $matches);
-foreach ( $matches[0] as $id => $char )
+	foreach ( $matches[0] as $id => $char )
-{
+	{
-$char = substr($char, 1);
+		$char = substr($char, 1);
-$char = strtolower($char);
+		$char = strtolower($char);
-$char = intval(hexdec($char));
+		$char = intval(hexdec($char));
-$char = chr($char);
+		$char = chr($char);
-if ( preg_match('/^[\w\.\/:;\(\)@\[\]=_-]$/', $char) )
+		if ( preg_match('/^[\w\.\/:;\(\)@\[\]=_-]$/', $char) )
-continue;
+			continue;
-$page_id = str_replace($matches[0][$id], $char, $page_id);
+		$page_id = str_replace($matches[0][$id], $char, $page_id);
-}
+	}
-return $page_id;
+	return $page_id;
 }
 /**
 * Inserts commas into a number to make it more human-readable. Floating point-safe and doesn't flirt with the number like number_format() does.
 * @param int The number to process
 * @return string Input number with commas added
 */
 function commatize($num)
 {
-$num = (string)$num;
+	$num = (string)$num;
-if ( strpos($num, '.') )
+	if ( strpos($num, '.') )
-{
+	{
-$whole = explode('.', $num);
+		$whole = explode('.', $num);
-$num = $whole[0];
+		$num = $whole[0];
-$dec = $whole[1];
+		$dec = $whole[1];
-}
+	}
-else
+	else
-{
+	{
-$whole = $num;
+		$whole = $num;
-}
+	}
-$offset = ( strlen($num) ) % 3;
+	$offset = ( strlen($num) ) % 3;
-$len = strlen($num);
+	$len = strlen($num);
-$offset = ( $offset == 0 )
+	$offset = ( $offset == 0 )
-? 3
+		? 3
-: $offset;
+		: $offset;
-for ( $i = $offset; $i < $len; $i=$i+3 )
+	for ( $i = $offset; $i < $len; $i=$i+3 )
-{
+	{
-$num = substr($num, 0, $i) . ',' . substr($num, $i, $len);
+		$num = substr($num, 0, $i) . ',' . substr($num, $i, $len);
-$len = strlen($num);
+		$len = strlen($num);
-$i++;
+		$i++;
-}
+	}
-if ( isset($dec) )
+	if ( isset($dec) )
-{
+	{
-return $num . '.' . $dec;
+		return $num . '.' . $dec;
-}
+	}
-else
+	else
-{
+	{
-return $num;
+		return $num;
-}
+	}
 }
 /**
 * Converts a number to a human file size.
 * @param int File size
 * @return string
 */
 function humanize_filesize($size)
 {
-global $lang;
+	global $lang;
-if ( $size > ( 1099511627776 * 0.9 ) )
+	if ( $size > ( 1099511627776 * 0.9 ) )
-{
+	{
-return number_format($size / 1099511627776, 1) . $lang->get('etc_unit_terabytes_short');
+		return number_format($size / 1099511627776, 1) . $lang->get('etc_unit_terabytes_short');
-}
+	}
-if ( $size > ( 1073741824 * 0.9 ) )
+	if ( $size > ( 1073741824 * 0.9 ) )
-{
+	{
-return number_format($size / 1073741824, 1) . $lang->get('etc_unit_gigabytes_short');
+		return number_format($size / 1073741824, 1) . $lang->get('etc_unit_gigabytes_short');
-}
+	}
-if ( $size > ( 1048576 * 0.9 ) )
+	if ( $size > ( 1048576 * 0.9 ) )
-{
+	{
-return number_format($size / 1048576, 1) . $lang->get('etc_unit_megabytes_short');
+		return number_format($size / 1048576, 1) . $lang->get('etc_unit_megabytes_short');
-}
+	}
-if ( $size > ( 1024 * 0.9 ) )
+	if ( $size > ( 1024 * 0.9 ) )
-{
+	{
-return number_format($size / 1024, 1) . $lang->get('etc_unit_kilobytes_short');
+		return number_format($size / 1024, 1) . $lang->get('etc_unit_kilobytes_short');
-}
+	}
-return "$size " . $lang->get('etc_unit_bytes');
+	return "$size " . $lang->get('etc_unit_bytes');
 }
 /**
 * Injects a string into another string at the specified position.
 * @param string The haystack
 * @param int    Position at which to insert the needle
 */
 function inject_substr($haystack, $needle, $pos)
 {
-$str1 = substr($haystack, 0, $pos);
+	$str1 = substr($haystack, 0, $pos);
-$pos++;
+	$pos++;
-$str2 = substr($haystack, $pos);
+	$str2 = substr($haystack, $pos);
-return "{$str1}{$needle}{$str2}";
+	return "{$str1}{$needle}{$str2}";
 }
 /**
 * Tells if a given IP address is valid.
 * @param string suspected IP address
 * @return bool true if valid, false otherwise
 */
 function is_valid_ip($ip)
 {
-// This next one came from phpBB3.
+	// This next one came from phpBB3.
-$ipv4 = '(?:(?:\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.){3}(?:\d{1,2}|1\d\d|2[0-4]\d|25[0-5])';
+	$ipv4 = '(?:(?:\d{1,2}|1\d\d|2[0-4]\d|25[0-5])\.){3}(?:\d{1,2}|1\d\d|2[0-4]\d|25[0-5])';
-$ipv6 = '(?:[a-f0-9]{0,4}):(?:[a-f0-9]{0,4}):(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{1,4})';
+	$ipv6 = '(?:[a-f0-9]{0,4}):(?:[a-f0-9]{0,4}):(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{0,4}:|:)?(?:[a-f0-9]{1,4})';
-if ( preg_match("/^{$ipv4}$/", $ip) || preg_match("/^{$ipv6}$/", $ip) )
+	if ( preg_match("/^{$ipv4}$/", $ip) || preg_match("/^{$ipv6}$/", $ip) )
-return true;
+		return true;
-else
+	else
-return false;
+		return false;
 }
 /**
 * Replaces the FIRST given occurrence of needle within haystack with thread
 * @param string Needle
 * @param string Haystack
 */
 function str_replace_once($needle, $thread, $haystack)
 {
-$needle_len = strlen($needle);
+	$needle_len = strlen($needle);
-if ( $pos = strstr($haystack, $needle) )
+	if ( $pos = strstr($haystack, $needle) )
-{
+	{
-$upto = substr($haystack, 0, ( strlen($haystack) - strlen($pos) ));
+		$upto = substr($haystack, 0, ( strlen($haystack) - strlen($pos) ));
-$from = substr($pos, $needle_len);
+		$from = substr($pos, $needle_len);
-return "{$upto}{$thread}{$from}";
+		return "{$upto}{$thread}{$from}";
-}
+	}
-return $haystack;
+	return $haystack;
 }
 /**
 * Replaces all given occurences of needle in haystack, case insensitively.
 * @param string Needle
 * @return string
 */
 function str_replace_i($needle, $thread, $haystack)
 {
-$needle_len = strlen($needle);
+	$needle_len = strlen($needle);
-$haystack_len = strlen($haystack);
+	$haystack_len = strlen($haystack);
-for ( $i = 0; $i < $haystack_len; $i++ )
+	for ( $i = 0; $i < $haystack_len; $i++ )
-{
+	{
-$test = substr($haystack, $i, $needle_len);
+		$test = substr($haystack, $i, $needle_len);
-if ( strtolower($test) == strtolower($needle) )
+		if ( strtolower($test) == strtolower($needle) )
-{
+		{
-// Got it!
+			// Got it!
-$upto = substr($haystack, 0, $i);
+			$upto = substr($haystack, 0, $i);
-$from = substr($haystack, ( $i + $needle_len ));
+			$from = substr($haystack, ( $i + $needle_len ));
-$haystack = "{$upto}{$thread}{$from}";
+			$haystack = "{$upto}{$thread}{$from}";
-$haystack_len = strlen($haystack);
+			$haystack_len = strlen($haystack);
-$i = $i + strlen($thread);
+			$i = $i + strlen($thread);
-}
+		}
-}
+	}
-return $haystack;
+	return $haystack;
 }
 /**
 * Highlights a term in a string.
 * @param string Needle (term to highlight)
 * @return string
 */
 function highlight_term($needle, $haystack, $start_tag = '<b>', $end_tag = '</b>')
 {
-$needle_len = strlen($needle);
+	$needle_len = strlen($needle);
-$haystack_len = strlen($haystack);
+	$haystack_len = strlen($haystack);
-for ( $i = 0; $i < $haystack_len; $i++ )
+	for ( $i = 0; $i < $haystack_len; $i++ )
-{
+	{
-$test = substr($haystack, $i, $needle_len);
+		$test = substr($haystack, $i, $needle_len);
-if ( strtolower($test) == strtolower($needle) )
+		if ( strtolower($test) == strtolower($needle) )
-{
+		{
-// Got it!
+			// Got it!
-$upto = substr($haystack, 0, $i);
+			$upto = substr($haystack, 0, $i);
-$from = substr($haystack, ( $i + $needle_len ));
+			$from = substr($haystack, ( $i + $needle_len ));
-$haystack = "{$upto}{$start_tag}{$test}{$end_tag}{$from}";
+			$haystack = "{$upto}{$start_tag}{$test}{$end_tag}{$from}";
-$haystack_len = strlen($haystack);
+			$haystack_len = strlen($haystack);
-$i = $i + strlen($needle) + strlen($start_tag) + strlen($end_tag);
+			$i = $i + strlen($needle) + strlen($start_tag) + strlen($end_tag);
-}
+		}
-}
+	}
-return $haystack;
+	return $haystack;
 }
 /**
 * Registers a new type of search result. Because this is so tricky to do but keep clean, this function takes an associative array as its
 * only parameter. This array configures the function. The required keys are:
 *                    a fully formatted and sanitized blob of HTML. If formatcallback is a TPL string, variables will be named after table
 *                    columns.
 *  - additionalwhere: additional SQL to inject into WHERE clause, in the format of "AND foo = bar"
 * @example Working example of adding users to search results:
 <code>
-register_search_handler(array(
+	register_search_handler(array(
-'table' => 'users',
+			'table' => 'users',
-'titlecolumn' => 'username',
+			'titlecolumn' => 'username',
-'uniqueid' => 'ns=User;cid={username}',
+			'uniqueid' => 'ns=User;cid={username}',
-'additionalcolumns' => array('user_id'),
+			'additionalcolumns' => array('user_id'),
-'resultnote' => '[Member]',
+			'resultnote' => '[Member]',
-'linkformat' => array(
+			'linkformat' => array(
-'page_id' => '{username}',
+					'page_id' => '{username}',
-'namespace' => 'User'
+					'namespace' => 'User'
-),
+				),
-'formatcallback' => 'format_user_search_result',
+			'formatcallback' => 'format_user_search_result',
-));
+		));
-function format_user_search_result($row)
+	function format_user_search_result($row)
-{
+	{
-global $session, $lang;
+		global $session, $lang;
-$rankdata = $session->get_user_rank(intval($row['user_id']));
+		$rankdata = $session->get_user_rank(intval($row['user_id']));
-$rankspan = '<span style="' . $rankdata['rank_style'] . '">' . $lang->get($rankdata['rank_title']) . '</span>';
+		$rankspan = '<span style="' . $rankdata['rank_style'] . '">' . $lang->get($rankdata['rank_title']) . '</span>';
-if ( empty($rankdata['user_title']) )
+		if ( empty($rankdata['user_title']) )
-{
+		{
-return $rankspan;
+			return $rankspan;
-}
+		}
-else
+		else
-{
+		{
-return '"' . htmlspecialchars($rankdata['user_title']) . "\" (<b>$rankspan</b>)";
+			return '"' . htmlspecialchars($rankdata['user_title']) . "\" (<b>$rankspan</b>)";
-}
+		}
-}
+	}
 </code>
 * @param array Options array - see function documentation
 * @return null
 */
 global $search_handlers;
 $search_handlers = array();
 function register_search_handler($options)
 {
-global $search_handlers;
+	global $search_handlers;
-$required = array('table', 'titlecolumn', 'uniqueid', 'linkformat');
+	$required = array('table', 'titlecolumn', 'uniqueid', 'linkformat');
-foreach ( $required as $key )
+	foreach ( $required as $key )
-{
+	{
-if ( !isset($options[$key]) )
+		if ( !isset($options[$key]) )
-{
+		{
-throw new Exception("Required search handler option '$key' is missing");
+			throw new Exception("Required search handler option '$key' is missing");
-}
+		}
-}
+	}
-$search_handlers[] = $options;
+	$search_handlers[] = $options;
-return null;
+	return null;
 }
 /**
 * From http://us2.php.net/urldecode - decode %uXXXX
 * @param string The urlencoded string
 * @return string
 */
 function decode_unicode_url($str)
 {
-$res = '';
+	$res = '';
-$i = 0;
+	$i = 0;
-$max = strlen($str) - 6;
+	$max = strlen($str) - 6;
-while ($i <= $max)
+	while ($i <= $max)
-{
+	{
-$character = $str[$i];
+		$character = $str[$i];
-if ($character == '%' && $str[$i + 1] == 'u')
+		if ($character == '%' && $str[$i + 1] == 'u')
-{
+		{
-if ( !preg_match('/^([a-f0-9]{2})+$/', substr($str, $i + 2, 4)) )
+			if ( !preg_match('/^([a-f0-9]{2})+$/', substr($str, $i + 2, 4)) )
-{
+			{
-$res .= substr($str, $i, 6);
+				$res .= substr($str, $i, 6);
-$i += 6;
+				$i += 6;
-continue;
+				continue;
-}
+			}
-$value = hexdec(substr($str, $i + 2, 4));
+			$value = hexdec(substr($str, $i + 2, 4));
-$i += 6;
+			$i += 6;
-if ($value < 0x0080)
+			if ($value < 0x0080)
-{
+			{
-// 1 byte: 0xxxxxxx
+				// 1 byte: 0xxxxxxx
-$character = chr($value);
+				$character = chr($value);
-}
+			}
-else if ($value < 0x0800)
+			else if ($value < 0x0800)
-{
+			{
-// 2 bytes: 110xxxxx 10xxxxxx
+				// 2 bytes: 110xxxxx 10xxxxxx
-$character =
+				$character =
-chr((($value & 0x07c0) >> 6) | 0xc0)
+						chr((($value & 0x07c0) >> 6) | 0xc0)
-. chr(($value & 0x3f) | 0x80);
+					. chr(($value & 0x3f) | 0x80);
-}
+			}
-else
+			else
-{
+			{
-// 3 bytes: 1110xxxx 10xxxxxx 10xxxxxx
+				// 3 bytes: 1110xxxx 10xxxxxx 10xxxxxx
-$character =
+				$character =
-chr((($value & 0xf000) >> 12) | 0xe0)
+						chr((($value & 0xf000) >> 12) | 0xe0)
-. chr((($value & 0x0fc0) >> 6) | 0x80)
+					. chr((($value & 0x0fc0) >> 6) | 0x80)
-. chr(($value & 0x3f) | 0x80);
+					. chr(($value & 0x3f) | 0x80);
-}
+			}
-}
+		}
-else
+		else
-{
+		{
-$i++;
+			$i++;
-}
+		}
-$res .= $character;
+		$res .= $character;
-}
+	}
-return $res . substr($str, $i);
+	return $res . substr($str, $i);
 }
 /**
 * Recursively decodes an array with UTF-8 characters in its strings
 * @param array Can be multi-depth
 * @return array
 */
 function decode_unicode_array($array)
 {
-foreach ( $array as $i => $val )
+	foreach ( $array as $i => $val )
-{
+	{
-if ( is_string($val) )
+		if ( is_string($val) )
-{
+		{
-$array[$i] = decode_unicode_url($val);
+			$array[$i] = decode_unicode_url($val);
-}
+		}
-else if ( is_array($val) )
+		else if ( is_array($val) )
-{
+		{
-$array[$i] = decode_unicode_array($val);
+			$array[$i] = decode_unicode_array($val);
-}
+		}
-}
+	}
-return $array;
+	return $array;
 }
 /**
 * Sanitizes a page tag.
 * @param string
 * @return string
 */
 function sanitize_tag($tag)
 {
-$tag = strtolower($tag);
+	$tag = strtolower($tag);
-$tag = preg_replace('/[^\w @\$%\^&-]+/', '', $tag);
+	$tag = preg_replace('/[^\w @\$%\^&-]+/', '', $tag);
-$tag = str_replace('_', ' ', $tag);
+	$tag = str_replace('_', ' ', $tag);
-$tag = trim($tag);
+	$tag = trim($tag);
-return $tag;
+	return $tag;
 }
 /**
 * Replacement for gzencode() which doesn't always work.
 * @param string Data to compress
 * @return string Compressed data
 */
 function enano_gzencode($data = "", $level = 6, $filename = "", $comments = "")
 {
-$flags = (empty($comment)? 0 : 16) + (empty($filename)? 0 : 8);
+	$flags = (empty($comment)? 0 : 16) + (empty($filename)? 0 : 8);
-$mtime = time();
+	$mtime = time();
-if ( !function_exists('gzdeflate') )
+	if ( !function_exists('gzdeflate') )
-return false;
+		return false;
-return (pack("C1C1C1C1VC1C1", 0x1f, 0x8b, 8, $flags, $mtime, 2, 0xFF) .
+	return (pack("C1C1C1C1VC1C1", 0x1f, 0x8b, 8, $flags, $mtime, 2, 0xFF) .
-(empty($filename) ? "" : $filename . "\0") .
+					(empty($filename) ? "" : $filename . "\0") .
-(empty($comment) ? "" : $comment . "\0") .
+					(empty($comment) ? "" : $comment . "\0") .
-gzdeflate($data, $level) .
+					gzdeflate($data, $level) .
-pack("VV", crc32($data), strlen($data)));
+					pack("VV", crc32($data), strlen($data)));
 }
 $php_errors = array();
 /**
 * @access private
 */
 function enano_handle_error($errno, $errstr, $errfile, $errline)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$er = error_reporting();
+	$er = error_reporting();
-if ( ! $er & $errno || $er == 0 )
+	if ( ! $er & $errno || $er == 0 )
-{
+	{
-return true;
+		return true;
-}
+	}
-global $do_gzip, $php_errors;
+	global $do_gzip, $php_errors;
-if ( defined('ENANO_DEBUG') )
+	if ( defined('ENANO_DEBUG') )
-{
+	{
-// turn off gzip and echo out error immediately for debug installs
+		// turn off gzip and echo out error immediately for debug installs
-$do_gzip = false;
+		$do_gzip = false;
-}
+	}
-$error_type = 'error';
+	$error_type = 'error';
-if ( in_array($errno, array(E_WARNING, E_USER_WARNING)) )
+	if ( in_array($errno, array(E_WARNING, E_USER_WARNING)) )
-$error_type = 'warning';
+		$error_type = 'warning';
-else if ( in_array($errno, array(E_NOTICE, E_USER_NOTICE)) )
+	else if ( in_array($errno, array(E_NOTICE, E_USER_NOTICE)) )
-$error_type = 'notice';
+		$error_type = 'notice';
-if ( @is_object(@$plugins) )
+	if ( @is_object(@$plugins) )
-{
+	{
-$code = $plugins->setHook('php_error');
+		$code = $plugins->setHook('php_error');
-foreach ( $code as $cmd )
+		foreach ( $code as $cmd )
-{
+		{
-eval($cmd);
+			eval($cmd);
-}
+		}
-}
+	}
-// bypass errors in date() and mktime() (Enano has its own code for this anyway)
+	// bypass errors in date() and mktime() (Enano has its own code for this anyway)
-if ( strstr($errstr, "It is not safe to rely on the system's timezone settings. Please use the date.timezone setting, the TZ environment variable or the date_default_timezone_set() function. In case you used any of those methods and you are still getting this warning, you most likely misspelled the timezone identifier.") )
+	if ( strstr($errstr, "It is not safe to rely on the system's timezone settings. Please use the date.timezone setting, the TZ environment variable or the date_default_timezone_set() function. In case you used any of those methods and you are still getting this warning, you most likely misspelled the timezone identifier.") )
-{
+	{
-return true;
+		return true;
-}
+	}
-if ( $do_gzip )
+	if ( $do_gzip )
-{
+	{
-$php_errors[] = array(
+		$php_errors[] = array(
-'num' => $errno,
+				'num' => $errno,
-'type' => $error_type,
+				'type' => $error_type,
-'error' => $errstr,
+				'error' => $errstr,
-'file' => $errfile,
+				'file' => $errfile,
-'line' => $errline
+				'line' => $errline
-);
+			);
-}
+	}
-else
+	else
-{
+	{
-echo "[ <b>PHP $error_type:</b> $errstr in <b>$errfile</b>:<b>$errline</b> ]<br />";
+		echo "[ <b>PHP $error_type:</b> $errstr in <b>$errfile</b>:<b>$errline</b> ]<br />";
-}
+	}
 }
 set_error_handler('enano_handle_error');
 /**
 * Gzips the output buffer.
 */
 function gzip_output()
 {
-global $do_gzip;
+	global $do_gzip;
-$gzip_supported = false;
+	$gzip_supported = false;
-if ( isset($_SERVER['HTTP_ACCEPT_ENCODING']) )
+	if ( isset($_SERVER['HTTP_ACCEPT_ENCODING']) )
-{
+	{
-$encodings = explode(',', $_SERVER['HTTP_ACCEPT_ENCODING']);
+		$encodings = explode(',', $_SERVER['HTTP_ACCEPT_ENCODING']);
-$gzip_supported = in_array('gzip', $encodings) || in_array('deflate', $encodings);
+		$gzip_supported = in_array('gzip', $encodings) || in_array('deflate', $encodings);
-}
+	}
-//
+	//
-// Compress buffered output if required and send to browser
+	// Compress buffered output if required and send to browser
-// Sorry, doesn't work in IE. What else is new?
+	// Sorry, doesn't work in IE. What else is new?
-//
+	//
-if ( $do_gzip && getConfig('gzip_output', false) == 1 && function_exists('gzdeflate') && !strstr($_SERVER['HTTP_USER_AGENT'], 'MSIE') && !headers_sent() && $gzip_supported )
+	if ( $do_gzip && getConfig('gzip_output', false) == 1 && function_exists('gzdeflate') && !strstr($_SERVER['HTTP_USER_AGENT'], 'MSIE') && !headers_sent() && $gzip_supported )
-{
+	{
-$gzip_contents = ob_get_contents();
+		$gzip_contents = ob_get_contents();
-ob_end_clean();
+		ob_end_clean();
-global $php_errors;
+		global $php_errors;
-if ( !empty($php_errors) )
+		if ( !empty($php_errors) )
-{
+		{
-$errors = '';
+			$errors = '';
-foreach ( $php_errors as $error )
+			foreach ( $php_errors as $error )
-{
+			{
-$errors .= "[ <b>PHP {$error['type']}:</b> {$error['error']} in <b>{$error['file']}</b>:<b>{$error['line']}</b> ]<br />";
+				$errors .= "[ <b>PHP {$error['type']}:</b> {$error['error']} in <b>{$error['file']}</b>:<b>{$error['line']}</b> ]<br />";
-}
+			}
-$gzip_contents = str_replace("</body>", "$errors</body>", $gzip_contents);
+			$gzip_contents = str_replace("</body>", "$errors</body>", $gzip_contents);
-}
+		}
-$return = @enano_gzencode($gzip_contents);
+		$return = @enano_gzencode($gzip_contents);
-if ( $return )
+		if ( $return )
-{
+		{
-header('Content-encoding: gzip');
+			header('Content-encoding: gzip');
-echo $return;
+			echo $return;
-}
+		}
-else
+		else
-{
+		{
-echo $gzip_contents;
+			echo $gzip_contents;
-}
+		}
-}
+	}
 }
 /**
 * Aggressively and hopefully non-destructively optimizes a blob of HTML.
 * @param string HTML to process
 * @return string much smaller HTML
 */
 function aggressive_optimize_html($html)
 {
-$size_before = strlen($html);
+	$size_before = strlen($html);
-// kill carriage returns
+	// kill carriage returns
-$html = str_replace("\r", "", $html);
+	$html = str_replace("\r", "", $html);
-// Which tags to strip for JAVASCRIPT PROCESSING ONLY - you can change this if needed
+	// Which tags to strip for JAVASCRIPT PROCESSING ONLY - you can change this if needed
-$strip_tags = Array('enano:no-opt');
+	$strip_tags = Array('enano:no-opt');
-$strip_tags = implode('|', $strip_tags);
+	$strip_tags = implode('|', $strip_tags);
-// Strip out the tags and replace with placeholders
+	// Strip out the tags and replace with placeholders
-preg_match_all("#<($strip_tags)([ ]+.*?)?>(.*?)</($strip_tags)>#is", $html, $matches);
+	preg_match_all("#<($strip_tags)([ ]+.*?)?>(.*?)</($strip_tags)>#is", $html, $matches);
-$seed = md5(microtime() . mt_rand()); // Random value used for placeholders
+	$seed = md5(microtime() . mt_rand()); // Random value used for placeholders
-for ($i = 0;$i < sizeof($matches[1]); $i++)
+	for ($i = 0;$i < sizeof($matches[1]); $i++)
-{
+	{
-$html = str_replace($matches[0][$i], "{DONT_STRIP_ME_NAKED:$seed:$i}", $html);
+		$html = str_replace($matches[0][$i], "{DONT_STRIP_ME_NAKED:$seed:$i}", $html);
-}
+	}
-// Optimize (but don't obfuscate) Javascript
+	// Optimize (but don't obfuscate) Javascript
-preg_match_all('/<script([ ]+.*?)?>(.*?)(\]\]>)?<\/script>/is', $html, $jscript);
+	preg_match_all('/<script([ ]+.*?)?>(.*?)(\]\]>)?<\/script>/is', $html, $jscript);
-require_once(ENANO_ROOT . '/includes/js-compressor.php');
+	require_once(ENANO_ROOT . '/includes/js-compressor.php');
-$jsc = new JavascriptCompressor();
+	$jsc = new JavascriptCompressor();
-// list of Javascript reserved words - from about.com
+	// list of Javascript reserved words - from about.com
-$reserved_words = array('abstract', 'as', 'boolean', 'break', 'byte', 'case', 'catch', 'char', 'class', 'continue', 'const', 'debugger', 'default', 'delete', 'do',
+	$reserved_words = array('abstract', 'as', 'boolean', 'break', 'byte', 'case', 'catch', 'char', 'class', 'continue', 'const', 'debugger', 'default', 'delete', 'do',
-'double', 'else', 'enum', 'export', 'extends', 'false', 'final', 'finally', 'float', 'for', 'function', 'goto', 'if', 'implements', 'import',
+													'double', 'else', 'enum', 'export', 'extends', 'false', 'final', 'finally', 'float', 'for', 'function', 'goto', 'if', 'implements', 'import',
-'in', 'instanceof', 'int', 'interface', 'is', 'long', 'namespace', 'native', 'new', 'null', 'package', 'private', 'protected', 'public',
+													'in', 'instanceof', 'int', 'interface', 'is', 'long', 'namespace', 'native', 'new', 'null', 'package', 'private', 'protected', 'public',
-'return', 'short', 'static', 'super', 'switch', 'synchronized', 'this', 'throw', 'throws', 'transient', 'true', 'try', 'typeof', 'use', 'var',
+													'return', 'short', 'static', 'super', 'switch', 'synchronized', 'this', 'throw', 'throws', 'transient', 'true', 'try', 'typeof', 'use', 'var',
-'void', 'volatile', 'while', 'with');
+													'void', 'volatile', 'while', 'with');
-$reserved_words = '(' . implode('|', $reserved_words) . ')';
+	$reserved_words = '(' . implode('|', $reserved_words) . ')';
-for ( $i = 0; $i < count($jscript[0]); $i++ )
+	for ( $i = 0; $i < count($jscript[0]); $i++ )
-{
+	{
-$js =& $jscript[2][$i];
+		$js =& $jscript[2][$i];
-if ( empty($js) )
+		if ( empty($js) )
-continue;
+			continue;
-$js = $jsc->getClean($js);
+		$js = $jsc->getClean($js);
-$replacement = "<script{$jscript[1][$i]}>/* <![CDATA[ */ $js /* ]]> */</script>";
+		$replacement = "<script{$jscript[1][$i]}>/* <![CDATA[ */ $js /* ]]> */</script>";
-// apply changes
+		// apply changes
-$html = str_replace($jscript[0][$i], $replacement, $html);
+		$html = str_replace($jscript[0][$i], $replacement, $html);
-}
+	}
-// Re-insert untouchable tags
+	// Re-insert untouchable tags
-for ($i = 0;$i < sizeof($matches[1]); $i++)
+	for ($i = 0;$i < sizeof($matches[1]); $i++)
-{
+	{
-$html = str_replace("{DONT_STRIP_ME_NAKED:$seed:$i}", "<{$matches[1][$i]}{$matches[2][$i]}>{$matches[3][$i]}</{$matches[4][$i]}>", $html);
+		$html = str_replace("{DONT_STRIP_ME_NAKED:$seed:$i}", "<{$matches[1][$i]}{$matches[2][$i]}>{$matches[3][$i]}</{$matches[4][$i]}>", $html);
-}
+	}
-// Which tags to strip - you can change this if needed
+	// Which tags to strip - you can change this if needed
-$strip_tags = Array('pre', 'script', 'style', 'enano:no-opt', 'textarea');
+	$strip_tags = Array('pre', 'script', 'style', 'enano:no-opt', 'textarea');
-$strip_tags = implode('|', $strip_tags);
+	$strip_tags = implode('|', $strip_tags);
-// Strip out the tags and replace with placeholders
+	// Strip out the tags and replace with placeholders
-preg_match_all("#<($strip_tags)(.*?)>(.*?)</($strip_tags)>#is", $html, $matches);
+	preg_match_all("#<($strip_tags)(.*?)>(.*?)</($strip_tags)>#is", $html, $matches);
-$seed = md5(microtime() . mt_rand()); // Random value used for placeholders
+	$seed = md5(microtime() . mt_rand()); // Random value used for placeholders
-for ($i = 0;$i < sizeof($matches[1]); $i++)
+	for ($i = 0;$i < sizeof($matches[1]); $i++)
-{
+	{
-$html = str_replace($matches[0][$i], "{DONT_STRIP_ME_NAKED:$seed:$i}", $html);
+		$html = str_replace($matches[0][$i], "{DONT_STRIP_ME_NAKED:$seed:$i}", $html);
-}
+	}
-// Finally, process the HTML
+	// Finally, process the HTML
-$html = preg_replace("#\n([ ]*)#", " ", $html);
+	$html = preg_replace("#\n([ ]*)#", " ", $html);
-// Remove annoying spaces between tags
+	// Remove annoying spaces between tags
-$html = preg_replace("#>([ ][ ]+)<#", "> <", $html);
+	$html = preg_replace("#>([ ][ ]+)<#", "> <", $html);
-// Re-insert untouchable tags
+	// Re-insert untouchable tags
-for ($i = 0;$i < sizeof($matches[1]); $i++)
+	for ($i = 0;$i < sizeof($matches[1]); $i++)
-{
+	{
-$html = str_replace("{DONT_STRIP_ME_NAKED:$seed:$i}", "<{$matches[1][$i]}{$matches[2][$i]}>{$matches[3][$i]}</{$matches[4][$i]}>", $html);
+		$html = str_replace("{DONT_STRIP_ME_NAKED:$seed:$i}", "<{$matches[1][$i]}{$matches[2][$i]}>{$matches[3][$i]}</{$matches[4][$i]}>", $html);
-}
+	}
-// Remove <enano:no-opt> blocks (can be used by themes that don't want their HTML optimized)
+	// Remove <enano:no-opt> blocks (can be used by themes that don't want their HTML optimized)
-$html = preg_replace('#<(\/|)enano:no-opt(.*?)>#', '', $html);
+	$html = preg_replace('#<(\/|)enano:no-opt(.*?)>#', '', $html);
-$size_after = strlen($html);
+	$size_after = strlen($html);
-// Tell snoopish users what's going on
+	// Tell snoopish users what's going on
-$html = str_replace('<html', "\n".'<!-- NOTE: Enano has performed an HTML optimization routine on the HTML you see here. This is to enhance page loading speeds.
+	$html = str_replace('<html', "\n".'<!-- NOTE: Enano has performed an HTML optimization routine on the HTML you see here. This is to enhance page loading speeds.
-To view the uncompressed source of this page, add the "nocompress" parameter to the URI of this page: index.php?title=Main_Page&nocompress or Main_Page?nocompress'."
+		To view the uncompressed source of this page, add the "nocompress" parameter to the URI of this page: index.php?title=Main_Page&nocompress or Main_Page?nocompress'."
-Size before compression: $size_before bytes
+		Size before compression: $size_before bytes
-Size after compression:  $size_after bytes
+		Size after compression:  $size_after bytes
--->\n<html", $html);
+		-->\n<html", $html);
-return $html;
+	return $html;
 }
 /**
 * For an input range of numbers (like 25-256) returns an array filled with all numbers in the range, inclusive.
 * @param string
 * @return array
 */
 function int_range($range)
 {
-if ( strval(intval($range)) == $range )
+	if ( strval(intval($range)) == $range )
-return $range;
+		return $range;
-if ( !preg_match('/^[0-9]+(-[0-9]+)?$/', $range) )
+	if ( !preg_match('/^[0-9]+(-[0-9]+)?$/', $range) )
-return false;
+		return false;
-$ends = explode('-', $range);
+	$ends = explode('-', $range);
-if ( count($ends) != 2 )
+	if ( count($ends) != 2 )
-return $range;
+		return $range;
-$ret = array();
+	$ret = array();
-if ( $ends[1] < $ends[0] )
+	if ( $ends[1] < $ends[0] )
-$ends = array($ends[1], $ends[0]);
+		$ends = array($ends[1], $ends[0]);
-else if ( $ends[0] == $ends[1] )
+	else if ( $ends[0] == $ends[1] )
-return array($ends[0]);
+		return array($ends[0]);
-for ( $i = $ends[0]; $i <= $ends[1]; $i++ )
+	for ( $i = $ends[0]; $i <= $ends[1]; $i++ )
-{
+	{
-$ret[] = $i;
+		$ret[] = $i;
-}
+	}
-return $ret;
+	return $ret;
 }
 /**
 * Parses a range or series of IP addresses, and returns the raw addresses. Only parses ranges in the last two octets to prevent DOSing.
 * Syntax for ranges: x.x.x.x; x|y.x.x.x; x.x.x-z.x; x.x.x-z|p.q|y
 * @return array
 */
 function parse_ip_range($range)
 {
-$octets = explode('.', $range);
+	$octets = explode('.', $range);
-if ( count($octets) != 4 )
+	if ( count($octets) != 4 )
-// invalid range
+		// invalid range
-return $range;
+		return $range;
-$i = 0;
+	$i = 0;
-$possibilities = array( 0 => array(), 1 => array(), 2 => array(), 3 => array() );
+	$possibilities = array( 0 => array(), 1 => array(), 2 => array(), 3 => array() );
-foreach ( $octets as $octet )
+	foreach ( $octets as $octet )
-{
+	{
-$existing =& $possibilities[$i];
+		$existing =& $possibilities[$i];
-$inner = explode('|', $octet);
+		$inner = explode('|', $octet);
-foreach ( $inner as $bit )
+		foreach ( $inner as $bit )
-{
+		{
-if ( $i >= 2 )
+			if ( $i >= 2 )
-{
+			{
-$bits = int_range($bit);
+				$bits = int_range($bit);
-if ( $bits === false )
+				if ( $bits === false )
-return false;
+					return false;
-else if ( !is_array($bits) )
+				else if ( !is_array($bits) )
-$existing[] = intval($bits);
+					$existing[] = intval($bits);
-else
+				else
-$existing = array_merge($existing, $bits);
+					$existing = array_merge($existing, $bits);
-}
+			}
-else
+			else
-{
+			{
-$bit = intval($bit);
+				$bit = intval($bit);
-$existing[] = $bit;
+				$existing[] = $bit;
-}
+			}
-}
+		}
-$existing = array_unique($existing);
+		$existing = array_unique($existing);
-$i++;
+		$i++;
-}
+	}
-$ips = array();
+	$ips = array();
-// The only way to combine all those possibilities. ;-)
+	// The only way to combine all those possibilities. ;-)
-foreach ( $possibilities[0] as $oc1 )
+	foreach ( $possibilities[0] as $oc1 )
-foreach ( $possibilities[1] as $oc2 )
+		foreach ( $possibilities[1] as $oc2 )
-foreach ( $possibilities[2] as $oc3 )
+			foreach ( $possibilities[2] as $oc3 )
-foreach ( $possibilities[3] as $oc4 )
+				foreach ( $possibilities[3] as $oc4 )
-$ips[] = "$oc1.$oc2.$oc3.$oc4";
+					$ips[] = "$oc1.$oc2.$oc3.$oc4";
-return $ips;
+	return $ips;
 }
 /**
 * Parses a valid IP address range into a regular expression.
 * @param string IP range string
 * @return string
 */
 function parse_ip_range_regex($range)
 {
-if ( strstr($range, ':') )
+	if ( strstr($range, ':') )
-{
+	{
-return parse_ipv6_range_regex($range);
+		return parse_ipv6_range_regex($range);
-}
+	}
-else
+	else
-{
+	{
-return parse_ipv4_range_regex($range);
+		return parse_ipv4_range_regex($range);
-}
+	}
 }
 /**
 * Parses a valid IPv4 address range into a regular expression.
 * @param string IP range string
 * @return string
 */
 function parse_ipv4_range_regex($range)
 {
-// Regular expression to test the range string for validity
+	// Regular expression to test the range string for validity
-$regex = '/^(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
+	$regex = '/^(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
-. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
+					. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
-. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
+					. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)\.'
-. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)$/';
+					. '(([0-9]+(-[0-9]+)?)(\|([0-9]+(-[0-9]+)?))*)$/';
-if ( !preg_match($regex, $range) )
+	if ( !preg_match($regex, $range) )
-{
+	{
-return false;
+		return false;
-}
+	}
-$octets = array(0 => array(), 1 => array(), 2 => array(), 3 => array());
+	$octets = array(0 => array(), 1 => array(), 2 => array(), 3 => array());
-list($octets[0], $octets[1], $octets[2], $octets[3]) = explode('.', $range);
+	list($octets[0], $octets[1], $octets[2], $octets[3]) = explode('.', $range);
-$return = '^';
+	$return = '^';
-foreach ( $octets as $octet )
+	foreach ( $octets as $octet )
-{
+	{
-// alternatives array
+		// alternatives array
-$alts = array();
+		$alts = array();
-if ( strpos($octet, '|') )
+		if ( strpos($octet, '|') )
-{
+		{
-$particles = explode('|', $octet);
+			$particles = explode('|', $octet);
-}
+		}
-else
+		else
-{
+		{
-$particles = array($octet);
+			$particles = array($octet);
-}
+		}
-foreach ( $particles as $atom )
+		foreach ( $particles as $atom )
-{
+		{
-// each $atom will be either
+			// each $atom will be either
-if ( strval(intval($atom)) == $atom )
+			if ( strval(intval($atom)) == $atom )
-{
+			{
-$alts[] = $atom;
+				$alts[] = $atom;
-continue;
+				continue;
-}
+			}
-else
+			else
-{
+			{
-// it's a range - parse it out
+				// it's a range - parse it out
-$alt2 = int_range($atom);
+				$alt2 = int_range($atom);
-if ( !$alt2 )
+				if ( !$alt2 )
-return false;
+					return false;
-foreach ( $alt2 as $neutrino )
+				foreach ( $alt2 as $neutrino )
-$alts[] = $neutrino;
+					$alts[] = $neutrino;
-}
+			}
-}
+		}
-$alts = array_unique($alts);
+		$alts = array_unique($alts);
-$alts = '|' . implode('|', $alts) . '|';
+		$alts = '|' . implode('|', $alts) . '|';
-// we can further optimize/compress this by weaseling our way into using some character ranges
+		// we can further optimize/compress this by weaseling our way into using some character ranges
-for ( $i = 1; $i <= 25; $i++ )
+		for ( $i = 1; $i <= 25; $i++ )
-{
+		{
-$alts = str_replace("|{$i}0|{$i}1|{$i}2|{$i}3|{$i}4|{$i}5|{$i}6|{$i}7|{$i}8|{$i}9|", "|{$i}[0-9]|", $alts);
+			$alts = str_replace("|{$i}0|{$i}1|{$i}2|{$i}3|{$i}4|{$i}5|{$i}6|{$i}7|{$i}8|{$i}9|", "|{$i}[0-9]|", $alts);
-}
+		}
-$alts = str_replace("|1|2|3|4|5|6|7|8|9|", "|[1-9]|", $alts);
+		$alts = str_replace("|1|2|3|4|5|6|7|8|9|", "|[1-9]|", $alts);
-$alts = '(' . substr($alts, 1, -1) . ')';
+		$alts = '(' . substr($alts, 1, -1) . ')';
-$return .= $alts . '\.';
+		$return .= $alts . '\.';
-}
+	}
-$return = substr($return, 0, -2);
+	$return = substr($return, 0, -2);
-$return .= '$';
+	$return .= '$';
-return $return;
+	return $return;
 }
 /**
 * Parses a valid IPv6 address range into a regular expression.
 * @param string IP range string
 * @return string
 */
 function parse_ipv6_range_regex($range)
 {
-$range = strtolower(trim($range));
+	$range = strtolower(trim($range));
-$valid = '/^';
+	$valid = '/^';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}):';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}):';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}):';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}):';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4}:|:)?';
-$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4})$/';
+	$valid .= '(?:[0-9a-f]{0,4}|[0-9a-f]{1,4}-[0-9a-f]{1,4})$/';
-if ( !preg_match($valid, $range) )
+	if ( !preg_match($valid, $range) )
-return false;
+		return false;
-// expand address range.
+	// expand address range.
-// this takes short ranges like:
+	// this takes short ranges like:
-//   2001:470-471:054-b02b::5-bb
+	//   2001:470-471:054-b02b::5-bb
-// up to:
+	// up to:
-//   2001:0470-0471:0054-b02b:0000:0000:0000:0005-00bb
+	//   2001:0470-0471:0054-b02b:0000:0000:0000:0005-00bb
-$range = preg_replace('/^:/', '0000:', $range);
+	$range = preg_replace('/^:/', '0000:', $range);
-$range = explode(':', $range);
+	$range = explode(':', $range);
-$expanded = '';
+	$expanded = '';
-$size = count($range);
+	$size = count($range);
-foreach ( $range as $byteset )
+	foreach ( $range as $byteset )
-{
+	{
-if ( empty($byteset) )
+		if ( empty($byteset) )
-{
+		{
-// ::
+			// ::
-while ( $size < 9 )
+			while ( $size < 9 )
-{
+			{
-$expanded .= '0000:';
+				$expanded .= '0000:';
-$size++;
+				$size++;
-}
+			}
-}
+		}
-else
+		else
-{
+		{
-if ( strstr($byteset, '-') )
+			if ( strstr($byteset, '-') )
-{
+			{
-// this is a range
+				// this is a range
-$sides = explode('-', $byteset);
+				$sides = explode('-', $byteset);
-foreach ( $sides as &$bytepair )
+				foreach ( $sides as &$bytepair )
-{
+				{
-while ( strlen($bytepair) < 4 )
+					while ( strlen($bytepair) < 4 )
-{
+					{
-$bytepair = "0$bytepair";
+						$bytepair = "0$bytepair";
-}
+					}
-}
+				}
-$byteset = implode('-', $sides);
+				$byteset = implode('-', $sides);
-}
+			}
-else
+			else
-{
+			{
-while ( strlen($byteset) < 4 )
+				while ( strlen($byteset) < 4 )
-{
+				{
-$byteset = "0$byteset";
+					$byteset = "0$byteset";
-}
+				}
-}
+			}
-$expanded .= "$byteset:";
+			$expanded .= "$byteset:";
-}
+		}
-}
+	}
-$expanded = explode(':', rtrim($expanded, ':'));
+	$expanded = explode(':', rtrim($expanded, ':'));
-// ready to dive in and start generating range regexes.
+	// ready to dive in and start generating range regexes.
-// this has to be pretty optimized... we want to end up with regexes like:
+	// this has to be pretty optimized... we want to end up with regexes like:
-// range: 54-b12b
+	// range: 54-b12b
-/*
+	/*
-/005[4-9a-f]|
+	/005[4-9a-f]|
-00[6-9a-f][0-9a-f]|
+	00[6-9a-f][0-9a-f]|
-0[1-9a-f][0-9a-f][0-9a-f]|
+	0[1-9a-f][0-9a-f][0-9a-f]|
-[1-9a][0-9a-f][0-9a-f][0-9a-f]|
+	[1-9a][0-9a-f][0-9a-f][0-9a-f]|
-b[0-0][0-1][0-9a-f]|
+	b[0-0][0-1][0-9a-f]|
-b0[0-1][0-9a-f]|
+	b0[0-1][0-9a-f]|
-b02[0-9a-b]/x
+	b02[0-9a-b]/x
-*/
+	*/
-foreach ( $expanded as &$word )
+	foreach ( $expanded as &$word )
-{
+	{
-if ( strstr($word, '-') )
+		if ( strstr($word, '-') )
-{
+		{
-// oh... damn.
+			// oh... damn.
-$word = '(?:' . generate_hex_numeral_range($word) . ')';
+			$word = '(?:' . generate_hex_numeral_range($word) . ')';
-}
+		}
-}
+	}
-// return print_r($expanded, true);
+	// return print_r($expanded, true);
-return '^' . implode(':', $expanded) . '$';
+	return '^' . implode(':', $expanded) . '$';
 }
 /**
 * Take a hex numeral range and parse it in to a PCRE.
 * @param string
 * @access private
 */
 function generate_hex_numeral_range($word)
 {
-list($low, $high) = explode('-', $word);
+	list($low, $high) = explode('-', $word);
-if ( hexdec($low) > hexdec($high) )
+	if ( hexdec($low) > hexdec($high) )
-{
+	{
-$_ = $low;
+		$_ = $low;
-$low = $high;
+		$low = $high;
-$high = $_;
+		$high = $_;
-unset($_);
+		unset($_);
-}
+	}
-while ( strlen($low) < strlen($high) )
+	while ( strlen($low) < strlen($high) )
-{
+	{
-$low = "0$low";
+		$low = "0$low";
-}
+	}
-// trim off everything that's the same
+	// trim off everything that's the same
-$trimmed = '';
+	$trimmed = '';
-$len = strlen($low);
+	$len = strlen($low);
-for ( $i = 0; $i < $len; $i++ )
+	for ( $i = 0; $i < $len; $i++ )
-{
+	{
-if ( $low{0} === $high{0} )
+		if ( $low{0} === $high{0} )
-{
+		{
-$trimmed .= $low{0};
+			$trimmed .= $low{0};
-$low = substr($low, 1);
+			$low = substr($low, 1);
-$high = substr($high, 1);
+			$high = substr($high, 1);
-}
+		}
-else
+		else
-{
+		{
-break;
+			break;
-}
+		}
-}
+	}
-$len = strlen($high);
+	$len = strlen($high);
-if ( $len == 1 )
+	if ( $len == 1 )
-{
+	{
-// this does happen sometimes, so we can save a bit of CPU power here.
+		// this does happen sometimes, so we can save a bit of CPU power here.
-return $trimmed . __hexdigitrange($low, $high);
+		return $trimmed . __hexdigitrange($low, $high);
-}
+	}
-$return = '';
+	$return = '';
-// lower half
+	// lower half
-for ( $i = $len - 1; $i > 0; $i-- )
+	for ( $i = $len - 1; $i > 0; $i-- )
-{
+	{
-if ( $low{$i} == 'f' )
+		if ( $low{$i} == 'f' )
-continue;
+			continue;
-$return .= $trimmed;
+		$return .= $trimmed;
-for ( $j = 0; $j < $len; $j++ )
+		for ( $j = 0; $j < $len; $j++ )
-{
+		{
-if ( $j < $i )
+			if ( $j < $i )
-{
+			{
-$return .= $low{$j};
+				$return .= $low{$j};
-}
+			}
-else if ( $j == $i && ( $i == $len - 1 || $low{$j} == 'f' ) )
+			else if ( $j == $i && ( $i == $len - 1 || $low{$j} == 'f' ) )
-{
+			{
-$return .= __hexdigitrange($low{$j}, 'f');
+				$return .= __hexdigitrange($low{$j}, 'f');
-}
+			}
-else if ( $j == $i && $i != $len - 1 )
+			else if ( $j == $i && $i != $len - 1 )
-{
+			{
-$return .= __hexdigitrange(dechex(hexdec($low{$j}) + 1), 'f');
+				$return .= __hexdigitrange(dechex(hexdec($low{$j}) + 1), 'f');
-}
+			}
-else
+			else
-{
+			{
-$return .= __hexdigitrange('0', 'f');
+				$return .= __hexdigitrange('0', 'f');
-}
+			}
-}
+		}
-$return .= '|';
+		$return .= '|';
-}
+	}
-// middle block
+	// middle block
-if ( hexdec($low{0}) + 1 < hexdec($high{0}) )
+	if ( hexdec($low{0}) + 1 < hexdec($high{0}) )
-{
+	{
-if ( hexdec($low{0}) + 1 < hexdec($high{0}) - 1 )
+		if ( hexdec($low{0}) + 1 < hexdec($high{0}) - 1 )
-$return .= $trimmed . __hexdigitrange(dechex(hexdec($low{0}) + 1), dechex(hexdec($high{0}) - 1));
+			$return .= $trimmed . __hexdigitrange(dechex(hexdec($low{0}) + 1), dechex(hexdec($high{0}) - 1));
-else
+		else
-$return .= $trimmed . __hexdigitrange($low{0}, $high{0});
+			$return .= $trimmed . __hexdigitrange($low{0}, $high{0});
-if ( $len - 1 > 0 )
+		if ( $len - 1 > 0 )
-$return .= '[0-9a-f]{' . ( $len - 1 ) . '}|';
+			$return .= '[0-9a-f]{' . ( $len - 1 ) . '}|';
-}
+	}
-// higher half
+	// higher half
-for ( $i = 1; $i < $len; $i++ )
+	for ( $i = 1; $i < $len; $i++ )
-{
+	{
-if ( $high{$i} == '0' )
+		if ( $high{$i} == '0' )
-continue;
+			continue;
-$return .= $trimmed;
+		$return .= $trimmed;
-for ( $j = 0; $j < $len; $j++ )
+		for ( $j = 0; $j < $len; $j++ )
-{
+		{
-if ( $j < $i )
+			if ( $j < $i )
-{
+			{
-$return .= $high{$j};
+				$return .= $high{$j};
-}
+			}
-else if ( $j == $i && ( $i == $len - 1 || $high{$j} == '0' ) )
+			else if ( $j == $i && ( $i == $len - 1 || $high{$j} == '0' ) )
-{
+			{
-$return .= __hexdigitrange('0', $high{$j});
+				$return .= __hexdigitrange('0', $high{$j});
-}
+			}
-else if ( $j == $i && $i != $len - 1 )
+			else if ( $j == $i && $i != $len - 1 )
-{
+			{
-$return .= __hexdigitrange('0', dechex(hexdec($high{$j}) - 1));
+				$return .= __hexdigitrange('0', dechex(hexdec($high{$j}) - 1));
-}
+			}
-else if ( $j > $i )
+			else if ( $j > $i )
-{
+			{
-$return .= __hexdigitrange('0', 'f');
+				$return .= __hexdigitrange('0', 'f');
-}
+			}
-else
+			else
-{
+			{
-die("I don't know what to do! i $i j $j");
+				die("I don't know what to do! i $i j $j");
-}
+			}
-}
+		}
-$return .= '|';
+		$return .= '|';
-}
+	}
-return rtrim($return, '|');
+	return rtrim($return, '|');
 }
 function __hexdigitrange($low, $high)
 {
-if ( $low == $high )
+	if ( $low == $high )
-return $low;
+		return $low;
-if ( empty($low) )
+	if ( empty($low) )
-$low = '0';
+		$low = '0';
-$low_type = ( preg_match('/[0-9]/', $low) ) ? 'num' : 'alph';
+	$low_type = ( preg_match('/[0-9]/', $low) ) ? 'num' : 'alph';
-$high_type = ( preg_match('/[0-9]/', $high) ) ? 'num' : 'alph';
+	$high_type = ( preg_match('/[0-9]/', $high) ) ? 'num' : 'alph';
-if ( ( $low_type == 'num' && $high_type == 'num') || ( $low_type == 'alph' && $high_type == 'alph' ) )
+	if ( ( $low_type == 'num' && $high_type == 'num') || ( $low_type == 'alph' && $high_type == 'alph' ) )
-{
+	{
-return "[$low-$high]";
+		return "[$low-$high]";
-}
+	}
-else if ( $low_type == 'num' && $high_type == 'alph' )
+	else if ( $low_type == 'num' && $high_type == 'alph' )
-{
+	{
-$ret = '[';
+		$ret = '[';
-if ( $low == '9' )
+		if ( $low == '9' )
-$ret .= '9';
+			$ret .= '9';
-else
+		else
-$ret .= "$low-9";
+			$ret .= "$low-9";
-if ( $high == 'a' )
+		if ( $high == 'a' )
-$ret .= 'a';
+			$ret .= 'a';
-else
+		else
-$ret .= "a-$high";
+			$ret .= "a-$high";
-$ret .= "]";
+		$ret .= "]";
-return $ret;
+		return $ret;
-}
+	}
-else if ( $low_type == 'alph' && $high_type == 'num' )
+	else if ( $low_type == 'alph' && $high_type == 'num' )
-{
+	{
-// ???? this should never happen
+		// ???? this should never happen
-return __hexdigitrange($high, $low);
+		return __hexdigitrange($high, $low);
-}
+	}
 }
 /**
 * Expand an IPv6 address to full form
 * @param string ::1, 2001:470:e054::2
 * @return string 0000:0000:0000:0000:0000:0000:0000:0001, 2001:0470:e054:0000:0000:0000:0000:0002
 */
 function expand_ipv6_address($addr)
 {
-$expanded = array();
+	$expanded = array();
-$addr = explode(':', $addr);
+	$addr = explode(':', $addr);
-foreach ( $addr as $i => $bytepair )
+	foreach ( $addr as $i => $bytepair )
-{
+	{
-if ( empty($bytepair) )
+		if ( empty($bytepair) )
-{
+		{
-// ::
+			// ::
-while ( count($expanded) < (8 - count($addr) + $i + 1) )
+			while ( count($expanded) < (8 - count($addr) + $i + 1) )
-{
+			{
-$expanded[] = '0000';
+				$expanded[] = '0000';
-}
+			}
-}
+		}
-else
+		else
-{
+		{
-while ( strlen($bytepair) < 4 )
+			while ( strlen($bytepair) < 4 )
-$bytepair = "0$bytepair";
+				$bytepair = "0$bytepair";
-$expanded[] = $bytepair;
+			$expanded[] = $bytepair;
-}
+		}
-}
+	}
-return implode(':', $expanded);
+	return implode(':', $expanded);
 }
 /**
 * Validates an e-mail address. Uses a compacted version of the regular expression generated by the scripts at <http://examples.oreilly.com/regex/>.
 * @param string E-mail address
 * @return bool
 */
 function check_email_address($email)
 {
-static $regexp = '(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*|(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[^()<>@,;:".\\\[\]\x80-\xff\000-\010\012-\037]*(?:(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[^()<>@,;:".\\\[\]\x80-\xff\000-\010\012-\037]*)*<[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*(?:,[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*)*:[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)?(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*>)';
+	static $regexp = '(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*|(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[^()<>@,;:".\\\[\]\x80-\xff\000-\010\012-\037]*(?:(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[^()<>@,;:".\\\[\]\x80-\xff\000-\010\012-\037]*)*<[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*(?:,[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*)*:[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)?(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|"[^\\\x80-\xff\n\015"]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015"]*)*")[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*@[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:\.[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*(?:[^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff]+(?![^(\040)<>@,;:".\\\[\]\000-\037\x80-\xff])|\[(?:[^\\\x80-\xff\n\015\[\]]|\\[^\x80-\xff])*\])[\040\t]*(?:\([^\\\x80-\xff\n\015()]*(?:(?:\\[^\x80-\xff]|\([^\\\x80-\xff\n\015()]*(?:\\[^\x80-\xff][^\\\x80-\xff\n\015()]*)*\))[^\\\x80-\xff\n\015()]*)*\)[\040\t]*)*)*>)';
-return ( preg_match("/^$regexp$/", $email) ) ? true : false;
+	return ( preg_match("/^$regexp$/", $email) ) ? true : false;
 }
 function password_score_len($password)
 {
-if ( !is_string($password) )
+	if ( !is_string($password) )
-{
+	{
-return -10;
+		return -10;
-}
+	}
-$len = strlen($password);
+	$len = strlen($password);
-$score = $len - 7;
+	$score = $len - 7;
-return $score;
+	return $score;
 }
 /**
 * Give a numerical score for how strong a password is. This is an open-ended scale based on a score added to or subtracted
 * from based on certain complexity rules. Anything less than about 1 or 0 is weak, 3-4 is strong, and 10 is not to be easily cracked.
 * @return int
 */
 function password_score($password, &$debug = false)
 {
-if ( !is_string($password) )
+	if ( !is_string($password) )
-{
+	{
-return -10;
+		return -10;
-}
+	}
-$score = 0;
+	$score = 0;
-$debug = array();
+	$debug = array();
-// length check
+	// length check
-$lenscore = password_score_len($password);
+	$lenscore = password_score_len($password);
-$debug[] = "<b>How this score was calculated</b>\nYour score was tallied up based on an extensive algorithm which outputted\nthe following scores based on traits of your password. Above you can see the\ncomposite score; your individual scores based on certain tests are below.\n\nThe scale is open-ended, with a minimum score of -10. 10 is very strong, 4\nis strong, 1 is good and -3 is fair. Below -3 scores \"Weak.\"\n";
+	$debug[] = "<b>How this score was calculated</b>\nYour score was tallied up based on an extensive algorithm which outputted\nthe following scores based on traits of your password. Above you can see the\ncomposite score; your individual scores based on certain tests are below.\n\nThe scale is open-ended, with a minimum score of -10. 10 is very strong, 4\nis strong, 1 is good and -3 is fair. Below -3 scores \"Weak.\"\n";
-$debug[] = 'Adding '.$lenscore.' points for length';
+	$debug[] = 'Adding '.$lenscore.' points for length';
-$score += $lenscore;
+	$score += $lenscore;
-$has_upper_lower = false;
+	$has_upper_lower = false;
-$has_symbols     = false;
+	$has_symbols     = false;
-$has_numbers     = false;
+	$has_numbers     = false;
-// contains uppercase and lowercase
+	// contains uppercase and lowercase
-if ( preg_match('/[A-z]+/', $password) && strtolower($password) != $password )
+	if ( preg_match('/[A-z]+/', $password) && strtolower($password) != $password )
-{
+	{
-$score += 1;
+		$score += 1;
-$has_upper_lower = true;
+		$has_upper_lower = true;
-$debug[] = 'Adding 1 point for having uppercase and lowercase';
+		$debug[] = 'Adding 1 point for having uppercase and lowercase';
-}
+	}
-// contains symbols
+	// contains symbols
-if ( preg_match('/[^A-z0-9]+/', $password) )
+	if ( preg_match('/[^A-z0-9]+/', $password) )
-{
+	{
-$score += 1;
+		$score += 1;
-$has_symbols = true;
+		$has_symbols = true;
-$debug[] = 'Adding 1 point for having nonalphanumeric characters (matching /[^A-z0-9]+/)';
+		$debug[] = 'Adding 1 point for having nonalphanumeric characters (matching /[^A-z0-9]+/)';
-}
+	}
-// contains numbers
+	// contains numbers
-if ( preg_match('/[0-9]+/', $password) )
+	if ( preg_match('/[0-9]+/', $password) )
-{
+	{
-$score += 1;
+		$score += 1;
-$has_numbers = true;
+		$has_numbers = true;
-$debug[] = 'Adding 1 point for having numbers';
+		$debug[] = 'Adding 1 point for having numbers';
-}
+	}
-if ( $has_upper_lower && $has_symbols && $has_numbers && strlen($password) >= 9 )
+	if ( $has_upper_lower && $has_symbols && $has_numbers && strlen($password) >= 9 )
-{
+	{
-// if it has uppercase and lowercase letters, symbols, and numbers, and is of considerable length, add some serious points
+		// if it has uppercase and lowercase letters, symbols, and numbers, and is of considerable length, add some serious points
-$score += 4;
+		$score += 4;
-$debug[] = 'Adding 4 points for having uppercase and lowercase, numbers, and nonalphanumeric and being more than 8 characters';
+		$debug[] = 'Adding 4 points for having uppercase and lowercase, numbers, and nonalphanumeric and being more than 8 characters';
-}
+	}
-else if ( $has_upper_lower && $has_symbols && $has_numbers )
+	else if ( $has_upper_lower && $has_symbols && $has_numbers )
-{
+	{
-// still give some points for passing complexity check
+		// still give some points for passing complexity check
-$score += 2;
+		$score += 2;
-$debug[] = 'Adding 2 points for having uppercase and lowercase, numbers, and nonalphanumeric';
+		$debug[] = 'Adding 2 points for having uppercase and lowercase, numbers, and nonalphanumeric';
-}
+	}
-else if ( ( $has_upper_lower && $has_symbols ) ||
+	else if ( ( $has_upper_lower && $has_symbols ) ||
-( $has_upper_lower && $has_numbers ) ||
+						( $has_upper_lower && $has_numbers ) ||
-( $has_symbols && $has_numbers ) )
+						( $has_symbols && $has_numbers ) )
-{
+	{
-// if 2 of the three main complexity checks passed, add a point
+		// if 2 of the three main complexity checks passed, add a point
-$score += 1;
+		$score += 1;
-$debug[] = 'Adding 1 point for having 2 of 3 complexity checks';
+		$debug[] = 'Adding 1 point for having 2 of 3 complexity checks';
-}
+	}
-else if ( preg_match('/^[0-9]*?([a-z]+)[0-9]?$/', $password) )
+	else if ( preg_match('/^[0-9]*?([a-z]+)[0-9]?$/', $password) )
-{
+	{
-// password is something like magnum1 which will be cracked in seconds
+		// password is something like magnum1 which will be cracked in seconds
-$score += -4;
+		$score += -4;
-$debug[] = 'Adding -4 points for being of the form [number][word][number]';
+		$debug[] = 'Adding -4 points for being of the form [number][word][number]';
-}
+	}
-else if ( ( !$has_upper_lower && !$has_numbers && $has_symbols ) ||
+	else if ( ( !$has_upper_lower && !$has_numbers && $has_symbols ) ||
-( !$has_upper_lower && !$has_symbols && $has_numbers ) ||
+						( !$has_upper_lower && !$has_symbols && $has_numbers ) ||
-( !$has_numbers && !$has_symbols && $has_upper_lower ) )
+						( !$has_numbers && !$has_symbols && $has_upper_lower ) )
-{
+	{
-$score += -2;
+		$score += -2;
-$debug[] = 'Adding -2 points for only meeting 1 complexity check';
+		$debug[] = 'Adding -2 points for only meeting 1 complexity check';
-}
+	}
-else if ( !$has_upper_lower && !$has_numbers && !$has_symbols )
+	else if ( !$has_upper_lower && !$has_numbers && !$has_symbols )
-{
+	{
-$debug[] = 'Adding -3 points for not meeting any complexity checks';
+		$debug[] = 'Adding -3 points for not meeting any complexity checks';
-$score += -3;
+		$score += -3;
-}
+	}
-//
+	//
-// Repetition
+	// Repetition
-// Example: foobar12345 should be deducted points, where f1o2o3b4a5r should be given points
+	// Example: foobar12345 should be deducted points, where f1o2o3b4a5r should be given points
-//
+	//
-if ( preg_match('/([A-Z][A-Z][A-Z][A-Z]|[a-z][a-z][a-z][a-z])/', $password) )
+	if ( preg_match('/([A-Z][A-Z][A-Z][A-Z]|[a-z][a-z][a-z][a-z])/', $password) )
-{
+	{
-$debug[] = 'Adding -2 points for having more than 4 letters of the same case in a row';
+		$debug[] = 'Adding -2 points for having more than 4 letters of the same case in a row';
-$score += -2;
+		$score += -2;
-}
+	}
-else if ( preg_match('/([A-Z][A-Z][A-Z]|[a-z][a-z][a-z])/', $password) )
+	else if ( preg_match('/([A-Z][A-Z][A-Z]|[a-z][a-z][a-z])/', $password) )
-{
+	{
-$debug[] = 'Adding -1 points for having more than 3 letters of the same case in a row';
+		$debug[] = 'Adding -1 points for having more than 3 letters of the same case in a row';
-$score += -1;
+		$score += -1;
-}
+	}
-else if ( preg_match('/[A-z]/', $password) && !preg_match('/([A-Z][A-Z][A-Z]|[a-z][a-z][a-z])/', $password) )
+	else if ( preg_match('/[A-z]/', $password) && !preg_match('/([A-Z][A-Z][A-Z]|[a-z][a-z][a-z])/', $password) )
-{
+	{
-$debug[] = 'Adding 1 point for never having more than 2 letters of the same case in a row';
+		$debug[] = 'Adding 1 point for never having more than 2 letters of the same case in a row';
-$score += 1;
+		$score += 1;
-}
+	}
-if ( preg_match('/[0-9][0-9][0-9][0-9]/', $password) )
+	if ( preg_match('/[0-9][0-9][0-9][0-9]/', $password) )
-{
+	{
-$debug[] = 'Adding -2 points for having 4 or more numbers in a row';
+		$debug[] = 'Adding -2 points for having 4 or more numbers in a row';
-$score += -2;
+		$score += -2;
-}
+	}
-else if ( preg_match('/[0-9][0-9][0-9]/', $password) )
+	else if ( preg_match('/[0-9][0-9][0-9]/', $password) )
-{
+	{
-$debug[] = 'Adding -1 points for having 3 or more numbers in a row';
+		$debug[] = 'Adding -1 points for having 3 or more numbers in a row';
-$score += -1;
+		$score += -1;
-}
+	}
-else if ( $has_numbers && !preg_match('/[0-9][0-9][0-9]/', $password) )
+	else if ( $has_numbers && !preg_match('/[0-9][0-9][0-9]/', $password) )
-{
+	{
-$debug[] = 'Adding 1 point for never more than 2 numbers in a row';
+		$debug[] = 'Adding 1 point for never more than 2 numbers in a row';
-$score += -1;
+		$score += -1;
-}
+	}
-// make passwords like fooooooooooooooooooooooooooooooooooooo totally die by subtracting a point for each character repeated at least 3 times in a row
+	// make passwords like fooooooooooooooooooooooooooooooooooooo totally die by subtracting a point for each character repeated at least 3 times in a row
-$prev_char = '';
+	$prev_char = '';
-$warn = false;
+	$warn = false;
-$loss = 0;
+	$loss = 0;
-for ( $i = 0; $i < strlen($password); $i++ )
+	for ( $i = 0; $i < strlen($password); $i++ )
-{
+	{
-$chr = $password{$i};
+		$chr = $password{$i};
-if ( $chr == $prev_char && $warn )
+		if ( $chr == $prev_char && $warn )
-{
+		{
-$loss += -1;
+			$loss += -1;
-}
+		}
-else if ( $chr == $prev_char && !$warn )
+		else if ( $chr == $prev_char && !$warn )
-{
+		{
-$warn = true;
+			$warn = true;
-}
+		}
-else if ( $chr != $prev_char && $warn )
+		else if ( $chr != $prev_char && $warn )
-{
+		{
-$warn = false;
+			$warn = false;
-}
+		}
-$prev_char = $chr;
+		$prev_char = $chr;
-}
+	}
-if ( $loss < 0 )
+	if ( $loss < 0 )
-{
+	{
-$debug[] = 'Adding '.$loss.' points for immediate character repetition';
+		$debug[] = 'Adding '.$loss.' points for immediate character repetition';
-$score += $loss;
+		$score += $loss;
-// this can bring the score below -10 sometimes
+		// this can bring the score below -10 sometimes
-if ( $score < -10 )
+		if ( $score < -10 )
-{
+		{
-$debug[] = 'Setting score to -10 because it went below ('.$score.')';
+			$debug[] = 'Setting score to -10 because it went below ('.$score.')';
-$score = -10;
+			$score = -10;
-}
+		}
-}
+	}
-return $score;
+	return $score;
 }
 /**
 * Registers a task that will be run every X hours. Scheduled tasks should always be scheduled at runtime - they are not stored in the DB.
 * @param string Function name to call, or array(object, string method)
 * @param int Interval between runs, in hours. Defaults to 24.
 */
 function register_cron_task($func, $hour_interval = 24)
 {
-global $cron_tasks;
+	global $cron_tasks;
-$hour_interval = strval($hour_interval);
+	$hour_interval = strval($hour_interval);
-if ( !isset($cron_tasks[$hour_interval]) )
+	if ( !isset($cron_tasks[$hour_interval]) )
-$cron_tasks[$hour_interval] = array();
+		$cron_tasks[$hour_interval] = array();
-$cron_tasks[$hour_interval][] = $func;
+	$cron_tasks[$hour_interval][] = $func;
 }
 /**
 * Gets the timestamp for the next estimated cron run.
 * @return int
 */
 function get_cron_next_run()
 {
-global $cron_tasks;
+	global $cron_tasks;
-$lowest_ivl = min(array_keys($cron_tasks));
+	$lowest_ivl = min(array_keys($cron_tasks));
-$last_run = intval(getConfig("cron_lastrun_ivl_$lowest_ivl"));
+	$last_run = intval(getConfig("cron_lastrun_ivl_$lowest_ivl"));
-return intval($last_run + ( 3600 * $lowest_ivl )) - 30;
+	return intval($last_run + ( 3600 * $lowest_ivl )) - 30;
 }
 /**
 * Installs a language.
 * @param string The ISO-639-3 identifier for the language. Maximum of 6 characters, usually 3.
 * @param string The path to the file containing the language's strings. Optional.
 */
 function install_language($lang_code, $lang_name_neutral, $lang_name_local, $lang_file = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-$q = $db->sql_query('SELECT 1 FROM '.table_prefix.'language WHERE lang_code = \'' . $db->escape($lang_code) . '\';');
+	$q = $db->sql_query('SELECT 1 FROM '.table_prefix.'language WHERE lang_code = \'' . $db->escape($lang_code) . '\';');
-if ( !$q )
+	if ( !$q )
-$db->_die('functions.php - checking for language existence');
+		$db->_die('functions.php - checking for language existence');
-if ( $db->numrows() > 0 )
+	if ( $db->numrows() > 0 )
-// Language already exists
+		// Language already exists
-return false;
+		return false;
-$q = $db->sql_query('INSERT INTO ' . table_prefix . 'language(lang_code, lang_name_default, lang_name_native)
+	$q = $db->sql_query('INSERT INTO ' . table_prefix . 'language(lang_code, lang_name_default, lang_name_native)
-VALUES(
+												VALUES(
-\'' . $db->escape($lang_code) . '\',
+													\'' . $db->escape($lang_code) . '\',
-\'' . $db->escape($lang_name_neutral) . '\',
+													\'' . $db->escape($lang_name_neutral) . '\',
-\'' . $db->escape($lang_name_local) . '\'
+													\'' . $db->escape($lang_name_local) . '\'
-);');
+												);');
-if ( !$q )
+	if ( !$q )
-$db->_die('functions.php - installing language');
+		$db->_die('functions.php - installing language');
-if ( ENANO_DBLAYER == 'PGSQL' )
+	if ( ENANO_DBLAYER == 'PGSQL' )
-{
+	{
-// exception for Postgres, which doesn't support insert IDs
+		// exception for Postgres, which doesn't support insert IDs
-// This will cause the Language class to just load by lang code
+		// This will cause the Language class to just load by lang code
-// instead of by numeric ID
+		// instead of by numeric ID
-$lang_id = $lang_code;
+		$lang_id = $lang_code;
-}
+	}
-else
+	else
-{
+	{
-$lang_id = $db->insert_id();
+		$lang_id = $db->insert_id();
-if ( empty($lang_id) || $lang_id == 0 )
+		if ( empty($lang_id) || $lang_id == 0 )
-{
+		{
-$db->_die('functions.php - invalid returned lang_id');
+			$db->_die('functions.php - invalid returned lang_id');
-}
+		}
-}
+	}
-// Do we also need to install a language file?
+	// Do we also need to install a language file?
-if ( is_string($lang_file) && file_exists($lang_file) )
+	if ( is_string($lang_file) && file_exists($lang_file) )
-{
+	{
-$lang = new Language($lang_id);
+		$lang = new Language($lang_id);
-$lang->import($lang_file);
+		$lang->import($lang_file);
-}
+	}
-else if ( is_string($lang_file) && !file_exists($lang_file) )
+	else if ( is_string($lang_file) && !file_exists($lang_file) )
-{
+	{
-echo '<b>Notice:</b> Can\'t load language file, so the specified language wasn\'t fully installed.<br />';
+		echo '<b>Notice:</b> Can\'t load language file, so the specified language wasn\'t fully installed.<br />';
-return false;
+		return false;
-}
+	}
-return true;
+	return true;
 }
 /**
 * Lists available languages.
 * @return array Multi-depth. Associative, with children associative containing keys name, name_eng, and dir.
 */
 function list_available_languages()
 {
-// Pulled from install/includes/common.php
+	// Pulled from install/includes/common.php
-// Build a list of available languages
+	// Build a list of available languages
-$dir = @opendir( ENANO_ROOT . '/language' );
+	$dir = @opendir( ENANO_ROOT . '/language' );
-if ( !$dir )
+	if ( !$dir )
-die('CRITICAL: could not open language directory');
+		die('CRITICAL: could not open language directory');
-$languages = array();
+	$languages = array();
-while ( $dh = @readdir($dir) )
+	while ( $dh = @readdir($dir) )
-{
+	{
-if ( $dh == '.' || $dh == '..' )
+		if ( $dh == '.' || $dh == '..' )
-continue;
+			continue;
-if ( file_exists( ENANO_ROOT . "/language/$dh/meta.json" ) )
+		if ( file_exists( ENANO_ROOT . "/language/$dh/meta.json" ) )
-{
+		{
-// Found a language directory, determine metadata
+			// Found a language directory, determine metadata
-$meta = @file_get_contents( ENANO_ROOT . "/language/$dh/meta.json" );
+			$meta = @file_get_contents( ENANO_ROOT . "/language/$dh/meta.json" );
-if ( empty($meta) )
+			if ( empty($meta) )
-// Could not read metadata file, continue silently
+				// Could not read metadata file, continue silently
-continue;
+				continue;
-// Do some syntax correction on the metadata
+			// Do some syntax correction on the metadata
-$meta = enano_clean_json($meta);
+			$meta = enano_clean_json($meta);
-$meta = enano_json_decode($meta);
+			$meta = enano_json_decode($meta);
-if ( isset($meta['lang_name_english']) && isset($meta['lang_name_native']) && isset($meta['lang_code']) )
+			if ( isset($meta['lang_name_english']) && isset($meta['lang_name_native']) && isset($meta['lang_code']) )
-{
+			{
-$languages[$meta['lang_code']] = array(
+				$languages[$meta['lang_code']] = array(
-'name' => $meta['lang_name_native'],
+						'name' => $meta['lang_name_native'],
-'name_eng' => $meta['lang_name_english'],
+						'name_eng' => $meta['lang_name_english'],
-'dir' => $dh
+						'dir' => $dh
-);
+					);
-}
+			}
-}
+		}
-}
+	}
-return $languages;
+	return $languages;
 }
 /**
 * Scales an image to the specified width and height, and writes the output to the specified
 * file. Will use ImageMagick if present, but if not will attempt to scale with GD. This will
 * @return bool True on success, false on failure
 */
 function scale_image($in_file, $out_file, $width = 225, $height = 225, $unlink = false)
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-if ( !is_int($width) || !is_int($height) )
+	if ( !is_int($width) || !is_int($height) )
-throw new Exception('Invalid height or width.');
+		throw new Exception('Invalid height or width.');
-if ( !file_exists($in_file) )
+	if ( !file_exists($in_file) )
-throw new Exception('Input file does not exist');
+		throw new Exception('Input file does not exist');
-$in_file_sh = escapeshellarg($in_file);
+	$in_file_sh = escapeshellarg($in_file);
-$out_file_sh = escapeshellarg($out_file);
+	$out_file_sh = escapeshellarg($out_file);
-if ( file_exists($out_file) && !$unlink )
+	if ( file_exists($out_file) && !$unlink )
-throw new Exception('Refusing to write output file as it already exists and $unlink was not specified.');
+		throw new Exception('Refusing to write output file as it already exists and $unlink was not specified.');
-else if ( file_exists($out_file) && $unlink )
+	else if ( file_exists($out_file) && $unlink )
-@unlink($out_file);
+		@unlink($out_file);
-if ( file_exists($out_file) )
+	if ( file_exists($out_file) )
-// couldn't unlink (delete) the output file
+		// couldn't unlink (delete) the output file
-throw new Exception('Failed to delete existing output file.');
+		throw new Exception('Failed to delete existing output file.');
-$file_ext = strtolower(substr($in_file, ( strrpos($in_file, '.') + 1)));
+	$file_ext = strtolower(substr($in_file, ( strrpos($in_file, '.') + 1)));
-switch($file_ext)
+	switch($file_ext)
-{
+	{
-case 'png':
+		case 'png':
-$func = 'imagecreatefrompng';
+			$func = 'imagecreatefrompng';
-break;
+			break;
-case 'jpg':
+		case 'jpg':
-case 'jpeg':
+		case 'jpeg':
-$func = 'imagecreatefromjpeg';
+			$func = 'imagecreatefromjpeg';
-break;
+			break;
-case 'gif':
+		case 'gif':
-$func = 'imagecreatefromgif';
+			$func = 'imagecreatefromgif';
-break;
+			break;
-case 'xpm':
+		case 'xpm':
-$func = 'imagecreatefromxpm';
+			$func = 'imagecreatefromxpm';
-break;
+			break;
-default:
+		default:
-throw new Exception('Invalid extension of input file.');
+			throw new Exception('Invalid extension of input file.');
-}
+	}
-$magick_path = getConfig('imagemagick_path');
+	$magick_path = getConfig('imagemagick_path');
-$can_use_magick = (
+	$can_use_magick = (
-getConfig('enable_imagemagick') == '1' &&
+			getConfig('enable_imagemagick') == '1' &&
-file_exists($magick_path)              &&
+			file_exists($magick_path)              &&
-is_executable($magick_path)
+			is_executable($magick_path)
-);
+		);
-$can_use_gd = (
+	$can_use_gd = (
-function_exists('getimagesize')         &&
+			function_exists('getimagesize')         &&
-function_exists('imagecreatetruecolor') &&
+			function_exists('imagecreatetruecolor') &&
-function_exists('imagecopyresampled')   &&
+			function_exists('imagecopyresampled')   &&
-function_exists($func)
+			function_exists($func)
-);
+		);
-if ( $can_use_magick )
+	if ( $can_use_magick )
-{
+	{
-if ( !preg_match('/^([\/A-z0-9:\. _-]+)$/', $magick_path) )
+		if ( !preg_match('/^([\/A-z0-9:\. _-]+)$/', $magick_path) )
-{
+		{
-die('SECURITY: ImageMagick path is screwy');
+			die('SECURITY: ImageMagick path is screwy');
-}
+		}
-$cmdline = "$magick_path $in_file_sh -resize \"{$width}x{$height}>\" $out_file_sh";
+		$cmdline = "$magick_path $in_file_sh -resize \"{$width}x{$height}>\" $out_file_sh";
-system($cmdline, $return);
+		system($cmdline, $return);
-if ( !file_exists($out_file) )
+		if ( !file_exists($out_file) )
-throw new Exception('ImageMagick: did not produce output image file.');
+			throw new Exception('ImageMagick: did not produce output image file.');
-return true;
+		return true;
-}
+	}
-else if ( $can_use_gd )
+	else if ( $can_use_gd )
-{
+	{
-@list($width_orig, $height_orig) = @getimagesize($in_file);
+		@list($width_orig, $height_orig) = @getimagesize($in_file);
-if ( !$width_orig || !$height_orig )
+		if ( !$width_orig || !$height_orig )
-throw new Exception('GD: Could not get height and width of input file.');
+			throw new Exception('GD: Could not get height and width of input file.');
-// calculate new width and height
+		// calculate new width and height
-$ratio = $width_orig / $height_orig;
+		$ratio = $width_orig / $height_orig;
-if ( $ratio > 1 )
+		if ( $ratio > 1 )
-{
+		{
-// orig. width is greater that height
+			// orig. width is greater that height
-$new_width = $width;
+			$new_width = $width;
-$new_height = round( $width / $ratio );
+			$new_height = round( $width / $ratio );
-}
+		}
-else if ( $ratio < 1 )
+		else if ( $ratio < 1 )
-{
+		{
-// orig. height is greater than width
+			// orig. height is greater than width
-$new_width = round( $height / $ratio );
+			$new_width = round( $height / $ratio );
-$new_height = $height;
+			$new_height = $height;
-}
+		}
-else if ( $ratio == 1 )
+		else if ( $ratio == 1 )
-{
+		{
-$new_width = $width;
+			$new_width = $width;
-$new_height = $width;
+			$new_height = $width;
-}
+		}
-if ( $new_width > $width_orig || $new_height > $height_orig )
+		if ( $new_width > $width_orig || $new_height > $height_orig )
-{
+		{
-// Too big for our britches here; set it to only convert the file
+			// Too big for our britches here; set it to only convert the file
-$new_width = $width_orig;
+			$new_width = $width_orig;
-$new_height = $height_orig;
+			$new_height = $height_orig;
-}
+		}
-$newimage = @imagecreatetruecolor($new_width, $new_height);
+		$newimage = @imagecreatetruecolor($new_width, $new_height);
-if ( !$newimage )
+		if ( !$newimage )
-throw new Exception('GD: Request to create new truecolor image refused.');
+			throw new Exception('GD: Request to create new truecolor image refused.');
-$oldimage = @$func($in_file);
+		$oldimage = @$func($in_file);
-if ( !$oldimage )
+		if ( !$oldimage )
-throw new Exception('GD: Request to load input image file failed.');
+			throw new Exception('GD: Request to load input image file failed.');
-// Perform scaling
+		// Perform scaling
-imagecopyresampled($newimage, $oldimage, 0, 0, 0, 0, $new_width, $new_height, $width_orig, $height_orig);
+		imagecopyresampled($newimage, $oldimage, 0, 0, 0, 0, $new_width, $new_height, $width_orig, $height_orig);
-// Get output format
+		// Get output format
-$out_ext = strtolower(substr($out_file, ( strrpos($out_file, '.') + 1)));
+		$out_ext = strtolower(substr($out_file, ( strrpos($out_file, '.') + 1)));
-switch($out_ext)
+		switch($out_ext)
-{
+		{
-case 'png':
+			case 'png':
-$outfunc = 'imagepng';
+				$outfunc = 'imagepng';
-break;
+				break;
-case 'jpg':
+			case 'jpg':
-case 'jpeg':
+			case 'jpeg':
-$outfunc = 'imagejpeg';
+				$outfunc = 'imagejpeg';
-break;
+				break;
-case 'gif':
+			case 'gif':
-$outfunc = 'imagegif';
+				$outfunc = 'imagegif';
-break;
+				break;
-case 'xpm':
+			case 'xpm':
-$outfunc = 'imagexpm';
+				$outfunc = 'imagexpm';
-break;
+				break;
-default:
+			default:
-imagedestroy($newimage);
+				imagedestroy($newimage);
-imagedestroy($oldimage);
+				imagedestroy($oldimage);
-throw new Exception('GD: Invalid extension of output file.');
+				throw new Exception('GD: Invalid extension of output file.');
-}
+		}
-// Write output
+		// Write output
-$outfunc($newimage, $out_file);
+		$outfunc($newimage, $out_file);
-// clean up
+		// clean up
-imagedestroy($newimage);
+		imagedestroy($newimage);
-imagedestroy($oldimage);
+		imagedestroy($oldimage);
-// done!
+		// done!
-return true;
+		return true;
-}
+	}
-// Neither scaling method worked; we'll let plugins try to scale it, and then if the file still doesn't exist, die
+	// Neither scaling method worked; we'll let plugins try to scale it, and then if the file still doesn't exist, die
-$code = $plugins->setHook('scale_image_failure');
+	$code = $plugins->setHook('scale_image_failure');
-foreach ( $code as $cmd )
+	foreach ( $code as $cmd )
-{
+	{
-eval($cmd);
+		eval($cmd);
-}
+	}
-if ( file_exists($out_file) )
+	if ( file_exists($out_file) )
-return true;
+		return true;
-throw new Exception('Failed to find an appropriate method for scaling.');
+	throw new Exception('Failed to find an appropriate method for scaling.');
 }
 /**
 * Determines whether a GIF file is animated or not. Credit goes to ZeBadger from <http://www.php.net/imagecreatefromgif>.
 * Modified to conform to Enano coding standards.
 */
 function is_gif_animated($filename)
 {
-$filecontents = @file_get_contents($filename);
+	$filecontents = @file_get_contents($filename);
-if ( empty($filecontents) )
+	if ( empty($filecontents) )
-return false;
+		return false;
-$str_loc = 0;
+	$str_loc = 0;
-$count = 0;
+	$count = 0;
-while ( $count < 2 ) // There is no point in continuing after we find a 2nd frame
+	while ( $count < 2 ) // There is no point in continuing after we find a 2nd frame
-{
+	{
-$where1 = strpos($filecontents,"\x00\x21\xF9\x04", $str_loc);
+		$where1 = strpos($filecontents,"\x00\x21\xF9\x04", $str_loc);
-if ( $where1 === false )
+		if ( $where1 === false )
-{
+		{
-break;
+			break;
-}
+		}
-else
+		else
-{
+		{
-$str_loc = $where1 + 1;
+			$str_loc = $where1 + 1;
-$where2 = strpos($filecontents,"\x00\x2C", $str_loc);
+			$where2 = strpos($filecontents,"\x00\x2C", $str_loc);
-if ( $where2 === false )
+			if ( $where2 === false )
-{
+			{
-break;
+				break;
-}
+			}
-else
+			else
-{
+			{
-if ( $where1 + 8 == $where2 )
+				if ( $where1 + 8 == $where2 )
-{
+				{
-$count++;
+					$count++;
-}
+				}
-$str_loc = $where2 + 1;
+				$str_loc = $where2 + 1;
-}
+			}
-}
+		}
-}
+	}
-return ( $count > 1 ) ? true : false;
+	return ( $count > 1 ) ? true : false;
 }
 /**
 * Retrieves the dimensions of a GIF image.
 * @param string The path to the GIF file.
 * @return array Key 0 is width, key 1 is height
 */
 function gif_get_dimensions($filename)
 {
-$filecontents = @file_get_contents($filename);
+	$filecontents = @file_get_contents($filename);
-if ( empty($filecontents) )
+	if ( empty($filecontents) )
-return false;
+		return false;
-if ( strlen($filecontents) < 10 )
+	if ( strlen($filecontents) < 10 )
-return false;
+		return false;
-$width = substr($filecontents, 6, 2);
+	$width = substr($filecontents, 6, 2);
-$height = substr($filecontents, 8, 2);
+	$height = substr($filecontents, 8, 2);
-$width = unpack('v', $width);
+	$width = unpack('v', $width);
-$height = unpack('v', $height);
+	$height = unpack('v', $height);
-return array($width[1], $height[1]);
+	return array($width[1], $height[1]);
 }
 /**
 * Determines whether a PNG image is animated or not. Based on some specification information from <http://wiki.mozilla.org/APNG_Specification>.
 * @param string Path to PNG file.
 * @return bool If animated, returns true
 */
 function is_png_animated($filename)
 {
-$filecontents = @file_get_contents($filename);
+	$filecontents = @file_get_contents($filename);
-if ( empty($filecontents) )
+	if ( empty($filecontents) )
-return false;
+		return false;
-$parsed = parse_png($filecontents);
+	$parsed = parse_png($filecontents);
-if ( !$parsed )
+	if ( !$parsed )
-return false;
+		return false;
-if ( !isset($parsed['fdAT']) )
+	if ( !isset($parsed['fdAT']) )
-return false;
+		return false;
-if ( count($parsed['fdAT']) > 1 )
+	if ( count($parsed['fdAT']) > 1 )
-return true;
+		return true;
 }
 /**
 * Gets the dimensions of a PNG image.
 * @param string Path to PNG file
 * @return array Key 0 is width, key 1 is length.
 */
 function png_get_dimensions($filename)
 {
-$filecontents = @file_get_contents($filename);
+	$filecontents = @file_get_contents($filename);
-if ( empty($filecontents) )
+	if ( empty($filecontents) )
-return false;
+		return false;
-$parsed = parse_png($filecontents);
+	$parsed = parse_png($filecontents);
-if ( !$parsed )
+	if ( !$parsed )
-return false;
+		return false;
-$ihdr_stream = $parsed['IHDR'][0];
+	$ihdr_stream = $parsed['IHDR'][0];
-$width = substr($ihdr_stream, 0, 4);
+	$width = substr($ihdr_stream, 0, 4);
-$height = substr($ihdr_stream, 4, 4);
+	$height = substr($ihdr_stream, 4, 4);
-$width = unpack('N', $width);
+	$width = unpack('N', $width);
-$height = unpack('N', $height);
+	$height = unpack('N', $height);
-$x = $width[1];
+	$x = $width[1];
-$y = $height[1];
+	$y = $height[1];
-return array($x, $y);
+	return array($x, $y);
 }
 /**
 * Internal function to parse out the streams of a PNG file. Based on the W3 PNG spec: http://www.w3.org/TR/PNG/
 * @param string The contents of the PNG
 * @return array Associative array containing the streams
 */
 function parse_png($data)
 {
-// Trim off first 8 bytes to check for PNG header
+	// Trim off first 8 bytes to check for PNG header
-$header = substr($data, 0, 8);
+	$header = substr($data, 0, 8);
-if ( $header != "\x89\x50\x4e\x47\x0d\x0a\x1a\x0a" )
+	if ( $header != "\x89\x50\x4e\x47\x0d\x0a\x1a\x0a" )
-{
+	{
-return false;
+		return false;
-}
+	}
-$return = array();
+	$return = array();
-$data = substr($data, 8);
+	$data = substr($data, 8);
-while ( strlen($data) > 0 )
+	while ( strlen($data) > 0 )
-{
+	{
-$chunklen_bin = substr($data, 0, 4);
+		$chunklen_bin = substr($data, 0, 4);
-$chunk_type = substr($data, 4, 4);
+		$chunk_type = substr($data, 4, 4);
-$chunklen = unpack('N', $chunklen_bin);
+		$chunklen = unpack('N', $chunklen_bin);
-$chunklen = $chunklen[1];
+		$chunklen = $chunklen[1];
-$chunk_data = substr($data, 8, $chunklen);
+		$chunk_data = substr($data, 8, $chunklen);
-// If the chunk type is not valid, this may be a malicious PNG with bad offsets. Break out of the loop.
+		// If the chunk type is not valid, this may be a malicious PNG with bad offsets. Break out of the loop.
-if ( !preg_match('/^[A-z]{4}$/', $chunk_type) )
+		if ( !preg_match('/^[A-z]{4}$/', $chunk_type) )
-break;
+			break;
-if ( !isset($return[$chunk_type]) )
+		if ( !isset($return[$chunk_type]) )
-$return[$chunk_type] = array();
+			$return[$chunk_type] = array();
-$return[$chunk_type][] = $chunk_data;
+		$return[$chunk_type][] = $chunk_data;
-$offset_next = 4 // Length
+		$offset_next = 4 // Length
-+ 4 // Type
+								+ 4 // Type
-+ $chunklen // Data
+								+ $chunklen // Data
-+ 4; // CRC
+								+ 4; // CRC
-$data = substr($data, $offset_next);
+		$data = substr($data, $offset_next);
-}
+	}
-return $return;
+	return $return;
 }
 /**
 * Retreives information about the intrinsic characteristics of the jpeg image, such as Bits per Component, Height and Width. This function is from the PHP JPEG Metadata Toolkit. Licensed under the GPLv2 or later.
 * @param array The JPEG header data, as retrieved from the get_jpeg_header_data function
 * @copyright Copyright Evan Hunter 2004
 */
 function get_jpeg_intrinsic_values( $jpeg_header_data )
 {
-// Create a blank array for the output
+	// Create a blank array for the output
-$Outputarray = array( );
+	$Outputarray = array( );
-//Cycle through the header segments until Start Of Frame (SOF) is found or we run out of segments
+	//Cycle through the header segments until Start Of Frame (SOF) is found or we run out of segments
-$i = 0;
+	$i = 0;
-while ( ( $i < count( $jpeg_header_data) )  && ( substr( $jpeg_header_data[$i]['SegName'], 0, 3 ) != "SOF" ) )
+	while ( ( $i < count( $jpeg_header_data) )  && ( substr( $jpeg_header_data[$i]['SegName'], 0, 3 ) != "SOF" ) )
-{
+	{
-$i++;
+		$i++;
-}
+	}
-// Check if a SOF segment has been found
+	// Check if a SOF segment has been found
-if ( substr( $jpeg_header_data[$i]['SegName'], 0, 3 ) == "SOF" )
+	if ( substr( $jpeg_header_data[$i]['SegName'], 0, 3 ) == "SOF" )
-{
+	{
-// SOF segment was found, extract the information
+		// SOF segment was found, extract the information
-$data = $jpeg_header_data[$i]['SegData'];
+		$data = $jpeg_header_data[$i]['SegData'];
-// First byte is Bits per component
+		// First byte is Bits per component
-$Outputarray['Bits per Component'] = ord( $data{0} );
+		$Outputarray['Bits per Component'] = ord( $data{0} );
-// Second and third bytes are Image Height
+		// Second and third bytes are Image Height
-$Outputarray['Image Height'] = ord( $data{ 1 } ) * 256 + ord( $data{ 2 } );
+		$Outputarray['Image Height'] = ord( $data{ 1 } ) * 256 + ord( $data{ 2 } );
-// Forth and fifth bytes are Image Width
+		// Forth and fifth bytes are Image Width
-$Outputarray['Image Width'] = ord( $data{ 3 } ) * 256 + ord( $data{ 4 } );
+		$Outputarray['Image Width'] = ord( $data{ 3 } ) * 256 + ord( $data{ 4 } );
-// Sixth byte is number of components
+		// Sixth byte is number of components
-$numcomponents = ord( $data{ 5 } );
+		$numcomponents = ord( $data{ 5 } );
-// Following this is a table containing information about the components
+		// Following this is a table containing information about the components
-for( $i = 0; $i < $numcomponents; $i++ )
+		for( $i = 0; $i < $numcomponents; $i++ )
-{
+		{
-$Outputarray['Components'][] = array (  'Component Identifier' => ord( $data{ 6 + $i * 3 } ),
+			$Outputarray['Components'][] = array (  'Component Identifier' => ord( $data{ 6 + $i * 3 } ),
-'Horizontal Sampling Factor' => ( ord( $data{ 7 + $i * 3 } ) & 0xF0 ) / 16,
+								'Horizontal Sampling Factor' => ( ord( $data{ 7 + $i * 3 } ) & 0xF0 ) / 16,
-'Vertical Sampling Factor' => ( ord( $data{ 7 + $i * 3 } ) & 0x0F ),
+								'Vertical Sampling Factor' => ( ord( $data{ 7 + $i * 3 } ) & 0x0F ),
-'Quantization table destination selector' => ord( $data{ 8 + $i * 3 } ) );
+								'Quantization table destination selector' => ord( $data{ 8 + $i * 3 } ) );
-}
+		}
-}
+	}
-else
+	else
-{
+	{
-// Couldn't find Start Of Frame segment, hence can't retrieve info
+		// Couldn't find Start Of Frame segment, hence can't retrieve info
-return FALSE;
+		return FALSE;
-}
+	}
-return $Outputarray;
+	return $Outputarray;
 }
 /**
 * Reads all the JPEG header segments from an JPEG image file into an array. This function is from the PHP JPEG Metadata Toolkit. Licensed under the GPLv2 or later. Modified slightly for Enano coding standards and to remove unneeded capability.
 * @param string the filename of the file to JPEG file to read
 * @copyright Copyright Evan Hunter 2004
 */
 function get_jpeg_header_data( $filename )
 {
-// Attempt to open the jpeg file - the at symbol supresses the error message about
+	// Attempt to open the jpeg file - the at symbol supresses the error message about
-// not being able to open files. The file_exists would have been used, but it
+	// not being able to open files. The file_exists would have been used, but it
-// does not work with files fetched over http or ftp.
+	// does not work with files fetched over http or ftp.
-$filehnd = @fopen($filename, 'rb');
+	$filehnd = @fopen($filename, 'rb');
-// Check if the file opened successfully
+	// Check if the file opened successfully
-if ( ! $filehnd  )
+	if ( ! $filehnd  )
-{
+	{
-// Could't open the file - exit
+		// Could't open the file - exit
-return FALSE;
+		return FALSE;
-}
+	}
-// Read the first two characters
+	// Read the first two characters
-$data = fread( $filehnd, 2 );
+	$data = fread( $filehnd, 2 );
-// Check that the first two characters are 0xFF 0xDA  (SOI - Start of image)
+	// Check that the first two characters are 0xFF 0xDA  (SOI - Start of image)
-if ( $data != "\xFF\xD8" )
+	if ( $data != "\xFF\xD8" )
-{
+	{
-// No SOI (FF D8) at start of file - This probably isn't a JPEG file - close file and return;
+		// No SOI (FF D8) at start of file - This probably isn't a JPEG file - close file and return;
-fclose($filehnd);
+		fclose($filehnd);
-return FALSE;
+		return FALSE;
-}
+	}
-// Read the third character
+	// Read the third character
-$data = fread( $filehnd, 2 );
+	$data = fread( $filehnd, 2 );
-// Check that the third character is 0xFF (Start of first segment header)
+	// Check that the third character is 0xFF (Start of first segment header)
-if ( $data{0} != "\xFF" )
+	if ( $data{0} != "\xFF" )
-{
+	{
-// NO FF found - close file and return - JPEG is probably corrupted
+		// NO FF found - close file and return - JPEG is probably corrupted
-fclose($filehnd);
+		fclose($filehnd);
-return FALSE;
+		return FALSE;
-}
+	}
-// Flag that we havent yet hit the compressed image data
+	// Flag that we havent yet hit the compressed image data
-$hit_compressed_image_data = FALSE;
+	$hit_compressed_image_data = FALSE;
-// Cycle through the file until, one of: 1) an EOI (End of image) marker is hit,
+	// Cycle through the file until, one of: 1) an EOI (End of image) marker is hit,
-//               2) we have hit the compressed image data (no more headers are allowed after data)
+	//               2) we have hit the compressed image data (no more headers are allowed after data)
-//               3) or end of file is hit
+	//               3) or end of file is hit
-while ( ( $data{1} != "\xD9" ) && (! $hit_compressed_image_data) && ( ! feof( $filehnd ) ))
+	while ( ( $data{1} != "\xD9" ) && (! $hit_compressed_image_data) && ( ! feof( $filehnd ) ))
-{
+	{
-// Found a segment to look at.
+		// Found a segment to look at.
-// Check that the segment marker is not a Restart marker - restart markers don't have size or data after them
+		// Check that the segment marker is not a Restart marker - restart markers don't have size or data after them
-if (  ( ord($data{1}) < 0xD0 ) || ( ord($data{1}) > 0xD7 ) )
+		if (  ( ord($data{1}) < 0xD0 ) || ( ord($data{1}) > 0xD7 ) )
-{
+		{
-// Segment isn't a Restart marker
+			// Segment isn't a Restart marker
-// Read the next two bytes (size)
+			// Read the next two bytes (size)
-$sizestr = fread( $filehnd, 2 );
+			$sizestr = fread( $filehnd, 2 );
-// convert the size bytes to an integer
+			// convert the size bytes to an integer
-$decodedsize = unpack ("nsize", $sizestr);
+			$decodedsize = unpack ("nsize", $sizestr);
-// Save the start position of the data
+			// Save the start position of the data
-$segdatastart = ftell( $filehnd );
+			$segdatastart = ftell( $filehnd );
-// Read the segment data with length indicated by the previously read size
+			// Read the segment data with length indicated by the previously read size
-$segdata = fread( $filehnd, $decodedsize['size'] - 2 );
+			$segdata = fread( $filehnd, $decodedsize['size'] - 2 );
-// Store the segment information in the output array
+			// Store the segment information in the output array
-$headerdata[] = array(  "SegType" => ord($data{1}),
+			$headerdata[] = array(  "SegType" => ord($data{1}),
-"SegName" => $GLOBALS[ "JPEG_Segment_Names" ][ ord($data{1}) ],
+						"SegName" => $GLOBALS[ "JPEG_Segment_Names" ][ ord($data{1}) ],
-"SegDataStart" => $segdatastart,
+						"SegDataStart" => $segdatastart,
-"SegData" => $segdata );
+						"SegData" => $segdata );
-}
+		}
-// If this is a SOS (Start Of Scan) segment, then there is no more header data - the compressed image data follows
+		// If this is a SOS (Start Of Scan) segment, then there is no more header data - the compressed image data follows
-if ( $data{1} == "\xDA" )
+		if ( $data{1} == "\xDA" )
-{
+		{
-// Flag that we have hit the compressed image data - exit loop as no more headers available.
+			// Flag that we have hit the compressed image data - exit loop as no more headers available.
-$hit_compressed_image_data = TRUE;
+			$hit_compressed_image_data = TRUE;
-}
+		}
-else
+		else
-{
+		{
-// Not an SOS - Read the next two bytes - should be the segment marker for the next segment
+			// Not an SOS - Read the next two bytes - should be the segment marker for the next segment
-$data = fread( $filehnd, 2 );
+			$data = fread( $filehnd, 2 );
-// Check that the first byte of the two is 0xFF as it should be for a marker
+			// Check that the first byte of the two is 0xFF as it should be for a marker
-if ( $data{0} != "\xFF" )
+			if ( $data{0} != "\xFF" )
-{
+			{
-// NO FF found - close file and return - JPEG is probably corrupted
+				// NO FF found - close file and return - JPEG is probably corrupted
-fclose($filehnd);
+				fclose($filehnd);
-return FALSE;
+				return FALSE;
-}
+			}
-}
+		}
-}
+	}
-// Close File
+	// Close File
-fclose($filehnd);
+	fclose($filehnd);
-// Return the header data retrieved
+	// Return the header data retrieved
-return $headerdata;
+	return $headerdata;
 }
 /**
 * Returns the dimensions of a JPEG image in the same format as {php,gif}_get_dimensions().
 * @param string JPEG file to check
 * @return array Key 0 is width, key 1 is height
 */
 function jpg_get_dimensions($filename)
 {
-if ( !file_exists($filename) )
+	if ( !file_exists($filename) )
-{
+	{
-echo "Doesn't exist<br />";
+		echo "Doesn't exist<br />";
-return false;
+		return false;
-}
+	}
-$headers = get_jpeg_header_data($filename);
+	$headers = get_jpeg_header_data($filename);
-if ( !$headers )
+	if ( !$headers )
-{
+	{
-echo "Bad headers<br />";
+		echo "Bad headers<br />";
-return false;
+		return false;
-}
+	}
-$metadata = get_jpeg_intrinsic_values($headers);
+	$metadata = get_jpeg_intrinsic_values($headers);
-if ( !$metadata )
+	if ( !$metadata )
-{
+	{
-echo "Bad metadata: <pre>" . print_r($metadata, true) . "</pre><br />";
+		echo "Bad metadata: <pre>" . print_r($metadata, true) . "</pre><br />";
-return false;
+		return false;
-}
+	}
-if ( !isset($metadata['Image Width']) || !isset($metadata['Image Height']) )
+	if ( !isset($metadata['Image Width']) || !isset($metadata['Image Height']) )
-{
+	{
-echo "No metadata<br />";
+		echo "No metadata<br />";
-return false;
+		return false;
-}
+	}
-return array($metadata['Image Width'], $metadata['Image Height']);
+	return array($metadata['Image Width'], $metadata['Image Height']);
 }
 /**
 * Generates a URL for the avatar for the given user ID and avatar type.
 * @param int User ID
 * @return string
 */
 function make_avatar_url($user_id, $avi_type, $user_email = false)
 {
-static $img_types = array(
+	static $img_types = array(
-'png' => IMAGE_TYPE_PNG,
+			'png' => IMAGE_TYPE_PNG,
-'gif' => IMAGE_TYPE_GIF,
+			'gif' => IMAGE_TYPE_GIF,
-'jpg' => IMAGE_TYPE_JPG,
+			'jpg' => IMAGE_TYPE_JPG,
-'grv' => IMAGE_TYPE_GRV
+			'grv' => IMAGE_TYPE_GRV
-);
+		);
-if ( !is_int($user_id) )
+	if ( !is_int($user_id) )
-return false;
+		return false;
-if ( !isset($img_types[$avi_type]) )
+	if ( !isset($img_types[$avi_type]) )
-return false;
+		return false;
-if ( $avi_type == 'grv' )
+	if ( $avi_type == 'grv' )
-{
+	{
-if ( $user_email )
+		if ( $user_email )
-{
+		{
-return make_gravatar_url($user_email);
+			return make_gravatar_url($user_email);
-}
+		}
-}
+	}
-else
+	else
-{
+	{
-$avi_relative_path = '/' . getConfig('avatar_directory') . '/' . $user_id . '.' . $avi_type;
+		$avi_relative_path = '/' . getConfig('avatar_directory') . '/' . $user_id . '.' . $avi_type;
-if ( !file_exists(ENANO_ROOT . $avi_relative_path) )
+		if ( !file_exists(ENANO_ROOT . $avi_relative_path) )
-{
+		{
-return '';
+			return '';
-}
+		}
-}
+	}
-$img_type = $img_types[$avi_type];
+	$img_type = $img_types[$avi_type];
-$dateline = @filemtime(ENANO_ROOT . $avi_relative_path);
+	$dateline = @filemtime(ENANO_ROOT . $avi_relative_path);
-$avi_id = pack('VVv', $dateline, $user_id, $img_type);
+	$avi_id = pack('VVv', $dateline, $user_id, $img_type);
-$avi_id = hexencode($avi_id, '', '');
+	$avi_id = hexencode($avi_id, '', '');
-// return scriptPath . $avi_relative_path;
+	// return scriptPath . $avi_relative_path;
-return makeUrlNS('Special', "Avatar/$avi_id");
+	return makeUrlNS('Special', "Avatar/$avi_id");
 }
 /**
 * Generates a URL to the Gravatar for a user based on his/her e-mail address.
 * @param string E-mail address
 * @return string URL
 */
 function make_gravatar_url($email, $size = false)
 {
-$email = md5($email);
+	$email = md5($email);
-// gravatar parameters
+	// gravatar parameters
-if ( $size )
+	if ( $size )
-{
+	{
-$max_size = intval($size);
+		$max_size = intval($size);
-}
+	}
-else
+	else
-{
+	{
-$max_x = intval(getConfig('avatar_max_width', '150'));
+		$max_x = intval(getConfig('avatar_max_width', '150'));
-$max_y = intval(getConfig('avatar_max_height', '150'));
+		$max_y = intval(getConfig('avatar_max_height', '150'));
-// ?s=
+		// ?s=
-$max_size = ( $max_x > $max_y ) ? $max_y : $max_x;
+		$max_size = ( $max_x > $max_y ) ? $max_y : $max_x;
-}
+	}
-// ?r=
+	// ?r=
-$rating = getConfig('gravatar_rating', 'g');
+	$rating = getConfig('gravatar_rating', 'g');
-// final URL
+	// final URL
-$url = "http://www.gravatar.com/avatar/$email?r=$rating&s=$max_size";
+	$url = "http://www.gravatar.com/avatar/$email?r=$rating&s=$max_size";
-return $url;
+	return $url;
 }
 /**
 * Determines an image's filetype based on its signature.
 * @param string Path to image file
 * @return string One of gif, png, or jpg, or false if none of these.
 */
 function get_image_filetype($filename)
 {
-$filecontents = @file_get_contents($filename);
+	$filecontents = @file_get_contents($filename);
-if ( empty($filecontents) )
+	if ( empty($filecontents) )
-return false;
+		return false;
-if ( substr($filecontents, 0, 8) == "\x89\x50\x4e\x47\x0d\x0a\x1a\x0a" )
+	if ( substr($filecontents, 0, 8) == "\x89\x50\x4e\x47\x0d\x0a\x1a\x0a" )
-return 'png';
+		return 'png';
-if ( substr($filecontents, 0, 6) == 'GIF87a' || substr($filecontents, 0, 6) == 'GIF89a' )
+	if ( substr($filecontents, 0, 6) == 'GIF87a' || substr($filecontents, 0, 6) == 'GIF89a' )
-return 'gif';
+		return 'gif';
-if ( substr($filecontents, 0, 2) == "\xFF\xD8" )
+	if ( substr($filecontents, 0, 2) == "\xFF\xD8" )
-return 'jpg';
+		return 'jpg';
-return false;
+	return false;
 }
 /**
 * Generates a JSON encoder/decoder singleton.
 * @return object
 */
 function enano_json_singleton()
 {
-static $json_obj;
+	static $json_obj;
-if ( !is_object($json_obj) )
+	if ( !is_object($json_obj) )
-$json_obj = new Services_JSON(SERVICES_JSON_LOOSE_TYPE | SERVICES_JSON_SUPPRESS_ERRORS);
+		$json_obj = new Services_JSON(SERVICES_JSON_LOOSE_TYPE | SERVICES_JSON_SUPPRESS_ERRORS);
-return $json_obj;
+	return $json_obj;
 }
 /**
 * Wrapper for JSON encoding.
 * @param mixed Variable to encode
 * @return string JSON-encoded string
 */
 function enano_json_encode($data)
 {
-/*
+	/*
-if ( function_exists('json_encode') )
+	if ( function_exists('json_encode') )
-{
+	{
-// using PHP5 with JSON support
+		// using PHP5 with JSON support
-return json_encode($data);
+		return json_encode($data);
-}
+	}
-*/
+	*/
-return Zend_Json::encode($data, true);
+	return Zend_Json::encode($data, true);
 }
 /**
 * Wrapper for JSON decoding.
 * @param string JSON-encoded string
 * @return mixed Decoded value
 */
 function enano_json_decode($data)
 {
-/*
+	/*
-if ( function_exists('json_decode') )
+	if ( function_exists('json_decode') )
-{
+	{
-// using PHP5 with JSON support
+		// using PHP5 with JSON support
-return json_decode($data);
+		return json_decode($data);
-}
+	}
-*/
+	*/
-return Zend_Json::decode($data, Zend_Json::TYPE_ARRAY);
+	return Zend_Json::decode($data, Zend_Json::TYPE_ARRAY);
 }
 /**
 * Cleans a snippet of JSON for closer standards compliance (shuts up the picky Zend parser)
 * @param string Dirty JSON
 * @return string Clean JSON
 */
 function enano_clean_json($json)
 {
-// eliminate comments
+	// eliminate comments
-$json = preg_replace(array(
+	$json = preg_replace(array(
-// eliminate single line comments in '// ...' form
+					// eliminate single line comments in '// ...' form
-'#^\s*//(.*)$#m',
+					'#^\s*//(.*)$#m',
-// eliminate multi-line comments in '/* ... */' form, at start of string
+					// eliminate multi-line comments in '/* ... */' form, at start of string
-'#^\s*/\*(.+)\*/#Us',
+					'#^\s*/\*(.+)\*/#Us',
-// eliminate multi-line comments in '/* ... */' form, at end of string
+					// eliminate multi-line comments in '/* ... */' form, at end of string
-'#/\*(.+)\*/\s*$#Us'
+					'#/\*(.+)\*/\s*$#Us'
-), '', $json);
+				), '', $json);
-$json = preg_replace('/([,\{\[])(?:[\r\n]+)([\s]*?)([a-z0-9_]+)([\s]*?):/', '\\1\\2"\\3" :', $json);
+	$json = preg_replace('/([,\{\[])(?:[\r\n]+)([\s]*?)([a-z0-9_]+)([\s]*?):/', '\\1\\2"\\3" :', $json);
-return $json;
+	return $json;
 }
 /**
 * Trims a snippet of text to the first and last curly braces. Useful for JSON.
 * @param string Text to trim
 * @return string
 */
 function enano_trim_json($json)
 {
-return preg_replace('/^([^{]+)\{/', '{', preg_replace('/\}([^}]+)$/', '}', $json));
+	return preg_replace('/^([^{]+)\{/', '{', preg_replace('/\}([^}]+)$/', '}', $json));
 }
 /**
 * Starts the profiler.
 */
 function profiler_start()
 {
-global $_profiler;
+	global $_profiler;
-$_profiler = array();
+	$_profiler = array();
-if ( !defined('ENANO_DEBUG') )
+	if ( !defined('ENANO_DEBUG') )
-return false;
+		return false;
-$_profiler[] = array(
+	$_profiler[] = array(
-'point' => 'Profiling started',
+			'point' => 'Profiling started',
-'time' => microtime_float(),
+			'time' => microtime_float(),
-'backtrace' => false,
+			'backtrace' => false,
-'mem' => false
+			'mem' => false
-);
+		);
-if ( function_exists('memory_get_usage') )
+	if ( function_exists('memory_get_usage') )
-{
+	{
-$_profiler[ count($_profiler) - 1 ]['mem'] = memory_get_usage();
+		$_profiler[ count($_profiler) - 1 ]['mem'] = memory_get_usage();
-}
+	}
 }
 /**
 * Logs something in the profiler.
 * @param string Point name or message
 * @return resource Event ID
 */
 function profiler_log($point, $allow_backtrace = true, $parent_event = false)
 {
-if ( !defined('ENANO_DEBUG') )
+	if ( !defined('ENANO_DEBUG') )
-return false;
+		return false;
-global $_profiler;
+	global $_profiler;
-$backtrace = false;
+	$backtrace = false;
-if ( $allow_backtrace && function_exists('debug_print_backtrace') )
+	if ( $allow_backtrace && function_exists('debug_print_backtrace') )
-{
+	{
-list(, $backtrace) = explode("\n", enano_debug_print_backtrace(true));
+		list(, $backtrace) = explode("\n", enano_debug_print_backtrace(true));
-}
+	}
-$_profiler[] = array(
+	$_profiler[] = array(
-'point' => $point,
+			'point' => $point,
-'time' => microtime_float(),
+			'time' => microtime_float(),
-'backtrace' => $backtrace,
+			'backtrace' => $backtrace,
-'mem' => false,
+			'mem' => false,
-'parent_event' => $parent_event
+			'parent_event' => $parent_event
-);
+		);
-if ( function_exists('memory_get_usage') )
+	if ( function_exists('memory_get_usage') )
-{
+	{
-$_profiler[ count($_profiler) - 1 ]['mem'] = memory_get_usage();
+		$_profiler[ count($_profiler) - 1 ]['mem'] = memory_get_usage();
-}
+	}
-return count($_profiler) - 1;
+	return count($_profiler) - 1;
 }
 /**
 * Insert a message (an event without any time data) into the profiler.
 * @param string Message
 */
 function profiler_message($message)
 {
-if ( !defined('ENANO_DEBUG') )
+	if ( !defined('ENANO_DEBUG') )
-return false;
+		return false;
-global $_profiler;
+	global $_profiler;
-$_profiler[] = array(
+	$_profiler[] = array(
-'message' => $message,
+			'message' => $message,
-);
+		);
 }
 /**
 * Returns the profiler's data (so far).
 * @return array
 */
 function profiler_dump()
 {
-return $GLOBALS['_profiler'];
+	return $GLOBALS['_profiler'];
 }
 /**
 * Generates an HTML version of the performance profile. Not localized because only used as a debugging tool.
 * @return string
 */
 function profiler_make_html()
 {
-if ( !defined('ENANO_DEBUG') )
+	if ( !defined('ENANO_DEBUG') )
-return '';
+		return '';
-$profile = profiler_dump();
+	$profile = profiler_dump();
-$html = '<div class="tblholder">';
+	$html = '<div class="tblholder">';
-$html .= '<table border="0" cellspacing="1" cellpadding="4">';
+	$html .= '<table border="0" cellspacing="1" cellpadding="4">';
-$time_start = $time_last = $profile[0]['time'];
+	$time_start = $time_last = $profile[0]['time'];
-foreach ( $profile as $i => $entry )
+	foreach ( $profile as $i => $entry )
-{
+	{
-// $time_since_last = $entry['time'] - $time_last;
+		// $time_since_last = $entry['time'] - $time_last;
-// if ( $time_since_last < 0.01 )
+		// if ( $time_since_last < 0.01 )
-//   continue;
+		//   continue;
-if ( isset($entry['message']) )
+		if ( isset($entry['message']) )
-{
+		{
-$html .= "<!-- ########################################################## -->\n<tr>\n  <th colspan=\"2\">Message $i</th>\n</tr>";
+			$html .= "<!-- ########################################################## -->\n<tr>\n  <th colspan=\"2\">Message $i</th>\n</tr>";
-$html .= '<tr>' . "\n";
+			$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">Message:</td>' . "\n";
+			$html .= '  <td class="row2">Message:</td>' . "\n";
-$html .= '  <td class="row1">' . htmlspecialchars($entry['message']) . '</td>' . "\n";
+			$html .= '  <td class="row1">' . htmlspecialchars($entry['message']) . '</td>' . "\n";
-$html .= '</tr>' . "\n";
+			$html .= '</tr>' . "\n";
-continue;
+			continue;
-}
+		}
-$html .= "<!-- ########################################################## -->\n<tr>\n  <th colspan=\"2\">Event $i</th>\n</tr>";
+		$html .= "<!-- ########################################################## -->\n<tr>\n  <th colspan=\"2\">Event $i</th>\n</tr>";
-$html .= '<tr>' . "\n";
+		$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">Event:</td>' . "\n";
+		$html .= '  <td class="row2">Event:</td>' . "\n";
-$html .= '  <td class="row1">' . htmlspecialchars($entry['point']) . '</td>' . "\n";
+		$html .= '  <td class="row1">' . htmlspecialchars($entry['point']) . '</td>' . "\n";
-$html .= '</tr>' . "\n";
+		$html .= '</tr>' . "\n";
-$time = $entry['time'] - $time_start;
+		$time = $entry['time'] - $time_start;
-$html .= '<tr>' . "\n";
+		$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">Time since start:</td>' . "\n";
+		$html .= '  <td class="row2">Time since start:</td>' . "\n";
-$html .= '  <td class="row1">' . $time . 's</td>' . "\n";
+		$html .= '  <td class="row1">' . $time . 's</td>' . "\n";
-$html .= '</tr>' . "\n";
+		$html .= '</tr>' . "\n";
-$time_label = 'Time since last event:';
+		$time_label = 'Time since last event:';
-if ( $entry['parent_event'] && is_int($entry['parent_event']) && isset($profile[$entry['parent_event']]) )
+		if ( $entry['parent_event'] && is_int($entry['parent_event']) && isset($profile[$entry['parent_event']]) )
-{
+		{
-$time_last = $profile[$entry['parent_event']]['time'];
+			$time_last = $profile[$entry['parent_event']]['time'];
-$time_label = "Time since event #{$entry['parent_event']}:";
+			$time_label = "Time since event #{$entry['parent_event']}:";
-}
+		}
-$time = $entry['time'] - $time_last;
+		$time = $entry['time'] - $time_last;
-if ( $time < 0.0001 )
+		if ( $time < 0.0001 )
-$time_html = 'Marginal';
+			$time_html = 'Marginal';
-else
+		else
-$time_html = number_format($time, 6) . "s";
+			$time_html = number_format($time, 6) . "s";
-if ( $time > 0.02 )
+		if ( $time > 0.02 )
-$time_html = "<span style=\"background-color: #a00; padding: 4px; color: #fff; font-weight: bold;\">$time_html</span>";
+			$time_html = "<span style=\"background-color: #a00; padding: 4px; color: #fff; font-weight: bold;\">$time_html</span>";
-$html .= '<tr>' . "\n";
+		$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">' . $time_label . '</td>' . "\n";
+		$html .= '  <td class="row2">' . $time_label . '</td>' . "\n";
-$html .= '  <td class="row1">' . $time_html . '</td>' . "\n";
+		$html .= '  <td class="row1">' . $time_html . '</td>' . "\n";
-$html .= '</tr>' . "\n";
+		$html .= '</tr>' . "\n";
-if ( $entry['backtrace'] )
+		if ( $entry['backtrace'] )
-{
+		{
-$html .= '<tr>' . "\n";
+			$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">Called from:</td>' . "\n";
+			$html .= '  <td class="row2">Called from:</td>' . "\n";
-$html .= '  <td class="row1">' . htmlspecialchars($entry['backtrace']) . '</td>' . "\n";
+			$html .= '  <td class="row1">' . htmlspecialchars($entry['backtrace']) . '</td>' . "\n";
-$html .= '</tr>' . "\n";
+			$html .= '</tr>' . "\n";
-}
+		}
-if ( $entry['mem'] )
+		if ( $entry['mem'] )
-{
+		{
-$html .= '<tr>' . "\n";
+			$html .= '<tr>' . "\n";
-$html .= '  <td class="row2">Total mem usage:</td>' . "\n";
+			$html .= '  <td class="row2">Total mem usage:</td>' . "\n";
-$html .= '  <td class="row1">' . htmlspecialchars($entry['mem']) . ' (bytes)</td>' . "\n";
+			$html .= '  <td class="row1">' . htmlspecialchars($entry['mem']) . ' (bytes)</td>' . "\n";
-$html .= '</tr>' . "\n";
+			$html .= '</tr>' . "\n";
-}
+		}
-$html .= "\n";
+		$html .= "\n";
-$time_last = $entry['time'];
+		$time_last = $entry['time'];
-}
+	}
-$html .= '</table></div>';
+	$html .= '</table></div>';
-return $html;
+	return $html;
 }
 // Might as well start the profiler, it has no external dependencies except from this file.
 profiler_start();
 * @return int
 */
 function get_char_count($string, $char)
 {
-$char = substr($char, 0, 1);
+	$char = substr($char, 0, 1);
-$count = 0;
+	$count = 0;
-for ( $i = 0; $i < strlen($string); $i++ )
+	for ( $i = 0; $i < strlen($string); $i++ )
-{
+	{
-if ( $string{$i} == $char )
+		if ( $string{$i} == $char )
-$count++;
+			$count++;
-}
+	}
-return $count;
+	return $count;
 }
 /**
 * Returns the number of lines in a string.
 * @param string String to check
 * @return int
 */
 function get_line_count($string)
 {
-return ( get_char_count($string, "\n") ) + 1;
+	return ( get_char_count($string, "\n") ) + 1;
 }
 if ( !function_exists('sys_get_temp_dir') )
 {
-// Based on http://www.phpit.net/
+		// Based on http://www.phpit.net/
-// article/creating-zip-tar-archives-dynamically-php/2/
+		// article/creating-zip-tar-archives-dynamically-php/2/
-/**
+		/**
-* Attempt to get the system's temp directory.
+		* Attempt to get the system's temp directory.
-* @return string or bool false on failure
+		* @return string or bool false on failure
-*/
+		*/
-function sys_get_temp_dir()
+		function sys_get_temp_dir()
-{
+		{
-// Try to get from environment variable
+				// Try to get from environment variable
-if ( !empty($_ENV['TMP']) )
+				if ( !empty($_ENV['TMP']) )
-{
+				{
-return realpath( $_ENV['TMP'] );
+						return realpath( $_ENV['TMP'] );
-}
+				}
-else if ( !empty($_ENV['TMPDIR']) )
+				else if ( !empty($_ENV['TMPDIR']) )
-{
+				{
-return realpath( $_ENV['TMPDIR'] );
+						return realpath( $_ENV['TMPDIR'] );
-}
+				}
-else if ( !empty($_ENV['TEMP']) )
+				else if ( !empty($_ENV['TEMP']) )
-{
+				{
-return realpath( $_ENV['TEMP'] );
+						return realpath( $_ENV['TEMP'] );
-}
+				}
-// Detect by creating a temporary file
+				// Detect by creating a temporary file
-else
+				else
-{
+				{
-// Try to use system's temporary directory
+						// Try to use system's temporary directory
-// as random name shouldn't exist
+						// as random name shouldn't exist
-$temp_file = tempnam( md5(uniqid(rand(), TRUE)), '' );
+						$temp_file = tempnam( md5(uniqid(rand(), TRUE)), '' );
-if ( $temp_file )
+						if ( $temp_file )
-{
+						{
-$temp_dir = realpath( dirname($temp_file) );
+								$temp_dir = realpath( dirname($temp_file) );
-unlink( $temp_file );
+								unlink( $temp_file );
-return $temp_dir;
+								return $temp_dir;
-}
+						}
-else
+						else
-{
+						{
-return FALSE;
+								return FALSE;
-}
+						}
-}
+				}
-}
+		}
 }
 /**
 * Grabs and processes all rank information directly from the database.
 */
 function fetch_rank_data()
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang;
+	global $lang;
-$sql = $session->generate_rank_sql();
+	$sql = $session->generate_rank_sql();
-$q = $db->sql_query($sql);
+	$q = $db->sql_query($sql);
-if ( !$q )
+	if ( !$q )
-$db->_die();
+		$db->_die();
-$GLOBALS['user_ranks'] = array();
+	$GLOBALS['user_ranks'] = array();
-global $user_ranks;
+	global $user_ranks;
-while ( $row = $db->fetchrow($q) )
+	while ( $row = $db->fetchrow($q) )
-{
+	{
-$user_id = $row['user_id'];
+		$user_id = $row['user_id'];
-$username = $row['username'];
+		$username = $row['username'];
-$row = $session->calculate_user_rank($row);
+		$row = $session->calculate_user_rank($row);
-$user_ranks[$username] =  $row;
+		$user_ranks[$username] =  $row;
-$user_ranks[$user_id]  =& $user_ranks[$username];
+		$user_ranks[$user_id]  =& $user_ranks[$username];
-}
+	}
 }
 /**
 * Caches the computed user rank information.
 */
 function generate_cache_userranks()
 {
-global $db, $session, $paths, $template, $plugins; // Common objects
+	global $db, $session, $paths, $template, $plugins; // Common objects
-global $lang;
+	global $lang;
-global $user_ranks;
+	global $user_ranks;
-fetch_rank_data();
+	fetch_rank_data();
-$user_ranks_stripped = array();
+	$user_ranks_stripped = array();
-foreach ( $user_ranks as $key => $value )
+	foreach ( $user_ranks as $key => $value )
-{
+	{
-if ( is_int($key) )
+		if ( is_int($key) )
-$user_ranks_stripped[$key] = $value;
+			$user_ranks_stripped[$key] = $value;
-}
+	}
-$ranks_exported = "<?php\n\n// Automatically generated user rank cache.\nglobal \$user_ranks;\n" . '$user_ranks = ' . $lang->var_export_string($user_ranks_stripped) . ';';
+	$ranks_exported = "<?php\n\n// Automatically generated user rank cache.\nglobal \$user_ranks;\n" . '$user_ranks = ' . $lang->var_export_string($user_ranks_stripped) . ';';
-$uid_map = array();
+	$uid_map = array();
-foreach ( $user_ranks as $id => $row )
+	foreach ( $user_ranks as $id => $row )
-{
+	{
-if ( !is_int($id) )
+		if ( !is_int($id) )
-{
+		{
-$username = $id;
+			$username = $id;
-continue;
+			continue;
-}
+		}
-$un_san = addslashes($username);
+		$un_san = addslashes($username);
-$ranks_exported .= "\n\$user_ranks['$un_san'] =& \$user_ranks[{$row['user_id']}];";
+		$ranks_exported .= "\n\$user_ranks['$un_san'] =& \$user_ranks[{$row['user_id']}];";
-}
+	}
-$ranks_exported .= "\n\ndefine('ENANO_RANKS_CACHE_LOADED', 1); \n?>";
+	$ranks_exported .= "\n\ndefine('ENANO_RANKS_CACHE_LOADED', 1); \n?>";
-// open ranks cache file
+	// open ranks cache file
-$fh = @fopen( ENANO_ROOT . '/cache/cache_ranks.php', 'w' );
+	$fh = @fopen( ENANO_ROOT . '/cache/cache_ranks.php', 'w' );
-if ( !$fh )
+	if ( !$fh )
-return false;
+		return false;
-fwrite($fh, $ranks_exported);
+	fwrite($fh, $ranks_exported);
-fclose($fh);
+	fclose($fh);
-return true;
+	return true;
 }
 /**
 * Loads the rank data, first attempting the cache file and then the database.
 */
 function load_rank_data()
 {
-if ( file_exists( ENANO_ROOT . '/cache/cache_ranks.php' ) )
+	if ( file_exists( ENANO_ROOT . '/cache/cache_ranks.php' ) )
-{
+	{
-@include(ENANO_ROOT . '/cache/cache_ranks.php');
+		@include(ENANO_ROOT . '/cache/cache_ranks.php');
-}
+	}
-if ( !defined('ENANO_RANKS_CACHE_LOADED') )
+	if ( !defined('ENANO_RANKS_CACHE_LOADED') )
-{
+	{
-fetch_rank_data();
+		fetch_rank_data();
-}
+	}
 }
 /**
 * Function to purge all caches used in Enano. Useful for upgrades, maintenance, backing the site up, etc.
 */
 function purge_all_caches()
 {
-global $cache;
+	global $cache;
-if ( $dh = opendir(ENANO_ROOT . '/cache') )
+	if ( $dh = opendir(ENANO_ROOT . '/cache') )
-{
+	{
-$cache->purge('page_meta');
+		$cache->purge('page_meta');
-$cache->purge('anon_sidebar');
+		$cache->purge('anon_sidebar');
-$cache->purge('plugins');
+		$cache->purge('plugins');
-$cache->purge('wiki_edit_notice');
+		$cache->purge('wiki_edit_notice');
-$data_files = array(
+		$data_files = array(
-'aes_decrypt.php',
+				'aes_decrypt.php',
-// ranks cache is stored using a custom engine (not enano's default cache)
+				// ranks cache is stored using a custom engine (not enano's default cache)
-'cache_ranks.php'
+				'cache_ranks.php'
-);
+			);
-while ( $file = @readdir($dh) )
+		while ( $file = @readdir($dh) )
-{
+		{
-$fullpath = ENANO_ROOT . "/cache/$file";
+			$fullpath = ENANO_ROOT . "/cache/$file";
-// we don't want to mess with directories
+			// we don't want to mess with directories
-if ( !is_file($fullpath) )
+			if ( !is_file($fullpath) )
-continue;
+				continue;
-// data files
+			// data files
-if ( in_array($file, $data_files) )
+			if ( in_array($file, $data_files) )
-unlink($fullpath);
+				unlink($fullpath);
-// template files
+			// template files
-else if ( preg_match('/\.(?:tpl|css)\.php$/', $file) )
+			else if ( preg_match('/\.(?:tpl|css)\.php$/', $file) )
-unlink($fullpath);
+				unlink($fullpath);
-// compressed javascript
+			// compressed javascript
-else if ( preg_match('/^jsres_(?:[A-z0-9_-]+)\.js\.json$/', $file) )
+			else if ( preg_match('/^jsres_(?:[A-z0-9_-]+)\.js\.json$/', $file) )
-unlink($fullpath);
+				unlink($fullpath);
-// tinymce stuff
+			// tinymce stuff
-else if ( preg_match('/^tiny_mce_(?:[a-f0-9]+)\.gz$/', $file) )
+			else if ( preg_match('/^tiny_mce_(?:[a-f0-9]+)\.gz$/', $file) )
-unlink($fullpath);
+				unlink($fullpath);
-// language files
+			// language files
-else if ( preg_match('/^lang_json_(?:[a-f0-9]+?)\.php$/', $file) || preg_match('/^(?:cache_)?lang_(?:[0-9]+?)\.php$/', $file) )
+			else if ( preg_match('/^lang_json_(?:[a-f0-9]+?)\.php$/', $file) || preg_match('/^(?:cache_)?lang_(?:[0-9]+?)\.php$/', $file) )
-unlink($fullpath);
+				unlink($fullpath);
-}
+		}
-return true;
+		return true;
-}
+	}
-return false;
+	return false;
 }
 /**
 * Implementation of the "which" command in native PHP.
 * @param string command
 * @return string path to executable, or false on failure
 */
 function which($executable)
 {
-$path = ( isset($_ENV['PATH']) ) ? $_ENV['PATH'] : ( isset($_SERVER['PATH']) ? $_SERVER['PATH'] : false );
+	$path = ( isset($_ENV['PATH']) ) ? $_ENV['PATH'] : ( isset($_SERVER['PATH']) ? $_SERVER['PATH'] : false );
-if ( !$path )
+	if ( !$path )
-// couldn't get OS's PATH
+		// couldn't get OS's PATH
-return false;
+		return false;
-$win32 = ( PHP_OS == 'WINNT' || PHP_OS == 'WIN32' );
+	$win32 = ( PHP_OS == 'WINNT' || PHP_OS == 'WIN32' );
-$extensions = $win32 ? array('.exe', '.com', '.bat') : array('');
+	$extensions = $win32 ? array('.exe', '.com', '.bat') : array('');
-$separator = $win32 ? ';' : ':';
+	$separator = $win32 ? ';' : ':';
-$paths = explode($separator, $path);
+	$paths = explode($separator, $path);
-foreach ( $paths as $dir )
+	foreach ( $paths as $dir )
-{
+	{
-foreach ( $extensions as $ext )
+		foreach ( $extensions as $ext )
-{
+		{
-$fullpath = "$dir/{$executable}{$ext}";
+			$fullpath = "$dir/{$executable}{$ext}";
-if ( @file_exists($fullpath) && @is_executable($fullpath) )
+			if ( @file_exists($fullpath) && @is_executable($fullpath) )
-{
+			{
-return $fullpath;
+				return $fullpath;
-}
+			}
-}
+		}
-}
+	}
-return false;
+	return false;
 }
 /**
 * Properly test a file or directory for writability. Used in various places around installer.
 * @param string File or directory to test
 * @return bool
 */
 function write_test($filename)
 {
-// We need to actually _open_ the file to make sure it can be written, because sometimes this fails even when is_writable() returns
+	// We need to actually _open_ the file to make sure it can be written, because sometimes this fails even when is_writable() returns
-// true on Windows/IIS servers. Don't ask me why.
+	// true on Windows/IIS servers. Don't ask me why.
-$file = ENANO_ROOT . '/' . $filename;
+	$file = ENANO_ROOT . '/' . $filename;
-if ( is_dir($file) )
+	if ( is_dir($file) )
-{
+	{
-$file = rtrim($file, '/') . '/' . 'enanoinstalltest.txt';
+		$file = rtrim($file, '/') . '/' . 'enanoinstalltest.txt';
-if ( file_exists($file) )
+		if ( file_exists($file) )
-{
+		{
-$fp = @fopen($file, 'a+');
+			$fp = @fopen($file, 'a+');
-if ( !$fp )
+			if ( !$fp )
-return false;
+				return false;
-fclose($fp);
+			fclose($fp);
-unlink($file);
+			unlink($file);
-return true;
+			return true;
-}
+		}
-else
+		else
-{
+		{
-$fp = @fopen($file, 'w');
+			$fp = @fopen($file, 'w');
-if ( !$fp )
+			if ( !$fp )
-return false;
+				return false;
-fclose($fp);
+			fclose($fp);
-unlink($file);
+			unlink($file);
-return true;
+			return true;
-}
+		}
-}
+	}
-else
+	else
-{
+	{
-if ( file_exists($file) )
+		if ( file_exists($file) )
-{
+		{
-$fp = @fopen($file, 'a+');
+			$fp = @fopen($file, 'a+');
-if ( !$fp )
+			if ( !$fp )
-return false;
+				return false;
-fclose($fp);
+			fclose($fp);
-return true;
+			return true;
-}
+		}
-else
+		else
-{
+		{
-$fp = @fopen($file, 'w');
+			$fp = @fopen($file, 'w');
-if ( !$fp )
+			if ( !$fp )
-return false;
+				return false;
-fclose($fp);
+			fclose($fp);
-return true;
+			return true;
-}
+		}
-}
+	}
 }
 /**
 * Get the appropriate crypto backend for this server
 * @return string
 */
 function install_get_crypto_backend()
 {
-$crypto_backend = 'none';
+	$crypto_backend = 'none';
-// Extension test: BCMath
+	// Extension test: BCMath
-if ( function_exists('bcadd') )
+	if ( function_exists('bcadd') )
-$crypto_backend = 'bcmath';
+		$crypto_backend = 'bcmath';
-// Extension test: Big_Int
+	// Extension test: Big_Int
-if ( function_exists('bi_from_str') )
+	if ( function_exists('bi_from_str') )
-$crypto_backend = 'bigint';
+		$crypto_backend = 'bigint';
-// Extension test: GMP
+	// Extension test: GMP
-if ( function_exists('gmp_init') )
+	if ( function_exists('gmp_init') )
-$crypto_backend = 'gmp';
+		$crypto_backend = 'gmp';
-return $crypto_backend;
+	return $crypto_backend;
 }

changeset 1227	bdac73ed481e
parent 1226	de56132c008d
child 1249	81b03b3e88d0