Pan SEO - расширение для оптимизации форума PunBB (Page 2 of 2)

<?xml version="1.0" encoding="utf-8"?>
<!DOCTYPE extension SYSTEM "ext-1.0.dtd">

<!--
/**
 *
 * @copyright Copyright (C) 2009 PunBB
 * @license http://www.gnu.org/licenses/gpl.html GPL version 2 or higher
 * @package vb_description
 */
-->

<extension engine="1.0">
   <id>vb_description</id>
   <title>Description Generator</title>
   <version>1.0.1</version>
   <description>Auto create description tag from the content in the topic.</description>
   <author>Vb</author>
   <minversion>1.4.2</minversion>
   <maxtestedon>1.4.2</maxtestedon>
   <install>
   </install>
   <uninstall>
   </uninstall>
   <hooks>
   <hook id="hd_head"><![CDATA[
      //include functions file
      require_once $ext_info['path'].'/functions.php';
      if (FORUM_PAGE === 'viewtopic') {
      if (defined('FORUM_ALLOW_INDEX')){
      $string = preparing(get_first_post($cur_topic['first_post_id'],325));
      if (mb_strlen($string) > 75){
         $forum_head['descriptions'] = '<meta name="description" content="'.$string.'" />';
         }
      }}
   ]]></hook>   
   </hooks>
</extension>

<?php
/**
 *
 * @copyright Copyright (C) 2009 PunBB
 * @license http://www.gnu.org/licenses/gpl.html GPL version 2 or higher
 * @package vb_description
*/
/**
 * Получение текста первого поста по номеру топика.
 * @param Intager $topicId - номер топика.
*/
function get_first_post($topicId) {
   global $forum_db;
   $que = array(
      'SELECT'   => 'p.message',
      'FROM'      => 'posts AS p',
      'WHERE'      => 'p.id='.$topicId,
      'LIMIT'      =>0, 1
      );
   $sult = $forum_db->query_build($que) or error(__FILE__, __LINE__);
   $re = $forum_db->fetch_assoc($sult);
   return ($re['message']);
}
/**
 *Приведение к человекочитаемому виду переданного текста.
 * @param String $str - передаваемый текст.
*/
function FormatDescription ($str) {
   $str = trim(strip_tags(str_replace(array('[',']'), array('<','>'),  $str)));

$rules = array(
      '/(«|»|„|“|”|&quot;|&ldquo;|&rdquo;)/iu' => '"', //Не наши кавычки убираем
      '/(&ndash;|&minus;|–|−|—|—|—)/iu' => '-', //Не наши тире убираем
      '/([,.;:?!]*)\s*[\r\n]+/' => '.$1',//если в конце строки знака нет, считаем ее концом предложения, ставим точку.
      '/(.)$/' => '$1.',// Точка в конце
      '/([,.;:?!-])+/iu' => '$1', //знаки не должны повторяться
      '/\s*[-]\s+|\s+[-]\s*/iu' => ' — ', //дефис обрамленный пробелами - длинное тире
      '/\s+([,.;:?!\-\)\}\]])/iu' => '$1', //перед знаком не должно быть пробела
      '/([-\(\{\[])\s+/iu' => '$1', //после знака не должно быть пробела
      '/([,.;:?!\)\}\]])/iu' => '$1 ', //после знака должен быть пробел
      '/\"\s*([^"]+)\s*\"/iu'=> ' «$1» ',  //Расставляем Ёлки
      '/»\s([,.;:?!-])/iu'=> '»$1',  //после кавычки нет пробела, только если там знак
      '/(\s|\t)+|\"/iu' => ' ',//Два и более пробелов = один пробел.
      '/^\s+|\s+$/iu' => '',// Убираем пробел с хвоста и с головы и оставшиеся кавычки
      '/\s+([0-9]{2})[\s:.,!?-]+([0-9]{2})(\s+|[.?!,:]|$)/iu' => ' $1:$2$3', // время две группы по две цифры
      '/([a-z0-9а-я])\.\s(ru|com|рф|net|org|info[^a-zа-я])/iu' => '$1.$2', // адреса
      '/\s*([,.;:?!\-\)\}\]])/iu' => '$1', //еще раз перед знаком не должно быть пробела
   );
   return (preg_replace (array_keys($rules), $rules, $str));
}
/**
 *Подготовка текста для метатега Description.
 * @param String $str - обрабатываемый текст.
 * @param Intager $limit - Номинальая длина тега.
*/
function preparing($str, $limit = 300) {
   $str = trim(mb_substr($str, 0, intval($limit*1.5))); 
   $str = FormatDescription($str);
   $pos = mb_strrpos($str, '. '); // определяем позиция последнего пробела
   $str = trim(mb_substr($str, 0, $pos +1)); // обрезаем переменную по определенно выше позиции, плюс точка.
   return ($str);
}
?>

