";
return str_replace("\n", ' ', $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 = Image::newFromTitle( $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 = 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=''.$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 == '' ) {
return '';
} else {
$formatted = $this->formatComment( $comment, $title );
return " ($formatted)";
}
}
/** @todo document */
function tocIndent() {
return "\n
