functions.php

一个好用的php wap cms portal

    if ($curr_pos)
    {
      // We found a [. It starts at $curr_pos.
      // check if it's a starting or ending tag.
      $found_start = false;
      $which_start_tag = "";
      $start_tag_index = -1;

      for ($i = 0; $i < $open_tag_count; $i++)
      {
        // Grab everything until the first "]"...
        $possible_start = substr($text, $curr_pos, strpos($text, ']', $curr_pos + 1) - $curr_pos + 1);

        //
        // We're going to try and catch usernames with "[' characters.
        //
        if( preg_match('#\[quote=\\\"#si', $possible_start, $match) && !preg_match('#\[quote=\\\"(.*?)\\\"\]#si', $possible_start) )
        {
          // OK we are in a quote tag that probably contains a ] bracket.
          // Grab a bit more of the string to hopefully get all of it..
          if ($close_pos = strpos($text, '"]', $curr_pos + 9))
          {
            if (strpos(substr($text, $curr_pos + 9, $close_pos - ($curr_pos + 9)), '[quote') === false)
            {
              $possible_start = substr($text, $curr_pos, $close_pos - $curr_pos + 2);
            }
          }
        }

        // Now compare, either using regexp or not.
        if ($open_is_regexp)
        {
          $match_result = array();
          if (preg_match($open_tag[$i], $possible_start, $match_result))
          {
            $found_start = true;
            $which_start_tag = $match_result[0];
            $start_tag_index = $i;
            break;
          }
        }
        else
        {
          // straightforward string comparison.
          if (0 == strcasecmp($open_tag[$i], $possible_start))
          {
            $found_start = true;
            $which_start_tag = $open_tag[$i];
            $start_tag_index = $i;
            break;
          }
        }
      }

      if ($found_start)
      {
        // We have an opening tag.
        // Push its position, the text we matched, and its index in the open_tag array on to the stack, and then keep going to the right.
        $match = array("pos" => $curr_pos, "tag" => $which_start_tag, "index" => $start_tag_index);
        bbcode_array_push($stack, $match);
        //
        // Rather than just increment $curr_pos
        // Set it to the ending of the tag we just found
        // Keeps error in nested tag from breaking out
        // of table structure..
        //
        $curr_pos += strlen($possible_start);
      }
      else
      {
        // check for a closing tag..
        $possible_end = substr($text, $curr_pos, $close_tag_length);
        if (0 == strcasecmp($close_tag, $possible_end))
        {
          // We have an ending tag.
          // Check if we've already found a matching starting tag.
          if (sizeof($stack) > 0)
          {
            // There exists a starting tag.
            $curr_nesting_depth = sizeof($stack);
            // We need to do 2 replacements now.
            $match = bbcode_array_pop($stack);
            $start_index = $match['pos'];
            $start_tag = $match['tag'];
            $start_length = strlen($start_tag);
            $start_tag_index = $match['index'];

            if ($open_is_regexp)
            {
              $start_tag = preg_replace($open_tag[$start_tag_index], $open_regexp_replace[$start_tag_index], $start_tag);
            }

            // everything before the opening tag.
            $before_start_tag = substr($text, 0, $start_index);

            // everything after the opening tag, but before the closing tag.
            $between_tags = substr($text, $start_index + $start_length, $curr_pos - $start_index - $start_length);

            // Run the given function on the text between the tags..
            if ($use_function_pointer)
            {
              $between_tags = $func($between_tags, $uid);
            }

            // everything after the closing tag.
            $after_end_tag = substr($text, $curr_pos + $close_tag_length);

            // Mark the lowest nesting level if needed.
            if ($mark_lowest_level && ($curr_nesting_depth == 1))
            {
              if ($open_tag[0] == '[code]')
              {
                $code_entities_match = array('#<#', '#>#', '#"#', '#:#', '#\[#', '#\]#', '#\(#', '#\)#', '#\{#', '#\}#');
                $code_entities_replace = array('&lt;', '&gt;', '&quot;', '&#58;', '&#91;', '&#93;', '&#40;', '&#41;', '&#123;', '&#125;');
                $between_tags = preg_replace($code_entities_match, $code_entities_replace, $between_tags);
              }
              $text = $before_start_tag . substr($start_tag, 0, $start_length - 1) . ":$curr_nesting_depth:$uid]";
              $text .= $between_tags . substr($close_tag_new, 0, $close_tag_new_length - 1) . ":$curr_nesting_depth:$uid]";
            }
            else
            {
              if ($open_tag[0] == '[code]')
              {
                $text = $before_start_tag . '&#91;code&#93;';
                $text .= $between_tags . '&#91;/code&#93;';
              }
              else
              {
                if ($open_is_regexp)
                {
                  $text = $before_start_tag . $start_tag;
                }
                else
                {
                  $text = $before_start_tag . substr($start_tag, 0, $start_length - 1) . ":$uid]";
                }
                $text .= $between_tags . substr($close_tag_new, 0, $close_tag_new_length - 1) . ":$uid]";
              }
            }

            $text .= $after_end_tag;

            // Now.. we've screwed up the indices by changing the length of the string.
            // So, if there's anything in the stack, we want to resume searching just after it.
            // otherwise, we go back to the start.
            if (sizeof($stack) > 0)
            {
              $match = bbcode_array_pop($stack);
              $curr_pos = $match['pos'];
//              bbcode_array_push($stack, $match);
//              ++$curr_pos;
            }
            else
            {
              $curr_pos = 1;
            }
          }
          else
          {
            // No matching start tag found. Increment pos, keep going.
            ++$curr_pos;
          }
        }
        else
        {
          // No starting tag or ending tag.. Increment pos, keep looping.,
          ++$curr_pos;
        }
      }
    }
  } // while

  return $text;

} // bbencode_first_pass_pda()

