2006-06-23 21:22:25 +00:00
|
|
|
<?php
|
|
|
|
# MediaWiki Poem extension v1.0cis
|
|
|
|
#
|
|
|
|
# Based on example code from
|
2009-12-05 15:03:20 +00:00
|
|
|
# http://www.mediawiki.org/wiki/Manual:Extending_wiki_markup
|
2006-06-23 21:22:25 +00:00
|
|
|
#
|
|
|
|
# All other code is copyright © 2005 Nikola Smolenski <smolensk@eunet.yu>
|
|
|
|
# (with modified parser callback and attribute additions)
|
|
|
|
#
|
|
|
|
# Anyone is allowed to use this code for any purpose.
|
2007-12-16 18:27:23 +00:00
|
|
|
#
|
2006-06-23 21:22:25 +00:00
|
|
|
# To install, copy the extension to your extensions directory and add line
|
|
|
|
# include("extensions/Poem.php");
|
|
|
|
# to the bottom of your LocalSettings.php
|
|
|
|
#
|
|
|
|
# To use, put some text between <poem></poem> tags
|
|
|
|
#
|
|
|
|
# For more information see its page at
|
2009-12-05 15:03:20 +00:00
|
|
|
# http://www.mediawiki.org/wiki/Extension:Poem
|
2006-06-23 21:22:25 +00:00
|
|
|
|
2009-09-04 22:22:12 +00:00
|
|
|
$wgHooks['ParserFirstCallInit'][] = 'wfPoemExtension';
|
2006-10-29 21:41:25 +00:00
|
|
|
$wgExtensionCredits['parserhook'][] = array(
|
2009-04-27 04:45:10 +00:00
|
|
|
'path' => __FILE__,
|
2008-02-18 18:42:20 +00:00
|
|
|
'name' => 'Poem',
|
|
|
|
'author' => array( 'Nikola Smolenski', 'Brion Vibber', 'Steve Sanbeg' ),
|
|
|
|
'url' => 'http://www.mediawiki.org/wiki/Extension:Poem',
|
|
|
|
'description' => 'Adds <tt><poem></tt> tag for poem formatting',
|
|
|
|
'descriptionmsg' => 'poem-desc',
|
2006-10-29 21:41:25 +00:00
|
|
|
);
|
2008-11-30 03:15:22 +00:00
|
|
|
$wgParserTestFiles[] = dirname( __FILE__ ) . "/poemParserTests.txt";
|
|
|
|
$wgExtensionMessagesFiles['Poem'] = dirname(__FILE__) . '/Poem.i18n.php';
|
2006-06-23 21:22:25 +00:00
|
|
|
|
2009-09-04 22:22:12 +00:00
|
|
|
function wfPoemExtension( &$parser ) {
|
|
|
|
$parser->setHook("poem","PoemExtension");
|
2008-06-06 20:38:04 +00:00
|
|
|
return true;
|
2006-06-23 21:22:25 +00:00
|
|
|
}
|
|
|
|
|
|
|
|
function PoemExtension( $in, $param=array(), $parser=null ) {
|
2006-12-14 21:40:24 +00:00
|
|
|
|
2008-02-20 23:08:49 +00:00
|
|
|
/* using newlines in the text will cause the parser to add <p> tags,
|
|
|
|
* which may not be desired in some cases
|
|
|
|
*/
|
2008-03-26 20:58:20 +00:00
|
|
|
$nl = isset( $param['compact'] ) ? '' : "\n";
|
2008-02-20 23:08:49 +00:00
|
|
|
|
2008-02-18 18:42:20 +00:00
|
|
|
if( method_exists( $parser, 'recursiveTagParse' ) ) {
|
|
|
|
//new methods in 1.8 allow nesting <nowiki> in <poem>.
|
|
|
|
$tag = $parser->insertStripItem( "<br />", $parser->mStripState );
|
|
|
|
$text = preg_replace(
|
|
|
|
array( "/^\n/", "/\n$/D", "/\n/", "/^( +)/me" ),
|
2008-04-08 15:43:50 +00:00
|
|
|
array( "", "", "$tag\n", "str_replace(' ',' ','\\1')" ),
|
2008-02-18 18:42:20 +00:00
|
|
|
$in );
|
|
|
|
$text = $parser->recursiveTagParse( $text );
|
|
|
|
} else {
|
|
|
|
$text = preg_replace(
|
|
|
|
array( "/^\n/", "/\n$/D", "/\n/", "/^( +)/me" ),
|
2008-04-08 15:43:50 +00:00
|
|
|
array( "", "", "<br />\n", "str_replace(' ',' ','\\1')" ),
|
2008-02-18 18:42:20 +00:00
|
|
|
$in );
|
|
|
|
$ret = $parser->parse(
|
|
|
|
$text,
|
|
|
|
$parser->getTitle(),
|
|
|
|
$parser->getOptions(),
|
|
|
|
// We begin at line start
|
|
|
|
true,
|
|
|
|
// Important, otherwise $this->clearState()
|
|
|
|
// would get run every time <ref> or
|
|
|
|
// <references> is called, fucking the whole
|
|
|
|
// thing up.
|
|
|
|
false
|
|
|
|
);
|
|
|
|
|
|
|
|
$text = $ret->getText();
|
|
|
|
}
|
|
|
|
|
2006-06-23 21:22:25 +00:00
|
|
|
global $wgVersion;
|
|
|
|
if( version_compare( $wgVersion, "1.7alpha" ) >= 0 ) {
|
|
|
|
// Pass HTML attributes through to the output.
|
|
|
|
$attribs = Sanitizer::validateTagAttributes( $param, 'div' );
|
|
|
|
} else {
|
|
|
|
// Can't guarantee safety on 1.6 or older.
|
|
|
|
$attribs = array();
|
|
|
|
}
|
2008-02-18 18:42:20 +00:00
|
|
|
|
2006-06-23 21:22:25 +00:00
|
|
|
// Wrap output in a <div> with "poem" class.
|
|
|
|
if( isset( $attribs['class'] ) ) {
|
|
|
|
$attribs['class'] = 'poem ' . $attribs['class'];
|
|
|
|
} else {
|
|
|
|
$attribs['class'] = 'poem';
|
|
|
|
}
|
2008-02-18 18:42:20 +00:00
|
|
|
|
2008-12-20 09:32:47 +00:00
|
|
|
return Xml::openElement( 'div', $attribs ) .
|
2008-02-20 23:08:49 +00:00
|
|
|
$nl .
|
2006-12-14 21:40:24 +00:00
|
|
|
trim( $text ) .
|
2008-02-20 23:08:49 +00:00
|
|
|
"$nl</div>";
|
2006-06-23 21:22:25 +00:00
|
|
|
}
|