From 283356495e85e0d86b8654137702ffb7e943122d Mon Sep 17 00:00:00 2001 From: Brion Vibber Date: Tue, 21 Mar 2006 23:16:26 +0000 Subject: [PATCH] Long obsolete; apparently forgot to remove from this branch. --- includes/SpecialMaintenance.php | 298 -------------------------------- 1 file changed, 298 deletions(-) delete mode 100644 includes/SpecialMaintenance.php diff --git a/includes/SpecialMaintenance.php b/includes/SpecialMaintenance.php deleted file mode 100644 index 75b66e7db4..0000000000 --- a/includes/SpecialMaintenance.php +++ /dev/null @@ -1,298 +0,0 @@ -getNsText(NS_SPECIAL); -} - - -/** - * Entry point - */ -function wfSpecialMaintenance( $par=NULL ) { - global $wgUser, $wgOut, $wgContLang, $wgRequest, $wgContLanguageCode; - global $wgMiserMode; - - # This pages is expensive ressource wise - if ( $wgMiserMode ) { - $wgOut->addWikiText( wfMsg( 'perfdisabled' ) ); - return; - } - - # Get parameters from the URL - $submitmll = $wgRequest->getVal( 'submitmll' ); - - if( $par ) { - $subfunction = $par; - } else { - $subfunction = $wgRequest->getText( 'subfunction' ); - } - - # Call the subfunction requested by the user - switch( $subfunction ) { - case 'disambiguations': return wfSpecialDisambiguations(); - - # doubleredirects & brokenredirects are old maintenance subpages. - case 'doubleredirects': return wfSpecialDoubleRedirects(); - case 'brokenredirects': return wfSpecialBrokenRedirects(); - - case 'selflinks': return wfSpecialSelfLinks() ; - case 'mispeelings': return wfSpecialMispeelings() ; - case 'missinglanguagelinks': return wfSpecialMissingLanguageLinks(); - } - - if ( !is_null( $submitmll ) ) return wfSpecialMissingLanguageLinks() ; - - $sk = $wgUser->getSkin(); - - # Generate page output - - $r = wfMsg('maintnancepagetext') ; - - # Links to subfunctions - $r .= "\n" ; - $wgOut->addHTML ( $r ) ; -} - -/** - * Generate a maintenance page link - */ -function getMPL ( $x ) { - global $wgUser; - $sk = $wgUser->getSkin() ; - return $sk->makeKnownLink( sns().":Maintenance" , wfMsg($x), 'subfunction='.$x ) ; -} - - -function getMaintenancePageBacklink( $subfunction ) { - global $wgUser, $wgContLang; - $sk = $wgUser->getSkin(); - $r = $sk->makeKnownLink ( - $wgContLang->getNsText( NS_SPECIAL ) . ':Maintenance', - wfMsg( 'maintenancebacklink' ) ) ; - $t = wfMsg ( $subfunction ) ; - - $s = '
'; - $s .= '

'.$t.'

'; - $s .= "{$r}
\n" ; - return $s ; -} - - -/**#@+ - * 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 wfSpecialBrokenRedirects() { - global $wgOut; - $t = Title::makeTitle( NS_SPECIAL, "BrokenRedirects" ); - $wgOut->redirect ($t->getFullURL()); -} - -function wfSpecialDisambiguations() { - global $wgOut; - $t = Title::makeTitle( NS_SPECIAL, "Disambiguations" ); - $wgOut->redirect ($t->getFullURL()); -} -/**#@-*/ - - -/** - * 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; - $fname = 'wfSpecialSelfLinks'; - - list( $limit, $offset ) = wfCheckLimits(); - - $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_SLAVE, $fname ); - - $top = getMaintenancePageBacklink( 'selflinks' ); - $top .= '

'.wfMsg('selflinkstext')."


\n"; - $top .= wfShowingResults( $offset, $limit ); - $wgOut->addHTML( "

{$top}\n" ); - - $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ; - $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=selflinks" , $sl ) ; - $wgOut->addHTML( "
{$sl}\n" ); - - $sk = $wgUser->getSkin(); - $s = '

    '; - while ( $obj = wfFetchObject( $res ) ) { - $title = Title::makeTitle( $obj->page_namespace, $obj->page_title ); - $s .= "
  1. ".$sk->makeKnownLinkObj( $title )."
    2. \n" ; - } - wfFreeResult( $res ); - $s .= '
'; - $wgOut->addHTML( $s ); - $wgOut->addHTML( "

{$sl}\n" ); -} - -/** - * - */ -function wfSpecialMispeelings () { - global $wgUser, $wgOut, $wgContLang; - $sk = $wgUser->getSkin(); - $fname = 'wfSpecialMispeelings'; - - list( $limit, $offset ) = wfCheckLimits(); - $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[] = "\n" ; - $b[] = "

{$y}

\n
    \n" ; - $y = '' ; - } - $b[] = '
  1. '. - $sk->makeKnownLink ( $obj->cur_title ). - ' ('. - $sk->makeBrokenLink ( $obj->cur_title , wfMsg ( "qbedit" ) ). - ")
    2. \n" ; - } - $cnt++ ; - } - } - } - $top = getMaintenancePageBacklink( 'mispeelings' ); - $top .= "

    ".wfMsg( 'mispeelingstext', $msl )."


    \n"; - $top .= wfShowingResults( $offset, $limit ); - $wgOut->addHTML( "

    {$top}\n" ); - - $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ; - $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=mispeelings" , $sl ) ; - $wgOut->addHTML( "
    {$sl}\n" ); - - $s = implode ( '' , $b ) ; - if ( count ( $b ) > 0 ) $s .= '

'; - $wgOut->addHTML( $s ); - $wgOut->addHTML( "

{$sl}\n" ); -} - -/** - * - */ -function wfSpecialMissingLanguageLinks() { - global $wgUser, $wgOut, $wgContLang, $wgRequest; - - $fname = 'wfSpecialMissingLanguageLinks'; - $thelang = $wgRequest->getText( 'thelang' ); - 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=".NS_MAIN." AND cur_is_redirect=0 " . - "AND cur_title NOT LIKE '%/%' AND cur_text NOT LIKE '%[[" . wfStrencode( $thelang ) . ":%' " . - "LIMIT {$offset}, {$limit}"; - - $res = $dbr->query( $sql, $fname ); - - - $mll = wfMsg( 'missinglanguagelinkstext', $wgContLang->getLanguageName($thelang) ); - - $top = getMaintenancePageBacklink( 'missinglanguagelinks' ); - $top .= "

$mll


"; - $top .= wfShowingResults( $offset, $limit ); - $wgOut->addHTML( "

{$top}\n" ); - - $sl = wfViewPrevNext( $offset, $limit, 'REPLACETHIS' ) ; - $sl = str_replace ( 'REPLACETHIS' , sns().":Maintenance&subfunction=missinglanguagelinks&thelang=". - htmlspecialchars($thelang), $sl ) ; - $wgOut->addHTML( "
{$sl}\n" ); - - $sk = $wgUser->getSkin(); - $s = '

    '; - while ( $obj = $dbr->fetchObject( $res ) ) - $s .= "
  1. ".$sk->makeKnownLink ( $obj->cur_title )."
    2. \n" ; - $dbr->freeResult( $res ); - $s .= '
'; - $wgOut->addHTML( $s ); - $wgOut->addHTML( "

{$sl}\n" ); -} - -?> -- 2.20.1