modules/tribune/tribune.module

<?php
// vim:filetype=php expandtab tabstop=2 softtabstop=2 shiftwidth=2 autoindent smartindent
// $Id: tribune.module,v 1.168 2008/11/30 15:27:45 seeschloss Exp $

/**
 * Some variables
 */
$_tribune_current_post_id  = -1;
$_tribune_current_clock_id = -1;

/**
 * Display help and module information
 * @param section which section of the site we're displaying help
 * @return help text for section
 */
function tribune_help($section = '') {

  $output = '';
  switch ($section) {
  case "admin/help#tribune":
    $output = "<p>". t("Provides a 'tribune'") ."</p>";
    break;
  }

  return $output;
}

function tribune_load($nid) {
  $node = NULL;

  if (!is_object($nid)) {
    $node = node_load(array('type' => "tribune", 'nid' => $nid));
  } else if ($nid->type == "tribune") {
    $node = $nid;
  }

  $node->tribune_settings = db_fetch_array(db_query('SELECT * FROM {tribune_tribunes} WHERE nid = %d', $node->nid));

  $node->tribune_settings['enabled_filters'] = unserialize($node->tribune_settings['enabled_filters']);
  $node->tribune_settings['variables'] = unserialize($node->tribune_settings['variables']);

  return $node;
}


function tribune_node_info() {
  return array(
    'tribune' => array(
      'name' => t('Tribune'),
      'module' => 'tribune',
      'description' => t('An advanced discussion space'),
      'title_label' => t('Tribune name'),
      'body_label' => t('Tribune message'),
      'has_body' => TRUE,
    ),
  );
}

function tribune_access($op, $node = NULL) {
  global $user;
  switch ($op) {
    case 'create':
      return user_access('create tribune node');
    case 'update':
      return user_access('edit own tribune') and ($user->uid == $node->uid);
    case 'delete':
      return user_access('delete own tribune') and ($user->uid == $node->uid);
    case 'view':
      return user_access('read tribunes');
    case 'post':
      return user_access('post in tribunes');
    case 'moderate tribune':
    case 'delete tribune post':
    case 'undelete tribune post':
    case 'delete moderated posts':
    case 'delete all posts':
      return ($user->uid == $node->uid);
    case 'configure own tribune filters':
      return user_access('configure own tribune filters') and ($user->uid == $node->uid);
  }
}

function tribune_form(&$node) {
  $type = node_get_types('type', $node);

  $form = array();

  $form['title'] = array(
    '#type' => 'textfield',
    '#title' => check_plain($type->title_label),
    '#required' => true,
    '#default_value' => $node->title,
    '#weight' => -5,
  );

  $form['body_filter']['body'] = array(
    '#type' => 'textarea',
    '#title' => check_plain($type->body_label),
    '#default_value' => $node->body,
    '#required' => FALSE
  );
  $form['body_filter']['filter'] = filter_form($node->format);

  $form['tribune_settings'] = array(
    '#title'          => t('Tribune parameters'),
    '#type'           => 'fieldset',
    '#collapsible'    => TRUE,
    '#collapsed'      => FALSE,
    '#tree'           => TRUE,
  );

  $form['tribune_settings']['max_message_size'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Maximum length of a comment'),
    '#default_value'  => isset($node->tribune_settings['max_message_size']) ? $node->tribune_settings['max_message_size'] : 512,
    '#size'           => 4,
    '#maxlength'      => 4,
    '#description'    => t('The maximum length of a comment.'),
  );

  $form['tribune_settings']['history_size'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Number of comments displayed'),
    '#default_value'  => isset($node->tribune_settings['history_size']) ? $node->tribune_settings['history_size'] : 25,
    '#size'           => 3,
    '#maxlength'      => 3,
    '#description'    => t('The number of comments to display.'),
  );

  $form['tribune_settings']['xml_size'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Number of comments displayed in the XML backend'),
    '#default_value'  => isset($node->tribune_settings['xml_size']) ? $node->tribune_settings['xml_size'] : 100,
    '#size'           => 3,
    '#maxlength'      => 3,
    '#description'    => t('The number of comments to display in the XML backend.'),
  );

  $form['tribune_settings']['rss_size'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Number of comments displayed in the RSS feed'),
    '#default_value'  => isset($node->tribune_settings['rss_size']) ? $node->tribune_settings['rss_size'] : 50,
    '#size'           => 3,
    '#maxlength'      => 3,
    '#description'    => t('The number of comments to display in the RSS feed.'),
  );

  $form['tribune_settings']['reload_delay'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Reload delay'),
    '#default_value'  => isset($node->tribune_settings['reload_delay']) ? $node->tribune_settings['reload_delay'] : 30,
    '#size'           => 3,
    '#maxlength'      => 3,
    '#description'    => t('The delay between automatic reloading of the tribune, in seconds (0 to disable Ajax reloading).'),
  );

  $form['tribune_settings']['flood_protection_delay'] = array(
    '#type'           => 'textfield',
    '#title'          => t('Flood protection'),
    '#default_value'  => isset($node->tribune_settings['flood_protection_delay']) ? $node->tribune_settings['flood_protection_delay'] : 0,
    '#size'           => 3,
    '#maxlength'      => 3,
    '#description'    => t('Minimum time before someone can post again, in seconds (0 disables flood protection).'),
  );

  $form['tribune_settings']['posts_order'] = array(
    '#type'           => 'radios',
    '#title'          => t('Message order'),
    '#default_value'  => isset($node->tribune_settings['posts_order']) ? $node->tribune_settings['posts_order'] : 1,
    '#options'        => array('1' => t("Last messages at the bottom"), '0' => t("Last messages at the top")),
    '#description'    => t('How the messages are displayed. Displaying the messages top-to-bottom makes it easier to follow real discussions, but displaying the latest one at the top is sometimes less confusing.'),
  );

  $form['tribune_settings']['show_pager'] = array(
    '#type'           => 'checkbox',
    '#title'          => t('Show pager'),
    '#default_value'  => isset($node->tribune_settings['show_pager']) ? $node->tribune_settings['show_pager'] : FALSE,
    '#description'    => t('Show a pager (all posts will be accessible, instead of just the last ones).'),
  );

  return $form;
}

