* Fixes bugs 12023, 12024 and 12025.
[lhc/web/wiklou.git] / languages / Language.php
index dbf674e..76619f4 100644 (file)
@@ -8,18 +8,6 @@ if( !defined( 'MEDIAWIKI' ) ) {
        exit( 1 );
 }
 
-#
-# In general you should not make customizations in these language files
-# directly, but should use the MediaWiki: special namespace to customize
-# user interface messages through the wiki.
-# See http://meta.wikipedia.org/wiki/MediaWiki_namespace
-#
-# NOTE TO TRANSLATORS: Do not copy this whole file when making translations!
-# A lot of common constants and a base class with inheritable methods are
-# defined here, which should not be redefined. See the other LanguageXx.php
-# files for examples.
-#
-
 # Read language names
 global $wgLanguageNames;
 require_once( dirname(__FILE__) . '/Names.php' ) ;
@@ -102,6 +90,29 @@ class Language {
                'sep', 'oct', 'nov', 'dec'
        );
 
+       static public $mIranianCalendarMonthMsgs = array(
+               'iranian-calendar-m1', 'iranian-calendar-m2', 'iranian-calendar-m3',
+               'iranian-calendar-m4', 'iranian-calendar-m5', 'iranian-calendar-m6',
+               'iranian-calendar-m7', 'iranian-calendar-m8', 'iranian-calendar-m9',
+               'iranian-calendar-m10', 'iranian-calendar-m11', 'iranian-calendar-m12'
+       );
+
+       static public $mHebrewCalendarMonthMsgs = array(
+               'hebrew-calendar-m1', 'hebrew-calendar-m2', 'hebrew-calendar-m3',
+               'hebrew-calendar-m4', 'hebrew-calendar-m5', 'hebrew-calendar-m6',
+               'hebrew-calendar-m7', 'hebrew-calendar-m8', 'hebrew-calendar-m9',
+               'hebrew-calendar-m10', 'hebrew-calendar-m11', 'hebrew-calendar-m12',
+               'hebrew-calendar-m6a', 'hebrew-calendar-m6b'
+       );
+
+       static public $mHebrewCalendarMonthGenMsgs = array(
+               'hebrew-calendar-m1-gen', 'hebrew-calendar-m2-gen', 'hebrew-calendar-m3-gen',
+               'hebrew-calendar-m4-gen', 'hebrew-calendar-m5-gen', 'hebrew-calendar-m6-gen',
+               'hebrew-calendar-m7-gen', 'hebrew-calendar-m8-gen', 'hebrew-calendar-m9-gen',
+               'hebrew-calendar-m10-gen', 'hebrew-calendar-m11-gen', 'hebrew-calendar-m12-gen',
+               'hebrew-calendar-m6a-gen', 'hebrew-calendar-m6b-gen'
+       );
+
        /**
         * Create a language object for a given language code
         */
@@ -405,6 +416,19 @@ class Language {
                return $this->getMessageFromDB( self::$mWeekdayAbbrevMsgs[$key-1] );
        }
 
