functions.php

一个好用的php wap cms portal

<?php
/********************************************************************************/ 
/*  Wap-2-Go Mobile Phone Nuke-Addon                                            */
/*          bringing the Advanced Content Management System to Mobile Format    */
/*  =========================================================================== */
/*                                              powered by Nuke SQL Database    */
/*                                                                              */
/*  Copyright (c) 2007 by Philip Marsh                                          */
/*                                                                              */
/*  FILE DETAILS and EXPLANATION:                                               */
/*  functions.php - Specific Functions for Module                               */
/********************************************************************************/ 

function phpbb_realpath($path)
         {
         global $phpEx;
         $phpbb_root_path = $nukeurl."/modules/Forums/";
         return (!@function_exists('realpath') || !@realpath($phpbb_root_path . 'includes/functions.'.$phpEx)) ? $path : @realpath($path);
         }
function make_filename($filename)
         {
         // Check if it's an absolute or relative path.
         if (substr($filename, 0, 1) != '/')  { $filename = phpbb_realpath($this->root . '/' . $filename); }
                if (!file_exists($filename))  { die("Template->make_filename(): Error - file $filename does not exist"); }
                return $filename;
         }

/***************************************************************************
 *   begin                : Saturday, Feb 13, 2001
 *   copyright            : (C) 2001 The phpBB Group
 *   email                : [e-mail]
 *   $Id: bbcode.php,v 1.36.2.32 2004/07/11 16:46:19 acydburn Exp $
 ***************************************************************************/

/***************************************************************************
 *   This program is free software; you can redistribute it 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.
 ***************************************************************************/

define("BBCODE_UID_LEN", 10);

// global that holds loaded-and-prepared bbcode templates, so we only have to do
// that stuff once.

$bbcode_tpl = null;

/**
 * Loads bbcode templates from the bbcode.tpl file of the current template set.
 * Creates an array, keys are bbcode names like "b_open" or "url", values
 * are the associated template.
 * Probably pukes all over the place if there's something really screwed
 * with the bbcode.tpl file.
 *
 * Nathan Codding, Sept 26 2001.
 */
function load_bbcode_template()
{
  global $theme, $htm;
// Updated 17/06/07 for Wap-2-Go
if ($htm==1) {  $tpl_filename = "themes/".$theme."/html/forums/bbcode.tpl"; }
else         {  $tpl_filename = "themes/".$theme."/wml/forums/bbcode.tpl"; }
  $tpl = fread(fopen($tpl_filename, 'r'), filesize($tpl_filename));
  // replace \ with \\ and then ' with \'.
  $tpl = str_replace('\\', '\\\\', $tpl);
  $tpl  = str_replace('\'', '\\\'', $tpl);
  // strip newlines.
  $tpl  = str_replace("\n", '', $tpl);
  // Turn template blocks into PHP assignment statements for the values of $bbcode_tpls..
  $tpl = preg_replace('#<!-- BEGIN (.*?) -->(.*?)<!-- END (.*?) -->#', "\n" . '$bbcode_tpls[\'\\1\'] = \'\\2\';', $tpl);
  $bbcode_tpls = array();
  eval($tpl);
  return $bbcode_tpls;
}


/**
 * Prepares the loaded bbcode templates for insertion into preg_replace()
 * or str_replace() calls in the bbencode_second_pass functions. This
 * means replacing template placeholders with the appropriate preg backrefs
 * or with language vars. NOTE: If you change how the regexps work in
 * bbencode_second_pass(), you MUST change this function.
 *
 * Nathan Codding, Sept 26 2001
 *
 */