function tribune_insert($node) {
  db_query('INSERT INTO {tribune_tribunes} SET
    nid = %d,
    banned_useragents = \'\',
    banned_usernames = \'\',
    banned_messages = \'\',
    max_message_size = %d,
    history_size = %d,
    xml_size = %d,
    rss_size = %d,
    reload_delay = %d,
    flood_protection_delay = %d,
    posts_order = %d,
    show_pager = %d,
    enabled_filters = \'%s\',
    variables = \'%s\'
    ',
    $node->nid,
    $node->tribune_settings['max_message_size'],
    $node->tribune_settings['history_size'],
    $node->tribune_settings['xml_size'],
    $node->tribune_settings['rss_size'],
    $node->tribune_settings['reload_delay'],
    $node->tribune_settings['flood_protection_delay'],
    $node->tribune_settings['posts_order'],
    $node->tribune_settings['show_pager'],
    serialize(array('totoz' => "totoz", "url" => "url")),
    serialize(array())
  );
}

function tribune_update($node) {
  db_query('UPDATE {tribune_tribunes} SET
    max_message_size = %d,
    history_size = %d,
    xml_size = %d,
    rss_size = %d,
    reload_delay = %d,
    flood_protection_delay = %d,
    posts_order = %d,
    show_pager = %d,
    enabled_filters = \'%s\',
    variables = \'%s\'
    WHERE nid = %d
    ',
    $node->tribune_settings['max_message_size'],
    $node->tribune_settings['history_size'],
    $node->tribune_settings['xml_size'],
    $node->tribune_settings['rss_size'],
    $node->tribune_settings['reload_delay'],
    $node->tribune_settings['flood_protection_delay'],
    $node->tribune_settings['posts_order'],
    $node->tribune_settings['show_pager'],
    serialize($node->tribune_settings['enabled_filters']),
    serialize($node->tribune_settings['variables']),
    $node->nid
  );
}

function tribune_delete($node) {
  db_query('DELETE FROM {tribune_tribunes} WHERE nid = %d', $node->nid);
  db_query('DELETE FROM {tribune}, {tribune_post_references} USING {tribune} INNER JOIN {tribune_post_references} ON {tribune_post_references}.target_post_id = {tribune}.post_id WHERE {tribune}.tribune_id = %d', $node->nid);
}

