more cssification of diff rendering, some " -> ' in diff engine
[lhc/web/wiklou.git] / includes / GlobalFunctions.php
index 3fb0508..f51a5ee 100644 (file)
@@ -5,9 +5,9 @@ $wgNumberOfArticles = -1; # Unset
 $wgTotalViews = -1;
 $wgTotalEdits = -1;
 
-include_once( "DatabaseFunctions.php" );
-include_once( "UpdateClasses.php" );
-include_once( "LogPage.php" );
+require_once( 'DatabaseFunctions.php' );
+require_once( 'UpdateClasses.php' );
+require_once( 'LogPage.php' );
 
 /*
  * Compatibility functions
@@ -23,8 +23,8 @@ if( !function_exists('iconv') ) {
        # This will *not* work in all circumstances.
        function iconv( $from, $to, $string ) {
                if(strcasecmp( $from, $to ) == 0) return $string;
-               if(strcasecmp( $from, "utf-8" ) == 0) return utf8_decode( $string );
-               if(strcasecmp( $to, "utf-8" ) == 0) return utf8_encode( $string );
+               if(strcasecmp( $from, 'utf-8' ) == 0) return utf8_decode( $string );
+               if(strcasecmp( $to, 'utf-8' ) == 0) return utf8_encode( $string );
                return $string;
        }
 }
@@ -32,10 +32,35 @@ if( !function_exists('iconv') ) {
 if( !function_exists('file_get_contents') ) {
        # Exists in PHP 4.3.0+
        function file_get_contents( $filename ) {
-               return implode( "", file( $filename ) );
+               return implode( '', file( $filename ) );
        }
 }
 
+if( !function_exists('is_a') ) {
+       # Exists in PHP 4.2.0+
+       function is_a( $object, $class_name ) {
+               return
+                       (strcasecmp( get_class( $object, $class_name ) == 0) ||
+                        is_subclass_of( $object, $class_name ) );
+       }
+}
+
+# html_entity_decode exists in PHP 4.3.0+ but is FATALLY BROKEN even then,
+# with no UTF-8 support.
+function do_html_entity_decode( $string, $quote_style=ENT_COMPAT, $charset='ISO-8859-1' ) {
+       static $trans;
+       if( !isset( $trans ) ) {
+               $trans = array_flip( get_html_translation_table( HTML_ENTITIES, $quote_style ) );
+               # Assumes $charset will always be the same through a run, and only understands
+               # utf-8 or default. Note - mixing latin1 named entities and unicode numbered
+               # ones will result in a bad link.
+               if( strcasecmp( 'utf-8', $charset ) == 0 ) {
+                       $trans = array_map( 'utf8_encode', $trans );
+               }
+       }
+       return strtr( $string, $trans );
+}
+
 $wgRandomSeeded = false;
 
 function wfSeedRandom()
@@ -52,99 +77,59 @@ function wfSeedRandom()
 # Generates a URL from a URL-encoded title and a query string
 # Title::getLocalURL() is preferred in most cases
 #
-function wfLocalUrl( $a, $q = "" )
+function wfLocalUrl( $a, $q = '' )
 {
        global $wgServer, $wgScript, $wgArticlePath;
 
-       $a = str_replace( " ", "_", $a );
+       $a = str_replace( ' ', '_', $a );
 
-       if ( "" == $a ) {
-               if( "" == $q ) {
+       if ( '' == $a ) {
+               if( '' == $q ) {
                        $a = $wgScript;
                } else {
                        $a = "{$wgScript}?{$q}";
                }       
-       } else if ( "" == $q ) {
+       } else if ( '' == $q ) {
                $a = str_replace( "$1", $a, $wgArticlePath );
        } else if ($wgScript != '' ) {
                $a = "{$wgScript}?title={$a}&{$q}";     
-       } else { //XXX ugly hack for toplevel wikis
-               $a = "/{$a}&{$q}";      
+       } else { //XXX hackish solution for toplevel wikis
+               $a = "/{$a}?{$q}";      
        }
        return $a;
 }
 
-function wfLocalUrlE( $a, $q = "" )
+function wfLocalUrlE( $a, $q = '' )
 {
        return wfEscapeHTML( wfLocalUrl( $a, $q ) );
        # die( "Call to obsolete function wfLocalUrlE()" );
 }
 
-function wfFullUrl( $a, $q = "" ) {
-       wfDebugDieBacktrace( "Call to obsolete function wfFullUrl(); use Title::getFullURL" );
-}
-
-function wfFullUrlE( $a, $q = "" ) {
-       wfDebugDieBacktrace( "Call to obsolete function wfFullUrlE(); use Title::getFullUrlE" );
-
-}
-
-function wfImageUrl( $img )
-{
-       global $wgUploadPath;
-
-       $nt = Title::newFromText( $img );
-       if( !$nt ) return "";
-
-       $name = $nt->getDBkey();
-       $hash = md5( $name );
-
-       $url = "{$wgUploadPath}/" . $hash{0} . "/" .
-         substr( $hash, 0, 2 ) . "/{$name}";
-       return wfUrlencode( $url );
+function wfFullUrl( $a, $q = '' ) {
+       wfDebugDieBacktrace( 'Call to obsolete function wfFullUrl(); use Title::getFullURL' );
 }
 
-function wfImagePath( $img )
-{
-       global $wgUploadDirectory;
-
-       $nt = Title::newFromText( $img );
-       if( !$nt ) return "";
+function wfFullUrlE( $a, $q = '' ) {
+       wfDebugDieBacktrace( 'Call to obsolete function wfFullUrlE(); use Title::getFullUrlE' );
 
-       $name = $nt->getDBkey();
-       $hash = md5( $name );
-
-       $path = "{$wgUploadDirectory}/" . $hash{0} . "/" .
-         substr( $hash, 0, 2 ) . "/{$name}";
-       return $path;
 }
 
-function wfThumbUrl( $img )
-{
-       global $wgUploadPath;
-
-       $nt = Title::newFromText( $img );
-       if( !$nt ) return "";
-
-       $name = $nt->getDBkey();
-       $hash = md5( $name );
-
-       $url = "{$wgUploadPath}/thumb/" . $hash{0} . "/" .
-         substr( $hash, 0, 2 ) . "/{$name}";
-       return wfUrlencode( $url );
-}
+// orphan function wfThumbUrl( $img )
+//{
+//     global $wgUploadPath;
+//
+//     $nt = Title::newFromText( $img );
+//     if( !$nt ) return "";
+//
+//     $name = $nt->getDBkey();
+//     $hash = md5( $name );
+//
+//     $url = "{$wgUploadPath}/thumb/" . $hash{0} . "/" .
+//       substr( $hash, 0, 2 ) . "/{$name}";
+//     return wfUrlencode( $url );
+//}
 
 
-function wfImageThumbUrl( $name, $subdir="thumb" )
-{
-       global $wgUploadPath;
-
-       $hash = md5( $name );
-       $url = "{$wgUploadPath}/{$subdir}/" . $hash{0} . "/" .
-         substr( $hash, 0, 2 ) . "/{$name}";
-       return wfUrlencode($url);
-}
-
 function wfImageArchiveUrl( $name )
 {
        global $wgUploadPath;
@@ -158,8 +143,8 @@ function wfImageArchiveUrl( $name )
 function wfUrlencode ( $s )
 {
        $s = urlencode( $s );
-       $s = preg_replace( "/%3[Aa]/", ":", $s );
-       $s = preg_replace( "/%2[Ff]/", "/", $s );
+       $s = preg_replace( '/%3[Aa]/', ':', $s );
+       $s = preg_replace( '/%2[Ff]/', '/', $s );
 
        return $s;
 }
@@ -188,6 +173,47 @@ function wfMungeToUtf8($string) {
        return $string;
 }
 
+# Converts a single UTF-8 character into the corresponding HTML character entity
+function wfUtf8Entity( $matches ) {
+       $char = $matches[0];
+       # Find the length
+       $z = ord( $char{0} );
+       if ( $z & 0x80 ) {
+               $length = 0;
+               while ( $z & 0x80 ) {
+                       $length++;
+                       $z <<= 1;
+               }
+       } else {
+               $length = 1;
+       }
+       
+       if ( $length != strlen( $char ) ) {
+               return '';
+       }
+       if ( $length == 1 ) {
+               return $char;
+       }
+
+       # Mask off the length-determining bits and shift back to the original location
+       $z &= 0xff;
+       $z >>= $length;
+
+       # Add in the free bits from subsequent bytes
+       for ( $i=1; $i<$length; $i++ ) {
+               $z <<= 6;
+               $z |= ord( $char{$i} ) & 0x3f;
+       }
+
+       # Make entity
+       return "&#$z;";
+}
+
+# Converts all multi-byte characters in a UTF-8 string into the appropriate character entity
+function wfUtf8ToHTML($string) {
+       return preg_replace_callback( '/[\\xc0-\\xfd][\\x80-\\xbf]*/', 'wfUtf8Entity', $string );
+}
+
 function wfDebug( $text, $logonly = false )
 {
        global $wgOut, $wgDebugLogFile, $wgDebugComments, $wgProfileOnly;
@@ -209,23 +235,25 @@ function logProfilingData()
        list( $usec, $sec ) = explode( " ", $wgRequestTime );
        $start = (float)$sec + (float)$usec;
        $elapsed = $now - $start;
-       if ( "" != $wgDebugLogFile ) {
+       if ( $wgProfiling ) {
                $prof = wfGetProfilingOutput( $start, $elapsed );
-               $forward = "";
+               $forward = '';
                if( !empty( $_SERVER['HTTP_X_FORWARDED_FOR'] ) )
-                       $forward = " forwarded for " . $_SERVER['HTTP_X_FORWARDED_FOR'];
+                       $forward = ' forwarded for ' . $_SERVER['HTTP_X_FORWARDED_FOR'];
                if( !empty( $_SERVER['HTTP_CLIENT_IP'] ) )
-                       $forward .= " client IP " . $_SERVER['HTTP_CLIENT_IP'];
+                       $forward .= ' client IP ' . $_SERVER['HTTP_CLIENT_IP'];
                if( !empty( $_SERVER['HTTP_FROM'] ) )
-                       $forward .= " from " . $_SERVER['HTTP_FROM'];
+                       $forward .= ' from ' . $_SERVER['HTTP_FROM'];
                if( $forward )
                        $forward = "\t(proxied via {$_SERVER['REMOTE_ADDR']}{$forward})";
                if($wgUser->getId() == 0)
-                       $forward .= " anon";
+                       $forward .= ' anon';
                $log = sprintf( "%s\t%04.3f\t%s\n",
-                 gmdate( "YmdHis" ), $elapsed,
+                 gmdate( 'YmdHis' ), $elapsed,
                  urldecode( $_SERVER['REQUEST_URI'] . $forward ) );
-               error_log( $log . $prof, 3, $wgDebugLogFile );
+               if ( '' != $wgDebugLogFile ) {
+                       error_log( $log . $prof, 3, $wgDebugLogFile );
+               }
        }
 }
 
@@ -262,7 +290,7 @@ function wfMsgNoDB( $key ) {
 function wfMsgReal( $key, $args, $useDB ) {
        global $wgReplacementKeys, $wgMessageCache, $wgLang;
 
-       $fname = "wfMsg";
+       $fname = 'wfMsg';
        wfProfileIn( $fname );
        if ( $wgMessageCache ) {
                $message = $wgMessageCache->get( $key, $useDB );
@@ -283,69 +311,28 @@ function wfMsgReal( $key, $args, $useDB ) {
 
 function wfCleanFormFields( $fields )
 {
-       wfDebugDieBacktrace( "Call to obsolete wfCleanFormFields(). Use wgRequest instead..." );
+       wfDebugDieBacktrace( 'Call to obsolete wfCleanFormFields(). Use wgRequest instead...' );
 }
 
 function wfMungeQuotes( $in )
 {
-       $out = str_replace( "%", "%25", $in );
-       $out = str_replace( "'", "%27", $out );
-       $out = str_replace( "\"", "%22", $out );
+       $out = str_replace( '%', '%25', $in );
+       $out = str_replace( "'", '%27', $out );
+       $out = str_replace( '"', '%22', $out );
        return $out;
 }
 
 function wfDemungeQuotes( $in )
 {
-       $out = str_replace( "%22", "\"", $in );
-       $out = str_replace( "%27", "'", $out );
-       $out = str_replace( "%25", "%", $out );
+       $out = str_replace( '%22', '"', $in );
+       $out = str_replace( '%27', "'", $out );
+       $out = str_replace( '%25', '%', $out );
        return $out;
 }
 
 function wfCleanQueryVar( $var )
 {
-       wfDebugDieBacktrace( "Call to obsolete function wfCleanQueryVar(); use wgRequest instead" );
-}
-
-function wfSpecialPage()
-{
-       global $wgUser, $wgOut, $wgTitle, $wgLang;
-
-       /* FIXME: this list probably shouldn't be language-specific, per se */
-       $validSP = $wgLang->getValidSpecialPages();
-       $sysopSP = $wgLang->getSysopSpecialPages();
-       $devSP = $wgLang->getDeveloperSpecialPages();
-
-       $wgOut->setArticleRelated( false );
-       $wgOut->setRobotpolicy( "noindex,follow" );
-
-       $bits = split( "/", $wgTitle->getDBkey(), 2 );
-       $t = $bits[0];
-       if( empty( $bits[1] ) ) {
-               $par = NULL;
-       } else {
-               $par = $bits[1];
-       }
-
-       if ( array_key_exists( $t, $validSP ) ||
-         ( $wgUser->isSysop() && array_key_exists( $t, $sysopSP ) ) ||
-         ( $wgUser->isDeveloper() && array_key_exists( $t, $devSP ) ) ) {
-               if($par !== NULL)
-                       $wgTitle = Title::makeTitle( Namespace::getSpecial(), $t );
-
-               $wgOut->setPageTitle( wfMsg( strtolower( $wgTitle->getText() ) ) );
-
-               $inc = "Special" . $t . ".php";
-               include_once( $inc );
-               $call = "wfSpecial" . $t;
-               $call( $par );
-       } else if ( array_key_exists( $t, $sysopSP ) ) {
-               $wgOut->sysopRequired();
-       } else if ( array_key_exists( $t, $devSP ) ) {
-               $wgOut->developerRequired();
-       } else {
-               $wgOut->errorpage( "nosuchspecialpage", "nospecialpagetext" );
-       }
+       wfDebugDieBacktrace( 'Call to obsolete function wfCleanQueryVar(); use wgRequest instead' );
 }
 
 function wfSearch( $s )
@@ -368,27 +355,27 @@ function wfAbruptExit(){
        }
        $called = true;
 
-       if( function_exists( "debug_backtrace" ) ){ // PHP >= 4.3
+       if( function_exists( 'debug_backtrace' ) ){ // PHP >= 4.3
                $bt = debug_backtrace();
                for($i = 0; $i < count($bt) ; $i++){
-                       $file = $bt[$i]["file"];
-                       $line = $bt[$i]["line"];
+                       $file = $bt[$i]['file'];
+                       $line = $bt[$i]['line'];
                        wfDebug("WARNING: Abrupt exit in $file at line $line\n");
                }
        } else { 
-               wfDebug("WARNING: Abrupt exit\n");
+               wfDebug('WARNING: Abrupt exit\n');
        }
        exit();
 }
 
-function wfDebugDieBacktrace( $msg = "" ) {
+function wfDebugDieBacktrace( $msg = '' ) {
        $msg .= "\n<p>Backtrace:</p>\n<ul>\n";
        $backtrace = debug_backtrace();
        foreach( $backtrace as $call ) {
                $f = explode( DIRECTORY_SEPARATOR, $call['file'] );
                $file = $f[count($f)-1];
-               $msg .= "<li>" . $file . " line " . $call['line'] . ", in ";
-               if( !empty( $call['class'] ) ) $msg .= $call['class'] . "::";
+               $msg .= '<li>' . $file . " line " . $call['line'] . ', in ';
+               if( !empty( $call['class'] ) ) $msg .= $call['class'] . '::';
                $msg .= $call['function'] . "()</li>\n";
        }
        die( $msg );
@@ -407,9 +394,9 @@ function wfNumberOfArticles()
        global $wgNumberOfArticles, $wgTotalViews, $wgTotalEdits;
        if ( -1 != $wgNumberOfArticles ) return;
 
-       $sql = "SELECT ss_total_views, ss_total_edits, ss_good_articles " .
-         "FROM site_stats WHERE ss_row_id=1";
-       $res = wfQuery( $sql, DB_READ, "wfLoadSiteStats" );
+       $sql = 'SELECT ss_total_views, ss_total_edits, ss_good_articles ' .
+         'FROM site_stats WHERE ss_row_id=1';
+       $res = wfQuery( $sql, DB_READ, 'wfLoadSiteStats' );
 
        if ( 0 == wfNumRows( $res ) ) { return; }
        else {
@@ -423,24 +410,24 @@ function wfNumberOfArticles()
 function wfEscapeHTML( $in )
 {
        return str_replace(
-               array( "&", "\"", ">", "<" ),
-               array( "&amp;", "&quot;", "&gt;", "&lt;" ),
+               array( '&', '"', '>', '<' ),
+               array( '&amp;', '&quot;', '&gt;', '&lt;' ),
                $in );
 }
 
 function wfEscapeHTMLTagsOnly( $in ) {
        return str_replace(
-               array( "\"", ">", "<" ),
-               array( "&quot;", "&gt;", "&lt;" ),
+               array( '"', '>', '<' ),
+               array( '&quot;', '&gt;', '&lt;' ),
                $in );
 }
 
 function wfUnescapeHTML( $in )
 {
-       $in = str_replace( "&lt;", "<", $in );
-       $in = str_replace( "&gt;", ">", $in );
-       $in = str_replace( "&quot;", "\"", $in );
-       $in = str_replace( "&amp;", "&", $in );
+       $in = str_replace( '&lt;', '<', $in );
+       $in = str_replace( '&gt;', '>', $in );
+       $in = str_replace( '&quot;', '"', $in );
+       $in = str_replace( '&amp;', '&', $in );
        return $in;
 }
 
@@ -450,47 +437,48 @@ function wfImageDir( $fname )
 
        $hash = md5( $fname );
        $oldumask = umask(0);
-       $dest = $wgUploadDirectory . "/" . $hash{0};
+       $dest = $wgUploadDirectory . '/' . $hash{0};
        if ( ! is_dir( $dest ) ) { mkdir( $dest, 0777 ); }
-       $dest .= "/" . substr( $hash, 0, 2 );
+       $dest .= '/' . substr( $hash, 0, 2 );
        if ( ! is_dir( $dest ) ) { mkdir( $dest, 0777 ); }
        
        umask( $oldumask );
        return $dest;
 }
 
-function wfImageThumbDir( $fname , $subdir="thumb")
+function wfImageThumbDir( $fname , $subdir='thumb')
 {
        return wfImageArchiveDir( $fname, $subdir );
 }
 
-function wfImageArchiveDir( $fname , $subdir="archive")
+function wfImageArchiveDir( $fname , $subdir='archive')
 {
        global $wgUploadDirectory;
 
        $hash = md5( $fname );
        $oldumask = umask(0);
+       
+       # Suppress warning messages here; if the file itself can't
+       # be written we'll worry about it then.
        $archive = "{$wgUploadDirectory}/{$subdir}";
-       if ( ! is_dir( $archive ) ) { mkdir( $archive, 0777 ); }
-       $archive .= "/" . $hash{0};
-       if ( ! is_dir( $archive ) ) { mkdir( $archive, 0777 ); }
-       $archive .= "/" . substr( $hash, 0, 2 );
-       if ( ! is_dir( $archive ) ) { mkdir( $archive, 0777 ); }
+       if ( ! is_dir( $archive ) ) { @mkdir( $archive, 0777 ); }
+       $archive .= '/' . $hash{0};
+       if ( ! is_dir( $archive ) ) { @mkdir( $archive, 0777 ); }
+       $archive .= '/' . substr( $hash, 0, 2 );
+       if ( ! is_dir( $archive ) ) { @mkdir( $archive, 0777 ); }
 
        umask( $oldumask );
        return $archive;
 }
 
-function wfRecordUpload( $name, $oldver, $size, $desc )
+function wfRecordUpload( $name, $oldver, $size, $desc, $copyStatus = "", $source = "" )
 {
        global $wgUser, $wgLang, $wgTitle, $wgOut, $wgDeferredUpdateList;
-       global $wgRequest, $wgUseCopyrightUpload; 
-       
-       extract( $wgRequest->getValues( 'wpUploadCopyStatus', 'wpUploadSource' ) );
+       global $wgUseCopyrightUpload; 
        
-       $fname = "wfRecordUpload";
+       $fname = 'wfRecordUpload';
 
-       $sql = "SELECT img_name,img_size,img_timestamp,img_description,img_user," .
+       $sql = 'SELECT img_name,img_size,img_timestamp,img_description,img_user,' .
          "img_user_text FROM image WHERE img_name='" . wfStrencode( $name ) . "'";
        $res = wfQuery( $sql, DB_READ, $fname );
 
@@ -500,9 +488,9 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
        
        if ( $wgUseCopyrightUpload )
          {
-           $textdesc = "== " . wfMsg ( "filedesc" ) . " ==\n" . $desc . "\n" .
-             "== " . wfMsg ( "filestatus" ) . " ==\n" . $wpUploadCopyStatus . "\n" .
-             "== " . wfMsg ( "filesource" ) . " ==\n" . $wpUploadSource ;
+           $textdesc = '== ' . wfMsg ( 'filedesc' ) . " ==\n" . $desc . "\n" .
+             '== ' . wfMsg ( 'filestatus' ) . " ==\n" . $copyStatus . "\n" .
+             '== ' . wfMsg ( 'filesource' ) . " ==\n" . $source ;
          }
        else $textdesc = $desc ;
 
@@ -510,14 +498,14 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
        $won = wfInvertTimestamp( $now );
        
        if ( 0 == wfNumRows( $res ) ) {
-               $sql = "INSERT INTO image (img_name,img_size,img_timestamp," .
+               $sql = 'INSERT INTO image (img_name,img_size,img_timestamp,' .
                  "img_description,img_user,img_user_text) VALUES ('" .
                  wfStrencode( $name ) . "',$size,'{$now}','" .
                  wfStrencode( $desc ) . "', '" . $wgUser->getID() .
                  "', '" . wfStrencode( $wgUser->getName() ) . "')";
                wfQuery( $sql, DB_WRITE, $fname );
 
-               $sql = "SELECT cur_id,cur_text FROM cur WHERE cur_namespace=" .
+               $sql = 'SELECT cur_id,cur_text FROM cur WHERE cur_namespace=' .
                  Namespace::getImage() . " AND cur_title='" .
                  wfStrencode( $name ) . "'";
                $res = wfQuery( $sql, DB_READ, $fname );
@@ -528,9 +516,9 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
                          wfStrencode( $desc ) . "','" . $wgUser->getID() . "','" .
                          wfStrencode( $wgUser->getName() ) . "','" . $now .
                          "',1";
-                       $sql = "INSERT INTO cur (cur_namespace,cur_title," .
-                         "cur_comment,cur_user,cur_user_text,cur_timestamp,cur_is_new," .
-                         "cur_text,inverse_timestamp,cur_touched) VALUES (" .
+                       $sql = 'INSERT INTO cur (cur_namespace,cur_title,' .
+                         'cur_comment,cur_user,cur_user_text,cur_timestamp,cur_is_new,' .
+                         'cur_text,inverse_timestamp,cur_touched) VALUES (' .
                          $common .
                          ",'" . wfStrencode( $textdesc ) . "','{$won}','{$now}')";
                        wfQuery( $sql, DB_WRITE, $fname );
@@ -545,7 +533,7 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
        } else {
                $s = wfFetchObject( $res );
 
-               $sql = "INSERT INTO oldimage (oi_name,oi_archive_name,oi_size," .
+               $sql = 'INSERT INTO oldimage (oi_name,oi_archive_name,oi_size,' .
                  "oi_timestamp,oi_description,oi_user,oi_user_text) VALUES ('" .
                  wfStrencode( $s->img_name ) . "','" .
                  wfStrencode( $oldver ) .
@@ -569,10 +557,10 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
                wfQuery( $sql, DB_WRITE, $fname );
        }
 
-       $log = new LogPage( wfMsg( "uploadlogpage" ), wfMsg( "uploadlogpagetext" ) );
-       $da = wfMsg( "uploadedimage", "[[:" . $wgLang->getNsText(
+       $log = new LogPage( wfMsg( 'uploadlogpage' ), wfMsg( 'uploadlogpagetext' ) );
+       $da = wfMsg( 'uploadedimage', '[[:' . $wgLang->getNsText(
          Namespace::getImage() ) . ":{$name}|{$name}]]" );
-       $ta = wfMsg( "uploadedimage", $name );
+       $ta = wfMsg( 'uploadedimage', $name );
        $log->addEntry( $da, $desc, $ta );
 }
 
@@ -582,21 +570,21 @@ function wfRecordUpload( $name, $oldver, $size, $desc )
 function wfShowingResults( $offset, $limit )
 {
        global $wgLang;
-       return wfMsg( "showingresults", $wgLang->formatNum( $limit ), $wgLang->formatNum( $offset+1 ) );
+       return wfMsg( 'showingresults', $wgLang->formatNum( $limit ), $wgLang->formatNum( $offset+1 ) );
 }
 
 function wfShowingResultsNum( $offset, $limit, $num )
 {
        global $wgLang;
-       return wfMsg( "showingresultsnum", $wgLang->formatNum( $limit ), $wgLang->formatNum( $offset+1 ), $wgLang->formatNum( $num ) );
+       return wfMsg( 'showingresultsnum', $wgLang->formatNum( $limit ), $wgLang->formatNum( $offset+1 ), $wgLang->formatNum( $num ) );
 }
 
-function wfViewPrevNext( $offset, $limit, $link, $query = "", $atend = false )
+function wfViewPrevNext( $offset, $limit, $link, $query = '', $atend = false )
 {
        global $wgUser, $wgLang;
        $fmtLimit = $wgLang->formatNum( $limit );
-       $prev = wfMsg( "prevn", $fmtLimit );
-       $next = wfMsg( "nextn", $fmtLimit );
+       $prev = wfMsg( 'prevn', $fmtLimit );
+       $next = wfMsg( 'nextn', $fmtLimit );
        $link = wfUrlencode( $link );
 
        $sk = $wgUser->getSkin();
@@ -604,8 +592,8 @@ function wfViewPrevNext( $offset, $limit, $link, $query = "", $atend = false )
                $po = $offset - $limit;
                if ( $po < 0 ) { $po = 0; }
                $q = "limit={$limit}&offset={$po}";
-               if ( "" != $query ) { $q .= "&{$query}"; }
-               $plink = "<a href=\"" . wfLocalUrlE( $link, $q ) . "\">{$prev}</a>";
+               if ( '' != $query ) { $q .= "&{$query}"; }
+               $plink = '<a href="' . wfLocalUrlE( $link, $q ) . "\">{$prev}</a>";
        } else { $plink = $prev; }
 
        $no = $offset + $limit;
@@ -615,26 +603,26 @@ function wfViewPrevNext( $offset, $limit, $link, $query = "", $atend = false )
        if ( $atend ) {
                $nlink = $next;
        } else {
-               $nlink = "<a href=\"" . wfLocalUrlE( $link, $q ) . "\">{$next}</a>";
+               $nlink = '<a href="' . wfLocalUrlE( $link, $q ) . "\">{$next}</a>";
        }
-       $nums = wfNumLink( $offset, 20, $link , $query ) . " | " .
-         wfNumLink( $offset, 50, $link, $query ) . " | " .
-         wfNumLink( $offset, 100, $link, $query ) . " | " .
-         wfNumLink( $offset, 250, $link, $query ) . " | " .
+       $nums = wfNumLink( $offset, 20, $link , $query ) . ' | ' .
+         wfNumLink( $offset, 50, $link, $query ) . ' | ' .
+         wfNumLink( $offset, 100, $link, $query ) . ' | ' .
+         wfNumLink( $offset, 250, $link, $query ) . ' | ' .
          wfNumLink( $offset, 500, $link, $query );
 
-       return wfMsg( "viewprevnext", $plink, $nlink, $nums );
+       return wfMsg( 'viewprevnext', $plink, $nlink, $nums );
 }
 
-function wfNumLink( $offset, $limit, $link, $query = "" )
+function wfNumLink( $offset, $limit, $link, $query = '' )
 {
        global $wgUser, $wgLang;
-       if ( "" == $query ) { $q = ""; }
+       if ( '' == $query ) { $q = ''; }
        else { $q = "{$query}&"; }
        $q .= "limit={$limit}&offset={$offset}";
 
        $fmtLimit = $wgLang->formatNum( $limit );
-       $s = "<a href=\"" . wfLocalUrlE( $link, $q ) . "\">{$fmtLimit}</a>";
+       $s = '<a href="' . wfLocalUrlE( $link, $q ) . "\">{$fmtLimit}</a>";
        return $s;
 }
 
@@ -644,9 +632,9 @@ function wfClientAcceptsGzip() {
                # FIXME: we may want to blacklist some broken browsers
                if( preg_match(
                        '/\bgzip(?:;(q)=([0-9]+(?:\.[0-9]+)))?\b/',
-                       $_SERVER["HTTP_ACCEPT_ENCODING"],
+                       $_SERVER['HTTP_ACCEPT_ENCODING'],
                        $m ) ) {
-                       if( ( $m[1] == "q" ) && ( $m[2] == 0 ) ) return false;
+                       if( ( $m[1] == 'q' ) && ( $m[2] == 0 ) ) return false;
                        wfDebug( " accepts gzip\n" );
                        return true;
                }
@@ -655,12 +643,12 @@ function wfClientAcceptsGzip() {
 }
 
 # Yay, more global functions!
-function wfCheckLimits( $deflimit = 50, $optionname = "rclimit" ) {
+function wfCheckLimits( $deflimit = 50, $optionname = 'rclimit' ) {
        global $wgUser, $wgRequest;
        
        $limit = $wgRequest->getInt( 'limit', 0 );
        if( $limit < 0 ) $limit = 0;
-       if( ( $limit == 0 ) && ( $optionname != "" ) ) {
+       if( ( $limit == 0 ) && ( $optionname != '' ) ) {
                $limit = (int)$wgUser->getOption( $optionname );
        }
        if( $limit <= 0 ) $limit = $deflimit;
@@ -688,7 +676,7 @@ function wfEscapeWikiText( $text )
        return $text;
 }
 
-function wfQuotedPrintable( $string, $charset = "" ) 
+function wfQuotedPrintable( $string, $charset = '' ) 
 {
        # Probably incomplete; see RFC 2045
        if( empty( $charset ) ) {
@@ -696,19 +684,19 @@ function wfQuotedPrintable( $string, $charset = "" )
                $charset = $wgInputEncoding;
        }
        $charset = strtoupper( $charset );
-       $charset = str_replace( "ISO-8859", "ISO8859", $charset ); // ?
+       $charset = str_replace( 'ISO-8859', 'ISO8859', $charset ); // ?
 
        $illegal = '\x00-\x08\x0b\x0c\x0e-\x1f\x7f-\xff=';
        $replace = $illegal . '\t ?_';
        if( !preg_match( "/[$illegal]/", $string ) ) return $string;
        $out = "=?$charset?Q?";
        $out .= preg_replace( "/([$replace])/e", 'sprintf("=%02X",ord("$1"))', $string );
-       $out .= "?=";
+       $out .= '?=';
        return $out;
 }
 
 function wfTime(){
-       $st = explode( " ", microtime() );
+       $st = explode( ' ', microtime() );
        return (float)$st[0] + (float)$st[1];
 }
 
@@ -744,11 +732,11 @@ function wfArrayToCGI( $array1, $array2 = NULL )
                $array1 = $array1 + $array2;
        }
 
-       $cgi = "";
+       $cgi = '';
        foreach ( $array1 as $key => $value ) {
-               if ( "" !== $value ) {
-                       if ( "" != $cgi ) {
-                               $cgi .= "&";
+               if ( '' !== $value ) {
+                       if ( '' != $cgi ) {
+                               $cgi .= '&';
                        }
                        $cgi .= "{$key}={$value}";
                }
@@ -761,6 +749,27 @@ function wfPurgeSquidServers ($urlArr) {
        SquidUpdate::purge( $urlArr );
 }
 
+# Windows-compatible version of escapeshellarg()
+function wfEscapeShellArg( )
+{
+       $args = func_get_args();
+       $first = true;
+       $retVal = '';
+       foreach ( $args as $arg ) {
+               if ( !$first ) { 
+                       $retVal .= ' ';
+               } else {
+                       $first = false;
+               }
+
+               if (substr(php_uname(), 0, 7) == 'Windows') {
+                       $retVal .= '"' . str_replace( '"','\"', $arg ) . '"';
+               } else {
+                       $retVal .= escapeshellarg( $arg );
+               }
+       }
+       return $retVal;
+}
 
 # wfMerge attempts to merge differences between three texts. 
 # Returns true for a clean merge and false for failure or a conflict.
@@ -773,16 +782,23 @@ function wfMerge( $old, $mine, $yours, &$result ){
        if(! file_exists( $wgDiff3 ) ){ 
                return false;
        }
-       $td = "/tmp/";
-       $oldtextFile = fopen( $oldtextName = tempnam( $td, "merge-old-" ), "w" );
-       $mytextFile = fopen( $mytextName = tempnam( $td, "merge-mine-" ), "w" );
-       $yourtextFile = fopen( $yourtextName = tempnam( $td, "merge-your-" ), "w" );
+
+       # Make temporary files
+       $td = '/tmp/';
+       $oldtextFile = fopen( $oldtextName = tempnam( $td, 'merge-old-' ), 'w' );
+       $mytextFile = fopen( $mytextName = tempnam( $td, 'merge-mine-' ), 'w' );
+       $yourtextFile = fopen( $yourtextName = tempnam( $td, 'merge-your-' ), 'w' );
                        
        fwrite( $oldtextFile, $old ); fclose( $oldtextFile ); 
        fwrite( $mytextFile, $mine ); fclose( $mytextFile ); 
        fwrite( $yourtextFile, $yours ); fclose( $yourtextFile );
-       $cmd = "{$wgDiff3} -a --overlap-only $mytextName $oldtextName $yourtextName";
-       $handle = popen( $cmd, "r" );
+
+       # Check for a conflict
+    $cmd = wfEscapeShellArg( $wgDiff3 ) . ' -a --overlap-only ' .
+      wfEscapeShellArg( $mytextName ) . ' ' .
+      wfEscapeShellArg( $oldtextName ) . ' ' .
+      wfEscapeShellArg( $yourtextName );
+    $handle = popen( $cmd, 'r' );
 
        if( fgets( $handle ) ){
                $conflict = true;
@@ -790,9 +806,12 @@ function wfMerge( $old, $mine, $yours, &$result ){
                $conflict = false;
        }
        pclose( $handle );
-       $cmd = "{$wgDiff3} -a -e --merge $mytextName $oldtextName $yourtextName";
-       $handle = popen( $cmd, "r" );
-       $result = "";
+
+       # Merge differences
+       $cmd = wfEscapeShellArg( $wgDiff3 ) . ' -a -e --merge ' . 
+         wfEscapeShellArg( $mytextName, $oldtextName, $yourtextName );
+       $handle = popen( $cmd, 'r' );
+       $result = '';
        do {
                $data = fread( $handle, 8192 );
                if ( strlen( $data ) == 0 ) {
@@ -816,4 +835,104 @@ function wfVarDump( $var )
        }
 }
 
+# Provide a simple HTTP error.
+function wfHttpError( $code, $label, $desc ) {
+       global $wgOut;
+       $wgOut->disable();
+       header( "HTTP/1.0 $code $label" );
+       header( "Status: $code $label" );
+       $wgOut->sendCacheControl();
+       
+       # Don't send content if it's a HEAD request.
+       if( $_SERVER['REQUEST_METHOD'] == 'HEAD' ) {
+               header( 'Content-type: text/plain' );
+               print "$desc\n";
+       }
+}
+
+# Converts an Accept-* header into an array mapping string values to quality factors
+function wfAcceptToPrefs( $accept, $def = '*/*' ) {
+       # No arg means accept anything (per HTTP spec)
+       if( !$accept ) {
+               return array( $def => 1 );
+       }
+       
+       $prefs = array();
+       
+       $parts = explode( ',', $accept );
+       
+       foreach( $parts as $part ) {
+               # FIXME: doesn't deal with params like 'text/html; level=1'
+               @list( $value, $qpart ) = explode( ';', $part );
+               if( !isset( $qpart ) ) {
+                       $prefs[$value] = 1;
+               } elseif( preg_match( '/q\s*=\s*(\d*\.\d+)/', $qpart, $match ) ) {
+                       $prefs[$value] = $match[1];
+               }
+       }
+       
+       return $prefs;
+}
+
+/* private */ function mimeTypeMatch( $type, $avail ) {
+       if( array_key_exists($type, $avail) ) {
+               return $type;
+       } else {
+               $parts = explode( '/', $type );
+               if( array_key_exists( $parts[0] . '/*', $avail ) ) {
+                       return $parts[0] . '/*';
+               } elseif( array_key_exists( '*/*', $avail ) ) {
+                       return '*/*';
+               } else {
+                       return NULL;
+               }
+       }
+}
+
+# FIXME: doesn't handle params like 'text/plain; charset=UTF-8'
+# XXX: generalize to negotiate other stuff
+function wfNegotiateType( $cprefs, $sprefs ) {
+       $combine = array();
+       
+       foreach( array_keys($sprefs) as $type ) {
+               $parts = explode( '/', $type );
+               if( $parts[1] != '*' ) {
+                       $ckey = mimeTypeMatch( $type, $cprefs );
+                       if( $ckey ) {
+                               $combine[$type] = $sprefs[$type] * $cprefs[$ckey];
+                       }
+               }
+       }
+       
+       foreach( array_keys( $cprefs ) as $type ) {
+               $parts = explode( '/', $type );
+               if( $parts[1] != '*' && !array_key_exists( $type, $sprefs ) ) {
+                       $skey = mimeTypeMatch( $type, $sprefs );
+                       if( $skey ) {
+                               $combine[$type] = $sprefs[$skey] * $cprefs[$type];
+                       }
+               }
+       }
+       
+       $bestq = 0;
+       $besttype = NULL;
+       
+       foreach( array_keys( $combine ) as $type ) {
+               if( $combine[$type] > $bestq ) {
+                       $besttype = $type;
+                       $bestq = $combine[$type];
+               }
+       }
+       
+       return $besttype;
+}
+
+# Array lookup
+# Returns an array where the values in the first array are replaced by the 
+# values in the second array with the corresponding keys
+function wfArrayLookup( $a, $b )
+{
+       return array_flip( array_intersect( array_flip( $a ), array_keys( $b ) ) ); 
+}
+
 ?>