function prepare_bbcode_template($bbcode_tpl)
{
  global $lang, $usergfxpref, $imgtype, $w2g_url;
  $imgsize = $usergfxpref-20;
  $bbcode_tpl['olist_open'] = str_replace('{LIST_TYPE}', '\\1', $bbcode_tpl['olist_open']);
  $bbcode_tpl['color_open'] = str_replace('{COLOR}', '\\1', $bbcode_tpl['color_open']);
  $bbcode_tpl['size_open'] = str_replace('{SIZE}', '\\1', $bbcode_tpl['size_open']);
  $bbcode_tpl['quote_open'] = str_replace('{L_QUOTE}', $lang['Quote'], $bbcode_tpl['quote_open']);
  $bbcode_tpl['quote_username_open'] = str_replace('{L_QUOTE}', $lang['Quote'], $bbcode_tpl['quote_username_open']);
  $bbcode_tpl['quote_username_open'] = str_replace('{L_WROTE}', $lang['wrote'], $bbcode_tpl['quote_username_open']);
  $bbcode_tpl['quote_username_open'] = str_replace('{USERNAME}', '\\1', $bbcode_tpl['quote_username_open']);
  $bbcode_tpl['code_open'] = str_replace('{L_CODE}', $lang['Code'], $bbcode_tpl['code_open']);
  $bbcode_tpl['img'] = str_replace('{IMGRESIZER}', "http://" . dirname($_SERVER["HTTP_HOST"].$_SERVER["PHP_SELF"]) . '/includes/w2g_thumbs.php?src=', $bbcode_tpl['img']);
  $bbcode_tpl['img'] = str_replace('{URL}', '\\1', $bbcode_tpl['img']);
  $bbcode_tpl['img'] = str_replace('{IMGCONF}', '&amp;x=' . $imgsize . '&amp;t=' . $imgtype . '&amp;f=0', $bbcode_tpl['img']);
  // We do URLs in several different ways..
  $bbcode_tpl['url1'] = str_replace('{URL}', '\\1', $bbcode_tpl['url']);
  $bbcode_tpl['url1'] = str_replace('{DESCRIPTION}', '\\1', $bbcode_tpl['url1']);

  $bbcode_tpl['url2'] = str_replace('{URL}', 'http://\\1', $bbcode_tpl['url']);
  $bbcode_tpl['url2'] = str_replace('{DESCRIPTION}', '\\1', $bbcode_tpl['url2']);

  $bbcode_tpl['url3'] = str_replace('{URL}', '\\1', $bbcode_tpl['url']);
  $bbcode_tpl['url3'] = str_replace('{DESCRIPTION}', '\\2', $bbcode_tpl['url3']);

  $bbcode_tpl['url4'] = str_replace('{URL}', 'http://\\1', $bbcode_tpl['url']);
  $bbcode_tpl['url4'] = str_replace('{DESCRIPTION}', '\\3', $bbcode_tpl['url4']);

  $bbcode_tpl['email'] = str_replace('{EMAIL}', '\\1', $bbcode_tpl['email']);

  define("BBCODE_TPL_READY", true);
  return $bbcode_tpl;
}


/**
 * Does second-pass bbencoding. This should be used before displaying the message in
 * a thread. Assumes the message is already first-pass encoded, and we are given the
 * correct UID as used in first-pass encoding.
 */