function tribune_view($node, $teaser = FALSE, $page = FALSE) {
  $node = node_prepare($node, FALSE);

  drupal_add_css(drupal_get_path('module', 'tribune') .'/css/tribune.page.css');

  $history_size   = $node->tribune_settings['history_size'];
  $reload_delay   = $node->tribune_settings['reload_delay'] * 1000; // in milliseconds
  $message_order  = $node->tribune_settings['posts_order'] ? 'top_to_bottom' : 'bottom_to_top';
  $last_load_time = time();

  $tribune_id = "tribune-". $node->nid;

  drupal_add_js(
    array(
      "tribune" => array(
        "tribunes" => array(
          $tribune_id => array(
            "history_size" => $history_size,
            "reload_delay" => $reload_delay,
            "last_load_time" => $last_load_time,
            "message_order" => $message_order,
            "block" => FALSE,
            "path" => array(
              "post" => url("node/".$node->nid."/post"),
              "json_post" => url("node/".$node->nid."/post-json"),
              "json_posts" => url("node/".$node->nid."/newposts-json"),
              "filters" => url("node/".$node->nid."/filter"),
            ),
          ),
        ),
      ),
    ), "setting"
  );

  drupal_add_js(drupal_get_path('module', 'tribune') .'/js/tribune.ajax.js');
  drupal_add_js('misc/jquery.form.js');

  $top_message   = $node->body;

  if ($page and $node->tribune_settings['show_pager']) {
    $posts = array();

    $r = pager_query("SELECT *
      FROM {tribune}
      WHERE tribune_id = %d
      ORDER BY post_id DESC",
      $history_size,
      0,
      NULL,
      array($node->nid)
    );

    while ($row = db_fetch_array($r)) {
      $posts[$row['post_id']] = tribune_post_from_row($row);
    }
    $posts = array_reverse($posts, true);
    $contents = theme("tribune_page", $posts, $node, $tribune_id, $top_message, $node->tribune_settings['posts_order']).theme("pager", array(), $history_size);
  } else {
    $posts = tribune_get_last_posts($node, $history_size);
    $contents = theme("tribune_page", $posts, $node, $tribune_id, $top_message, $node->tribune_settings['posts_order']);
  }

  $node->content['body']['#value'] = $contents;

  return $node;
}

function tribune_perm() {
  return array(
    "read tribunes",
    "view tribunes history",
    "view tribunes rss feed",
    "view tribunes information",
    "post in tribunes",
    "create tribune node",
    "edit own tribune",
    "configure own tribune filters",
    "delete own tribune",
  );
}

/**
 * Adds or update an user in the list of users viewing the tribune.
 * this list is stored in the "tribune_active_users" variable
 * as an array containing the last time each user has visited
 * the tribune, keyed by his username.
 */
function tribune_update_active_user($node, $user) {
  $key = 0;
  $data = array();
  $tribune_active_users = tribune_variable_get('active_users', array(), $node);
  if (!is_array($tribune_active_users)) {
    $tribune_active_users = array();
  }

  if ($user->uid) {
    $key = "a".strtolower($user->name).$user->name;
    $data['name'] = $user->name;
    $data['uid'] = $user->uid;
  } else if (!$user->uid and isset($_SESSION['tribune_nickname'])) {
    // this is to display users who have set their nickname
    // using the "nick" filter... including filter-specific
    // code in the main tribune code doesn't look very good
    // but I can't see a better way to do it
    $key = "z".strtolower($_SESSION['tribune_nickname']).$_SESSION['tribune_nickname'];
    $data['name'] = $_SESSION['tribune_nickname'];
    $data['uid'] = $user->uid;
  }
  $data['time'] = time();

  if ($key) {
    $tribune_active_users[$key] = $data;
    tribune_variable_set('active_users', $tribune_active_users, $node);

    _tribune_update_active_users($node);
  }
}

/**
 * Updates the list of active users by removing all the users who
 * have not visited the tribune for more than five minutes
 */
function _tribune_update_active_users($node) {
  $now = time();
  $reload_delay = $node->tribune_settings['reload_delay'];
  $tribune_active_users = tribune_variable_get('active_users', array(), $node);
  foreach ($tribune_active_users as $key => $data) {
    if ($data['time'] < $now - (5 * 60)) {
      unset($tribune_active_users[$key]);
    }
  }
  tribune_variable_set('active_users', $tribune_active_users, $node);
}

/**
 * Get the list of users who are currently reading the tribune
 * @return An array of ('name, 'uid', time') arrays
 */
function tribune_get_active_users($node) {
  _tribune_update_active_users($node);
  $users = tribune_variable_get('active_users', array(), $node);
  ksort($users);
  return $users;
}

/**
 * Returns an array of filter files.
 */
function _tribune_filter_files() {
  $filters_dir = drupal_get_path('module', 'tribune');
  $files = file_scan_directory($filters_dir, '\.inc$');

  $filters = array();
  foreach ($files as $file) {
    include_once($file->filename);
    $filters[$file->name] = $file;
  }
  return $filters;
}

