checkTitleEncoding( $link );
$link = preg_replace( '/[\\x00-\\x1f_]/', ' ', $link );
$link = htmlspecialchars( $link );
$r = ($class != '') ? " class='$class'" : " class='external'";
$r .= " title=\"{$link}\"";
return $r;
}
/** @todo document */
function getInternalLinkAttributes( $link, $text, $broken = false ) {
$link = urldecode( $link );
$link = str_replace( '_', ' ', $link );
$link = htmlspecialchars( $link );
if( $broken == 'stub' ) {
$r = ' class="stub"';
} else if ( $broken == 'yes' ) {
$r = ' class="new"';
} else {
$r = '';
}
$r .= " title=\"{$link}\"";
return $r;
}
/**
* @param bool $broken
*/
function getInternalLinkAttributesObj( &$nt, $text, $broken = false ) {
if( $broken == 'stub' ) {
$r = ' class="stub"';
} else if ( $broken == 'yes' ) {
$r = ' class="new"';
} else {
$r = '';
}
$r .= ' title="' . $nt->getEscapedText() . '"';
return $r;
}
/**
* Note: This function MUST call getArticleID() on the link,
* otherwise the cache won't get updated properly. See LINKCACHE.DOC.
*/
function makeLink( $title, $text = '', $query = '', $trail = '' ) {
wfProfileIn( 'Skin::makeLink' );
$nt = Title::newFromText( $title );
if ($nt) {
$result = $this->makeLinkObj( Title::newFromText( $title ), $text, $query, $trail );
} else {
wfDebug( 'Invalid title passed to Skin::makeLink(): "'.$title."\"\n" );
$result = $text == "" ? $title : $text;
}
wfProfileOut( 'Skin::makeLink' );
return $result;
}
/** @todo document */
function makeKnownLink( $title, $text = '', $query = '', $trail = '', $prefix = '',$aprops = '') {
$nt = Title::newFromText( $title );
if ($nt) {
return $this->makeKnownLinkObj( Title::newFromText( $title ), $text, $query, $trail, $prefix , $aprops );
} else {
wfDebug( 'Invalid title passed to Skin::makeKnownLink(): "'.$title."\"\n" );
return $text == '' ? $title : $text;
}
}
/** @todo document */
function makeBrokenLink( $title, $text = '', $query = '', $trail = '' ) {
$nt = Title::newFromText( $title );
if ($nt) {
return $this->makeBrokenLinkObj( Title::newFromText( $title ), $text, $query, $trail );
} else {
wfDebug( 'Invalid title passed to Skin::makeBrokenLink(): "'.$title."\"\n" );
return $text == '' ? $title : $text;
}
}
/** @todo document */
function makeStubLink( $title, $text = '', $query = '', $trail = '' ) {
$nt = Title::newFromText( $title );
if ($nt) {
return $this->makeStubLinkObj( Title::newFromText( $title ), $text, $query, $trail );
} else {
wfDebug( 'Invalid title passed to Skin::makeStubLink(): "'.$title."\"\n" );
return $text == '' ? $title : $text;
}
}
/**
* Pass a title object, not a title string
*/
function makeLinkObj( &$nt, $text= '', $query = '', $trail = '', $prefix = '' ) {
global $wgOut, $wgUser, $wgInputEncoding;
$fname = 'Skin::makeLinkObj';
wfProfileIn( $fname );
# Fail gracefully
if ( ! is_object($nt) ) {
# wfDebugDieBacktrace();
wfProfileOut( $fname );
return "{$prefix}{$text}{$trail}";
}
$ns = $nt->getNamespace();
$dbkey = $nt->getDBkey();
if ( $nt->isExternal() ) {
$u = $nt->getFullURL();
$link = $nt->getPrefixedURL();
if ( '' == $text ) { $text = $nt->getPrefixedText(); }
$style = $this->getExternalLinkAttributes( $link, $text, 'extiw' );
$inside = '';
if ( '' != $trail ) {
if ( preg_match( '/^([a-z]+)(.*)$$/sD', $trail, $m ) ) {
$inside = $m[1];
$trail = $m[2];
}
}
# Check for anchors, normalize the anchor
$parts = explode( '#', $u, 2 );
if ( count( $parts ) == 2 ) {
$anchor = urlencode( do_html_entity_decode( str_replace(' ', '_', $parts[1] ),
ENT_COMPAT,
$wgInputEncoding ) );
$replacearray = array(
'%3A' => ':',
'%' => '.'
);
$u = $parts[0] . '#' .
str_replace( array_keys( $replacearray ),
array_values( $replacearray ),
$anchor );
}
$t = "{$text}{$inside}";
return $t;
} elseif ( $nt->isAlwaysKnown() ) {
# Image links, special page links and self-links with fragements are always known.
$retVal = $this->makeKnownLinkObj( $nt, $text, $query, $trail, $prefix );
} else {
wfProfileIn( $fname.'-immediate' );
# Work out link colour immediately
$aid = $nt->getArticleID() ;
if ( 0 == $aid ) {
$retVal = $this->makeBrokenLinkObj( $nt, $text, $query, $trail, $prefix );
} else {
$threshold = $wgUser->getOption('stubthreshold') ;
if ( $threshold > 0 ) {
$dbr =& wfGetDB( DB_SLAVE );
$s = $dbr->selectRow(
array( 'page' ),
array( 'page_len',
'page_namespace',
'page_is_redirect' ),
array( 'page_id' => $aid ), $fname ) ;
if ( $s !== false ) {
$size = $s->page_len;
if ( $s->page_is_redirect OR $s->page_namespace != NS_MAIN ) {
$size = $threshold*2 ; # Really big
}
} else {
$size = $threshold*2 ; # Really big
}
} else {
$size = 1 ;
}
if ( $size < $threshold ) {
$retVal = $this->makeStubLinkObj( $nt, $text, $query, $trail, $prefix );
} else {
$retVal = $this->makeKnownLinkObj( $nt, $text, $query, $trail, $prefix );
}
}
wfProfileOut( $fname.'-immediate' );
}
wfProfileOut( $fname );
return $retVal;
}
/**
* Pass a title object, not a title string
*/
function makeKnownLinkObj( $nt, $text = '', $query = '', $trail = '', $prefix = '' , $aprops = '' ) {
global $wgOut, $wgTitle, $wgInputEncoding;
$fname = 'Skin::makeKnownLinkObj';
wfProfileIn( $fname );
if ( !is_object( $nt ) ) {
wfProfileOut( $fname );
return $text;
}
$u = $nt->escapeLocalURL( $query );
if ( '' != $nt->getFragment() ) {
if( $nt->getPrefixedDbkey() == '' ) {
$u = '';
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getFragment() );
}
}
$anchor = urlencode( do_html_entity_decode( str_replace(' ', '_', $nt->getFragment()), ENT_COMPAT, $wgInputEncoding ) );
$replacearray = array(
'%3A' => ':',
'%' => '.'
);
$u .= '#' . str_replace(array_keys($replacearray),array_values($replacearray),$anchor);
}
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getPrefixedText() );
}
$style = $this->getInternalLinkAttributesObj( $nt, $text );
list( $inside, $trail ) = Linker::splitTrail( $trail );
$r = "{$prefix}{$text}{$inside}{$trail}";
wfProfileOut( $fname );
return $r;
}
/**
* Pass a title object, not a title string
*/
function makeBrokenLinkObj( $nt, $text = '', $query = '', $trail = '', $prefix = '' ) {
# Fail gracefully
if ( ! isset($nt) ) {
# wfDebugDieBacktrace();
return "{$prefix}{$text}{$trail}";
}
$fname = 'Skin::makeBrokenLinkObj';
wfProfileIn( $fname );
if ( '' == $query ) {
$q = 'action=edit';
} else {
$q = 'action=edit&'.$query;
}
$u = $nt->escapeLocalURL( $q );
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getPrefixedText() );
}
$style = $this->getInternalLinkAttributesObj( $nt, $text, "yes" );
list( $inside, $trail ) = Linker::splitTrail( $trail );
$s = "{$prefix}{$text}{$inside}{$trail}";
wfProfileOut( $fname );
return $s;
}
/**
* Pass a title object, not a title string
*/
function makeStubLinkObj( $nt, $text = '', $query = '', $trail = '', $prefix = '' ) {
$link = $nt->getPrefixedURL();
$u = $nt->escapeLocalURL( $query );
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getPrefixedText() );
}
$style = $this->getInternalLinkAttributesObj( $nt, $text, 'stub' );
list( $inside, $trail ) = Linker::splitTrail( $trail );
$s = "{$prefix}{$text}{$inside}{$trail}";
return $s;
}
/** @todo document */
function makeSelfLinkObj( $nt, $text = '', $query = '', $trail = '', $prefix = '' ) {
$u = $nt->escapeLocalURL( $query );
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getPrefixedText() );
}
list( $inside, $trail ) = Linker::splitTrail( $trail );
return "{$prefix}{$text}{$inside}{$trail}";
}
/** @todo document */
function fnamePart( $url ) {
$basename = strrchr( $url, '/' );
if ( false === $basename ) {
$basename = $url;
} else {
$basename = substr( $basename, 1 );
}
return htmlspecialchars( $basename );
}
/** Obsolete alias */
function makeImage( $url, $alt = '' ) {
return $this->makeExternalImage( $url, $alt );
}
/** @todo document */
function makeExternalImage( $url, $alt = '' ) {
global $wgOut;
if ( '' == $alt ) {
$alt = $this->fnamePart( $url );
}
$s = '
';
return $s;
}
/** @todo document */
function makeImageLinkObj( &$nt, $label, $alt, $align = '', $width = false, $height = false, $framed = false,
$thumb = false, $manual_thumb = '' )
{
global $wgContLang, $wgUser, $wgThumbLimits;
$img = new Image( $nt );
$url = $img->getViewURL();
$prefix = $postfix = '';
if ( 'center' == $align )
{
$prefix = '
';
$postfix = '
';
$align = 'none';
}
if ( $thumb || $framed ) {
# Create a thumbnail. Alignment depends on language
# writing direction, # right aligned for left-to-right-
# languages ("Western languages"), left-aligned
# for right-to-left-languages ("Semitic languages")
#
# If thumbnail width has not been provided, it is set
# to the default user option as specified in Language*.php
if ( $align == '' ) {
$align = $wgContLang->isRTL() ? 'left' : 'right';
}
if ( $width === false ) {
$wopt = $wgUser->getOption( 'thumbsize' );
if( !isset( $wgThumbLimits[$wopt] ) ) {
$wopt = User::getDefaultOption( 'thumbsize' );
}
$width = $wgThumbLimits[$wopt];
}
return $prefix.$this->makeThumbLinkObj( $img, $label, $alt, $align, $width, $height, $framed, $manual_thumb ).$postfix;
} elseif ( $width ) {
# Create a resized image, without the additional thumbnail
# features
if ( $height !== false && ( $img->getHeight() * $width / $img->getWidth() > $height ) ) {
$width = $img->getWidth() * $height / $img->getHeight();
}
if ( '' == $manual_thumb ) {
$url = $img->createThumb( $width );
}
}
$u = $nt->escapeLocalURL();
if ( $url == '' ) {
$s = $this->makeBrokenImageLinkObj( $img->getTitle() );
//$s .= "
{$alt}
{$url}
\n";
} else {
$s = '' .
'
';
}
if ( '' != $align ) {
$s = "{$s}
";
}
return str_replace("\n", ' ',$prefix.$s.$postfix);
}
/**
* Make HTML for a thumbnail including image, border and caption
* $img is an Image object
*/
function makeThumbLinkObj( $img, $label = '', $alt, $align = 'right', $boxwidth = 180, $boxheight=false, $framed=false , $manual_thumb = "" ) {
global $wgStylePath, $wgContLang;
$url = $img->getViewURL();
$width = $height = 0;
if ( $img->exists() )
{
$width = $img->getWidth();
$height = $img->getHeight();
}
if ( 0 == $width || 0 == $height )
{
$width = $height = 200;
}
if ( $boxwidth == 0 )
{
$boxwidth = 200;
}
if ( $framed )
{
// Use image dimensions, don't scale
$boxwidth = $width;
$oboxwidth = $boxwidth + 2;
$boxheight = $height;
$thumbUrl = $url;
} else {
$h = intval( $height/($width/$boxwidth) );
$oboxwidth = $boxwidth + 2;
if ( ( ! $boxheight === false ) && ( $h > $boxheight ) )
{
$boxwidth *= $boxheight/$h;
} else {
$boxheight = $h;
}
if ( '' == $manual_thumb ) $thumbUrl = $img->createThumb( $boxwidth );
}
if ( $manual_thumb != '' ) # Use manually specified thumbnail
{
$manual_title = Title::makeTitleSafe( NS_IMAGE, $manual_thumb ); #new Title ( $manual_thumb ) ;
$manual_img = new Image( $manual_title );
$thumbUrl = $manual_img->getViewURL();
if ( $manual_img->exists() )
{
$width = $manual_img->getWidth();
$height = $manual_img->getHeight();
$boxwidth = $width ;
$boxheight = $height ;
$oboxwidth = $boxwidth + 2 ;
}
}
$u = $img->getEscapeLocalURL();
$more = htmlspecialchars( wfMsg( 'thumbnail-more' ) );
$magnifyalign = $wgContLang->isRTL() ? 'left' : 'right';
$textalign = $wgContLang->isRTL() ? ' style="text-align:right"' : '';
$s = "";
if ( $thumbUrl == '' ) {
$s .= $this->makeBrokenImageLinkObj( $img->getTitle );
$zoomicon = '';
} else {
$s .= '
'.
'!['.$alt.']('.$thumbUrl.')
';
if ( $framed ) {
$zoomicon="";
} else {
$zoomicon = '
';
}
}
$s .= '
'.$zoomicon.$label."
";
return str_replace("\n", ' ', $s);
}
/**
* Pass a title object, not a title string
*/
function makeBrokenImageLinkObj( &$nt, $text = '', $query = '', $trail = '', $prefix = '' ) {
# Fail gracefully
if ( ! isset($nt) ) {
# wfDebugDieBacktrace();
return "{$prefix}{$text}{$trail}";
}
$fname = 'Skin::makeBrokenImageLinkObj';
wfProfileIn( $fname );
$q = 'wpDestFile=' . urlencode( $nt->getDBkey() );
if ( '' != $query ) {
$q .= "&$query";
}
$uploadTitle = Title::makeTitle( NS_SPECIAL, 'Upload' );
$url = $uploadTitle->escapeLocalURL( $q );
if ( '' == $text ) {
$text = htmlspecialchars( $nt->getPrefixedText() );
}
$style = $this->getInternalLinkAttributesObj( $nt, $text, "yes" );
list( $inside, $trail ) = Linker::splitTrail( $trail );
$s = "{$prefix}{$text}{$inside}{$trail}";
wfProfileOut( $fname );
return $s;
}
/** @todo document */
function makeMediaLink( $name, $url, $alt = '' ) {
$nt = Title::makeTitleSafe( NS_IMAGE, $name );
return $this->makeMediaLinkObj( $nt, $alt );
}
/**
* Create a direct link to a given uploaded file.
*
* @param Title $title
* @param string $text pre-sanitized HTML
* @param bool $nourl Mask absolute URLs, so the parser doesn't
* linkify them (it is currently not context-aware)
* @return string HTML
*
* @access public
* @todo Handle invalid or missing images better.
*/
function makeMediaLinkObj( $title, $text = '', $nourl=false ) {
if( is_null( $title ) ) {
### HOTFIX. Instead of breaking, return empty string.
return $text;
} else {
$name = $title->getDBKey();
$img = new Image( $title );
$url = $img->getURL();
if( $nourl ) {
$url = str_replace( "http://", "http-noparse://", $url );
}
$alt = htmlspecialchars( $title->getText() );
if( $text == '' ) {
$text = $alt;
}
$u = htmlspecialchars( $url );
return "{$text}";
}
}
/** @todo document */
function specialLink( $name, $key = '' ) {
global $wgContLang;
if ( '' == $key ) { $key = strtolower( $name ); }
$pn = $wgContLang->ucfirst( $name );
return $this->makeKnownLink( $wgContLang->specialPage( $pn ),
wfMsg( $key ) );
}
/** @todo document */
function makeExternalLink( $url, $text, $escape = true, $linktype = '' ) {
$style = $this->getExternalLinkAttributes( $url, $text, 'external ' . $linktype );
global $wgNoFollowLinks;
if( $wgNoFollowLinks ) {
$style .= ' rel="nofollow"';
}
$url = htmlspecialchars( $url );
if( $escape ) {
$text = htmlspecialchars( $text );
}
return ''.$text.'';
}
/**
* This function is called by all recent changes variants, by the page history,
* and by the user contributions list. It is responsible for formatting edit
* comments. It escapes any HTML in the comment, but adds some CSS to format
* auto-generated comments (from section editing) and formats [[wikilinks]].
*
* The &$title parameter must be a title OBJECT. It is used to generate a
* direct link to the section in the autocomment.
* @author Erik Moeller
*
* Note: there's not always a title to pass to this function.
* Since you can't set a default parameter for a reference, I've turned it
* temporarily to a value pass. Should be adjusted further. --brion
*/
function formatComment($comment, $title = NULL) {
$fname = 'Skin::formatComment';
wfProfileIn( $fname );
global $wgContLang;
$comment = str_replace( "\n", " ", $comment );
$comment = htmlspecialchars( $comment );
# The pattern for autogen comments is / * foo * /, which makes for
# some nasty regex.
# We look for all comments, match any text before and after the comment,
# add a separator where needed and format the comment itself with CSS
while (preg_match('/(.*)\/\*\s*(.*?)\s*\*\/(.*)/', $comment,$match)) {
$pre=$match[1];
$auto=$match[2];
$post=$match[3];
$link='';
if($title) {
$section=$auto;
# This is hackish but should work in most cases.
$section=str_replace('[[','',$section);
$section=str_replace(']]','',$section);
$title->mFragment=$section;
$link=$this->makeKnownLinkObj($title,wfMsg('sectionlink'));
}
$sep='-';
$auto=$link.$auto;
if($pre) { $auto = $sep.' '.$auto; }
if($post) { $auto .= ' '.$sep; }
$auto='';
$comment=$pre.$auto.$post;
}
# format regular and media links - all other wiki formatting
# is ignored
$medians = $wgContLang->getNsText( NS_MEDIA ) . ':';
while(preg_match('/\[\[(.*?)(\|(.*?))*\]\](.*)$/',$comment,$match)) {
# Handle link renaming [[foo|text]] will show link as "text"
if( "" != $match[3] ) {
$text = $match[3];
} else {
$text = $match[1];
}
if( preg_match( '/^' . $medians . '(.*)$/i', $match[1], $submatch ) ) {
# Media link; trail not supported.
$linkRegexp = '/\[\[(.*?)\]\]/';
$thelink = $this->makeMediaLink( $submatch[1], "", $text );
} else {
# Other kind of link
if( preg_match( wfMsgForContent( "linktrail" ), $match[4], $submatch ) ) {
$trail = $submatch[1];
} else {
$trail = "";
}
$linkRegexp = '/\[\[(.*?)\]\]' . preg_quote( $trail, '/' ) . '/';
if ($match[1][0] == ':')
$match[1] = substr($match[1], 1);
$thelink = $this->makeLink( $match[1], $text, "", $trail );
}
$comment = preg_replace( $linkRegexp, $thelink, $comment, 1 );
}
wfProfileOut( $fname );
return $comment;
}
/**
* Wrap a comment in standard punctuation and formatting if
* it's non-empty, otherwise return empty string.
*
* @param string $comment
* @param Title $title
* @return string
* @access public
*/
function commentBlock( $comment, $title = NULL ) {
if( $comment == '' || $comment == '*' ) {
return '';
} else {
$formatted = $this->formatComment( $comment, $title );
return " ";
}
}
/** @todo document */
function tocIndent() {
return "\n";
}
/** @todo document */
function tocUnindent($level) {
return "\n" . str_repeat( "
\n\n", $level>0 ? $level : 0 );
}
/**
* parameter level defines if we are on an indentation level
*/
function tocLine( $anchor, $tocline, $tocnumber, $level ) {
return "\n' .
$tocnumber . ' ' .
$tocline . '';
}
/** @todo document */
function tocLineEnd() {
return "\n";
}
/** @todo document */
function tocList($toc) {
return ""
. "" . wfMsg('toc') . "\n"
. $toc
. "\n |
\n"
. '\n";
}
/** @todo document */
function editSectionLinkForOther( $title, $section ) {
global $wgRequest;
global $wgContLang;
$title = Title::newFromText($title);
$editurl = '§ion='.$section;
$url = $this->makeKnownLink($title->getPrefixedText(),wfMsg('editsection'),'action=edit'.$editurl);
if( $wgContLang->isRTL() ) {
$farside = 'left';
$nearside = 'right';
} else {
$farside = 'right';
$nearside = 'left';
}
return "[".$url."]
";
}
/** @todo document */
function editSectionLink( $nt, $section ) {
global $wgRequest;
global $wgContLang;
if( $wgRequest->getInt( 'oldid' ) && ( $wgRequest->getVal( 'diff' ) != '0' ) ) {
# Section edit links would be out of sync on an old page.
# But, if we're diffing to the current page, they'll be
# correct.
return '';
}
$editurl = '§ion='.$section;
$url = $this->makeKnownLink($nt->getPrefixedText(),wfMsg('editsection'),'action=edit'.$editurl);
if( $wgContLang->isRTL() ) {
$farside = 'left';
$nearside = 'right';
} else {
$farside = 'right';
$nearside = 'left';
}
return "[".$url."]
";
}
/**
* Split a link trail, return the "inside" portion and the remainder of the trail
* as a two-element array
*
* @static
*/
function splitTrail( $trail ) {
static $regex = false;
if ( $regex === false ) {
global $wgContLang;
$regex = $wgContLang->linkTrail();
}
$inside = '';
if ( '' != $trail ) {
if ( preg_match( $regex, $trail, $m ) ) {
$inside = $m[1];
$trail = $m[2];
}
}
return array( $inside, $trail );
}
}
?>