+       function getIranianCalendarMonthName( $key ) {
+               return $this->getMessageFromDB( self::$mIranianCalendarMonthMsgs[$key-1] );
+       }
+
+       function getHebrewCalendarMonthName( $key ) {
+               return $this->getMessageFromDB( self::$mHebrewCalendarMonthMsgs[$key-1] );
+       }
+
+       function getHebrewCalendarMonthNameGen( $key ) {
+               return $this->getMessageFromDB( self::$mHebrewCalendarMonthGenMsgs[$key-1] );
+       }
+
+
        /**
         * Used by date() and time() to adjust the time output.
         * @public
@@ -473,9 +497,21 @@ class Language {
         *    xn   Do not translate digits of the next numeric format character
         *    xN   Toggle raw digit (xn) flag, stays set until explicitly unset
         *    xr   Use roman numerals for the next numeric format character
+        *    xh   Use hebrew numerals for the next numeric format character
         *    xx   Literal x
         *    xg   Genitive month name
         *
+        *    xij  j (day number) in Iranian calendar
+        *    xiF  F (month name) in Iranian calendar
+        *    xin  n (month number) in Iranian calendar
+        *    xiY  Y (full year) in Iranian calendar
+        *
+        *    xjj  j (day number) in Hebrew calendar
+        *    xjF  F (month name) in Hebrew calendar
+        *    xjx  xg (genitive month name) in Hebrew calendar
+        *    xjn  n (month number) in Hebrew calendar
+        *    xjY  Y (full year) in Hebrew calendar
+        *
         * Characters enclosed in double quotes will be considered literal (with
         * the quotes themselves removed). Unmatched quotes will be considered
         * literal quotes. Example:
@@ -497,15 +533,22 @@ class Language {
                $s = '';
                $raw = false;
                $roman = false;
+               $hebrewNum = false;
                $unix = false;
                $rawToggle = false;
+               $iranian = false;
+               $hebrew = false;
                for ( $p = 0; $p < strlen( $format ); $p++ ) {
                        $num = false;
                        $code = $format[$p];
                        if ( $code == 'x' && $p < strlen( $format ) - 1 ) {
                                $code .= $format[++$p];
                        }
-                       
+
+                       if ( ( $code === 'xi' || $code == 'xj' ) && $p < strlen( $format ) - 1 ) {
+                               $code .= $format[++$p];
+                       }
+
                        switch ( $code ) {
                                case 'xx':
                                        $s .= 'x';
@@ -519,9 +562,16 @@ class Language {
                                case 'xr':
                                        $roman = true;
                                        break;
+                               case 'xh':
+                                       $hebrewNum = true;
+                                       break;
                                case 'xg':
                                        $s .= $this->getMonthNameGen( substr( $ts, 4, 2 ) );
                                        break;
+                               case 'xjx':
+                                       if ( !$hebrew ) $hebrew = self::tsToHebrew( $ts );
+                                       $s .= $this->getHebrewCalendarMonthNameGen( $hebrew[1] );
+                                       break;
                                case 'd':
                                        $num = substr( $ts, 6, 2 );
                                        break;
@@ -532,6 +582,14 @@ class Language {
                                case 'j':
                                        $num = intval( substr( $ts, 6, 2 ) );
                                        break;
+                               case 'xij':
+                                       if ( !$iranian ) $iranian = self::tsToIranian( $ts );
+                                       $num = $iranian[2];
+                                       break;
+                               case 'xjj':
+                                       if ( !$hebrew ) $hebrew = self::tsToHebrew( $ts );
+                                       $num = $hebrew[2];
+                                       break;
                                case 'l':
                                        if ( !$unix ) $unix = wfTimestamp( TS_UNIX, $ts );
                                        $s .= $this->getWeekdayName( gmdate( 'w', $unix ) + 1 );
@@ -552,10 +610,18 @@ class Language {
                                case 'W':
                                        if ( !$unix ) $unix = wfTimestamp( TS_UNIX, $ts );
                                        $num = gmdate( 'W', $unix );
-                                       break;                                  
+                                       break;
                                case 'F':
                                        $s .= $this->getMonthName( substr( $ts, 4, 2 ) );
                                        break;
+                               case 'xiF':
+                                       if ( !$iranian ) $iranian = self::tsToIranian( $ts );
+                                       $s .= $this->getIranianCalendarMonthName( $iranian[1] );
+                                       break;
+                               case 'xjF':
+                                       if ( !$hebrew ) $hebrew = self::tsToHebrew( $ts );
+                                       $s .= $this->getHebrewCalendarMonthName( $hebrew[1] );
+                                       break;
                                case 'm':
                                        $num = substr( $ts, 4, 2 );
                                        break;
@@ -565,6 +631,14 @@ class Language {
                                case 'n':
                                        $num = intval( substr( $ts, 4, 2 ) );
                                        break;
+                               case 'xin':
+                                       if ( !$iranian ) $iranian = self::tsToIranian( $ts );
+                                       $num = $iranian[1];
+                                       break;
+                               case 'xjn':
+                                       if ( !$hebrew ) $hebrew = self::tsToHebrew( $ts );
+                                       $num = $hebrew[1];
+                                       break;
                                case 't':
                                        if ( !$unix ) $unix = wfTimestamp( TS_UNIX, $ts );
                                        $num = gmdate( 't', $unix );
@@ -572,10 +646,18 @@ class Language {
                                case 'L':
                                        if ( !$unix ) $unix = wfTimestamp( TS_UNIX, $ts );
                                        $num = gmdate( 'L', $unix );
-                                       break;                                  
+                                       break;
                                case 'Y':
                                        $num = substr( $ts, 0, 4 );
                                        break;
+                               case 'xiY':
+                                       if ( !$iranian ) $iranian = self::tsToIranian( $ts );
+                                       $num = $iranian[0];
+                                       break;
+                               case 'xjY':
+                                       if ( !$hebrew ) $hebrew = self::tsToHebrew( $ts );
+                                       $num = $hebrew[0];
+                                       break;
                                case 'y':
                                        $num = substr( $ts, 2, 2 );
                                        break;
@@ -651,6 +733,9 @@ class Language {
                                } elseif ( $roman ) {
                                        $s .= self::romanNumeral( $num );
                                        $roman = false;
+                               } elseif( $hebrewNum ) {
+                                       $s .= self::hebrewNumeral( $num );
+                                       $hebrewNum = false;
                                } else {
                                        $s .= $this->formatNum( $num, true );
                                }
@@ -660,6 +745,203 @@ class Language {
                return $s;
        }
 
+       private static $GREG_DAYS = array( 31, 28, 31, 30, 31, 30, 31, 31, 30, 31, 30, 31 );
+       private static $IRANIAN_DAYS = array( 31, 31, 31, 31, 31, 31, 30, 30, 30, 30, 30, 29 );
+       /**
+        * Algorithm by Roozbeh Pournader and Mohammad Toossi to convert 
+        * Gregorian dates to Iranian dates. Originally written in C, it
+        * is released under the terms of GNU Lesser General Public
+        * License. Conversion to PHP was performed by Niklas Laxström.
+        * 
+        * Link: http://www.farsiweb.info/jalali/jalali.c
+        */
+       private static function tsToIranian( $ts ) {
+               $gy = substr( $ts, 0, 4 ) -1600;
+               $gm = substr( $ts, 4, 2 ) -1;
+               $gd = substr( $ts, 6, 2 ) -1;
+
+               # Days passed from the beginning (including leap years)
+               $gDayNo = 365*$gy
+                       + floor(($gy+3) / 4)
+                       - floor(($gy+99) / 100)
+                       + floor(($gy+399) / 400);
+
+
+               // Add days of the past months of this year
+               for( $i = 0; $i < $gm; $i++ ) {
+                       $gDayNo += self::$GREG_DAYS[$i];
+               }
+
+               // Leap years
+               if ( $gm > 1 && (($gy%4===0 && $gy%100!==0 || ($gy%400==0)))) {
+                       $gDayNo++;
+               }
+
+               // Days passed in current month
+               $gDayNo += $gd;
+               
+               $jDayNo = $gDayNo - 79;
+
+               $jNp = floor($jDayNo / 12053);
+               $jDayNo %= 12053;
+
+               $jy = 979 + 33*$jNp + 4*floor($jDayNo/1461);
+               $jDayNo %= 1461;
+
+               if ( $jDayNo >= 366 ) {
+                       $jy += floor(($jDayNo-1)/365);
+                       $jDayNo = floor(($jDayNo-1)%365);
+               }
+
+               for ( $i = 0; $i < 11 && $jDayNo >= self::$IRANIAN_DAYS[$i]; $i++ ) {
+                       $jDayNo -= self::$IRANIAN_DAYS[$i];
+               }
+
+               $jm= $i+1;
+               $jd= $jDayNo+1;
+
+               return array($jy, $jm, $jd);
+       }
+
+       /**
+        * Converting Gregorian dates to Hebrew dates.
+        *
+        * Based on a JavaScript code by Abu Mami and Yisrael Hersch
+        * (abu-mami@kaluach.net, http://www.kaluach.net), who permitted
+        * to translate the relevant functions into PHP and release them under
+        * GNU GPL.
+        */
+       private static function tsToHebrew( $ts ) {
+               # Parse date
+               $year = substr( $ts, 0, 4 );
+               $month = substr( $ts, 4, 2 );
+               $day = substr( $ts, 6, 2 );
+
+               # Month number when March = 1, February = 12
+               $month -= 2;
+               if( $month <= 0 ) {
+                       # January of February
+                       $month += 12;
+                       $year--;
+               }
+
+               # Days since 1 March - calculating 30 days a month,
+               # and then adding the missing number of days
+               $day += (int)( 7 * $month / 12 + 30 * ( $month - 1 ) );
+               # Calculate Hebrew year for days after 1 Nisan
+               $hebrewYear = $year + 3760;
+               # Passover date for this year (as days since 1 March)
+               $passover = self::passoverDate( $hebrewYear );
+               if( $day <= $passover - 15 ) {
+                       # Day is before 1 Nisan (passover is 15 Nisan) - it is the previous year
+                       # Next year's passover (as days since 1 March)
+                       $anchor = $passover;
+                       # Add days since previous year's 1 March
+                       $day += 365;
+                       if( ( $year % 400 == 0 ) || ( $year % 100 != 0 && $year % 4 == 0 ) ) {
+                               # Leap year
+                               $day++;
+                       }
+                       # Previous year
+                       $year--;
+                       $hebrewYear--;
+                       # Passover date for the new year (as days since 1 March)
+                       $passover = self::passoverDate( $hebrewYear );
+               } else {
+                       # Next year's passover (as days since 1 March)
+                       $anchor = self::passoverDate( $hebrewYear + 1 );
+               }
+
+               # Days since 1 Nisan
+               $day -= $passover - 15;
+               # Difference between this year's passover date by gregorian calendar,
+               # and the next year's one + 12 days. This should be 1 days for a regular year,
+               # but 0 for incomplete one, 2 for complete, and those + 30 days of Adar I
+               # for a leap year.
+               $anchor -= $passover - 12;
+               $nextYear = $year + 1;
+               if( ( $nextYear % 400 == 0 ) || ( $nextYear % 100 != 0 && $nextYear % 4 == 0 ) ) {
+                       # Next year is a leap year - difference is growing
+                       $anchor++;
+               }
+
+               # Calculate day in the month from number of days sine 1 Nisan
+               # Don't check Adar - if the day is not in adar, we will stop before;
+               # if it is in adar, we will use it to check if it is Adar I or Adar II
+               for( $month = 0; $month < 11; $month++ ) {
+                       # Calculate days in this month
+                       if( $month == 7 && $anchor % 30 == 2 ) {
+                               # Cheshvan in a complete year (otherwise as the rule below)
+                               $days = 30;
+                       } else if( $month == 8 && $anchor % 30 == 0 ) {
+                               # Kislev in an incomplete year (otherwise as the rule below)
+                               $days = 29;
+                       } else {
+                               # Even months have 30 days, odd have 29
+                               $days = 30 - $month % 2;
+                       }
+                       if( $day <= $days ) {
+                               # In this month
+                               break;
+                       }
+                       # Try in next months
+                       $day -= $days;
+               }
+
+               # Now we move to a year from Tishrei
+               if( $month >= 6 ) {
+                       # After Tishrei, use next year
+                       $hebrewYear++;
+               }
+               # Recalculate month number so that we start from Tishrei
+               $month = ( $month + 6 ) % 12 + 1;
+
+               # Fix Adar
+               if( $month == 6 && $anchor >= 30 ) {
+                       # This *is* adar, and this year is leap
+                       if( $day > 30 ) {
+                               # Adar II
+                               $month = 14;
+                               $day -= 30;
+                       } else {
+                               # Adar I
+                               $month = 13;
+                       }
+               }
+
+               return array( $hebrewYear, $month, $day );
+       }
+
+       /**
+        * Based on Carl Friedrich Gauss algorithm for finding Easter date.
+        * Used for Hebrew date.
+        */
+       private static function passoverDate( $year ) {
+               $a = (int)( ( 12 * $year + 17 ) % 19 );
+               $b = (int)( $year % 4 );
+               $m = 32.044093161144 + 1.5542417966212 * $a +  $b / 4.0 - 0.0031777940220923 * $year;
+               if( $m < 0 ) {
+                       $m--;
+               }
+               $Mar = (int)$m;
+               if( $m < 0 ) {
+                       $m++;
+               }
+               $m -= $Mar;
+
+               $c = (int)( ( $Mar + 3 * $year + 5 * $b + 5 ) % 7);
+               if( $c == 0 && $a > 11 && $m >= 0.89772376543210 ) {
+                       $Mar++;
+               } else if( $c == 1 && $a > 6 && $m >= 0.63287037037037 ) {
+                       $Mar += 2;
+               } else if( $c == 2 || $c == 4 || $c == 6 ) {
+                       $Mar++;
+               }
+
+               $Mar += (int)( ( $year - 3760 ) / 100 ) - (int)( ( $year - 3760 ) / 400 ) - 2;
+               return $Mar;
+       }
+
        /**
         * Roman number formatting up to 3000
         */