/**
 * Returns the pointers to all active filters
 */
function _tribune_get_filters($node, $after_slip) {
  $info = _tribune_filters_info();

  $filters = array();

  if (user_access("configure own tribune filters", user_load($node->uid)) and is_array($node->tribune_settings['enabled_filters'])) {
    $enabled_filters = $node->tribune_settings['enabled_filters'];
  } else {
    $enabled_filters = variable_get('tribune_enabled_filters', array('totoz' => "totoz", "url" => "url"));
  }
  foreach (_tribune_filter_files() as $filter_file) {
    $filter = $filter_file->name;

    if (isset ($enabled_filters[$filter]) and $enabled_filters[$filter]) {
      if ($after_slip) {
        $func = 'tribune_'. $filter .'_filter_after';
        if (function_exists($func)) {
          $filters[$info[$filter]['weight']][$filter] = $func;
          ksort($filters[$info[$filter]['weight']]);
        }
      }
      else {
        $func = 'tribune_'. $filter .'_filter';
        if (function_exists($func)) {
          $filters[$info[$filter]['weight']][$filter] = $func;
          ksort($filters[$info[$filter]['weight']]);
        }
      }
    }
  }

  ksort($filters);

  $sorted_filters = array();

  foreach ($filters as $weight => $list) {

    foreach ($list as $name => $func) {
      $sorted_filters[$name] = $func;
    }
  }

  return $sorted_filters;
}

/**
 * Returns the pointers to all active filters with a help function
 */
function _tribune_get_filters_help($node) {
  $filters = array();

  if (user_access("configure own tribune filters", user_load($node->uid)) and is_array($node->tribune_settings['enabled_filters'])) {
    $enabled_filters = $node->tribune_settings['enabled_filters'];
  } else {
    $enabled_filters = variable_get('tribune_enabled_filters', array('totoz' => "totoz", "url" => "url"));
  }
  foreach (_tribune_filter_files() as $filter_file) {
    $filter = $filter_file->name;

    if (isset ($enabled_filters[$filter]) and $enabled_filters[$filter]) {
      $func = 'tribune_'. $filter .'_help';
      if (function_exists($func)) {
        $filters[$filter] = $func;
      }
    }
  }

  return $filters;
}

/**
 * Returns the description of every available filter
 */
function _tribune_filters_info() {
  $filters = array();

  foreach (_tribune_filter_files() as $filter_file) {
    $filter = $filter_file->name;
    $func_info = 'tribune_'. $filter .'_info';

    if (function_exists($func_info)) {
      $info = $func_info();
      if (!is_array($info)) {
        $info = array('description' => $info);
      }
      if (!isset($info['weight'])) {
        $info['weight'] = 0;
      }

      $info['before_slip'] = function_exists('tribune_'. $filter .'_filter');
      $info['after_slip']  = function_exists('tribune_'. $filter .'_filter_after');

      $func_settings = 'tribune_'. $filter .'_settings';

      if (function_exists($func_settings)) {
        $info['settings'] = $func_settings;
      }
      else {
        $info['settings'] = FALSE;
      }

      $filters[$info['weight']][$filter] = $info;

      ksort($filters[$info['weight']]);
    }
  }

  ksort($filters);

  $sorted_filters = array();

  foreach ($filters as $weight => $list) {
    foreach ($list as $name => $info) {
      $sorted_filters[$name] = $info;
    }
  }

  return $sorted_filters;
}

/**
 * Returns a clock representation
 */
function tribune_filters_print_clock($post) {
  $post_date = tribune_date_to_localdate($post['time']);
  if ($post_date == date('YmdHis') and $post['rank'] == 0) {
    $post['rank'] = 1;
  }
  $clock = tribune_format_clock($post_date, $post['rank']);

  return $clock;
}

/**
 * Post a message to the tribune (jQuery/coincoins)
 */
function tribune_post($node) {
  if (isset ($_POST['message']) and $_POST['message']) {
    $result = tribune_add_post($node, $_POST['message']);

    if ($result['error']) {
      // There is an error
      header("HTTP/1.0 403 Forbidden");
      print "<div>". $result['error'] ."</div>";
    }
    else if ($result['post']) {
      header("X-Post-Id: ". $result['post']['tribune_post_id']);
    }
  }

  exit();
}

