<?php
-
-function sns()
-{
- global $wgLang ;
- $ns = $wgLang->getNamespaces() ;
- return $ns[-1] ;
+/**
+ *
+ * @package MediaWiki
+ * @subpackage SpecialPage
+ */
+
+/**
+ * shortcut to get the current language "special" namespace name
+ */
+function sns() {
+ global $wgContLang ;
+ $ns = $wgContLang->getNamespaces() ;
+ return $ns[NS_SPECIAL] ;
}
-function wfSpecialMaintenance( $par=NULL )
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle, $wgRequest, $wgLanguageCode;
- global $wgMiserMode, $wgLoadBalancer;
+/**
+ * Entry point
+ */
+function wfSpecialMaintenance( $par=NULL ) {
+ global $wgUser, $wgOut, $wgContLang, $wgTitle, $wgRequest, $wgContLanguageCode;
+ global $wgMiserMode;
+
+ # This pages is expensive ressource wise
if ( $wgMiserMode ) {
- $wgOut->addWikiText( wfMsg( "perfdisabled" ) );
+ $wgOut->addWikiText( wfMsg( 'perfdisabled' ) );
return;
}
- $wgLoadBalancer->force(-1);
-
+ # Get parameters from the URL
$submitmll = $wgRequest->getVal( 'submitmll' );
-
- if( $par )
- $subfunction = $par;
- else
- $subfunction = $wgRequest->getText( 'subfunction' );
- $done = true;
-
- if ( $subfunction == "disambiguations" ) {
- wfSpecialDisambiguations() ;
- } elseif ( $subfunction == "doubleredirects" ) {
- wfSpecialDoubleRedirects() ;
- } elseif ( $subfunction == "brokenredirects" ) {
- wfSpecialBrokenRedirects() ;
- } elseif ( $subfunction == "selflinks" ) {
- wfSpecialSelfLinks() ;
- } elseif ( $subfunction == "mispeelings" ) {
- wfSpecialMispeelings() ;
- } elseif ( $subfunction == "missinglanguagelinks" ) {
- wfSpecialMissingLanguageLinks() ;
- } elseif ( !is_null( $submitmll ) ) {
- wfSpecialMissingLanguageLinks() ;
+ if( $par ) {
+ $subfunction = $par;
} else {
- $done = false;
+ $subfunction = $wgRequest->getText( 'subfunction' );
}
+
+ # Call the subfunction requested by the user
+ switch( $subfunction ) {
+ case 'disambiguations': return wfSpecialDisambiguations() ; break;
- $wgLoadBalancer->force(0);
- if ( $done ) {
- return;
+ # doubleredirects & brokenredirects are old maintenance subpages.
+ case 'doubleredirects': return wfSpecialDoubleRedirects() ; break;
+ case 'brokenredirects': return wfSpecialBrokenRedirects() ; break;
+
+ case 'selflinks': return wfSpecialSelfLinks() ; break;
+ case 'mispeelings': return wfSpecialMispeelings() ; break;
+ case 'missinglanguagelinks': return wfSpecialMissingLanguageLinks() ; break;
}
+
+ if ( !is_null( $submitmll ) ) return wfSpecialMissingLanguageLinks() ;
$sk = $wgUser->getSkin();
- $ns = $wgLang->getNamespaces() ;
- $r = wfMsg("maintnancepagetext") ;
- $r .= "<UL>\n" ;
- $r .= "<li>".getMPL("disambiguations")."</li>\n" ;
- $r .= "<li>".getMPL("doubleredirects")."</li>\n" ;
- $r .= "<li>".getMPL("brokenredirects")."</li>\n" ;
- $r .= "<li>".getMPL("selflinks")."</li>\n" ;
- $r .= "<li>".getMPL("mispeelings")."</li>\n" ;
-
- $r .= "<li>";
- $l = getMPL("missinglanguagelinks");
- $l = str_replace ( "</a>" , "" , $l ) ;
- $l = str_replace ( "<a " , "<FORM method=post " , $l ) ;
- $l = explode ( ">" , $l ) ;
- $l = $l[0] ;
+ $ns = $wgContLang->getNamespaces() ;
+
+ # Generate page output
+
+ $r = wfMsg('maintnancepagetext') ;
+
+ # Links to subfunctions
+ $r .= "<ul>\n" ;
+ $r .= "<li>".$sk->makeKnownLink( sns().':Disambiguations', wfMsg('disambiguations')) . "</li>\n";
+ $r .= '<li>'.$sk->makeKnownLink( sns().':DoubleRedirects', wfMsg('doubleredirects')) . "</li>\n";
+ $r .= '<li>'.$sk->makeKnownLink( sns().':BrokenRedirects', wfMsg('brokenredirects')) . "</li>\n";
+ #$r .= "<li>".getMPL("selflinks")."</li>\n" ; # Doesn't work
+ $r .= '<li>'.getMPL("mispeelings")."</li>\n" ;
+
+ # Interface for the missing language links
+ $r .= '<li>';
+ $l = getMPL('missinglanguagelinks');
+ $l = str_replace ( '</a>' , '' , $l ) ;
+ $l = str_replace ( '<a ' , '<form method="post" ' , $l ) ;
+ $l = str_replace ( ' href=' , ' action=' , $l ) ;
+ $l = explode ( '>' , $l ) ;
+ $l = $l[0] ;
$r .= $l.">\n" ;
- $r .= "<input type=submit name='submitmll' value='" ;
- $r .= htmlspecialchars(wfMsg("missinglanguagelinksbutton"), ENT_QUOTES);
- $r .= "'>\n" ;
- $r .= "<select name=thelang>\n" ;
- $a = $wgLang->getLanguageNames();
+ $r .= '<input type="submit" name="submitmll" value="' ;
+ $r .= htmlspecialchars(wfMsg('missinglanguagelinksbutton'), ENT_QUOTES);
+ $r .= "\" />\n" ;
+ $r .= "<select name=\"thelang\">\n" ;
+
+ $a = $wgContLang->getLanguageNames();
$ak = array_keys ( $a ) ;
foreach ( $ak AS $k ) {
- if ( $k != $wgLanguageCode )
+ if ( $k != $wgContLanguageCode )
$r .= "<option value='{$k}'>{$a[$k]}</option>\n" ;
- }
+ }
$r .= "</select>\n" ;
- $r .= "</FORM>\n</li>" ;
+ $r .= "</form>\n</li>" ;
- $r .= "</UL>\n" ;
+ $r .= "</ul>\n" ;
$wgOut->addHTML ( $r ) ;
}
-function getMPL ( $x )
-{
+/**
+ * Generate a maintenance page link
+ */
+function getMPL ( $x ) {
global $wgUser , $wgLang;
$sk = $wgUser->getSkin() ;
- return $sk->makeKnownLink(sns().":Maintenance",wfMsg($x),"subfunction={$x}") ;
+ return $sk->makeKnownLink( sns().":Maintenance" , wfMsg($x), 'subfunction='.$x ) ;
}
-function getMaintenancePageBacklink( $subfunction )
-{
- global $wgUser , $wgLang;
+
+function getMaintenancePageBacklink( $subfunction ) {
+ global $wgUser , $wgContLang;
$sk = $wgUser->getSkin() ;
- $ns = $wgLang->getNamespaces() ;
+ $ns = $wgContLang->getNamespaces() ;
$r = $sk->makeKnownLink (
- $ns[-1].":Maintenance",
- wfMsg("maintenancebacklink") ) ;
+ $ns[-1].':Maintenance',
+ wfMsg( 'maintenancebacklink' ) ) ;
$t = wfMsg ( $subfunction ) ;
- $s = "<table width=100% border=0><tr><td>";
- $s .= "<h2>{$t}</h2></td><td align=right>";
+ $s = '<table width="100%" border="0"><tr><td>';
+ $s .= '<h2>'.$t.'</h2></td><td align="right">';
$s .= "{$r}</td></tr></table>\n" ;
return $s ;
}
-# Broken function
-# Suggest deprecating this in favour of a Special:Whatlinkshere with prev/next links [TS]
-function wfSpecialDisambiguations()
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle;
- $fname = "wfSpecialDisambiguations";
-
- list( $limit, $offset ) = wfCheckLimits();
-
- $dp = wfStrencode( wfMsg("disambiguationspage") );
-
- die( "wfSpecialDisambiguation is broken. Link tables have changed...\n" );
-
- $sql = "SELECT la.l_from,la.l_to,"
- . " lb.l_from AS source,lb.l_to AS dest,"
- . " c.cur_id, c.cur_title AS dt"
- . " FROM links AS la, links AS lb, cur AS c, cur AS d"
- . " WHERE la.l_from='{$dp}'"
- . " AND la.l_to=lb.l_to"
- . " AND la.l_from<>lb.l_from"
- . " AND c.cur_id=lb.l_to"
- . " AND c.cur_namespace=0"
- . " AND d.cur_title=lb.l_from"
- . " AND d.cur_namespace=0"
- . " LIMIT {$offset}, {$limit}";
-
- $res = wfQuery( $sql, DB_READ, $fname );
-
- $sk = $wgUser->getSkin();
-
- $top = "<p>".wfMsg( "disambiguationstext", $sk->makeKnownLink( $dp ) )."</p><br>\n";
- $top = getMaintenancePageBacklink( "disambiguations" ) . $top;
- $top .= wfShowingResults( $offset, $limit );
- $wgOut->addHTML( "<p>{$top}\n" );
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=disambiguations" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
-
- $s = "<ol start=" . ( $offset + 1 ) . ">";
- while ( $obj = wfFetchObject( $res ) ) {
- $l1 = $sk->makeKnownLink ( $obj->source , "" , "redirect=no" ) ;
- $l2 = $sk->makeKnownLink ( $obj->dt ) ;
- $l3 = $sk->makeBrokenLink ( $obj->source , "(".wfMsg("qbedit").")" , "redirect=no" ) ;
- $s .= "<li>{$l1} {$l3} => {$l2}</li>\n" ;
- }
- wfFreeResult( $res );
- $s .= "</ol>";
- $wgOut->addHTML( $s );
- $wgOut->addHTML( "<p>{$sl}\n" );
+/**#@+
+ * Disambiguations, DoubleRedirects and BrokenRedirects are now using the
+ * QueryPage class. Code is in a Special*.php file.
+ *
+ * @deprecated
+ */
+function wfSpecialDoubleRedirects() {
+ global $wgOut;
+ $t = Title::makeTitle( NS_SPECIAL, "DoubleRedirects" );
+ $wgOut->redirect ($t->getFullURL());
}
-function wfSpecialDoubleRedirects()
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle;
- $fname = "wfSpecialDoubleRedirects";
-
- list( $limit, $offset ) = wfCheckLimits();
-
- $sql = "SELECT ca.cur_namespace as ns_a, ca.cur_title as title_a," .
- " cb.cur_namespace as ns_b, cb.cur_title as title_b," .
- " cb.cur_text AS rt " .
- "FROM links,cur AS ca,cur AS cb ".
- "WHERE ca.cur_is_redirect=1 AND cb.cur_is_redirect=1 AND l_to=cb.cur_id " .
- " AND l_from=ca.cur_id LIMIT {$offset}, {$limit}" ;
-
- $res = wfQuery( $sql, DB_READ, $fname );
-
- $top = getMaintenancePageBacklink( "doubleredirects" );
- $top .= "<p>".wfMsg("doubleredirectstext")."</p><br>\n";
- $top .= wfShowingResults( $offset, $limit );
- $wgOut->addHTML( "<p>{$top}\n" );
-
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=doubleredirects" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
+function wfSpecialBrokenRedirects() {
+ global $wgOut;
+ $t = Title::makeTitle( NS_SPECIAL, "BrokenRedirects" );
+ $wgOut->redirect ($t->getFullURL());
+}
- $sk = $wgUser->getSkin();
- $s = "<ol start=" . ( $offset + 1 ) . ">";
- while ( $obj = wfFetchObject( $res ) ) {
- $n = explode ( "\n" , $obj->rt ) ;
- $n = $n[0] ;
- $sourceTitle = Title::makeTitle( $obj->ns_a, $obj->title_a );
- $destTitle = Title::makeTitle( $obj->ns_b, $obj->title_b );
-
- $l1 = $sk->makeKnownLinkObj( $sourceTitle , "" , "redirect=no" ) ;
- $l2 = $sk->makeKnownLinkObj( $destTitle , "" , "redirect=no" ) ;
- $l3 = $sk->makeBrokenLinkObj( $sourceTitle , "(".wfMsg("qbedit").")" , "redirect=no" ) ;
- $s .= "<li>{$l1} {$l3} => {$l2} (\"{$n}\")</li>\n" ;
- }
- wfFreeResult( $res );
- $s .= "</ol>";
- $wgOut->addHTML( $s );
- $wgOut->addHTML( "<p>{$sl}\n" );
+function wfSpecialDisambiguations() {
+ global $wgOut;
+ $t = Title::makeTitle( NS_SPECIAL, "Disambiguations" );
+ $wgOut->redirect ($t->getFullURL());
}
+/**#@-*/
-function wfSpecialBrokenRedirects()
-{
+
+/**
+ * This doesn't really work anymore, because self-links are now displayed as
+ * unlinked bold text, and are not entered into the link table.
+ *
+ * @deprecated
+ */
+function wfSpecialSelfLinks() {
global $wgUser, $wgOut, $wgLang, $wgTitle;
- $fname = "wfSpecialBrokenRedirects";
+ $fname = 'wfSpecialSelfLinks';
list( $limit, $offset ) = wfCheckLimits();
- $sql = "SELECT bl_to,cur_title FROM brokenlinks,cur " .
- "WHERE cur_is_redirect=1 AND cur_namespace=0 AND bl_from=cur_id " .
- "LIMIT {$offset}, {$limit}" ;
+ $sql = "SELECT page_namespace,page_title FROM page,links " .
+ "WHERE l_from=l_to AND l_to=page_id " .
+ "LIMIT {$offset}, {$limit}";
- $res = wfQuery( $sql, DB_READ, $fname );
+ $res = wfQuery( $sql, DB_SLAVE, $fname );
- $top = getMaintenancePageBacklink( "brokenredirects" );
- $top .= "<p>".wfMsg("brokenredirectstext")."</p><br>\n";
+ $top = getMaintenancePageBacklink( 'selflinks' );
+ $top .= '<p>'.wfMsg('selflinkstext')."</p><br />\n";
$top .= wfShowingResults( $offset, $limit );
$wgOut->addHTML( "<p>{$top}\n" );
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=brokenredirects" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
+ $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ;
+ $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=selflinks" , $sl ) ;
+ $wgOut->addHTML( "<br />{$sl}\n" );
$sk = $wgUser->getSkin();
- $s = "<ol start=" . ( $offset + 1 ) . ">";
+ $s = '<ol start=' . ( $offset + 1 ) . '>';
while ( $obj = wfFetchObject( $res ) ) {
- $l1 = $sk->makeKnownLink ( $obj->cur_title , "" , "redirect=no" ) ;
- $l2 = $sk->makeBrokenLink ( $obj->cur_title , "(".wfMsg("qbedit").")" , "redirect=no" ) ;
- $l3 = $sk->makeBrokenLink ( $obj->bl_to , "" , "redirect=no" ) ;
- $s .= "<li>{$l1} {$l2} => {$l3}</li>\n" ;
+ $title = Title::makeTitle( $obj->page_namespace, $obj->page_title );
+ $s .= "<li>".$sk->makeKnownLinkObj( $title )."</li>\n" ;
}
wfFreeResult( $res );
- $s .= "</ol>";
+ $s .= '</ol>';
$wgOut->addHTML( $s );
$wgOut->addHTML( "<p>{$sl}\n" );
}
-# This doesn't really work anymore, because self-links are now displayed as
-# unlinked bold text, and are not entered into the link table.
-function wfSpecialSelfLinks()
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle;
- $fname = "wfSpecialSelfLinks";
+/**
+ *
+ */
+function wfSpecialMispeelings () {
+ global $wgUser, $wgOut, $wgContLang, $wgTitle;
+ $sk = $wgUser->getSkin();
+ $fname = 'wfSpecialMispeelings';
list( $limit, $offset ) = wfCheckLimits();
-
- $sql = "SELECT cur_namespace,cur_title FROM cur,links " .
- "WHERE l_from=l_to AND l_to=cur_id " .
- "LIMIT {$offset}, {$limit}";
-
- $res = wfQuery( $sql, DB_READ, $fname );
-
- $top = getMaintenancePageBacklink( "selflinks" );
- $top .= "<p>".wfMsg("selflinkstext")."</p><br>\n";
+ $dbr =& wfGetDB( DB_SLAVE );
+ extract( $dbr->tableNames( 'cur', 'searchindex' ) );
+
+ # Determine page name
+ $ms = wfMsg ( 'mispeelingspage' ) ;
+ $mss = str_replace ( ' ' , '_' , $ms );
+ $msp = $wgContLang->getNsText(4).':'.$ms ;
+ $msl = $sk->makeKnownLink ( $msp ) ;
+
+ # Load list from database
+ $l = $dbr->selectField( 'cur', 'cur_text', array( 'cur_title' => $mss, 'cur_namespace' => 4 ), $fname );
+ $l = explode ( "\n" , $l ) ;
+ $a = array () ;
+ foreach ( $l as $x )
+ if ( substr ( trim ( $x ) , 0 , 1 ) == '*' )
+ $a[] = strtolower ( trim ( substr ( trim ( $x ) , 1 ) ) );
+ asort ( $a ) ;
+
+ $cnt = 0 ;
+ $b = array () ;
+ foreach ( $a AS $x ) {
+ if ( $cnt < $offset+$limit && $x != '' ) {
+ $y = $x ;
+ $x = preg_replace( '/^(\S+).*$/', '$1', $x );
+ $sql = "SELECT DISTINCT cur_title FROM $cur,$searchindex WHERE cur_id=si_page AND ".
+ "cur_namespace=".NS_MAIN." AND cur_is_redirect=0 AND " .
+ "(MATCH(si_text) AGAINST ('" . $dbr->strencode( $wgContLang->stripForSearch( $x ) ) . "'))" ;
+ $res = $dbr->query( $sql, $fname );
+ while ( $obj = $dbr->fetchObject ( $res ) ) {
+ if ( $cnt >= $offset AND $cnt < $offset+$limit ) {
+ if ( $y != '' ) {
+ if ( count ( $b ) > 0 ) $b[] = "</OL>\n" ;
+ $b[] = "<H3>{$y}</H3>\n<OL start=".($cnt+1).">\n" ;
+ $y = '' ;
+ }
+ $b[] = '<li>'.
+ $sk->makeKnownLink ( $obj->cur_title ).
+ ' ('.
+ $sk->makeBrokenLink ( $obj->cur_title , wfMsg ( "qbedit" ) ).
+ ")</li>\n" ;
+ }
+ $cnt++ ;
+ }
+ }
+ }
+ $top = getMaintenancePageBacklink( 'mispeelings' );
+ $top .= "<p>".wfMsg( 'mispeelingstext', $msl )."</p><br />\n";
$top .= wfShowingResults( $offset, $limit );
$wgOut->addHTML( "<p>{$top}\n" );
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=selflinks" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
+ $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ;
+ $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=mispeelings" , $sl ) ;
+ $wgOut->addHTML( "<br />{$sl}\n" );
- $sk = $wgUser->getSkin();
- $s = "<ol start=" . ( $offset + 1 ) . ">";
- while ( $obj = wfFetchObject( $res ) ) {
- $title = Title::makeTitle( $obj->cur_namespace, $obj->cur_title );
- $s .= "<li>".$sk->makeKnownLinkObj( $title )."</li>\n" ;
- }
- wfFreeResult( $res );
- $s .= "</ol>";
+ $s = implode ( '' , $b ) ;
+ if ( count ( $b ) > 0 ) $s .= '</ol>';
$wgOut->addHTML( $s );
$wgOut->addHTML( "<p>{$sl}\n" );
}
-function wfSpecialMispeelings ()
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle;
- $sk = $wgUser->getSkin();
- $fname = "wfSpecialMispeelings";
-
- list( $limit, $offset ) = wfCheckLimits();
-
- # Determine page name
- $ms = wfMsg ( "mispeelingspage" ) ;
- $mss = wfStrencode( str_replace ( " " , "_" , $ms ) );
- $msp = $wgLang->getNsText(4).":".$ms ;
- $msl = $sk->makeKnownLink ( $msp ) ;
-
- # Load list from database
- $sql = "SELECT cur_text FROM cur WHERE cur_title='{$mss}' AND cur_namespace=4" ;
- $res = wfQuery( $sql, DB_READ, $fname );
- $obj = wfFetchObject ( $res ) ;
- $l = $obj->cur_text ;
- $l = explode ( "\n" , $l ) ;
- $a = array () ;
- foreach ( $l as $x )
- if ( substr ( trim ( $x ) , 0 , 1 ) == "*" )
- $a[] = strtolower ( trim ( substr ( trim ( $x ) , 1 ) ) );
- asort ( $a ) ;
-
- $cnt = 0 ;
- $b = array () ;
- foreach ( $a AS $x ) {
- if ( $cnt < $offset+$limit && $x != "" ) {
- $y = $x ;
- $x = preg_replace( '/^(\S+).*$/', '$1', $x );
- #$sql = "SELECT DISTINCT cur_title FROM cur WHERE cur_namespace=0 AND cur_is_redirect=0 AND (MATCH(cur_ind_text) AGAINST ('" . wfStrencode( $wgLang->stripForSearch( $x ) ) . "'))" ;
- $sql = "SELECT DISTINCT cur_title FROM cur,searchindex WHERE cur_id=si_page AND cur_namespace=0 AND cur_is_redirect=0 AND (MATCH(si_text) AGAINST ('" . wfStrencode( $wgLang->stripForSearch( $x ) ) . "'))" ;
- $res = wfQuery( $sql, DB_READ, $fname );
- while ( $obj = wfFetchObject ( $res ) ) {
- if ( $cnt >= $offset AND $cnt < $offset+$limit ) {
- if ( $y != "" ) {
- if ( count ( $b ) > 0 ) $b[] = "</OL>\n" ;
- $b[] = "<H3>{$y}</H3>\n<OL start=".($cnt+1).">\n" ;
- $y = "" ;
- }
- $b[] = "<li>".
- $sk->makeKnownLink ( $obj->cur_title ).
- " (".
- $sk->makeBrokenLink ( $obj->cur_title , wfMsg ( "qbedit" ) ).
- ")</li>\n" ;
- }
- $cnt++ ;
- }
- }
- }
- $top = getMaintenancePageBacklink( "mispeelings" );
- $top .= "<p>".wfMsg( "mispeelingstext", $msl )."</p><br>\n";
- $top .= wfShowingResults( $offset, $limit );
- $wgOut->addHTML( "<p>{$top}\n" );
-
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=mispeelings" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
-
- $s = implode ( "" , $b ) ;
- if ( count ( $b ) > 0 ) $s .= "</ol>";
- $wgOut->addHTML( $s );
- $wgOut->addHTML( "<p>{$sl}\n" );
-}
-
-
-function wfSpecialMissingLanguageLinks()
-{
- global $wgUser, $wgOut, $wgLang, $wgTitle, $wgRequest;
+/**
+ *
+ */
+function wfSpecialMissingLanguageLinks() {
+ global $wgUser, $wgOut, $wgContLang, $wgTitle, $wgRequest;
- $fname = "wfSpecialMissingLanguageLinks";
+ $fname = 'wfSpecialMissingLanguageLinks';
$thelang = $wgRequest->getText( 'thelang' );
- if ( $thelang == "w" ) $thelang = "en" ; # Fix for international wikis
+ if ( $thelang == 'w' ) $thelang = 'en' ; # Fix for international wikis
list( $limit, $offset ) = wfCheckLimits();
+ $dbr =& wfGetDB( DB_SLAVE );
+ $cur = $dbr->tableName( 'cur' );
- $sql = "SELECT cur_title FROM cur " .
- "WHERE cur_namespace=0 AND cur_is_redirect=0 " .
- "AND cur_title NOT LIKE '%/%' AND cur_text NOT LIKE '%[[{$thelang}:%' " .
+ $sql = "SELECT cur_title FROM $cur " .
+ "WHERE cur_namespace=".NS_MAIN." AND cur_is_redirect=0 " .
+ "AND cur_title NOT LIKE '%/%' AND cur_text NOT LIKE '%[[" . wfStrencode( $thelang ) . ":%' " .
"LIMIT {$offset}, {$limit}";
- $res = wfQuery( $sql, DB_READ, $fname );
+ $res = $dbr->query( $sql, $fname );
- $mll = wfMsg( "missinglanguagelinkstext", $wgLang->getLanguageName($thelang) );
+ $mll = wfMsg( 'missinglanguagelinkstext', $wgContLang->getLanguageName($thelang) );
- $top = getMaintenancePageBacklink( "missinglanguagelinks" );
- $top .= "<p>$mll</p><br>";
+ $top = getMaintenancePageBacklink( 'missinglanguagelinks' );
+ $top .= "<p>$mll</p><br />";
$top .= wfShowingResults( $offset, $limit );
$wgOut->addHTML( "<p>{$top}\n" );
- $sl = wfViewPrevNext( $offset, $limit, "REPLACETHIS" ) ;
- $sl = str_replace ( "REPLACETHIS" , sns().":Maintenance&subfunction=missinglanguagelinks&thelang={$thelang}" , $sl ) ;
- $wgOut->addHTML( "<br>{$sl}\n" );
+ $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ;
+ $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=missinglanguagelinks&thelang=".
+ htmlspecialchars($thelang), $sl ) ;
+ $wgOut->addHTML( "<br />{$sl}\n" );
$sk = $wgUser->getSkin();
- $s = "<ol start=" . ( $offset + 1 ) . ">";
- while ( $obj = wfFetchObject( $res ) )
+ $s = '<ol start=' . ( $offset + 1 ) . '>';
+ while ( $obj = $dbr->fetchObject( $res ) )
$s .= "<li>".$sk->makeKnownLink ( $obj->cur_title )."</li>\n" ;
- wfFreeResult( $res );
- $s .= "</ol>";
+ $dbr->freeResult( $res );
+ $s .= '</ol>';
$wgOut->addHTML( $s );
$wgOut->addHTML( "<p>{$sl}\n" );
}
dépôts / lhc / web / wiklou.git / blobdiff