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

 */

class template

{

	var $tpl_strings, $tpl_bool, $vars_assign_history, $theme, $style, $no_headers, $additional_headers, $sidebar_extra, $sidebar_widgets, $toolbar_menu, $theme_list, $named_theme_list, $default_theme, $default_style, $plugin_blocks, $plugin_blocks_content, $namespace_string, $style_list, $theme_loaded;

	var $theme_initted = false;

	var $page_initted = false;

	var $elements = false;

	var $page_id = false;

	var $namespace = false;

	var $js_preload = array();

	var $js_append = '';

	/**

 	* Page action conditions

 	* @var array

 	*/

	var $conds = array();

	/**

 	* The PageProcessor for the current page

 	* @var object

 	*/

	var $page = false;

	/**

 	* The list of themes that are critical for Enano operation. This doesn't include oxygen which

 	* remains a user theme. By default this is admin and printable which have to be loaded on demand.

 	* @var array

 	*/

	var $system_themes = array('admin', 'printable');

	/**

 	* Set to true if the site is disabled and thus a message needs to be shown. This should ONLY be changed by common.php.

 	* @var bool

 	* @access private

 	*/

	var $site_disabled = false;

	/**

 	* One of the absolute best parts of Enano :-P

 	* @var string

 	*/

	var $fading_button = '';

	/**

	* Context stack. You can save and restore the var set.

	* @var array

	*/

	var $context_stack = array('bool' => array(), 'str' => array(), 'history' => array());

	function __construct()

	{

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

		global $cache;

		$this->tpl_bool    = Array();

		$this->tpl_strings = Array();

		$this->sidebar_extra = '';

		$this->toolbar_menu = '';

		$this->additional_headers = '';

		$this->plugin_blocks = Array();

		$this->plugin_blocks_content = array();

		$this->theme_loaded = false;

		$this->theme_list = Array();

		$this->named_theme_list = Array();

		$this->vars_assign_history = array(

				'strings' => array(),

				'bool' => array()

			);

		if ( defined('IN_ENANO_UPGRADE') )

		{

			return $this->construct_compat();

		}

		if ( !$this->theme_list = $cache->fetch('themes') )

		{

			$q = $db->sql_query('SELECT theme_id, theme_name, enabled, default_style, group_policy, group_list FROM ' . table_prefix . 'themes;');

			if ( !$q )

				$db->_die('template.php selecting theme list');

			$i = 0;

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

			{

				$this->theme_list[$i] = $row;

				$i++;

			}

			unset($theme);

			$this->theme_list = array_values($this->theme_list);

			$cache->store('themes', $this->theme_list, -1);

		}

		// Create associative array of themes

		foreach ( $this->theme_list as $i => &$theme )

			$this->named_theme_list[ $theme['theme_id'] ] =& $this->theme_list[$i];

		unset($theme);

		$this->default_theme = ( $_ = getConfig('theme_default') ) ? $_ : $this->theme_list[0]['theme_id'];

		$this->named_theme_list[ $this->default_theme ]['css'] = $this->get_theme_css_files($this->default_theme);

		// Come up with the default style. If the CSS file specified in default_style exists, we're good, just

		// use that. Otherwise, use the first stylesheet that comes to mind.

		$df_data =& $this->named_theme_list[ $this->default_theme ];

		$this->default_style = ( in_array($df_data['default_style'], $df_data['css']) ) ? $df_data['default_style'] : $df_data['css'][0];

	}

	/**

	* Save the current context and start a blank one.

	*/

	function context_push()

	{

		array_push($this->context_stack['str'], $this->tpl_strings);

		array_push($this->context_stack['bool'], $this->tpl_bool);

		array_push($this->context_stack['history'], $this->vars_assign_history);

	}

	function context_pop()

	{

		$this->tpl_strings = array_pop($this->context_stack['str']);

		$this->tpl_bool = array_pop($this->context_stack['bool']);

		$this->vars_assign_history = array_pop($this->context_stack['history']);

	}

	/**

 	* Gets the list of available CSS files (styles) for the specified theme.

 	* @param string Theme ID

 	* @return array

 	*/

