<?php

/*

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

 * Copyright (C) 2006-2009 Dan Fuhry

 *

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

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

 *

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

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

 */

/**

 * Fetch a value from the site configuration.

 * @param string The identifier of the value ("site_name" etc.)

 * @param string If specified, this is the "default" value for the configuration entry. Defaults to false.

 * @return string Configuration value, or bool(false) if the value is not set

 */

function getConfig($n, $default = false)

{

	global $enano_config;

	if ( isset( $enano_config[ $n ] ) )

	{

		return $enano_config[$n];

	}

	else

	{

		return $default;

	}

}

/**

 * Update or change a configuration value.

 * @param string The identifier of the value ("site_name" etc.)

 * @param string The new value

 * @return null

 */

function setConfig($n, $v)

{

	global $enano_config, $db;

	if ( isset($enano_config[$n]) )

	{

		if ( $enano_config[$n] === $v )

		{

			// configuration already matches this value

			return true;

		}

	}

	$enano_config[$n] = $v;

	if ( $v === false )

		unset($enano_config[$n]);

	$v = $db->escape($v);

	$e = $db->sql_query('DELETE FROM '.table_prefix.'config WHERE config_name=\''.$n.'\';');

	if ( !$e )

	{

		$db->_die('Error during generic setConfig() call row deletion.');

	}

	if ( $v !== false )

	{

		$e = $db->sql_query('INSERT INTO '.table_prefix.'config(config_name, config_value) VALUES(\''.$n.'\', \''.$v.'\')');

		if ( !$e )

		{

			$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)

 * @param string The GET query string to append

 * @param bool   If true, perform htmlspecialchars() on the return value to make it HTML-safe

 * @return string

 */

if ( !function_exists('makeUrl') )

{

	function makeUrl($t, $query = false, $escape = false)

	{

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

		$flags = '';

		$sep = urlSeparator;

		$t = sanitize_page_id($t);

		if ( isset($_GET['printable'] ) )

		{

			$flags .= $sep . 'printable=yes';

			$sep = '&';

		}

		if ( isset($_GET['theme'] ) )

		{

			$flags .= $sep . 'theme='.$session->theme;

			$sep = '&';

		}

		if ( isset($_GET['style'] ) )

		{

			$flags .= $sep . 'style='.$session->style;

			$sep = '&';

		}

		if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )

		{

			$flags .= $sep . 'lang=' . urlencode($_GET['lang']);

			$sep = '&';

		}

		$url = is_object($session) ? $session->append_sid(contentPath.$t.$flags) : contentPath . $t . $flags;

		if($query)

		{

			$sep = strstr($url, '?') ? '&' : '?';

			$url = $url . $sep . $query;

		}

		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

 * @param string The page ID

 * @param string The GET query string to append

 * @param bool   If true, perform htmlspecialchars() on the return value to make it HTML-safe

 * @return string

 */

if ( !function_exists('makeUrlNS') )

{

	function makeUrlNS($n, $t, $query = false, $escape = false)

	{

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

		$flags = '';

		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))

		{

			$sep = urlSeparator;

		}

		else

		{

			$sep = (strstr($_SERVER['REQUEST_URI'], '?')) ? '&' : '?';

		}

		if ( isset( $_GET['printable'] ) ) {

			$flags .= $sep . 'printable';

			$sep = '&';

		}

		if ( isset( $_GET['theme'] ) )

		{

			$flags .= $sep . 'theme='.$session->theme;

			$sep = '&';

		}

		if ( isset( $_GET['style'] ) )

		{

			$flags .= $sep . 'style='.$session->style;

			$sep = '&';

		}

		if ( isset($_GET['lang']) && preg_match('/^[a-z0-9_]+$/', @$_GET['lang']) )

		{

			$flags .= $sep . 'lang=' . urlencode($_GET['lang']);

			$sep = '&';

		}

		$ns_prefix = "$n:";

		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))

		{

			$ns_prefix = ( isset($paths->nslist[$n]) ) ? $paths->nslist[$n] : $n . substr($paths->nslist['Special'], -1);

			$url = contentPath . $ns_prefix . $t . $flags;

		}

		else

		{

			// If the path manager hasn't been initted yet, take an educated guess at what the URI should be

			$url = contentPath . $n . ':' . $t . $flags;

		}

		if($query)

		{

			if(strstr($url, '?'))

			{

				$sep =  '&';

			}

			else

			{

				$sep = '?';

			}

			$url = $url . $sep . $query . $flags;

		}

		if(defined('ENANO_BASE_CLASSES_INITIALIZED'))

		{

			$url = $session->append_sid($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

 * @param string The page ID

 * @param string The GET query string to append

 * @param bool   If true, perform htmlspecialchars() on the return value to make it HTML-safe

 * @return string

 */

function makeUrlComplete($n, $t, $query = false, $escape = false)

{

	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;

	if ( isset($_SERVER['HTTP_HOST']) )

		$server_name = $_SERVER['HTTP_HOST'];

	else if ( isset($_SERVER['SERVER_NAME']) )

		$server_name = $_SERVER['SERVER_NAME'];

	else

		$server_name = 'localhost';

	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

	$logged_in = false;

	if ( is_object($session) && !$force_logged_in )

	{

		$logged_in = $session->user_logged_in;

	}

	else if ( $force_logged_in )

	{

		$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');

}

/**

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

 * @param bool If true (default is false), and the return is a Special or Admin page, trims off anything beyond and including the first slash.

 * @return string

 */

function get_title($sanitize = true, $chop_special = false)

{

	$title = '';

	if ( isset($_GET['title']) )

	{

		$title = $_GET['title'];

	}

	else if ( isset($_SERVER['PATH_INFO']) )

	{

		// 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' )

		{

			// do nothing; ignore PATH_INFO

		}

		else

		{

			$title = substr($_SERVER['PATH_INFO'], ( strpos($_SERVER['PATH_INFO'], '/') ) + 1 );

		}

	}

	else

	{

		// 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 ( !empty($_SERVER['QUERY_STRING']) && substr($_SERVER['QUERY_STRING'], 0, 1) == '/' )

		{

			$pos = ( ($_ = strpos($_SERVER['QUERY_STRING'], '&')) !== false ) ? $_ - 1: 0x7FFFFFFF;

			$title = substr($_SERVER['QUERY_STRING'], 1, $pos);

		}

	}

	if ( $chop_special )

	{

		list(, $ns) = RenderMan::strToPageID($title);

		if ( $ns == 'Special' || $ns == 'Admin' )

		{

			list($title) = explode('/', $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')) == '';

}

/**

 * Enano replacement for date(). Accounts for individual users' timezone preferences.

 * @param string Date-formatted string

 * @param int Optional - UNIX timestamp value to use. If omitted, the current time is used.

 * @return string Formatted string

 */

function enano_date($string, $timestamp = false)

{

	if ( !is_int($timestamp) && !is_double($timestamp) && strval(intval($timestamp)) !== $timestamp )

		$timestamp = time();

	if ( is_int($string) )

	{

		global $session, $lang;

		$date_fmt = is_object($session) ? $session->date_format : DATE_4;

		$time_fmt = is_object($session) ? $session->time_format : TIME_24_NS;

		// 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) )

		{

			$relative_date = get_relative_date($timestamp);

			if ( $string === ED_DATE )

				// why do more work if we're done?

				return $relative_date;

		}

		$flags = $string;

		$string = array();

		if ( $flags & ED_DATE && !isset($relative_date) )

			$string[] = $date_fmt;

		if ( $flags & ED_TIME )

			$string[] = $time_fmt;

		$string = implode(' ', $string);

	}

	// perform timestamp offset

	global $timezone;

	// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp

	$timestamp = $timestamp + ( $timezone * 60 );

	// are we in DST?

	global $dst_params;

	$dst_offset = 0;

	if ( check_timestamp_dst($timestamp, $dst_params[0], $dst_params[1], $dst_params[2], $dst_params[3]) )

	{

		// offset for DST

		$timestamp += ( $dst_params[4] * 60 );

		$dst_offset = $dst_params[4];

	}

	// Does this date string include a timezone? If so, gmdate() will report UTC, which is wrong

	// FIXME This is kind of a halfass replacement...

	foreach ( array('e', 'T', 'O', 'P') as $char )

	{

		if ( ($pos = strpos($string, $char)) !== false )

		{

			if ( $string{ $pos - 1 } != '\\' )

			{

				// add in our own timezone string

				// FIXME: l10n? (do we need to? does anyone really not know what "GMT" means? even uglier escaping?)

				$tzi = '\\G\\M\\T';

				$tzo = $timezone + $dst_offset;

				$sign = $tzo > 0 ? '+' : '-';

				$tzi .= $sign . (intval(abs($tzo / 60)));

				if ( $tzo % 60 )

					$tzi .= sprintf(":%02d", abs($tzo) % 60);

				$string = substr($string, 0, $pos) . $tzi . substr($string, $pos + 1);

			}

		}

	}

	// Let PHP do the work for us =)

	$result = gmdate($string, $timestamp);

	if ( isset($relative_date) )

	{

		$result = "$relative_date, $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;

	// 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

	$formatstring = $session->date_format;

	// Today's date

	$today = enano_date($formatstring);

	// Yesterday's date

	$yesterday = enano_date($formatstring, (time() - (24*60*60)));

	// Date on the input

	$then = enano_date($formatstring, $time);

	// "X days ago" logic

	for ( $i = 2; $i <= 6; $i++ )

	{

		// hours_in_day * minutes_in_hour * seconds_in_minute * num_days

		$offset = 24 * 60 * 60 * $i;

		$days_ago = enano_date($formatstring, (time() - $offset));

		// so does the input timestamp match the date from $i days ago?

		if ( $then == $days_ago )

		{

			// yes, return $i

			return $lang->get('userfuncs_ml_date_daysago', array('days_ago' => $i));

		}

	}

	// either yesterday, today, or before 6 days ago

	switch($then)

	{

		case $today:

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

		case $yesterday:

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

		default:

			return $then;

	}

	//     .--.

	//    |o_o |

	//    |!_/ |

	//   //   \ \

	//  (|     | )

	// /'\_   _/`\

	// \___)=(___/

	return 'Linux rocks!';

}

/**

 * Determine if a timestamp is within DST.

 * @param int Timestamp

 * @param int Start month (1-12) of DST

 * @param int Which Sunday DST starts on (*_SUNDAY constants)

 * @param int End month of DST

 * @param int Which Sunday DST ends on

 * @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);

	// perform timestamp offset

	global $timezone;

	// it's gonna be in minutes, so multiply by 60 to offset the unix timestamp

	$time = $time + ( $timezone * 60 );

	$year = intval(gmdate('Y', $time));

	// one-pass validation

	if ( !in_array($start_sunday, $sundays) || !in_array($end_sunday, $sundays) ||

 			$start_month < 1 || $start_month > 12 || $end_month < 1 || $end_month > 12 )

		return false;

	// get timestamp of the selected sunday (start)

	$dst_start = get_sunday_timestamp($start_month, $start_sunday, $year);

	$dst_end   = get_sunday_timestamp($end_month, $end_sunday, $year);

	if ( $dst_start > $dst_end )

	{

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

		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

 * @param int Which Sunday (FIRST, SECOND, THIRD, or LAST)

 * @param int Year that we're doing our calculations in

 * @return int

 */