Source for file date.php

Documentation is available at date.php

  1. <?php
  2.  
  3. /**
  4.  * date.php
  5.  *
  6.  * Takes a date and parses it into a usable format.  The form that a
  7.  * date SHOULD arrive in is:
  8.  *       <Tue,> 29 Jun 1999 09:52:11 -0500 (EDT)
  9.  * (as specified in RFC 822) -- 'Tue' is optional
  10.  *
  11.  * @copyright 1999-2012 The SquirrelMail Project Team
  12.  * @license http://opensource.org/licenses/gpl-license.php GNU Public License
  13.  * @version $Id: date.php 14249 2012-01-02 02:09:17Z pdontthink $
  14.  * @package squirrelmail
  15.  * @subpackage date
  16.  */
  17.  
  18. /**
  19.  * dependency information
  20.  * - none
  21.  */
  22.  
  23. /**
  24.  * Corrects a time stamp to be the local time.
  25.  *
  26.  * @param int stamp the timestamp to adjust
  27.  * @param string tzc the timezone correction
  28.  * @return int the corrected timestamp
  29.  */
  30. function getGMTSeconds($stamp, $tzc) {
  31.     /* date couldn't be parsed */
  32.     if ($stamp == -1) {
  33.         return -1;
  34.     }
  35.     /* timezone correction, expressed as `shhmm' */
  36.     switch($tzc)
  37.     {
  38.         case 'Pacific':
  39.         case 'PST':
  40.             $tzc = '-0800';
  41.             break;
  42.         case 'Mountain':
  43.         case 'MST':
  44.         case 'PDT':
  45.             $tzc = '-0700';
  46.             break;
  47.         case 'Central':
  48.         case 'CST':
  49.         case 'MDT':
  50.             $tzc = '-0600';
  51.             break;
  52.         case 'Eastern':
  53.         case 'EST':
  54.         case 'CDT':
  55.             $tzc = '-0500';
  56.             break;
  57.         case 'EDT':
  58.             $tzc = '-0400';
  59.             break;
  60.         case 'GMT':
  61.             $tzc = '+0000';
  62.             break;
  63.         case 'BST':
  64.         case 'MET':
  65.         case 'CET':
  66.             $tzc = '+0100';
  67.             break;
  68.         case 'EET':
  69.         case 'IST':
  70.         case 'MET DST':
  71.         case 'METDST':
  72.     case 'MEST':
  73.     case 'CEST':
  74.             $tzc = '+0200';
  75.             break;
  76.         case 'HKT':
  77.             $tzc = '+0800';
  78.             break;
  79.         case 'JST':
  80.         case 'KST':
  81.             $tzc = '+0900';
  82.             break;
  83.     }
  84.     $neg = false;
  85.     if (substr($tzc, 0, 1) == '-') {
  86.         $neg = true;
  87.     } else if (substr($tzc, 0, 1) != '+') {
  88.         $tzc = '+'.$tzc;
  89.     }
  90.     $hh = substr($tzc,1,2);
  91.     $mm = substr($tzc,3,2);
  92.     $iTzc = ($hh * 60 + $mm) * 60;
  93.     if ($neg) $iTzc = -1 * (int) $iTzc;
  94.     /* stamp in gmt */
  95.     $stamp -= $iTzc;
  96.     /* now find what the server is at */
  97.     $current = date('Z', time());
  98.     /* stamp in local timezone */
  99.     $stamp += $current;
  100.  
  101.     return $stamp;
  102. }
  103.  
  104. /**
  105.  * Returns the (localized) string for a given day number.
  106.  * Switch system has been intentionaly chosen for the
  107.  * internationalization of month and day names. The reason
  108.  * is to make sure that _("") strings will go into the
  109.  * main po.
  110.  *
  111.  * @param int day_number the day number
  112.  * @return string the day in human readable form
  113.  */
  114. function getDayName( $day_number ) {
  115.  
  116.     switch( $day_number ) {
  117.     case 0:
  118.         $ret = _("Sunday");
  119.         break;
  120.     case 1:
  121.         $ret = _("Monday");
  122.         break;
  123.     case 2:
  124.         $ret = _("Tuesday");
  125.         break;
  126.     case 3:
  127.         $ret = _("Wednesday");
  128.         break;
  129.     case 4:
  130.         $ret = _("Thursday");
  131.         break;
  132.     case 5:
  133.         $ret = _("Friday");
  134.         break;
  135.     case 6:
  136.         $ret = _("Saturday");
  137.         break;
  138.     default:
  139.         $ret = '';
  140.     }
  141.     return( $ret );
  142. }
  143.  
  144. /**
  145.  * Like getDayName, but returns the short form
  146.  * @param int day_number the day number
  147.  * @return string the day in short human readable form
  148.  */
  149. function getDayAbrv( $day_number ) {
  150.  
  151.     switch( $day_number ) {
  152.     case 0:
  153.         $ret = _("Sun");
  154.         break;
  155.     case 1:
  156.         $ret = _("Mon");
  157.         break;
  158.     case 2:
  159.         $ret = _("Tue");
  160.         break;
  161.     case 3:
  162.         $ret = _("Wed");
  163.         break;
  164.     case 4:
  165.         $ret = _("Thu");
  166.         break;
  167.     case 5:
  168.         $ret = _("Fri");
  169.         break;
  170.     case 6:
  171.         $ret = _("Sat");
  172.         break;
  173.     default:
  174.         $ret = '';
  175.     }
  176.     return( $ret );
  177. }
  178.  
  179.  
  180. /**
  181.  * Returns the (localized) string for a given month number.
  182.  *
  183.  * @param string month_number the month number (01..12)
  184.  * @return string the month name in human readable form
  185.  */
  186. function getMonthName( $month_number ) {
  187.     switch( $month_number ) {
  188.      case '01':
  189.         $ret = _("January");
  190.         break;
  191.      case '02':
  192.         $ret = _("February");
  193.         break;
  194.      case '03':
  195.         $ret = _("March");
  196.         break;
  197.      case '04':
  198.         $ret = _("April");
  199.         break;
  200.      case '05':
  201.         $ret = _("May");
  202.         break;
  203.      case '06':
  204.         $ret = _("June");
  205.         break;
  206.      case '07':
  207.         $ret = _("July");
  208.         break;
  209.      case '08':
  210.         $ret = _("August");
  211.         break;
  212.      case '09':
  213.         $ret = _("September");
  214.         break;
  215.      case '10':
  216.         $ret = _("October");
  217.         break;
  218.      case '11':
  219.         $ret = _("November");
  220.         break;
  221.      case '12':
  222.         $ret = _("December");
  223.         break;
  224.      default:
  225.         $ret = '';
  226.     }
  227.     return( $ret );
  228. }
  229.  
  230. /**
  231.  * Returns the (localized) string for a given month number,
  232.  * short representation.
  233.  *
  234.  * @param string month_number the month number (01..12)
  235.  * @return string the shortened month in human readable form
  236.  */
  237. function getMonthAbrv( $month_number ) {
  238.     switch( $month_number ) {
  239.      case '01':
  240.         $ret = _("Jan");
  241.         break;
  242.      case '02':
  243.         $ret = _("Feb");
  244.         break;
  245.      case '03':
  246.         $ret = _("Mar");
  247.         break;
  248.      case '04':
  249.         $ret = _("Apr");
  250.         break;
  251.      case '05':
  252.         $ret = _("Ma&#121;");
  253.         break;
  254.      case '06':
  255.         $ret = _("Jun");
  256.         break;
  257.      case '07':
  258.         $ret = _("Jul");
  259.         break;
  260.      case '08':
  261.         $ret = _("Aug");
  262.         break;
  263.      case '09':
  264.         $ret = _("Sep");
  265.         break;
  266.      case '10':
  267.         $ret = _("Oct");
  268.         break;
  269.      case '11':
  270.         $ret = _("Nov");
  271.         break;
  272.      case '12':
  273.         $ret = _("Dec");
  274.         break;
  275.      default:
  276.         $ret = '';
  277.     }
  278.     return( $ret );
  279. }
  280.  
  281. /**
  282.  * Returns the localized representation of the date/time.
  283.  *
  284.  * @param string date_format The format for the date, like the input for the PHP date() function.
  285.  * @param int stamp the timestamp to convert
  286.  * @return string a full date representation
  287.  */
  288. function date_intl( $date_format, $stamp ) {
  289.     $ret = str_replace( array('D','F','l','M'), array('$1','$2','$3','$4'), $date_format );
  290.     // to reduce the date calls we retrieve m and w in the same call
  291.     $ret = date('w#m#'. $ret, $stamp );
  292.     // extract day and month in order to replace later by intl day and month
  293.     $aParts = explode('#',$ret);
  294.     $ret = str_replace(array('$1','$4','$2','$3',), 
  295.                        array(getDayAbrv($aParts[0]),
  296.                              getMonthAbrv($aParts[1]),
  297.                              getMonthName($aParts[1]),
  298.                              getDayName($aParts[0])),
  299.                        $aParts[2]);
  300.     return( $ret );
  301. }
  302.  
  303. /**
  304.  * This returns a date of the format "Wed, Oct 29, 2003 9:52 am",
  305.  * or the same in 24H format (depending on the user's settings),
  306.  * and taking localization into accout.
  307.  *
  308.  * @param int stamp the timestamp
  309.  * @param string fallback string to use when stamp not valid
  310.  * @return string the long date string
  311.  */
  312. function getLongDateString( $stamp, $fallback = '' ) {
  313.  
  314.     global $hour_format;
  315.  
  316.     if ($stamp == -1) {
  317.         return $fallback;
  318.     }
  319.  
  320.     if ( $hour_format == SMPREF_TIME_12HR ) {
  321.         $date_format = _("D, F j, Y g:i a");
  322.     } else {
  323.         $date_format = _("D, F j, Y H:i");
  324.     }
  325.  
  326.     return( date_intl( $date_format, $stamp ) );
  327.  
  328. }
  329.  
  330. /**
  331.  * Returns a short representation of the date,
  332.  * taking timezones and localization into account.
  333.  * Depending on user's settings, this string can be
  334.  * of the form: "14:23" or "Jun 14, 2003" depending
  335.  * on whether the stamp is "today" or not.
  336.  *
  337.  * @param int stamp the timestamp
  338.  * @return string the date string
  339.  */
  340. function getDateString( $stamp ) {
  341.  
  342.     global $invert_time, $hour_format, $show_full_date, $custom_date_format;
  343.  
  344.     if ( $stamp == -1 ) {
  345.        return '';
  346.     }
  347.  
  348.     $now = time();
  349.  
  350.     $dateZ = date('Z', $now );
  351.  
  352.     // FIXME: isn't this obsolete and introduced as a terrible workaround
  353.     // for bugs at other places which are fixed a long time ago?
  354.     if ($invert_time) {
  355.         $dateZ = - $dateZ;
  356.     }
  357.  
  358.     // calculate when it was midnight and when it will be,
  359.     // in order to display dates differently if they're 'today'
  360.     $midnight = $now - ($now % 86400) - $dateZ;
  361.     // this is to correct if after calculations midnight is more than
  362.     // one whole day away.
  363.     if ($now - $midnight > 86400) {
  364.         $midnight += 86400;
  365.     }
  366.     $nextmid = $midnight + 86400;
  367.  
  368.     $custom_date_format = trim($custom_date_format);
  369.     if (!empty($custom_date_format)) {
  370.         $date_format = $custom_date_format;
  371.     } else if ($show_full_date == 1 || $nextmid < $stamp) {
  372.         $date_format = _("M j, Y");
  373.     } else if ($midnight < $stamp) {
  374.         /* Today */
  375.         if ( $hour_format == SMPREF_TIME_12HR ) {
  376.             $date_format = _("g:i a");
  377.         } else {
  378.             $date_format = _("H:i");
  379.         }
  380.     } else if ($midnight - 518400 < $stamp) {
  381.         /* This week */
  382.         if ( $hour_format == SMPREF_TIME_12HR ) {
  383.             $date_format = _("D, g:i a");
  384.         } else {
  385.             $date_format = _("D, H:i");
  386.         }
  387.     } else {
  388.         /* before this week */
  389.         $date_format = _("M j, Y");
  390.     }
  391.  
  392.     return( date_intl( $date_format, $stamp ) );
  393. }
  394.  
  395. /**
  396.  * Decodes a RFC 822 Date-header into a timestamp
  397.  *
  398.  * @param array dateParts the Date-header split by whitespace
  399.  * @return int the timestamp calculated from the header
  400.  */
  401. function getTimeStamp($dateParts) {
  402.     /* $dateParts[0] == <day of week>   Mon, Tue, Wed
  403.      * $dateParts[1] == <day of month>  23
  404.      * $dateParts[2] == <month>         Jan, Feb, Mar
  405.      * $dateParts[3] == <year>          1999
  406.      * $dateParts[4] == <time>          18:54:23 (HH:MM:SS)
  407.      * $dateParts[5] == <from GMT>      +0100
  408.      * $dateParts[6] == <zone>          (EDT)
  409.      *
  410.      * NOTE:  In RFC 822, it states that <day of week> is optional.
  411.      *        In that case, dateParts[0] would be the <day of month>
  412.      *        and everything would be bumped up one.
  413.      */
  414.  
  415.     if (count($dateParts) <2) {
  416.         return -1;
  417.     } else if (count($dateParts) ==3) {
  418.         if (substr_count($dateParts[0],'-') == 2 &&
  419.             substr_count($dateParts[1],':') == 2) {
  420.             //  dd-Month-yyyy 23:19:05 +0200
  421.             //  redefine the date
  422.             $aDate = explode('-',$dateParts[0]);
  423.             $newDate = array($aDate[0],$aDate[1],$aDate[2],$dateParts[1],$dateParts[2]);
  424.             $dateParts = $newDate;
  425.         }
  426.     }
  427.  
  428.     /*
  429.      * Simply check to see if the first element in the dateParts
  430.      * array is an integer or not.
  431.      * Since the day of week is optional, this check is needed.
  432.      */
  433.     if (!is_numeric(trim($dateParts[0]))) {
  434.         /* cope with broken mailers that send "Tue,23" without space */
  435.         if ( preg_match ('/^\w+,(\d{1,2})$/', $dateParts[0], $match) ) {
  436.             /* replace Tue,23 with 23 */
  437.             $dateParts[0] = $match[1];
  438.         } else {
  439.             /* just drop the day of week */
  440.             array_shift($dateParts);
  441.         }
  442.     }
  443.  
  444.     /* calculate timestamp separated from the zone and obs-zone */
  445.     $stamp = strtotime(implode (' ', array_splice ($dateParts,0,4)));
  446.     if (!isset($dateParts[0])) {
  447.         $dateParts[0] = '+0000';
  448.     }
  449.  
  450.     if (!preg_match('/^[+-]{1}[0-9]{4}$/',$dateParts[0])) {
  451.         /* zone in obs-zone format */
  452.         if (preg_match('/\((.+)\)/',$dateParts[0],$regs)) {
  453.             $obs_zone = $regs[1];
  454.         } else {
  455.             $obs_zone = $dateParts[0];
  456.         }
  457.         return getGMTSeconds($stamp, $obs_zone);
  458.     } else {
  459.         return getGMTSeconds($stamp, $dateParts[0]);
  460.     }
  461. }

Documentation generated on Fri, 24 May 2013 04:18:56 +0200 by phpDocumentor 1.4.3