Merge "Drop outdated "documentation reviewed" tags"
[lhc/web/wiklou.git] / includes / specials / SpecialExport.php
1 <?php
2 /**
3 * Implements Special:Export
4 *
5 * Copyright © 2003-2008 Brion Vibber <brion@pobox.com>
6 *
7 * This program is free software; you can redistribute it and/or modify
8 * it under the terms of the GNU General Public License as published by
9 * the Free Software Foundation; either version 2 of the License, or
10 * (at your option) any later version.
11 *
12 * This program is distributed in the hope that it will be useful,
13 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 * GNU General Public License for more details.
16 *
17 * You should have received a copy of the GNU General Public License along
18 * with this program; if not, write to the Free Software Foundation, Inc.,
19 * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.
20 * http://www.gnu.org/copyleft/gpl.html
21 *
22 * @file
23 * @ingroup SpecialPage
24 */
25
26 /**
27 * A special page that allows users to export pages in a XML file
28 *
29 * @ingroup SpecialPage
30 */
31 class SpecialExport extends SpecialPage {
32 private $curonly, $doExport, $pageLinkDepth, $templates;
33 private $images;
34
35 public function __construct() {
36 parent::__construct( 'Export' );
37 }
38
39 public function execute( $par ) {
40 $this->setHeaders();
41 $this->outputHeader();
42 $config = $this->getConfig();
43
44 // Set some variables
45 $this->curonly = true;
46 $this->doExport = false;
47 $request = $this->getRequest();
48 $this->templates = $request->getCheck( 'templates' );
49 $this->images = $request->getCheck( 'images' ); // Doesn't do anything yet
50 $this->pageLinkDepth = $this->validateLinkDepth(
51 $request->getIntOrNull( 'pagelink-depth' )
52 );
53 $nsindex = '';
54 $exportall = false;
55
56 if ( $request->getCheck( 'addcat' ) ) {
57 $page = $request->getText( 'pages' );
58 $catname = $request->getText( 'catname' );
59
60 if ( $catname !== '' && $catname !== null && $catname !== false ) {
61 $t = Title::makeTitleSafe( NS_MAIN, $catname );
62 if ( $t ) {
63 /**
64 * @todo FIXME: This can lead to hitting memory limit for very large
65 * categories. Ideally we would do the lookup synchronously
66 * during the export in a single query.
67 */
68 $catpages = $this->getPagesFromCategory( $t );
69 if ( $catpages ) {
70 $page .= "\n" . implode( "\n", $catpages );
71 }
72 }
73 }
74 } elseif ( $request->getCheck( 'addns' ) && $config->get( 'ExportFromNamespaces' ) ) {
75 $page = $request->getText( 'pages' );
76 $nsindex = $request->getText( 'nsindex', '' );
77
78 if ( strval( $nsindex ) !== '' ) {
79 /**
80 * Same implementation as above, so same @todo
81 */
82 $nspages = $this->getPagesFromNamespace( $nsindex );
83 if ( $nspages ) {
84 $page .= "\n" . implode( "\n", $nspages );
85 }
86 }
87 } elseif ( $request->getCheck( 'exportall' ) && $config->get( 'ExportAllowAll' ) ) {
88 $this->doExport = true;
89 $exportall = true;
90
91 /* Although $page and $history are not used later on, we
92 nevertheless set them to avoid that PHP notices about using
93 undefined variables foul up our XML output (see call to
94 doExport(...) further down) */
95 $page = '';
96 $history = '';
97 } elseif ( $request->wasPosted() && $par == '' ) {
98 $page = $request->getText( 'pages' );
99 $this->curonly = $request->getCheck( 'curonly' );
100 $rawOffset = $request->getVal( 'offset' );
101
102 if ( $rawOffset ) {
103 $offset = wfTimestamp( TS_MW, $rawOffset );
104 } else {
105 $offset = null;
106 }
107
108 $maxHistory = $config->get( 'ExportMaxHistory' );
109 $limit = $request->getInt( 'limit' );
110 $dir = $request->getVal( 'dir' );
111 $history = array(
112 'dir' => 'asc',
113 'offset' => false,
114 'limit' => $maxHistory,
115 );
116 $historyCheck = $request->getCheck( 'history' );
117
118 if ( $this->curonly ) {
119 $history = WikiExporter::CURRENT;
120 } elseif ( !$historyCheck ) {
121 if ( $limit > 0 && ( $maxHistory == 0 || $limit < $maxHistory ) ) {
122 $history['limit'] = $limit;
123 }
124
125 if ( !is_null( $offset ) ) {
126 $history['offset'] = $offset;
127 }
128
129 if ( strtolower( $dir ) == 'desc' ) {
130 $history['dir'] = 'desc';
131 }
132 }
133
134 if ( $page != '' ) {
135 $this->doExport = true;
136 }
137 } else {
138 // Default to current-only for GET requests.
139 $page = $request->getText( 'pages', $par );
140 $historyCheck = $request->getCheck( 'history' );
141
142 if ( $historyCheck ) {
143 $history = WikiExporter::FULL;
144 } else {
145 $history = WikiExporter::CURRENT;
146 }
147
148 if ( $page != '' ) {
149 $this->doExport = true;
150 }
151 }
152
153 if ( !$config->get( 'ExportAllowHistory' ) ) {
154 // Override
155 $history = WikiExporter::CURRENT;
156 }
157
158 $list_authors = $request->getCheck( 'listauthors' );
159 if ( !$this->curonly || !$config->get( 'ExportAllowListContributors' ) ) {
160 $list_authors = false;
161 }
162
163 if ( $this->doExport ) {
164 $this->getOutput()->disable();
165
166 // Cancel output buffering and gzipping if set
167 // This should provide safer streaming for pages with history
168 wfResetOutputBuffers();
169 $request->response()->header( "Content-type: application/xml; charset=utf-8" );
170
171 if ( $request->getCheck( 'wpDownload' ) ) {
172 // Provide a sane filename suggestion
173 $filename = urlencode( $config->get( 'Sitename' ) . '-' . wfTimestampNow() . '.xml' );
174 $request->response()->header( "Content-disposition: attachment;filename={$filename}" );
175 }
176
177 $this->doExport( $page, $history, $list_authors, $exportall );
178
179 return;
180 }
181
182 $out = $this->getOutput();
183 $out->addWikiMsg( 'exporttext' );
184
185 if ( $page == '' ) {
186 $categoryName = $request->getText( 'catname' );
187 } else {
188 $categoryName = '';
189 }
190
191 $form = Xml::openElement( 'form', array( 'method' => 'post',
192 'action' => $this->getPageTitle()->getLocalURL( 'action=submit' ) ) );
193 $form .= Xml::inputLabel(
194 $this->msg( 'export-addcattext' )->text(),
195 'catname',
196 'catname',
197 40,
198 $categoryName
199 ) . '&#160;';
200 $form .= Xml::submitButton(
201 $this->msg( 'export-addcat' )->text(),
202 array( 'name' => 'addcat' )
203 ) . '<br />';
204
205 if ( $config->get( 'ExportFromNamespaces' ) ) {
206 $form .= Html::namespaceSelector(
207 array(
208 'selected' => $nsindex,
209 'label' => $this->msg( 'export-addnstext' )->text()
210 ), array(
211 'name' => 'nsindex',
212 'id' => 'namespace',
213 'class' => 'namespaceselector',
214 )
215 ) . '&#160;';
216 $form .= Xml::submitButton(
217 $this->msg( 'export-addns' )->text(),
218 array( 'name' => 'addns' )
219 ) . '<br />';
220 }
221
222 if ( $config->get( 'ExportAllowAll' ) ) {
223 $form .= Xml::checkLabel(
224 $this->msg( 'exportall' )->text(),
225 'exportall',
226 'exportall',
227 $request->wasPosted() ? $request->getCheck( 'exportall' ) : false
228 ) . '<br />';
229 }
230
231 $form .= Xml::element(
232 'textarea',
233 array( 'name' => 'pages', 'cols' => 40, 'rows' => 10 ),
234 $page,
235 false
236 );
237 $form .= '<br />';
238
239 if ( $config->get( 'ExportAllowHistory' ) ) {
240 $form .= Xml::checkLabel(
241 $this->msg( 'exportcuronly' )->text(),
242 'curonly',
243 'curonly',
244 $request->wasPosted() ? $request->getCheck( 'curonly' ) : true
245 ) . '<br />';
246 } else {
247 $out->addWikiMsg( 'exportnohistory' );
248 }
249
250 $form .= Xml::checkLabel(
251 $this->msg( 'export-templates' )->text(),
252 'templates',
253 'wpExportTemplates',
254 $request->wasPosted() ? $request->getCheck( 'templates' ) : false
255 ) . '<br />';
256
257 if ( $config->get( 'ExportMaxLinkDepth' ) || $this->userCanOverrideExportDepth() ) {
258 $form .= Xml::inputLabel(
259 $this->msg( 'export-pagelinks' )->text(),
260 'pagelink-depth',
261 'pagelink-depth',
262 20,
263 0
264 ) . '<br />';
265 }
266
267 /* Enable this when we can do something useful exporting/importing image information.
268 $form .= Xml::checkLabel(
269 $this->msg( 'export-images' )->text(),
270 'images',
271 'wpExportImages',
272 false
273 ) . '<br />';
274 */
275 $form .= Xml::checkLabel(
276 $this->msg( 'export-download' )->text(),
277 'wpDownload',
278 'wpDownload',
279 $request->wasPosted() ? $request->getCheck( 'wpDownload' ) : true
280 ) . '<br />';
281
282 if ( $config->get( 'ExportAllowListContributors' ) ) {
283 $form .= Xml::checkLabel(
284 $this->msg( 'exportlistauthors' )->text(),
285 'listauthors',
286 'listauthors',
287 $request->wasPosted() ? $request->getCheck( 'listauthors' ) : false
288 ) . '<br />';
289 }
290
291 $form .= Xml::submitButton(
292 $this->msg( 'export-submit' )->text(),
293 Linker::tooltipAndAccesskeyAttribs( 'export' )
294 );
295 $form .= Xml::closeElement( 'form' );
296
297 $out->addHTML( $form );
298 }
299
300 /**
301 * @return bool
302 */
303 private function userCanOverrideExportDepth() {
304 return $this->getUser()->isAllowed( 'override-export-depth' );
305 }
306
307 /**
308 * Do the actual page exporting
309 *
310 * @param string $page User input on what page(s) to export
311 * @param int $history One of the WikiExporter history export constants
312 * @param bool $list_authors Whether to add distinct author list (when
313 * not returning full history)
314 * @param bool $exportall Whether to export everything
315 */
316 private function doExport( $page, $history, $list_authors, $exportall ) {
317
318 // If we are grabbing everything, enable full history and ignore the rest
319 if ( $exportall ) {
320 $history = WikiExporter::FULL;
321 } else {
322
323 $pageSet = array(); // Inverted index of all pages to look up
324
325 // Split up and normalize input
326 foreach ( explode( "\n", $page ) as $pageName ) {
327 $pageName = trim( $pageName );
328 $title = Title::newFromText( $pageName );
329 if ( $title && !$title->isExternal() && $title->getText() !== '' ) {
330 // Only record each page once!
331 $pageSet[$title->getPrefixedText()] = true;
332 }
333 }
334
335 // Set of original pages to pass on to further manipulation...
336 $inputPages = array_keys( $pageSet );
337
338 // Look up any linked pages if asked...
339 if ( $this->templates ) {
340 $pageSet = $this->getTemplates( $inputPages, $pageSet );
341 }
342 $linkDepth = $this->pageLinkDepth;
343 if ( $linkDepth ) {
344 $pageSet = $this->getPageLinks( $inputPages, $pageSet, $linkDepth );
345 }
346
347 // Enable this when we can do something useful exporting/importing image information.
348 // if( $this->images ) ) {
349 // $pageSet = $this->getImages( $inputPages, $pageSet );
350 // }
351
352 $pages = array_keys( $pageSet );
353
354 // Normalize titles to the same format and remove dupes, see bug 17374
355 foreach ( $pages as $k => $v ) {
356 $pages[$k] = str_replace( " ", "_", $v );
357 }
358
359 $pages = array_unique( $pages );
360 }
361
362 /* Ok, let's get to it... */
363 if ( $history == WikiExporter::CURRENT ) {
364 $lb = false;
365 $db = wfGetDB( DB_SLAVE );
366 $buffer = WikiExporter::BUFFER;
367 } else {
368 // Use an unbuffered query; histories may be very long!
369 $lb = wfGetLBFactory()->newMainLB();
370 $db = $lb->getConnection( DB_SLAVE );
371 $buffer = WikiExporter::STREAM;
372
373 // This might take a while... :D
374 wfSuppressWarnings();
375 set_time_limit( 0 );
376 wfRestoreWarnings();
377 }
378
379 $exporter = new WikiExporter( $db, $history, $buffer );
380 $exporter->list_authors = $list_authors;
381 $exporter->openStream();
382
383 if ( $exportall ) {
384 $exporter->allPages();
385 } else {
386 foreach ( $pages as $page ) {
387 #Bug 8824: Only export pages the user can read
388 $title = Title::newFromText( $page );
389 if ( is_null( $title ) ) {
390 // @todo Perhaps output an <error> tag or something.
391 continue;
392 }
393
394 if ( !$title->userCan( 'read', $this->getUser() ) ) {
395 // @todo Perhaps output an <error> tag or something.
396 continue;
397 }
398
399 $exporter->pageByTitle( $title );
400 }
401 }
402
403 $exporter->closeStream();
404
405 if ( $lb ) {
406 $lb->closeAll();
407 }
408 }
409
410 /**
411 * @param Title $title
412 * @return array
413 */
414 private function getPagesFromCategory( $title ) {
415 global $wgContLang;
416
417 $name = $title->getDBkey();
418
419 $dbr = wfGetDB( DB_SLAVE );
420 $res = $dbr->select(
421 array( 'page', 'categorylinks' ),
422 array( 'page_namespace', 'page_title' ),
423 array( 'cl_from=page_id', 'cl_to' => $name ),
424 __METHOD__,
425 array( 'LIMIT' => '5000' )
426 );
427
428 $pages = array();
429
430 foreach ( $res as $row ) {
431 $n = $row->page_title;
432 if ( $row->page_namespace ) {
433 $ns = $wgContLang->getNsText( $row->page_namespace );
434 $n = $ns . ':' . $n;
435 }
436
437 $pages[] = $n;
438 }
439
440 return $pages;
441 }
442
443 /**
444 * @param int $nsindex
445 * @return array
446 */
447 private function getPagesFromNamespace( $nsindex ) {
448 global $wgContLang;
449
450 $dbr = wfGetDB( DB_SLAVE );
451 $res = $dbr->select(
452 'page',
453 array( 'page_namespace', 'page_title' ),
454 array( 'page_namespace' => $nsindex ),
455 __METHOD__,
456 array( 'LIMIT' => '5000' )
457 );
458
459 $pages = array();
460
461 foreach ( $res as $row ) {
462 $n = $row->page_title;
463
464 if ( $row->page_namespace ) {
465 $ns = $wgContLang->getNsText( $row->page_namespace );
466 $n = $ns . ':' . $n;
467 }
468
469 $pages[] = $n;
470 }
471
472 return $pages;
473 }
474
475 /**
476 * Expand a list of pages to include templates used in those pages.
477 * @param array $inputPages List of titles to look up
478 * @param array $pageSet Associative array indexed by titles for output
479 * @return array Associative array index by titles
480 */
481 private function getTemplates( $inputPages, $pageSet ) {
482 return $this->getLinks( $inputPages, $pageSet,
483 'templatelinks',
484 array( 'namespace' => 'tl_namespace', 'title' => 'tl_title' ),
485 array( 'page_id=tl_from' )
486 );
487 }
488
489 /**
490 * Validate link depth setting, if available.
491 * @param int $depth
492 * @return int
493 */
494 private function validateLinkDepth( $depth ) {
495 if ( $depth < 0 ) {
496 return 0;
497 }
498
499 if ( !$this->userCanOverrideExportDepth() ) {
500 $maxLinkDepth = $this->getConfig()->get( 'ExportMaxLinkDepth' );
501 if ( $depth > $maxLinkDepth ) {
502 return $maxLinkDepth;
503 }
504 }
505
506 /*
507 * There's a HARD CODED limit of 5 levels of recursion here to prevent a
508 * crazy-big export from being done by someone setting the depth
509 * number too high. In other words, last resort safety net.
510 */
511
512 return intval( min( $depth, 5 ) );
513 }
514
515 /**
516 * Expand a list of pages to include pages linked to from that page.
517 * @param array $inputPages
518 * @param array $pageSet
519 * @param int $depth
520 * @return array
521 */
522 private function getPageLinks( $inputPages, $pageSet, $depth ) {
523 // @codingStandardsIgnoreStart Squiz.WhiteSpace.SemicolonSpacing.Incorrect
524 for ( ; $depth > 0; --$depth ) {
525 // @codingStandardsIgnoreEnd
526 $pageSet = $this->getLinks(
527 $inputPages, $pageSet, 'pagelinks',
528 array( 'namespace' => 'pl_namespace', 'title' => 'pl_title' ),
529 array( 'page_id=pl_from' )
530 );
531 $inputPages = array_keys( $pageSet );
532 }
533
534 return $pageSet;
535 }
536
537 /**
538 * Expand a list of pages to include images used in those pages.
539 *
540 * @param array $inputPages List of titles to look up
541 * @param array $pageSet Associative array indexed by titles for output
542 *
543 * @return array Associative array index by titles
544 */
545 private function getImages( $inputPages, $pageSet ) {
546 return $this->getLinks(
547 $inputPages,
548 $pageSet,
549 'imagelinks',
550 array( 'namespace' => NS_FILE, 'title' => 'il_to' ),
551 array( 'page_id=il_from' )
552 );
553 }
554
555 /**
556 * Expand a list of pages to include items used in those pages.
557 * @param array $inputPages Array of page titles
558 * @param array $pageSet
559 * @param string $table
560 * @param array $fields Array of field names
561 * @param array $join
562 * @return array
563 */
564 private function getLinks( $inputPages, $pageSet, $table, $fields, $join ) {
565 $dbr = wfGetDB( DB_SLAVE );
566
567 foreach ( $inputPages as $page ) {
568 $title = Title::newFromText( $page );
569
570 if ( $title ) {
571 $pageSet[$title->getPrefixedText()] = true;
572 /// @todo FIXME: May or may not be more efficient to batch these
573 /// by namespace when given multiple input pages.
574 $result = $dbr->select(
575 array( 'page', $table ),
576 $fields,
577 array_merge(
578 $join,
579 array(
580 'page_namespace' => $title->getNamespace(),
581 'page_title' => $title->getDBkey()
582 )
583 ),
584 __METHOD__
585 );
586
587 foreach ( $result as $row ) {
588 $template = Title::makeTitle( $row->namespace, $row->title );
589 $pageSet[$template->getPrefixedText()] = true;
590 }
591 }
592 }
593
594 return $pageSet;
595 }
596
597 protected function getGroupName() {
598 return 'pagetools';
599 }
600 }