<?php
#########################################################################
#
# calendar_util.php - Version 10.0
#
#	This module has all the date and time calculation routines needed.
#
#########################################################################

#########################################################################
#
#function Get_Date
#
#This subroutine initializes the various months/days, and provides the
#time with the offset feature.
#
#########################################################################
function Get_Date () {

global $OFFSET, $year, $month, $mday;

$t;
$localtime = array();

$t = time() + ($OFFSET * 60 * 60);
$localtime = localtime($t,1);
$mday = $localtime["tm_mday"];
$month = $localtime["tm_mon"];
$month = $month+1;
$year = $localtime["tm_year"] +1900;

} #Get_Date


#########################################################################
#
# Calendar Routine
#
#########################################################################
function PerpetualCalendar ($perp_mon,$perp_day,$perp_year) {
	# This perpetual calendar routine provides accurate day/date
	# correspondences for dates from 1601 to 2899 A.D.  It is based on
	# the Gregorian calendar, so be aware that early correspondences
	# may not always be historically accurate.  The Gregorian calendar
	# was adopted by the Italian states, Portugal and Spain in 1582,
	# and by the Catholic German states in 1583.  However, it was not
	# adopted by the Protestant German states until 1699, by England
	# and its colonies until 1752, by Sweden until 1753, by Japan
	# until 1873, by China until 1912, by the Soviet Union until 1918,
	# and by Greece until 1923.

	global $perp_eom, $perp_dow;
	
	$day_counts = array (1 => 0, 2 => 31, 3 => 59, 4 => 90, 5 => 120, 6 => 151, 7 => 181, 8 => 212, 9 => 243, 10 => 273, 11 => 304, 12 => 334);
	$year_counts = array (1700,1800,1900,2100,2200,2300,2500,2600,2700);
	$perp_days = (($perp_year-1601)*365)+((int)(($perp_year-1601)/4));
	$perp_days += $day_counts[$perp_mon];
	$perp_days += $perp_day;
	$perp_sofar = $day_counts[$perp_mon];
	$perp_sofar += $perp_day;
	$perp_togo = 365-$perp_sofar;
	if ((int)(($perp_year-1600)/4) == (($perp_year-1600)/4) ) {
		$perp_togo++;
		if ($perp_mon > 2) {
			$perp_days++;
			$perp_sofar++;
			$perp_togo -= 1;
		}
	}
	for ($key=0; $key < count($year_counts); $key++) {
		if ((($perp_year == $year_counts[$key]) && ($perp_mon > 2))
		  || ($perp_year > $year_counts[$key])) {
			$perp_days -= 1;
		}
	}
	$perp_dow = $perp_days - ((int)($perp_days/7)*7);
	if ($perp_dow == 7) { $perp_dow = 0; }
	$perp_eom = 31;
	if (($perp_mon == 4) || ($perp_mon == 6)
	  || ($perp_mon == 9) || ($perp_mon == 11)) {
		$perp_eom = 30;
	}
	if (($perp_mon == 2)) {
		$perp_eom = 28;
	}
	if (((int)(($perp_year-1600)/4) == ((($perp_year-1600)/4)))
	  && ($perp_mon == 2)) {
		$perp_eom = 29;
	}
	for ($key=0; $key < count($year_counts); $key++) {
		if ($perp_year == $year_counts[$key]) {
			if ($perp_mon == 1) {
				$perp_togo -= 1;
			}
			elseif ($perp_mon == 2) {
				$perp_togo -= 1;
				$perp_eom = 28;
			}
			else {
				$perp_sofar -= 1;
			}
		}
	}
}# PerpetualCalendar
#########################################################################

# FILE: calendar_util.php
?>