File Source for outputfilter.shorturls.php

<?php
/**
* Zikula Application Framework
*
* @copyright (c) 2004, Zikula Development Team
* @link http://www.zikula.org
* @version $Id: outputfilter.shorturls.php 24342 2008-06-06 12:03:14Z markwest $
* @license GNU/GPL - http://www.gnu.org/copyleft/gpl.html
* @package Zikula_Template_Plugins
* @subpackage Filters
*/
/**
* Smarty short urls outputfilter plugin
*
* File: outputfilter.shorturls.php
* Type: outputfilter
* Name: shorturls
* Date: Nov 7, 2003
* Purpose: Generate short urls for the PN CMS
* @author Craig R. Saunders (coldrolledsteel)
* @author Martin Anderson (msanderson)
* @author Luca Longinotti (CHTEKK)
* @author Mark West
* @version 1.3
* @param string
* @param Smarty
*/
function smarty_outputfilter_shorturls($source, &$smarty)
{
// If you control the server, it is preferable for better performance to put rewrite rules
// from the htaccess file into main configuration file, httpd.conf.
// get the site's base uri, eg /nuke/ for root-relative links
$baseurl = pnGetBaseURL();
$type = FormUtil::getPassedValue('type', 'user', 'GETPOST');
if (pnConfigGetVar('shorturlstype') == 0) {
$prefix = '[(<[^>]*?)[\'"](?:'.$baseurl.'|'.$baseurl.')?(?:[./]{0,2})'; // Match local URLs in HTML tags, removes / and ./
// '|"(?:'.$baseurl.')?'; <[^>]*?[\'"]
// (?i) means case insensitive; \w='word' character; \d=digit; (amp;)? means content of brackets optional; (?:catid=)? means optional and won't capture string for backreferences
// [#-~]+ matches ASCII# 35(#)-126(~), ie all (English) upper & lower case letters, numbers and special characters like #$!@+%^&*()~ etc, ie all but space (32), DEl, and other specxial non-printing codes like backspace, newline, and tab
// [0-9A-Za-zÀ-ÖØ-öø-ÿ_]+ matches all international letters
$in = array(
$prefix . '(?:index\.php\?|modules.php\?op=modload&(?:amp;)?)name=([\w\d\.\:\_\/]+)(?:&(?:amp;)?file=index)?&req=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)[\'"]]',
$prefix . '(?:index\.php\?|modules.php\?op=modload&(?:amp;)?)name=([\w\d\.\:\_\/]+)(?:&(?:amp;)?file=index)?&req=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)[\'"]]',
$prefix . '(?:index\.php\?|modules.php\?op=modload&(?:amp;)?)name=([\w\d\.\:\_\/]+)(?:&(?:amp;)?file=index)?&req=([\w\d+]+)?&([\w\d+]+)=([\w\d+]+)[\'"]]',
$prefix . '(?:index\.php\?|modules.php\?op=modload&(?:amp;)?)name=([\w\d\.\:\_\/]+)(?:&(?:amp;)?file=index)?&req=([\w\d+]+)[\'"]]',
$prefix . '(?:index\.php\?|modules.php\?op=modload&(?:amp;)?)name=([\w\d\.\:\_\/]+)(?:&(?:amp;)?file=index)?[\'"]]',
'[<([^>]+)\s(src|href|background|action)\s*=\s*((["\'])?)(?!http)(?!mailto)(?!javascript:)(?![/"\'\s#]+)]Ui'
);
$out = array(
// Generic links for old modules
'$1"'.$baseurl.'$2/$3/$4/$5/$6/$7/$8/$9"',
'$1"'.$baseurl.'$2/$3/$4/$5/$6/$7"',
'$1"'.$baseurl.'$2/$3/$4/$5"',
'$1"'.$baseurl.'$2/$3/"',
'$1"'.$baseurl.'$2/"',
'<$1 $2=$3'.$baseurl
);
} else if ($type !== 'admin' && !stristr(pnServerGetVar('QUERY_STRING'), 'admin')) {
// Credits to
// ColdRolledSteel: for creating this file and the rewrite rules / per aver creato questo file e le regole di riscrittura
// msandersen: for tweaking this file and the rewrite rules / per aver aggiornato questo file e le regole di riscrittura
// CHTEKK: adaptation for eNvolution, writing/rewriting of many rules, italian translation and on/off variable / adattazione ad eNvolution, scrittura/riscrittura di diverse regole, traduzione italiana e variabile on/off
//
// If you control the server, it is preferable for better performance to put rewrite rules
// from the .htaccess file into main configuration file, httpd.conf.
$extension = pnConfigGetVar('shorturlsext');
$prefix = '|"(?:'.$baseurl.')?';
$entrypoint = pnConfigGetVar('entrypoint', 'index.php');
// (?i) means case insensitive; \w='word' character; \d=digit; (amp;)? means optional; (?:catid=)? means optional and won't capture string for backreferences
$in = array(
$prefix . $entrypoint . '\?newlang=([\w\d\.\:\_\/]+)"|',
$prefix . '\?theme=([\w\d\.\:\_\/]+)"|',
$prefix . '\?newtheme=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '"|',
$prefix . 'user.php"|',
$prefix . 'print.php\?sid=(\d+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=index"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=index[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=main"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=main[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . $entrypoint . '\?module=([\w\d\.\:\_\/]+)&(?:amp;)?func=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"[#]([\w\d]*)|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=index&(?:amp;)?req=([\w\d\.\:\_\/]+)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=index"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)"|',
$prefix . 'modules.php\?op=modload&(?:amp;)?name=([\w\d\.\:\_\/]+)&(?:amp;)?file=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)&(?:amp;)?([\w\d\.\:\_\/]+)=([\w\d\.\:\_\/]+)[#]([\w\d]*)"|'
);
$out = array(
'"changelang-$1.'.$extension.'"',
'"previewtheme-$1.'.$extension.'"',
'"changetheme-$1.'.$extension.'"',
'"index.'.$extension.'"',
'"user.'.$extension.'"',
'"PrintArticle$1.'.$extension.'"',
'"$1.'.$extension.'"',
'"$1.'.$extension.'#$2"',
'"$1.'.$extension.'"',
'"$1.'.$extension.'#$2"',
'"$1-$2.'.$extension.'"',
'"$1-$2.'.$extension.'#$3"',
'"$1-$2-$3-$4.'.$extension.'"',
'"$1-$2-$3-$4.'.$extension.'#$5"',
'"$1-$2-$3-$4-$5-$6.'.$extension.'"',
'"$1-$2-$3-$4-$5-$6.'.$extension.'#$7"',
'"$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'"',
'"$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'#$9"',
'"module-$1.'.$extension.'"',
'"module-$1.'.$extension.'#$2"',
'"module-$1.'.$extension.'"',
'"module-$1.'.$extension.'#$2"',
'"module-$1-$2.'.$extension.'"',
'"module-$1-$2.'.$extension.'#$3"',
'"module-$1-$2-$3-$4.'.$extension.'"',
'"module-$1-$2-$3-$4.'.$extension.'#$5"',
'"module-$1-$2-$3-$4-$5-$6.'.$extension.'"',
'"module-$1-$2-$3-$4-$5-$6.'.$extension.'#$7"',
'"module-$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'"',
'"module-$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'#$9"',
'"$1+$2.'.$extension.'"',
'"$1.'.$extension.'"',
'"$1-$2.'.$extension.'"',
'"$1-$2.'.$extension.'#$3"',
'"$1-$2-$3-$4.'.$extension.'"',
'"$1-$2-$3-$4.'.$extension.'#$5"',
'"$1-$2-$3-$4-$5-$6.'.$extension.'"',
'"$1-$2-$3-$4-$5-$6.'.$extension.'#$7"',
'"$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'"',
'"$1-$2-$3-$4-$5-$6-$7-$8.'.$extension.'#$9"'
);
} else {
$in = array();
$out = array();
}
// perform the replacement
$source = preg_replace($in, $out, $source);
// return the modified source
return $source;
}

Source for file outputfilter.shorturls.php