mediawiki-extensions-Interwiki/SpecialInterwiki.php
Siebrand Mazeland 1609409b9d * add svn:keywords 'LastChangedDate'
* replace text 'version' in ExtensionCredits with version based on 'LastChangedDate' for automatic version updating
2008-02-27 14:13:10 +00:00

254 lines
9.4 KiB
PHP

<?php
/*
* This program is free software; you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
* the Free Software Foundation; either version 2 of the License, or
* (at your option) any later version.
*
* @author Stephanie Amanda Stevens <phroziac@gmail.com>
* @author SPQRobin <robin_1273@hotmail.com>
* @copyright Copyright (C) 2005-2007 Stephanie Amanda Stevens
* @copyright Copyright (C) 2007 SPQRobin
* @license http://www.gnu.org/copyleft/gpl.html GNU General Public License 2.0 or later
* Formatting improvements Stephen Kennedy, 2006.
*/
if (!defined('MEDIAWIKI')) die();
$wgExtensionCredits['specialpage'][] = array(
'name' => 'SpecialInterwiki',
'url' => 'http://mediawiki.org/wiki/Extension:SpecialInterwiki',
'description' => 'Adds a [[Special:Interwiki|special page]] to view and edit the interwiki table',
'version' => preg_replace('/^.* (\d\d\d\d-\d\d-\d\d) .*$/', '\1', '$LastChangedDate$'), #just the date of the last change
'author' => array( 'Stephanie Amanda Stevens', 'SPQRobin', 'others' ),
'descriptionmsg' => 'interwiki-desc',
);
$wgExtensionMessagesFiles['Interwiki'] = dirname(__FILE__) . '/SpecialInterwiki.i18n.php';
$wgExtensionFunctions[] = "Interwiki";
function Interwiki() {
global $IP, $wgHooks;
# Add a new log type
$wgHooks['LogPageValidTypes'][] = 'wfInterwikiAddLogType';
# Add a new log type
$wgHooks['LogPageValidTypes'][] = 'wfInterwikiAddLogType';
$wgHooks['LogPageLogName'][] = 'wfInterwikiAddLogName';
$wgHooks['LogPageLogHeader'][] = 'wfInterwikiAddLogHeader';
$wgHooks['LogPageActionText'][] = 'wfInterwikiAddActionText';
class Interwiki extends IncludableSpecialPage {
public function __construct() {
parent::__construct( 'Interwiki' );
}
function execute( $para ) {
wfLoadExtensionMessages( 'Interwiki' );
$fname = 'Interwiki::execute';
global $wgOut, $wgRequest, $wgUser;
$this->setHeaders();
$wgOut->setPagetitle( wfMsg( 'interwiki' ) );
$do = $wgRequest->getVal( 'do' );
// Some common checks
$admin = $wgUser->isAllowed( 'interwiki' );
$selfTitle = Title::makeTitle( NS_SPECIAL, 'Interwiki' );
// Protect administrative actions against malicious requests
$safePost = $wgRequest->wasPosted() &&
$wgUser->matchEditToken( $wgRequest->getVal( 'wpEditToken' ) );
$out = "";
if ($do == "delete") {
if (!$admin) { $wgOut->permissionRequired('interwiki'); return; }
$prefix = $wgRequest->getVal( 'prefix' );
$encPrefix = htmlspecialchars( $prefix );
$action = $selfTitle->escapeLocalURL( "do=delete2" );
$button = wfMsgHtml("delete");
$topmessage = wfMsgHtml('interwiki_delquestion', $prefix);
$deletingmessage = wfMsgHtml('interwiki_deleting', $prefix);
$reasonmessage = wfMsgHtml('deletecomment');
$defaultreason = wfMsgForContent( 'interwiki_defaultreason' );
$token = htmlspecialchars( $wgUser->editToken() );
$out .= "<fieldset>
<legend>$topmessage</legend>
<form id=\"delete\" method=\"post\" action=\"{$action}\">
<table><tr>
<td>$deletingmessage</td>
</tr><tr>
<td><input type=\"hidden\" name=\"prefix\" value=\"{$encPrefix}\" />
$reasonmessage &nbsp; <input tabindex='1' type='text' name=\"reason\" maxlength='200' size='60' value='$defaultreason' /></td>
</tr><tr><td>
<input type=\"submit\" name=\"delete\" value=\"{$button}\" />
<input type=\"hidden\" name=\"wpEditToken\" value=\"{$token}\"/>
</td></tr></table>
</form>
</fieldset>\n";
} elseif ($do == "delete2" && $safePost) {
if (!$admin) { $wgOut->permissionRequired('interwiki'); return; }
$prefix = $wgRequest->getVal('prefix');
$reason = $wgRequest->getText('reason');
$dbw =& wfGetDB( DB_MASTER );
$dbw->delete( 'interwiki', array( 'iw_prefix' => $prefix ), $fname );
if ($dbw->affectedRows() == 0) {
$wgOut->addWikiText( wfMsg( 'interwiki_delfailed', $prefix ) );
} else {
$wgOut->addWikiText( wfMsg( 'interwiki_deleted', $prefix ) . '<br /><br />' . wfMsg ( 'returnto', '[[Special:Log/interwiki]]' ) ); # I don't know how to add a link to Special:Interwiki
$log = new LogPage( 'interwiki' );
$log->addEntry( 'interwiki', $selfTitle, wfMsgForContent( 'interwiki_log_deleted', $prefix, $reason ) );
}
} elseif ($do == "add") {
if (!$admin) { $wgOut->permissionRequired('interwiki'); return; };
$action = $selfTitle->escapeLocalURL( "do=add2");
$topmessage = wfMsgHtml( 'interwiki_addtext' );
$intromessage = wfMsg( 'interwiki_addintro' );
$prefixmessage = wfMsgHtml( 'interwiki_prefix' );
$localmessage = wfMsgHtml( 'interwiki_local' );
$transmessage = wfMsgHtml( 'interwiki_trans' );
$reasonmessage = wfMsgHtml( 'interwiki_reasonfield' );
$urlmessage = wfMsgHtml( 'interwiki_url' );
$button = wfMsgHtml( 'interwiki_addbutton' );
$token = htmlspecialchars( $wgUser->editToken() );
$defaulturl = wfMsgHtml( 'interwiki_defaulturl' );
$defaultreason = wfMsgForContent( 'interwiki_defaultreason' );
$out = "<fieldset>
<legend>$topmessage</legend>
$intromessage
<form id='add' method='post' action='{$action}'>
<table id='interwikitable-add'><tr>
<td>$prefixmessage</td>
<td><input tabindex='1' type='text' name='prefix' maxlength='20' size='20' /></td>
</tr><tr>
<td>$localmessage</td>
<td><input type='checkbox' id='local' name='local' /></td>
</tr><tr>
<td>$transmessage</td>
<td><input type='checkbox' id='trans' name='trans' /></td>
</tr><tr>
<td>$urlmessage</td>
<td><input tabindex='1' type='text' name='theurl' maxlength='200' size='60' value='$defaulturl' /></td>
</tr><tr>
<td>$reasonmessage</td>
<td><input tabindex='1' type='text' name='reason' maxlength='200' size='60' value='$defaultreason' /></td>
</tr></table>
<input type='submit' name='add' value='{$button}' />
<input type='hidden' name='wpEditToken' value='{$token}' />
</form>
</fieldset>\n";
} elseif ($do == "add2" && $safePost) {
if (!$admin) { $wgOut->permissionRequired('interwiki'); return; }
$prefix = $wgRequest->getVal('prefix');
$reason = $wgRequest->getText('reason');
$theurl = $wgRequest->getVal('theurl');
$local = $wgRequest->getCheck('local') ? 1 : 0;
$trans = $wgRequest->getCheck('trans') ? 1 : 0;
$dbw =& wfGetDB( DB_MASTER );
$dbw->insert( 'interwiki',
array(
'iw_prefix' => $prefix,
'iw_url' => $theurl,
'iw_local' => $local,
'iw_trans' => $trans ),
$fname,
'IGNORE' );
if( $dbw->affectedRows() == 0 ) {
$wgOut->addWikiText( wfMsg( 'interwiki_addfailed', $prefix ) );
} else {
$wgOut->addWikiText( wfMsg( 'interwiki_added', $prefix ) . '<br /><br />' . wfMsg ( 'returnto', '[[Special:Log/interwiki]]' ) ); # I don't know how to add a link to Special:Interwiki
$log = new LogPage( 'interwiki' );
$log->addEntry( 'interwiki', $selfTitle, wfMsgForContent( 'interwiki_log_added', $prefix, $theurl, $trans, $local, $reason ) );
}
} else {
$dbr =& wfGetDB( DB_SLAVE );
$res = $dbr->select( 'interwiki', '*' );
$prefixmessage = wfMsgHtml( 'interwiki_prefix' );
$urlmessage = wfMsgHtml( 'interwiki_url' );
$localmessage = wfMsgHtml( 'interwiki_local' );
$transmessage = wfMsgHtml( 'interwiki_trans' );
$deletemessage = wfMsgHtml( 'delete');
$addtext = wfMsgHtml( 'interwiki_addtext' );
if ($admin) {
$skin = $wgUser->getSkin();
$addlink = $skin->makeLinkObj( $selfTitle, $addtext, 'do=add' );
$wgOut->addWikiText( wfMsg( 'interwiki_intro', '[http://www.mediawiki.org/wiki/Interwiki_table MediaWiki.org]' ) );
$wgOut->addHTML( '<ul>' . '<li>' . $addlink . '</li>' . '</ul>' );
} else {
$wgOut->addWikiText( wfMsg( 'interwiki_intro', '[http://www.mediawiki.org/wiki/Interwiki_table MediaWiki.org]' ) );
}
$out .= "
<br />
<table width='100%' border='2' id='interwikitable'>
<tr><th>$prefixmessage</th> <th>$urlmessage</th> <th>$localmessage</th> <th>$transmessage</th>";
if( $admin ) {
$out .= "<th>$deletemessage</th>";
}
$out .= "</tr>\n";
$numrows = $dbr->numRows( $res );
if ($numrows == 0) {
$errormessage = wfMsgHtml('interwiki_error');
$out .= "<br /><div class=\"error\">$errormessage</div><br />";
}
while( $s = $dbr->fetchObject( $res ) ) {
$prefix = htmlspecialchars( $s->iw_prefix );
$url = htmlspecialchars( $s->iw_url );
$trans = htmlspecialchars( $s->iw_trans );
$local = htmlspecialchars( $s->iw_local );
$out .= "<tr><td>$prefix</td> <td>$url</td> <td>$local</td> <td>$trans</td>";
if( $admin ) {
$skin = $wgUser->getSkin();
$out .= '<td>';
$out .= $skin->makeLinkObj( $selfTitle, $deletemessage,
'do=delete&prefix=' . urlencode( $s->iw_prefix ) );
$out .= '</td>';
}
$out .= "</tr>\n";
}
$dbr->freeResult( $res );
$out .= "</table><br />";
}
$wgOut->addHTML($out);
}
}
IncludableSpecialPage::addPage( new Interwiki );
}
function wfInterwikiAddLogType( &$types ) {
if ( !in_array( 'interwiki', $types ) )
$types[] = 'interwiki';
return true;
}
function wfInterwikiAddLogName( &$names ) {
$names['interwiki'] = 'interwiki_logpagename';
return true;
}
function wfInterwikiAddLogHeader( &$headers ) {
$headers['interwiki'] = 'interwiki_logpagetext';
return true;
}
function wfInterwikiAddActionText( &$actions ) {
$actions['interwiki/interwiki'] = 'interwiki_logentry';
return true;
}