	function get_theme_css_files($theme_id)

	{

		$css = array();

		$dir = ENANO_ROOT . "/themes/{$theme_id}/css";

		if ( $dh = @opendir($dir) )

		{

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

			{

				if ( preg_match('/\.css$/', $file) )

					$css[] = preg_replace('/\.css$/', '', $file);

			}

			closedir($dh);

		}

		// No CSS files? If so, nuke it.

		if ( count($css) < 1 )

		{

			unset($this->theme_list[$theme_id]);

		}

		return $css;

	}

	/**

 	* Failsafe constructor for upgrades.

 	*/

	function construct_compat()

	{

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

		$this->tpl_bool    = Array();

		$this->tpl_strings = Array();

		$this->sidebar_extra = '';

		$this->toolbar_menu = '';

		$this->additional_headers = '';

		$this->plugin_blocks = Array();

		$this->theme_loaded = false;

		$this->fading_button = '<div style="background-image: url('.scriptPath.'/images/about-powered-enano-hover.png); background-repeat: no-repeat; width: 88px; height: 31px; margin: 0 auto 5px auto;">

															<a style="background-image: none; padding-right: 0;" href="http://enanocms.org/" onclick="window.open(this.href); return false;"><img style="border-width: 0;" alt=" " src="'.scriptPath.'/images/about-powered-enano.png" onmouseover="domOpacity(this, 100, 0, 500);" onmouseout="domOpacity(this, 0, 100, 500);" /></a>

														</div>';

		$this->theme_list = Array();

		$this->named_theme_list = Array();

		$q = $db->sql_query('SELECT theme_id, theme_name, enabled, default_style FROM ' . table_prefix . 'themes;');

		if ( !$q )

			$db->_die('template.php selecting theme list');

		$i = 0;

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

		{

			$this->theme_list[$i] = $row;

			$i++;

		}

		// List out all CSS files for this theme

		foreach ( $this->theme_list as $i => &$theme )

		{

			$theme['css'] = array();

			$dir = ENANO_ROOT . "/themes/{$theme['theme_id']}/css";

			if ( $dh = @opendir($dir) )

			{

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

				{

					if ( preg_match('/\.css$/', $file) )

						$theme['css'][] = preg_replace('/\.css$/', '', $file);

				}

				closedir($dh);

			}

			// No CSS files? If so, nuke it.

			if ( count($theme['css']) < 1 )

			{

				unset($this->theme_list[$i]);

			}

		}

		$this->theme_list = array_values($this->theme_list);

		// Create associative array of themes

		foreach ( $this->theme_list as $i => &$theme )

			$this->named_theme_list[ $theme['theme_id'] ] =& $this->theme_list[$i];

		$this->default_theme = ( $_ = getConfig('theme_default') ) ? $_ : $this->theme_list[0]['theme_id'];

		// Come up with the default style. If the CSS file specified in default_style exists, we're good, just

		// use that. Otherwise, use the first stylesheet that comes to mind.

		$df_data =& $this->named_theme_list[ $this->default_theme ];

		$this->default_style = ( in_array($df_data['default_style'], $df_data['css']) ) ? $df_data['default_style'] : $df_data['css'][0];

	}

	/**

 	* Systematically deletes themes from available list if they're blocked by theme security settings. Called when session->start() finishes.

 	*/

	function process_theme_acls()