function tribune_build_block($node, $history_size) {
  $block = array();

  drupal_add_css(drupal_get_path('module', 'tribune') .'/css/tribune.block.css');

  $reload_delay   = $node->tribune_settings['reload_delay'] * 1000; // in milliseconds
  $message_order  = $node->tribune_settings['posts_order'] ? 'top_to_bottom' : 'bottom_to_top';
  $last_load_time = time();

  $tribune_id = 'tribune-block-'. $node->nid;

  drupal_add_js(
    array(
      "tribune" => array(
        "tribunes" => array(
          $tribune_id => array(
            "history_size" => $history_size,
            "reload_delay" => $reload_delay,
            "last_load_time" => $last_load_time,
            "message_order" => $message_order,
            "block" => TRUE,
            "path" => array(
              "post" => url("node/". $node->nid ."/post"),
              "json_post" => url("node/". $node->nid ."/post-json"),
              "json_posts" => url("node/". $node->nid ."/newposts-json"),
              "filters" => url("node/". $node->nid ."/filter"),
            ),
          ),
        ),
      ),
    ), "setting");

  drupal_add_js(drupal_get_path('module', 'tribune') .'/js/tribune.ajax.js');
  drupal_add_js('misc/jquery.form.js');

  $posts = tribune_get_last_posts($node, $history_size);

  $block['subject'] = l($node->title, 'node/'. $node->nid);
  $block['content'] = theme("tribune_block", $posts, $node, $tribune_id);

  return $block;
}

/**
 * Show the last interventions in a block
 * @param op the operation from the URL
 * @param delta offset
 * @returns block HTML
 */
function tribune_block($op = 'list', $delta = 0, $edit = array()) {
  switch ($op) {
  case 'list':
    $num_blocks = 4; // yeah that's completely arbitrary

    //$block[1]["info"] = t("Tribune users");

    for ($i = 0 ; $i < $num_blocks ; $i++) {
      $block[$i]["info"] = t("Tribune block #".($i+1));
      }

      return $block;
      break;
    case 'configure':
      $tribune_blocks = variable_get('tribune_blocks', array());

      $form = array();
      $form['tribune_id'] = array(
        '#type' => 'textfield',
        '#title' => t('Tribune'),
        '#description' => t('Which tribune to show in this block'),
        '#default_value' => $tribune_blocks[$delta]['config_display'],
        '#autocomplete_path' => 'tribune/autocomplete',
      );

      $form['history_size'] = array(
        '#type' => 'textfield',
        '#title' => t('Size'),
        '#description' => t('How many posts to show in this block'),
        '#default_value' => $tribune_blocks[$delta]['history_size'],
      );

      return $form;
      break;
    case 'save':
      $tribune_id = substr($edit['tribune_id'], 0, strpos($edit['tribune_id'], ' '));
      $tribune_blocks = variable_get('tribune_blocks', array());
      $tribune_blocks[$delta]['nid'] = $tribune_id;
      $tribune_blocks[$delta]['config_display'] = $tribune_id ? $edit['tribune_id'] : '';
      $tribune_blocks[$delta]['history_size'] = $edit['history_size'];
      variable_set('tribune_blocks', $tribune_blocks);
      break;
    case 'view':
      $tribune_blocks = variable_get('tribune_blocks', array());
      if ($tribune_blocks[$delta]['nid']) {
        $node = node_load($tribune_blocks[$delta]['nid']);
        if (tribune_access("view", $node)) {
          return tribune_build_block($node, $tribune_blocks[$delta]['history_size']);
        }
      }
  }
}

function theme_tribune_active_users($users, $node) {
  $registered_users = array();

  foreach ($users as $key => $data) {
    $registered_users[] = (object)$data;
  }

  return theme('user_list', $registered_users);
}

function tribune_autocomplete($name) {
  $tribunes = array();

  if (tribune_access('view')) {
    $result = db_query("SELECT nid, title FROM {node} WHERE type = 'tribune' AND (title LIKE '%%%s%%' or nid = %d)", $name, $name);
    while ($row = db_fetch_array($result)) {
      $display_string = t('@tribune_nid (@tribune_title)', array('@tribune_nid' => $row['nid'], '@tribune_title' => $row['title']));
      $tribunes[$display_string] = $display_string;
      }
  }

  print drupal_to_js($tribunes);
  exit();
}

function tribune_needs_migration() {
  return db_result(db_query('SELECT COUNT(*) FROM {tribune} WHERE tribune_id = 0'));
}