function bbencode_second_pass($text, $uid)
{
  global $lang, $bbcode_tpl, $usergfxpref, $imgtype;

  // pad it with a space so we can distinguish between FALSE and matching the 1st char (index 0).
  // This is important; bbencode_quote(), bbencode_list(), and bbencode_code() all depend on it.
  $text = " " . $text;

  // First: If there isn't a "[" and a "]" in the message, don't bother.
  if (! (strpos($text, "[") && strpos($text, "]")) )
  {
    // Remove padding, return.
    $text = substr($text, 1);
    return $text;
  }

  // Only load the templates ONCE..
  if (!defined("BBCODE_TPL_READY"))
  {
    // load templates from file into array.
    $bbcode_tpl = load_bbcode_template();

    // prepare array for use in regexps.
    $bbcode_tpl = prepare_bbcode_template($bbcode_tpl);
  }

  // [CODE] and [/CODE] for posting code (HTML, PHP, C etc etc) in your posts.
  $text = bbencode_second_pass_code($text, $uid, $bbcode_tpl);

  // [QUOTE] and [/QUOTE] for posting replies with quote, or just for quoting stuff.
  $text = str_replace("[quote:$uid]", $bbcode_tpl['quote_open'], $text);
  $text = str_replace("[/quote:$uid]", $bbcode_tpl['quote_close'], $text);

  // New one liner to deal with opening quotes with usernames...
  // replaces the two line version that I had here before..
  $text = preg_replace("/\[quote:$uid=\"(.*?)\"\]/si", $bbcode_tpl['quote_username_open'], $text);

  // [list] and [list=x] for (un)ordered lists.
  // unordered lists
  $text = str_replace("[list:$uid]", $bbcode_tpl['ulist_open'], $text);
  // li tags
  $text = str_replace("[*:$uid]", $bbcode_tpl['listitem'], $text);
  // ending tags
  $text = str_replace("[/list:u:$uid]", $bbcode_tpl['ulist_close'], $text);
  $text = str_replace("[/list:o:$uid]", $bbcode_tpl['olist_close'], $text);
  // Ordered lists
  $text = preg_replace("/\[list=([a1]):$uid\]/si", $bbcode_tpl['olist_open'], $text);

  // colours
  $text = preg_replace("/\[color=(\#[0-9A-F]{6}|[a-z]+):$uid\]/si", $bbcode_tpl['color_open'], $text);
  $text = str_replace("[/color:$uid]", $bbcode_tpl['color_close'], $text);

  // size
  $text = preg_replace("/\[size=([1-2]?[0-9]):$uid\]/si", $bbcode_tpl['size_open'], $text);
  $text = str_replace("[/size:$uid]", $bbcode_tpl['size_close'], $text);

  // [b] and [/b] for bolding text.
  $text = str_replace("[b:$uid]", $bbcode_tpl['b_open'], $text);
  $text = str_replace("[/b:$uid]", $bbcode_tpl['b_close'], $text);

  // [u] and [/u] for underlining text.
  $text = str_replace("[u:$uid]", $bbcode_tpl['u_open'], $text);
  $text = str_replace("[/u:$uid]", $bbcode_tpl['u_close'], $text);

  // [i] and [/i] for italicizing text.
  $text = str_replace("[i:$uid]", $bbcode_tpl['i_open'], $text);
  $text = str_replace("[/i:$uid]", $bbcode_tpl['i_close'], $text);

  // Patterns and replacements for URL and email tags..
  $patterns = array();
  $replacements = array();

  // [img]image_url_here[/img] code..
  // This one gets first-passed..
  $patterns[] = "#\[img:$uid\](.*?)\[/img:$uid\]#si";
  $replacements[] = $bbcode_tpl['img'];

  // matches a [url]xxxx://www.phpbb.com[/url] code..
  $patterns[] = "#\[url\]([\w]+?://[^ \"\n\r\t<]*?)\[/url\]#is";
  $replacements[] = $bbcode_tpl['url1'];

  // [url]www.phpbb.com[/url] code.. (no xxxx:// prefix).
  $patterns[] = "#\[url\]((www|ftp)\.[^ \"\n\r\t<]*?)\[/url\]#is";
  $replacements[] = $bbcode_tpl['url2'];

  // [url=xxxx://www.phpbb.com]phpBB[/url] code..
  $patterns[] = "#\[url=([\w]+?://[^ \"\n\r\t<]*?)\](.*?)\[/url\]#is";
  $replacements[] = $bbcode_tpl['url3'];

  // [url=www.phpbb.com]phpBB[/url] code.. (no xxxx:// prefix).
  $patterns[] = "#\[url=((www|ftp)\.[^ \"\n\r\t<]*?)\](.*?)\[/url\]#is";
  $replacements[] = $bbcode_tpl['url4'];

  // [email][e-mail][/email] code..
  $patterns[] = "#\[email\]([a-z0-9&\-_.]+?@[\w\-]+\.([\w\-\.]+\.)?[\w]+)\[/email\]#si";
  $replacements[] = $bbcode_tpl['email'];

  $text = preg_replace($patterns, $replacements, $text);

  // Remove our padding from the string..
  $text = substr($text, 1);

  return $text;

} // bbencode_second_pass()

// Need to initialize the random numbers only ONCE
mt_srand( (double) microtime() * 1000000);

function make_bbcode_uid()
{
  // Unique ID for this message..

  $uid = md5(mt_rand());
  $uid = substr($uid, 0, BBCODE_UID_LEN);

  return $uid;
}

