diff options
Diffstat (limited to 'includes/Date/Calc.php')
| -rw-r--r-- | includes/Date/Calc.php | 1531 |
1 files changed, 0 insertions, 1531 deletions
diff --git a/includes/Date/Calc.php b/includes/Date/Calc.php deleted file mode 100644 index 349f3a8..0000000 --- a/includes/Date/Calc.php +++ /dev/null @@ -1,1531 +0,0 @@ -<?php -// The constant telling us what day starts the week. Monday (1) is the -// international standard. Redefine this to 0 if you want weeks to -// begin on Sunday. -if(!defined('DATE_CALC_BEGIN_WEEKDAY')) { -define('DATE_CALC_BEGIN_WEEKDAY', 1); -} -/** - * Date_Calc is a calendar class used to calculate and - * manipulate calendar dates and retrieve dates in a calendar - * format. It does not rely on 32-bit system date stamps, so - * you can display calendars and compare dates that date - * pre 1970 and post 2038. - * - * This source file is subject to version 2.02 of the PHP license, - * that is bundled with this package in the file LICENSE, and is - * available at through the world-wide-web at - * http://www.php.net/license/2_02.txt. - * If you did not receive a copy of the PHP license and are unable to - * obtain it through the world-wide-web, please send a note to - * license@php.net so we can mail you a copy immediately. - * - * Copyright (c) 1999, 2002, 2003 ispi - * - * @access public - * - * @version 1.2.6 - * @author Monte Ohrt <monte@ispi.net> - */ -class Date_Calc -{ - /** - * Returns the current local date. NOTE: This function - * retrieves the local date using strftime(), which may - * or may not be 32-bit safe on your system. - * - * @param string the strftime() format to return the date - * - * @access public - * - * @return string the current date in specified format - */ - function dateNow($format="%Y%m%d") - { - return(strftime($format,time())); - } // end func dateNow - /** - * Returns true for valid date, false for invalid date. - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * - * @access public - * - * @return boolean true/false - */ - function is_validDate($day, $month, $year) - { - if($year < 0 || $year > 9999) { - return false; - } - if(!checkdate($month,$day,$year)) { - return false; - } - return true; - } // end func is_validDate - /** - * Returns true for a leap year, else false - * - * @param string year in format CCYY - * - * @access public - * - * @return boolean true/false - */ - function isLeapYear($year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(strlen($year) != 4) { - return false; - } - if(preg_match("/\D/",$year)) { - return false; - } - return (($year % 4 == 0 && $year % 100 != 0) || $year % 400 == 0); - } // end func isLeapYear - /** - * Determines if given date is a future date from now. - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * - * @access public - * - * @return boolean true/false - */ - function isFutureDate($day,$month,$year) - { - $this_year = Date_Calc::dateNow("%Y"); - $this_month = Date_Calc::dateNow("%m"); - $this_day = Date_Calc::dateNow("%d"); - if($year > $this_year) { - return true; - } elseif($year == $this_year) { - if($month > $this_month) { - return true; - } elseif($month == $this_month) { - if($day > $this_day) { - return true; - } - } - } - return false; - } // end func isFutureDate - /** - * Determines if given date is a past date from now. - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * - * @access public - * - * @return boolean true/false - */ - function isPastDate($day,$month,$year) - { - $this_year = Date_Calc::dateNow("%Y"); - $this_month = Date_Calc::dateNow("%m"); - $this_day = Date_Calc::dateNow("%d"); - if($year < $this_year) { - return true; - } elseif($year == $this_year) { - if($month < $this_month) { - return true; - } elseif($month == $this_month) { - if($day < $this_day) { - return true; - } - } - } - return false; - } // end func isPastDate - /** - * Returns day of week for given date, 0=Sunday - * - * @param string year in format CCYY, default is current local year - * @param string month in format MM, default is current local month - * @param string day in format DD, default is current local day - * - * @access public - * - * @return int $weekday_number - */ - function dayOfWeek($day="",$month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - if($month > 2) { - $month -= 2; - } else { - $month += 10; - $year--; - } - $day = ( floor((13 * $month - 1) / 5) + - $day + ($year % 100) + - floor(($year % 100) / 4) + - floor(($year / 100) / 4) - 2 * - floor($year / 100) + 77); - $weekday_number = (($day - 7 * floor($day / 7))); - return $weekday_number; - } // end func dayOfWeek - /** - * Returns week of the year, first Sunday is first day of first week - * - * @param string day in format DD - * @param string month in format MM - * @param string year in format CCYY - * - * @access public - * - * @return integer $week_number - */ - function weekOfYear($day,$month,$year) - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $iso = Date_Calc::gregorianToISO($day, $month, $year); - $parts = explode('-',$iso); - $week_number = intval($parts[1]); - return $week_number; - } // end func weekOfYear - /** - * Returns number of days since 31 December of year before given date. - * - * @param string year in format CCYY, default is current local year - * @param string month in format MM, default is current local month - * @param string day in format DD, default is current local day - * - * @access public - * - * @return int $julian - */ - function julianDate($day="",$month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = array(0,31,59,90,120,151,181,212,243,273,304,334); - $julian = ($days[$month - 1] + $day); - if($month > 2 && Date_Calc::isLeapYear($year)) { - $julian++; - } - return($julian); - } // end func julianDate - /** - * Returns quarter of the year for given date - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * - * @access public - * - * @return int $year_quarter - */ - function quarterOfYear($day="",$month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $year_quarter = (intval(($month - 1) / 3 + 1)); - return $year_quarter; - } // end func quarterOfYear - /** - * Returns date of begin of next month of given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfNextMonth($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - if($month < 12) { - $month++; - $day=1; - } else { - $year++; - $month=1; - $day=1; - } - return Date_Calc::dateFormat($day,$month,$year,$format); - } // end func beginOfNextMonth - /** - * Returns date of the last day of next month of given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function endOfNextMonth($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - if($month < 12) { - $month++; - } else { - $year++; - $month=1; - } - $day = Date_Calc::daysInMonth($month,$year); - return Date_Calc::dateFormat($day,$month,$year,$format); - } // end func endOfNextMonth - /** - * Returns date of the first day of previous month of given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfPrevMonth($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - if($month > 1) { - $month--; - $day=1; - } else { - $year--; - $month=12; - $day=1; - } - return Date_Calc::dateFormat($day,$month,$year,$format); - } // end func beginOfPrevMonth - /** - * Returns date of the last day of previous month for given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function endOfPrevMonth($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - if($month > 1) { - $month--; - } else { - $year--; - $month=12; - } - $day = Date_Calc::daysInMonth($month,$year); - return Date_Calc::dateFormat($day,$month,$year,$format); - } // end func endOfPrevMonth - /** - * Returns date of the next weekday of given date, - * skipping from Friday to Monday. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function nextWeekday($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - if(Date_Calc::dayOfWeek($day,$month,$year) == 5) { - $days += 3; - } elseif(Date_Calc::dayOfWeek($day,$month,$year) == 6) { - $days += 2; - } else { - $days += 1; - } - return(Date_Calc::daysToDate($days,$format)); - } // end func nextWeekday - /** - * Returns date of the previous weekday, - * skipping from Monday to Friday. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function prevWeekday($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - if(Date_Calc::dayOfWeek($day,$month,$year) == 1) { - $days -= 3; - } elseif(Date_Calc::dayOfWeek($day,$month,$year) == 0) { - $days -= 2; - } else { - $days -= 1; - } - return(Date_Calc::daysToDate($days,$format)); - } // end func prevWeekday - /** - * Returns date of the next specific day of the week - * from the given date. - * - * @param int day of week, 0=Sunday - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param boolean onOrAfter if true and days are same, returns current day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function nextDayOfWeek($dow,$day='',$month="",$year="",$format="%Y%m%d",$onOrAfter=false) - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - $curr_weekday = Date_Calc::dayOfWeek($day,$month,$year); - if($curr_weekday == $dow) { - if(!$onOrAfter) { - $days += 7; - } - } - elseif($curr_weekday > $dow) { - $days += 7 - ( $curr_weekday - $dow ); - } else { - $days += $dow - $curr_weekday; - } - return(Date_Calc::daysToDate($days,$format)); - } // end func nextDayOfWeek - /** - * Returns date of the previous specific day of the week - * from the given date. - * - * @param int day of week, 0=Sunday - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param boolean onOrBefore if true and days are same, returns current day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function prevDayOfWeek($dow,$day="",$month="",$year="",$format="%Y%m%d",$onOrBefore=false) - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - $curr_weekday = Date_Calc::dayOfWeek($day,$month,$year); - if($curr_weekday == $dow) { - if(!$onOrBefore) { - $days -= 7; - } - } - elseif($curr_weekday < $dow) { - $days -= 7 - ( $dow - $curr_weekday ); - } else { - $days -= $curr_weekday - $dow; - } - return(Date_Calc::daysToDate($days,$format)); - } // end func prevDayOfWeek - /** - * Returns date of the next specific day of the week - * on or before the given date. - * - * @param int day of week, 0=Sunday - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function nextDayOfWeekOnOrAfter($dow,$day="",$month="",$year="",$format="%Y%m%d") - { - return(Date_Calc::nextDayOfWeek($dow,$day="",$month="",$year="",$format="%Y%m%d",true)); - } // end func nextDayOfWeekOnOrAfter - /** - * Returns date of the previous specific day of the week - * on or before the given date. - * - * @param int day of week, 0=Sunday - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function prevDayOfWeekOnOrBefore($dow,$day="",$month="",$year="",$format="%Y%m%d") - { - return(Date_Calc::prevDayOfWeek($dow,$day="",$month="",$year="",$format="%Y%m%d",true)); - } // end func prevDayOfWeekOnOrAfter - /** - * Returns date of day after given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function nextDay($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - return(Date_Calc::daysToDate($days + 1,$format)); - } // end func nextDay - /** - * Returns date of day before given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function prevDay($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $days = Date_Calc::dateToDays($day,$month,$year); - return(Date_Calc::daysToDate($days - 1,$format)); - } // end func prevDay - /** - * Sets century for 2 digit year. - * 51-99 is 19, else 20 - * - * @param string 2 digit year - * - * @access public - * - * @return string 4 digit year - */ - function defaultCentury($year) - { - if(strlen($year) == 1) { - $year = "0$year"; - } - if($year > 50) { - return( "19$year" ); - } else { - return( "20$year" ); - } - } // end func defaultCentury - /** - * Returns number of days between two given dates. - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * - * @access public - * - * @return int absolute number of days between dates, - * -1 if there is an error. - */ - function dateDiff($day1,$month1,$year1,$day2,$month2,$year2) - { - if(!Date_Calc::is_validDate($day1,$month1,$year1)) { - return -1; - } - if(!Date_Calc::is_validDate($day2,$month2,$year2)) { - return -1; - } - return(abs((Date_Calc::dateToDays($day1,$month1,$year1)) - - (Date_Calc::dateToDays($day2,$month2,$year2)))); - } // end func dateDiff - /** - * Compares two dates - * - * @param string $day1 day in format DD - * @param string $month1 month in format MM - * @param string $year1 year in format CCYY - * @param string $day2 day in format DD - * @param string $month2 month in format MM - * @param string $year2 year in format CCYY - * - * @access public - * @return int 0 on equality, 1 if date 1 is greater, -1 if smaller - */ - function compareDates($day1,$month1,$year1,$day2,$month2,$year2) - { - $ndays1 = Date_Calc::dateToDays($day1, $month1, $year1); - $ndays2 = Date_Calc::dateToDays($day2, $month2, $year2); - if ($ndays1 == $ndays2) { - return 0; - } - return ($ndays1 > $ndays2) ? 1 : -1; - } // end func compareDates - /** - * Find the number of days in the given month. - * - * @param string month in format MM, default current local month - * - * @access public - * - * @return int number of days - */ - function daysInMonth($month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if($month == 2) { - if(Date_Calc::isLeapYear($year)) { - return 29; - } else { - return 28; - } - } elseif($month == 4 or $month == 6 or $month == 9 or $month == 11) { - return 30; - } else { - return 31; - } - } // end func daysInMonth - /** - * Returns the number of rows on a calendar month. Useful for - * determining the number of rows when displaying a typical - * month calendar. - * - * @param string month in format MM, default current local month - * @param string year in format YYCC, default current local year - * - * @access public - * - * @return int number of weeks - */ - function weeksInMonth($month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(DATE_CALC_BEGIN_WEEKDAY == 1) { - if(Date_Calc::firstOfMonthWeekday($month,$year) == 0) { - $first_week_days = 1; - } else { - $first_week_days = - 7 - (Date_Calc::firstOfMonthWeekday($month,$year) - 1); - } - } else { - $first_week_days = 7 - Date_Calc::firstOfMonthWeekday($month,$year); - } - return ceil(((Date_Calc::daysInMonth($month,$year) - $first_week_days) / 7) + 1); - } // end func weeksInMonth - /** - * Find the day of the week for the first of the month of given date. - * - * @param string year in format CCYY, default to current local year - * @param string month in format MM, default to current local month - * - * @access public - * - * @return int number of weekday for the first day, 0=Sunday - */ - function firstOfMonthWeekday($month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - return(Date_Calc::dayOfWeek("01",$month,$year)); - } // end func firstOfMonthWeekday - /** - * Return date of first day of month of given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfMonth($month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - return(Date_Calc::dateFormat("01",$month,$year,$format)); - } // end of func beginOfMonth - /** - * Find the month day of the beginning of week for given date, - * using DATE_CALC_BEGIN_WEEKDAY. (can return weekday of prev month.) - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfWeek($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $this_weekday = Date_Calc::dayOfWeek($day,$month,$year); - if(DATE_CALC_BEGIN_WEEKDAY == 1) { - if($this_weekday == 0) { - $beginOfWeek = Date_Calc::dateToDays($day,$month,$year) - 6; - } else { - $beginOfWeek = Date_Calc::dateToDays($day,$month,$year) - - $this_weekday + 1; - } - } else { - $beginOfWeek = (Date_Calc::dateToDays($day,$month,$year) - - $this_weekday); - } - /* $beginOfWeek = (Date_Calc::dateToDays($day,$month,$year) - - ($this_weekday - DATE_CALC_BEGIN_WEEKDAY)); */ - return(Date_Calc::daysToDate($beginOfWeek,$format)); - } // end of func beginOfWeek - /** - * Find the month day of the end of week for given date, - * using DATE_CALC_BEGIN_WEEKDAY. (can return weekday - * of following month.) - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function endOfWeek($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $this_weekday = Date_Calc::dayOfWeek($day,$month,$year); - $last_dayOfWeek = (Date_Calc::dateToDays($day,$month,$year) - + (6 - $this_weekday + DATE_CALC_BEGIN_WEEKDAY)); - return(Date_Calc::daysToDate($last_dayOfWeek,$format)); - } // end func endOfWeek - /** - * Find the month day of the beginning of week after given date, - * using DATE_CALC_BEGIN_WEEKDAY. (can return weekday of prev month.) - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfNextWeek($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $date = Date_Calc::daysToDate(Date_Calc::dateToDays($day+7,$month,$year),"%Y%m%d"); - $next_week_year = substr($date,0,4); - $next_week_month = substr($date,4,2); - $next_week_day = substr($date,6,2); - $this_weekday = - Date_Calc::dayOfWeek($next_week_day,$next_week_month,$next_week_year); - $beginOfWeek = (Date_Calc::dateToDays($next_week_day,$next_week_month,$next_week_year) - - ($this_weekday - DATE_CALC_BEGIN_WEEKDAY)); - return(Date_Calc::daysToDate($beginOfWeek,$format)); - } // end func beginOfNextWeek - /** - * Find the month day of the beginning of week before given date, - * using DATE_CALC_BEGIN_WEEKDAY. (can return weekday of prev month.) - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function beginOfPrevWeek($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $date = Date_Calc::daysToDate(Date_Calc::dateToDays($day-7,$month,$year),"%Y%m%d"); - $next_week_year = substr($date,0,4); - $next_week_month = substr($date,4,2); - $next_week_day = substr($date,6,2); - $this_weekday = - Date_Calc::dayOfWeek($next_week_day,$next_week_month,$next_week_year); - $beginOfWeek = (Date_Calc::dateToDays($next_week_day,$next_week_month,$next_week_year) - - ($this_weekday - DATE_CALC_BEGIN_WEEKDAY)); - return(Date_Calc::daysToDate($beginOfWeek,$format)); - } // end func beginOfPrevWeek - /** - * Return an array with days in week - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param string format for returned date - * - * @access public - * - * @return array $week[$weekday] - */ - function getCalendarWeek($day="",$month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $week_array = array(); - // date for the column of week - $curr_day = Date_Calc::beginOfWeek($day,$month,$year,"%E"); - for($counter=0; $counter <= 6; $counter++) { - $week_array[$counter] = Date_Calc::daysToDate($curr_day,$format); - $curr_day++; - } - return $week_array; - } // end func getCalendarWeek - /** - * Return a set of arrays to construct a calendar month for - * the given date. - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string format for returned date - * - * @access public - * - * @return array $month[$row][$col] - */ - function getCalendarMonth($month="",$year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - $month_array = array(); - // date for the first row, first column of calendar month - if(DATE_CALC_BEGIN_WEEKDAY == 1) { - if(Date_Calc::firstOfMonthWeekday($month,$year) == 0) { - $curr_day = Date_Calc::dateToDays("01",$month,$year) - 6; - } else { - $curr_day = Date_Calc::dateToDays("01",$month,$year) - - Date_Calc::firstOfMonthWeekday($month,$year) + 1; - } - } else { - $curr_day = (Date_Calc::dateToDays("01",$month,$year) - - Date_Calc::firstOfMonthWeekday($month,$year)); - } - // number of days in this month - $daysInMonth = Date_Calc::daysInMonth($month,$year); - $weeksInMonth = Date_Calc::weeksInMonth($month,$year); - for($row_counter=0; $row_counter < $weeksInMonth; $row_counter++) { - for($column_counter=0; $column_counter <= 6; $column_counter++) { - $month_array[$row_counter][$column_counter] = - Date_Calc::daysToDate($curr_day,$format); - $curr_day++; - } - } - return $month_array; - } // end func getCalendarMonth - /** - * Return a set of arrays to construct a calendar year for - * the given date. - * - * @param string year in format CCYY, default current local year - * @param string format for returned date - * - * @access public - * - * @return array $year[$month][$row][$col] - */ - function getCalendarYear($year="",$format="%Y%m%d") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - $year_array = array(); - for($curr_month=0; $curr_month <=11; $curr_month++) { - $year_array[$curr_month] = - Date_Calc::getCalendarMonth(sprintf("%02d",$curr_month+1),$year,$format); - } - return $year_array; - } // end func getCalendarYear - /** - * Converts a date to number of days since a - * distant unspecified epoch. - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * - * @access public - * - * @return integer number of days - */ - function dateToDays($day,$month,$year) - { - $century = (int) substr($year,0,2); - $year = (int) substr($year,2,2); - if($month > 2) { - $month -= 3; - } else { - $month += 9; - if($year) { - $year--; - } else { - $year = 99; - $century --; - } - } - return (floor(( 146097 * $century) / 4 ) + - floor(( 1461 * $year) / 4 ) + - floor(( 153 * $month + 2) / 5 ) + - $day + 1721119); - } // end func dateToDays - /** - * Converts number of days to a distant unspecified epoch. - * - * @param int number of days - * @param string format for returned date - * - * @access public - * - * @return string date in specified format - */ - function daysToDate($days,$format="%Y%m%d") - { - $days -= 1721119; - $century = floor(( 4 * $days - 1) / 146097); - $days = floor(4 * $days - 1 - 146097 * $century); - $day = floor($days / 4); - $year = floor(( 4 * $day + 3) / 1461); - $day = floor(4 * $day + 3 - 1461 * $year); - $day = floor(($day + 4) / 4); - $month = floor(( 5 * $day - 3) / 153); - $day = floor(5 * $day - 3 - 153 * $month); - $day = floor(($day + 5) / 5); - if($month < 10) { - $month +=3; - } else { - $month -=9; - if($year++ == 99) { - $year = 0; - $century++; - } - } - $century = sprintf("%02d",$century); - $year = sprintf("%02d",$year); - return(Date_Calc::dateFormat($day,$month,$century.$year,$format)); - } // end func daysToDate - /** - * Calculates the date of the Nth weekday of the month, - * such as the second Saturday of January 2000. - * - * @param string occurance: 1=first, 2=second, 3=third, etc. - * @param string dayOfWeek: 0=Sunday, 1=Monday, etc. - * @param string year in format CCYY - * @param string month in format MM - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function NWeekdayOfMonth($occurance,$dayOfWeek,$month,$year,$format="%Y%m%d") - { - $year = sprintf("%04d",$year); - $month = sprintf("%02d",$month); - $DOW1day = sprintf("%02d",(($occurance - 1) * 7 + 1)); - $DOW1 = Date_Calc::dayOfWeek($DOW1day,$month,$year); - $wdate = ($occurance - 1) * 7 + 1 + - (7 + $dayOfWeek - $DOW1) % 7; - if( $wdate > Date_Calc::daysInMonth($month,$year)) { - return -1; - } else { - return(Date_Calc::dateFormat($wdate,$month,$year,$format)); - } - } // end func NWeekdayOfMonth - /** - * Formats the date in the given format, much like - * strfmt(). This function is used to alleviate the - * problem with 32-bit numbers for dates pre 1970 - * or post 2038, as strfmt() has on most systems. - * Most of the formatting options are compatible. - * - * formatting options: - * - * %a abbreviated weekday name (Sun, Mon, Tue) - * %A full weekday name (Sunday, Monday, Tuesday) - * %b abbreviated month name (Jan, Feb, Mar) - * %B full month name (January, February, March) - * %d day of month (range 00 to 31) - * %e day of month, single digit (range 0 to 31) - * %E number of days since unspecified epoch (integer) - * (%E is useful for passing a date in a URL as - * an integer value. Then simply use - * daysToDate() to convert back to a date.) - * %j day of year (range 001 to 366) - * %m month as decimal number (range 1 to 12) - * %n newline character (\n) - * %t tab character (\t) - * %w weekday as decimal (0 = Sunday) - * %U week number of current year, first sunday as first week - * %y year as decimal (range 00 to 99) - * %Y year as decimal including century (range 0000 to 9999) - * %% literal '%' - * - * @param string year in format CCYY - * @param string month in format MM - * @param string day in format DD - * @param string format for returned date - * - * @access public - * - * @return string date in given format - */ - function dateFormat($day,$month,$year,$format) - { - if(!Date_Calc::is_validDate($day,$month,$year)) { - $year = Date_Calc::dateNow("%Y"); - $month = Date_Calc::dateNow("%m"); - $day = Date_Calc::dateNow("%d"); - } - $output = ""; - for($strpos = 0; $strpos < strlen($format); $strpos++) { - $char = substr($format,$strpos,1); - if($char == "%") { - $nextchar = substr($format,$strpos + 1,1); - switch($nextchar) { - case "a": - $output .= Date_Calc::getWeekdayAbbrname($day,$month,$year); - break; - case "A": - $output .= Date_Calc::getWeekdayFullname($day,$month,$year); - break; - case "b": - $output .= Date_Calc::getMonthAbbrname($month); - break; - case "B": - $output .= Date_Calc::getMonthFullname($month); - break; - case "d": - $output .= sprintf("%02d",$day); - break; - case "e": - $output .= $day; - break; - case "E": - $output .= Date_Calc::dateToDays($day,$month,$year); - break; - case "j": - $output .= Date_Calc::julianDate($day,$month,$year); - break; - case "m": - $output .= sprintf("%02d",$month); - break; - case "n": - $output .= "\n"; - break; - case "t": - $output .= "\t"; - break; - case "w": - $output .= Date_Calc::dayOfWeek($day,$month,$year); - break; - case "U": - $output .= Date_Calc::weekOfYear($day,$month,$year); - break; - case "y": - $output .= substr($year,2,2); - break; - case "Y": - $output .= $year; - break; - case "%": - $output .= "%"; - break; - default: - $output .= $char.$nextchar; - } - $strpos++; - } else { - $output .= $char; - } - } - return $output; - } // end func dateFormat - /** - * Returns the current local year in format CCYY - * - * @access public - * - * @return string year in format CCYY - */ - function getYear() - { - return Date_Calc::dateNow("%Y"); - } // end func getYear - /** - * Returns the current local month in format MM - * - * @access public - * - * @return string month in format MM - */ - function getMonth() - { - return Date_Calc::dateNow("%m"); - } // end func getMonth - /** - * Returns the current local day in format DD - * - * @access public - * - * @return string day in format DD - */ - function getDay() - { - return Date_Calc::dateNow("%d"); - } // end func getDay - /** - * Returns the full month name for the given month - * - * @param string month in format MM - * - * @access public - * - * @return string full month name - */ - function getMonthFullname($month) - { - $month = (int)$month; - if(empty($month)) { - $month = (int) Date_Calc::dateNow("%m"); - } - $month_names = Date_Calc::getMonthNames(); - return $month_names[$month]; - // getMonthNames returns months with correct indexes - //return $month_names[($month - 1)]; - } // end func getMonthFullname - /** - * Returns the abbreviated month name for the given month - * - * @param string month in format MM - * @param int optional length of abbreviation, default is 3 - * - * @access public - * - * @return string abbreviated month name - * @see Date_Calc::getMonthFullname - */ - function getMonthAbbrname($month,$length=3) - { - $month = (int)$month; - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - return mb_substr(Date_Calc::getMonthFullname($month), 0, $length); - } // end func getMonthAbbrname - /** - * Returns the full weekday name for the given date - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * - * @access public - * - * @return string full month name - */ - function getWeekdayFullname($day="",$month="",$year="") - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - $weekday_names = Date_Calc::getWeekDays(); - $weekday = Date_Calc::dayOfWeek($day,$month,$year); - return $weekday_names[$weekday]; - } // end func getWeekdayFullname - /** - * Returns the abbreviated weekday name for the given date - * - * @param string year in format CCYY, default current local year - * @param string month in format MM, default current local month - * @param string day in format DD, default current local day - * @param int optional length of abbreviation, default is 3 - * - * @access public - * - * @return string full month name - * @see Date_Calc::getWeekdayFullname - */ - function getWeekdayAbbrname($day="",$month="",$year="",$length=3) - { - if(empty($year)) { - $year = Date_Calc::dateNow("%Y"); - } - if(empty($month)) { - $month = Date_Calc::dateNow("%m"); - } - if(empty($day)) { - $day = Date_Calc::dateNow("%d"); - } - return mb_substr(Date_Calc::getWeekdayFullname($day,$month,$year),0,$length); - } // end func getWeekdayFullname - /** - * Returns the numeric month from the month name or an abreviation - * - * Both August and Aug would return 8. - * Month name is case insensitive. - * - * @param string month name - * @return integer month number - */ - function getMonthFromFullName($month) - { - $month = strtolower($month); - $months = Date_Calc::getMonthNames(); - while(list($id, $name) = each($months)) { - if(ereg($month, strtolower($name))) { - return($id); - } - } - return(0); - } // end func getMonthFromFullName - /** - * Returns an array of month names - * - * Used to take advantage of the setlocale function to return - * language specific month names. - * XXX cache values to some global array to avoid preformace - * hits when called more than once. - * - * @returns array An array of month names - */ - function getMonthNames() - { - for($i=1;$i<13;$i++) { - $months[$i] = strftime('%B', mktime(0, 0, 0, $i, 1, 2001)); - } - return($months); - } // end func getMonthNames - /** - * Returns an array of week days - * - * Used to take advantage of the setlocale function to - * return language specific week days - * XXX cache values to some global array to avoid preformace - * hits when called more than once. - * - * @returns array An array of week day names - */ - function getWeekDays() - { - for($i=0;$i<7;$i++) { - $weekdays[$i] = strftime('%A', mktime(0, 0, 0, 1, $i, 2001)); - } - return($weekdays); - } // end func getWeekDays - /** - * Converts from Gregorian Year-Month-Day to ISO YearNumber-WeekNumber-WeekDay - * - * Uses ISO 8601 definitions. - * Algorithm from Rick McCarty, 1999 at http://personal.ecu.edu/mccartyr/ISOwdALG.txt - * - * @param int $year - * @param int $month - * @param int $day - * @return string - * @access public - */ - // Transcribed to PHP by Jesus M. Castagnetto (blame him if it is fubared ;-) - function gregorianToISO($day, $month, $year) { - $mnth = array (0,31,59,90,120,151,181,212,243,273,304,334); - $y_isleap = Date_Calc::isLeapYear($year); - $y_1_isleap = Date_Calc::isLeapYear($year - 1); - $day_of_year_number = $day + $mnth[$month - 1]; - if ($y_isleap && $month > 2) { - $day_of_year_number++; - } - // find Jan 1 weekday (monday = 1, sunday = 7) - $yy = ($year - 1) % 100; - $c = ($year - 1) - $yy; - $g = $yy + intval($yy/4); - $jan1_weekday = 1 + intval((((($c / 100) % 4) * 5) + $g) % 7); - // weekday for year-month-day - $h = $day_of_year_number + ($jan1_weekday - 1); - $weekday = 1 + intval(($h - 1) % 7); - // find if Y M D falls in YearNumber Y-1, WeekNumber 52 or - if ($day_of_year_number <= (8 - $jan1_weekday) && $jan1_weekday > 4){ - $yearnumber = $year - 1; - if ($jan1_weekday == 5 || ($jan1_weekday == 6 && $y_1_isleap)) { - $weeknumber = 53; - } else { - $weeknumber = 52; - } - } else { - $yearnumber = $year; - } - // find if Y M D falls in YearNumber Y+1, WeekNumber 1 - if ($yearnumber == $year) { - if ($y_isleap) { - $i = 366; - } else { - $i = 365; - } - if (($i - $day_of_year_number) < (4 - $weekday)) { - $yearnumber++; - $weeknumber = 1; - } - } - // find if Y M D falls in YearNumber Y, WeekNumber 1 through 53 - if ($yearnumber == $year) { - $j = $day_of_year_number + (7 - $weekday) + ($jan1_weekday - 1); - //$weeknumber = intval($j / 7) + 1; // kludge!!! - JMC - $weeknumber = intval($j / 7); // kludge!!! - JMC - if ($jan1_weekday > 4) { - $weeknumber--; - } - } - // put it all together - if ($weeknumber < 10) - $weeknumber = '0'.$weeknumber; - return "{$yearnumber}-{$weeknumber}-{$weekday}"; - } - /** - * Determines julian date of the given season - * Adapted from previous work in Java by James Mark Hamilton, mhamilton@qwest.net - * - * @author Robert Butler <rob@maxwellcreek.org> - * - * @param string is VERNALEQUINOX, SUMMERSOLSTICE, AUTUMNALEQUINOX, or WINTERSOLSTICE. - * @param string year in format CCYY, must be a calendar year between -1000BC and 3000AD. - * - * @access public - * - * @return float $juliandate - */ - function dateSeason ($season, $year = '') { - if ($year == '') { - $year = Date_Calc::dateNow('%Y'); - } - if (($year >= -1000) && ($year <= 1000)) { - $y = $year / 1000.0; - if ($season == "VERNALEQUINOX") { - $juliandate = (((((((-0.00071 * $y) - 0.00111) * $y) + 0.06134) * $y) + 365242.1374) * $y) + 1721139.29189; - } else if ($season == "SUMMERSOLSTICE") { - $juliandate = ((((((( 0.00025 * $y) + 0.00907) * $y) - 0.05323) * $y) + 365241.72562) * $y) + 1721233.25401; - } else if ($season == "AUTUMNALEQUINOX") { - $juliandate = ((((((( 0.00074 * $y) - 0.00297) * $y) - 0.11677) * $y) + 365242.49558) * $y) + 1721325.70455; - } else if ($season == "WINTERSOLSTICE") { - $juliandate = (((((((-0.00006 * $y) - 0.00933) * $y) - 0.00769) * $y) + 365242.88257) * $y) + 1721414.39987; - } - } elseif (($year > 1000) && ($year <= 3000)) { - $y = ($year - 2000) / 1000; - if ($season == "VERNALEQUINOX") { - $juliandate = (((((((-0.00057 * $y) - 0.00411) * $y) + 0.05169) * $y) + 365242.37404) * $y) + 2451623.80984; - } else if ($season == "SUMMERSOLSTICE") { - $juliandate = (((((((-0.0003 * $y) + 0.00888) * $y) + 0.00325) * $y) + 365241.62603) * $y) + 2451716.56767; - } else if ($season == "AUTUMNALEQUINOX") { - $juliandate = ((((((( 0.00078 * $y) + 0.00337) * $y) - 0.11575) * $y) + 365242.01767) * $y) + 2451810.21715; - } else if ($season == "WINTERSOLSTICE") { - $juliandate = ((((((( 0.00032 * $y) - 0.00823) * $y) - 0.06223) * $y) + 365242.74049) * $y) + 2451900.05952; - } - } - return ($juliandate); - } // end func dateSeason -} // end class Date_Calc -?>
\ No newline at end of file |