function tribune_menu() {
  $items = array();

  $items['admin/settings/tribune'] = array(
    'file'              => "tribune.admin.inc",
    'title'             => 'Tribune',
    'page callback'     => 'drupal_get_form',
    'page arguments'    => array('tribune_admin'),
    'access arguments'  => array('administer site configuration'),
  );

  $items['admin/settings/tribune/settings'] = array(
    'file'              => "tribune.admin.inc",
    'title'             => 'Tribune settings',
    'page callback'     => 'drupal_get_form',
    'page arguments'    => array('tribune_admin'),
    'access arguments'  => array('administer site configuration'),
    'type'              => MENU_DEFAULT_LOCAL_TASK,
    'weight'            => 0,
  );

  $items['admin/settings/tribune/filters'] = array(
    'file'              => "tribune.admin.filters.inc",
    'title'             => 'Filters settings',
    'page callback'     => 'tribune_admin_filters',
    'access arguments'  => array('administer site configuration'),
    'type'              => MENU_LOCAL_TASK,
    'weight'            => 1,
  );

  $items['admin/settings/tribune/migration'] = array(
    'file'              => "tribune.admin.inc",
    'title'             => '1.x tribune migration',
    'page callback'     => 'drupal_get_form',
    'page arguments'    => array('tribune_admin_migration'),
    'access callback'   => 'tribune_needs_migration',
    'access arguments'  => array(),
    'type'              => MENU_LOCAL_TASK,
    'weight'            => 2,
  );

  $items['admin/settings/tribune/filters/settings/%'] = array(
    'file'              => "tribune.admin.filters.inc",
    'title'             => 'Filter settings',
    'page callback'     => 'tribune_filter_settings',
    'page arguments'    => array(NULL, 5),
    'access arguments'  => array('administer site configuration'),
    'type'              => MENU_LOCAL_TASK,
  );


  $items['tribune/autocomplete/%'] = array(
    'title'             => 'Tribune autocomplete',
    'page callback'     => 'tribune_autocomplete',
    'page arguments'    => array(2),
    'access arguments'  => array('access content'),
    'type'              => MENU_CALLBACK,
  );


  /**
   * pages associated to each tribune node
   */

  // JSON stuff
  $items['node/%tribune/post-json/%'] = array(
    'file'              => "tribune.json.inc",
    'page callback'     => 'tribune_print_json_post',
    'page arguments'    => array(3, 1),
    'access arguments'  => array('read tribunes'),
    'type'              => MENU_CALLBACK,
  );
  $items['node/%tribune/newposts-json/%'] = array(
    'file'              => "tribune.json.inc",
    'title'             => 'Tribune',
    'page callback'     => 'tribune_print_json_newposts',
    'page arguments'    => array(3, 1),
    'access arguments'  => array('read tribunes'),
    'type'              => MENU_CALLBACK,
  );

  // moderation pages
  $items['node/%tribune/moderation/delete/%'] = array(
    'file'              => "tribune.moderation.inc",
    'page callback'     => 'tribune_delete_post',
    'page arguments'    => array(4, 1),
    'access callback'   => 'tribune_access',
    'access arguments'  => array('delete tribune post', 1),
    'type'              => MENU_CALLBACK,
  );
  $items['node/%tribune/moderation/undelete/%'] = array(
    'file'              => "tribune.moderation.inc",
    'page callback'     => 'tribune_undelete_post',
    'page arguments'    => array(4, 1),
    'access callback'   => 'tribune_access',
    'access arguments'  => array('undelete tribune post', 1),
    'type'              => MENU_CALLBACK,
  );
  $items['node/%tribune/moderation'] = array(
    'file'              => "tribune.moderation.inc",
    'title'             => 'Moderation',
    'page callback'     => 'drupal_get_form',
    'page arguments'    => array('tribune_moderation_form', 1),
    'access callback'   => 'tribune_access',
    'access arguments'  => array('moderate tribune', 1),
    'type'              => MENU_LOCAL_TASK,
  );

  // for AJAX and Coincoins
  $items['node/%tribune/post'] = array(
    'title'             => 'Post a message',
    'page callback'     => 'tribune_post',
    'page arguments'    => array(1),
    'access arguments'  => array('post in tribunes'),
    'type'              => MENU_CALLBACK,
  );

  // history pages
  $items['node/%tribune/history'] = array(
    'file'              => 'tribune.history.inc',
    'title'             => 'History',
    'page callback'     => 'tribune_history_page',
    'page arguments'    => array(1),
    'access arguments'  => array('view tribunes history'),
    'type'              => MENU_LOCAL_TASK,
  );
  $items['node/%tribune/history/%/%'] = array(
    'file'              => 'tribune.history.inc',
    'title'             => 'History',
    'page callback'     => 'tribune_history_search',
    'page arguments'    => array(1, 3, 4),
    'access arguments'  => array('view tribunes history'),
    'type'              => MENU_LOCAL_TASK,
  );

  // XML backends
  $items['node/%tribune/tribune.xml'] = array(
    'file'              => "tribune.backend.inc",
    'title'             => 'Tribune backend',
    'page callback'     => 'tribune_backend',
    'page arguments'    => array(1, 'xml'),
    'access arguments'  => array('read tribunes'),
    'type'              => MENU_CALLBACK,
  );
  $items['node/%tribune/tribune.rss'] = array(
    'file'              => "tribune.backend.inc",
    'title'             => 'Tribune RSS feed',
    'page callback'     => 'tribune_backend',
    'page arguments'    => array(1, 'rss'),
    'access arguments'  => array('view tribunes rss feed'),
    'type'              => MENU_CALLBACK,
  );

  // information/Coincoin configuration pages
  $items['node/%tribune/info'] = array(
    'file'              => "tribune.info.inc",
    'title'             => 'Information',
    'page callback'     => 'tribune_show_info',
    'page arguments'    => array(1),
    'access arguments'  => array('view tribunes information'),
    'type'              => MENU_LOCAL_TASK,
  );
  $items['node/%tribune/info/b2b.xml'] = array(
    'file'              => "tribune.info.inc",
    'title'             => 'b2b config',
    'page callback'     => 'tribune_b2b_xml',
    'page arguments'    => array(1),
    'access arguments'  => array('view tribunes information'),
    'type'              => MENU_CALLBACK,
  );

  // filters configuration
  $items['node/%tribune/filters'] = array(
    'file'              => "tribune.admin.filters.inc",
    'title'             => 'Filters',
    'page callback'     => 'tribune_admin_filters',
    'page arguments'    => array(1),
    'access callback'   => 'tribune_access',
    'access arguments'  => array('configure own tribune filters', 1),
    'type'              => MENU_LOCAL_TASK,
  );
  $items['node/%tribune/filters/settings/%'] = array(
    'file'              => "tribune.admin.filters.inc",
    'title'             => 'Filter settings',
    'page callback'     => 'tribune_filter_settings',
    'page arguments'    => array(1, 4),
    'access arguments'  => array('administer site configuration'),
    'type'              => MENU_LOCAL_TASK,
  );

  // filters pages
  $items['node/%tribune/filter/%'] = array(
    'title'             => 'Filter page',
    'page callback'     => 'tribune_filters_pages',
    'page arguments'    => array(1, 3),
    'access arguments'  => array('read tribunes'),
    'type'              => MENU_CALLBACK,
  );

  return $items;
}