<?php

if (!defined('FORUM')) die();

if (FORUM_PAGE == 'index')
{
   if (!empty($forum_config['o_pan_seo_meta_title']))
      $forum_head['title'] = '<title>'.forum_htmlencode($forum_config['o_pan_seo_meta_title']).'</title>';
   
   if (!empty($forum_config['o_pan_seo_meta_description']))
   {
      $o_pan_seo_meta_description = str_replace("\n", ' ', $forum_config['o_pan_seo_meta_description']);
      $forum_head['descriptions'] = '<meta name="description" content="'.forum_htmlencode($o_pan_seo_meta_description).'" />'."\n";
   }
}
else if (FORUM_PAGE == 'viewforum')
{
   if ($forum_config['o_pan_seo_meta_title_forum'] == '1')
      $forum_head['title'] = '<title>'.forum_htmlencode($cur_forum['forum_name']).'</title>';
   
   if ($forum_config['o_pan_seo_meta_desc_forum'] == '1')
   {
      $o_pan_seo_meta_desc_forum = strip_tags($cur_forum['forum_desc']);
      $o_pan_seo_meta_desc_forum_count = iconv_strlen($o_pan_seo_meta_desc_forum, 'UTF-8');
      
      if ($o_pan_seo_meta_desc_forum_count < 400)
         $forum_head['descriptions'] = '<meta name="description" content="'.forum_htmlencode($o_pan_seo_meta_desc_forum.' '.$cur_forum['forum_name']).'" />'."\n";
      else
         $forum_head['descriptions'] = '<meta name="description" content="'.forum_htmlencode($o_pan_seo_meta_desc_forum).'" />'."\n";
   }
}
else if (FORUM_PAGE == 'viewtopic')
{
   if ($forum_config['o_pan_seo_meta_title_topic'] == '1')
      $forum_head['title'] = '<title>'.forum_htmlencode($cur_topic['subject']).'</title>';
   
   
   if ($forum_config['o_pan_seo_meta_desc_topic'] == '1')
   {
      if (!defined('FORUM_ALLOW_INDEX'))
         $forum_head['robots'] = '<meta name="ROBOTS" content="NOINDEX, FOLLOW" />'."\n";
      else
         $forum_head['descriptions'] = '<meta name="description" content="'.forum_htmlencode($pan_seo_post_info['meta_desc_topic']).'" />'."\n";
   }
}

//Added META tag rel="canonical"
if ($forum_config['o_pan_seo_meta_canonical'] == '1')
{
   if (FORUM_PAGE == 'viewtopic' && $pid > 0)
   {
      $link_canonical = forum_link($forum_url['topic'], array($id, sef_friendly($cur_topic['subject'])));
      $forum_head['canonical'] = '<link rel="canonical" href="'.$link_canonical.'" />'."\n";
   }
}

//Added META author
if (!empty($forum_config['o_pan_seo_meta_author']))
{
   $forum_head['author'] = '<link rel="author" type="text/html" href="'.$forum_config['o_pan_seo_meta_author'].'" title="'.$forum_config['o_pan_seo_meta_author'].'" />'."\n";
   
   if (!empty($forum_config['o_pan_seo_meta_publisher']))
   {
      $forum_head['publisher'] = '<link rel="publisher" href="'.$forum_config['o_pan_seo_meta_publisher'].'" />'."\n";
   }
}

   if (FORUM_PAGE == 'viewtopic'){
//Код выполнится только на странице топика..
}

//Added META author
if (!empty($forum_config['o_pan_seo_meta_author']))
{
   $forum_head['author'] = '<link rel="author" type="text/html" href="'.$forum_config['o_pan_seo_meta_author'].'" title="'.$forum_config['o_pan_seo_meta_author'].'" />'."\n";
   
   if (!empty($forum_config['o_pan_seo_meta_publisher']))
   {
      $forum_head['publisher'] = '<link rel="publisher" href="'.$forum_config['o_pan_seo_meta_publisher'].'" />'."\n";
   }
}

if (defined('FORUM_ALLOW_INDEX')){

//Added META author
if (!empty($forum_config['o_pan_seo_meta_author']))
{
   $forum_head['author'] = '<link rel="author" type="text/html" href="'.$forum_config['o_pan_seo_meta_author'].'" title="'.$forum_config['o_pan_seo_meta_author'].'" />'."\n";
   
   if (!empty($forum_config['o_pan_seo_meta_publisher']))
   {
      $forum_head['publisher'] = '<link rel="publisher" href="'.$forum_config['o_pan_seo_meta_publisher'].'" />'."\n";
   }
}

}