* Move image page redirect checking to ImagePage. Should now also work on foreign...
[lhc/web/wiklou.git] / includes / Wiki.php
1 <?php
2 /**
3 * MediaWiki is the to-be base class for this whole project
4 */
5 class MediaWiki {
6
7 var $GET; /* Stores the $_GET variables at time of creation, can be changed */
8 var $params = array();
9
10 /** Constructor. It just save the $_GET variable */
11 function __construct() {
12 $this->GET = $_GET;
13 }
14
15 /**
16 * Stores key/value pairs to circumvent global variables
17 * Note that keys are case-insensitive!
18 *
19 * @param String $key key to store
20 * @param mixed $value value to put for the key
21 */
22 function setVal( $key, &$value ) {
23 $key = strtolower( $key );
24 $this->params[$key] =& $value;
25 }
26
27 /**
28 * Retrieves key/value pairs to circumvent global variables
29 * Note that keys are case-insensitive!
30 *
31 * @param String $key key to get
32 * @param mixed $default default value if if the key doesn't exist
33 */
34 function getVal( $key, $default = '' ) {
35 $key = strtolower( $key );
36 if( isset( $this->params[$key] ) ) {
37 return $this->params[$key];
38 }
39 return $default;
40 }
41
42 /**
43 * Initialization of ... everything
44 * Performs the request too
45 *
46 * @param Title $title
47 * @param Article $article
48 * @param OutputPage $output
49 * @param User $user
50 * @param WebRequest $request
51 */
52 function initialize( &$title, &$article, &$output, &$user, $request ) {
53 wfProfileIn( __METHOD__ );
54 $this->preliminaryChecks( $title, $output, $request ) ;
55 if ( !$this->initializeSpecialCases( $title, $output, $request ) ) {
56 $new_article = $this->initializeArticle( $title, $request );
57 if( is_object( $new_article ) ) {
58 $article = $new_article;
59 $this->performAction( $output, $article, $title, $user, $request );
60 } elseif( is_string( $new_article ) ) {
61 $output->redirect( $new_article );
62 } else {
63 throw new MWException( "Shouldn't happen: MediaWiki::initializeArticle() returned neither an object nor a URL" );
64 }
65 }
66 wfProfileOut( __METHOD__ );
67 }
68
69 /**
70 * Check if the maximum lag of database slaves is higher that $maxLag, and
71 * if it's the case, output an error message
72 *
73 * @param int $maxLag maximum lag allowed for the request, as supplied by
74 * the client
75 * @return bool true if the request can continue
76 */
77 function checkMaxLag( $maxLag ) {
78 list( $host, $lag ) = wfGetLB()->getMaxLag();
79 if ( $lag > $maxLag ) {
80 wfMaxlagError( $host, $lag, $maxLag );
81 return false;
82 } else {
83 return true;
84 }
85 }
86
87
88 /**
89 * Checks some initial queries
90 * Note that $title here is *not* a Title object, but a string!
91 *
92 * @param String $title
93 * @param String $action
94 * @return Title object to be $wgTitle
95 */
96 function checkInitialQueries( $title, $action ) {
97 global $wgOut, $wgRequest, $wgContLang;
98 if( $wgRequest->getVal( 'printable' ) == 'yes' ){
99 $wgOut->setPrintable();
100 }
101
102 $ret = NULL;
103
104 if ( '' == $title && 'delete' != $action ) {
105 $ret = Title::newMainPage();
106 } elseif ( $curid = $wgRequest->getInt( 'curid' ) ) {
107 # URLs like this are generated by RC, because rc_title isn't always accurate
108 $ret = Title::newFromID( $curid );
109 } else {
110 $ret = Title::newFromURL( $title );
111 // check variant links so that interwiki links don't have to worry
112 // about the possible different language variants
113 if( count( $wgContLang->getVariants() ) > 1 && !is_null( $ret ) && $ret->getArticleID() == 0 )
114 $wgContLang->findVariantLink( $title, $ret );
115
116 }
117 if ( ( $oldid = $wgRequest->getInt( 'oldid' ) )
118 && ( is_null( $ret ) || $ret->getNamespace() != NS_SPECIAL ) ) {
119 // Allow oldid to override a changed or missing title.
120 $rev = Revision::newFromId( $oldid );
121 if( $rev ) {
122 $ret = $rev->getTitle();
123 }
124 }
125 return $ret;
126 }
127
128 /**
129 * Checks for search query and anon-cannot-read case
130 *
131 * @param Title $title
132 * @param OutputPage $output
133 * @param WebRequest $request
134 */
135 function preliminaryChecks( &$title, &$output, $request ) {
136
137 if( $request->getCheck( 'search' ) ) {
138 // Compatibility with old search URLs which didn't use Special:Search
139 // Just check for presence here, so blank requests still
140 // show the search page when using ugly URLs (bug 8054).
141
142 // Do this above the read whitelist check for security...
143 $title = SpecialPage::getTitleFor( 'Search' );
144 }
145
146 # If the user is not logged in, the Namespace:title of the article must be in
147 # the Read array in order for the user to see it. (We have to check here to
148 # catch special pages etc. We check again in Article::view())
149 if ( !is_null( $title ) && !$title->userCanRead() ) {
150 $output->loginToUse();
151 $output->output();
152 exit;
153 }
154
155 }
156
157 /**
158 * Initialize some special cases:
159 * - bad titles
160 * - local interwiki redirects
161 * - redirect loop
162 * - special pages
163 *
164 * @param Title $title
165 * @param OutputPage $output
166 * @param WebRequest $request
167 * @return bool true if the request is already executed
168 */
169 function initializeSpecialCases( &$title, &$output, $request ) {
170 wfProfileIn( __METHOD__ );
171
172 $action = $this->getVal( 'Action' );
173 if( !$title || $title->getDBkey() == '' ) {
174 $title = SpecialPage::getTitleFor( 'Badtitle' );
175 # Die now before we mess up $wgArticle and the skin stops working
176 throw new ErrorPageError( 'badtitle', 'badtitletext' );
177 } else if ( $title->getInterwiki() != '' ) {
178 if( $rdfrom = $request->getVal( 'rdfrom' ) ) {
179 $url = $title->getFullURL( 'rdfrom=' . urlencode( $rdfrom ) );
180 } else {
181 $url = $title->getFullURL();
182 }
183 /* Check for a redirect loop */
184 if ( !preg_match( '/^' . preg_quote( $this->getVal('Server'), '/' ) . '/', $url ) && $title->isLocal() ) {
185 $output->redirect( $url );
186 } else {
187 $title = SpecialPage::getTitleFor( 'Badtitle' );
188 throw new ErrorPageError( 'badtitle', 'badtitletext' );
189 }
190 } else if ( ( $action == 'view' ) && !$request->wasPosted() &&
191 (!isset( $this->GET['title'] ) || $title->getPrefixedDBKey() != $this->GET['title'] ) &&
192 !count( array_diff( array_keys( $this->GET ), array( 'action', 'title' ) ) ) )
193 {
194 $targetUrl = $title->getFullURL();
195 // Redirect to canonical url, make it a 301 to allow caching
196 if( $targetUrl == $request->getFullRequestURL() ) {
197 $message = "Redirect loop detected!\n\n" .
198 "This means the wiki got confused about what page was " .
199 "requested; this sometimes happens when moving a wiki " .
200 "to a new server or changing the server configuration.\n\n";
201
202 if( $this->getVal( 'UsePathInfo' ) ) {
203 $message .= "The wiki is trying to interpret the page " .
204 "title from the URL path portion (PATH_INFO), which " .
205 "sometimes fails depending on the web server. Try " .
206 "setting \"\$wgUsePathInfo = false;\" in your " .
207 "LocalSettings.php, or check that \$wgArticlePath " .
208 "is correct.";
209 } else {
210 $message .= "Your web server was detected as possibly not " .
211 "supporting URL path components (PATH_INFO) correctly; " .
212 "check your LocalSettings.php for a customized " .
213 "\$wgArticlePath setting and/or toggle \$wgUsePathInfo " .
214 "to true.";
215 }
216 wfHttpError( 500, "Internal error", $message );
217 return false;
218 } else {
219 $output->setSquidMaxage( 1200 );
220 $output->redirect( $targetUrl, '301' );
221 }
222 } else if ( NS_SPECIAL == $title->getNamespace() ) {
223 /* actions that need to be made when we have a special pages */
224 SpecialPage::executePath( $title );
225 } else {
226 /* No match to special cases */
227 wfProfileOut( __METHOD__ );
228 return false;
229 }
230 /* Did match a special case */
231 wfProfileOut( __METHOD__ );
232 return true;
233 }
234
235 /**
236 * Create an Article object of the appropriate class for the given page.
237 *
238 * @param Title $title
239 * @return Article object
240 */
241 static function articleFromTitle( &$title ) {
242 if( NS_MEDIA == $title->getNamespace() ) {
243 // FIXME: where should this go?
244 $title = Title::makeTitle( NS_IMAGE, $title->getDBkey() );
245 }
246
247 $article = null;
248 wfRunHooks( 'ArticleFromTitle', array( &$title, &$article ) );
249 if( $article ) {
250 return $article;
251 }
252
253 switch( $title->getNamespace() ) {
254 case NS_IMAGE:
255 return new ImagePage( $title );
256 case NS_CATEGORY:
257 return new CategoryPage( $title );
258 default:
259 return new Article( $title );
260 }
261 }
262
263 /**
264 * Initialize the object to be known as $wgArticle for "standard" actions
265 * Create an Article object for the page, following redirects if needed.
266 *
267 * @param Title $title
268 * @param Request $request
269 * @return mixed an Article, or a string to redirect to another URL
270 */
271 function initializeArticle( &$title, $request ) {
272 wfProfileIn( __METHOD__ );
273
274 $action = $this->getVal( 'action' );
275 $article = self::articleFromTitle( $title );
276
277 wfDebug("Article: ".$title->getPrefixedText()."\n");
278
279 // Namespace might change when using redirects
280 // Check for redirects ...
281 if( ( $action == 'view' || $action == 'render' ) // ... for actions that show content
282 && !$request->getVal( 'oldid' ) && // ... and are not old revisions
283 $request->getVal( 'redirect' ) != 'no' && // ... unless explicitly told not to
284 // ... and the article is not an image page with associated file
285 !( $title->getNamespace() == NS_IMAGE && wfFindFile( $title->getText(), false,
286 FileRepo::FIND_IGNORE_REDIRECT ) ) ) { // ... unless it is really an image redirect
287
288 $dbr = wfGetDB( DB_SLAVE );
289 $article->loadPageData( $article->pageDataFromTitle( $dbr, $title ) );
290
291 // Follow redirects only for... redirects
292 if( $article->mIsRedirect ) {
293 $target = $article->followRedirect();
294 if( is_string( $target ) ) {
295 if( !$this->getVal( 'DisableHardRedirects' ) ) {
296 // we'll need to redirect
297 return $target;
298 }
299 }
300 if( is_object( $target ) ) {
301 // Rewrite environment to redirected article
302 $rarticle = self::articleFromTitle( $target );
303 $rarticle->loadPageData( $rarticle->pageDataFromTitle( $dbr, $target ) );
304 if ( $rarticle->mTitle->exists() ) {
305 $rarticle->setRedirectedFrom( $title );
306 $article = $rarticle;
307 $title = $target;
308 }
309 }
310 } else {
311 $title = $article->mTitle;
312 }
313 }
314 wfProfileOut( __METHOD__ );
315 return $article;
316 }
317
318 /**
319 * Cleaning up by doing deferred updates, calling LBFactory and doing the output
320 *
321 * @param Array $deferredUpdates array of updates to do
322 * @param OutputPage $output
323 */
324 function finalCleanup ( &$deferredUpdates, &$output ) {
325 wfProfileIn( __METHOD__ );
326 $this->doUpdates( $deferredUpdates );
327 $this->doJobs();
328 # Now commit any transactions, so that unreported errors after output() don't roll back the whole thing
329 $factory = wfGetLBFactory();
330 $factory->shutdown();
331 $output->output();
332 wfProfileOut( __METHOD__ );
333 }
334
335 /**
336 * Deferred updates aren't really deferred anymore. It's important to report
337 * errors to the user, and that means doing this before OutputPage::output().
338 * Note that for page saves, the client will wait until the script exits
339 * anyway before following the redirect.
340 *
341 * @param Array $updates array of objects that hold an update to do
342 */
343 function doUpdates( &$updates ) {
344 wfProfileIn( __METHOD__ );
345 /* No need to get master connections in case of empty updates array */
346 if (!$updates) {
347 wfProfileOut( __METHOD__ );
348 return;
349 }
350
351 $dbw = wfGetDB( DB_MASTER );
352 foreach( $updates as $up ) {
353 $up->doUpdate();
354
355 # Commit after every update to prevent lock contention
356 if ( $dbw->trxLevel() ) {
357 $dbw->commit();
358 }
359 }
360 wfProfileOut( __METHOD__ );
361 }
362
363 /**
364 * Do a job from the job queue
365 */
366 function doJobs() {
367 $jobRunRate = $this->getVal( 'JobRunRate' );
368
369 if ( $jobRunRate <= 0 || wfReadOnly() ) {
370 return;
371 }
372 if ( $jobRunRate < 1 ) {
373 $max = mt_getrandmax();
374 if ( mt_rand( 0, $max ) > $max * $jobRunRate ) {
375 return;
376 }
377 $n = 1;
378 } else {
379 $n = intval( $jobRunRate );
380 }
381
382 while ( $n-- && false != ( $job = Job::pop() ) ) {
383 $output = $job->toString() . "\n";
384 $t = -wfTime();
385 $success = $job->run();
386 $t += wfTime();
387 $t = round( $t*1000 );
388 if ( !$success ) {
389 $output .= "Error: " . $job->getLastError() . ", Time: $t ms\n";
390 } else {
391 $output .= "Success, Time: $t ms\n";
392 }
393 wfDebugLog( 'jobqueue', $output );
394 }
395 }
396
397 /**
398 * Ends this task peacefully
399 */
400 function restInPeace() {
401 wfLogProfilingData();
402 wfDebug( "Request ended normally\n" );
403 }
404
405 /**
406 * Perform one of the "standard" actions
407 *
408 * @param OutputPage $output
409 * @param Article $article
410 * @param Title $title
411 * @param User $user
412 * @param WebRequest $request
413 */
414 function performAction( &$output, &$article, &$title, &$user, &$request ) {
415 wfProfileIn( __METHOD__ );
416
417 if ( !wfRunHooks( 'MediaWikiPerformAction', array( $output, $article, $title, $user, $request ) ) ) {
418 wfProfileOut( __METHOD__ );
419 return;
420 }
421
422 $action = $this->getVal( 'Action' );
423 if( in_array( $action, $this->getVal( 'DisabledActions', array() ) ) ) {
424 /* No such action; this will switch to the default case */
425 $action = 'nosuchaction';
426 }
427
428 switch( $action ) {
429 case 'view':
430 $output->setSquidMaxage( $this->getVal( 'SquidMaxage' ) );
431 $article->view();
432 break;
433 case 'watch':
434 case 'unwatch':
435 case 'delete':
436 case 'revert':
437 case 'rollback':
438 case 'protect':
439 case 'unprotect':
440 case 'info':
441 case 'markpatrolled':
442 case 'render':
443 case 'deletetrackback':
444 case 'purge':
445 $article->$action();
446 break;
447 case 'print':
448 $article->view();
449 break;
450 case 'dublincore':
451 if( !$this->getVal( 'EnableDublinCoreRdf' ) ) {
452 wfHttpError( 403, 'Forbidden', wfMsg( 'nodublincore' ) );
453 } else {
454 require_once( 'includes/Metadata.php' );
455 wfDublinCoreRdf( $article );
456 }
457 break;
458 case 'creativecommons':
459 if( !$this->getVal( 'EnableCreativeCommonsRdf' ) ) {
460 wfHttpError( 403, 'Forbidden', wfMsg( 'nocreativecommons' ) );
461 } else {
462 require_once( 'includes/Metadata.php' );
463 wfCreativeCommonsRdf( $article );
464 }
465 break;
466 case 'credits':
467 require_once( 'includes/Credits.php' );
468 showCreditsPage( $article );
469 break;
470 case 'submit':
471 if( session_id() == '' ) {
472 /* Send a cookie so anons get talk message notifications */
473 wfSetupSession();
474 }
475 /* Continue... */
476 case 'edit':
477 case 'editredlink':
478 if( wfRunHooks( 'CustomEditor', array( $article, $user ) ) ) {
479 $internal = $request->getVal( 'internaledit' );
480 $external = $request->getVal( 'externaledit' );
481 $section = $request->getVal( 'section' );
482 $oldid = $request->getVal( 'oldid' );
483 if( !$this->getVal( 'UseExternalEditor' ) || $action=='submit' || $internal ||
484 $section || $oldid || ( !$user->getOption( 'externaleditor' ) && !$external ) ) {
485 $editor = new EditPage( $article );
486 $editor->submit();
487 } elseif( $this->getVal( 'UseExternalEditor' ) && ( $external || $user->getOption( 'externaleditor' ) ) ) {
488 $mode = $request->getVal( 'mode' );
489 $extedit = new ExternalEdit( $article, $mode );
490 $extedit->edit();
491 }
492 }
493 break;
494 case 'history':
495 if( $request->getFullRequestURL() == $title->getInternalURL( 'action=history' ) ) {
496 $output->setSquidMaxage( $this->getVal( 'SquidMaxage' ) );
497 }
498 $history = new PageHistory( $article );
499 $history->history();
500 break;
501 case 'raw':
502 $raw = new RawPage( $article );
503 $raw->view();
504 break;
505 default:
506 if( wfRunHooks( 'UnknownAction', array( $action, $article ) ) ) {
507 $output->showErrorPage( 'nosuchaction', 'nosuchactiontext' );
508 }
509 }
510 wfProfileOut( __METHOD__ );
511
512 }
513
514 }; /* End of class MediaWiki */