Standardise wording of verbs relating to revision deletion
[lhc/web/wiklou.git] / includes / Wiki.php
1 <?php
2 /**
3 * Helper class for the index.php entry point.
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 */
22
23 /**
24 * The MediaWiki class is the helper class for the index.php entry point.
25 *
26 * @internal documentation reviewed 15 Mar 2010
27 */
28 class MediaWiki {
29
30 /**
31 * TODO: fold $output, etc, into this
32 * @var IContextSource
33 */
34 private $context;
35
36 /**
37 * @param $x null|WebRequest
38 * @return WebRequest
39 */
40 public function request( WebRequest $x = null ) {
41 $old = $this->context->getRequest();
42 $this->context->setRequest( $x );
43 return $old;
44 }
45
46 /**
47 * @param $x null|OutputPage
48 * @return OutputPage
49 */
50 public function output( OutputPage $x = null ) {
51 $old = $this->context->getOutput();
52 $this->context->setOutput( $x );
53 return $old;
54 }
55
56 /**
57 * @param IContextSource|null $context
58 */
59 public function __construct( IContextSource $context = null ) {
60 if ( !$context ) {
61 $context = RequestContext::getMain();
62 }
63
64 $this->context = $context;
65 }
66
67 /**
68 * Parse the request to get the Title object
69 *
70 * @return Title object to be $wgTitle
71 */
72 private function parseTitle() {
73 global $wgContLang;
74
75 $request = $this->context->getRequest();
76 $curid = $request->getInt( 'curid' );
77 $title = $request->getVal( 'title' );
78 $action = $request->getVal( 'action', 'view' );
79
80 if ( $request->getCheck( 'search' ) ) {
81 // Compatibility with old search URLs which didn't use Special:Search
82 // Just check for presence here, so blank requests still
83 // show the search page when using ugly URLs (bug 8054).
84 $ret = SpecialPage::getTitleFor( 'Search' );
85 } elseif ( $curid ) {
86 // URLs like this are generated by RC, because rc_title isn't always accurate
87 $ret = Title::newFromID( $curid );
88 } elseif ( $title == '' && $action != 'delete' ) {
89 $ret = Title::newMainPage();
90 } else {
91 $ret = Title::newFromURL( $title );
92 // Alias NS_MEDIA page URLs to NS_FILE...we only use NS_MEDIA
93 // in wikitext links to tell Parser to make a direct file link
94 if ( !is_null( $ret ) && $ret->getNamespace() == NS_MEDIA ) {
95 $ret = Title::makeTitle( NS_FILE, $ret->getDBkey() );
96 }
97 // Check variant links so that interwiki links don't have to worry
98 // about the possible different language variants
99 if ( count( $wgContLang->getVariants() ) > 1
100 && !is_null( $ret ) && $ret->getArticleID() == 0 )
101 {
102 $wgContLang->findVariantLink( $title, $ret );
103 }
104 }
105 // For non-special titles, check for implicit titles
106 if ( is_null( $ret ) || !$ret->isSpecialPage() ) {
107 // We can have urls with just ?diff=,?oldid= or even just ?diff=
108 $oldid = $request->getInt( 'oldid' );
109 $oldid = $oldid ? $oldid : $request->getInt( 'diff' );
110 // Allow oldid to override a changed or missing title
111 if ( $oldid ) {
112 $rev = Revision::newFromId( $oldid );
113 $ret = $rev ? $rev->getTitle() : $ret;
114 }
115 }
116
117 if ( $ret === null || ( $ret->getDBkey() == '' && $ret->getInterwiki() == '' ) ) {
118 $ret = SpecialPage::getTitleFor( 'Badtitle' );
119 }
120
121 return $ret;
122 }
123
124 /**
125 * Get the Title object that we'll be acting on, as specified in the WebRequest
126 * @return Title
127 */
128 public function getTitle() {
129 if ( $this->context->getTitle() === null ) {
130 $this->context->setTitle( $this->parseTitle() );
131 }
132 return $this->context->getTitle();
133 }
134
135 /**
136 * Returns the name of the action that will be executed.
137 *
138 * @return string: action
139 */
140 public function getAction() {
141 static $action = null;
142
143 if ( $action === null ) {
144 $action = Action::getActionName( $this->context );
145 }
146
147 return $action;
148 }
149
150 /**
151 * Create an Article object of the appropriate class for the given page.
152 *
153 * @deprecated in 1.18; use Article::newFromTitle() instead
154 * @param $title Title
155 * @param $context IContextSource
156 * @return Article object
157 */
158 public static function articleFromTitle( $title, IContextSource $context ) {
159 wfDeprecated( __METHOD__, '1.18' );
160 return Article::newFromTitle( $title, $context );
161 }
162
163 /**
164 * Performs the request.
165 * - bad titles
166 * - read restriction
167 * - local interwiki redirects
168 * - redirect loop
169 * - special pages
170 * - normal pages
171 *
172 * @throws MWException|PermissionsError|BadTitleError|HttpError
173 * @return void
174 */
175 private function performRequest() {
176 global $wgServer, $wgUsePathInfo, $wgTitle;
177
178 wfProfileIn( __METHOD__ );
179
180 $request = $this->context->getRequest();
181 $requestTitle = $title = $this->context->getTitle();
182 $output = $this->context->getOutput();
183 $user = $this->context->getUser();
184
185 if ( $request->getVal( 'printable' ) === 'yes' ) {
186 $output->setPrintable();
187 }
188
189 $unused = null; // To pass it by reference
190 wfRunHooks( 'BeforeInitialize', array( &$title, &$unused, &$output, &$user, $request, $this ) );
191
192 // Invalid titles. Bug 21776: The interwikis must redirect even if the page name is empty.
193 if ( is_null( $title ) || ( $title->getDBkey() == '' && $title->getInterwiki() == '' ) ||
194 $title->isSpecial( 'Badtitle' ) )
195 {
196 $this->context->setTitle( SpecialPage::getTitleFor( 'Badtitle' ) );
197 wfProfileOut( __METHOD__ );
198 throw new BadTitleError();
199 }
200
201 // Check user's permissions to read this page.
202 // We have to check here to catch special pages etc.
203 // We will check again in Article::view().
204 $permErrors = $title->getUserPermissionsErrors( 'read', $user );
205 if ( count( $permErrors ) ) {
206 // Bug 32276: allowing the skin to generate output with $wgTitle or
207 // $this->context->title set to the input title would allow anonymous users to
208 // determine whether a page exists, potentially leaking private data. In fact, the
209 // curid and oldid request parameters would allow page titles to be enumerated even
210 // when they are not guessable. So we reset the title to Special:Badtitle before the
211 // permissions error is displayed.
212 //
213 // The skin mostly uses $this->context->getTitle() these days, but some extensions
214 // still use $wgTitle.
215
216 $badTitle = SpecialPage::getTitleFor( 'Badtitle' );
217 $this->context->setTitle( $badTitle );
218 $wgTitle = $badTitle;
219
220 wfProfileOut( __METHOD__ );
221 throw new PermissionsError( 'read', $permErrors );
222 }
223
224 $pageView = false; // was an article or special page viewed?
225
226 // Interwiki redirects
227 if ( $title->getInterwiki() != '' ) {
228 $rdfrom = $request->getVal( 'rdfrom' );
229 if ( $rdfrom ) {
230 $url = $title->getFullURL( array( 'rdfrom' => $rdfrom ) );
231 } else {
232 $query = $request->getValues();
233 unset( $query['title'] );
234 $url = $title->getFullURL( $query );
235 }
236 // Check for a redirect loop
237 if ( !preg_match( '/^' . preg_quote( $wgServer, '/' ) . '/', $url )
238 && $title->isLocal() )
239 {
240 // 301 so google et al report the target as the actual url.
241 $output->redirect( $url, 301 );
242 } else {
243 $this->context->setTitle( SpecialPage::getTitleFor( 'Badtitle' ) );
244 wfProfileOut( __METHOD__ );
245 throw new BadTitleError();
246 }
247 // Redirect loops, no title in URL, $wgUsePathInfo URLs, and URLs with a variant
248 } elseif ( $request->getVal( 'action', 'view' ) == 'view' && !$request->wasPosted()
249 && ( $request->getVal( 'title' ) === null ||
250 $title->getPrefixedDBkey() != $request->getVal( 'title' ) )
251 && !count( $request->getValueNames( array( 'action', 'title' ) ) )
252 && wfRunHooks( 'TestCanonicalRedirect', array( $request, $title, $output ) ) )
253 {
254 if ( $title->isSpecialPage() ) {
255 list( $name, $subpage ) = SpecialPageFactory::resolveAlias( $title->getDBkey() );
256 if ( $name ) {
257 $title = SpecialPage::getTitleFor( $name, $subpage );
258 }
259 }
260 $targetUrl = wfExpandUrl( $title->getFullURL(), PROTO_CURRENT );
261 // Redirect to canonical url, make it a 301 to allow caching
262 if ( $targetUrl == $request->getFullRequestURL() ) {
263 $message = "Redirect loop detected!\n\n" .
264 "This means the wiki got confused about what page was " .
265 "requested; this sometimes happens when moving a wiki " .
266 "to a new server or changing the server configuration.\n\n";
267
268 if ( $wgUsePathInfo ) {
269 $message .= "The wiki is trying to interpret the page " .
270 "title from the URL path portion (PATH_INFO), which " .
271 "sometimes fails depending on the web server. Try " .
272 "setting \"\$wgUsePathInfo = false;\" in your " .
273 "LocalSettings.php, or check that \$wgArticlePath " .
274 "is correct.";
275 } else {
276 $message .= "Your web server was detected as possibly not " .
277 "supporting URL path components (PATH_INFO) correctly; " .
278 "check your LocalSettings.php for a customized " .
279 "\$wgArticlePath setting and/or toggle \$wgUsePathInfo " .
280 "to true.";
281 }
282 throw new HttpError( 500, $message );
283 } else {
284 $output->setSquidMaxage( 1200 );
285 $output->redirect( $targetUrl, '301' );
286 }
287 // Special pages
288 } elseif ( NS_SPECIAL == $title->getNamespace() ) {
289 $pageView = true;
290 // Actions that need to be made when we have a special pages
291 SpecialPageFactory::executePath( $title, $this->context );
292 } else {
293 // ...otherwise treat it as an article view. The article
294 // may be a redirect to another article or URL.
295 $article = $this->initializeArticle();
296 if ( is_object( $article ) ) {
297 $pageView = true;
298 /**
299 * $wgArticle is deprecated, do not use it.
300 * @deprecated since 1.18
301 */
302 global $wgArticle;
303 $wgArticle = new DeprecatedGlobal( 'wgArticle', $article, '1.18' );
304
305 $this->performAction( $article, $requestTitle );
306 } elseif ( is_string( $article ) ) {
307 $output->redirect( $article );
308 } else {
309 wfProfileOut( __METHOD__ );
310 throw new MWException( "Shouldn't happen: MediaWiki::initializeArticle()"
311 . " returned neither an object nor a URL" );
312 }
313 }
314
315 if ( $pageView ) {
316 // Promote user to any groups they meet the criteria for
317 $user->addAutopromoteOnceGroups( 'onView' );
318 }
319
320 wfProfileOut( __METHOD__ );
321 }
322
323 /**
324 * Initialize the main Article object for "standard" actions (view, etc)
325 * Create an Article object for the page, following redirects if needed.
326 *
327 * @return mixed an Article, or a string to redirect to another URL
328 */
329 private function initializeArticle() {
330 global $wgDisableHardRedirects;
331
332 wfProfileIn( __METHOD__ );
333
334 $title = $this->context->getTitle();
335 if ( $this->context->canUseWikiPage() ) {
336 // Try to use request context wiki page, as there
337 // is already data from db saved in per process
338 // cache there from this->getAction() call.
339 $page = $this->context->getWikiPage();
340 $article = Article::newFromWikiPage( $page, $this->context );
341 } else {
342 // This case should not happen, but just in case.
343 $article = Article::newFromTitle( $title, $this->context );
344 $this->context->setWikiPage( $article->getPage() );
345 }
346
347 // NS_MEDIAWIKI has no redirects.
348 // It is also used for CSS/JS, so performance matters here...
349 if ( $title->getNamespace() == NS_MEDIAWIKI ) {
350 wfProfileOut( __METHOD__ );
351 return $article;
352 }
353
354 $request = $this->context->getRequest();
355
356 // Namespace might change when using redirects
357 // Check for redirects ...
358 $action = $request->getVal( 'action', 'view' );
359 $file = ( $title->getNamespace() == NS_FILE ) ? $article->getFile() : null;
360 if ( ( $action == 'view' || $action == 'render' ) // ... for actions that show content
361 && !$request->getVal( 'oldid' ) && // ... and are not old revisions
362 !$request->getVal( 'diff' ) && // ... and not when showing diff
363 $request->getVal( 'redirect' ) != 'no' && // ... unless explicitly told not to
364 // ... and the article is not a non-redirect image page with associated file
365 !( is_object( $file ) && $file->exists() && !$file->getRedirected() ) )
366 {
367 // Give extensions a change to ignore/handle redirects as needed
368 $ignoreRedirect = $target = false;
369
370 wfRunHooks( 'InitializeArticleMaybeRedirect',
371 array( &$title, &$request, &$ignoreRedirect, &$target, &$article ) );
372
373 // Follow redirects only for... redirects.
374 // If $target is set, then a hook wanted to redirect.
375 if ( !$ignoreRedirect && ( $target || $article->isRedirect() ) ) {
376 // Is the target already set by an extension?
377 $target = $target ? $target : $article->followRedirect();
378 if ( is_string( $target ) ) {
379 if ( !$wgDisableHardRedirects ) {
380 // we'll need to redirect
381 wfProfileOut( __METHOD__ );
382 return $target;
383 }
384 }
385 if ( is_object( $target ) ) {
386 // Rewrite environment to redirected article
387 $rarticle = Article::newFromTitle( $target, $this->context );
388 $rarticle->loadPageData();
389 if ( $rarticle->exists() || ( is_object( $file ) && !$file->isLocal() ) ) {
390 $rarticle->setRedirectedFrom( $title );
391 $article = $rarticle;
392 $this->context->setTitle( $target );
393 $this->context->setWikiPage( $article->getPage() );
394 }
395 }
396 } else {
397 $this->context->setTitle( $article->getTitle() );
398 $this->context->setWikiPage( $article->getPage() );
399 }
400 }
401
402 wfProfileOut( __METHOD__ );
403 return $article;
404 }
405
406 /**
407 * Perform one of the "standard" actions
408 *
409 * @param $page Page
410 * @param $requestTitle The original title, before any redirects were applied
411 */
412 private function performAction( Page $page, Title $requestTitle ) {
413 global $wgUseSquid, $wgSquidMaxage;
414
415 wfProfileIn( __METHOD__ );
416
417 $request = $this->context->getRequest();
418 $output = $this->context->getOutput();
419 $title = $this->context->getTitle();
420 $user = $this->context->getUser();
421
422 if ( !wfRunHooks( 'MediaWikiPerformAction',
423 array( $output, $page, $title, $user, $request, $this ) ) )
424 {
425 wfProfileOut( __METHOD__ );
426 return;
427 }
428
429 $act = $this->getAction();
430
431 $action = Action::factory( $act, $page, $this->context );
432
433 if ( $action instanceof Action ) {
434 # Let Squid cache things if we can purge them.
435 if ( $wgUseSquid &&
436 in_array( $request->getFullRequestURL(), $requestTitle->getSquidURLs() )
437 ) {
438 $output->setSquidMaxage( $wgSquidMaxage );
439 }
440
441 $action->show();
442 wfProfileOut( __METHOD__ );
443 return;
444 }
445
446 if ( wfRunHooks( 'UnknownAction', array( $request->getVal( 'action', 'view' ), $page ) ) ) {
447 $output->showErrorPage( 'nosuchaction', 'nosuchactiontext' );
448 }
449
450 wfProfileOut( __METHOD__ );
451 }
452
453 /**
454 * Run the current MediaWiki instance
455 * index.php just calls this
456 */
457 public function run() {
458 try {
459 $this->checkMaxLag();
460 $this->main();
461 $this->restInPeace();
462 } catch ( Exception $e ) {
463 MWExceptionHandler::handle( $e );
464 }
465 }
466
467 /**
468 * Checks if the request should abort due to a lagged server,
469 * for given maxlag parameter.
470 * @return bool
471 */
472 private function checkMaxLag() {
473 global $wgShowHostnames;
474
475 wfProfileIn( __METHOD__ );
476 $maxLag = $this->context->getRequest()->getVal( 'maxlag' );
477 if ( !is_null( $maxLag ) ) {
478 list( $host, $lag ) = wfGetLB()->getMaxLag();
479 if ( $lag > $maxLag ) {
480 $resp = $this->context->getRequest()->response();
481 $resp->header( 'HTTP/1.1 503 Service Unavailable' );
482 $resp->header( 'Retry-After: ' . max( intval( $maxLag ), 5 ) );
483 $resp->header( 'X-Database-Lag: ' . intval( $lag ) );
484 $resp->header( 'Content-Type: text/plain' );
485 if ( $wgShowHostnames ) {
486 echo "Waiting for $host: $lag seconds lagged\n";
487 } else {
488 echo "Waiting for a database server: $lag seconds lagged\n";
489 }
490
491 wfProfileOut( __METHOD__ );
492
493 exit;
494 }
495 }
496 wfProfileOut( __METHOD__ );
497 return true;
498 }
499
500 private function main() {
501 global $wgUseFileCache, $wgTitle, $wgUseAjax;
502
503 wfProfileIn( __METHOD__ );
504
505 $request = $this->context->getRequest();
506
507 // If the user has forceHTTPS set to true, or if the user
508 // is in a group requiring HTTPS, or if they have the HTTPS
509 // preference set, redirect them to HTTPS.
510 if (
511 (
512 $request->getCookie( 'forceHTTPS', '' ) ||
513 // check for prefixed version for currently logged in users
514 $request->getCookie( 'forceHTTPS' ) ||
515 // Avoid checking the user and groups unless it's enabled.
516 (
517 $this->context->getUser()->isLoggedIn()
518 && $this->context->getUser()->requiresHTTPS()
519 )
520 ) &&
521 $request->detectProtocol() == 'http'
522 ) {
523 $oldUrl = $request->getFullRequestURL();
524 $redirUrl = str_replace( 'http://', 'https://', $oldUrl );
525
526 if ( $request->wasPosted() ) {
527 // This is weird and we'd hope it almost never happens. This
528 // means that a POST came in via HTTP and policy requires us
529 // redirecting to HTTPS. It's likely such a request is going
530 // to fail due to post data being lost, but let's try anyway
531 // and just log the instance.
532 //
533 // @todo @fixme See if we could issue a 307 or 308 here, need
534 // to see how clients (automated & browser) behave when we do
535 wfDebugLog( 'RedirectedPosts', "Redirected from HTTP to HTTPS: $oldUrl" );
536 }
537
538 // Setup dummy Title, otherwise OutputPage::redirect will fail
539 $title = Title::newFromText( NS_MAIN, 'REDIR' );
540 $this->context->setTitle( $title );
541 $output = $this->context->getOutput();
542 $output->redirect( $redirUrl );
543 $output->output();
544 wfProfileOut( __METHOD__ );
545 return;
546 }
547
548 // Send Ajax requests to the Ajax dispatcher.
549 if ( $wgUseAjax && $request->getVal( 'action', 'view' ) == 'ajax' ) {
550
551 // Set a dummy title, because $wgTitle == null might break things
552 $title = Title::makeTitle( NS_MAIN, 'AJAX' );
553 $this->context->setTitle( $title );
554 $wgTitle = $title;
555
556 $dispatcher = new AjaxDispatcher();
557 $dispatcher->performAction();
558 wfProfileOut( __METHOD__ );
559 return;
560 }
561
562 // Get title from request parameters,
563 // is set on the fly by parseTitle the first time.
564 $title = $this->getTitle();
565 $action = $this->getAction();
566 $wgTitle = $title;
567
568 if ( $wgUseFileCache && $title->getNamespace() >= 0 ) {
569 wfProfileIn( 'main-try-filecache' );
570 if ( HTMLFileCache::useFileCache( $this->context ) ) {
571 // Try low-level file cache hit
572 $cache = HTMLFileCache::newFromTitle( $title, $action );
573 if ( $cache->isCacheGood( /* Assume up to date */ ) ) {
574 // Check incoming headers to see if client has this cached
575 $timestamp = $cache->cacheTimestamp();
576 if ( !$this->context->getOutput()->checkLastModified( $timestamp ) ) {
577 $cache->loadFromFileCache( $this->context );
578 }
579 // Do any stats increment/watchlist stuff
580 $this->context->getWikiPage()->doViewUpdates( $this->context->getUser() );
581 // Tell OutputPage that output is taken care of
582 $this->context->getOutput()->disable();
583 wfProfileOut( 'main-try-filecache' );
584 wfProfileOut( __METHOD__ );
585 return;
586 }
587 }
588 wfProfileOut( 'main-try-filecache' );
589 }
590
591 $this->performRequest();
592
593 // Now commit any transactions, so that unreported errors after
594 // output() don't roll back the whole DB transaction
595 wfGetLBFactory()->commitMasterChanges();
596
597 // Output everything!
598 $this->context->getOutput()->output();
599
600 wfProfileOut( __METHOD__ );
601 }
602
603 /**
604 * Ends this task peacefully
605 */
606 public function restInPeace() {
607 // Do any deferred jobs
608 DeferredUpdates::doUpdates( 'commit' );
609
610 // Execute a job from the queue
611 $this->doJobs();
612
613 // Log profiling data, e.g. in the database or UDP
614 wfLogProfilingData();
615
616 // Commit and close up!
617 $factory = wfGetLBFactory();
618 $factory->commitMasterChanges();
619 $factory->shutdown();
620
621 wfDebug( "Request ended normally\n" );
622 }
623
624 /**
625 * Do a job from the job queue
626 */
627 private function doJobs() {
628 global $wgJobRunRate, $wgPhpCli, $IP;
629
630 if ( $wgJobRunRate <= 0 || wfReadOnly() ) {
631 return;
632 }
633
634 if ( $wgJobRunRate < 1 ) {
635 $max = mt_getrandmax();
636 if ( mt_rand( 0, $max ) > $max * $wgJobRunRate ) {
637 return; // the higher $wgJobRunRate, the less likely we return here
638 }
639 $n = 1;
640 } else {
641 $n = intval( $wgJobRunRate );
642 }
643
644 if ( !wfShellExecDisabled() && is_executable( $wgPhpCli ) ) {
645 // Start a background process to run some of the jobs.
646 // This will be asynchronous on *nix though not on Windows.
647 wfProfileIn( __METHOD__ . '-exec' );
648 $retVal = 1;
649 $cmd = wfShellWikiCmd( "$IP/maintenance/runJobs.php", array( '--maxjobs', $n ) );
650 wfShellExec( "$cmd &", $retVal );
651 wfProfileOut( __METHOD__ . '-exec' );
652 } else {
653 try {
654 // Fallback to running the jobs here while the user waits
655 $group = JobQueueGroup::singleton();
656 do {
657 $job = $group->pop( JobQueueGroup::USE_CACHE ); // job from any queue
658 if ( $job ) {
659 $output = $job->toString() . "\n";
660 $t = - microtime( true );
661 wfProfileIn( __METHOD__ . '-' . get_class( $job ) );
662 $success = $job->run();
663 wfProfileOut( __METHOD__ . '-' . get_class( $job ) );
664 $group->ack( $job ); // done
665 $t += microtime( true );
666 $t = round( $t * 1000 );
667 if ( $success === false ) {
668 $output .= "Error: " . $job->getLastError() . ", Time: $t ms\n";
669 } else {
670 $output .= "Success, Time: $t ms\n";
671 }
672 wfDebugLog( 'jobqueue', $output );
673 }
674 } while ( --$n && $job );
675 } catch ( MWException $e ) {
676 // We don't want exceptions thrown during job execution to
677 // be reported to the user since the output is already sent.
678 // Instead we just log them.
679 wfDebugLog( 'exception', $e->getLogMessage() );
680 }
681 }
682 }
683 }