X-Git-Url: http://git.heureux-cyclage.org/?a=blobdiff_plain;f=includes%2FSpecialAllpages.php;h=904b087722154e75d8acf9df972bb24214490a34;hb=b7db9837bf4fc1ec1ecf6bc5a030b2d59f522878;hp=67246e447f01cfec3815435018eaa9dd049a2858;hpb=509775a7d010e9ed1c3d43a19282b7e36836b9c0;p=lhc%2Fweb%2Fwiklou.git diff --git a/includes/SpecialAllpages.php b/includes/SpecialAllpages.php index 67246e447f..904b087722 100644 --- a/includes/SpecialAllpages.php +++ b/includes/SpecialAllpages.php @@ -1,140 +1,300 @@ getVal( 'from' ); + $namespace = $wgRequest->getInt( 'namespace' ); + + $namespaces = $wgContLang->getNamespaces(); + + $indexPage = new SpecialAllpages(); + + if( !in_array($namespace, array_keys($namespaces)) ) + $namespace = 0; - if( $par ) { - indexShowChunk( $par ); - } elseif( !is_null( $from ) ) { - indexShowChunk( $from ); + $wgOut->setPagetitle( $namespace > 0 ? + wfMsg( 'allinnamespace', $namespaces[$namespace] ) : + wfMsg( 'allarticles' ) + ); + + if ( isset($par) ) { + $indexPage->showChunk( $namespace, $par, $specialPage->including() ); + } elseif ( isset($from) ) { + $indexPage->showChunk( $namespace, $from, $specialPage->including() ); } else { - indexShowToplevel(); + $indexPage->showToplevel ( $namespace, $specialPage->including() ); } } -function indexShowToplevel() -{ - global $wgOut, $indexMaxperpage, $wgLang; - $fname = "indexShowToplevel"; +class SpecialAllpages { + var $maxPerPage=960; + var $topLevelMax=50; + var $name='Allpages'; + # Determines, which message describes the input field 'nsfrom' (->SpecialPrefixindex.php) + var $nsfromMsg='allpagesfrom'; - # Cache - $vsp = $wgLang->getValidSpecialPages(); - $log = new LogPage( $vsp["Allpages"] ); - $log->mUpdateRecentChanges = false; +/** + * HTML for the top form + * @param integer $namespace A namespace constant (default NS_MAIN). + * @param string $from Article name we are starting listing at. + */ +function namespaceForm ( $namespace = NS_MAIN, $from = '' ) { + global $wgContLang, $wgScript; + $t = Title::makeTitle( NS_SPECIAL, $this->name ); - global $wgMiserMode; - if ( $wgMiserMode ) { - $log->showAsDisabledPage(); - return; - } + $namespaceselect = HTMLnamespaceselector($namespace, null); + $frombox = "'; + $submitbutton = ''; + + $out = "
"; + $out .= ''; + $out .= " + + + + + + + + + +
" . wfMsgHtml($this->nsfromMsg) . "
+ $namespaceselect $submitbutton +
+"; + $out .= '
'; + return $out; +} -# $fromwhere = "FROM cur WHERE cur_namespace=0 AND cur_is_redirect=0"; - $fromwhere = "FROM cur WHERE cur_namespace=0"; - $order = "ORDER BY cur_title"; +/** + * @param integer $namespace (default NS_MAIN) + */ +function showToplevel ( $namespace = NS_MAIN, $including = false ) { + global $wgOut, $wgContLang, $wgRequest, $wgUser; + $sk = $wgUser->getSkin(); + $fname = "indexShowToplevel"; + + # TODO: Either make this *much* faster or cache the title index points + # in the querycache table. + + $dbr =& wfGetDB( DB_SLAVE ); + $page = $dbr->tableName( 'page' ); + $fromwhere = "FROM $page WHERE page_namespace=$namespace"; + $order_arr = array ( 'ORDER BY' => 'page_title' ); + $order_str = 'ORDER BY page_title'; $out = ""; + $where = array( 'page_namespace' => $namespace ); + + global $wgMemc, $wgDBname; + $key = "$wgDBname:allpages:ns:$namespace"; + $lines = $wgMemc->get( $key ); - $sql = "SELECT COUNT(*) AS count $fromwhere"; - $res = wfQuery( $sql, DB_READ, $fname ); - $s = wfFetchObject( $res ); - $count = $s->count; - $sections = ceil( $count / $indexMaxperpage ); - - $sql = "SELECT cur_title $fromwhere $order LIMIT 1"; - $res = wfQuery( $sql, DB_READ, $fname ); - $s = wfFetchObject( $res ); - $inpoint = $s->cur_title; - - $out .= "\n"; - # There's got to be a cleaner way to do this! - for( $i = 1; $i < $sections; $i++ ) { - $from = $i * $indexMaxperpage; - $sql = "SELECT cur_title $fromwhere $order LIMIT $from,2"; - $res = wfQuery( $sql, DB_READ, $fname ); - - $s = wfFetchObject( $res ); - $outpoint = $s->cur_title; - $out .= indexShowline( $inpoint, $outpoint ); - - $s = wfFetchObject( $res ); - $inpoint = $s->cur_title; + if( !is_array( $lines ) ) { + $firstTitle = $dbr->selectField( 'page', 'page_title', $where, $fname, array( 'LIMIT' => 1 ) ); + $lastTitle = $firstTitle; + + # This array is going to hold the page_titles in order. + $lines = array( $firstTitle ); - wfFreeResult( $res ); + # If we are going to show n rows, we need n+1 queries to find the relevant titles. + $done = false; + for( $i = 0; !$done; ++$i ) { + // Fetch the last title of this chunk and the first of the next + $chunk = is_null( $lastTitle ) + ? '' + : 'page_title >= ' . $dbr->addQuotes( $lastTitle ); + $res = $dbr->select( + 'page', /* FROM */ + 'page_title', /* WHAT */ + $where + array( $chunk), + $fname, + array ('LIMIT' => 2, 'OFFSET' => $this->maxPerPage - 1, 'ORDER BY' => 'page_title') ); + + if ( $s = $dbr->fetchObject( $res ) ) { + array_push( $lines, $s->page_title ); + } else { + // Final chunk, but ended prematurely. Go back and find the end. + $endTitle = $dbr->selectField( 'page', 'MAX(page_title)', + array( + 'page_namespace' => $namespace, + $chunk + ), $fname ); + array_push( $lines, $endTitle ); + $done = true; + } + if( $s = $dbr->fetchObject( $res ) ) { + array_push( $lines, $s->page_title ); + $lastTitle = $s->page_title; + } else { + // This was a final chunk and ended exactly at the limit. + // Rare but convenient! + $done = true; + } + $dbr->freeResult( $res ); + } + $wgMemc->add( $key, $lines, 3600 ); } - $from = $i * $indexMaxperpage; - $sql = "SELECT cur_title $fromwhere $order LIMIT " . ($count-1) . ",1"; - $res = wfQuery( $sql, DB_READ, $fname ); - $s = wfFetchObject( $res ); - $outpoint = $s->cur_title; - $out .= indexShowline( $inpoint, $outpoint ); - $out .= "
\n"; - - # Saving cache - $log->replaceContent( $out ); + // If there are only two or less sections, don't even display them. + // Instead, display the first section directly. + if( count( $lines ) <= 2 ) { + $this->showChunk( $namespace, '', $including ); + return; + } + + # At this point, $lines should contain an even number of elements. + $out .= ""; + while ( count ( $lines ) > 0 ) { + $inpoint = array_shift ( $lines ); + $outpoint = array_shift ( $lines ); + $out .= $this->showline ( $inpoint, $outpoint, $namespace, false ); + } + $out .= '
'; + $nsForm = $this->namespaceForm ( $namespace, '', false ); - $wgOut->addHtml( $out ); + # Is there more? + if ( $including ) { + $out2 = ''; + } else { + $morelinks = ''; + if ( $morelinks != '' ) { + $out2 = ''; + $out2 .= '
' . $nsForm; + $out2 .= ''; + $out2 .= $morelinks . '
'; + } else { + $out2 = $nsForm . '
'; + } + } + + $wgOut->addHtml( $out2 . $out ); } -function indexShowline( $inpoint, $outpoint ) -{ - global $wgOut, $wgLang, $wgUser; +/** + * @todo Document + * @param string $from + * @param integer $namespace (Default NS_MAIN) + */ +function showline( $inpoint, $outpoint, $namespace = NS_MAIN ) { + global $wgOut, $wgUser; $sk = $wgUser->getSkin(); + $dbr =& wfGetDB( DB_SLAVE ); - # Fixme: this is ugly - $out = wfMsg( - "alphaindexline", - $sk->makeKnownLink( $wgLang->specialPage( "Allpages" ), - str_replace( "_", " ", $inpoint ), - "from=" . wfStrencode( $inpoint ) ) . "", - "" . - str_replace( "_", " ", $outpoint ) - ); - return "{$out}\n"; + $inpointf = htmlspecialchars( str_replace( '_', ' ', $inpoint ) ); + $outpointf = htmlspecialchars( str_replace( '_', ' ', $outpoint ) ); + $queryparams = ($namespace ? "namespace=$namespace" : ''); + $special = Title::makeTitle( NS_SPECIAL, $this->name . '/' . $inpoint ); + $link = $special->escapeLocalUrl( $queryparams ); + + $out = wfMsgHtml( + 'alphaindexline', + "$inpointf", + "$outpointf" + ); + return ''.$out.''; } -function indexShowChunk( $from ) -{ - global $wgOut, $wgUser, $indexMaxperpage; +/** + * @param integer $namespace (Default NS_MAIN) + * @param string $from list all pages from this name (default FALSE) + */ +function showChunk( $namespace = NS_MAIN, $from, $including = false ) { + global $wgOut, $wgUser, $wgContLang; + + $fname = 'indexShowChunk'; + $sk = $wgUser->getSkin(); + + $fromTitle = null; + if ($from!="") { + $fromTitle = Title::newFromURL( $from ); + if (!$fromTitle) { + return; + } + $fromNS = $fromTitle->getNamespace(); + if ($namespace == NS_MAIN) + $namespace = $fromNS; + } + $fromKey = is_null( $fromTitle ) ? '' : $fromTitle->getDBkey(); - $out = ""; - $sql = "SELECT cur_title -FROM cur -WHERE cur_namespace=0 AND cur_title >= '" . wfStrencode( $from ) . "' -ORDER BY cur_title -LIMIT {$indexMaxperpage}"; - $res = wfQuery( $sql, DB_READ, "indexShowChunk" ); - -# FIXME: Dynamic column widths, backlink to main list, -# side links to next and previous + $dbr =& wfGetDB( DB_SLAVE ); + $res = $dbr->select( 'page', + array( 'page_namespace', 'page_title', 'page_is_redirect' ), + array( + 'page_namespace' => $namespace, + 'page_title >= ' . $dbr->addQuotes( $fromKey ) + ), + $fname, + array( + 'ORDER BY' => 'page_title', + 'LIMIT' => $this->maxPerPage + 1, + 'USE INDEX' => 'name_title', + ) + ); + + ### FIXME: side link to previous + $n = 0; - $out = "\n"; - while( $s = wfFetchObject( $res ) ) { - $t = Title::makeTitle( 0, $s->cur_title ); + $out = '
'; + + $namespaces = $wgContLang->getFormattedNamespaces(); + while( ($n < $this->maxPerPage) && ($s = $dbr->fetchObject( $res )) ) { + $t = Title::makeTitle( $s->page_namespace, $s->page_title ); if( $t ) { - $link = $sk->makeKnownLinkObj( $t ); + $link = ($s->page_is_redirect ? '
' : '' ) . + $sk->makeKnownLinkObj( $t, htmlspecialchars( $t->getText() ), false, false ) . + ($s->page_is_redirect ? '
' : '' ); } else { - $link = "[[" . htmlspecialchars( $s->cur_title ) . "]]"; + $link = '[[' . htmlspecialchars( $s->page_title ) . ']]'; } - if( $n == 0 ) { - $out .= "\n"; + if( $n % 3 == 0 ) { + $out .= ''; } - $out .= ""; - $n = ++$n % 3; - if( $n == 0 ) { - $out .= "\n"; + $out .= ""; + $n++; + if( $n % 3 == 0 ) { + $out .= ''; } } - if( $n != 0 ) { - $out .= "\n"; + if( ($n % 3) != 0 ) { + $out .= ''; + } + $out .= '
$link
$link
'; + + + if ( $including ) { + $out2 = ''; + } else { + $nsForm = $this->namespaceForm ( $namespace, $from ); + $out2 = ''; + $out2 .= '
' . $nsForm; + $out2 .= '' . + $sk->makeKnownLink( $wgContLang->specialPage( "Allpages" ), + wfMsgHtml ( 'allpages' ) ); + if ( ($n == $this->maxPerPage) && ($s = $dbr->fetchObject( $res )) ) { + $namespaceparam = $namespace ? "&namespace=$namespace" : ""; + $out2 .= " | " . $sk->makeKnownLink( + $wgContLang->specialPage( "Allpages" ), + wfMsgHtml ( 'nextpage', $s->page_title ), + "from=" . wfUrlEncode ( $s->page_title ) . $namespaceparam ); + } + $out2 .= "
"; } - $out .= ""; -#return $out; - $wgOut->addHtml( $out ); + + $wgOut->addHtml( $out2 . $out ); +} } ?>