<?php
  /**************************************************************************\
  * eGroupWare - Calendar Holidays                                           *
  * http://www.egroupware.org                                                *
  * Written by Mark Peters <skeeter@phpgroupware.org>                        *
  * --------------------------------------------                             *
  *  This program is free software; you can redistribute it and/or modify it *
  *  under the terms of the GNU General Public License as published by the   *
  *  Free Software Foundation; either version 2 of the License, or (at your  *
  *  option) any later version.                                              *
  \**************************************************************************/


	class calendar_holiday
	{
		var $db;
		var $year;
		var $tz_offset;
		var $holidays = Array();
		var $index = Array();
		var $users = Array();
		var $datetime;

		function calendar_holiday($owner='')
		{
			$this->datetime = CreateObject('phpgwapi.date_time');
			$this->db = $GLOBALS['phpgw']->db;
			if(@$GLOBALS['phpgw_info']['user']['preferences']['common']['country'])
			{
				$this->users['user'] = $GLOBALS['phpgw_info']['user']['preferences']['common']['country'];
			}
			else
			{
				$this->users['user'] = 'US';
			}
			$owner_id = get_account_id($owner);
			if($owner_id != $GLOBALS['phpgw_info']['user']['account_id'])
			{
				$owner_pref = CreateObject('phpgwapi.preferences',$owner_id);
				$owner_prefs = $owner_pref->read_repository();
				if(isset($owner_prefs['calendar']['locale']) && $owner_prefs['common']['country'])
				{
					$this->users['owner'] = $owner_prefs['common']['country'];
				}
				else
				{
					$this->users['owner'] = 'US';
				}
			}
			if($GLOBALS['phpgw_info']['server']['auto_load_holidays'] == True)
			{
				while(list($key,$value) = each($this->users))
				{
					$this->is_network_load_needed($value);
				}
			}
		}

		function is_network_load_needed($locale)
		{
			$sql = "SELECT count(*) FROM phpgw_cal_holidays WHERE locale='".$locale."'";
			$this->db->query($sql,__LINE__,__FILE__);
			$this->db->next_record();
			$rows = $this->db->f(0);
			if($rows==0)
			{
				$this->load_from_network($locale);
			}
		}

		function save_holiday($holiday)
		{
			if(isset($holiday['hol_id']) && $holiday['hol_id'])
			{
	//			echo "Updating LOCALE='".$holiday['locale']."' NAME='".$holiday['name']."' extra=(".$holiday['mday'].'/'.$holiday['month_num'].'/'.$holiday['occurence'].'/'.$holiday['dow'].'/'.$holiday['observance_rule'].")<br>\n";
				$sql = "UPDATE phpgw_cal_holidays SET name='".$holiday['name']."', mday=".$holiday['mday'].', month_num='.$holiday['month_num'].', occurence='.$holiday['occurence'].', dow='.$holiday['dow'].', observance_rule='.(int)$holiday['observance_rule'].' WHERE hol_id='.$holiday['hol_id'];
			}
			else
			{
	//			echo "Inserting LOCALE='".$holiday['locale']."' NAME='".$holiday['name']."' extra=(".$holiday['mday'].'/'.$holiday['month_num'].'/'.$holiday['occurence'].'/'.$holiday['dow'].'/'.$holiday['observance_rule'].")<br>\n";
				$sql = 'INSERT INTO phpgw_cal_holidays(locale,name,mday,month_num,occurence,dow,observance_rule) '
					. "VALUES('".strtoupper($holiday['locale'])."','".$holiday['name']."',".$holiday['mday'].','.$holiday['month_num'].','.$holiday['occurence'].','.$holiday['dow'].','.(int)$holiday['observance_rule'].")";
			}
			$this->db->query($sql,__LINE__,__FILE__);
		}

		function delete_holiday($id)
		{
			$sql = 'DELETE FROM phpgw_cal_holidays WHERE hol_id='.$id;
			$this->db->query($sql,__LINE__,__FILE__);
		}

		function delete_locale($locale)
		{
			$sql = "DELETE FROM phpgw_cal_holidays WHERE locale='".$locale."'";
			$this->db->query($sql,__LINE__,__FILE__);
		}

		function load_from_network($locale)
		{
			@set_time_limit(0);

			// get the file that contains the calendar events for your locale
			// "http://www.phpgroupware.org/headlines.rdf";
			$network = CreateObject('phpgwapi.network');
			if(isset($GLOBALS['phpgw_info']['server']['holidays_url_path']) && $GLOBALS['phpgw_info']['server']['holidays_url_path'] != 'localhost')
			{
				$load_from = $GLOBALS['phpgw_info']['server']['holidays_url_path'];
			}
			else
			{
				$pos = strpos(' '.$GLOBALS['phpgw_info']['server']['webserver_url'],$_SERVER['HTTP_HOST']);
				if($pos == 0)
				{
					switch($_SERVER['SERVER_PORT'])
					{
						case 80:
							$http_protocol = 'http://';
							break;
						case 443:
							$http_protocol = 'https://';
							break;
					}
					$server_host = $http_protocol.$_SERVER['HTTP_HOST'].$GLOBALS['phpgw_info']['server']['webserver_url'];
				}
				else
				{
					$server_host = $GLOBALS['phpgw_info']['server']['webserver_url'];
				}
				$load_from = $server_host.'/calendar/setup';
			}
	//		echo 'Loading from: '.$load_from.'/holidays.'.strtoupper($locale)."<br>\n";
			$lines = $network->gethttpsocketfile($load_from.'/holidays.'.strtoupper($locale));
			if(!$lines)
			{
				return False;
			}
			$c_lines = count($lines);
			for($i=0;$i<$c_lines;$i++)
			{
	//			echo 'Line #'.$i.' : '.$lines[$i]."<br>\n";
				$holiday = explode("\t",$lines[$i]);
				if(count($holiday) == 7)
				{
					$holiday['locale'] = $holiday[0];
					$holiday['name'] = addslashes($holiday[1]);
					$holiday['mday'] = (int)$holiday[2];
					$holiday['month_num'] = (int)$holiday[3];
					$holiday['occurence'] = (int)$holiday[4];
					$holiday['dow'] = (int)$holiday[5];
					$holiday['observance_rule'] = (int)$holiday[6];
					$holiday['hol_id'] = 0;
					$this->save_holiday($holiday);
				}
			}
		}

		function read_holiday()
		{
			$this->year = (int)$GLOBALS['phpgw']->calendar->tempyear;

			$sql = $this->build_holiday_query();
			if($sql == False)
			{
				return False;
			}
			$this->holidays = Null;
			$this->db->query($sql,__LINE__,__FILE__);

			$i = 0;
			$temp_locale = $GLOBALS['phpgw_info']['user']['preferences']['common']['country'];
			while($this->db->next_record())
			{
				$this->index[$this->db->f('hol_id')] = $i;
				$this->holidays[$i]['locale'] = $this->db->f('locale');
				$this->holidays[$i]['name'] = $GLOBALS['phpgw']->strip_html($this->db->f('name'));
				$this->holidays[$i]['day'] = (int)$this->db->f('mday');
				$this->holidays[$i]['month'] = (int)$this->db->f('month_num');
				$this->holidays[$i]['occurence'] = (int)$this->db->f('occurence');
				$this->holidays[$i]['dow'] = (int)$this->db->f('dow');
				$this->holidays[$i]['observance_rule'] = $this->db->f('observance_rule');
				if(count($this->users) == 2 && $this->users[0] != $this->users[1])
				{
					if($this->holidays[$i]['locale'] == $this->users[1])
					{
						$this->holidays[$i]['owner'] = 'user';
					}
					else
					{
						$this->holidays[$i]['owner'] = 'owner';
					}
				}
				else
				{
					$this->holidays[$i]['owner'] = 'user';
				}
				$c = $i;
				$GLOBALS['phpgw_info']['user']['preferences']['common']['country'] = $this->holidays[$i]['locale'];
				$holidaycalc = CreateObject('calendar.holidaycalc');
				$this->holidays[$i]['date'] = $holidaycalc->calculate_date($this->holidays[$i], $this->holidays, $this->year, $this->datetime, $c);
				unset($holidaycalc);
				if($c != $i)
				{
					$i = $c;
				}
				$i++;
			}
			$this->holidays = $this->sort_by_date($this->holidays);
			$GLOBALS['phpgw_info']['user']['preferences']['common']['country'] = $temp_locale;
			return $this->holidays;
		}

		function build_list_for_submission($locale)
		{
			$i = -1;
			$this->db->query("SELECT * FROM phpgw_cal_holidays WHERE locale='".$locale."'");
			while($this->db->next_record())
			{
				$i++;
				$holidays[$i]['locale'] = $this->db->f('locale');
				$holidays[$i]['name']   = $GLOBALS['phpgw']->strip_html($this->db->f('name'));
				$holidays[$i]['day']    = (int)$this->db->f('mday');
				$holidays[$i]['month']  = (int)$this->db->f('month_num');
				$holidays[$i]['occurence'] = (int)$this->db->f('occurence');
				$holidays[$i]['dow']    = (int)$this->db->f('dow');
				$holidays[$i]['observance_rule'] = $this->db->f('observance_rule');
			}
			return $holidays;
		}

		function build_holiday_query()
		{
			if(!isset($this->users) || count($this->users) == 0)
			{
				return False;
			}
			$sql = 'SELECT * FROM phpgw_cal_holidays WHERE locale in (';
			$find_it = '';
			reset($this->users);
			while(list($key,$value) = each($this->users))
			{
				if($find_it)
				{
					$find_it .= ',';
				}
				$find_it .= "'".$value."'";
			}
			$sql .= $find_it.')';

			return $sql;
		}

		function sort_by_date($holidays)
		{
			$c_holidays = count($holidays);
			for($outer_loop=0;$outer_loop<($c_holidays - 1);$outer_loop++)
			{
				$outer_date = $holidays[$outer_loop]['date'];
				for($inner_loop=$outer_loop;$inner_loop<$c_holidays;$inner_loop++)
				{
					$inner_date = $holidays[$inner_loop]['date'];
					if($outer_date > $inner_date)
					{
						$temp = $holidays[$inner_loop];
						$holidays[$inner_loop] = $holidays[$outer_loop];
						$holidays[$outer_loop] = $temp;
					}
				}
			}
			return $holidays;
		}

		function find_date($date)
		{
			if($this->holidays == Null)
			{
				return False;
			}

			$c_holidays = count($this->holidays);
			for($i=0;$i<$c_holidays;$i++)
			{
				if($this->holidays[$i]['date'] > $date)
				{
					$i = $c_holidays + 1;
				}
				elseif($this->holidays[$i]['date'] == $date)
				{
					$return_value[] = $i;
				}
			}
	//		echo 'Searching for '.$GLOBALS['phpgw']->common->show_date($date).'  Found = '.count($return_value)."<br>\n";
			if(isset($return_value))
			{
				return $return_value;
			}
			else
			{
				return False;
			}
		}

		function get_holiday($index)
		{
			return $this->holidays[$index];
		}

		function get_name($id)
		{
			return $this->holidays[$id]['name'];
		}
	}
?>