@@ -686,6 +968,46 @@ class Language {
                return $s;
        }
 
+       /**
+        * Hebrew Gematria number formatting up to 9999
+        */
+       static function hebrewNumeral( $num ) {
+               static $table = array(
+                       array( '', 'א', 'ב', 'ג', 'ד', 'ה', 'ו', 'ז', 'ח', 'ט', 'י' ),
+                       array( '', 'י', 'כ', 'ל', 'מ', 'נ', 'ס', 'ע', 'פ', 'צ', 'ק' ),
+                       array( '', 'ק', 'ר', 'ש', 'ת', 'תק', 'תר', 'תש', 'תת', 'תתק', 'תתר' ),
+                       array( '', 'א', 'ב', 'ג', 'ד', 'ה', 'ו', 'ז', 'ח', 'ט', 'י' )
+               );
+
+               $num = intval( $num );
+               if ( $num > 9999 || $num <= 0 ) {
+                       return $num;
+               }
+
+               $s = '';
+               for ( $pow10 = 1000, $i = 3; $i >= 0; $pow10 /= 10, $i-- ) {
+                       if ( $num >= $pow10 ) {
+                               if ( $num == 15 || $num == 16 ) {
+                                       $s .= $table[0][9] . $table[0][$num - 10];
+                                       $num = 0;
+                               } else {
+                                       $s .= $table[$i][(int)( $num / $pow10 )];
+                                       if( $pow10 == 1000 ) {
+                                               $s .= "'";
+                                       }
+                               }
+                       }
+                       $num = $num % $pow10;
+               }
+               if( strlen( $s ) == 2 ) {
+                       $str = $s . "'";
+               } else  {
+                       $str = substr( $s, 0, strlen( $s ) - 2 ) . '"';
+                       $str .= substr( $s, strlen( $s ) - 2, 2 );
+               }
+               return $str;
+       }
+
        /**
         * This is meant to be used by time(), date(), and timeanddate() to get
         * the date preference they're supposed to use, it should be used in
@@ -847,7 +1169,9 @@ class Language {
        }
 
        function ucfirst( $str ) {
-               return self::uc( $str, true );
+               if ( empty($str) ) return $str;
+               if ( ord($str[0]) < 128 ) return ucfirst($str);
+               else return self::uc($str,true); // fall back to more complex logic in case of multibyte strings
        }
 
        function uc( $str, $first = false ) {
@@ -877,7 +1201,13 @@ class Language {
        }
        
        function lcfirst( $str ) {
-               return self::lc( $str, true );
+               if ( empty($str) ) return $str;
+               if ( is_string( $str ) && ord($str[0]) < 128 ) {
+                       // editing string in place = cool
+                       $str[0]=strtolower($str[0]);
+                       return $str;
+               }
+               else return self::lc( $str, true );
        }
 
        function lc( $str, $first = false ) {
@@ -1363,7 +1693,7 @@ class Language {
 
        /**
         * Plural form transformations, needed for some languages.
-        * For example, where are 3 form of plural in Russian and Polish,
+        * For example, there are 3 form of plural in Russian and Polish,
         * depending on "count mod 10". See [[w:Plural]]
         * For English it is pretty simple.
         *
@@ -1372,16 +1702,30 @@ class Language {
         *
         * Example: {{plural:{{NUMBEROFARTICLES}}|article|articles}}
         *
-        * @param integer $count
-        * @param string $wordform1
-        * @param string $wordform2
-        * @param string $wordform3 (optional)
-        * @param string $wordform4 (optional)
-        * @param string $wordform5 (optional)
-        * @return string
+        * @param integer $count Non-localized number
+        * @param array $forms Different plural forms
+        * @return string Correct form of plural for $count in this language
+        */
+       function convertPlural( $count, $forms ) {
+               if ( !count($forms) ) { return ''; }
+               $forms = $this->preConvertPlural( $forms, 2 );
+
+               return ( abs($count) == 1 ) ? $forms[0] : $forms[1];
+       }
+
+       /**
+        * Checks that convertPlural was given an array and pads it to requested
+        * amound of forms by copying the last one.
+        *
+        * @param integer $count How many forms should there be at least
+        * @param array $forms Array of forms given to convertPlural
+        * @return array Padded array of forms or an exception if not an array
         */
-       function convertPlural( $count, $w1, $w2, $w3, $w4, $w5) {
-               return ( $count == '1' || $count == '-1' ) ? $w1 : $w2;
+       protected function preConvertPlural( Array $forms, $count ) {
+               while ( count($forms) < $count ) {
+                       $forms[] = $forms[count($forms)-1];
+               }
+               return $forms;
        }
 
        /**
@@ -1922,6 +2266,3 @@ class Language {
                return str_replace( '$1', $this->formatNum( $size ), $text );
        }
 }
-
-
-