27b2b3b0fe56a1c720958d0a63f7bd9f4d55804d
3 function wfSpecialAllpages( $par=NULL )
5 global $indexMaxperpage, $wgRequest;
6 $indexMaxperpage = 480;
7 $from = $wgRequest->getVal( 'from' );
10 indexShowChunk( $par );
11 } elseif( !is_null( $from ) ) {
12 indexShowChunk( $from );
18 function indexShowToplevel()
20 global $wgOut, $indexMaxperpage, $wgLang;
21 $fname = "indexShowToplevel";
24 $vsp = $wgLang->getValidSpecialPages();
25 $log = new LogPage( $vsp["Allpages"] );
26 $log->mUpdateRecentChanges
= false;
30 $log->showAsDisabledPage();
34 $fromwhere = "FROM cur WHERE cur_namespace=0";
35 $order = "ORDER BY cur_title";
38 $sql = "SELECT COUNT(*) AS count $fromwhere";
39 $res = wfQuery( $sql, DB_READ
, $fname );
40 $s = wfFetchObject( $res );
42 $sections = ceil( $count / $indexMaxperpage );
44 $sql = "SELECT cur_title $fromwhere $order LIMIT 1";
45 $res = wfQuery( $sql, DB_READ
, $fname );
46 $s = wfFetchObject( $res );
47 $inpoint = $s->cur_title
;
50 # There's got to be a cleaner way to do this!
51 for( $i = 1; $i < $sections; $i++
) {
52 $from = $i * $indexMaxperpage;
53 $sql = "SELECT cur_title $fromwhere $order ".wfLimitResult(2,$from);
54 $res = wfQuery( $sql, DB_READ
, $fname );
56 $s = wfFetchObject( $res );
57 $outpoint = $s->cur_title
;
58 $out .= indexShowline( $inpoint, $outpoint );
60 $s = wfFetchObject( $res );
61 $inpoint = $s->cur_title
;
66 $from = $i * $indexMaxperpage;
67 $sql = "SELECT cur_title $fromwhere $order ".wfLimitResult(1,$count-1);
68 $res = wfQuery( $sql, DB_READ
, $fname );
69 $s = wfFetchObject( $res );
70 $outpoint = $s->cur_title
;
71 $out .= indexShowline( $inpoint, $outpoint );
75 $log->replaceContent( $out );
77 $wgOut->addHtml( $out );
80 function indexShowline( $inpoint, $outpoint )
82 global $wgOut, $wgLang, $wgUser;
83 $sk = $wgUser->getSkin();
88 $sk->makeKnownLink( $wgLang->specialPage( "Allpages" ),
89 str_replace( "_", " ", $inpoint ),
90 "from=" . wfStrencode( $inpoint ) ) . "</td><td>",
91 "</td><td align=\"left\">" .
92 str_replace( "_", " ", $outpoint )
94 return "<tr><td align=\"right\">{$out}</td></tr>\n";
97 function indexShowChunk( $from )
99 global $wgOut, $wgUser, $indexMaxperpage, $wgLang;
100 $sk = $wgUser->getSkin();
101 $maxPlusOne = $indexMaxperpage +
1;
104 $sql = "SELECT cur_title FROM cur WHERE cur_namespace=0 AND cur_title >= '"
105 . wfStrencode( $from ) . "' ORDER BY cur_title LIMIT " . $maxPlusOne;
106 $res = wfQuery( $sql, DB_READ
, "indexShowChunk" );
108 ### FIXME: side link to previous
111 $out = "<table border=\"0\" width=\"100%\">\n";
112 while( ($n < $indexMaxperpage) && ($s = wfFetchObject( $res )) ) {
113 $t = Title
::makeTitle( 0, $s->cur_title
);
115 $link = $sk->makeKnownLinkObj( $t );
117 $link = "[[" . htmlspecialchars( $s->cur_title
) . "]]";
122 $out .= "<td>$link</td>";
128 if( ($n %
3) != 0 ) {
133 $out2 = "<div style='text-align: right; font-size: smaller; margin-bottom: 1em;'>" .
134 $sk->makeKnownLink( $wgLang->specialPage( "Allpages" ),
135 wfMsg ( 'allpages' ) );
136 if ( ($n == $indexMaxperpage) && ($s = wfFetchObject( $res )) ) {
137 $out2 .= " | " . $sk->makeKnownLink(
138 $wgLang->specialPage( "Allpages" ),
139 wfMsg ( 'nextpage', $s->cur_title
),
140 "from=" . wfStrencode( $s->cur_title
) );
144 $wgOut->addHtml( $out2 . $out );