/**
 * Does second-pass bbencoding of the [code] tags. This includes
 * running htmlspecialchars() over the text contained between
 * any pair of [code] tags that are at the first level of
 * nesting. Tags at the first level of nesting are indicated
 * by this format: [code:1:$uid] ... [/code:1:$uid]
 * Other tags are in this format: [code:$uid] ... [/code:$uid]
 */
function bbencode_second_pass_code($text, $uid, $bbcode_tpl)
{
  global $lang;

  $code_start_html = $bbcode_tpl['code_open'];
  $code_end_html =  $bbcode_tpl['code_close'];

  // First, do all the 1st-level matches. These need an htmlspecialchars() run,
  // so they have to be handled differently.
  $match_count = preg_match_all("#\[code:1:$uid\](.*?)\[/code:1:$uid\]#si", $text, $matches);

  for ($i = 0; $i < $match_count; $i++)
  {
    $before_replace = $matches[1][$i];
    $after_replace = $matches[1][$i];

    // Replace 2 spaces with "&nbsp; " so non-tabbed code indents without making huge long lines.
    $after_replace = str_replace("  ", "&nbsp; ", $after_replace);
    // now Replace 2 spaces with " &nbsp;" to catch odd #s of spaces.
    $after_replace = str_replace("  ", " &nbsp;", $after_replace);

    // Replace tabs with "&nbsp; &nbsp;" so tabbed code indents sorta right without making huge long lines.
    $after_replace = str_replace("\t", "&nbsp; &nbsp;", $after_replace);

    // now Replace space occurring at the beginning of a line
    $after_replace = preg_replace("/^ {1}/m", '&nbsp;', $after_replace);

    $str_to_match = "[code:1:$uid]" . $before_replace . "[/code:1:$uid]";

    $replacement = $code_start_html;
    $replacement .= $after_replace;
    $replacement .= $code_end_html;

    $text = str_replace($str_to_match, $replacement, $text);
  }

  // Now, do all the non-first-level matches. These are simple.
  $text = str_replace("[code:$uid]", $code_start_html, $text);
  $text = str_replace("[/code:$uid]", $code_end_html, $text);

  return $text;

}
/**
 * Nathan Codding - Feb 6, 2001
 * Reverses the effects of make_clickable(), for use in editpost.
 * - Does not distinguish between "www.xxxx.yyyy" and "http://aaaa.bbbb" type URLs.
 *
 */
