<?php

/*

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

 * Version 1.1.2 (Caoineag alpha 2)

 * Copyright (C) 2006-2007 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, $theme, $style, $no_headers, $additional_headers, $sidebar_extra, $sidebar_widgets, $toolbar_menu, $theme_list, $named_theme_list, $default_theme, $default_style, $plugin_blocks, $namespace_string, $style_list, $theme_loaded;

  /**

   * 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 = '';

  function __construct()

  {

    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();

    $e = $db->sql_query('SELECT theme_id,theme_name,enabled,default_style FROM '.table_prefix.'themes WHERE enabled=1 ORDER BY theme_order;');

    if(!$e) $db->_die('The list of themes could not be selected.');

    for($i=0;$i < $db->numrows(); $i++)

    {

      $this->theme_list[$i] = $db->fetchrow();

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

    }

    $db->free_result();

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

    $dir = ENANO_ROOT.'/themes/'.$this->default_theme.'/css/';

    $list = Array();

    // Open a known directory, and proceed to read its contents

    if (is_dir($dir)) {

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

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

          if(preg_match('#^(.*?)\.css$#i', $file) && $file != '_printable.css') {

            $list[] = substr($file, 0, strlen($file)-4);

          }

        }

        closedir($dh);

      }

    }

    $def = ENANO_ROOT.'/themes/'.$this->default_theme.'/css/'.$this->named_theme_list[$this->default_theme]['default_style'];

    if(file_exists($def))

    {

      $this->default_style = substr($this->named_theme_list[$this->default_theme]['default_style'], 0, strlen($this->named_theme_list[$this->default_theme]['default_style'])-4);

    } else {

      $this->default_style = $list[0];

    }

    $this->style_list = $list;

  }

  function sidebar_widget($t, $h)

  {

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

    if(!defined('ENANO_TEMPLATE_LOADED'))

    {

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

    }

    if(!$this->sidebar_widgets)

      $this->sidebar_widgets = '';

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

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

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

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

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

  }

  function add_header($html)

  {

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

  }

  function get_css($s = false)

  {

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

    if(!defined('ENANO_TEMPLATE_LOADED'))

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

    $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 = substr($this->theme_list[0]['default_style'], 0, strlen($this->theme_list[0]['default_style'])-4);

    }

    $this->theme_loaded = true;

  }

  function init_vars()

  {

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

    global $email;

    global $lang;

    profiler_log("template: starting var init");

    if(!$this->theme || !$this->style)

    {

      $this->load_theme();

    }

    if(defined('ENANO_TEMPLATE_LOADED'))

    {

      die_semicritical('Illegal call', '<p>$template->load_theme was called multiple times, this is not supposed to happen. Exiting with fatal error.</p>');

    }

    define('ENANO_TEMPLATE_LOADED', '');

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

    if(isset($_SERVER['HTTP_USER_AGENT']) && strstr($_SERVER['HTTP_USER_AGENT'], 'MSIE'))

    {

      $this->add_header('

        <!--[if lt IE 7]>

        <script language="JavaScript">

        function correctPNG() // correctly handle PNG transparency in Win IE 5.5 & 6.

        {

           var arVersion = navigator.appVersion.split("MSIE");

           var version = parseFloat(arVersion[1]);

           if (version >= 5.5 && typeof(document.body.filters) == "object")

           {

              for(var i=0; i<document.images.length; i++)

              {

                 var img = document.images[i];

                 continue;

                 var imgName = img.src.toUpperCase();

                 if (imgName.substring(imgName.length-3, imgName.length) == "PNG")

                 {

                    var imgID = (img.id) ? "id=\'" + img.id + "\' " : "";

                    var imgClass = (img.className) ? "class=\'" + img.className + "\' " : "";

                    var imgTitle = (img.title) ? "title=\'" + img.title + "\' " : "title=\'" + img.alt + "\' ";

                    var imgStyle = "display:inline-block;" + img.style.cssText;

                    if (img.align == "left") imgStyle = "float:left;" + imgStyle;

                    if (img.align == "right") imgStyle = "float:right;" + imgStyle;

                    if (img.parentElement.href) imgStyle = "cursor:hand;" + imgStyle;

                    var strNewHTML = "<span " + imgID + imgClass + imgTitle + " style=\\"" + "width:" + img.width + "px; height:" + img.height + "px;" + imgStyle + ";" + "filter:progid:DXImageTransform.Microsoft.AlphaImageLoader" + "(src=\\\'" + img.src + "\\\', sizingMethod=\'scale\');\\"></span>";

                    img.outerHTML = strNewHTML;

                    i = i-1;

                 }

              }

           }   

        }

        window.attachEvent("onload", correctPNG);

        </script>

        <![endif]-->

        ');

    }

    // Get the "article" button text (depends on namespace)

    switch($paths->namespace) {

      case "Article":

      default:

        $ns = $lang->get('onpage_lbl_page_article');

        break;

      case "Admin":

        $ns = $lang->get('onpage_lbl_page_admin');

        break;

      case "System":

        $ns = $lang->get('onpage_lbl_page_system');

        break;

      case "File":

        $ns = $lang->get('onpage_lbl_page_file');

        break;

      case "Help":

        $ns = $lang->get('onpage_lbl_page_help');

        break;

      case "User":

        $ns = $lang->get('onpage_lbl_page_user');

        break;

      case "Special":

        $ns = $lang->get('onpage_lbl_page_special');

        break;

      case "Template":

        $ns = $lang->get('onpage_lbl_page_template');

        break;

      case "Project":

        $ns = $lang->get('onpage_lbl_page_project');

        break;

      case "Category":

        $ns = $lang->get('onpage_lbl_page_category');

        break;

      case "Anonymous":

        $ns = 'external page';

        break;

    }

    $this->namespace_string = $ns;

    unset($ns);

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

    foreach ( $code as $cmd )

    {

      eval($cmd);

    }

    $ns =& $this->namespace_string;

    // Initialize the toolbar

    $tb = '';

    // Create "xx page" button

    $btn_selected = ( isset($tplvars['toolbar_button_selected'])) ? $tplvars['toolbar_button_selected'] : $tplvars['toolbar_button'];

    $parser = $this->makeParserText($btn_selected);

    if ( true || !$paths->anonymous_page )

    {

      $parser->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxReset()); return false; }" title="' . $lang->get('onpage_tip_article') . '" accesskey="a"',

          'PARENTFLAGS' => 'id="mdgToolbar_article"',

          'HREF' => makeUrl($paths->page, null, true),

          'TEXT' => $this->namespace_string

        ));

      $tb .= $parser->run();

    }

    $button = $this->makeParserText($tplvars['toolbar_button']);

    // Page toolbar

    // Comments button

    if ( $session->get_permissions('read') && getConfig('enable_comments')=='1' && $paths->namespace != 'Special' && $paths->namespace != 'Admin' && $paths->cpage['comments_on'] == 1 )

    {

      $e = $db->sql_query('SELECT approved FROM '.table_prefix.'comments WHERE page_id=\''.$paths->page_id.'\' AND namespace=\''.$paths->namespace.'\';');

      if ( !$e )

      {

        $db->_die();

      }

      $nc = $db->numrows();

      $nu = 0;

      $na = 0;

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

      {  

        if ( !$r['approved'] )

        {

          $nu++;

        }

        else

        {

          $na++;

        }

      }

      $db->free_result();

      $n = ( $session->get_permissions('mod_comments') ) ? (string)$nc : (string)$na;

      if ( $session->get_permissions('mod_comments') && $nu > 0 )

      {

        $subst = array(

            'num_comments' => $nc,

            'num_unapp' => $nu

          );

        $btn_text = $lang->get('onpage_btn_discussion_unapp', $subst);

      }

      else

      {

        $subst = array(

          'num_comments' => $nc

        );

        $btn_text = $lang->get('onpage_btn_discussion', $subst);

      }

      $button->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxComments()); return false; }" title="' . $lang->get('onpage_tip_comments') . '" accesskey="c"',

          'PARENTFLAGS' => 'id="mdgToolbar_discussion"',

          'HREF' => makeUrl($paths->page, 'do=comments', true),

          'TEXT' => $btn_text,

        ));

      $tb .= $button->run();

    }

    // Edit button

    if($session->get_permissions('read') && ($paths->namespace != 'Special' && $paths->namespace != 'Admin' && $paths->namespace != 'Anonymous') && ( $session->get_permissions('edit_page') && ( ( $paths->page_protected && $session->get_permissions('even_when_protected') ) || !$paths->page_protected ) ) )

    {

      $button->assign_vars(array(

        'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxEditor()); return false; }" title="' . $lang->get('onpage_tip_edit') . '" accesskey="e"',

        'PARENTFLAGS' => 'id="mdgToolbar_edit"',

        'HREF' => makeUrl($paths->page, 'do=edit', true),

        'TEXT' => $lang->get('onpage_btn_edit')

        ));

      $tb .= $button->run();

    // View source button

    }

    else if($session->get_permissions('view_source') && ( !$session->get_permissions('edit_page') || !$session->get_permissions('even_when_protected') && $paths->page_protected ) && $paths->namespace != 'Special' && $paths->namespace != 'Admin' && $paths->namespace != 'Anonymous') 

    {

      $button->assign_vars(array(

        'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxEditor()); return false; }" title="' . $lang->get('onpage_tip_viewsource') . '" accesskey="e"',

        'PARENTFLAGS' => 'id="mdgToolbar_edit"',

        'HREF' => makeUrl($paths->page, 'do=viewsource', true),

        'TEXT' => $lang->get('onpage_btn_viewsource')

        ));

      $tb .= $button->run();

    }

    // History button

    if ( $session->get_permissions('read') /* && $paths->wiki_mode */ && $paths->page_exists && $paths->namespace != 'Special' && $paths->namespace != 'Admin' && $session->get_permissions('history_view') )

    {

      $button->assign_vars(array(

        'FLAGS'       => 'onclick="if ( !KILL_SWITCH ) { void(ajaxHistory()); return false; }" title="' . $lang->get('onpage_tip_history') . '" accesskey="h"',

        'PARENTFLAGS' => 'id="mdgToolbar_history"',

        'HREF'        => makeUrl($paths->page, 'do=history', true),

        'TEXT'        => $lang->get('onpage_btn_history')

        ));

      $tb .= $button->run();

    }

    $menubtn = $this->makeParserText($tplvars['toolbar_menu_button']);

    // Additional actions menu

    // Rename button

    if ( $session->get_permissions('read') && $paths->page_exists && ( $session->get_permissions('rename') && ( $paths->page_protected && $session->get_permissions('even_when_protected') || !$paths->page_protected ) ) && $paths->namespace != 'Special' && $paths->namespace != 'Admin' )

    {

      $menubtn->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxRename()); return false; }" title="' . $lang->get('onpage_tip_rename') . '" accesskey="r"',

          'HREF'  => makeUrl($paths->page, 'do=rename', true),

          'TEXT'  => $lang->get('onpage_btn_rename'),

        ));

      $this->toolbar_menu .= $menubtn->run();

    }

    // Vote-to-delete button

    if ( $paths->wiki_mode && $session->get_permissions('vote_delete') && $paths->page_exists && $paths->namespace != 'Special' && $paths->namespace != 'Admin')

    {

      $menubtn->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxDelVote()); return false; }" title="' . $lang->get('onpage_tip_delvote') . '" accesskey="d"',

          'HREF'  => makeUrl($paths->page, 'do=delvote', true),

          'TEXT'  => $lang->get('onpage_btn_votedelete'),

        ));

      $this->toolbar_menu .= $menubtn->run();

    }

    // Clear-votes button

    if ( $session->get_permissions('read') && $paths->wiki_mode && $paths->page_exists && $paths->namespace != 'Special' && $paths->namespace != 'Admin' && $session->get_permissions('vote_reset') && $paths->cpage['delvotes'] > 0)

    {

      $menubtn->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxResetDelVotes()); return false; }" title="' . $lang->get('onpage_tip_resetvotes') . '" accesskey="y"',

          'HREF'  => makeUrl($paths->page, 'do=resetvotes', true),

          'TEXT'  => $lang->get('onpage_btn_votedelete_reset'),

        ));

      $this->toolbar_menu .= $menubtn->run();

    }

    // Printable page button

    if ( $paths->page_exists && $paths->namespace != 'Special' && $paths->namespace != 'Admin' )

    {

      $menubtn->assign_vars(array(

          'FLAGS' => 'title="' . $lang->get('onpage_tip_printable') . '"',

          'HREF'  => makeUrl($paths->page, 'printable=yes', true),

          'TEXT'  => $lang->get('onpage_btn_printable'),

        ));

      $this->toolbar_menu .= $menubtn->run();

    }

    // Protect button

    if($session->get_permissions('read') && $paths->wiki_mode && $paths->page_exists && $paths->namespace != 'Special' && $paths->namespace != 'Admin' && $session->get_permissions('protect'))

    {

      $label = $this->makeParserText($tplvars['toolbar_label']);

      $label->assign_vars(array('TEXT' => $lang->get('onpage_lbl_protect')));

      $t0 = $label->run();

      $ctmp = ''; 

      if ( $paths->cpage['protected'] == 1 )

      {

        $ctmp=' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => 'accesskey="i" onclick="if ( !KILL_SWITCH ) { ajaxProtect(1); return false; }" id="protbtn_1" title="' . $lang->get('onpage_tip_protect_on') . '"'.$ctmp,

          'HREF'  => makeUrl($paths->page, 'do=protect&level=1', true),

          'TEXT'  => $lang->get('onpage_btn_protect_on')

        ));

      $t1 = $menubtn->run();

      $ctmp = '';

      if ( $paths->cpage['protected'] == 0 )

      {

        $ctmp=' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => 'accesskey="o" onclick="if ( !KILL_SWITCH ) { ajaxProtect(0); return false; }" id="protbtn_0" title="' . $lang->get('onpage_tip_protect_off') . '"'.$ctmp,

          'HREF'  => makeUrl($paths->page, 'do=protect&level=0', true),

          'TEXT'  => $lang->get('onpage_btn_protect_off')

        ));

      $t2 = $menubtn->run();

      $ctmp = '';

      if ( $paths->cpage['protected'] == 2 )

      {

        $ctmp = ' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => 'accesskey="p" onclick="if ( !KILL_SWITCH ) { ajaxProtect(2); return false; }" id="protbtn_2" title="' . $lang->get('onpage_tip_protect_semi') . '"'.$ctmp,

          'HREF'  => makeUrl($paths->page, 'do=protect&level=2', true),

          'TEXT'  => $lang->get('onpage_btn_protect_semi')

        ));

      $t3 = $menubtn->run();

      $this->toolbar_menu .= '        <table border="0" cellspacing="0" cellpadding="0">

          <tr>

            <td>'.$t0.'</td>

            <td>'.$t1.'</td>

            <td>'.$t2.'</td>

            <td>'.$t3.'</td>

          </tr>

        </table>';

    }

    // Wiki mode button

    if($session->get_permissions('read') && $paths->page_exists && $session->get_permissions('set_wiki_mode') && $paths->namespace != 'Special' && $paths->namespace != 'Admin')

    {

      // label at start

      $label = $this->makeParserText($tplvars['toolbar_label']);

      $label->assign_vars(array('TEXT' => $lang->get('onpage_lbl_wikimode')));

      $t0 = $label->run();

      // on button

      $ctmp = '';

      if ( $paths->cpage['wiki_mode'] == 1 )

      {

        $ctmp = ' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => /* 'onclick="if ( !KILL_SWITCH ) { ajaxSetWikiMode(1); return false; }" id="wikibtn_1" title="Forces wiki functions to be allowed on this page."'. */ $ctmp,

          'HREF' => makeUrl($paths->page, 'do=setwikimode&level=1', true),

          'TEXT' => $lang->get('onpage_btn_wikimode_on')

        ));

      $t1 = $menubtn->run();

      // off button

      $ctmp = '';

      if ( $paths->cpage['wiki_mode'] == 0 )

      {

        $ctmp=' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => /* 'onclick="if ( !KILL_SWITCH ) { ajaxSetWikiMode(0); return false; }" id="wikibtn_0" title="Forces wiki functions to be disabled on this page."'. */ $ctmp,

          'HREF' => makeUrl($paths->page, 'do=setwikimode&level=0', true),

          'TEXT' => $lang->get('onpage_btn_wikimode_off')

        ));

      $t2 = $menubtn->run();

      // global button

      $ctmp = ''; 

      if ( $paths->cpage['wiki_mode'] == 2 )

      {

        $ctmp=' style="text-decoration: underline;"';

      }

      $menubtn->assign_vars(array(

          'FLAGS' => /* 'onclick="if ( !KILL_SWITCH ) { ajaxSetWikiMode(2); return false; }" id="wikibtn_2" title="Causes this page to use the global wiki mode setting (default)"'. */ $ctmp,

          'HREF' => makeUrl($paths->page, 'do=setwikimode&level=2', true),

          'TEXT' => $lang->get('onpage_btn_wikimode_global')

        ));

      $t3 = $menubtn->run();

      // Tack it onto the list of buttons that are already there...

      $this->toolbar_menu .= '        <table border="0" cellspacing="0" cellpadding="0">

          <tr>

            <td>'.$t0.'</td>

            <td>'.$t1.'</td>

            <td>'.$t2.'</td>

            <td>'.$t3.'</td>

          </tr>

        </table>';

    }

    // Clear logs button

    if ( $session->get_permissions('read') && $session->get_permissions('clear_logs') && $paths->namespace != 'Special' && $paths->namespace != 'Admin' )

    {

      $menubtn->assign_vars(array(

          'FLAGS' => 'onclick="if ( !KILL_SWITCH ) { void(ajaxClearLogs()); return false; }" title="' . $lang->get('onpage_tip_flushlogs') . '" accesskey="l"',

          'HREF'  => makeUrl($paths->page, 'do=flushlogs', true),

          'TEXT'  => $lang->get('onpage_btn_clearlogs'),

        ));

      $this->toolbar_menu .= $menubtn->run();

    }

    // Delete page button