Param documentation updates/added
[lhc/web/wiklou.git] / includes / specials / SpecialWhatlinkshere.php
1 <?php
2 /**
3 * Implements Special:Whatlinkshere
4 *
5 * This program is free software; you can redistribute it and/or modify
6 * it under the terms of the GNU General Public License as published by
7 * the Free Software Foundation; either version 2 of the License, or
8 * (at your option) any later version.
9 *
10 * This program is distributed in the hope that it will be useful,
11 * but WITHOUT ANY WARRANTY; without even the implied warranty of
12 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
13 * GNU General Public License for more details.
14 *
15 * You should have received a copy of the GNU General Public License along
16 * with this program; if not, write to the Free Software Foundation, Inc.,
17 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
18 * http://www.gnu.org/copyleft/gpl.html
19 *
20 * @file
21 * @todo Use some variant of Pager or something; the pagination here is lousy.
22 */
23
24 /**
25 * Implements Special:Whatlinkshere
26 *
27 * @ingroup SpecialPage
28 */
29 class SpecialWhatLinksHere extends SpecialPage {
30
31 /**
32 * @var FormOptions
33 */
34 protected $opts;
35
36 protected $selfTitle;
37
38 /**
39 * @var Title
40 */
41 protected $target;
42
43 protected $limits = array( 20, 50, 100, 250, 500 );
44
45 public function __construct() {
46 parent::__construct( 'Whatlinkshere' );
47 }
48
49 function execute( $par ) {
50 $out = $this->getOutput();
51
52 $this->setHeaders();
53
54 $opts = new FormOptions();
55
56 $opts->add( 'target', '' );
57 $opts->add( 'namespace', '', FormOptions::INTNULL );
58 $opts->add( 'limit', 50 );
59 $opts->add( 'from', 0 );
60 $opts->add( 'back', 0 );
61 $opts->add( 'hideredirs', false );
62 $opts->add( 'hidetrans', false );
63 $opts->add( 'hidelinks', false );
64 $opts->add( 'hideimages', false );
65
66 $opts->fetchValuesFromRequest( $this->getRequest() );
67 $opts->validateIntBounds( 'limit', 0, 5000 );
68
69 // Give precedence to subpage syntax
70 if ( isset($par) ) {
71 $opts->setValue( 'target', $par );
72 }
73
74 // Bind to member variable
75 $this->opts = $opts;
76
77 $this->target = Title::newFromURL( $opts->getValue( 'target' ) );
78 if( !$this->target ) {
79 $out->addHTML( $this->whatlinkshereForm() );
80 return;
81 }
82
83 $this->getSkin()->setRelevantTitle( $this->target );
84
85
86 $this->selfTitle = $this->getTitle( $this->target->getPrefixedDBkey() );
87
88 $out->setPageTitle( wfMsg( 'whatlinkshere-title', $this->target->getPrefixedText() ) );
89 $out->setSubtitle( wfMsg( 'whatlinkshere-backlink', Linker::link( $this->target, $this->target->getPrefixedText(), array(), array( 'redirect' => 'no' ) ) ) );
90
91 $this->showIndirectLinks( 0, $this->target, $opts->getValue( 'limit' ),
92 $opts->getValue( 'from' ), $opts->getValue( 'back' ) );
93 }
94
95 /**
96 * @param $level int Recursion level
97 * @param $target Title Target title
98 * @param $limit int Number of entries to display
99 * @param $from Title Display from this article ID
100 * @param $back Title Display from this article ID at backwards scrolling
101 * @private
102 */
103 function showIndirectLinks( $level, $target, $limit, $from = 0, $back = 0 ) {
104 global $wgMaxRedirectLinksRetrieved;
105 $out = $this->getOutput();
106 $dbr = wfGetDB( DB_SLAVE );
107 $options = array();
108
109 $hidelinks = $this->opts->getValue( 'hidelinks' );
110 $hideredirs = $this->opts->getValue( 'hideredirs' );
111 $hidetrans = $this->opts->getValue( 'hidetrans' );
112 $hideimages = $target->getNamespace() != NS_FILE || $this->opts->getValue( 'hideimages' );
113
114 $fetchlinks = (!$hidelinks || !$hideredirs);
115
116 // Make the query
117 $plConds = array(
118 'page_id=pl_from',
119 'pl_namespace' => $target->getNamespace(),
120 'pl_title' => $target->getDBkey(),
121 );
122 if( $hideredirs ) {
123 $plConds['page_is_redirect'] = 0;
124 } elseif( $hidelinks ) {
125 $plConds['page_is_redirect'] = 1;
126 }
127
128 $tlConds = array(
129 'page_id=tl_from',
130 'tl_namespace' => $target->getNamespace(),
131 'tl_title' => $target->getDBkey(),
132 );
133
134 $ilConds = array(
135 'page_id=il_from',
136 'il_to' => $target->getDBkey(),
137 );
138
139 $namespace = $this->opts->getValue( 'namespace' );
140 if ( is_int($namespace) ) {
141 $plConds['page_namespace'] = $namespace;
142 $tlConds['page_namespace'] = $namespace;
143 $ilConds['page_namespace'] = $namespace;
144 }
145
146 if ( $from ) {
147 $tlConds[] = "tl_from >= $from";
148 $plConds[] = "pl_from >= $from";
149 $ilConds[] = "il_from >= $from";
150 }
151
152 // Read an extra row as an at-end check
153 $queryLimit = $limit + 1;
154
155 // Enforce join order, sometimes namespace selector may
156 // trigger filesorts which are far less efficient than scanning many entries
157 $options[] = 'STRAIGHT_JOIN';
158
159 $options['LIMIT'] = $queryLimit;
160 $fields = array( 'page_id', 'page_namespace', 'page_title', 'page_is_redirect' );
161
162 if( $fetchlinks ) {
163 $options['ORDER BY'] = 'pl_from';
164 $plRes = $dbr->select( array( 'pagelinks', 'page' ), $fields,
165 $plConds, __METHOD__, $options );
166 }
167
168 if( !$hidetrans ) {
169 $options['ORDER BY'] = 'tl_from';
170 $tlRes = $dbr->select( array( 'templatelinks', 'page' ), $fields,
171 $tlConds, __METHOD__, $options );
172 }
173
174 if( !$hideimages ) {
175 $options['ORDER BY'] = 'il_from';
176 $ilRes = $dbr->select( array( 'imagelinks', 'page' ), $fields,
177 $ilConds, __METHOD__, $options );
178 }
179
180 if( ( !$fetchlinks || !$dbr->numRows($plRes) ) && ( $hidetrans || !$dbr->numRows($tlRes) ) && ( $hideimages || !$dbr->numRows($ilRes) ) ) {
181 if ( 0 == $level ) {
182 $out->addHTML( $this->whatlinkshereForm() );
183
184 // Show filters only if there are links
185 if( $hidelinks || $hidetrans || $hideredirs || $hideimages )
186 $out->addHTML( $this->getFilterPanel() );
187
188 $errMsg = is_int($namespace) ? 'nolinkshere-ns' : 'nolinkshere';
189 $out->addWikiMsg( $errMsg, $this->target->getPrefixedText() );
190 }
191 return;
192 }
193
194 // Read the rows into an array and remove duplicates
195 // templatelinks comes second so that the templatelinks row overwrites the
196 // pagelinks row, so we get (inclusion) rather than nothing
197 if( $fetchlinks ) {
198 foreach ( $plRes as $row ) {
199 $row->is_template = 0;
200 $row->is_image = 0;
201 $rows[$row->page_id] = $row;
202 }
203 }
204 if( !$hidetrans ) {
205 foreach ( $tlRes as $row ) {
206 $row->is_template = 1;
207 $row->is_image = 0;
208 $rows[$row->page_id] = $row;
209 }
210 }
211 if( !$hideimages ) {
212 foreach ( $ilRes as $row ) {
213 $row->is_template = 0;
214 $row->is_image = 1;
215 $rows[$row->page_id] = $row;
216 }
217 }
218
219 // Sort by key and then change the keys to 0-based indices
220 ksort( $rows );
221 $rows = array_values( $rows );
222
223 $numRows = count( $rows );
224
225 // Work out the start and end IDs, for prev/next links
226 if ( $numRows > $limit ) {
227 // More rows available after these ones
228 // Get the ID from the last row in the result set
229 $nextId = $rows[$limit]->page_id;
230 // Remove undisplayed rows
231 $rows = array_slice( $rows, 0, $limit );
232 } else {
233 // No more rows after
234 $nextId = false;
235 }
236 $prevId = $from;
237
238 if ( $level == 0 ) {
239 $out->addHTML( $this->whatlinkshereForm() );
240 $out->addHTML( $this->getFilterPanel() );
241 $out->addWikiMsg( 'linkshere', $this->target->getPrefixedText() );
242
243 $prevnext = $this->getPrevNext( $prevId, $nextId );
244 $out->addHTML( $prevnext );
245 }
246
247 $out->addHTML( $this->listStart( $level ) );
248 foreach ( $rows as $row ) {
249 $nt = Title::makeTitle( $row->page_namespace, $row->page_title );
250
251 if ( $row->page_is_redirect && $level < 2 ) {
252 $out->addHTML( $this->listItem( $row, $nt, true ) );
253 $this->showIndirectLinks( $level + 1, $nt, $wgMaxRedirectLinksRetrieved );
254 $out->addHTML( Xml::closeElement( 'li' ) );
255 } else {
256 $out->addHTML( $this->listItem( $row, $nt ) );
257 }
258 }
259
260 $out->addHTML( $this->listEnd() );
261
262 if( $level == 0 ) {
263 $out->addHTML( $prevnext );
264 }
265 }
266
267 protected function listStart( $level ) {
268 return Xml::openElement( 'ul', ( $level ? array() : array( 'id' => 'mw-whatlinkshere-list' ) ) );
269 }
270
271 protected function listItem( $row, $nt, $notClose = false ) {
272 # local message cache
273 static $msgcache = null;
274 if ( $msgcache === null ) {
275 static $msgs = array( 'isredirect', 'istemplate', 'semicolon-separator',
276 'whatlinkshere-links', 'isimage' );
277 $msgcache = array();
278 foreach ( $msgs as $msg ) {
279 $msgcache[$msg] = wfMsgExt( $msg, array( 'escapenoentities' ) );
280 }
281 }
282
283 if( $row->page_is_redirect ) {
284 $query = array( 'redirect' => 'no' );
285 } else {
286 $query = array();
287 }
288
289 $link = Linker::linkKnown(
290 $nt,
291 null,
292 array(),
293 $query
294 );
295
296 // Display properties (redirect or template)
297 $propsText = '';
298 $props = array();
299 if ( $row->page_is_redirect )
300 $props[] = $msgcache['isredirect'];
301 if ( $row->is_template )
302 $props[] = $msgcache['istemplate'];
303 if( $row->is_image )
304 $props[] = $msgcache['isimage'];
305
306 if ( count( $props ) ) {
307 $propsText = '(' . implode( $msgcache['semicolon-separator'], $props ) . ')';
308 }
309
310 # Space for utilities links, with a what-links-here link provided
311 $wlhLink = $this->wlhLink( $nt, $msgcache['whatlinkshere-links'] );
312 $wlh = Xml::wrapClass( "($wlhLink)", 'mw-whatlinkshere-tools' );
313
314 return $notClose ?
315 Xml::openElement( 'li' ) . "$link $propsText $wlh\n" :
316 Xml::tags( 'li', null, "$link $propsText $wlh" ) . "\n";
317 }
318
319 protected function listEnd() {
320 return Xml::closeElement( 'ul' );
321 }
322
323 protected function wlhLink( Title $target, $text ) {
324 static $title = null;
325 if ( $title === null )
326 $title = $this->getTitle();
327
328 return Linker::linkKnown(
329 $title,
330 $text,
331 array(),
332 array( 'target' => $target->getPrefixedText() )
333 );
334 }
335
336 function makeSelfLink( $text, $query ) {
337 return Linker::linkKnown(
338 $this->selfTitle,
339 $text,
340 array(),
341 $query
342 );
343 }
344
345 function getPrevNext( $prevId, $nextId ) {
346 global $wgLang;
347 $currentLimit = $this->opts->getValue( 'limit' );
348 $fmtLimit = $wgLang->formatNum( $currentLimit );
349 $prev = wfMsgExt( 'whatlinkshere-prev', array( 'parsemag', 'escape' ), $fmtLimit );
350 $next = wfMsgExt( 'whatlinkshere-next', array( 'parsemag', 'escape' ), $fmtLimit );
351
352 $changed = $this->opts->getChangedValues();
353 unset($changed['target']); // Already in the request title
354
355 if ( 0 != $prevId ) {
356 $overrides = array( 'from' => $this->opts->getValue( 'back' ) );
357 $prev = $this->makeSelfLink( $prev, array_merge( $changed, $overrides ) );
358 }
359 if ( 0 != $nextId ) {
360 $overrides = array( 'from' => $nextId, 'back' => $prevId );
361 $next = $this->makeSelfLink( $next, array_merge( $changed, $overrides ) );
362 }
363
364 $limitLinks = array();
365 foreach ( $this->limits as $limit ) {
366 $prettyLimit = $wgLang->formatNum( $limit );
367 $overrides = array( 'limit' => $limit );
368 $limitLinks[] = $this->makeSelfLink( $prettyLimit, array_merge( $changed, $overrides ) );
369 }
370
371 $nums = $wgLang->pipeList( $limitLinks );
372
373 return wfMsgHtml( 'viewprevnext', $prev, $next, $nums );
374 }
375
376 function whatlinkshereForm() {
377 global $wgScript;
378
379 // We get nicer value from the title object
380 $this->opts->consumeValue( 'target' );
381 // Reset these for new requests
382 $this->opts->consumeValues( array( 'back', 'from' ) );
383
384 $target = $this->target ? $this->target->getPrefixedText() : '';
385 $namespace = $this->opts->consumeValue( 'namespace' );
386
387 # Build up the form
388 $f = Xml::openElement( 'form', array( 'action' => $wgScript ) );
389
390 # Values that should not be forgotten
391 $f .= Html::hidden( 'title', $this->getTitle()->getPrefixedText() );
392 foreach ( $this->opts->getUnconsumedValues() as $name => $value ) {
393 $f .= Html::hidden( $name, $value );
394 }
395
396 $f .= Xml::fieldset( wfMsg( 'whatlinkshere' ) );
397
398 # Target input
399 $f .= Xml::inputLabel( wfMsg( 'whatlinkshere-page' ), 'target',
400 'mw-whatlinkshere-target', 40, $target );
401
402 $f .= ' ';
403
404 # Namespace selector
405 $f .= Xml::label( wfMsg( 'namespace' ), 'namespace' ) . '&#160;' .
406 Xml::namespaceSelector( $namespace, '' );
407
408 $f .= ' ';
409
410 # Submit
411 $f .= Xml::submitButton( wfMsg( 'allpagessubmit' ) );
412
413 # Close
414 $f .= Xml::closeElement( 'fieldset' ) . Xml::closeElement( 'form' ) . "\n";
415
416 return $f;
417 }
418
419 /**
420 * Create filter panel
421 *
422 * @return string HTML fieldset and filter panel with the show/hide links
423 */
424 function getFilterPanel() {
425 global $wgLang;
426 $show = wfMsgHtml( 'show' );
427 $hide = wfMsgHtml( 'hide' );
428
429 $changed = $this->opts->getChangedValues();
430 unset($changed['target']); // Already in the request title
431
432 $links = array();
433 $types = array( 'hidetrans', 'hidelinks', 'hideredirs' );
434 if( $this->target->getNamespace() == NS_FILE )
435 $types[] = 'hideimages';
436
437 // Combined message keys: 'whatlinkshere-hideredirs', 'whatlinkshere-hidetrans', 'whatlinkshere-hidelinks', 'whatlinkshere-hideimages'
438 // To be sure they will be find by grep
439 foreach( $types as $type ) {
440 $chosen = $this->opts->getValue( $type );
441 $msg = $chosen ? $show : $hide;
442 $overrides = array( $type => !$chosen );
443 $links[] = wfMsgHtml( "whatlinkshere-{$type}", $this->makeSelfLink( $msg, array_merge( $changed, $overrides ) ) );
444 }
445 return Xml::fieldset( wfMsg( 'whatlinkshere-filters' ), $wgLang->pipeList( $links ) );
446 }
447 }