function tribune_settings_form($form, $node = NULL) {
  if ($node === NULL) {
    global $tribune;
    $node = $tribune;
  }

  $form = system_settings_form($form);

  if ($node) {
    $form['tribune_id'] = array(
      '#type' => 'value',
      '#value' => $node->nid,
    );
  }

  $form['#submit'] = array('tribune_settings_form_submit');
  return $form;
}

function tribune_settings_form_submit($form, &$form_state) {
  $node = NULL;
  if (isset($form_state['values']['tribune_id'])) {
    $node = node_load($form_state['values']['tribune_id']);
  }

  $op = isset($form_state['values']['op']) ? $form_state['values']['op'] : '';

  // Exclude unnecessary elements.
  unset($form_state['values']['submit'], $form_state['values']['reset'], $form_state['values']['form_id'], $form_state['values']['op'], $form_state['values']['form_token'], $form_state['values']['form_build_id']);

  foreach ($form_state['values'] as $key => $value) {
    if ($op == t('Reset to defaults')) {
      tribune_variable_del($key, $node);
    }
    else {
      if (is_array($value) && isset($form_state['values']['array_filter'])) {
        $value = array_keys(array_filter($value));
      }
      tribune_variable_set($key, $value, $node);
    }
  }
  if ($op == t('Reset to defaults')) {
    drupal_set_message(t('The configuration options have been reset to their default values.'));
  }
  else {
    drupal_set_message(t('The configuration options have been saved.'));
  }
}

function tribune_variable_get($name, $default_value, $node = NULL) {
  global $tribune;

  if ($node === NULL and $tribune) {
    $node = $tribune;
  } else if ($node == 'global') {
    $node = NULL;
  }

  if ($node) {
    $result = db_result(db_query('SELECT variables FROM {tribune_tribunes} WHERE nid = %d', $node->nid));
    $array = unserialize($result);
  } else {
    $array = variable_get('tribune_global_variables', array());
  }

  if ($array and isset($array[$name])) {
    return $array[$name];
  } else {
    if ($node) {
      return tribune_variable_get($name, $default_value, 'global');
    } else {
      return $default_value;
    }
  }
}