	{

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

		global $lang;

		// generate the fading button - needs to be done after sessions are started

		$admintitle = ( $session->user_level >= USER_LEVEL_ADMIN && is_object(@$lang) ) ? ' title="' . $lang->get('sidebar_btn_enanopowered_admin_tip') . '"' : '';

		$this->fading_button = '<div style="background-image: url('.cdnPath.'/images/about-powered-enano-hover.png); background-repeat: no-repeat; width: 88px; height: 31px; margin: 0 auto 5px auto;">

															<a style="background-image: none; padding-right: 0;" href="http://enanocms.org/" onclick="window.open(this.href); return false;"' . $admintitle . '><img style="border-width: 0;" alt=" " src="'.cdnPath.'/images/about-powered-enano.png" onmouseover="domOpacity(this, 100, 0, 500);" onmouseout="domOpacity(this, 0, 100, 500);" /></a>

														</div>';

		// For each theme, check ACLs and delete from RAM if not authorized

		foreach ( $this->theme_list as $i => $theme )

		{

			if ( !@$theme['group_list'] )

				continue;

			if ( $theme['theme_id'] === getConfig('theme_default') )

				continue;

			switch ( $theme['group_policy'] )

			{

				case 'allow_all':

					// Unconditionally allowed

					continue;

					break;

				case 'whitelist':

					// If we're not on the list, off to the left please

					$list = enano_json_decode($theme['group_list']);

					$allowed = false;

					foreach ( $list as $acl )

					{

						if ( !preg_match('/^(u|g):([0-9]+)$/', $acl, $match) )

							// Invalid list entry, silently allow (maybe not a good idea but

							// really, these things are checked before they're inserted)

							continue 2;

						$mode = $match[1];

						$id = intval($match[2]);

						switch ( $mode )

						{

							case 'u':

								$allowed = ( $id == $session->user_id );

								if ( $allowed )

									break 2;

								break;

							case 'g':

								$allowed = ( isset($session->groups[$id]) );

								if ( $allowed )

									break 2;

						}

					}

					if ( !$allowed )

					{

						unset($this->theme_list[$i]);

					}

					break;

				case 'blacklist':

					// If we're ON the list, off to the left please

					$list = enano_json_decode($theme['group_list']);

					$allowed = true;

					foreach ( $list as $acl )

					{

						if ( !preg_match('/^(u|g):([0-9]+)$/', $acl, $match) )

							// Invalid list entry, silently allow (maybe not a good idea but

							// really, these things are checked before they're inserted)

							continue 2;

						$mode = $match[1];

						$id = intval($match[2]);

						switch ( $mode )

						{

							case 'u':

								$allowed = ( $id != $session->user_id );

								if ( !$allowed )

									break 2;

								break;

							case 'g':

								$allowed = ( !isset($session->groups[$id]) );

								if ( !$allowed )

									break 2;

						}

					}

					if ( !$allowed )

					{

						unset($this->theme_list[$i]);

					}

					break;

			}

		}

		$this->theme_list = array_values($this->theme_list);

		// Rebuild associative theme list

		$this->named_theme_list = array();

		foreach ( $this->theme_list as $i => &$theme )

			$this->named_theme_list[ $theme['theme_id'] ] =& $this->theme_list[$i];

	}

	/**

 	* Register a new sidebar block.

 	* @param string Block title

 	* @param string Block HTML

 	* @param bool If true, the class of the block will be the same as the one used for blocks that are a list of links instead of HTML content. This can do some wacky things like make all your <a>s block level.

 	*/

	function sidebar_widget($t, $h, $use_normal_section = false)

	{

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

		if ( !$this->theme_loaded )

		{

			$this->load_theme($session->theme, $session->style);

		}

		if(!$this->sidebar_widgets)

			$this->sidebar_widgets = '';

		$tplvars = $this->extract_vars('elements.tpl');

		if ( $use_normal_section )

		{

			$parser = $this->makeParserText($tplvars['sidebar_section']);

		}

		else

		{

			$parser = $this->makeParserText($tplvars['sidebar_section_raw']);

		}

		$parser->assign_vars(Array('TITLE' => '{TITLE}','CONTENT' => $h));

		$this->plugin_blocks[$t] = $parser->run();

		$this->plugin_blocks_content[$t] = $h;

		$this->sidebar_widgets .= $parser->run();

	}

	function add_header($html)

	{

		/* debug only **

		$bt = debug_backtrace();

		$bt = $bt[1];

		$this->additional_headers .= "\n    <!-- {$bt['file']}:{$bt['line']} -->\n    " . $html;

		*/

		$this->additional_headers .= "\n   " . $html;

	}

	function get_css($s = false)

