<?php

/*

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

 * Version 1.1.5 (Caoineag alpha 5)

 * pageprocess.php - intelligent retrieval of pages

 * Copyright (C) 2006-2008 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 to handle fetching page text (possibly from a cache) and formatting it.

 * As of 1.0.4, this also handles the fetching and editing of certain data for pages.

 * @package Enano

 * @subpackage UI

 * @copyright 2007 Dan Fuhry

 * @license GNU General Public License <http://www.gnu.org/licenses/gpl.html>

 */

class PageProcessor

{

  /**

   * Page ID and namespace of the page handled by this instance

   * @var string

   */

  var $page_id;

  var $namespace;

  /**

   * The title of the page sent to the template parser

   * @var string

   */

  var $title = '';

  /**

   * The information about the page(s) we were redirected from

   * @var array

   */

  var $redirect_stack = array();

  /**

   * The revision ID (history entry) to send. If set to 0 (the default) then the most recent revision will be sent.

   * @var int

   */

  var $revision_id = 0;

  /**

   * The time this revision was saved, as a UNIX timestamp

   * @var int

   */

  var $revision_time = 0;

  /**

   * Unsanitized page ID.

   * @var string

   */

  var $page_id_unclean;

  /**

   * Tracks if the page we're loading exists in the database or not.

   * @var bool

   */

  var $page_exists = false;

  /**

   * Permissions!

   * @var object

   */

  var $perms = null;

  /**

   * The SHA1 hash of the user-inputted password for the page

   * @var string

   */

  var $password = '';

  /**

   * Switch to track if redirects are allowed. Defaults to true.

   * @var bool

   */

  var $allow_redir = true;

  /**

   * If this is set to true, this will call the header and footer funcs on $template when render() is called.

   * @var bool

   */

  var $send_headers = false;

  /**

   * Cache the fetched text so we don't fetch it from the DB twice.

   * @var string

   */

  var $text_cache = '';

  /**

   * Debugging information to track errors. You can set enable to false to disable sending debug information.

   * @var array

   */

  var $debug = array(

      'enable' => false,

      'works'  => false

    );

  /**

   * The list of errors raised in the class.

   * @var array

   */

  var $_errors = array();

  /**

   * Constructor.

   * @param string The page ID (urlname) of the page

   * @param string The namespace of the page

   * @param int Optional. The revision ID to send.

   */

  function __construct( $page_id, $namespace, $revision_id = 0 )

  {

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

    profiler_log("PageProcessor [{$namespace}:{$page_id}]: Started constructor");

    // See if we can get some debug info

    if ( function_exists('debug_backtrace') && $this->debug['enable'] )

    {

      $this->debug['works'] = true;

      $this->debug['backtrace'] = enano_debug_print_backtrace(true);

    }

    // First things first - check page existence and permissions

    if ( !isset($paths->nslist[$namespace]) )

    {

      $this->send_error('The namespace "' . htmlspecialchars($namespace) . '" does not exist.');

    }

    if ( !is_int($revision_id) )

      $revision_id = 0;

    $this->_setup( $page_id, $namespace, $revision_id );

  }

  /**

   * The main method to send the page content. Also responsible for checking permissions and calling the statistics counter.

   * @param bool If true, the stat counter is called. Defaults to false.

   */

  function send( $do_stats = false )

  {

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

    global $lang;

    profiler_log('PageProcessor: send() called');

    if ( !$this->perms->get_permissions('read') )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      // Permission denied to read page. Is this one of our core pages that must always be allowed?

      // NOTE: Not even the administration panel will work if ACLs deny access to it.

      if ( $this->namespace == 'Special' && in_array($this->page_id, array('Login', 'Logout', 'LangExportJSON', 'CSS')) )

      {

        // Do nothing; allow execution to continue

      }

      else

      {

        // Page isn't whitelisted, behave as normal

        $this->err_access_denied();

        return false;

      }

    }

    // Is there a custom function registered for handling this namespace?

    if ( $proc = $paths->get_namespace_processor($this->namespace) )

    {

      // yes, just call that

      // this is protected aggressively by the PathManager against overriding critical namespaces

      return call_user_func($proc, $this);

    }

    $pathskey = $paths->nslist[ $this->namespace ] . $this->page_id;

    $strict_no_headers = false;

    if ( $this->namespace == 'Admin' && strstr($this->page_id, '/') )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      $this->page_id = substr($this->page_id, 0, strpos($this->page_id, '/'));

      $funcname = "page_{$this->namespace}_{$this->page_id}";

      if ( function_exists($funcname) )

