This commit implements Josh Cogliati's "info" feature (e.g.
[lhc/web/wiklou.git] / includes / OutputPage.php
1 <?php
2 # See design.doc
3
4 if($wgUseTeX) require_once( "Math.php" );
5
6 class OutputPage {
7 var $mHeaders, $mCookies, $mMetatags, $mKeywords;
8 var $mLinktags, $mPagetitle, $mBodytext, $mDebugtext;
9 var $mHTMLtitle, $mRobotpolicy, $mIsarticle, $mPrintable;
10 var $mSubtitle, $mRedirect;
11 var $mLastModified, $mCategoryLinks;
12 var $mScripts;
13
14 var $mSuppressQuickbar;
15 var $mOnloadHandler;
16 var $mDoNothing;
17 var $mContainsOldMagic, $mContainsNewMagic;
18 var $mIsArticleRelated;
19 var $mParserOptions;
20 var $mShowFeedLinks = false;
21 var $mEnableClientCache = true;
22
23 function OutputPage()
24 {
25 $this->mHeaders = $this->mCookies = $this->mMetatags =
26 $this->mKeywords = $this->mLinktags = array();
27 $this->mHTMLtitle = $this->mPagetitle = $this->mBodytext =
28 $this->mRedirect = $this->mLastModified =
29 $this->mSubtitle = $this->mDebugtext = $this->mRobotpolicy =
30 $this->mOnloadHandler = "";
31 $this->mIsArticleRelated = $this->mIsarticle = $this->mPrintable = true;
32 $this->mSuppressQuickbar = $this->mPrintable = false;
33 $this->mLanguageLinks = array();
34 $this->mCategoryLinks = array() ;
35 $this->mDoNothing = false;
36 $this->mContainsOldMagic = $this->mContainsNewMagic = 0;
37 $this->mParserOptions = ParserOptions::newFromUser( $temp = NULL );
38 $this->mSquidMaxage = 0;
39 $this->mScripts = "";
40 }
41
42 function addHeader( $name, $val ) { array_push( $this->mHeaders, "$name: $val" ) ; }
43 function addCookie( $name, $val ) { array_push( $this->mCookies, array( $name, $val ) ); }
44 function redirect( $url, $responsecode = '302' ) { $this->mRedirect = $url; $this->mRedirectCode = $responsecode; }
45
46 # To add an http-equiv meta tag, precede the name with "http:"
47 function addMeta( $name, $val ) { array_push( $this->mMetatags, array( $name, $val ) ); }
48 function addKeyword( $text ) { array_push( $this->mKeywords, $text ); }
49 function addScript( $script ) { $this->mScripts .= $script; }
50 function getScript() { return $this->mScripts; }
51
52 function addLink( $linkarr ) {
53 # $linkarr should be an associative array of attributes. We'll escape on output.
54 array_push( $this->mLinktags, $linkarr );
55 }
56
57 function addMetadataLink( $linkarr ) {
58 # note: buggy CC software only reads first "meta" link
59 static $haveMeta = false;
60 $linkarr["rel"] = ($haveMeta) ? "alternate meta" : "meta";
61 $this->addLink( $linkarr );
62 $haveMeta = true;
63 }
64
65 # checkLastModified tells the client to use the client-cached page if
66 # possible. If sucessful, the OutputPage is disabled so that
67 # any future call to OutputPage->output() have no effect. The method
68 # returns true iff cache-ok headers was sent.
69 function checkLastModified ( $timestamp )
70 {
71 global $wgLang, $wgCachePages, $wgUser;
72 if( !$wgCachePages ) {
73 wfDebug( "CACHE DISABLED\n", false );
74 return;
75 }
76 if( preg_match( '/MSIE ([1-4]|5\.0)/', $_SERVER["HTTP_USER_AGENT"] ) ) {
77 # IE 5.0 has probs with our caching
78 wfDebug( "-- bad client, not caching\n", false );
79 return;
80 }
81 if( $wgUser->getOption( "nocache" ) ) {
82 wfDebug( "USER DISABLED CACHE\n", false );
83 return;
84 }
85
86 $lastmod = gmdate( "D, j M Y H:i:s", wfTimestamp2Unix( max( $timestamp, $wgUser->mTouched ) ) ) . " GMT";
87
88 if( !empty( $_SERVER["HTTP_IF_MODIFIED_SINCE"] ) ) {
89 # IE sends sizes after the date like this:
90 # Wed, 20 Aug 2003 06:51:19 GMT; length=5202
91 # this breaks strtotime().
92 $modsince = preg_replace( '/;.*$/', '', $_SERVER["HTTP_IF_MODIFIED_SINCE"] );
93 $ismodsince = wfUnix2Timestamp( strtotime( $modsince ) );
94 wfDebug( "-- client send If-Modified-Since: " . $modsince . "\n", false );
95 wfDebug( "-- we might send Last-Modified : $lastmod\n", false );
96
97 if( ($ismodsince >= $timestamp ) and $wgUser->validateCache( $ismodsince ) ) {
98 # Make sure you're in a place you can leave when you call us!
99 header( "HTTP/1.0 304 Not Modified" );
100 $this->mLastModified = $lastmod;
101 $this->sendCacheControl();
102 wfDebug( "CACHED client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
103 $this->disable();
104 return true;
105 } else {
106 wfDebug( "READY client: $ismodsince ; user: $wgUser->mTouched ; page: $timestamp\n", false );
107 $this->mLastModified = $lastmod;
108 }
109 } else {
110 wfDebug( "We're confused.\n", false );
111 $this->mLastModified = $lastmod;
112 }
113 }
114
115 function getPageTitleActionText () {
116 global $action;
117 switch($action) {
118 case 'edit':
119 return wfMsg('edit');
120 case 'history':
121 return wfMsg('history_short');
122 case 'protect':
123 return wfMsg('protect');
124 case 'unprotect':
125 return wfMsg('unprotect');
126 case 'delete':
127 return wfMsg('delete');
128 case 'watch':
129 return wfMsg('watch');
130 case 'unwatch':
131 return wfMsg('unwatch');
132 case 'submit':
133 return wfMsg('preview');
134 case 'info':
135 return wfMsg('info_short');
136 default:
137 return '';
138 }
139 }
140 function setRobotpolicy( $str ) { $this->mRobotpolicy = $str; }
141 function setHTMLTitle( $name ) {$this->mHTMLtitle = $name; }
142 function setPageTitle( $name ) {
143 global $action;
144 $this->mPagetitle = $name;
145 if(!empty($action)) {
146 $taction = $this->getPageTitleActionText();
147 if( !empty( $taction ) ) {
148 $name .= " - $taction";
149 }
150 }
151 $this->setHTMLTitle( $name . " - " . wfMsg( "wikititlesuffix" ) );
152 }
153 function getHTMLTitle() { return $this->mHTMLtitle; }
154 function getPageTitle() { return $this->mPagetitle; }
155 function setSubtitle( $str ) { $this->mSubtitle = $str; }
156 function getSubtitle() { return $this->mSubtitle; }
157 function isArticle() { return $this->mIsarticle; }
158 function setPrintable() { $this->mPrintable = true; }
159 function isPrintable() { return $this->mPrintable; }
160 function setSyndicated( $show = true ) { $this->mShowFeedLinks = $show; }
161 function isSyndicated() { return $this->mShowFeedLinks; }
162 function setOnloadHandler( $js ) { $this->mOnloadHandler = $js; }
163 function getOnloadHandler() { return $this->mOnloadHandler; }
164 function disable() { $this->mDoNothing = true; }
165
166 function setArticleRelated( $v )
167 {
168 $this->mIsArticleRelated = $v;
169 if ( !$v ) {
170 $this->mIsarticle = false;
171 }
172 }
173 function setArticleFlag( $v ) {
174 $this->mIsarticle = $v;
175 if ( $v ) {
176 $this->mIsArticleRelated = $v;
177 }
178 }
179
180 function isArticleRelated()
181 {
182 return $this->mIsArticleRelated;
183 }
184
185 function getLanguageLinks() {
186 return $this->mLanguageLinks;
187 }
188 function addLanguageLinks($newLinkArray) {
189 $this->mLanguageLinks += $newLinkArray;
190 }
191 function setLanguageLinks($newLinkArray) {
192 $this->mLanguageLinks = $newLinkArray;
193 }
194 function getCategoryLinks() {
195 return $this->mCategoryLinks;
196 }
197 function addCategoryLinks($newLinkArray) {
198 $this->mCategoryLinks += $newLinkArray;
199 }
200 function setCategoryLinks($newLinkArray) {
201 $this->mCategoryLinks += $newLinkArray;
202 }
203
204 function suppressQuickbar() { $this->mSuppressQuickbar = true; }
205 function isQuickbarSuppressed() { return $this->mSuppressQuickbar; }
206
207 function addHTML( $text ) { $this->mBodytext .= $text; }
208 function debug( $text ) { $this->mDebugtext .= $text; }
209
210 function setParserOptions( $options )
211 {
212 return wfSetVar( $this->mParserOptions, $options );
213 }
214
215 # First pass--just handle <nowiki> sections, pass the rest off
216 # to doWikiPass2() which does all the real work.
217 #
218 # $cacheArticle - assume this text is the main text for the given article
219 #
220 function addWikiText( $text, $linestart = true, $cacheArticle = NULL )
221 {
222 global $wgParser, $wgParserCache, $wgUser, $wgTitle;
223
224 $parserOutput = $wgParser->parse( $text, $wgTitle, $this->mParserOptions, $linestart );
225 if ( $cacheArticle ) {
226 $wgParserCache->save( $parserOutput, $cacheArticle, $wgUser );
227 }
228
229 $this->mLanguageLinks += $parserOutput->getLanguageLinks();
230 $this->mCategoryLinks += $parserOutput->getCategoryLinks();
231 $this->addHTML( $parserOutput->getText() );
232 }
233
234 function tryParserCache( $article, $user ) {
235 global $wgParserCache;
236 $parserOutput = $wgParserCache->get( $article, $user );
237 if ( $parserOutput !== false ) {
238 $this->mLanguageLinks += $parserOutput->getLanguageLinks();
239 $this->mCategoryLinks += $parserOutput->getCategoryLinks();
240 $this->addHTML( $parserOutput->getText() );
241 return true;
242 } else {
243 return false;
244 }
245 }
246
247 # Set the maximum cache time on the Squid in seconds
248 function setSquidMaxage( $maxage ) {
249 $this->mSquidMaxage = $maxage;
250 }
251
252 # Use enableClientCache(false) to force it to send nocache headers
253 function enableClientCache( $state ) {
254 return wfSetVar( $this->mEnableClientCache, $state );
255 }
256
257 function sendCacheControl() {
258 global $wgUseSquid, $wgUseESI;
259 # FIXME: This header may cause trouble with some versions of Internet Explorer
260 header( "Vary: Accept-Encoding, Cookie" );
261 if( $this->mEnableClientCache ) {
262 if( $wgUseSquid && ! isset( $_COOKIE[ini_get( "session.name") ] ) &&
263 ! $this->isPrintable() && $this->mSquidMaxage != 0 )
264 {
265 if ( $wgUseESI ) {
266 # We'll purge the proxy cache explicitly, but require end user agents
267 # to revalidate against the proxy on each visit.
268 # Surrogate-Control controls our Squid, Cache-Control downstream caches
269 wfDebug( "** proxy caching with ESI; {$this->mLastModified} **\n", false );
270 # start with a shorter timeout for initial testing
271 # header( 'Surrogate-Control: max-age=2678400+2678400, content="ESI/1.0"');
272 header( 'Surrogate-Control: max-age='.$wgSquidMaxage.'+'.$this->mSquidMaxage.', content="ESI/1.0"');
273 header( 'Cache-Control: s-maxage=0, must-revalidate, max-age=0' );
274 } else {
275 # We'll purge the proxy cache for anons explicitly, but require end user agents
276 # to revalidate against the proxy on each visit.
277 # IMPORTANT! The Squid needs to replace the Cache-Control header with
278 # Cache-Control: s-maxage=0, must-revalidate, max-age=0
279 wfDebug( "** local proxy caching; {$this->mLastModified} **\n", false );
280 # start with a shorter timeout for initial testing
281 # header( "Cache-Control: s-maxage=2678400, must-revalidate, max-age=0" );
282 header( 'Cache-Control: s-maxage='.$this->mSquidMaxage.', must-revalidate, max-age=0' );
283 }
284 } else {
285 # We do want clients to cache if they can, but they *must* check for updates
286 # on revisiting the page.
287 wfDebug( "** private caching; {$this->mLastModified} **\n", false );
288 header( "Expires: -1" );
289 header( "Cache-Control: private, must-revalidate, max-age=0" );
290 }
291 if($this->mLastModified) header( "Last-modified: {$this->mLastModified}" );
292 } else {
293 wfDebug( "** no caching **\n", false );
294
295 # In general, the absence of a last modified header should be enough to prevent
296 # the client from using its cache. We send a few other things just to make sure.
297 header( "Expires: -1" );
298 header( "Cache-Control: no-cache, no-store, max-age=0, must-revalidate" );
299 header( "Pragma: no-cache" );
300 }
301 }
302
303 # Finally, all the text has been munged and accumulated into
304 # the object, let's actually output it:
305 #
306 function output()
307 {
308 global $wgUser, $wgLang, $wgDebugComments, $wgCookieExpiration;
309 global $wgInputEncoding, $wgOutputEncoding, $wgLanguageCode;
310 global $wgDebugRedirects, $wgMimeType;
311 if( $this->mDoNothing ){
312 return;
313 }
314 $fname = "OutputPage::output";
315 wfProfileIn( $fname );
316
317 $sk = $wgUser->getSkin();
318
319 if ( "" != $this->mRedirect ) {
320 if( substr( $this->mRedirect, 0, 4 ) != "http" ) {
321 # Standards require redirect URLs to be absolute
322 global $wgServer;
323 $this->mRedirect = $wgServer . $this->mRedirect;
324 }
325 if( $this->mRedirectCode == '301') {
326 if( !$wgDebugRedirects ) {
327 header("HTTP/1.1 {$this->mRedirectCode} Moved Permanently");
328 }
329 $this->mLastModified = gmdate( "D, j M Y H:i:s" ) . " GMT";
330 }
331
332 $this->sendCacheControl();
333
334 if( $wgDebugRedirects ) {
335 $url = htmlspecialchars( $this->mRedirect );
336 print "<html>\n<head>\n<title>Redirect</title>\n</head>\n<body>\n";
337 print "<p>Location: <a href=\"$url\">$url</a></p>\n";
338 print "</body>\n</html>\n";
339 } else {
340 header( "Location: {$this->mRedirect}" );
341 }
342 return;
343 }
344
345
346 $this->sendCacheControl();
347
348 header( "Content-type: $wgMimeType; charset={$wgOutputEncoding}" );
349 header( "Content-language: {$wgLanguageCode}" );
350
351 $exp = time() + $wgCookieExpiration;
352 foreach( $this->mCookies as $name => $val ) {
353 setcookie( $name, $val, $exp, "/" );
354 }
355
356 $sk->outputPage( $this );
357 # flush();
358 }
359
360 function out( $ins )
361 {
362 global $wgInputEncoding, $wgOutputEncoding, $wgLang;
363 if ( 0 == strcmp( $wgInputEncoding, $wgOutputEncoding ) ) {
364 $outs = $ins;
365 } else {
366 $outs = $wgLang->iconv( $wgInputEncoding, $wgOutputEncoding, $ins );
367 if ( false === $outs ) { $outs = $ins; }
368 }
369 print $outs;
370 }
371
372 function setEncodings()
373 {
374 global $wgInputEncoding, $wgOutputEncoding;
375 global $wgUser, $wgLang;
376
377 $wgInputEncoding = strtolower( $wgInputEncoding );
378
379 if( $wgUser->getOption( 'altencoding' ) ) {
380 $wgLang->setAltEncoding();
381 return;
382 }
383
384 if ( empty( $_SERVER['HTTP_ACCEPT_CHARSET'] ) ) {
385 $wgOutputEncoding = strtolower( $wgOutputEncoding );
386 return;
387 }
388
389 /*
390 # This code is unused anyway!
391 # Commenting out. --bv 2003-11-15
392
393 $a = explode( ",", $_SERVER['HTTP_ACCEPT_CHARSET'] );
394 $best = 0.0;
395 $bestset = "*";
396
397 foreach ( $a as $s ) {
398 if ( preg_match( "/(.*);q=(.*)/", $s, $m ) ) {
399 $set = $m[1];
400 $q = (float)($m[2]);
401 } else {
402 $set = $s;
403 $q = 1.0;
404 }
405 if ( $q > $best ) {
406 $bestset = $set;
407 $best = $q;
408 }
409 }
410 #if ( "*" == $bestset ) { $bestset = "iso-8859-1"; }
411 if ( "*" == $bestset ) { $bestset = $wgOutputEncoding; }
412 $wgOutputEncoding = strtolower( $bestset );
413
414 # Disable for now
415 #
416 */
417 $wgOutputEncoding = $wgInputEncoding;
418 }
419
420 # Returns a HTML comment with the elapsed time since request.
421 # This method has no side effects.
422 function reportTime()
423 {
424 global $wgRequestTime;
425
426 $now = wfTime();
427 list( $usec, $sec ) = explode( " ", $wgRequestTime );
428 $start = (float)$sec + (float)$usec;
429 $elapsed = $now - $start;
430
431 # Use real server name if available, so we know which machine
432 # in a server farm generated the current page.
433 if ( function_exists( "posix_uname" ) ) {
434 $uname = @posix_uname();
435 } else {
436 $uname = false;
437 }
438 if( is_array( $uname ) && isset( $uname['nodename'] ) ) {
439 $hostname = $uname['nodename'];
440 } else {
441 # This may be a virtual server.
442 $hostname = $_SERVER['SERVER_NAME'];
443 }
444 $com = sprintf( "<!-- Served by %s in %01.2f secs. -->",
445 $hostname, $elapsed );
446 return $com;
447 }
448
449 # Note: these arguments are keys into wfMsg(), not text!
450 #
451 function errorpage( $title, $msg )
452 {
453 global $wgTitle;
454
455 $this->mDebugtext .= "Original title: " .
456 $wgTitle->getPrefixedText() . "\n";
457 $this->setPageTitle( wfMsg( $title ) );
458 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
459 $this->setRobotpolicy( "noindex,nofollow" );
460 $this->setArticleRelated( false );
461 $this->enableClientCache( false );
462
463 $this->mBodytext = "";
464 $this->addHTML( "<p>" . wfMsg( $msg ) . "</p>\n" );
465 $this->returnToMain( false );
466
467 $this->output();
468 wfAbruptExit();
469 }
470
471 function sysopRequired()
472 {
473 global $wgUser;
474
475 $this->setPageTitle( wfMsg( "sysoptitle" ) );
476 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
477 $this->setRobotpolicy( "noindex,nofollow" );
478 $this->setArticleRelated( false );
479 $this->mBodytext = "";
480
481 $sk = $wgUser->getSkin();
482 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
483 $this->addHTML( wfMsg( "sysoptext", $ap ) );
484 $this->returnToMain();
485 }
486
487 function developerRequired()
488 {
489 global $wgUser;
490
491 $this->setPageTitle( wfMsg( "developertitle" ) );
492 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
493 $this->setRobotpolicy( "noindex,nofollow" );
494 $this->setArticleRelated( false );
495 $this->mBodytext = "";
496
497 $sk = $wgUser->getSkin();
498 $ap = $sk->makeKnownLink( wfMsg( "administrators" ), "" );
499 $this->addHTML( wfMsg( "developertext", $ap ) );
500 $this->returnToMain();
501 }
502
503 function loginToUse()
504 {
505 global $wgUser, $wgTitle, $wgLang;
506
507 $this->setPageTitle( wfMsg( "loginreqtitle" ) );
508 $this->setHTMLTitle( wfMsg( "errorpagetitle" ) );
509 $this->setRobotpolicy( "noindex,nofollow" );
510 $this->setArticleFlag( false );
511 $this->mBodytext = "";
512 $this->addWikiText( wfMsg( "loginreqtext" ) );
513
514 # We put a comment in the .html file so a Sysop can diagnose the page the
515 # user can't see.
516 $this->addHTML( "\n<!--" .
517 $wgLang->getNsText( $wgTitle->getNamespace() ) .
518 ":" .
519 $wgTitle->getDBkey() . "-->" );
520 $this->returnToMain(); # Flip back to the main page after 10 seconds.
521 }
522
523 function databaseError( $fname, $sql, $error, $errno )
524 {
525 global $wgUser, $wgCommandLineMode;
526
527 $this->setPageTitle( wfMsgNoDB( "databaseerror" ) );
528 $this->setRobotpolicy( "noindex,nofollow" );
529 $this->setArticleRelated( false );
530 $this->enableClientCache( false );
531
532 if ( $wgCommandLineMode ) {
533 $msg = wfMsgNoDB( "dberrortextcl" );
534 } else {
535 $msg = wfMsgNoDB( "dberrortext" );
536 }
537
538 $msg = str_replace( "$1", htmlspecialchars( $sql ), $msg );
539 $msg = str_replace( "$2", htmlspecialchars( $fname ), $msg );
540 $msg = str_replace( "$3", $errno, $msg );
541 $msg = str_replace( "$4", htmlspecialchars( $error ), $msg );
542
543 if ( $wgCommandLineMode || !is_object( $wgUser )) {
544 print "$msg\n";
545 wfAbruptExit();
546 }
547 $sk = $wgUser->getSkin();
548 $shlink = $sk->makeKnownLink( wfMsgNoDB( "searchhelppage" ),
549 wfMsgNoDB( "searchingwikipedia" ) );
550 $msg = str_replace( "$5", $shlink, $msg );
551 $this->mBodytext = $msg;
552 $this->output();
553 wfAbruptExit();
554 }
555
556 function readOnlyPage( $source = null, $protected = false )
557 {
558 global $wgUser, $wgReadOnlyFile;
559
560 $this->setRobotpolicy( "noindex,nofollow" );
561 $this->setArticleRelated( false );
562
563 if( $protected ) {
564 $this->setPageTitle( wfMsg( "viewsource" ) );
565 $this->addWikiText( wfMsg( "protectedtext" ) );
566 } else {
567 $this->setPageTitle( wfMsg( "readonly" ) );
568 $reason = file_get_contents( $wgReadOnlyFile );
569 $this->addWikiText( wfMsg( "readonlytext", $reason ) );
570 }
571
572 if( is_string( $source ) ) {
573 if( strcmp( $source, "" ) == 0 ) {
574 $source = wfMsg( "noarticletext" );
575 }
576 $rows = $wgUser->getOption( "rows" );
577 $cols = $wgUser->getOption( "cols" );
578 $text = "\n<textarea cols='$cols' rows='$rows' readonly='readonly'>" .
579 htmlspecialchars( $source ) . "\n</textarea>";
580 $this->addHTML( $text );
581 }
582
583 $this->returnToMain( false );
584 }
585
586 function fatalError( $message )
587 {
588 $this->setPageTitle( wfMsg( "internalerror" ) );
589 $this->setRobotpolicy( "noindex,nofollow" );
590 $this->setArticleRelated( false );
591 $this->enableClientCache( false );
592
593 $this->mBodytext = $message;
594 $this->output();
595 wfAbruptExit();
596 }
597
598 function unexpectedValueError( $name, $val )
599 {
600 $this->fatalError( wfMsg( "unexpected", $name, $val ) );
601 }
602
603 function fileCopyError( $old, $new )
604 {
605 $this->fatalError( wfMsg( "filecopyerror", $old, $new ) );
606 }
607
608 function fileRenameError( $old, $new )
609 {
610 $this->fatalError( wfMsg( "filerenameerror", $old, $new ) );
611 }
612
613 function fileDeleteError( $name )
614 {
615 $this->fatalError( wfMsg( "filedeleteerror", $name ) );
616 }
617
618 function fileNotFoundError( $name )
619 {
620 $this->fatalError( wfMsg( "filenotfound", $name ) );
621 }
622
623 // return from error messages or notes
624 // auto: automatically redirect the user after 10 seconds
625 // returnto: page title to return to. Default is Main Page.
626 function returnToMain( $auto = true, $returnto = NULL )
627 {
628 global $wgUser, $wgOut, $wgRequest;
629
630 if ( $returnto == NULL ) {
631 $returnto = $wgRequest->getText( 'returnto' );
632 }
633
634 $sk = $wgUser->getSkin();
635 if ( "" == $returnto ) {
636 $returnto = wfMsg( "mainpage" );
637 }
638 $link = $sk->makeKnownLink( $returnto, "" );
639
640 $r = wfMsg( "returnto", $link );
641 if ( $auto ) {
642 $titleObj = Title::newFromText( $returnto );
643 $wgOut->addMeta( "http:Refresh", "10;url=" . $titleObj->escapeFullURL() );
644 }
645 $wgOut->addHTML( "\n<p>$r</p>\n" );
646 }
647
648 # This function takes the existing and broken links for the page
649 # and uses the first 10 of them for META keywords
650 function addMetaTags ()
651 {
652 global $wgLinkCache , $wgOut ;
653 $good = array_keys ( $wgLinkCache->mGoodLinks ) ;
654 $bad = array_keys ( $wgLinkCache->mBadLinks ) ;
655 $a = array_merge ( $good , $bad ) ;
656 $a = array_slice ( $a , 0 , 10 ) ; # 10 keywords max
657 $a = implode ( "," , $a ) ;
658 $strip = array(
659 "/<.*?>/" => '',
660 "/[_]/" => ' '
661 );
662 $a = htmlspecialchars(preg_replace(array_keys($strip), array_values($strip),$a ));
663
664 $wgOut->addMeta ( "KEYWORDS" , $a ) ;
665 }
666
667 /* private */ function headElement()
668 {
669 global $wgDocType, $wgDTD, $wgLanguageCode, $wgOutputEncoding, $wgMimeType;
670 global $wgUser, $wgLang, $wgRequest;
671
672 $xml = ($wgMimeType == 'text/xml');
673 if( $xml ) {
674 $ret = "<" . "?xml version=\"1.0\" encoding=\"$wgOutputEncoding\" ?" . ">\n";
675 } else {
676 $ret = "";
677 }
678
679 $ret .= "<!DOCTYPE html PUBLIC \"$wgDocType\"\n \"$wgDTD\">\n";
680
681 if ( "" == $this->mHTMLtitle ) {
682 $this->mHTMLtitle = wfMsg( "pagetitle", $this->mPagetitle );
683 }
684 if( $xml ) {
685 $xmlbits = "xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"en\"";
686 } else {
687 $xmlbits = "";
688 }
689 $rtl = $wgLang->isRTL() ? " dir='RTL'" : "";
690 $ret .= "<html $xmlbits lang=\"$wgLanguageCode\" $rtl>\n";
691 $ret .= "<head>\n<title>" . htmlspecialchars( $this->mHTMLtitle ) . "</title>\n";
692 array_push( $this->mMetatags, array( "http:Content-type", "$wgMimeType; charset={$wgOutputEncoding}" ) );
693
694 $ret .= $this->getHeadLinks();
695 global $wgStylePath;
696 if( $this->isPrintable() ) {
697 $media = "";
698 } else {
699 $media = "media='print'";
700 }
701 $printsheet = htmlspecialchars( "$wgStylePath/wikiprintable.css" );
702 $ret .= "<link rel='stylesheet' type='text/css' $media href='$printsheet' />\n";
703
704 $sk = $wgUser->getSkin();
705 $ret .= $sk->getHeadScripts();
706 $ret .= $this->mScripts;
707 $ret .= $sk->getUserStyles();
708
709 $ret .= "</head>\n";
710 return $ret;
711 }
712
713 function getHeadLinks() {
714 global $wgRequest, $wgStylePath;
715 $ret = "";
716 foreach ( $this->mMetatags as $tag ) {
717 if ( 0 == strcasecmp( "http:", substr( $tag[0], 0, 5 ) ) ) {
718 $a = "http-equiv";
719 $tag[0] = substr( $tag[0], 5 );
720 } else {
721 $a = "name";
722 }
723 $ret .= "<meta $a=\"{$tag[0]}\" content=\"{$tag[1]}\" />\n";
724 }
725 $p = $this->mRobotpolicy;
726 if ( "" == $p ) { $p = "index,follow"; }
727 $ret .= "<meta name=\"robots\" content=\"$p\" />\n";
728
729 if ( count( $this->mKeywords ) > 0 ) {
730 $strip = array(
731 "/<.*?>/" => '',
732 "/[_]/" => ' '
733 );
734 $ret .= "<meta name=\"keywords\" content=\"" .
735 htmlspecialchars(preg_replace(array_keys($strip), array_values($strip),implode( ",", $this->mKeywords ))) . "\" />\n";
736 }
737 foreach ( $this->mLinktags as $tag ) {
738 $ret .= "<link";
739 foreach( $tag as $attr => $val ) {
740 $ret .= " $attr=\"" . htmlspecialchars( $val ) . "\"";
741 }
742 $ret .= " />\n";
743 }
744 if( $this->isSyndicated() ) {
745 # FIXME: centralize the mime-type and name information in Feed.php
746 $link = $wgRequest->escapeAppendQuery( "feed=rss" );
747 $ret .= "<link rel='alternate' type='application/rss+xml' title='RSS 2.0' href='$link' />\n";
748 $link = $wgRequest->escapeAppendQuery( "feed=atom" );
749 $ret .= "<link rel='alternate' type='application/rss+atom' title='Atom 0.3' href='$link' />\n";
750 }
751 # FIXME: get these working
752 # $fix = htmlspecialchars( $wgStylePath . "/ie-png-fix.js" );
753 # $ret .= "<!--[if gte IE 5.5000]><script type='text/javascript' src='$fix'></script><![endif]-->";
754 return $ret;
755 }
756 }
757 ?>