function undo_make_clickable($text)
{
  $text = preg_replace("#<!-- BBCode auto-link start --><a href=\"(.*?)\" target=\"_blank\">.*?</a><!-- BBCode auto-link end -->#i", "\\1", $text);
  $text = preg_replace("#<!-- BBcode auto-mailto start --><a href=\"mailto:(.*?)\">.*?</a><!-- BBCode auto-mailto end -->#i", "\\1", $text);

  return $text;

}

/**
 * Nathan Codding - August 24, 2000.
 * Takes a string, and does the reverse of the PHP standard function
 * htmlspecialchars().
 */
function undo_htmlspecialchars($input)
{
  $input = preg_replace("/&gt;/i", ">", $input);
  $input = preg_replace("/&lt;/i", "<", $input);
  $input = preg_replace("/&quot;/i", "\"", $input);
  $input = preg_replace("/&amp;/i", "&", $input);

  return $input;
}

/**
 * This is used to change a [*] tag into a [*:$uid] tag as part
 * of the first-pass bbencoding of [list] tags. It fits the
 * standard required in order to be passed as a variable
 * function into bbencode_first_pass_pda().
 */
function replace_listitems($text, $uid)
{
  $text = str_replace("[*]", "[*:$uid]", $text);

  return $text;
}

/**
 * Escapes the "/" character with "\/". This is useful when you need
 * to stick a runtime string into a PREG regexp that is being delimited
 * with slashes.
 */
function escape_slashes($input)
{
  $output = str_replace('/', '\/', $input);
  return $output;
}

/**
 * This function does exactly what the PHP4 function array_push() does
 * however, to keep phpBB compatable with PHP 3 we had to come up with our own
 * method of doing it.
 */
function bbcode_array_push(&$stack, $value)
{
   $stack[] = $value;
   return(sizeof($stack));
}

/**
 * This function does exactly what the PHP4 function array_pop() does
 * however, to keep phpBB compatable with PHP 3 we had to come up with our own
 * method of doing it.
 */
function bbcode_array_pop(&$stack)
{
   $arrSize = count($stack);
   $x = 1;

   while(list($key, $val) = each($stack))
   {
      if($x < count($stack))
      {
       $tmpArr[] = $val;
      }
      else
      {
       $return_val = $val;
      }
      $x++;
   }
   $stack = $tmpArr;

   return($return_val);
}
function phpbb_preg_quote($str, $delimiter)
{
  $text = preg_quote($str);
  $text = str_replace($delimiter, '\\' . $delimiter, $text);

  return $text;
}
//
// Smilies code ... would this be better tagged on to the end of bbcode.php?
// Probably so and I'll move it before B2
//
function smilies_pass($message)
{
  static $orig, $repl;

  if (!isset($orig))
  {
    global $db, $board_config, $nukeurl, $prefix;
    $orig = $repl = array();

    $sql = "SELECT * FROM $prefix"._bbsmilies."";
    if( !$result = $db->sql_query($sql) )
    {
      message_die(GENERAL_ERROR, "Couldn't obtain smilies data", "", __LINE__, __FILE__, $sql);
    }
    $smilies = $db->sql_fetchrowset($result);

    if (count($smilies))
    {
      usort($smilies, 'smiley_sort');
    }

    for ($i = 0; $i < count($smilies); $i++)
    {
      $orig[] = "/(?<=.\W|\W.|^\W)" . phpbb_preg_quote($smilies[$i]['code'], "/") . "(?=.\W|\W.|\W$)/";
      $repl[] = '<img src="'. $nukeurl . '/' . $board_config['smilies_path'] . '/' . $smilies[$i]['smile_url'] . '" alt="' . $smilies[$i]['emoticon'] . '" border="0" />';
    }
  }

  if (count($orig))
  {
    $message = preg_replace($orig, $repl, ' ' . $message . ' ');
    $message = substr($message, 1, -1);
  }
  
  return $message;
}

function smiley_sort($a, $b)
{
  if ( strlen($a['code']) == strlen($b['code']) )
  {
    return 0;
  }

  return ( strlen($a['code']) > strlen($b['code']) ) ? -1 : 1;
}

?>