function bbencode_first_pass($text, $uid)
{
  // pad it with a space so we can distinguish between FALSE and matching the 1st char (index 0).
  // This is important; bbencode_quote(), bbencode_list(), and bbencode_code() all depend on it.
  $text = " " . $text;

  // [CODE] and [/CODE] for posting code (HTML, PHP, C etc etc) in your posts.
  $text = bbencode_first_pass_pda($text, $uid, '[code]', '[/code]', '', true, '');

  // [QUOTE] and [/QUOTE] for posting replies with quote, or just for quoting stuff.
  $text = bbencode_first_pass_pda($text, $uid, '[quote]', '[/quote]', '', false, '');
  $text = bbencode_first_pass_pda($text, $uid, '/\[quote=(\\\".*?\\\")\]/is', '[/quote]', '', false, '', "[quote:$uid=\\1]");

  // [list] and [list=x] for (un)ordered lists.
  $open_tag = array();
  $open_tag[0] = "[list]";

  // unordered..
  $text = bbencode_first_pass_pda($text, $uid, $open_tag, "[/list]", "[/list:u]", false, 'replace_listitems');

  $open_tag[0] = "[list=1]";
  $open_tag[1] = "[list=a]";

  // ordered.
  $text = bbencode_first_pass_pda($text, $uid, $open_tag, "[/list]", "[/list:o]",  false, 'replace_listitems');

  // [color] and [/color] for setting text color
  $text = preg_replace("#\[color=(\#[0-9A-F]{6}|[a-z\-]+)\](.*?)\[/color\]#si", "[color=\\1:$uid]\\2[/color:$uid]", $text);

  // [size] and [/size] for setting text size
  $text = preg_replace("#\[size=([1-2]?[0-9])\](.*?)\[/size\]#si", "[size=\\1:$uid]\\2[/size:$uid]", $text);

  // [b] and [/b] for bolding text.
  $text = preg_replace("#\[b\](.*?)\[/b\]#si", "[b:$uid]\\1[/b:$uid]", $text);

  // [u] and [/u] for underlining text.
  $text = preg_replace("#\[u\](.*?)\[/u\]#si", "[u:$uid]\\1[/u:$uid]", $text);

  // [i] and [/i] for italicizing text.
  $text = preg_replace("#\[i\](.*?)\[/i\]#si", "[i:$uid]\\1[/i:$uid]", $text);

  // [img]image_url_here[/img] code..
  $text = preg_replace("#\[img\]((http|ftp|https|ftps)://)([^ \?&=\#\"\n\r\t<]*?(\.(jpg|jpeg|gif|png)))\[/img\]#sie", "'[img:$uid]\\1' . str_replace(' ', '%20', '\\3') . '[/img:$uid]'", $text);

  // Remove our padding from the string..
  return substr($text, 1);;

} // bbencode_first_pass()

/**
 * $text - The text to operate on.
 * $uid - The UID to add to matching tags.
 * $open_tag - The opening tag to match. Can be an array of opening tags.
 * $close_tag - The closing tag to match.
 * $close_tag_new - The closing tag to replace with.
 * $mark_lowest_level - boolean - should we specially mark the tags that occur
 *           at the lowest level of nesting? (useful for [code], because
 *            we need to match these tags first and transform HTML tags
 *            in their contents..
 * $func - This variable should contain a string that is the name of a function.
 *        That function will be called when a match is found, and passed 2
 *        parameters: ($text, $uid). The function should return a string.
 *        This is used when some transformation needs to be applied to the
 *        text INSIDE a pair of matching tags. If this variable is FALSE or the
 *        empty string, it will not be executed.
 * If open_tag is an array, then the pda will try to match pairs consisting of
 * any element of open_tag followed by close_tag. This allows us to match things
 * like [list=A]...[/list] and [list=1]...[/list] in one pass of the PDA.
 *
 * NOTES:  - this function assumes the first character of $text is a space.
 *        - every opening tag and closing tag must be of the [...] format.
 */
function bbencode_first_pass_pda($text, $uid, $open_tag, $close_tag, $close_tag_new, $mark_lowest_level, $func, $open_regexp_replace = false)
{
  $open_tag_count = 0;

  if (!$close_tag_new || ($close_tag_new == ''))
  {
    $close_tag_new = $close_tag;
  }

  $close_tag_length = strlen($close_tag);
  $close_tag_new_length = strlen($close_tag_new);
  $uid_length = strlen($uid);

  $use_function_pointer = ($func && ($func != ''));

  $stack = array();

  if (is_array($open_tag))
  {
    if (0 == count($open_tag))
    {
      // No opening tags to match, so return.
      return $text;
    }
    $open_tag_count = count($open_tag);
  }
  else
  {
    // only one opening tag. make it into a 1-element array.
    $open_tag_temp = $open_tag;
    $open_tag = array();
    $open_tag[0] = $open_tag_temp;
    $open_tag_count = 1;
  }

  $open_is_regexp = false;

  if ($open_regexp_replace)
  {
    $open_is_regexp = true;
    if (!is_array($open_regexp_replace))
    {
      $open_regexp_temp = $open_regexp_replace;
      $open_regexp_replace = array();
      $open_regexp_replace[0] = $open_regexp_temp;
    }
  }

  if ($mark_lowest_level && $open_is_regexp)
  {
    message_die(GENERAL_ERROR, "Unsupported operation for bbcode_first_pass_pda().");
  }

  // Start at the 2nd char of the string, looking for opening tags.
  $curr_pos = 1;
  while ($curr_pos && ($curr_pos < strlen($text)))
  {
    $curr_pos = strpos($text, "[", $curr_pos);

    // If not found, $curr_pos will be 0, and the loop will end.