      {

        $this->page_exists = true;

      }

    }

    if ( isset($paths->pages[$pathskey]) )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      if ( $paths->pages[$pathskey]['special'] == 1 )

      {

        $this->send_headers = false;

        $strict_no_headers = true;

      }

      if ( isset($paths->pages[$pathskey]['password']) )

      {

        if ( $paths->pages[$pathskey]['password'] != '' && $paths->pages[$pathskey]['password'] != sha1('') )

        {

          $password =& $paths->pages[$pathskey]['password'];

          if ( $this->password != $password )

          {

            $this->err_wrong_password();

            return false;

          }

        }

      }

    }

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

    {

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

      doStats($this->page_id, $this->namespace);

    }

    if ( $this->namespace == 'Special' || $this->namespace == 'Admin' )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      $this->revision_time = time();

      if ( !$this->page_exists )

      {

        $func_name = "page_{$this->namespace}_{$this->page_id}";

        die_semicritical($lang->get('page_msg_admin_404_title'), $lang->get('page_msg_admin_404_body', array('func_name' => $func_name)), (!$this->send_headers));

      }

      $func_name = "page_{$this->namespace}_{$this->page_id}";

      if ( function_exists($func_name) )

      {

        $result = @call_user_func($func_name);

        return $result;

      }

      else

      {

        $title = $lang->get('page_err_custompage_function_missing_title');

        $message = $lang->get('page_err_custompage_function_missing_body', array( 'function_name' => $fname ));

        if ( $this->send_headers )

        {

          $template->tpl_strings['PAGE_NAME'] = $title;

          $template->header();

          echo "<p>$message</p>";

          $template->footer();

        }

        else

        {

          echo "<h2>$title</h2>

                <p>$message</p>";

        }

        return false;

      }

    }

    else if ( $this->namespace == 'User' && strpos($this->page_id, '/') === false )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      $this->_handle_userpage();

    }

    else if ( ( $this->namespace == 'Template' || $this->namespace == 'System' ) && $this->page_exists )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      $this->header();

      $text = $this->fetch_text();

      $text = preg_replace('/<noinclude>(.*?)<\/noinclude>/is', '\\1', $text);

      $text = preg_replace('/<nodisplay>(.*?)<\/nodisplay>/is', '', $text);

      $text = RenderMan::render( $text );

      eval( '?>' . $text );

      $this->footer();

    }

    else if ( $this->namespace == 'API' )

    {

      if ( $this->send_headers )

      {

        $template->init_vars($this);

      }

      $uri = scriptPath . '/' . $this->page_id;

      if ( !$this->send_headers )

      {

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

        $uri .= "{$sep}noheaders";

      }

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

    }

    else if ( !$this->page_exists )

    {

      // Perhaps this is hooked?

      ob_start();

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

      foreach ( $code as $cmd )

      {

        eval($cmd);

      }

      $ob = ob_get_contents();

      if ( empty($ob) )

      {

        if ( $this->send_headers )

        {

          $template->init_vars($this);

        }

        $this->err_page_not_existent();

      }

      else

      {

        // Something sent content, so we'll assume the page exist...ed at least according to the plugin

        if ( $this->namespace != 'Special' && $this->namespace != 'Admin' && $do_stats )

        {

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

          doStats($this->page_id, $this->namespace);

        }

      }

    }

    else

    {

      $this->send_from_db($strict_no_headers);

    }

  }

  /**

   * Sends the page through by fetching it from the database.

   */

  function send_from_db($strict_no_headers = false)

  {

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

    global $lang;

    // Send as regular page

    if ( $this->send_headers )

    {

      $template->init_vars($this);

    }

    $text = $this->fetch_text();

    if ( $text == 'err_no_text_rows' )

    {

      $this->err_no_rows();

      return false;

    }

    else

    {

      $redirect = ( isset($_GET['redirect']) ) ? $_GET['redirect'] : 'YES YOU IDIOT';

      if ( preg_match('/^#redirect \[\[([^\]]+)\]\]/i', $text, $match) && $redirect != 'no' )

      {

        // Redirect page!

        $page_to = sanitize_page_id($match[1]);

        $page_id_data = RenderMan::strToPageID($page_to);

        if ( count($this->redirect_stack) >= 3 )

        {

          $this->render( (!$strict_no_headers), '<div class="usermessage"><b>' . $lang->get('page_err_redirects_exceeded') . '</b></div>' );

        }

        else

        {

          $result = $this->_handle_redirect($page_id_data[0], $page_id_data[1]);

          if ( $result !== true )

          {

            // There was some error during the redirect process - usually an infinite redirect

            $this->render( (!$strict_no_headers), '<div class="usermessage"><b>' . $result . '</b></div>' );

          }

        }

      }

      else

      {

        $this->render( (!$strict_no_headers) );

      }

    }

  }

  /**

   * Fetches the wikitext or HTML source for the page.

   * @return string

   */

  function fetch_source()

  {

    if ( !$this->perms->get_permissions('view_source') )

    {

      return false;

    }

    if ( !$this->page_exists )

    {

      return '';

    }

    return $this->fetch_text();

  }

  /**

   * Updates (saves/changes/edits) the content of the page.

   * @param string The new text for the page

   * @param string A summary of edits made to the page.

   * @param bool If true, the edit is marked as a minor revision

   * @return bool True on success, false on failure. When returning false, it will push errors to the PageProcessor error stack; read with $page->pop_error()

   */

  function update_page($text, $edit_summary = false, $minor_edit = false)

  {

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

    global $lang;

    // Create the page if it doesn't exist

    if ( !$this->page_exists )

    {

      if ( !$this->create_page() )

      {

        return false;

      }

    }

    //

    // Validation

    //

    $page_id = $db->escape($this->page_id);

    $namespace = $db->escape($this->namespace);

    $q = $db->sql_query('SELECT protected FROM ' . table_prefix . "pages WHERE urlname='$page_id' AND namespace='$namespace';");

    if ( !$q )

      $db->_die('PageProcess updating page content');

    if ( $db->numrows() < 1 )

    {

      $this->raise_error($lang->get('editor_err_no_rows'));

      return false;

    }

    // Do we have permission to edit the page?

    if ( !$this->perms->get_permissions('edit_page') )

    {

      $this->raise_error($lang->get('editor_err_no_permission'));

      return false;

    }

    list($protection) = $db->fetchrow_num();

    $db->free_result();

    if ( $protection == 1 )

    {

      // The page is protected - do we have permission to edit protected pages?

      if ( !$this->perms->get_permissions('even_when_protected') )

      {

        $this->raise_error($lang->get('editor_err_page_protected'));

        return false;

      }

    }

    else if ( $protection == 2 )

    {

      // The page is semi-protected.

      if (

           ( !$session->user_logged_in || // Is the user logged in?

             ( $session->user_logged_in && $session->reg_time + ( 4 * 86400 ) >= time() ) ) // If so, have they been registered for 4 days?