	{

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

		$this->init_vars();

		$path = ( $s ) ? 'css/'.$s : 'css/'.$this->style.'.css';

		if ( !file_exists(ENANO_ROOT . '/themes/' . $this->theme . '/' . $path) )

		{

			echo "/* WARNING: Falling back to default file because file $path does not exist */\n";

			$path = 'css/' . $this->style_list[0] . '.css';

		}

		return $this->process_template($path);

	}

	function load_theme($name = false, $css = false)

	{

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

		$this->theme = ( $name ) ? $name : $session->theme;

		$this->style = ( $css ) ? $css : $session->style;

		if ( !$this->theme )

		{

			$this->theme = $this->theme_list[0]['theme_id'];

			$this->style = preg_replace('/\.css$/', '', $this->theme_list[0]['default_style']);

		}

		// Make sure we're allowed to use this theme.

		if ( (

				// If it was removed, it's probably blocked by an ACL, or it was uninstalled

				!isset($this->named_theme_list[$this->theme]) ||

				// Check if the theme is disabled

				( isset($this->named_theme_list[$this->theme]) && isset($this->named_theme_list[$this->theme]['enabled']) && $this->named_theme_list[$this->theme]['enabled'] == 0 ) )

				// Above all, if it's a system theme, don't inhibit the loading process.

				&& !in_array($this->theme, $this->system_themes)

			)

		{

			// No, something is preventing it - fall back to site default

			$this->theme = $this->default_theme;

			// Come up with the default style. If the CSS file specified in default_style exists, we're good, just

			// use that. Otherwise, use the first stylesheet that comes to mind.

			$df_data =& $this->named_theme_list[ $this->theme ];

			$this->style = ( in_array($df_data['default_style'], $df_data['css']) ) ? $df_data['default_style'] : $df_data['css'][0];

		}

		// The list of styles for the currently selected theme

		$this->style_list =& $this->named_theme_list[ $this->theme ]['css'];

		$this->theme_loaded = true;

	}

	/**

 	* Change the theme we're supposed to display.

 	* @param string Theme name

 	* @param string Style name; optional

 	*/

	function set_theme($theme = false, $style = false)

	{

		$this->theme_initted = false;

		$this->load_theme($theme, $style);

	}

	/**

 	* Change the page we're supposed to generate for

 	* @param mixed Page ID *or* PageProcessor. If a PageProcessor, pulls permission info and such from that; if not, starts a PageProcessor. YOU SHOULD USE A PageProcessor WHENEVER POSSIBLE! It improves efficiency.

 	* @param string Namespace; not required if including a PageProcessor.

 	*/

	function set_page($page_id_or_pp, $namespace = false)

	{

		global $paths;

		if ( is_object($page_id_or_pp) && get_class($page_id_or_pp) === 'PageProcessor' )

		{

			$this->page_initted = false;

			$page =& $page_id_or_pp;

			$this->page = $page;

			$this->page_id = $page->page_id;

			$this->namespace = $page->namespace;

		}

		else if ( is_string($page_id_or_pp) )

		{

			if ( !is_string($namespace) )

				return false;

			if ( $page_id_or_pp === $this->page_id && $namespace === $this->namespace )

				return true;

			$this->page_initted = false;

			$this->page = false;

			$this->page_id = sanitize_page_id($page_id_or_pp);

			$this->namespace = $namespace;

		}

		else

		{

			return false;

		}

		$this->assign_vars(array(

				'PAGE_URLNAME' => $paths->get_pathskey($this->page_id, $this->namespace)

			));

		return true;

	}

	/**

 	* Queue a Javascript file to be loaded with the page instead of on demand.

 	* @param mixed Javascript file string or array thereof, extensions are optional

 	* @example

 	<code>

 	$template->preload_js(array('jquery', 'jquery-ui'));

 	$template->preload_js('admin-menu.js');

 	</code>

 	* @return null

 	*/

	function preload_js($filemixed)

	{

		if ( is_string($filemixed) )

			$files = array($filemixed);

		else if ( is_array($filemixed) )

			$files = $filemixed;

		else

			// :-/