function tribune_variable_set($name, $value, $node = NULL) {
  global $tribune;

  if ($node === NULL and $tribune) {
    $node = $tribune;
  } else if ($node == 'global') {
    $node = NULL;
  }

  if ($node) {
    $result = db_result(db_query('SELECT variables FROM {tribune_tribunes} WHERE nid = %d', $node->nid));
    $array = unserialize($result);
  } else {
    $array = variable_get('tribune_global_variables', array());
  }

  if ($array) {
    $array[$name] = $value;
  } else {
    $array = array($name => $value);
  }

  if ($node) {
    db_query('UPDATE {tribune_tribunes} SET variables = \'%s\' WHERE nid = %d',
      serialize($array), $node->nid);
  } else {
    variable_set('tribune_global_variables', $array);
  }
}

function tribune_variable_del($name, $node = NULL) {
  global $tribune;

  if ($node === NULL and $tribune) {
    $node = $tribune;
  } else if ($node == 'global') {
    $node = NULL;
  }

  if ($node) {
    $result = db_result(db_query('SELECT variables FROM {tribune_tribunes} WHERE nid = %d', $node->nid));
    $array = unserialize($result);
  } else {
    $array = variable_get('tribune_global_variables', array());
  }

  if ($array and isset($array[$name])) {
    unset($array[$name]);

    if ($node) {
      db_query('UPDATE {tribune_tribunes} SET variables = \'%s\' WHERE nid = %d',
        serialize($array), $node->nid);
    } else {
      variable_set('tribune_global_variables', $array);
    }
  }
}

function tribune_set_option($tribune, $option, $value) {
  if (is_object($tribune)) {
    $tribune = $tribune->nid;
  }

  db_query("UPDATE {tribune_tribunes}
    SET `".$option."` = '%s'
    WHERE nid = %d",
    array(
      $value,
      $tribune,
    )
  );
}

function tribune_get_option($tribune, $option) {
  if (is_object($tribune)) {
    $tribune = $tribune->nid;
  }

  return db_result(db_query("SELECT `".$option."`
    FROM {tribune_tribunes}
    WHERE nid = %d",
    array(
      $tribune,
    )
  ));
}

function tribune_filters_pages($node, $argument) {
  global $tribune;
  $tribune = $node;

  $filters = array();

  if (user_access("configure own tribune filters", user_load($node->uid)) and is_array($node->tribune_settings['enabled_filters'])) {
    $enabled_filters = $node->tribune_settings['enabled_filters'];
  } else {
    $enabled_filters = variable_get('tribune_enabled_filters', array('totoz' => "totoz", "url" => "url"));
  }
  foreach (_tribune_filter_files() as $filter_file) {
    $filter = $filter_file->name;

    if ($filter == $argument && isset ($enabled_filters[$filter]) and $enabled_filters[$filter]) {
      $func = 'tribune_'. $filter .'_page';
      if (function_exists($func)) {
        return $func();
      }
    }
  }

  return FALSE;
}

function tribune_theme($existing, $type, $theme, $path) {
  return array(
    'post_moderation' => array(
      'arguments' => array('post' => NULL),
    ),
    'post_time' => array(
      'arguments' => array('post' => NULL),
    ),
    'post_username' => array(
      'arguments' => array('post' => NULL),
    ),
    'post_message' => array(
      'arguments' => array('post' => NULL),
    ),
    'tribune_post' => array(
      'arguments' => array('post' => NULL, 'node' => NULL),
    ),
    'tribune_post_xml' => array(
      'file' => "tribune.backend.inc",
      'arguments' => array('post' => NULL, 'node' => NULL),
    ),
    'tribune_post_rss' => array(
      'file' => "tribune.backend.inc",
      'arguments' => array('post' => NULL, 'node' => NULL),
    ),
    'tribune_block' => array(
      'arguments' => array('posts' => array(), 'node' => NULL, 'tribune_id' => 'tribune-block'),
    ),
    'tribune_page' => array(
      'arguments' => array('posts' => array(), 'node' => NULL, 'tribune_id' => 'tribune-page', 'top_message' => '', 'top_to_bottom' => TRUE),
    ),
    'tribune_xml' => array(
      'file' => "tribune.backend.inc",
      'arguments' => array('posts' => array(), 'node' => NULL),
    ),
    'tribune_rss' => array(
      'file' => "tribune.backend.inc",
      'arguments' => array('posts' => array(), 