<?php
$version="ezgenerator calendar 3.44"; 
/*
	calendar.php  
	http://www.ezgenerator.com		
    Copyright (c) 2004-2008 Image-line
*/
error_reporting(E_ALL); 
if(get_magic_quotes_runtime()==1) set_magic_quotes_runtime(0);
$rel_path='../';
include_once('../documents/htmlMimeMail.php'); 
include_once ('../ezg_data/functions.php');
$page_id='25';
$prefix=$page_id.'_';
$page_name="25"; //source page name
$script_name='calendar.php'; // php script name
$cal_dir='../ezg_calendar/'; 
$doc_dir='../documents/'; 
$script_dir=(strpos(dirname($_SERVER['PHP_SELF']),'/ezg_calendar')!==false? $cal_dir: '../documents/'); 
$s_path=$script_dir.$script_name;
$http_pref='http://'; if(isset($_SERVER['HTTPS']) && $_SERVER['HTTPS']=='on') $http_pref='https://';
$full_path_to_script = $http_pref.$_SERVER['SERVER_NAME'].dirname($_SERVER['PHP_SELF']);
$ca_fname=$doc_dir.'centraladmin.ezg.php';	
$cal_template_fname='../documents/'.$page_name.(strpos($page_name,".php")?"":'.html'); 
$cal_settings_fname='../ezg_data/'.$prefix.'settings.ezg.php';
$lang_set_fname='../ezg_data/cal_lang_set.txt';
$sitemap_fname='../sitemap.php';
$wdirprefix=$cal_dir;
$wdirprefix_fname="wdirprefix.txt";
if(file_exists($wdirprefix_fname)) $wdirprefix=f_read_file($wdirprefix_fname);  
$db_fname=$wdirprefix.$prefix."cal_events.ezg.php";
$db_fname_recur=$wdirprefix.$prefix."cal_recurring.ezg.php";
$db_fname_reg='../ezg_data/'.$prefix.'cal_registered.ezg.php';
$time_format=12;
$f_day_ofweek=1;
$category_name=array("Multiple selection","Events","Special events","Holidays","Birthday","Concerts");
$category_id=array(0,1,2,3,4,5);  
$category_color=array("#00FF40","#80FFFF","#FF80FF","#CCFF00","#0080FF","#004080");
$category_vis=array(true,true,true,true,true,true); // support for seasoning (categories can be visible only in calendar table)
$category_mark=array(); $category_mark_color=array();
update_categories_list();
$hide_expired=FALSE;
$include_hide_button=TRUE; 
$week_mode_wh_only=false; //%WORK_HOURS_ONLY%; ?
$hint_settings=array("Frame color" => "#C0C0C0","Background color" => "#808080","Body text color" => "#000000","Caption color" => "#FFFFFF","Width" => "200","Height" => "-1",);
$hint_for_invis=TRUE;
$noevents_msg='';
$location_label='Location';
$cal_size="small";
$def_view_param=1;
if($def_view_param==2) { $def_view=3; }				
elseif ($def_view_param==3) { $def_view=6; }
elseif ($def_view_param==4) { $def_view=12; }
else { $def_view=1;}
$em_enabled=FALSE; //event manager  
$em_show_participants= FALSE;
$rss_settings=array("Title" => "Type title here...","Description" => "Type description here...","Language" => "en-us","Copyright" => "","Managing editor" => "","Webmaster" => "","Category" => "","Category domain" => "","Cloud domain" => "","Cloud port" => "","Cloud path" => "","Cloud reg proc" => "","Cloud protocol" => "","TTL" => "","Rating" => "","Skip hours" => "","Skip days" => "","Text input title" => "","Text input description" => "","Text input name" => "","Text input link" => "","Image" => ""); // RSS settings
$max_items_in_rss=0; 
$max_lines_in_rss_desc=0;
$hide_expired_in_rss=true; 
$include_date_in_rss_desc=false;
$page_charset='iso-8859-1'; $utf_fl=(strpos(strtolower($page_charset),'utf')!==false? true: false);
$month_name=$f_month_names; $day_name=$f_day_names;

$db_fields='"Id","Short_description","Category","Details","Start_date","End_date","Location"'.$f_lf; //%%HIDDEN,%%DLINE,%%USER-Loc; %%TEMPLATE1%%-Decs
$db_fields_recur= '"Id","Short_description","Category","Details","Start_date","End_date","Location","recurType","repeatEvery","repeatPeriod","stopAfter"'.$f_lf;
$db_fields_reg='"Event_id","User","Timestamp","Notes"'.$f_lf; 
$css_event=array('customstyle'=>'event','border-style'=>'BS_EVENT','border-color'=>'BC_EVENT','height'=>'EVENTS_HEIGHT');
$css_calendar=array('customstyle'=>'calendar','border-style'=>'BS_CAL','border-color'=>'BC_CAL');
$css_day1=array('customstyle'=>'day1 '.$cal_size,'color'=>'FC_DAY1','background-color'=>'BC_DAY1','font-size'=>'FS_'.strtoupper($cal_size));
$css_day2=array('customstyle'=>'day2 '.$cal_size,'color'=>'FC_DAY2','font-size'=>'FS_'.strtoupper($cal_size));
$css_day3=array('customstyle'=>'day3 '.$cal_size,'color'=>'FC_DAY3','background-color'=>'BC_DAY3','font-size'=>'FS_'.strtoupper($cal_size));
$css_currday=array('customstyle'=>'currday '.$cal_size,'color'=>'FC_CURRDAY');
$css_currdayempty=array('customstyle'=>'currdayempty '.$cal_size, 'color'=>'FC_CURRDAY','background-color'=>'BC_CURRDAY');
$css_calh1=array('customstyle'=>'calh1 '.$cal_size,'color'=>'FC_CALH1','background-color'=>'BC_CALH1','border-style'=>'BORST_CALH1', 'border-color'=>'BORCOL_CALH1','font-size'=>'FS_'.strtoupper($cal_size));
$css_calh2=array('customstyle'=>'calh2 '.$cal_size,'color'=>'FC_CALH2','background-color'=>'BC_CALH2','border-style'=>'BORST_CALH2', 'border-color'=>'BORCOL_CALH2','font-size'=>'FS_'.strtoupper($cal_size));
$css_desc=array('customstyle'=>'desc','color'=>'FC_DESC','background-color'=>'BC_DESC','font-size'=>'FS_DESC');
$css_date=array('customstyle'=>'date','color'=>'FC_DATE','font-size'=>'FS_DATE');
$css_details=array('customstyle'=>'details','color'=>'FC_DETAILS','background-color'=>'BC_DETAILS','font-size'=>'FS_DETAILS');
$css_calurl=array('customstyle'=>'calurl '.$cal_size.'url','color'=>'FC_CURRDAYURL');
$css_currdayurl=array('customstyle'=>'currdayurl','color'=>'FC_CURRDAY');
$cal_css='<link type="text/css" href="'.$cal_dir.$prefix.'cal_textstyles.css" rel="STYLESHEET" title="Calendar"'.$f_ct;
$demo_mode=false;
$preview_on=false; 
$date_params='';
$first_line="<?php echo 'hi'; exit; /*";
$last_line= "*/ ?>";
$days_in_month_array=array(1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31);
$years_array=array(); $j=0;
for ($i=2000; $i<=2015; $i++) {  $years_array[$j]=$i; $j++; }
$ampm_array=array('AM','PM');
$hours12_array=array('NA','1','2','3','4','5','6','7','8','9','10','11','12'); 
$hours_array=array('NA','1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16','17','18','19','20','21','22','23','0');
$min_array=array('00','05','10','15','20','25','30','35','40','45','50','55');
$period_list=array('This Week','This Month','This Quarter','This Year','Next Week','Next 7 Days','Next 30 Days','Next Month','Next Quarter','Next Year','All Events');
$repeatPeriod_list=array('0'=>'Year','1'=>'Month','2'=>'Week');

$lang_l=array('add event'=>'add event','edit event'=>'edit event','short description'=>'short description','category'=>'category', 'details'=>'details','location'=>'location','start date'=>'start date','end date'=>'end date', 'start time'=>'start time','end time'=>'end time', 'once'=>'once','repeat every'=>'repeat every','week'=>'week','month'=>'month', 'year'=>'year','submit'=>'save','cancel'=>'cancel','delete'=>'delete', 'delete MSG'=>'Are you sure you want to delete this event?','go'=>'go','no events'=>'no events','logout'=>'logout','login'=>'login','back to ca'=>'CENTRAL ADMIN','login admin'=>'calendar administrator login','change username'=>'change username&password','username'=>'username','password'=>'password', 'repeat password'=>'repeat password','short description field is required'=>'"Short Description" field is required','start date should not exceed end date'=>'"Start date" should not exceed "End date"','start year should match end year'=>'"Start year" should match "End year"','start year&month should match end year&month'=>'"Start year&month" should match "End year&month"','start date should match end date'=>'"Start date" should match "End date"','fill in both fields'=>'please, fill in both fields','incorrect username/password'=>'incorrect username/password','can contain only'=>'username can contain only A-Z, a-z, _ and 0-9','password and repeated password'=>'password and repeated password don\'t match','your password should be'=>'your password should be at least five symbols','it is recommended'=>'it is recommended to change your username&password','hidden info'=>'hidden info','save as template'=>'save as template','settings saved'=>'settings saved','language'=>'language','hide past'=>'hide past events','show past'=>'show past events',
'deadline err msg'=>'"Deadline" is after "Start Date", please check dates and try again!','status'=>'status','expired'=>'expired','open'=>'open', 'closed'=>'closed for registration','register'=>'register','unregister'=>'unregister', 'events list'=>'events list','em'=>'event manager','my account'=>'my account','settings'=>'settings','change password'=>'change password','edit profile'=>'edit profile','edit'=>'edit', 'deadline'=>'deadline','mailing'=>'mailing','author'=>'author','total attendee'=>'total participants','my registration'=>'my registration', 'notes'=>'notes','type notes'=>'Type your notes here','click here'=>'click here to see all participants','unregister MSG'=>'Are you sure you want to unregister user','cancel MSG'=>'Are you sure you want to cancel your registration for','mail type'=>'mail type','mail subject'=>'mail subject', 'message'=>'message','users'=>'users','send to'=>'send to','subscribed for'=>'Users subscribed for','registered for'=>'Users REGISTERED for this event','all users'=>'all users','admin only'=>'administrator only','users list'=>'users list','selected'=>'selected','file attachment'=>'file attachment','send'=>'send','notification'=>'notification','success registered MSG'=>'You have successfully registered.','success edit MSG'=>'Your registration info was edited successfully.','success cancel MSG'=>'Your registration was cancelled successfully.','dear'=>'dear','cancel my registration'=>'cancel my registration','registration date'=>'registration date','logged as admin MSG'=>'You are logged as Administrator. Log as different user for registration, edit or cancelation.','already registered'=>'You have ALREADY REGISTERED for this event.','details follow'=>'Your registration details follow','register event MSG'=>'If you want to register to the following event, please use the SUBMIT button at the bottom to confirm.','edit registration MSG'=>'If you want to edit or cancel your registration, press=If you want to edit or cancel your registration, press','cant register MSG1'=>"You can't register for this event.",'cant register MSG2'=>"You can't register for event with status CLOSED for registration.",'cant edit MSG'=>'Registration edit is not allowed for EXPIRED events.','cant cancel MSG'=>'Registration cancelation is not allowed for EXPIRED events.','cant edit/cancel MSG'=>'Registration edit/cancelation is not allowed for EXPIRED events.','to edit MSG'=>'If you want to change your notes, edit content of Notes box and then press EDIT button to apply.','to cancel MSG'=>'If you want to cancel your registration, use CANCEL MY REGISTRATION button.','not recommended MSG'=>'It is not recommended to edit/cancel registration after its deadline.','to register MSG'=>'To register for this event, press','none users'=>'NONE users were selected for registration.','users regsitered MSG'=>'User(s) successfully registered.','users unregsitered MSG'=>'User unregistered successfully.','mail sent MSG'=>'Mail was sent successfully.','explanations'=>'Use %short_description%, %category%, %details, %location%,'.$f_br.'%date%, %time% and %deadline% for event info.'.$f_br.'Use %username%, %name%, %sirname%, %email% for user info.','public rss'=>'public RSS in protected Calendar','manage categories'=>'manage categories','name'=>'name','invisible'=>'invisible in events table','mark'=>'mark','mark msg'=>'mark days in calendar with','add category'=>'add new category','cat err msg'=>'You have to set both Name and Color for the category.','del category msg'=>'Are you sure you want to delete this category?');
$available_lang_sets=array('CS'=>'Czech','NL'=>'Dutch','EN'=>'English','FR'=>'French','DE'=>'German','HE'=>'Hebrew','NO'=>'Norwegian','PT'=>'Portuguese','RU'=>'Russian','SL'=>'Slovenian', 'ES'=>'Spanish');
$page_lang=f_read_tagged_data($cal_settings_fname, 'language');
if($page_lang!='' && $page_lang!='EZG') $lang_set=strtoupper($page_lang);
elseif(isset($_REQUEST['lang']))		$lang_set=strtoupper($_REQUEST['lang']);
else $lang_set='EN';
$lg_=($lang_set=='EN'?'':'lang='.$lang_set); 
$lang_set_results=f_read_lang_set($lang_set_fname, $page_lang, 'calendar', $period_list);
if(isset($lang_set_results['day_name']))			$day_name=$lang_set_results['day_name'];
if(isset($lang_set_results['month_name']))			$month_name=$lang_set_results['month_name'];
if(isset($lang_set_results['period_list']))			$period_list=$lang_set_results['period_list'];
if(isset($lang_set_results['repeatPeriod_list']))	$repeatPeriod_list=$lang_set_results['repeatPeriod_list'];
if(isset($lang_set_results['lang_l']))				$lang_l=$lang_set_results['lang_l'];

$admin_emails='your@email.com'; 
$admin_emails=(get_magic_quotes_gpc()? stripslashes($admin_emails): $admin_emails);
$admin_emails_array=split("[;]", $admin_emails);
$admin_email=$admin_emails_array[0];
if($f_sendmail_from!='') {  ini_set('sendmail_from', $f_sendmail_from);  }

$mails_list=array('EA'=>'Event Announcement','ECA'=>'Event Change Announcement','ER'=>'Event Reminder','AG'=>'Agenda','RConf'=>'Registration Confirmation','RCancel'=>'Registration Cancelation','RChange'=>'Registration Change','GE'=>'Generic'); 
$RConf_subject="Registration Confirmation for %short_description%";
$RConf_message="Dear %name% %sirname%,".$f_br.$f_br."This e-mail confirms your registration for the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."Your registration info:".$f_br."Date: %register_date%".$f_br."Notes: %notes%".$f_br.$f_br."For further information contact:".$f_br.$admin_email;
$RCancel_subject="Registration Cancelation for %short_description%";
$RCancel_message="Dear %name% %sirname%,".$f_br.$f_br."This e-mail confirms your cancelation for the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."Your registration info:".$f_br."Date: %register_date%".$f_br."Notes: %notes%".$f_br.$f_br."For further information contact:".$f_br.$admin_email;
$RChange_subject="Registration Change for %short_description%";
$RChange_message="Dear %name% %sirname%,".$f_br.$f_br."This e-mail confirms your registration change for the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."Your registration info:".$f_br."Date: %register_date%".$f_br."Notes: %notes%".$f_br.$f_br."For further information contact:".$f_br.$admin_email;
$EA_subject="Announcement for %short_description%";
$EA_message="Dear %name% %sirname%,".$f_br.$f_br."You have requested to be informed for '%category%' events. ".$f_br."This e-mail is to announce the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."If you want to register for this event, visit our site at %calendarurl%.".$f_br."Deadline for registration: %deadline%".$f_br.$f_br."For further information contact:".$f_br.$admin_email;
$ECA_subject="Event Change Announcement for %short_description%";
$ECA_message="Dear %name% %sirname%,".$f_br.$f_br."You have requested to be informed for '%category%'. ".$f_br."This e-mail is to announce change for the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."If you want to register for this event, visit our site at %calendarurl%.".$f_br."Deadline for registration: %deadline%".$f_br.$f_br."<For further information contact:".$f_br.$admin_email;
$ER_subject="Reminder for %short_description%";
$ER_message="Dear %name% %sirname%,".$f_br.$f_br."This e-mail is to remind you of the following event:".$f_br."Event Name: %short_description%".$f_br."Category: %category%".$f_br."Details: %details%".$f_br."Location: %location%".$f_br."Date(s): %date%".$f_br."Time: %time%".$f_br.$f_br."For further information contact:".$f_br.$admin_email;
$AG_subject="Agenda for %short_description%";
$AG_message="";
$GE_subject="";
$GE_message="";
$use_editor=($em_enabled?true:false);  
$js_move=' <script language="JavaScript" type="text/javascript">'	
.'function moveleft() {'
.'l = document.getElementById("users_list"); r = document.getElementById("selected_list");'
	.'var j=0; '		
	.'if(l.options.length>0) { j=l.options.length; } '  
	.'for(i=0; i<r.options.length; i++) { '
		.'if(r.options[i].selected==true) { '					
			.'l.options[j]= new Option(r.options[i].text, r.options[i].value); '
			.'j=j+1; '
	.'} }'
	.'for(m=0; m<r.options.length; m++)  { if(r.options[m].selected==true) {r.options[m]=null; }  } '
.'} '
.'function moveright(form) { '
.'l = document.getElementById("users_list"); r = document.getElementById("selected_list"); '
	.'var j=0; ' 
	.'if(r.options.length>0) { j=r.options.length; } '  
	.'for(i=0; i<l.options.length; i++) { '
		.'if(l.options[i].selected==true) { '				  
			 .'r.options[j] = new Option(l.options[i].text, l.options[i].value); '
				.'r.options[j].selected=true; '
				.'j=j+1; '
	.' } }'
	.'for(m=0; m<l.options.length; m++)  { if(l.options[m].selected==true) {l.options[m]=null; }  } '
.'} '			
.'function mark() {'
	.'el = document.getElementById("selected_list");'
	.'for(i=0; i<el.options.length; i++) {'
			.'el.options[i].selected=true;'
.'} }  </script>'; 
$js_innova=  <<<MSG
<script type="text/javascript" src="../innovaeditor/scripts/language/english/editor_lang.js"></script>
<script type="text/javascript" src="../innovaeditor/innovaeditor.js"></script>
MSG;
$innova_def= <<<MSG
 <script type="text/javascript">
var oEdit1=new InnovaEditor("oEdit1");
oEdit1.width="100%";oEdit1.height="200px";
oEdit1.tabs=[["tabHome","",["gEdit","gFont","gPage","gPara","gLinks"]]];
oEdit1.groups=[["gEdit","",["Undo","Redo","Line","BRK","Cut","Copy","Paste"]],
["gFont","",["FontName","FontSize","BRK","Bold","Italic","Underline","Strikethrough","ForeColor","BackColor"]],
["gPage","",["Numbering","Bullets","BRK","Indent","Outdent"]],
["gPara","",["Paragraph","BRK","JustifyLeft","JustifyCenter","JustifyRight","JustifyFull"]],
["gLinks","",["Hyperlink","Image","Characters","BRK","Table","ClearAll"]]];
oEdit1.arrStyle=[["BODY",false,"","font: 11px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;background: #FFFFFF;"],["a",false,"","font: 11px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#ff8000;margin:0px;"],["p",false,"","text-indent:0px;padding:0px;margin:0px;"],["h1",false,"","font: bold 19px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h2",false,"","font: bold 16px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h3",false,"","font: bold 15px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h4",false,"","font: bold 12px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h5",false,"","font: bold 11px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h6",false,"","font: 11px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"],["h6",false,"","font: 11px Verdana, Geneva, Arial, Helvetica, sans-serif;color:#000000;margin:0px;"]];
oEdit1.cmdAssetManager="modalDialogShow('../assetmanager/assetmanager.php?lang=english&root=../documents/',640,465)";
oEdit1.customColors=["#ff4500","#ffa500","#808000","#4682b4","#1e90ff","#9400d3","#ff1493","#a9a9a9"];
oEdit1.mode="HTMLBody";
oEdit1.REPLACE("htmlarea");
</script>
MSG;
$read_access=false;
$browse_with_events=true;
$admin_actions=array('addevent','index','mng_settings','setmailing','editevent','delevent','saveevent','mailing','mng_categories','del_category',
'edit_category','add_category');
$tzone_offset=f_read_tagged_data($cal_settings_fname, 'tzoneoffset');

function show_calendar($action_id,$ms='') // Calendar User Mode
{
  global $page_id,$cal_template_fname,$db_fname,$doc_dir,$s_path,$rel_path,$category_id,$category_name,$month_name,$def_view,$cal_css,
          $date_params,$lang_l,$lg_,$f_js_end,$f_js_st;
		
	if(in_array($action_id,array("show","showcal","showevents","showcaljs","showeventsjs"))) $flag="user";
	else $flag='admin';	
	$current_date=my_mktime();	
	$nav_bar_mon=date('n',$current_date); settype($nav_bar_mon,'integer');
	$nav_bar_year=date('Y',$current_date); settype($nav_bar_year,'integer');	  

	if(!in_array($action_id,array("showcal","showevents","showcaljs","showeventsjs"))) 
	{
		$data=f_read_file($cal_template_fname);		
		$date_params=f_GFS($data,'%DATEFORMAT(',')%');
		$data=str_replace('%DATEFORMAT('.$date_params.')%','',$data);
	}
	if(isset($_GET['view']))	$view_type=$_GET['view'];
  elseif(isset($_POST['view_type'])) $view_type=$_POST['view_type'];
  else $view_type=$def_view; 
  settype($view_type, 'integer');

// set of month/week flag
	$month_mode=(isset($_GET['mode']) && $_GET['mode']=='month');
	$week_mode=(isset($_GET['mode']) && $_GET['mode']=='week');
	if(isset($_GET['mode'])) $mode=$_GET['mode'];
	else $mode=null;
	$range_or_period='period'; $range_msg=''; $selected_period=0;

	if(isset($_POST['period']) || isset($_GET['period'])) $period=(isset($_POST['period'])?$_POST['period']:$_GET['period']);
	if(isset($period) && ($period==0 || $period==4)) $week_mode=true;
	if(isset($period) && ($period==1 || $period==7)) $month_mode=true;
	if(isset($period) && $period==7) $nav_bar_mon=$nav_bar_mon+1;
	if(isset($period) && $period==2) 
	{ 
		if(in_array($nav_bar_mon, array(3,6,9,12)))		$nav_bar_mon-=1;
		elseif(in_array($nav_bar_mon, array(1,4,7,10))) $nav_bar_mon+=1; $view_type=3;  
	}
	if(isset($period) && $period==8) 
	{  
		if(in_array($nav_bar_mon,array(3,6,9,12)))		$nav_bar_mon-=1;
		elseif(in_array($nav_bar_mon,array(1,4,7,10))) $nav_bar_mon+=1; 
		$nav_bar_mon=$nav_bar_mon+3;
		if($nav_bar_mon>12) $nav_bar_mon-=12; 
		$view_type=3; 
	}	 
	if(isset($period) && $period==3) $view_type=12;
	if(isset($period) && $period==9) {$nav_bar_year=$nav_bar_year+1;$view_type=12;}
	
	if(isset($_POST['range_or_period']) && $_POST['range_or_period']=='range') 
		{ $range_or_period='range'; $view_type=$def_view; $month_mode=false; $week_mode=false; settype($view_type, 'integer');}

// check for month/year selector
    if(isset($_GET['mon']))      // on "<<" or ">>" press
    {
      $nav_bar_mon=$_GET['mon'];
      $nav_bar_year=$_GET['year'];
    }
    elseif(isset($_GET['selected_mon']))      // on 'GO' button press -  month/year selection
    {
      $selected_month=$_GET['selected_mon'];         
      $selected_mon=array_search($selected_month, $month_name);
      $nav_bar_mon=$selected_mon+1;
      $nav_bar_year=$_GET['selected_year'];      
    }
	elseif(isset($_GET['event_id']))		 // search events - needed in EZG search
	{
		$event_id=$_GET['event_id']; 
		$res_record=db_get_specific_event($db_fname,$event_id);
		$nav_bar_mon=date('n',$res_record['Start_date']); 
    $nav_bar_year=date('Y',$res_record['Start_date']);   
	}
	if($nav_bar_year<1950) $nav_bar_year=1950;
	elseif($nav_bar_year>2050) $nav_bar_year=2050;

// view type
	if($view_type==1 || $month_mode || $week_mode)    //1-month view
	{
    $months=array($nav_bar_mon);
    $years=array($nav_bar_year);
	}
	elseif($view_type==3)  //3-months view
	{
    if($nav_bar_mon==1) 
		{
			$months=array(12,1,2);
			$years=array($nav_bar_year-1,$nav_bar_year,$nav_bar_year);
    }
    elseif($nav_bar_mon==12) 
		{
			$months=array(11,12,1);
			$years=array($nav_bar_year,$nav_bar_year,$nav_bar_year+1);
    }
    else 
		{
			$months=array($nav_bar_mon-1,$nav_bar_mon,$nav_bar_mon +1);
			$years=array($nav_bar_year,$nav_bar_year,$nav_bar_year);
    }
	}
	elseif($view_type==6)   //6 months view
	{
		if($nav_bar_mon<=6)	$months=range(1,6);
		else $months=range(7,12);
		$years=array($nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year);
	}
	elseif($view_type==12)   //12 months view
	{
       $months=range(1,12);
       $years=array($nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year,$nav_bar_year, $nav_bar_year,$nav_bar_year,$nav_bar_year);
	}

// range & period selection
	if(!isset($_POST['range_or_period']) && !isset($_GET['period']))
    {	
		$fdayperiod_ts=mktime(0,0,0,$months[0],1,$years[0]);
		$ldayperiod_ts=mktime(23,59,59,$months[count($months)-1],days_in_month($months[count($months)-1], $years[count($years)-1]),$years[count($years)-1]);
	}
	else
	{
		$t=define_range_period($range_or_period,$nav_bar_mon,$current_date);
		$fdayperiod_ts=$t[0]; 
		$ldayperiod_ts=$t[1]; 
		$selected_period=$period;

		if(isset($period) && ($period==0 || $period==4))
		{	$week_mode_st_day=date('j',$fdayperiod_ts); 
			if($period==0 && $week_mode_st_day>date('j',my_mktime())) $nav_bar_mon -=1; 
		}
		if($range_or_period=='range' && $fdayperiod_ts>$ldayperiod_ts)
		{ 
			$fdayperiod_ts=mktime(0,0,0,$months[0],1,$years[0]);
			$ldayperiod_ts=mktime(23,59,59,$months[count($months)-1],days_in_month($months[count($months)-1], $years[count($years)-1]),$years[count($years)-1]);
			$range_msg='Start date CAN NOT be > end date';
		}	
	}
	if(isset($_GET['startday'])) { $week_mode_st_day=$_GET['startday']; }

// calendar build	 
	$events_records=db_get_events_raw($fdayperiod_ts,$ldayperiod_ts,$flag); 

	if(isset($events_records[0]['Category']))
	{
		$category_id_temp=array(); foreach($category_id as $k=>$v) $category_id_temp[]="$v";
		if(in_array($events_records[0]['Category'],$category_name) || !in_array($events_records[0]['Category'],$category_id_temp) || (!isset($events_records[0]['Location']))) { category_conversion(); }
		$events_records=db_get_events_raw($fdayperiod_ts,$ldayperiod_ts,$flag); 
	}

	$cal_html=($ms!=''?'<div align="center">'.$ms.'</div>':'').'<table align="center" cellpadding="0" cellspacing="0"><tr>';
  for($i=0; $i<count($months); $i++) 
	{
		$cal_html.='<td>';
		if($view_type==1 || ($view_type==3 && $i==1) || $month_mode || $week_mode) 
		{ 	
			if($week_mode)	$cal_html.=build_week($events_records,$action_id,$nav_bar_mon,$nav_bar_year,$flag,$week_mode_st_day); 
			else	$cal_html.=build_calendar($events_records,$months[$i],$years[$i],$flag,$action_id,$view_type,true,$month_mode);	
		}
		else { $cal_html.=build_calendar($events_records,$months[$i],$years[$i],$flag,$action_id,$view_type); }
		$cal_html.='</td>'; 
		if($view_type==12 && ($i==2 || $i==5 || $i==8))	{$cal_html.='</tr>'; if($i!=8) $cal_html.='<tr>';}
		if($view_type==6 && ($i==2 || $i==5))	{$cal_html.='</tr>'; if($i!=5) $cal_html.='<tr>';}
		if($view_type==3 && $i==2) $cal_html.='</tr>';
		if($view_type==1 || $month_mode || $week_mode) $cal_html.='</tr>';
    }
    $cal_html.='</table>';

	if(!in_array($action_id,array("showcal","showevents","showcaljs","showeventsjs"))) 
	{
		$data=preg_replace('(<span(.*?)%CALENDAR_OBJECT%(.*?)/span>)','%CALENDAR_OBJECT%',$data);
		$data=preg_replace('(<span(.*?)%CALENDAR_EVENTS%(.*?)/span>)','%CALENDAR_EVENTS%',$data);
		$data=f_obj_div_replacing('%CALENDAR_OBJECT%',$data);
		$data=f_obj_div_replacing('%CALENDAR_RANGE_SELECTION%',$data);
		$data=f_obj_div_replacing('%CALENDAR_SELECTION%',$data);
		$data=f_obj_div_replacing('%CALENDAR_EVENTS%',$data);	
		$data=f_obj_div_replacing('%CALENDAR_EVENTS_INVISIBLE%',$data);
		if(strpos($data,'<div class="pageheader">')===false) 
			$data=str_replace('<!--page-->','<!--page--><div class="pageheader"></div>',$data); 

		$data=str_replace('%CALENDAR_OBJECT%',$cal_html,$data); 
		$data=str_replace('%CALENDAR_SELECTION%',selection_bar($action_id,$nav_bar_mon,$nav_bar_year,$view_type,$mode),$data);	
		$data=str_replace('%CALENDAR_RANGE_SELECTION%',
			range_selection_bar($action_id,$range_or_period,$fdayperiod_ts, $ldayperiod_ts,$range_msg,$selected_period),$data);  
		$data=str_replace('%CALENDAR_VIEWTYPE%',viewtype_bar($action_id,$nav_bar_mon,$nav_bar_year,($week_mode||$month_mode?1:$view_type)),$data); 
			  
		if(!$month_mode && !$week_mode)
		{	
			$data=str_replace('%CALENDAR_NAVIGATION_NEXT%',navigation_bar($action_id,$nav_bar_mon,$nav_bar_year,'next',$view_type),$data);      
			$data=str_replace('%CALENDAR_NAVIGATION_PREV%',navigation_bar($action_id,$nav_bar_mon,$nav_bar_year,'prev',$view_type),$data); 
			if(!isset($_GET['event_id'])) 		
				$view_events=view_events($events_records,$fdayperiod_ts,$ldayperiod_ts,$flag,$view_type,$nav_bar_mon,$nav_bar_year);
			else $view_events=view_events($events_records,0,0,$flag,3,0,0,$_GET['event_id']);
			$data=str_replace('%CALENDAR_EVENTS%',$view_events,$data);
		}
		else 
		{    
			$data=str_replace('%CALENDAR_NAVIGATION_NEXT%','',$data);      
			$data=str_replace('%CALENDAR_NAVIGATION_PREV%','',$data); 
			$data=str_replace('%CALENDAR_EVENTS%','',$data); 
		}   				
		
		if($flag=='admin')
		{
			$data=str_replace('%CALENDAR_EVENTS_INVISIBLE%',$view_events,$data);
//			$data=preg_replace('/<a(.*?)%LINK_TO_ADMIN%(.*?)<\/a>/',"&nbsp;",$data);
			$data=str_replace(f_GFS($data,'<!--counter-->','<!--/counter-->'),'',$data);
		}
		else
		{
			$data=str_replace('%CALENDAR_EVENTS_INVISIBLE%',"",$data);  	
			$data=str_replace('%LINK_TO_ADMIN%',$doc_dir.'centraladmin.php?pageid='.$page_id.'&amp;indexflag=index&amp;'.$lg_,$data);			
		}

		if($flag=='admin') 
		{
			$menu=build_admin_menu($action_id,$view_type,$nav_bar_mon,$nav_bar_year);
			$data=str_replace(f_GFSAbi($data,'<div class="pageheader">','</div>'),'',$data);
			if(strpos($data,'<!--page-->')!==false) $data=str_replace('<!--page-->','<!--page-->'.$menu,$data);
			else
			{
				$data=str_replace(array('<BODY','</BODY'),array('<body','</body'),$data);
				$pattern=f_GFSAbi($data,'<body','</body>');		
				$body_part=substr($pattern, 0, strpos($pattern,'>')+1); 
				$data=str_replace($body_part,$body_part.$menu,$data);
			}
		}

		$data=str_replace('<!--scripts-->','<!--scripts-->'.$cal_css,$data);
		if($flag!='admin') $data=f_build_logged_info($data, $page_id, $rel_path, $s_path, $lg_);
		if(strpos($data,'<'.'?php')===false) print $data;
		else {f_eval_php_code($data);}
	}
	else 
	{
		if($action_id=="showcal" || $action_id=="showcaljs")	{ $data=$cal_html;}
		else	{ $data=view_events($events_records,$fdayperiod_ts,$ldayperiod_ts,$flag,$view_type,$nav_bar_mon,$nav_bar_year);}
		if($action_id=="showcal" || $action_id=="showevents") 
		{ 
			print '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">'
			.'<html><head><meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">'
			.'<title>Calendar</title><link type="text/css" href="'.$doc_dir.'textstyles.css" rel="STYLESHEET">'.$cal_css
			.'<script src="../overlib.js" language="javascript" type="text/javascript">'.$f_js_st.' overLIB (c) Erik Bosrup '.$f_js_end.'</script></head><body>'.$data.'</body></html>';
		}
		else { print "document.write('".$data."');"; }
	}   
}
function define_range_period($range_or_period,$nav_month,$current_date)
{
	global $month_name,$f_day_ofweek; 
	
	$res=array();
	$current_day=date('j',$current_date); settype($current_mon,'integer');
	$current_mon=date('n',$current_date); settype($current_day,'integer');
	$current_year=date('Y',$current_date); settype($current_year,'integer');
	$period=(isset($_POST['period'])?$_POST['period']:$_GET['period']);

	if($period==8 || $period==2) { $current_mon=$nav_month; settype($current_mon,'integer'); }
	if($range_or_period=='range')
	{
		$mon_from=array_search($_POST['monthFrom'],$month_name)+1;
		$mon_to=array_search($_POST['monthTo'],$month_name)+1;
		$fdayperiod_ts=mktime(0,0,0,$mon_from,$_POST['dayFrom'],$_POST['yearFrom']);
		$ldayperiod_ts=mktime(23,59,59,$mon_to,$_POST['dayTo'],$_POST['yearTo']);		
	}		
	else 
	{		
		$today_ts_st=mktime(0,0,0,$current_mon,$current_day,$current_year);
		$today_ts_end=mktime(23,59,59,$current_mon,$current_day,$current_year);
		$w_day=date('w',$current_date); settype($w_day,'integer'); 
		$w_day_m=date('N',$current_date); settype($w_day_m,'integer');

		if($period==0) //'This Week'
		{  		
			if($f_day_ofweek==1)	{$d_offset_st=$w_day; $d_offset_end=6-$w_day;}
			else	{$d_offset_st=($w_day_m>1?$w_day_m-1:$w_day_m); $d_offset_end=7-$w_day_m;}
			
			if(($current_day-$d_offset_st)<0 || ($current_day+$d_offset_end)>days_in_month($current_mon, $current_year))
			{
				if(($current_day-$d_offset_st)<=0) 
				{ 		
					if($current_mon==1) { $st_m=12; $st_y=$current_year-1; }
					else { $st_m=$current_mon-1; $st_y=$current_year; }
					$st_d=($current_day-$d_offset_st)+days_in_month($st_m, $st_y);
					$end_d=$current_day+$d_offset_end; $end_m = $current_mon;$end_y = $current_year;
				}
				else 
				{
					$st_d=$current_day-$d_offset_st; $st_m=$current_mon; $st_y=$current_year;			
					if($current_mon==12) { $end_m=1; $end_y=$current_year+1; }
					else { $end_m=$current_mon+1; $end_y=$current_year; }
					$end_d=($current_day+$d_offset_end)-days_in_month($current_mon, $current_year);
				}		
			}
			else 
			{ 
				$st_m=$current_mon; $st_d=$current_day-$d_offset_st; $st_y=$current_year; 
				$end_m=$current_mon; $end_d=$current_day+$d_offset_end; $end_y=$current_year;
			}
		}
		elseif($period==1) //'This Month'
		{ 
			$st_m=$current_mon; $st_d=1; $st_y=$current_year; 
			$end_m=$current_mon; $end_d=days_in_month($current_mon, $current_year); $end_y=$current_year;
		}
		elseif($period==2) //This Quarter'
		{ 
			if($current_mon==1) { $st_m=12; $st_d=1; $st_y=$current_year-1; 
				$end_m=2; $end_d=days_in_month(2, $current_year); $end_y=$current_year;}
			elseif($current_mon==12) { $st_m=11; $st_d=1; $st_y=$current_year; 
				$end_m=1; $end_d=days_in_month(1, $current_year+1); $end_y=$current_year+1;}
			else { $st_m=$current_mon-1; $st_d=1; $st_y=$current_year; 
				$end_m=$current_mon+1; $end_d=days_in_month($current_mon+1, $current_year); $end_y=$current_year;}
		}
		elseif($period==3) //'This Year'
		{
			$st_m=1; $st_d=1; $st_y=$current_year; 
			$end_m=12; $end_d=days_in_month(12, $current_year); $end_y=$current_year; 
		}
		elseif($period==4) //'Next Week'
		{ 	
			$current_day+=7; 
			if($current_day>days_in_month($current_mon, $current_year))
			{ 
				if($current_mon==12) { $current_mon=1; $current_year+=1; }
				else { $current_mon+=1; }
			}
			if($f_day_ofweek==1)	{ $d_offset_st=$w_day; $d_offset_end = 6-$w_day; }
			else					{ $d_offset_st=($w_day_m>1?$w_day_m-1:$w_day_m); $d_offset_end = 7-$w_day_m; }
			
			if(($current_day-$d_offset_st)<0 || ($current_day+$d_offset_end)>days_in_month($current_mon, $current_year))
			{
				if(($current_day-$d_offset_st)<=0) 
				{ 		
					if($current_mon==1) { $st_m=12; $st_y=$current_year-1; }
					else { $st_m=$current_mon-1; $st_y=$current_year; }
					$st_d=($current_day-$d_offset_st)+days_in_month($st_m, $st_y);
					$end_d=$current_day+$d_offset_end; $end_m=$current_mon; $end_y=$current_year;
				}
				else 
				{
					$st_d=$current_day-$d_offset_st; $st_m=$current_mon; $st_y=$current_year;			
					if($current_mon==12) { $end_m=1; $end_y=$current_year+1; }
					else { $end_m=$current_mon+1; $end_y=$current_year; }
					$end_d=($current_day+$d_offset_end)-days_in_month($current_mon, $current_year);
				}		
			}
			else 
			{ 
				$st_m=$current_mon; $st_d=$current_day-$d_offset_st; $st_y=$current_year; 
				$end_m=$current_mon; $end_d=$current_day+$d_offset_end; $end_y=$current_year;
			}
		}	
		elseif($period==5) //'Next 7 Days'
		{ 
			$st_m=$current_mon; $st_d=$current_day; $st_y=$current_year; 
			if(($current_day+7)>days_in_month($current_mon, $current_year))
			{					
				if($current_mon==12) { $end_m=1; $end_y=$current_year+1; }
				else { $end_m=$current_mon+1; $end_y=$current_year; }
				$end_d=($current_day+7)-days_in_month($current_mon, $current_year);
			}
			else { $end_m=$current_mon; $end_d=$current_day+7; $end_y=$current_year; }
		}
		elseif($period==6) //'Next 30 Days'
		{
			$st_m=$current_mon; $st_d= $current_day; $st_y=$current_year; 
			if(($current_day+30)>days_in_month($current_mon, $current_year))
			{					
				if($current_mon==12) { $end_m=1; $end_y=$current_year+1; }
				else { $end_m=$current_mon+1; $end_y=$current_year; }
				$end_d=($current_day+30)-days_in_month($current_mon, $current_year);
				if($end_d>days_in_month($end_m, $end_y)) { $end_m=$end_m+1; $end_y=$end_y;	$end_d=$end_d-days_in_month($end_m, $end_y);}	
			}
			else { $end_m=$current_mon; $end_d=$current_day+30; $end_y=$current_year; }
		}
		elseif($period==7) //'Next Month'
		{ 
			$offset_m=($current_mon==12? 1: $current_mon+1); $offset_y=($current_mon!=12? $current_year:$current_year+1);
			$st_m=$offset_m; $st_d=1; $st_y=$offset_y; 
			$end_m=$offset_m; $end_d=days_in_month($offset_m, $offset_y); $end_y=$offset_y; 
		}
		elseif($period==8) //'Next Quarter'
		{ 
			if($current_mon==1) { $st_m=12; $st_d=1; $st_y=$current_year-1; 
			$end_m=2; $end_d=days_in_month(2, $current_year); $end_y=$current_year;}
			elseif($current_mon==12) { $st_m=11; $st_d=1; $st_y=$current_year; 
			$end_m=1; $end_d=days_in_month(1, $current_year+1); $end_y=$current_year+1;}
			else { $st_m=$current_mon-1; $st_d=1; $st_y=$current_year; 
			$end_m=$current_mon+1; $end_d=days_in_month($current_mon+1, $current_year); $end_y=$current_year;}
		}
		elseif($period==9) //'Next Year'
		{ 
			$st_m=1; $st_d=1; $st_y=$current_year+1; $end_m=12; 
			$end_d=days_in_month(12, $current_year+1); $end_y=$current_year+1; 
		}
		if($period!=10)
		{
			$fdayperiod_ts=mktime(0, 0, 0, $st_m, $st_d, $st_y);
			$ldayperiod_ts=mktime(23, 59, 59, $end_m, $end_d, $end_y);
		}
		else { $fdayperiod_ts=0; $ldayperiod_ts=0; }//'ALL events'
	}
	$res=array($fdayperiod_ts, $ldayperiod_ts);
	return $res;
}
function edit_event($action_id) // Edit Event Screen
{
	global $db_fname,$db_fname_recur,$def_view,$f_max_chars,$use_editor,$js_innova,$cal_template_fname,$cal_css;
	$output="";

	if(isset($_GET['Id']))  
	{   
		$event_id=$_GET['Id'];
		$view_type=(isset($_GET['view']))?$_GET['view']:$def_view;
		$event_record=db_get_specific_event($db_fname,$event_id); 
		$recur_record=db_get_specific_event($db_fname_recur,$event_id); 
		if(!empty($recur_record)) 
		{
			$event_record['event_frequency']= 'repeating';
			$event_record['repeatPeriod']= $recur_record['repeatPeriod'];
			//$record['repeatEvery'] = $_POST['repeatEvery'];
			//$record['stopAfter'] = $_POST['stopAfter'];
		}
		if(isset($_GET['mon'])) { $menu=build_admin_menu($action_id,$view_type,$_GET['mon'],$_GET['year']); }
		else { $menu.=build_admin_menu($action_id); }

		if(isset($_GET['mon'])) { $output=edit_event_form($event_record,$view_type,$_GET['mon'],$_GET['year']); }
		else { $output=edit_event_form($event_record,$view_type); }

		$output=f_fmt_admin_screen($output, $menu);
	}
	$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
	if($use_editor==true)
	{ $output=str_replace(array('</HEAD>','</head>'),array(' '.$js_innova.'</HEAD>',' '.$js_innova.'</head>'),$output); }
	if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) print $output;
	else f_eval_php_code($output);
}
function add_event($action_id)  
{
	global $def_view,$use_editor,$js_innova, $cal_template_fname, $cal_css;
	
	if (isset($_GET['view']))	$view_type=$_GET['view'];
	else						$view_type=$def_view;
	$current_date=my_getdate();	
	$mday=(isset($_GET['mday'])? $_GET['mday']: $current_date['mday']);
	$mon=(isset($_GET['mon'])? $_GET['mon']: $current_date['mon']); 
	$year=(isset($_GET['year'])? $_GET['year']: $current_date['year']);

	$output=add_event_form($mon,$mday,$year,$view_type);
	$output=f_fmt_admin_screen($output, build_admin_menu($action_id,$view_type,$mon,$year));
	$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);

	if($use_editor==true)
	{ $output=str_replace(array('</HEAD>','</head>'),array(' '.$js_innova.'</HEAD>',' '.$js_innova.'</head>'),$output);}
	if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) print $output;
	else f_eval_php_code($output);
}
function save_event($action_id)      // Save Event (add/edit)
{
	global $s_path,$db_fname,$db_fields,$db_fname_recur,$db_fields_recur,$f_max_chars,$f_lf,$page_id,$script_name;
	global $time_format,$def_view,$demo_mode,$month_name,$lang_l,$script_dir,$doc_dir, $cal_template_fname, $cal_css;
	global $thispage_id,$EA_message,$EA_subject,$em_enabled,$use_editor,$js_innova,$db_fname_reg, $f_br;

	if(!isset($_POST['Id'])) { $uniqueid=md5(uniqid(mt_rand(),true)); $data['Id']=$uniqueid; }		//add event	
	
	foreach($_POST as $k=>$v) { if($k=='flagedit' || $k=='flagadd') {continue;} $data[$k]=trim($v); } 
	if (isset($_GET['view'])) $view_type=$_GET['view']; else $view_type=$def_view;

	if(isset($_POST['Save']) || isset($_POST['savetemplate']) || isset($_POST['add_category'])) 
	{									
		$start_mon=array_search($data['Start_month'],$month_name); // 'start' and 'end' date as Unix timestamps
		$end_mon=array_search($data['End_month'],$month_name);
		if($data['Start_hour']!='NA') 
		{
			settype($data['Start_hour'],'integer');
			if ($time_format==12) $start_hour=($data['Start_ampm']=='AM'?$data['Start_hour']:($data['Start_hour']+12));
			else $start_hour=$data['Start_hour'];
			if($data['End_hour']=='NA') $end_date=mktime($start_hour,$data['Start_min'],0,($end_mon+1),$data['End_day'],$data['End_year']);	
			else 
			{
				settype($data['End_hour'],'integer');
				if($time_format==12) $end_hour=($data['End_ampm']=='AM'? $data['End_hour']: ($data['End_hour']+12));
				else	$end_hour=$data['End_hour'];					
				$end_date=mktime($end_hour,$data['End_min'],0,($end_mon+1),$data['End_day'],$data['End_year']);
			}
			$start_date=mktime($start_hour,$data['Start_min'],0,($start_mon+1),$data['Start_day'],$data['Start_year']);
		}
		else 
		{
			$start_date=mktime(0,0,0,($start_mon+1),$data['Start_day'],$data['Start_year']);
			$end_date=mktime(0,0,0,($end_mon+1),$data['End_day'],$data['End_year']);
		}
		$record['Id']=$data['Id'];
		$record['Short_description']=$data['Short_description'];
		$record['Category']=$data['Category'];
		$record['Details']=$data['Details'];
		$record['Start_date']=$start_date;
		$record['End_date']=$end_date;
		$record['Location']=$data['Location'];		
						
		$st_ts=mktime(0,0,0,($start_mon+1),$data['Start_day'],$data['Start_year']);
		$end_ts=mktime(0,0,0,($end_mon+1),$data['End_day'],$data['End_year']);
		if(isset($_POST['Deadline_month']))
			$dl_st_ts=mktime(0,0,0,(array_search($_POST['Deadline_month'],$month_name)+1),$_POST['Deadline_day'],$_POST['Deadline_year']);

		if(isset($_POST['add_category'])) // adding new category
		{
			$msg='';
			if(empty($_POST['cat_name']) || empty($_POST['cat_color']) || $_POST['cat_color']=='#') 
				{$msg=f_format_err_msg(ucfirst($lang_l['cat err msg']));}	
			else {$new_cat_id=add_edit_category('add'); update_categories_list(); $record['Category']=$new_cat_id;}
			
			$result=f_fmt_admin_screen(edit_event_form($record,$view_type), build_admin_menu($action_id).$f_br.$msg);	
			$html_output=f_fmt_in_template($cal_template_fname,$result,$cal_css);
			if($use_editor==true)
			{ $html_output=str_replace(array('</HEAD>','</head>'),array(' '.$js_innova.' </HEAD>',' '.$js_innova.' </head>'),$html_output); }
			if(strpos($html_output,'<'.'?php')===false) print $html_output;
			else f_eval_php_code($html_output);
			exit();
		}	
		elseif( $st_ts>$end_ts || ($data['Short_description']=='' && !isset($_POST['savetemplate'])) 
			|| ($em_enabled && isset($_POST['use_em']) && $dl_st_ts>$st_ts) )
		{
			$record['event_frequency']=$_POST['event_frequency'];
			$record['repeatPeriod']=$_POST['repeatPeriod'];
			//$record['repeatEvery']=$_POST['repeatEvery'];
			//$record['stopAfter']=$_POST['stopAfter'];
			if(isset($_POST['Hiddeninfo']))	$record['HIDDEN']=$_POST['Hiddeninfo'];
			if(isset($_POST['USER']))			$record['USER']=$_POST['USER'];
			if($em_enabled && isset($dl_st_ts)) $record['DEADLINE']=$dl_st_ts; //event manager DEADLINE
			
			$msg="<span class='rvts8'><em style='color:red;'>";
			if($record['Short_description']=='') $msg.=$lang_l['short description field is required'];
			elseif($st_ts>$end_ts)				$msg.=$lang_l['start date should not exceed end date'];
			elseif($dl_st_ts>$st_ts)			$msg.=$lang_l['deadline err msg'];
			$msg.="</em></span>";

			if(!isset($_POST['Id'])) { $temp_arr=array_reverse($record); array_pop($temp_arr);	$record=array_reverse($temp_arr); }
				
			$menu=build_admin_menu($action_id).$f_br.$msg;
			if(isset($_GET['mon'])) $result=edit_event_form($record,$view_type,$_GET['mon'],$_GET['year']);
			else					$result=edit_event_form($record,$view_type);
			$result=f_fmt_admin_screen($result, $menu);	
			$html_output=f_fmt_in_template($cal_template_fname,$result,$cal_css);
			if($use_editor==true)
				{ $html_output=str_replace(array('</HEAD>','</head>'),array(' '.$js_innova.' </HEAD>',' '.$js_innova.' </head>'),$html_output); }
			if(strpos($html_output,'<'.'?php')===false && strpos($html_output,'<'.'?')===false) {print $html_output;}
			else {f_eval_php_code($html_output);}
			exit();
		}
		elseif($_POST['event_frequency']=='repeating' && 
			($_POST['repeatPeriod']=='0' && $data['Start_year']!=$data['End_year'] 
			|| $_POST['repeatPeriod']=='1' && ($data['Start_year']!=$data['End_year'] || $data['Start_month']!=$data['End_month'])
			|| $_POST['repeatPeriod']=='2' && ($data['Start_year']!=$data['End_year'] || $data['Start_month']!=$data['End_month']
			|| $data['Start_day']!=$data['End_day'])) )
		{
			$record['event_frequency']=$_POST['event_frequency'];
			$record['repeatPeriod']=$_POST['repeatPeriod'];
			if(isset($_POST['Hiddeninfo'])) $record['HIDDEN']=$_POST['Hiddeninfo'];
			if(isset($_POST['USER']))	$record['USER']=$_POST['USER'];
			if($em_enabled && isset($dl_st_ts)) $record['DEADLINE']=$dl_st_ts; //event manager DEADLINE

			$msg="<span class='rvts8'><em style='color:red;'>";
			if($_POST['repeatPeriod']=='0')	$msg.=$lang_l['start year should match end year'];
			elseif($_POST['repeatPeriod']=='1') $msg.=$lang_l['start year&month should match end year&month'];
			else	$msg.=$lang_l['start date should match end date']; 
			$msg.="</em></span>";
			if (!isset($_POST['Id'])) 
			{
				$temp_arr=array_reverse($record); array_pop($temp_arr);
				$record=array_reverse($temp_arr);
			}
			$menu=build_admin_menu($action_id).$f_br.$msg;
			if(isset($_GET['mon']))		$result=edit_event_form($record,$view_type,$_GET['mon'],$_GET['year']);
			else $result=edit_event_form($record,$view_type);
			$result=f_fmt_admin_screen($result, $menu);	
			$html_output=f_fmt_in_template($cal_template_fname,$result,$cal_css);
			if($use_editor==true)
				{ $html_output=str_replace(array('</HEAD>','</head>'),array(' '.$js_innova.' </HEAD>',' '.$js_innova.' </head>'),$html_output); }
			if(strpos($html_output,'<'.'?php')===false) print $html_output;
			else f_eval_php_code($html_output);
			exit();
		}
		else 
		{
			if($_POST['event_frequency']=='repeating' &&!isset($_POST['savetemplate']))
			{
				$db_recurring_data=array();
				$record_recur=$record;
				$record_recur['recurType']='1';// 1 - for repeating; 2 - for floating
				$record_recur['repeatEvery']='1'; //$_POST['repeatEvery'];
				$record_recur['repeatPeriod']=$_POST['repeatPeriod'];		
				$record_recur['stopAfter']='0'; //$_POST['stopAfter'];
				$editedrecord_recur_line=prepare_for_write($record_recur);
				if(isset($_POST['Id']) && filesize($db_fname_recur)>0)
				{
					$handle=fopen($db_fname_recur, "r");
					$php_start=fgetcsv($handle, 2048);    
					$db_field_names=fgetcsv($handle, $f_max_chars);
					while ($data=fgetcsv($handle, $f_max_chars)) 
					{
						if (in_array($_POST['Id'], $data))	{ $db_recurring_data=$data; break; }
					}
					fclose($handle);
				}		
				if (!isset($_POST['Id']) || empty($db_recurring_data)) db_add_event($db_fname_recur,$db_fields_recur,$editedrecord_recur_line);
				else db_edit_event($db_fname_recur,$record['Id'],$editedrecord_recur_line);
			}
			if(isset($_POST['Hiddeninfo']) && !empty($_POST['Hiddeninfo'])) 
				{ $record['Location'].='%%HIDDEN'.str_replace($f_lf,$f_br,$_POST['Hiddeninfo']).'HIDDEN%%'; } //HIDDEN info

			if(isset($_SESSION['cur_user']) && !isset($_POST['Id']))	{$record['Location'].='%%USER'.f_get_session_var('cur_user').'%%'; }//USER
			elseif(isset($_POST['USER']) && !empty($_POST['USER']) && isset($_POST['Id'])) {$record['Location'].='%%USER'.$_POST['USER'].'%%'; }
			
			if($em_enabled && isset($_POST['use_em']) && isset($_POST['Deadline_month'])) //event manager DEADLINE
				{ $record['Location'].='%%DLINE'.$dl_st_ts.'DLINE%%'; }

			$record['Details']=str_replace($f_lf,$f_br,$record['Details']);
			if(isset($_POST['savetemplate'])) 
			{ 
				$record['Short_description'].='%%TEMPLATE1%%'; 
				$old_t_data=get_event_template();
				if(isset($old_t_data['Id'])) db_delete_event($db_fname, $old_t_data['Id']); 		
			}
			
			$editedrecord_line=prepare_for_write($record);
			if ($demo_mode==true) { print "<em>Your event was not saved. This is a demo!</em>".$f_br.$f_br; }
			else
			{
				if (!isset($_POST['Id'])) db_add_event($db_fname,$db_fields,$editedrecord_line);
				else  db_edit_event($db_fname,$record['Id'],$editedrecord_line); 
			}	
			//if(!isset($thispage_id))
			//{ 
			//	$re_url = '?action=index';
			//	foreach($_GET as $k=>$v) { if($k!='action') $re_url .= '&'.$k.'='.$v; }
			//	f_url_redirect($doc_dir.'search.php?action=reindex&pid='.$page_id.'&entryid='.$record['Id'].'&redirect='
			//	.urlencode(str_replace('../','',$s_path.'?'.$lg_).$re_url),false);
			//	exit;
			//}
			//else { 
			show_calendar($action_id); 
			//}
			//unset($_POST);
		}
	}	
	else // DELETE event
	{
		if(isset($_GET['Id'])) { $rec_id=$_GET['Id']; } 
		else  { $rec_id=$data['Id']; }
		
		if($demo_mode!=true)	
		{ db_delete_event($db_fname, $rec_id); db_delete_event($db_fname_recur, $rec_id); 
			if($em_enabled) db_delete_event($db_fname_reg, $rec_id);}	
		else { print "<em>The event was not deleted. This is demo!</em>".$f_br.$f_br;}

		//if(!isset($thispage_id))
		//{ 
		//	$re_url = '?action=index';
		//	foreach($_GET as $k=>$v) { if($k!='action') $re_url .= '&'.$k.'='.$v; }
		//	f_url_redirect($doc_dir.'search.php?action=reindex&pid='.$page_id.'&entryid='.$rec_id.'&redirect='
		//	.urlencode(str_replace('../','',$s_path.'?'.$lg_).$re_url),false);
		//	exit;
		//}
		//else { 
		show_calendar($action_id); 
		//}
	}
}
function update_categories_list()
{
	global $cal_settings_fname,$category_name,$category_id,$category_color,$category_vis,$category_mark,$category_mark_color;
	
	$new_category_id=array(); $new_category_name=array(); $new_category_color=array(); $new_category_vis=array(); 
	$new_category_mark=array(); $new_category_mark_color=array();

	$file_content=f_read_file($cal_settings_fname);
	while(strpos($file_content,'<cat_')!==false)
	{
		$cat_id=f_GFS($file_content,'<cat_','>'); settype($cat_id, 'integer');
		$category_info=f_GFS($file_content,'<cat_'.$cat_id.'>','</cat_'.$cat_id.'>');
		list($name,$color,$vis,$mark,$mark_color)=explode('%%', $category_info);
		$new_category_id[]=$cat_id; $new_category_name[]=$name; $new_category_color[]=$color; 
		$new_category_vis[]=($vis=='1'?true:false); $new_category_mark[]=$mark; $new_category_mark_color[]=$mark_color;
		$file_content=str_replace('<cat_'.$cat_id.'>'.$category_info.'</cat_'.$cat_id.'>','', $file_content); 
	}
	if(!empty($new_category_id)) {$category_name=$new_category_name; $category_id=$new_category_id; $category_color=$new_category_color; $category_vis=$new_category_vis; $category_mark=$new_category_mark; $category_mark_color=$new_category_mark_color;}
	$file_content='';
}
function add_edit_category($flag, $cat_id='')
{
	global $cal_settings_fname, $cal_template_fname, $category_name, $category_id, $category_color, $category_vis, $category_mark,$category_mark_color;
	
	if($flag!='del') { $cat_name=$_POST['cat_name']; $cat_color=$_POST['cat_color'];  $cat_visible=(isset($_POST['cat_invisible'])?0:1); 
		$cat_mark=$_POST['cat_mark']; $cat_mark_color=($_POST['mark_color']!='#'?$_POST['mark_color']:'');}
	$next_id=false;
	$file_con='<?php echo "hi"; exit; /* */ ?>';  
	if(!file_exists($cal_settings_fname)) { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$cal_settings_fname)); exit; }
	elseif(!$fp=fopen($cal_settings_fname,'r+')) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$cal_settings_fname)); exit;}
	else 
	{
		flock($fp, LOCK_EX);
		$fsize=filesize($cal_settings_fname);
		if($fsize>0) $file_con=fread($fp,$fsize);

		$tags_arr=array(); $newset_arr=array();
		if(strpos($file_con,'<cat_')===false) // for compatibility
		{ 
			foreach($category_id as $k=>$v) 
			{ $tags_arr[]='cat_'.$v; $newset_arr[]=$category_name[$k].'%%'.$category_color[$k].'%%'.($category_vis[$k]?1:0).'%%NA'.'%%'; }
		}
	
		if($flag=='add') // when adding category
		{
			$next_id=count($category_id); while(in_array($next_id,$category_id)) $next_id++; 
			$tags_arr[]='cat_'.$next_id; $newset_arr[]=$cat_name.'%%'.$cat_color.'%%'.$cat_visible.'%%'.$cat_mark.'%%'.$cat_mark_color; 
		}
		foreach($tags_arr as $k=>$cat) {$file_con=str_replace("*/ ?>", "<$cat>".$newset_arr[$k]."</$cat>*/ ?>",$file_con);}
		
		if($flag=='edit') // when editing category
		{		
			$file_con=str_replace(f_GFSAbi($file_con,'<cat_'.$cat_id.'>','</cat_'.$cat_id.'>'), '<cat_'.$cat_id.'>'.$cat_name.'%%'.$cat_color.'%%'.$cat_visible.'%%'.$cat_mark.'%%'.$cat_mark_color.'</cat_'.$cat_id.'>', $file_con);
		}
		elseif($flag=='del') { $file_con=str_replace(f_GFSAbi($file_con,'<cat_'.$cat_id.'>','</cat_'.$cat_id.'>'), '', $file_con); }		
			
		ftruncate($fp, 0); fseek($fp, 0);	
		if(fwrite($fp,$file_con)===FALSE) {print "Cannot write to file";  exit;  }
		flock($fp, LOCK_UN);
		fclose($fp);
	} 
	return $next_id;
}
// --------------- DB functions -----------------------------
function category_conversion()  // old version calendar check --> without 'Location' field
{
	global $db_fname, $db_fields, $f_lf, $category_id, $category_name, $f_max_chars, $last_line, $f_use_linefeed, $cal_template_fname;
	
	$label='Location'; $data=''; $old_data='';
	clearstatcache();

	if(file_exists($db_fname)) 
	{
		$fsize=filesize($db_fname);
		if($fsize>0) 
		{
			$category_id_temp = array();
			foreach($category_id as $k=>$v) { $category_id_temp[]="$v"; }
				
			if(!$handle=@fopen($db_fname,"r+")) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$db_fname)); exit;}
			flock($handle,LOCK_EX);
			$php_start=fgetcsv($handle,2048);   
			$old_dbfields_array=fgetcsv($handle,$f_max_chars);

			$data.=implode(',',array_values($php_start)).$f_lf. $db_fields;   

			while($array_result=fgetcsv($handle,$f_max_chars)) 
			{
				if($array_result[0]!=$last_line) 
				{         
					if(!in_array($label,$old_dbfields_array)) { array_push($array_result," "); }
					if(in_array($array_result[2],$category_name))
					{
						$cat_key=array_search($array_result[2],$category_name);
						$array_result[2]=$category_id[$cat_key];
						$result=array_values($array_result);
					}
					elseif(!in_array($array_result[2],$category_name) && in_array($array_result[2], $category_id_temp)) 
					{
						$result=array_values($array_result);
					}
					else { $array_result[2]=1; $result=array_values($array_result); }
					$record_line=prepare_for_move($result);
					$data.=$record_line;
				}
			}
			$data.=$last_line;           
			if(ftruncate($handle, 0)===false) {echo "Failed to truncate db file --> old version check failed";flock($handle, LOCK_UN); exit;}
			fseek($handle, 0);
			if(fwrite($handle, $data)===FALSE)
				{fwrite($handle, $old_data); echo "Failed to edit db file --> old version check failed";flock($handle, LOCK_UN); exit;}
			flock($handle, LOCK_UN);
			fclose($handle);									
		} 
	}
	else { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$file)); exit; }
}
function old_db_conversion()
{ 
	global $db_fname, $wdirprefix, $prefix, $first_line, $last_line, $f_lf, $cal_template_fname;
		
	$old= array($wdirprefix.$prefix."cal_events.ezg");			
	
	clearstatcache();  
	foreach ($old as $k=>$v)
	{
		$buf="";       
		if(file_exists($v.".php") && (filesize($v.".php")==0) && file_exists($v) && (filesize($v)>0) ) 
		{
			if(!$old_handle=@fopen($v, "r+")) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$v)); exit;}
			flock($old_handle, LOCK_EX);
			if(!$new_handle = fopen($v.".php", "w")) {echo "Can not write to file";flock($old_handle, LOCK_UN);exit; }
			flock($new_handle, LOCK_EX);
			$buf .= $first_line.$f_lf;
			$buf .= fread($old_handle, filesize($v));
			$buf .= $last_line;
			if (fwrite($new_handle, $buf)===false) {echo "Failed to move db file --> last update failed";exit;}
			if(@unlink($v)===false) { ftruncate($old_handle, 0); }
			flock($old_handle, LOCK_UN);
			flock($new_handle, LOCK_UN);
			fclose($old_handle);
			fclose($new_handle);
		}
		elseif(file_exists($v.".php") &&(filesize($v.".php")==0) && file_exists($v) && (filesize($v)==0)) @unlink($v);	
	}	
}
function db_add_event($db_fname,$db_fields,$record_line)  // add record in db files
{
	global $first_line, $last_line, $f_lf, $f_use_linefeed, $cal_template_fname, $wdirprefix,$prefix;
		
	$buf=""; $old_data="";
	if(!file_exists($db_fname)) { $handle=@fopen($db_fname,"w"); if($handle) fclose($handle); }
	
	clearstatcache();
	if(file_exists($wdirprefix.$prefix."cal_events.ezg")) { if(filesize($wdirprefix.$prefix."cal_events.ezg")>0) old_db_conversion(); }

	if(file_exists($db_fname))
	{
		if(!$handle=@fopen($db_fname, "r+")) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$db_fname)); exit;}
		flock($handle, LOCK_EX);
		if(filesize($db_fname)==0) { $buf.=$first_line. $f_lf. $db_fields. $record_line. $last_line; }
		else 
		{
			$old_data=fread($handle, filesize($db_fname));
			$buf.=str_replace($last_line, $record_line.$last_line, $old_data);
			if(ftruncate($handle, 0)===false) {echo "Failed to truncate file --> last update failed"; exit;}
			fseek($handle, 0);
		}
		if(fwrite($handle, $buf)===FALSE)
		{
			fwrite($handle, $old_data);
			echo "Failed to edit file --> last update failed";
			exit;
		}
		flock($handle, LOCK_UN);
		fclose($handle);
	}
	else  { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname)); exit; }
}
function db_edit_event($db_fname,$event_id,$editedrecord_line,$user='')  // edit event record in db files
{
	global $first_line,$last_line,$f_lf,$f_max_chars, $cal_template_fname;
	
	$data="";
	if(file_exists($db_fname))
	{
		if(!$handle=@fopen($db_fname, "r+")) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$db_fname)); exit;}
		flock($handle, LOCK_EX);
		$old_data=fread($handle, filesize($db_fname));
		fseek($handle, 0);
		$php_start=fgetcsv($handle, 2048);   
		$data.=implode(',', array_values($php_start)).$f_lf;   
		while ($result = fgetcsv($handle, $f_max_chars))
		{
			if($user=='' && in_array($event_id, $result))	{ $data.=$editedrecord_line; }
			elseif($user!='' && in_array($event_id, $result) && in_array($user, $result))	{ $data.=$editedrecord_line; } //event manager
			elseif($result[0]==$last_line)		{ $data.=$last_line; }        
			else { $record_line=prepare_for_move($result); $data.=$record_line; }
		}
		if(ftruncate($handle, 0)===false) {echo "Failed to truncate file --> last update failed";exit;}
		fseek($handle, 0);
		if (fwrite($handle, $data)===FALSE)
		{
			fwrite($handle, $old_data);
			echo "Failed to edit file --> last update failed";
			exit;
		}
		flock($handle, LOCK_UN);
		fclose($handle);
	}
	else  { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname)); exit; }
}
function db_delete_event($db_fname,$event_id,$user='') //  delete record in db files
{
	global $f_lf,$last_line,$f_max_chars,$cal_template_fname;
	
	$data='';$old_data='';
	clearstatcache(); 
	if(file_exists($db_fname))
	{
		if(!$handle=@fopen($db_fname, "r+")) {print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('DBFILE_NEEDCHMOD',$db_fname)); exit;}	
		flock($handle, LOCK_EX);
		if(filesize($db_fname)>0) 
		{
			$old_data=fread($handle, filesize($db_fname));
			fseek($handle, 0);
			$php_start=fgetcsv($handle, 2048);    
			$data.=implode(',', array_values($php_start)).$f_lf; 
			while($result=fgetcsv($handle, $f_max_chars))
			{
				if($user=='' && in_array($event_id, $result))	{ continue; }
				elseif($user!='' && in_array($event_id, $result) && in_array($user, $result))	{ continue; } //event manager
				elseif($result[0]==$last_line)		{ $data.=$last_line; }      
				else { $record_line=prepare_for_move($result); $data .= $record_line; }
			}
			if(ftruncate($handle,0)===false) {echo "Failed to truncate file --> last update failed";exit; }
			fseek($handle,0);
			if(fwrite($handle, $data)===FALSE)
			{
				fwrite($handle, $old_data);
				echo "Failed to edit file --> last update failed";
				exit;
			}
		}
		flock($handle, LOCK_UN);
		fclose($handle);
	}
	else  { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname)); exit; }
}
function db_get_specific_event($db_fname,$event_id)
{
	global $f_max_chars,$last_line,$cal_template_fname;
	
	$record=array(); $result=array();
	if(file_exists($db_fname))
	{
		$handle=fopen($db_fname, "r");
		$php_start=fgetcsv($handle, 2048);    
		$db_field_names=fgetcsv($handle, $f_max_chars);
		while ($data=fgetcsv($handle, $f_max_chars)) 
		{
			if ($data[0]!=$last_line) 
			{  
				$record=build_ass_array_record($data,$db_field_names);
				if($record['Id']==$event_id)	{ $result=$record;  break; }
			}
		}
		fclose($handle);	
		return $result;
	}
	else { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname)); exit; }
}
function db_get_registered($user='',$event_id='') 
{
	global $db_fname_reg,$last_line,$f_max_chars,$last_line,$cal_template_fname;
	
	$result=array();
	if(file_exists($db_fname_reg))
	{	
		$handle=fopen($db_fname_reg,"r");
		$php_start=fgetcsv($handle,2048);  
		$db_field_names=fgetcsv($handle,2048);
		while($data=fgetcsv($handle,$f_max_chars))
		{
			if ($data[0]!=$last_line)
			{  
				if($user!='' && $event_id!='')
				{  if($data[0]==$event_id && $data[1]==$user)
					 { $record=build_ass_array_record($data,$db_field_names); $result=$record; break; }  
				}
				else 
					{ $result[$data[0]][$data[1]]= array('timestamp'=>$data[2],'notes'=> $data[3]);  }
			}
		}
		fclose($handle);
		return $result;
	}
	else { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname_reg)); exit; }
} 
function db_get_events_raw($fdayperiod_ts,$ldayperiod_ts,$flag='user',$recur_flag=true) //extract events 
{
	global $db_fname,$db_fname_recur,$last_line,$f_max_chars,$cal_template_fname;
		
	$result=array(); $recurring_result=array();
	if($recur_flag==true && file_exists($db_fname_recur) && $fdayperiod_ts!=0)
		$recurring_result=db_get_recurring_events($fdayperiod_ts,$ldayperiod_ts,$flag);
	if(file_exists($db_fname)) 
	{ 
		if(filesize($db_fname)>0)
		{
			$handle=fopen($db_fname,"r");
			$php_start=fgetcsv($handle,2048);  
			$db_field_names=fgetcsv($handle,2048);
			while($data=fgetcsv($handle,$f_max_chars))
			{
				if ($data[0]!=$last_line)
				{         
					$rec=build_ass_array_record($data,$db_field_names);
					settype($rec['Start_date'], 'integer');
					settype($rec['End_date'], 'integer');
					if( ($rec['Start_date']>=$fdayperiod_ts && $rec['End_date']<=$ldayperiod_ts) 
					|| ($rec['Start_date']<=$fdayperiod_ts && $rec['End_date']>=$fdayperiod_ts) 
					|| ($rec['Start_date']<=$ldayperiod_ts && $rec['End_date']>=$ldayperiod_ts) || ($fdayperiod_ts==0) )
					{ $result[]= $rec; }			
				}
			}
			fclose($handle);
			if(!empty($recurring_result)) $result=array_merge($recurring_result, $result);
		}	
		return $result;
	}	
	else { print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('MISSING_DBFILE',$db_fname)); exit; }
} 
function db_get_events($events_records,$fdayperiod_ts,$ldayperiod_ts,$flag='user') //extract events for certain period 
{
	global $last_line, $f_max_chars, $hide_expired, $category_vis, $hide_expired_in_rss;
	
	$result=array();
	$mktime=my_mktime();
	$today_ts=mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime));  			
	foreach($events_records as $k=>$rec)
	{       
		settype($rec['Start_date'], 'integer');
		settype($rec['End_date'], 'integer');
		if(  ($rec['Start_date']>=$fdayperiod_ts && $rec['End_date']<=$ldayperiod_ts) 
			|| ($rec['Start_date']<=$fdayperiod_ts && $rec['End_date']>=$fdayperiod_ts) 
			|| ($rec['Start_date']<=$ldayperiod_ts && $rec['End_date']>=$ldayperiod_ts) || ($fdayperiod_ts==0) )
		{
				if(($hide_expired==false && $fdayperiod_ts!=0 || $flag=='admin') && (!isset($_GET['hidepast']) ||isset($_GET['hidepast']) && $_GET['hidepast']=='false'))  //
					{ $result[]= $rec; }
				elseif($fdayperiod_ts==0 && $hide_expired_in_rss==false) $result[]=$rec;
				else 
				{
					if( ($rec['End_date']>=$today_ts) || ($category_vis[get_cat_index($rec['Category'])]==false)) $result[]=$rec;
				}
		} //&&(!isset($_GET['hidepast'])||$_GET['hidepast']=='false')
	}
	return $result;
} 
function db_get_recurring_events($fdayperiod_ts,$ldayperiod_ts,$flag='user') //  extract events for particular period 
{
	global $db_fname_recur,$last_line,$f_max_chars,$hide_expired,$category_vis;
	
	$result=array(); 
  $temp_result=array();
	$mktime=mktime(); 
  $today_ts=mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime));  
	
	if(file_exists($db_fname_recur) && filesize($db_fname_recur)>0)
	{
		$handle=fopen($db_fname_recur, "r");
		$php_start=fgetcsv($handle, 2048);  
		$db_field_names=fgetcsv($handle, 2048);
		while ($data=fgetcsv($handle, $f_max_chars))
		{
			if ($data[0]!=$last_line) $temp_result[]=build_ass_array_record($data,$db_field_names);
		}
		fclose($handle);

		foreach($temp_result as $k=>$v)
		{
			$s=$v['Start_date']; $e=$v['End_date'];
			$r_st_n=date('n',$s); settype($r_st_n,'integer');		//recurring event start/end date
			$r_st_y=date('Y',$s); settype($r_st_y,'integer');
			$r_st_j=date('j',$s); settype($r_st_j,'integer');
			$r_st_h=date('G',$s); settype($r_st_h,'integer');
			$r_st_min=date('i',$s); settype($r_st_min,'integer');
			$r_end_n=date('n',$e); settype($r_end_n,'integer');
			$r_end_y=date('Y',$e); settype($r_end_y,'integer');
			$r_end_j=date('j',$e); settype($r_end_j,'integer');
			$r_end_h=date('G',$e); settype($r_end_h,'integer');
			$r_end_min=date('i',$e); settype($r_end_min,'integer');
	
			settype($v['Start_date'],'integer'); settype($v['End_date'],'integer');	
			settype($v['stopAfter'],'integer'); settype($v['repeatEvery'],'integer');

			if($v['repeatPeriod']=='0') // year
			{
				$st_y=date('Y',$fdayperiod_ts); settype($st_y,'integer'); // for period dates
				$end_y=date('Y',$ldayperiod_ts); settype($end_y,'integer');

				$end_range=$end_y-$st_y;
				for($i=$st_y; $i<=$end_y; $i++)
				{				
					$temp_ts=mktime($r_st_h,$r_st_min,0,$r_st_n,$r_st_j,$i);
					$temp_ts_end=mktime($r_end_h,$r_end_min,0,$r_end_n,$r_end_j,$i);			
					//if($i%$v['repeatEvery']==0 && ($v['stopAfter']==0 || $i<($v['repeatEvery']*$v['stopAfter'])))
					//{
						if($v['Start_date']<$temp_ts && $temp_ts<=$ldayperiod_ts)
						{
							if($hide_expired==false || $flag=='admin' || $temp_ts_end>=$today_ts || $category_vis[get_cat_index($v['Category'])]==false) 
							{					
								$v['Start_date']=$temp_ts;
								$v['End_date']=$temp_ts_end;
								$result[]=$v; 
							}
						}
					//}
				}
			}
			elseif($v['repeatPeriod']=='1') // month
			{	
				$st_n=date('n',$fdayperiod_ts);settype($st_n,'integer'); // for period dates
				$end_n=date('n',$ldayperiod_ts);settype($end_n,'integer');

				$end_range=$end_n-$st_n;
				for($i=0;$i<=$end_range;$i++)
				{
					if(($st_n+$i)>12) {$new_st_n=$st_n+$i-12;$r_st_y=$r_st_y+1;$r_end_y=$r_end_y+1;}
					else $new_st_n=$st_n+$i;
				
					$temp_ts=mktime ($r_st_h,$r_st_min,0,$new_st_n,$r_st_j,$r_st_y);
					$temp_ts_end=mktime ($r_end_h, $r_end_min, 0, $new_st_n, $r_end_j, $r_end_y);
					//if(($st_n+$i-$r_st_n)%$v['repeatEvery']==0 && ($v['stopAfter']==0 || $i<($v['repeatEvery']*$v['stopAfter'])))
					//{
						if($v['Start_date']<$temp_ts && $temp_ts>=$fdayperiod_ts && $temp_ts<=$ldayperiod_ts)
						{
							if($hide_expired==false || $flag=='admin' || $temp_ts_end>=$today_ts || $category_vis[get_cat_index($v['Category'])]==false) 
							{					
								$v['Start_date']=$temp_ts;
								$v['End_date']=$temp_ts_end;
								$result[]=$v; 
							}
						}
					//}
				}
			}
			elseif($v['repeatPeriod']=='2') //week
			{
				$r_st_w=date('l',$v['Start_date']); 
				$st_w=date('l',$fdayperiod_ts);  // for period dates
			
				$st_range=$fdayperiod_ts; $i=0;
				while($r_st_w!=$st_w)
				{
					$i++;
					$st_range=mktime($r_st_h,$r_st_min,0,$r_st_n,$r_st_j+$i,$r_st_y);
					$st_w=date('l',$st_range);
				}	
				$temp_ts=$st_range; 
				$temp_ts_end=mktime($r_end_h,$r_end_min,0,$r_end_n,$r_end_j+$i,$r_end_y);

				while($st_range<=$ldayperiod_ts)
				{ 					
					//if(($st_n+$i-$r_st_n)%$v['repeatEvery']==0 && ($v['stopAfter']==0 || $i<($v['repeatEvery']*$v['stopAfter'])))
					//{
						if($v['Start_date']<$temp_ts && $temp_ts>=$fdayperiod_ts && $temp_ts<=$ldayperiod_ts)
						{
							if($hide_expired==false || $flag=='admin' || $temp_ts_end>=$today_ts || $category_vis[get_cat_index($v['Category'])]==false) 
							{					
								$v['Start_date']=$temp_ts;
								$v['End_date']=$temp_ts_end;
								$result[]=$v;
							}
						}
					//}
					$r_n_fixed=date('n',$st_range); settype($r_n_fixed,'integer');		
					$r_y_fixed=date('Y',$st_range); settype($r_y_fixed,'integer');
					$r_j_fixed=date('j',$st_range); settype($r_j_fixed,'integer');
				
					if(($r_j_fixed+7)>days_in_month($r_n_fixed, $r_y_fixed)) 
					{ 
						$day_offset=$r_j_fixed+7-days_in_month($r_n_fixed,$r_y_fixed); 
						if($r_n_fixed==12) {$month_offset=1;$year_offset=$r_y_fixed+1;}
						else {$month_offset=$r_n_fixed+1;$year_offset=$r_y_fixed;}
						$temp_ts=mktime($r_st_h,$r_st_min,0,$month_offset,$day_offset,$year_offset);
						$temp_ts_end=mktime($r_end_h,$r_end_min,0,$month_offset,$day_offset,$year_offset);
					}
					else 
					{
						$temp_ts=mktime($r_st_h,$r_st_min,0,$r_n_fixed,$r_j_fixed+7,$r_y_fixed);
						$temp_ts_end=mktime($r_end_h,$r_end_min,0,$r_n_fixed,$r_j_fixed+7,$r_y_fixed);
					}
					$st_range=$temp_ts;
				}
			}
		}
	}
	return $result;
} 
function get_event_template()
{
	global $db_fname,$f_max_chars;
	
	$event_record=array(); 
  $result_data=array();
	if(file_exists($db_fname) && filesize($db_fname)>0)
	{
		$handle=fopen($db_fname,"r");
		$php_start=fgetcsv($handle,2048);    
		$db_field_names=fgetcsv($handle,2048);
		while($data=fgetcsv($handle,$f_max_chars)) 
		{
			if(isset($data[1]) && strpos(urldecode($data[1]),'%%TEMPLATE1%%')!==false)	
			{ 
				$data[1]=str_replace('%%TEMPLATE1%%','',$data[1]);
				$result_data=$data; break;	
			}
		}
		fclose($handle);
		if(!empty($result_data)) $event_record=build_ass_array_record($result_data,$db_field_names);
	}
	return $event_record;
}
function db_write_data($tag,$new)  // for calendar settings 
{
	global $cal_settings_fname;
	
	$file_contents='<?php echo "hi"; exit; /*<'.$tag.'> </'.$tag.'>*/ ?>';
	if(!file_exists($cal_settings_fname)) { $fp=@fopen($cal_settings_fname,"w"); if($fp) fclose($fp); clearstatcache(); }
		
	if(!$fp=fopen($cal_settings_fname,'r+')) {return false;}
	else 
	{
		flock($fp, LOCK_EX);
		$fsize=filesize($cal_settings_fname);
		if($fsize > 0)		{$file_contents=fread($fp,$fsize);}
		if(strpos($file_contents, "<$tag>")!==false)
		{
			$old=f_GFS($file_contents, "<$tag>", "</$tag>");
			$file_contents=str_replace("<$tag>".$old."</$tag>", "<$tag>".$new."</$tag>",$file_contents);
		}
		else {$file_contents=str_replace("*/ ?>", "<$tag>".$new."</$tag>*/ ?>",$file_contents);}
		ftruncate($fp, 0);
		fseek($fp, 0);
		if(fwrite($fp,$file_contents)===FALSE) {print "Cannot write to file";  exit;  }
		flock($fp, LOCK_UN);
		fclose($fp);
		return true;
	} 
}
//-------------MISC-----------------------	           
function days_in_feb($year)
{
	if($year<0) $year++;
    $year += 4800;
    if(($year%4)==0)
	{
		if(($year%100)==0) { if(($year%400)==0) {return(29);} else {return(28);} }
		else {return(29);}
    } 
	else {return(28);}
}
function days_in_month($_month,$_year) 
{
	if($_month==2) {return days_in_feb($_year);}       
    else 
	{
        if($_month==1 || $_month==3 || $_month==5 || $_month==7 || $_month==8 || $_month==10 || $_month==12) {return(31);}           
        else {return(30);}
     }
}
function prepare_for_write($data) // prepare event for writing in db 
{
	global $f_lf;
	foreach ($data as $k=>$v) 
	{
		$temp=trim($v);
		if($k=='Short_description' || $k=='Details' || $k=='Location' || $k=='Notes') {$data[$k]='"'.urlencode($temp).'"';}
		else 
		{
			$data[$k]= 
			'"'.(get_magic_quotes_gpc()?str_replace(",","%2C",$temp):str_replace(array('\\','\'','"',','),array('\\\\','\\\'','\"',"%2C"), $temp)).'"';
		}
	}
	$line = implode(',', array_values($data)).$f_lf;
	return $line;
}
function prepare_for_move($data)  // prepare event for moving in db
{
	global $f_lf;
	foreach ($data as $k=>$v) { $data[$k]='"'.$v.'"'; }
	$line=implode(',', array_values($data)).$f_lf;
	return $line;
}
function build_ass_array_record($value, $key) //data from db files into associative array
{
	$output=array();
	foreach($key as $k=>$v) 
	{
		if($v=='Location') 
		{ 
			$current_v=urldecode(current($value));
			$t=f_GFS($current_v,'%%USER','%%');  //user that has created event
			$h=f_GFS($current_v,'%%HIDDEN','HIDDEN%%'); //hidden info
			$d=f_GFS($current_v,'%%DLINE','DLINE%%');	//deadline
			$output[$v]=str_replace(array('%%USER'.$t.'%%','%%HIDDEN'.$h.'HIDDEN%%','%%DLINE'.$d.'DLINE%%'),array('','',''),$current_v); 
			$output['USER']=$t;
			$output['HIDDEN']=$h;
			$output['DEADLINE']=$d;
		}
		else { $output[$v]=current($value); }
		next($value);
	}
	return $output;
}
function get_category($cat_id,$flag='name') 
{
	global $category_name,$category_color,$category_id;

	settype($cat_id,"integer"); 
	if(in_array($cat_id,$category_id)) 
	{
		$buf=array_search($cat_id,$category_id); 
		if($flag=='name') $cat_res=$category_name[$buf];
		else $cat_res=$category_color[$buf];
	}
	else 
	{	if($flag=='name') $cat_res=$category_name[array_search(1,$category_id)]; 
		else $cat_res=$category_color[array_search(1,$category_id)];
	}
	return $cat_res;
}
function get_cat_index($cat_id) 
{
	global $category_id;
	settype($cat_id, "integer"); 
	if(in_array($cat_id,$category_id)) { $id=array_search($cat_id,$category_id);  }
	else { $id=1; }
	return $id;
}
function my_getdate()
{
	$current_date=getdate(my_mktime());
	return $current_date;
}
function my_mktime()
{
	global $tzone_offset;	
	return f_tzone_date(mktime(), $tzone_offset);
}
function cur_day_check($day,$mon,$year) //  calendar current day check
{
	$current_date = my_getdate();
	$currday = $current_date['mday']; 
	$currmon = $current_date['mon']; 
	$curryear = $current_date['year']; 
	if ($day==$currday && $mon==$currmon && $year==$curryear) { $flag=true; }
	else { $flag=false; }
	return $flag;
}
function season_check($day_bgcolors)
{
	global $category_vis; 
	foreach($day_bgcolors as $k=>$v)
	{
		if(array_key_exists($k,array_keys($category_vis, false))) { return true; }
		else { return false; }
	}
}
function num_vis_category($day_bgcolors)
{
	global $category_vis; 

	$new_day_bgcolors=array();
	$filter=array();
	$filter=array_keys($category_vis,true);
	foreach($day_bgcolors as $k=>$v) 
	{
		foreach($filter as $key=>$val)
		{
			if($v==get_category($val,'color')) { $new_day_bgcolors[]=$v; }
		}
	}
	return $new_day_bgcolors;
}
function define_colors($mon,$year,$event_records)  //  define colors for each day in a period
{
	$bg_colors[]=array();
	for ($i=1; $i<=days_in_month($mon, $year); $i++) 
	{	
		$st_i_ts=mktime(0,0,0,$mon,$i,$year);
		$end_i_ts=mktime(23,59,59,$mon,$i,$year);
		foreach($event_records as $k=>$v)
		{
			if( ($v['Start_date']>=$st_i_ts && $v['End_date']<=$end_i_ts) || ($v['Start_date']<=$st_i_ts && $v['End_date']>=$st_i_ts)
				|| ($v['Start_date']<=$end_i_ts && $v['End_date']>=$end_i_ts) )
			{
				if(strpos(urldecode($v['Short_description']),'%%TEMPLATE1%%')===false)
				  $bg_colors [$i][] = get_category($v['Category'],'color');	//category change	
			}
		}
	}
	return $bg_colors;
}
function define_events($mon,$year,$event_records,$month_mode=false)  //define events for each day in a period
{
	global $hint_for_invis,$location_label,$time_format,$category_vis,$em_enabled,$css_calurl,$s_path,$lang_l, $f_br;
	
	$events_perday[]=array();
	if($em_enabled) //event manager
	{ 
		$registered = db_get_registered(); 
		$users = get_user('all');
	} 
	for ($i=1; $i<=days_in_month($mon,$year); $i++) 
	{	
		$st_i_ts=mktime(0,0,0,$mon,$i,$year);
		$end_i_ts=mktime(23,59,59,$mon,$i,$year);	
		if($time_format==12) {$t_format='g:ia';$pattern='12:00am';$pattern2='11:59pm';}
		else {$t_format='G:i';$pattern='0:00';$pattern2='23:59';}
		foreach($event_records as $k=>$v) 
		{
			if( ($v['Start_date']>=$st_i_ts && $v['End_date']<=$end_i_ts) || ($v['Start_date']<=$st_i_ts && $v['End_date']>=$st_i_ts) 
				|| ($v['Start_date']<=$end_i_ts && $v['End_date']>=$end_i_ts) )
			{
				if($hint_for_invis==true || $category_vis[get_cat_index($v['Category'])]==true) 
				{
					if(strpos(urldecode($v['Short_description']),'%%TEMPLATE1%%')===false)
					{ 
						$loc_value=f_sth(urldecode($v['Location']));
						$buff='<span class="od_title">'.f_sth(urldecode($v['Short_description'])).'</span>'.(!$month_mode?'<div':$f_br.'<span').' class="od_desc">'; 
						$buff.=f_sth_2(urldecode($v['Details']));	
						$buff.=($loc_value!=''? $f_br.'<b>'.$location_label.'</b>: '.$loc_value.$f_br:'');
						if((date($t_format,$v['Start_date'])==date($t_format,$v['End_date']))&& (date($t_format,$v['End_date'])!=$pattern)) 
						{
							$buff.="(".date($t_format,$v['Start_date']).')';
						}
						elseif(date($t_format,$v['Start_date'])!=date($t_format,$v['End_date']) && date($t_format,$v['Start_date'])!=$pattern && date($t_format,$v['End_date'])!=$pattern2) 
						{                
							 $buff.="(".date($t_format,$v['Start_date'])."-".date($t_format,$v['End_date']).')';
						}
						$em_use=($em_enabled && isset($v['DEADLINE']) && !empty($v['DEADLINE']));
						if($month_mode && $em_use && !isset($v['recurType']) && $category_vis[get_cat_index($v['Category'])]==true) //event manager 
						{
							$mktime=my_mktime();
							$today_ts=mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime));
							$buff.=$f_br.'<b>'.ucfirst($lang_l['status']).': </b>';
							if($v['Start_date']<=$today_ts)  { $buff.=ucfirst($lang_l['expired']); } 	
							elseif($v['DEADLINE']>=$today_ts) 
							{ 
								$buff.=ucfirst($lang_l['open']).'<a '.bl_fn($css_calurl).' href="'.$s_path.'?action=register&amp;Id='.$v['Id'].'">['.$lang_l['register'].']</a>';
							}	
							else { $buff.=' '.ucfirst($lang_l['closed']); } 											
						}
						$buff.='</'.(!$month_mode?'div':'span').'>';  
						$events_perday[$i][]=$buff;	
					}
				}			
			}				
		}
	}
	return $events_perday;
}
function define_events_by_hours($event_records,$st_i_ts,$end_i_ts,$start_day,$flag='events')  //  define colors by hour
{
	global $hint_for_invis,$category_vis,$time_format,$location_label,$em_enabled,$css_calurl,$s_path,$lang_l, $f_br;
	
	$res_array[]=array();
	$h_array=array('0','1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16','17','18','19','20','21','22','23'); 
	$counter=0;
	$r_st_n=date('n',$st_i_ts);settype($r_st_n,'integer');		
	$r_st_y=date('Y',$st_i_ts);settype($r_st_y,'integer');
	$r_st_j=date('j',$st_i_ts);settype($r_st_j,'integer');
	$r_st_h=date('G',$st_i_ts);settype($r_st_h,'integer');
	$r_st_min=date('i',$st_i_ts);settype($r_st_min,'integer'); 
	for ($i=$start_day; $i<=($start_day+6); $i++) 
	{
		$day_offset=$r_st_j+$counter;
		if($day_offset>days_in_month($r_st_n, $r_st_y)) 
		{ 
			$day_offset=$r_st_j+$counter-days_in_month($r_st_n,$r_st_y); 
			if($r_st_n==12) { $r_st_n=1; $r_st_y=$r_st_y+1;}
			else { $r_st_n=$r_st_n+1; }
		}
		$st_i_ts=mktime($r_st_h, $r_st_min, 0, $r_st_n, $day_offset, $r_st_y);
			
		foreach($h_array as $key=>$hour)
		{	
			$temp_st_ts=mktime($r_st_h+$key, $r_st_min+1, 0, $r_st_n, $day_offset, $r_st_y);
			$temp_end_ts=mktime($r_st_h+$key+1, $r_st_min-1, 0, $r_st_n, $day_offset, $r_st_y);
			
			foreach($event_records as $k=>$v)
			{	
				$fl=true;
				if($time_format==12) { $t_format='g:ia'; $pattern='12:00am'; $pattern2='11:59pm'; }
				else				{ $t_format='G:i'; $pattern='0:00'; $pattern2='23:59';}
				if(date($t_format, $v['Start_date'])==$pattern && date($t_format, $v['End_date'])==$pattern)
					{ $v['End_date']=mktime(23,59,59, date('n',$v['End_date']), date('j',$v['End_date']), date('Y',$v['End_date'])); $fl=false;}

				if(date($t_format,$v['Start_date'])==date($t_format,$v['End_date']) && date($t_format,$v['Start_date'])!=$pattern)
				{ 
					$d=date('j',$v['End_date']); $m=date('n',$v['End_date']); $y=date('Y',$v['End_date']);
					//if(($d+1)>days_in_month($m,$y)) { if($m==12) {$m=1; $y+=1;} else {$m+=1;} }
					//else { $d+=1; }
					$v['End_date'] = mktime(23,59,59,$m,$d,$y);
				}
				
				if( (($v['Start_date']>=$temp_st_ts && $v['End_date']<=$temp_end_ts) || ($v['Start_date']<=$temp_st_ts && $v['End_date']>=$temp_st_ts) || ($v['Start_date']<=$temp_end_ts && $v['End_date']>=$temp_end_ts)) &&  (!$fl || date('G', $v['Start_date'])>=date('G', $temp_st_ts)&& date('G', $v['End_date'])<=date('G', $temp_end_ts) || date('G', $v['Start_date'])<=date('G', $temp_st_ts)&& date('G', $v['End_date'])>date('G', $temp_end_ts) || date('G', $v['Start_date'])>=date('G', $temp_st_ts)&& date('G', $v['End_date'])<date('G', $temp_end_ts)) ) //|| $v['End_date']==$v['Start_date'] && $day_offset==date('j',$v['Start_date'])
				{
					$s_d_check=strpos(urldecode($v['Short_description']),'%%TEMPLATE1%%');
					if($flag=='color')
					{	
						if($s_d_check==false) $res_array[$i][$hour][]=get_category($v['Category'],'color');					
					}
					else
					{
						if($category_vis[get_cat_index($v['Category'])]==true && $s_d_check===false) 
						{
							$loc_value=f_sth(urldecode($v['Location']));
							$buff="<b>".f_sth(urldecode($v['Short_description']))."</b>";
							$buff.=$f_br.f_sth_2(urldecode($v['Details'])).$f_br;	
							$buff.=($loc_value!=""? "<b>".$location_label.'</b>: '.$loc_value.$f_br: "");
						
							if((date($t_format,$v['Start_date'])==date($t_format,$v['End_date']))&& (date($t_format, $v['End_date'])!=$pattern)) 
							{
								$buff.="(".date($t_format,$v['Start_date']).')';
							}
							elseif(date($t_format, $v['Start_date'])!=date($t_format, $v['End_date']) && date($t_format, $v['Start_date'])!=$pattern && date($t_format, $v['End_date'])!=$pattern2)  // if time defined event
							{                
								$buff.="(".date($t_format,$v['Start_date'])."-". date($t_format,$v['End_date']).')';
							}	
							$em_use=($em_enabled && isset($v['DEADLINE']) && !empty($v['DEADLINE']));
							if($em_use && !isset($v['recurType']) && $category_vis[get_cat_index($v['Category'])]==true) //event manager 
							{
								$mktime=my_mktime();
								$today_ts=mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime));
								$buff.=$f_br.'<b>'.ucfirst($lang_l['status']).': </b>';
								if($v['Start_date']<=$today_ts)  { $buff.=ucfirst($lang_l['expired']); } 	
								elseif($v['DEADLINE']>=$today_ts) 
								{ 
									$buff.=ucfirst($lang_l['open']).'<a '.bl_fn($css_calurl).' href="'.$s_path.'?action=register&amp;Id='.$v['Id'].'">['.$lang_l['register'].']</a>';
								}	
								else { $buff.=' '.ucfirst($lang_l['closed']); } 											
							}
							//if($i>days_in_month($r_st_n,$r_st_y)) { $res_array[$i-days_in_month($r_st_n,$r_st_y)][$hour][]=$buff; }
							$res_array[$i][$hour][]=$buff; 
						}
					}
				}
			}
		}
		$counter += 1;
	} 
	return $res_array; 
}
function format_date($date_ts)
{
	global $date_params,$month_name,$day_name,$utf_fl;
		
	$res='';
	if($date_params=='') 
	{
		$res=f_my_substr($month_name[date('n',$date_ts)-1],0,3,$utf_fl).date(' j, Y ',$date_ts).'('.f_my_substr($day_name[date('w',$date_ts)],0,3,$utf_fl).')';
	}
	else 
	{
		$params=str_replace(array('dddd','ddd','dd','d','mmmm','mmm','mm','m','yyyy','yy'),
		array('XX3','XX4','d','j','XX2','XX1','m','n','Y','y'),$date_params);
		$res=date("$params", $date_ts);
		$res=str_replace('XX1',f_my_substr($month_name[date('n',$date_ts)-1],0,3,$utf_fl),$res);
		$res=str_replace('XX2',substr($month_name[date('n',$date_ts)-1], 0),$res);
		$res=str_replace('XX4',f_my_substr($day_name[date('w',$date_ts)],0,3,$utf_fl),$res);
		$res=str_replace('XX3',substr($day_name[date('w',$date_ts)], 0),$res);
	}
	return $res;
}
// ------------------ HTML functions ---------------------------
function bl_fn($css_array,$add='')
{
	global $preview_on;
    if($preview_on) 
    {
		$preview=$_GET;
        $temp='class="'.$css_array['customstyle'].($add!=''?" $add":'').'" style="';
		foreach($css_array as $k=>$v) 
		{
			if($k!='customstyle') 
			{
				if($k=="height" || $k=="font-size") { $temp.=(!isset($preview[$v])? '': $k.": ".$preview[$v]."px; "); }
				elseif($k=="color" || $k=="background-color" || $k=="border-color") {$temp.=(!isset($preview[$v])?'':$k.": #".$preview[$v]."; ");}
                else { $temp.=(!isset($preview[$v])?'': $k.": ".$preview[$v]."; "); }
			}
		}
		$temp.='" ';
		return $temp;
    }
    else { return ' class="'.$css_array['customstyle'].($add!=''? " $add":'').'"'; }
}
function build_select_category($name,&$data,&$colors,$selected,$attributes="",$size=1) 
{
	global $category_id, $f_lf;

	$r='';
	if(is_array($data) && !empty($data)) 
	{
		$r='<select class="catcolor" name="'.$name.'" size="'.$size.'" '.$attributes.'>'.$f_lf;		
		foreach($data as $k=>$v)
		{
			if($k==0) {continue;}
			else 
			{
				$r.='<option style="background-color: '.get_category($category_id[$k],'color').'" value="'.$category_id[$k].'"'; 
				if($category_id[$k]==$selected) {$r.=' selected="selected" ';}
				$r.=">$v</option>$f_lf";
			}
		}
		$r.="</select>"; 	
	}
	return $r;
}
function build_admin_menu($action_id, $view_type='', $nav_bar_mon='', $nav_bar_year='')
{
	global $s_path, $page_id, $lang_l, $doc_dir, $lg_, $em_enabled, $rel_path, $f_br;	

	$url_base=$s_path.'?action=';
	$u=($view_type!=''?"&amp;view=$view_type&amp;mon=$nav_bar_mon&amp;year=$nav_bar_year":'');
	$ca_url_base=$doc_dir.'centraladmin.php?';
	$captions=array(); $urls=array(); $indexes=array();
	$captions[]=$lang_l['add event']; $urls[]=$url_base."addevent&amp;".$lg_.$u;	$indexes[]="addevent";	
	$captions[]=$lang_l['events list']; $urls[]=$url_base."index&amp;".$lg_.$u;		$indexes[]="index";	
	$captions[]=$lang_l['manage categories']; $urls[]=$url_base."mng_categories&amp;".$lg_.$u;		$indexes[]="mng_categories";	
	$captions[]=$lang_l['settings']; $urls[]=$url_base."mng_settings&amp;".$lg_.$u;	$indexes[]="mng_settings";	

	if(!isset($_SESSION))  f_int_start_session();
	if(isset($_SESSION['SID_ADMIN']))	$logged_as=f_get_session_var('SID_ADMIN');
	else								$logged_as=f_get_session_var('cur_user');
	if($em_enabled) 
	{ $captions[]=strtoupper($lang_l['em']).' '.$lang_l['settings']; $urls[]=$url_base."setmailing&amp;".$lg_;	$indexes[]="setmailing"; }
	
	if(!f_is_logged('SID_ADMIN'))  //strtoupper($lang_l['my account'])
	{ 
		$ca_url_ext=$ca_url_base.'pageid='.$page_id."&amp;username=" .f_get_session_var('cur_user').'&amp;ref_url='.urlencode($s_path.'?action=index') .'&amp;'.$lg_.'&amp;process=';
		$captions[]=$lang_l['change password'];  $urls[]=$ca_url_ext."changepass";
		$captions[]=$lang_l['edit profile']; $urls[]=$ca_url_ext."editprofile";
			
		$captions[]=$lang_l['logout'].'['.$logged_as.']';
		$urls[]=$ca_url_base.'process=logout&amp;pageid='.$page_id.'&amp;'.$lg_;
	}
	else 
	{	
		$captions[]=$lang_l['logout'].'['.$logged_as.']';
		$urls[]=$ca_url_base."process=logoutadmin&amp;pageid=".$page_id."&amp;".$lg_;
		$captions[]=$lang_l['back to ca'];
		$urls[]=$ca_url_base.'process=index&amp;'.$lg_;	
	}
	
	$action_key=array_search($action_id,$indexes);
	if($action_key!==false) $selected=$action_key;	
	elseif(in_array($action_id,array('editevent', 'delevent', 'saveevent', 'mailing')))  $selected=array_search('index',$indexes);
	else $selected=1;
	
	$body_html=f_admin_navigation($captions,$urls,$selected);	
	return $body_html;
} 
function selection_bar($action_id,$mon,$year,$selected_view=1,$mode=null)  //calendar selection bar
{
  global $s_path,$month_name,$years_array,$lang_l,$lg_,$f_ct, $f_js_end, $f_js_st;
	
	$output='<script language="javascript" type="text/javascript">'.$f_js_st."\n".' function showDate(){'
	.' mon=document.getElementsByName("selected_month")[0].options[document.getElementsByName("selected_month")[0].selectedIndex].value; year= document.getElementsByName("selected_year")[0].options[document.getElementsByName("selected_year")[0].selectedIndex].value; document.location= "' .$s_path.'?action='.$action_id.'&'.$lg_.'&view='.$selected_view.($mode=='month' || $mode=='week'?'&mode=month':'') .'&selected_mon="+mon+"&selected_year="+year; } '.$f_js_end.' </script> ';
	$output.=f_build_select('selected_month', $month_name, $month_name[$mon-1], '', 'value')."&nbsp;" 
	.f_build_select('selected_year', $years_array, $year, '', 'value');
	$output.="&nbsp;<input class='input1' type='button' name='go' value=' ".ucfirst($lang_l['go'])." ' onclick='showDate();'".$f_ct;		
  return $output;
}
function range_selection_bar($action_id,$range_or_period,$st_range,$end_range,$msg='',$selected_period=0)  //calendar range selection bar
{
  global $s_path,$month_name,$years_array,$days_in_month_array,$period_list,$lang_l,$lg_, $f_br, $f_ct;
	
	$st_mon=date('n',$st_range); $st_day=date('j',$st_range); $st_year=date('Y',$st_range);	
	$end_mon=date('n',$end_range); $end_day=date('j',$end_range); $end_year=date('Y',$end_range);
	$output='<span class="rvts8">'.$msg.'</span>'.$f_br;
	$output.='<form name="range_selector" action="'.$s_path.'?action='.$action_id.'&amp;'.$lg_.'" method="post">'
	.'<div style="vertical-align:top;text-align:left;position;absolute;">'
	.'<div style="padding:0px 0px 7px 0px;"><div style="float:left;"><input type="radio" name="range_or_period" value="period" id="period" '.($range_or_period=='period'?'checked="checked"':'').$f_ct.'</div><div>'.f_build_select("period", $period_list, $selected_period).'</div></div>';
	$output.='<div style="padding:0px 0px 7px 0px;"><div style="float:left;"><input type="radio" name="range_or_period" value="range" id="range" ' .($range_or_period=='range'?'checked="checked"':'').$f_ct.'</div><div>'.f_build_select("dayFrom", $days_in_month_array, $st_day, '', 'value')
	.f_build_select("monthFrom", $month_name, $month_name[$st_mon-1], '', 'value').f_build_select("yearFrom", $years_array, $st_year, '', 'value').'</div><div style="padding:0px 0px 0px 20px;">';
	$output.=f_build_select("dayTo", $days_in_month_array, $end_day, '', 'value')
	.f_build_select("monthTo", $month_name, $month_name[$end_mon-1], '', 'value').f_build_select("yearTo", $years_array, $end_year, '', 'value').'</div></div>'
	.'<div style="padding:0px 0px 7px 20px;"><input name="submit" type="submit" value=" '.ucfirst($lang_l['go']).' " class="input1"'.$f_ct.'</div></div></form>';
  return $output;
}
function viewtype_bar($action_id,$mon,$year,$selected_view=1)  //calendar cal view type bar 
{ 
  global $s_path,$month_name,$years_array,$lg_;
	$output='<select onchange="document.location=\''.$s_path."?action=".$action_id."&amp;".$lg_."&amp;mon=".$mon."&amp;year=".$year.'&amp;view=\' + this.options[this.selectedIndex].value;" class="input1" name="view_type">';
	$output.='<option value="1"'.($selected_view==1?' selected="selected" ':'').">1</option>";
	$output.='<option value="3"'.($selected_view==3?' selected="selected" ':'').">3</option>";
	$output.='<option value="6"'.($selected_view==6?' selected="selected" ':'').">6</option>";
	$output.='<option value="12"'.($selected_view==12?' selected="selected" ':'').">12</option>";
	$output.='</select>';
  return $output;
}
function navigation_bar($action_id_orig,$mon,$year,$type,$selected_view=1,$flag='external',$mode=null,$start_day=null)  //calendar navigation 
{
	global $s_path,$month_name,$years_array,$lg_,$f_ct;
		$output='';
	if($action_id_orig=='showcaljs' || $action_id_orig=='showeventsjs') { $action_id='show'; }
	else { $action_id=$action_id_orig; }
	
    //if( || $mode=='month')  //$selected_view!=12 && $selected_view!=6
	//{
		$prev_mon=$mon-1; $prev_year=$year;	
		$next_mon=$mon+1; $next_year=$year;
		
		if($mon==1 && $year>1950) { $prev_mon=12; $prev_year=$year-1; }
		elseif($mon==1 && $year<=1950) { $prev_mon=1; $prev_year=1950; }
		elseif($mon==12 && $year<2050) { $next_mon=1; $next_year=$year+1; }
		elseif($mon==12 && $year>=2050) { $next_mon=12; $next_year=2050; }
		
		if($selected_view==6 && $mon<=6) { $prev_mon=7; $prev_year=($year>1950? $year-1: 1950);    $next_mon=7; $next_year=$year;}
		if($selected_view==6 && $mon>6) { $prev_mon=1; $prev_year=$year;    $next_mon=1; $next_year=($year<2050? $year+1: 2050);}
		if($selected_view==12) { $prev_mon=1; $prev_year=($year>1950? $year-1: 1950);    $next_mon=1; $next_year=($year<2050? $year+1: 2050);}	

		if($mode=='week') 
		{ 
			$prev_ts=$start_day-7*24*60*60; $next_ts=$start_day+7*24*60*60;  			
			$prev_mon=date('n', $prev_ts); $prev_year=date('Y', $prev_ts);
			$next_mon=date('n', $next_ts); $next_year=date('Y', $next_ts);
		}
		if($mode=='month') { $mode_param_prev='&amp;mode=month';  $mode_param_next='&amp;mode=month'; } 
		elseif($mode=='week') 
		{ 
			$mode_param_prev="&amp;mode=week&amp;startday=".date('j',$prev_ts);
			$mode_param_next="&amp;mode=week&amp;startday=".date('j',$next_ts);
		} 
		$output='<input class="input1" type="button" ';
		if($flag=='external') { $output.='value="'.($type=='prev'?'&lt;&lt;':'&gt;&gt;'); }
		else	{ $output.='style="border:0px; background-color:transparent; cursor:pointer;" value="'.($type=='prev'?'&lt;':'&gt;'); }
		
		$output.='" onclick="document.location=\''.$s_path."?action=".$action_id ."&amp;".$lg_."&amp;view=".$selected_view;

		if($type=='prev')	$output.="&amp;mon=".$prev_mon."&amp;year=".$prev_year.($mode!=null?$mode_param_prev:'');
		else				$output.="&amp;mon=".$next_mon."&amp;year=".$next_year.($mode!=null?$mode_param_next:'');	
		
		$output.='\';"'.$f_ct;
	//}
	return $output;
}
//BUILD CALENDAR TABLE
function build_calendar($events_raw,$mon,$year,$flag,$action_id_orig,$view_type,$internal_nav=false,$month_mode=false) 
{
	global $s_path,$cal_dir,$day_name,$month_name,$category_color,$f_day_ofweek,$f_lf,$lg_,$hint_settings,$utf_fl;		
	global $css_event,$css_calendar,$css_desc,$css_date,$css_details,$css_calurl,$css_currdayurl, $cal_size;
	global $css_day1,$css_day2,$css_day3,$css_currday,$css_currdayempty,$css_calh1,$css_calh2, $f_br, $f_ct, $category_mark, $category_mark_color; 

	if($action_id_orig=='showcaljs') { $action_id='show'; }
	else { $action_id=$action_id_orig; }  
	if($action_id_orig=='showcaljs' && isset($_GET['link']) && ($_GET['link']=='0')) { $excl_link_flag=true; }
	else { $excl_link_flag=false; }

	$fdaymonth_ts=mktime(0,0,0,$mon,1,$year); 
	$ldaymonth_ts=mktime(23,59,59,$mon,days_in_month($mon,$year),$year); 
	$event_records=db_get_events($events_raw, $fdaymonth_ts, $ldaymonth_ts, $flag); 
	$bg_colors=define_colors($mon, $year, $event_records);
	$events_per_period=define_events($mon, $year, $event_records,$month_mode);
	$url_p="&amp;".$lg_.'&amp;mon='.$mon.'&amp;year='.$year; 

	$month=$month_name[$mon-1];
	$firstday_str = date('l',mktime(0,0,0,$mon,1,$year));
	if($month_mode==false) { $month_icon = $cal_dir.'calendar_view_month.png'; }
	else { $month_icon = $cal_dir.'calendar.png'; }
	$week_icon = $cal_dir.'calendar_view_week.png';
																// 'First day of week' check
	if ($f_day_ofweek==1) { $firstday=date('w',mktime(0,0,0,$mon,1,$year)); }
	else 
	{
		$day=date('w',mktime(0,0,0,$mon,1,$year));
		$firstday=($day==0? 6: $day-1); 
		$temp=$day_name[0]; $day_name_rev=$day_name;	
		array_shift($day_name_rev); array_push($day_name_rev, $temp);	
	}
	settype($firstday,'integer');
	$cal_pointer=$firstday;
	$row_counter=0;
	
	if($month_mode==true)	$mode='month'; 
	else $mode=null;
	if($internal_nav==true) 
	{ 
		$nav_prev=navigation_bar($action_id,$mon,$year,'prev',$view_type,'internal',$mode);
		$nav_next=navigation_bar($action_id,$mon,$year,'next',$view_type,'internal',$mode);
	}

	$cal_html="<table ".bl_fn($css_calendar).' style="text-align:center; '; 
	$cal_html.=($month_mode==true? ' width:100%; height:80%;"': '"').">";
	$cal_html.='<tr><td colspan="'.($month_mode&&!$excl_link_flag? '8':'7').'" '.bl_fn($css_calh1).'>';

	if($excl_link_flag) { $cal_html.='<div style="text-align:center;">'.$month.' '.$year.'</div>'; }	
	else 
	{
		if($internal_nav==true) 
		{
			$cal_html.='<div style="text-align:left; float:left; width:'.($month_mode?'5':'8').'%">'.$nav_prev.'</div>';
			$cal_html.='<div style="text-align:center; float:left; width:';
			$cal_html.=($flag=='user')?($month_mode?'85':'70').'%">':'76%">';
			$cal_html.=$month.' '.(strlen($month)>10?substr($year,2,2):$year).'</div>';
			$cal_html.='<div style="text-align:left; float:left; width:'.($month_mode?'5':'10').'%">'.$nav_next.'</div>';
		}
		else 
		{ 
			$cal_html.='<div style="text-align:center; float:left; width:';
			$cal_html.=($flag=='user')?($month_mode?'95':'88').'%">':'100%">'; 
			$cal_html.=$month.' '.$year.'</div>';
		}
		if($flag=='user')
		{
			$cal_html.='<div style="text-align:right; float:left; width:'.($internal_nav==true?($month_mode?'5':'12'):'12').'%">';
			$cal_html.='<a '.bl_fn($css_calurl).' style="background-color:transparent; text-decoration:none" href="'.$s_path.'?action='.$action_id .$url_p.'&amp;view='.$view_type.($month_mode!=false?'':'&amp;mode=month').'" ><img src="'.$month_icon.'" border="0" alt=""'.$f_ct.'</a></div>';
		}
	}
	$cal_html.='</td></tr><tr>'; 
  //  displaying weekday names       
	foreach (($f_day_ofweek==1?$day_name:$day_name_rev) as $k=>$v) 
	{
		$cal_html.="<td ".bl_fn($css_calh2).">".($month_mode==true? $v: f_my_substr($v,0,1,$utf_fl))."</td>";
	}
	$cal_html.=($month_mode && !$excl_link_flag? '<td '.bl_fn($css_calh2,'week_st2').'>&nbsp;</td>':'')."</tr>"; 

	$cal_html.='<tr>';   //  displaying last days from previous month 
	if($firstday!=0 || ($mon==2 && days_in_month($mon,$year)==28)) 
	{
		if($mon==1)	$days_prev_mon=days_in_month(12,$year);
		else $days_prev_mon=days_in_month(($mon-1),$year);
		if($firstday!=0)
		{
      $t=$days_prev_mon-$firstday+1;
			for($i=0; $i<$firstday; $i++){$cal_html.="<td ".($month_mode==true? bl_fn($css_day3,'week_st1'): bl_fn($css_day3)).">$t</td>";$t++;} 
    }
		else 
		{
      $t=$days_prev_mon-6;
			for($i=0; $i<7; $i++){$cal_html.="<td ".($month_mode==true? bl_fn($css_day3,'week_st1'): bl_fn($css_day3)).">$t</td>";$t++;} $cal_html.='</tr>';
    }
	}

	for ($i=1; $i<=days_in_month($mon,$year); $i++)  //  displaying days from selected month 
	{		
		if($cal_pointer>6) 
		{
			$cal_pointer = 0;
			if($month_mode && !($action_id_orig=='showcaljs' && isset($_GET['link']) && $_GET['link']=='0') ) 
				$cal_html.='<td '.bl_fn($css_day3,'week_st2').'><a '.bl_fn($css_calurl).' style="background-color:transparent; text-decoration:none" href="'.$s_path."?action=".$action_id.$url_p.'&amp;mode=week&amp;startday='.($i-7).'"><img src="'.$week_icon.'" border="0" alt=""'.$f_ct.'</a></td>'; 
			$cal_html.='</tr><tr>';
			$row_counter++;  
		}
		if(array_key_exists(($i), $bg_colors)) 
		{
			$day_bgcolors=$bg_colors[$i];
			$events_per_day=(isset($events_per_period[$i])? implode("",$events_per_period[$i]): ""); 
			if(cur_day_check($i,$mon,$year)) $cal_html.="<td ".($month_mode==true? bl_fn($css_currday,'week_st1'):bl_fn($css_currday));
			else $cal_html.="<td ".($month_mode==true? bl_fn($css_day2,'week_st1'):bl_fn($css_day2));

			$count_bgcolors=count($day_bgcolors);
			if($count_bgcolors>1)            // visibility
			{  
				if(season_check($day_bgcolors)==true && count(num_vis_category($day_bgcolors))==1) $clr=current(num_vis_category($day_bgcolors));
				else $clr=$category_color[0];
			}
			else $clr=current($day_bgcolors);
      $cal_html.=' bgcolor="'.$clr.'"';
				
			if($flag=="user" && !$month_mode) 
			{	
				if($events_per_day!="")  
				{
					if($action_id_orig=='showcaljs') 
					{	
						$buff=str_replace(array('\\"','"',$f_lf,chr(13)), array('&#34;','&#34;',' ',' '), $events_per_day);
						$buffer=htmlspecialchars(str_replace(array('\\"','"','\'','/',$f_lf,chr(13)),array('&#34;','&#34;','\\\'','\/',' ',' '),$buff), ENT_QUOTES);					
						$cal_html.=" onmouseover=\"return overlib(\'".$buffer ."\',CAPTION,\'".$month_name[date('n', mktime (0, 0, 0, $mon, $i, $year))-1]. date(' j, Y', mktime (0, 0, 0, $mon, $i, $year))."\', TEXTCOLOR, \'".$hint_settings['Body text color']."\',BGCOLOR,\'".$hint_settings['Background color']."\',FGCOLOR,\'".$hint_settings['Frame color']."\', CAPCOLOR,\'" .$hint_settings['Caption color']."\',WIDTH,\'".$hint_settings['Width']."\',HEIGHT,\'".$hint_settings['Height']."\',RIGHT);\" onmouseout=\"nd();\""; 
					}
					else 
					{						
						$buff=str_replace(array('\\"','\'','\\\\',$f_lf,chr(13)), array('"','\\\'','\\',' ',' '),$events_per_day);
						$buffer=htmlspecialchars($buff, ENT_QUOTES); 

						$cal_html.=' onmouseover="return overlib(\''.$buffer ."',CAPTION,'".$month_name[date('n',mktime(0,0,0,$mon,$i,$year))-1].date(' j, Y', mktime (0, 0, 0, $mon, $i, $year))."', TEXTCOLOR, '".$hint_settings['Body text color']."',BGCOLOR,'".$hint_settings['Background color']."',FGCOLOR,'".$hint_settings['Frame color']."', CAPCOLOR,'".$hint_settings['Caption color']."',WIDTH,'".$hint_settings['Width']."',HEIGHT,'".$hint_settings['Height'].'\',RIGHT);" onmouseout="nd();"'; 
					}
				}
			}
			$cal_html.='>';

			if($flag!="user") 
			{ 
				$cal_html.="<a ".(cur_day_check($i,$mon,$year)? bl_fn($css_currdayurl): bl_fn($css_calurl));
				$cal_html.=' href="'.$s_path.'?action=addevent'.$url_p.'&amp;mday='.$i.'&amp;view='.$view_type.'">';
			}
				 
			if($count_bgcolors>=1)
			{
				if($count_bgcolors==1) $index=array_search($day_bgcolors[0],$category_color); else $index=0;
				if(isset($category_mark[$index]) && $index!==false && $category_mark[$index]!='NA')
				{
					if($cal_size=='small')		{ $pos='top:-5px;left:1px;'; $sz='18'; }
					elseif($cal_size=='medium') { $pos='top:-8px;left:0px;'; $sz='22'; }
					else						{ $pos='top:-11px;left:-1px;'; $sz='26'; }		
					$m_color=(isset($category_mark_color[$index]) && !empty($category_mark_color[$index])? $category_mark_color[$index]:'#ffffff');
					$cal_html.='<div style="position:relative;"><div style="position:relative;float:left;z-index:2;width:100%;text-align:center;">'.$i.'</div><div style="position:absolute;'.$pos.'float:right;z-index:1;color:'.$m_color.';font-size:'.$sz.'px;width:100%;text-align:center;">'.$category_mark[$index].'</div></div>';		
				}
				else $cal_html.=$i; 
			}
			else $cal_html.=$i;
			
			if($flag!="user") $cal_html.="</a>";
			$cal_html.=($month_mode==true? $f_br.'<span class="monthmode">'.$events_per_day.'</span>':'')."</td>";
		}
		else 
		{	
			if(cur_day_check($i,$mon,$year)) 
				{ $cal_html.="<td ".($month_mode==true? bl_fn($css_currdayempty,'week_st1'): bl_fn($css_currdayempty)).">";	}
			else {$cal_html.="<td ".($month_mode==true? bl_fn($css_day1,'week_st1'): bl_fn($css_day1)).">";	}				
			if($flag=="admin") 
			{ 
				$cal_html.="<a ".(cur_day_check($i,$mon,$year)? bl_fn($css_currdayurl): bl_fn($css_calurl))
				.' href="'.$s_path.'?action=addevent'.$url_p.'&amp;mday='.$i.'&amp;view='.$view_type.'">'.$i.'</a>';
			}
			else $cal_html.=$i;
			$cal_html.='</td>';
		}			
		$cal_pointer++;			
	}
	$next_month_days=1;      //  displaying first days from next month
	while($cal_pointer<=6) 
	{
		$cal_html.="<td ".($month_mode==true? bl_fn($css_day3,'week_st1'):bl_fn($css_day3)).">$next_month_days</td>";
		$next_month_days++; 
		$cal_pointer++;	
	}
	if($month_mode && !$excl_link_flag) 
		$cal_html.='<td '.bl_fn($css_day3,'week_st2').'><a '.bl_fn($css_calurl)
		.' style="background-color:transparent; text-decoration:none" href="'.$s_path.'?action='.$action_id.$url_p
		.'&amp;mode=week&amp;startday='.($next_month_days-7+days_in_month($mon,$year)).'"><img src="'.$week_icon.'" border="0" alt=""'.$f_ct.'</a></td>'; 
	$cal_html.="</tr>"; $row_counter++; 
	if($row_counter<6)
	{ 
		$cal_html.="<tr>";
		$cal_pointer=0;
		while($cal_pointer<=6) 
		{
			$cal_html.="<td ".($month_mode==true? bl_fn($css_day3,'week_st1'):bl_fn($css_day3)).">$next_month_days</td>";
			$next_month_days++;
			$cal_pointer++;
		}
		if($month_mode && !$excl_link_flag) { $cal_html.='<td '.bl_fn($css_day3,'week_st2').'></td>'; }
		$cal_html.="</tr>";
	}
	$cal_html.="</table>";
	return $cal_html;
}
//BUILD CALENDAR WEEK TABLE
function build_week($events_raw,$action_id_orig,$mon,$year,$flag,$start_day) 
{
	global $s_path,$cal_dir,$time_format,$day_name,$month_name,$category_color,$f_day_ofweek, $f_lf, $lg_, $f_br, $f_ct;		
	global $css_event,$css_calendar,$css_day1,$css_day2,$css_day3,$css_currday,$css_currdayempty,$css_calh1,$css_calh2;
	global $css_desc,$css_date,$css_details,$css_calurl,$css_currdayurl,$hint_settings,$week_mode_wh_only, $utf_fl;
	
	if($action_id_orig=='showcaljs') { $action_id='show'; }
	else { $action_id=$action_id_orig; }

	$hours12_array=array('0:00am','1:00am','2:00am','3:00am','4:00am','5:00am','6:00am','7:00am','8:00am','9:00am','10:00am','11:00am','12:00pm', '1:00pm','2:00pm','3:00pm','4:00pm','5:00pm','6:00pm','7:00pm','8:00pm','9:00pm','10:00pm','11:00pm'); 
	$hours_array=array('0','1','2','3','4','5','6','7','8','9','10','11','12','13','14','15','16','17','18','19','20','21','22','23'); 
	if ($time_format==12)	$h_array=$hours12_array; 
	else					$h_array=$hours_array; 
	$mode='week'; 
	$url_p="&amp;".$lg_.'&amp;mon='.$mon.'&amp;year='.$year; 

	settype($start_day, 'integer');
	$fdaymonth_ts=mktime(0,0,0,$mon,$start_day,$year); 
	if(($start_day+6)>days_in_month($mon,$year)) 
	{ 
		$start_day_fixed=$start_day+6-days_in_month($mon,$year); 
		if($mon==12)	$ldaymonth_ts=mktime(23,59,59,1,$start_day_fixed,$year+1); 
		else			$ldaymonth_ts=mktime(23,59,59,$mon+1,$start_day_fixed,$year); 
	}
	else { $ldaymonth_ts=mktime(23,59,59,$mon,$start_day+6,$year);  }
	
	$event_records=db_get_events($events_raw, $fdaymonth_ts, $ldaymonth_ts, $flag);
	$bg_colors=define_events_by_hours($event_records, $fdaymonth_ts, $ldaymonth_ts, $start_day,'color');
	$events_per_period=define_events_by_hours($event_records, $fdaymonth_ts, $ldaymonth_ts, $start_day);
												
	if($f_day_ofweek==2) 
	{
		$temp=$day_name[0]; $day_name_rev=$day_name;	
		array_shift($day_name_rev); array_push($day_name_rev, $temp);	
	}
	
	$cal_html='<table '.bl_fn($css_calendar).' style="width:100%; height:80%" align="center">';
	$cal_html.='<tr><td colspan="8" '.bl_fn($css_calh1).'>';
	if($action_id_orig=='showcaljs' && isset($_GET['link']) && $_GET['link']=='0')
	{ $cal_html.='<div style="text-align:center;">'.format_date($fdaymonth_ts).' - '.format_date($ldaymonth_ts).'</div>'; }
	else 
	{
		$cal_html.='<div style="text-align:left; float:left; width:5%">'.navigation_bar($action_id,$mon,$year,'prev',1,'internal',$mode,$fdaymonth_ts) .'</div>';
		$cal_html.='<div style="text-align:center; float:left; width:85%">'.format_date($fdaymonth_ts).' - ' .format_date($ldaymonth_ts).'</div>';
		$cal_html.='<div style="text-align:right; float:left; width:5%">'.navigation_bar($action_id,$mon,$year,'next',1,'internal',$mode, $fdaymonth_ts).'</div>';
		$cal_html.='<div style="text-align:right; float:left; width:5%"><a '.bl_fn($css_calurl).' style="background-color:transparent; text-decoration:none" href="'.$s_path.'?action='.$action_id.$url_p.'&amp;mode=month"><img src="'.$cal_dir.'calendar_view_month.png" border="0" alt=""'.$f_ct.'</a></div>';
	}
	$cal_html.='</td></tr>';
		
	$cal_html.="<tr><td ".bl_fn($css_calh2).">&nbsp;</td>";     //  displaying weekday names
	foreach(($f_day_ofweek==1?$day_name:$day_name_rev) as $k=>$v) 
	{
		$temp_ts = $fdaymonth_ts + 24*60*60*$k;
		$cal_html.="<td ".bl_fn($css_calh2).">".f_my_substr($month_name[date('n',$temp_ts)-1], 0, 3, $utf_fl).' '.date('j',$temp_ts).$f_br.$v."</td>";
	}
	$cal_html.="</tr>";  
	
	foreach($h_array as $hour=>$val)
	{	
	 if($week_mode_wh_only==false || $hour>=9 && $hour<=18)
	 {
		$cal_html.='<tr><td '.bl_fn($css_day3,'week_st3').">$val</td>";   
		for($d=$start_day; $d<=($start_day+6); $d++)
		{
			if(isset($bg_colors[$d][$hour])) 
			{
				$h_bgcolors = $bg_colors[$d][$hour];
				$events_per_day = (isset($events_per_period[$d][$hour])?implode (" ", $events_per_period[$d][$hour]):"");
				$buff = $events_per_day;
				$cal_html.="<td ".bl_fn($css_day2,'week_st3').' bgcolor="';
				if(count($h_bgcolors)>1)  // visibility
				{  
					if(season_check($h_bgcolors)==true && count(num_vis_category($h_bgcolors))==1) 
					{
						$cal_html.=current(num_vis_category($h_bgcolors)).'">';
					}
					else { $cal_html.=$category_color[0].'">'; }
				}
				else { $cal_html.=current($h_bgcolors).'">'; }
				if(isset($events_per_period[$d][$hour])) { $cal_html.='<span class="monthmode">'.$buff.'</span>'; }
				$cal_html.="</td>";
			}
			else { $cal_html.="<td ".bl_fn($css_day1,'week_st3').">&nbsp;</td>"; }
		}
		$cal_html.="</tr>";
	 }
	}	
	$cal_html.="</table>";
	return $cal_html;
}
//BUILD EVENTS TABLE
function view_events($events_raw,$fdayperiod_ts,$ldayperiod_ts,$flag,$view_type,$_mon,$_year, $event_id='',$old_reg_info='',$f_mail_type='',$all_users=array(),$send_to_list=array(),$send_to_group=array(),$short_form=false) 
{
	global $s_path,$page_id,$db_fname,$cal_dir,$doc_dir,$category_color,$day_name,$month_name,$noevents_msg,$lang_l,$lg_,$f_lf, $f_br, $f_ct;
	global $time_format,$location_label,$last_line,$f_max_chars,$category_vis,$hide_expired,$include_hide_button,$read_access;
	global $css_event,$css_calendar,$css_desc,$css_date,$css_details,$css_calurl,$em_enabled,$hint_settings,$em_show_participants;

	$events_html = "";
	$records = array();
	$registered = array();
	if($flag=='admin')	$recur_flag=false;
	else				$recur_flag=true;
	if($event_id!='') $embed_form=true;
	else			 $embed_form=false;
 
	if($embed_form==false) $records=db_get_events($events_raw,$fdayperiod_ts,$ldayperiod_ts,$flag);
	else $records[]=db_get_specific_event($db_fname,$event_id);
	$page_list=get_sitemap_list();
	$url_p="&amp;".$lg_.'&amp;mon='.$_mon.'&amp;year='.$_year; 
	$icon_st=' style="background-color:transparent; text-decoration:none"';
	
	if(!empty($records)) 
	{
		foreach ($records as $key=>$row) {$name[$key]=$row['Start_date'];} // sorting event records by start_date
		array_multisort($name,SORT_ASC,$records); 
	
		if(!$embed_form && $include_hide_button) //event manager 
		{
			$hidepast=(isset($_GET['hidepast'])? $_GET['hidepast']: 'false');
			$events_html.='<tr><td colspan="'.($em_enabled?4:3).'" align="left">'
			.'<input class="input1" type="button" value=" '.($hidepast=='false'? $lang_l['hide past']: $lang_l['show past'])
			.' " onclick="document.location=\''.$s_path."?view=$view_type&amp;mon=$_mon&amp;year=$_year&amp;".$lg_. ($flag=="admin"?'&amp;action=index&amp;':'')."&amp;hidepast=".($hidepast=='false'?'true':'false')."'\"".$f_ct."</td></tr>";
		}
		foreach($records as $k=> $v) 
		{
			if(strpos(urldecode($v['Short_description']),'%%TEMPLATE1%%')===false)
			{	
				if($category_vis[get_cat_index($v['Category'])]==true || $flag=="admin") // visibility
				{ 
					$font_color=get_category($v['Category'],'color'); //category change
					$events_html.="<tr>";
					if ($flag=="admin")  // if admin screen - Edit/Del options
					{					
						$events_html.='<td bgcolor="'.$font_color.'" align="left">';
						$events_html.='<a '.bl_fn($css_calurl).' href="'.$s_path.'?action=editevent&amp;Id='.$v['Id']
						.'&amp;view='.$view_type.$url_p.'"';
						if(file_exists($cal_dir.'calendar_edit.png'))
						{
							$events_html.=$icon_st.'><img src="'.$cal_dir.'calendar_edit.png" border="0" alt="'.$lang_l['edit'].'" title="'.$lang_l['edit'].'"'.$f_ct.'</a>';				
						}
						else { $events_html.='>['.ucfirst($lang_l['edit']).']</a>';}
						$events_html.=' <a '.bl_fn($css_calurl).' href="'.$s_path.'?action=delevent&amp;Id='.$v['Id'] .'&amp;view='.$view_type.$url_p.'"'." onclick=\"javascript:return confirm('".$lang_l['delete MSG']."')\"";
						if(file_exists($cal_dir.'calendar_delete.png'))
						{
							$events_html.=$icon_st.'><img src="'.$cal_dir.'calendar_delete.png" border="0" alt="'.$lang_l['delete'].'" title="'.$lang_l['delete'].'"'.$f_ct.'</a>';
						}
						else { $events_html.='>['.ucfirst($lang_l['delete']).']</a>'; }
						$events_html.='</td>';
					}
					else  { $events_html.='<td '.bl_fn($css_date).' bgcolor="'.$font_color.'" align="left"></td>'; }
					
					$events_html.='<td '.bl_fn($css_date).' bgcolor="'.$font_color.'" align="left">'.format_date($v['Start_date']);
					if(date('n j, Y',$v['Start_date'])==date('n j, Y',$v['End_date'])) { $events_html.='</td>' ; }    // one-day event
					else  {$events_html.=' - '.format_date($v['End_date']).'</td>'; }              //multiple-days event
			
					if ($time_format==12) { $t_format='g:i A';  $pattern='12:00 AM'; }
					else {$t_format='G:i'; $pattern='0:00'; }
					if(date($t_format,$v['Start_date'])==date($t_format,$v['End_date']) && date($t_format,$v['Start_date'])==$pattern) //no time
					{
						$events_html.='<td bgcolor="'.$font_color.'"></td>';
					}
					else
					{
						$events_html.='<td '.bl_fn($css_date).' bgcolor="'.$font_color.'" align="left">'.date($t_format, $v['Start_date']);
						if(date($t_format,$v['Start_date'])!=date($t_format,$v['End_date'])) $events_html.=" - ".date($t_format, $v['End_date']);
						$events_html.='</td>';
					}	
					
					$em_use=($em_enabled && isset($v['DEADLINE']) && !empty($v['DEADLINE']));
					if($em_enabled && !isset($v['recurType']) && ($flag=="admin" || $category_vis[get_cat_index($v['Category'])]==true))
					{ 
						$events_html.='<td '.bl_fn($css_date).' bgcolor="'.$font_color.'" align="left">';
						$events_html.=($em_use? ucfirst($lang_l['deadline']).': '.format_date($v['DEADLINE']): "").'</td>'; 
					}	
					$events_html.='</tr>';
					$events_html.="<tr><td ".bl_fn($css_desc);
					if ($flag=="admin") 
					{ 
						$events_html.=' align="left"><input type="hidden" name="Id" value="'.$v['Id'].'"'.$f_ct;
						if($em_enabled && (!$embed_form || isset($_GET['event_id']))) //event manager
							$events_html.='<a '.bl_fn($css_calurl).' href="'.$s_path.'?action=mailing&amp;Id='.$v['Id'].'&amp;view='.$view_type.$url_p.'">['.$lang_l['mailing'].']</a>';
						$events_html.='</td>';
					}
					else { $events_html.='></td>';}

					$loc_value=f_sth(urldecode($v['Location']));
					$desc_field_value=f_sth(urldecode($v['Short_description']));
					$desc_field_value=str_replace('%%TEMPLATE1%%','',$desc_field_value);

					$events_html.='<td '.bl_fn($css_desc).' align="left">:: '.$desc_field_value.'</td>';
					$events_html.='<td '.bl_fn($css_desc).' align="left">'.($loc_value!=""? $location_label.': '.$loc_value: "").'</td>';	
            
					if($em_enabled) //event manager 
					{
						$events_html.='<td '.bl_fn($css_desc).' align="left">';
						if($em_use && !isset($v['recurType']) && ($flag=="user" || $category_vis[get_cat_index($v['Category'])]==true) )
						{
							$mktime=my_mktime();
							$today_ts=mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime));
							$events_html.=ucfirst($lang_l['status']).': ';
							if($v['Start_date']<=$today_ts)  { $events_html.=ucfirst($lang_l['expired']); } 	
							elseif($v['DEADLINE']>=$today_ts) 
							{ 
								$events_html.=ucfirst($lang_l['open']);
								if((!$embed_form || isset($_GET['event_id'])) && $flag=="user") { $events_html.=' <a '.bl_fn($css_calurl).' href="'.$s_path
									.'?action=register&amp;Id='.$v['Id'] .'">['.$lang_l['register'].']</a>';}
							}	
							else { $events_html.=ucfirst($lang_l['closed']); } 
							if((!$embed_form || isset($_GET['event_id'])) && $flag=="admin") { $events_html.=' <a '.bl_fn($css_calurl).' href="'.$s_path.'?action=emregister&amp;Id='.$v['Id'].'&amp;view='.$view_type.$url_p.'">['.$lang_l['register'].']</a>';}
						}
						$events_html.='</td>';
					}
					$events_html.='</tr>';

					$events_html.='<tr><td '.bl_fn($css_details).' align="left" valign="top">';
					if(isset($v['USER']) && !empty($v['USER']) && $flag=="admin")	
						{ $events_html.=ucfirst($lang_l['author']).' ['.f_sth(urldecode($v['USER'])).']'; }
					elseif($flag=="admin")	{ $events_html.=ucfirst($lang_l['author']).' [admin]'; }
					$events_html.='</td><td '.bl_fn($css_details).' align="left" colspan="2" valign="top">'.f_sth_2(urldecode($v['Details']));
					if($flag=="admin" && isset($v['HIDDEN'])) $events_html.=$f_br.f_sth_2($v['HIDDEN']);
					$events_html.='</td>';

					if($em_enabled)  //event manager
					{
						$events_html.='<td '.bl_fn($css_details).' align="left" valign="top">';	
						if($em_use && !isset($v['recurType']) && ($flag=="user" || $category_vis[get_cat_index($v['Category'])]==true))
						{
							$users=get_user('all');
							$attendee_list=array();
							$registered=db_get_registered();
							$events_html.=ucfirst($lang_l['total attendee']).': '; 
							if(!empty($registered) && isset($registered[$v['Id']]))  
							{  
								$events_html.=count($registered[$v['Id']]).' ';
								if($flag=="user" && (!$embed_form || isset($_GET['event_id'])) && $v['Start_date']>$today_ts)	
									$events_html.=$f_br.'<a '.bl_fn($css_calurl) 
									.' href="'.$s_path.'?action=chregister&amp;Id='.$v['Id'].'">['.$lang_l['edit'].']</a> <a '.bl_fn($css_calurl) 
									.' href="'.$s_path.'?action=clregister&amp;Id='.$v['Id'].'">['.$lang_l['cancel'].']</a> <span '.bl_fn($css_details).'>'.$lang_l['my registration'].'</span>'.$f_br;
								$events_html.=$f_br;
								if(count($registered[$v['Id']])>5 && !isset($_GET['event_id'])) 
									{ $registered_cut=array_slice($registered[$v['Id']],0,5); }
								else { $registered_cut=$registered[$v['Id']]; }
								if($flag=="admin") 
								{ 
									foreach($registered_cut as $m=>$n) 
									{ 	
										$curr_user=$m;
										$user_details=$users[$curr_user]['details'];
										$attendee_list[$curr_user]=ucfirst($user_details['name']).' '.$user_details['sirname'];
										$buffer=$user_details['name'].' '.$user_details['sirname'].$f_br.$user_details['email']; 
										$notes_value=f_sth(urldecode($registered[$v['Id']][$curr_user]['notes']));
										if(!empty($notes_value)) {$buffer.=$f_br.'<b>'.ucfirst($lang_l['notes']).':</b>'.$f_br.$notes_value; }
										
										$events_html.='<a '.bl_fn($css_calurl).' href="javascript:void(0);" onmouseover="return overlib(\''.$buffer."',CAPTION,'".$curr_user."', TEXTCOLOR, '".$hint_settings['Body text color']."',BGCOLOR,'".$hint_settings['Background color']."',FGCOLOR,'".$hint_settings['Frame color']."', CAPCOLOR,'".$hint_settings['Caption color']."',WIDTH,'".$hint_settings['Width']."',HEIGHT,'" .$hint_settings['Height'].'\',RIGHT);" onmouseout="nd();">'; 

										$events_html.='::'.$curr_user.'</a> [<a '.bl_fn($css_calurl).' href="'.$s_path .'?action=emregister&amp;remove='.$curr_user.'&amp;Id='.$v['Id'].'" onclick="javascript:return confirm(\''
										.$lang_l['unregister MSG'].' '.strtoupper($curr_user).'\')">'.$lang_l['unregister'].'</a>]'.$f_br;
									}
								}
								elseif($read_access || $em_show_participants)
								{
									foreach($registered_cut as $m=>$n) 
									{ 
										$curr_user=$m; 
										if(isset($users[$curr_user]))
										{
											$user_details=$users[$curr_user]['details'];
											$events_html.='::'.$user_details['name'].' '.$user_details['sirname'].' '.$f_br;
										}
										else { $events_html.=':: undefined'.$f_br; }
									} 
								}
								if(count($registered[$v['Id']])>5 && !isset($_GET['event_id']))
								{
									$events_html.='<a '.bl_fn($css_calurl).' href="';
									if($flag=="admin") {$events_html.=$s_path.'?action=index&amp;event_id='.$v['Id']; }
									elseif($read_access) { $events_html.=$s_path.'?event_id='.$v['Id']; }
									else {$events_html.= $doc_dir."centraladmin.php?pageid=".$page_id."&ref_url=".urlencode($s_path.'?event_id='.$v['Id']); }	
									$events_html.='">['.$lang_l['click here'].']</a>';
								}
							}
							else { $events_html.='0'; }
						}
						$events_html.='</td>';
					}
					$events_html.='</tr>';
				}
			}
			}
			if($em_enabled && $embed_form && $f_mail_type=='' && !isset($_GET['event_id'])) //event manager
			{
				$events_html.="<tr><td ".bl_fn($css_details).' colspan="4" height="100%" align="left">';
				if($embed_form)
				{
					$events_html.=ucfirst($lang_l['notes']).$f_br.' <textarea class="input1" name="notes" cols="50" rows="7">'
					.(empty($old_reg_info)? ucfirst($lang_l['type notes']): f_sth(urldecode($old_reg_info['Notes'])) ).'</textarea>'
					.(empty($old_reg_info)?'': '<input type="hidden" name="timestamp" value="'.$old_reg_info['Timestamp'].'"'.$f_ct);
				}
				$events_html.='</td></tr>';   
			}
			elseif($em_enabled && $embed_form && $f_mail_type!='' && !isset($_GET['event_id'])) //event manager
			{
				$mail_settings=get_mailing_settings($f_mail_type);
				$def_subject=$mail_settings[$f_mail_type.'_subject'];
				$def_message=str_replace($f_br,$f_lf,$mail_settings[$f_mail_type.'_message']);

				$events_html.="<tr><td ".bl_fn($css_details).' colspan="4" height="100%" align="left">' .mailing_form($f_mail_type,$def_subject,$def_message,$send_to_group,$send_to_list,$all_users,$v['Category'],$event_id, $short_form).'</td></tr>';  
			}
			elseif($em_enabled) { $events_html.="<tr><td ".bl_fn($css_details).' colspan="4" height="100%">&nbsp;</td></tr>';  }
			else { $events_html.="<tr><td ".bl_fn($css_details).' colspan="3" height="100%">&nbsp;</td></tr>';  }
		}
		else 
		{
			$events_html.='<tr><td align="left"></td></tr>';
			$events_html.="<tr><td ".bl_fn($css_desc).' valign="top" align="left">:: '.$noevents_msg.'</td></tr>';
			$events_html.="<tr><td ".bl_fn($css_details).' height="100%">&nbsp;</td></tr>';
		}
		$events_html="<table ".bl_fn($css_event).">".$events_html."</table>";
		return $events_html;
}
//  BUILD ADD/EDIT EVENT forms 
function add_event_form($mon,$mday,$year,$view_type) 
{
	global $page_id,$s_path,$category_name,$category_color,$month_name,$time_format,$lang_l,$lg_,$f_lf, $f_br, $f_ct;
	global $days_in_month_array,$location_label, $em_enabled,$use_editor,$innova_def,$js_innova; 
	global $ampm_array,$hours_array,$hours12_array,$min_array,$years_array,$repeatPeriod_list,$rel_path;

	$caption_style="font-size:10px;font-weight:bolder;line-height:16px;";
	$span8='<span class="rvts8" style="'.$caption_style.'">'.ucfirst('%s')."</span>".$f_br;
	$input="<input class=\"input1\" type=\"text\" name=\"%s\" value=\"%s\" style=\"width:500px;\"".$f_ct.$f_br;
	$marks_array=array('NA','X','@','#','$','%','&','*','!','?','~','+','-','^','<','>');
	
	$hidden_value='';  $t_data=get_event_template();
	if($time_format==12) $h_array=$hours12_array; else$h_array=$hours_array;	
		
	if(!empty($t_data))
	{
		$location_value=f_sth(urldecode($t_data['Location'])); 	
		$hidden_value=(isset($t_data['HIDDEN'])? urldecode($t_data['HIDDEN']): ''); 
		$hidden_value=str_replace($f_br,$f_lf,$hidden_value);
		$desc_value=f_sth(urldecode($t_data['Short_description']));
		$desc_value=str_replace('%%TEMPLATE1%%','',$desc_value);
		$details_value= str_replace($f_br, $f_lf, f_sth_2(urldecode($t_data['Details'])));
	}
	$output="<form action='".$s_path."?action=saveevent&amp;view=$view_type&amp;mon=$mon&amp;year=$year&amp;".$lg_ 
	."' method='post' enctype='multipart/form-data'>".f_fmt_admin_title($lang_l['add event']).$f_br.$f_br;
	$output.='<div style="margin: 0 auto;text-align:left;">'.sprintf($span8,ucfirst($lang_l['short description']).'<em style="color: red;">*</em>');	
	$output.=sprintf($input,'Short_description',(!empty($t_data)? $desc_value: ''));
	$output.=sprintf($span8,ucfirst($lang_l['category'])).build_select_category('Category',$category_name,$category_color,$category_name[1],' style="width:500px;" ').$f_br;
	
	$block_flag=(isset($_POST['add_category']) && (empty($_POST['cat_color']) || empty($_POST['cat_name'])));
	$output.='<a class="rvts12" href="javascript:void(0);" onclick="javascript:divShow(\'new_cat\');">'.ucfirst($lang_l['add category']).'</a>'.$f_br; 
	$output.='<div id="new_cat" style="height:170px;padding:10px 0px 0px 65px;display:'.($block_flag ?'block':'none').';">'; 
	$output.=build_add_category_form('', '#', $marks_array[0], '#', '')
	.'<div><input class="input1" type="submit" name="add_category" value="'.ucfirst($lang_l['submit']).'"'.$f_ct.$f_br.'</div></div>';
	$output.="<script type='text/javascript'>function divShow(id) { if(document.getElementById(id).style.display!='block') {document.getElementById(id).style.display='block';} else {document.getElementById(id).style.display='none';} }</script>".$f_br;

	$tinymice_flag=(strpos($js_innova,'tiny_mce.js')!==false && $use_editor==true);
	$output.=sprintf($span8,ucfirst($lang_l['details']))."<textarea class='input1".($tinymice_flag?' mceEditor':'')."' id='htmlarea' name='Details' cols='80' rows='".($use_editor==true? 7:5)."' style='width:500px;'>".(!empty($t_data)?$details_value:'')."</textarea>"; 
	if($use_editor==true) $output.=$innova_def;

	$output.=$f_br.sprintf($span8,$location_label).sprintf($input,'Location',(!empty($t_data)? $location_value: ''));
	$output.=sprintf($span8,ucfirst($lang_l['hidden info']))."<textarea class='input1".($tinymice_flag?' mceNoEditor':'')."' name='Hiddeninfo' cols='80' rows='5' style='width:500px;'>".f_sth_2($hidden_value)."</textarea>".$f_br;
	
	$output.=$f_br.'<div style="float:left;line-height:25px;"><span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['start date'])
	.'</span>&nbsp;'.f_build_select('Start_month',$month_name,$month_name[$mon-1], '', 'value')
	.f_build_select('Start_day',$days_in_month_array,$mday,'','value').f_build_select('Start_year',$years_array,$year,'','value').'</div>';
	$output.='<div style="line-height:25px;"><span class="rvts8" style="'.$caption_style.'">&nbsp;&nbsp;'.ucfirst($lang_l['end date']).'</span>&nbsp;'
	.f_build_select('End_month',$month_name, $month_name[$mon-1], '', 'value').f_build_select('End_day',$days_in_month_array,$mday, '', 'value') .f_build_select('End_year',$years_array,$year, '', 'value').'</div>';

	$output.='<div style="float:left;line-height:25px;"><span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['start time']).'</span>&nbsp;' .f_build_select('Start_hour',$h_array,$h_array[0], '', 'value').':' .f_build_select('Start_min',$min_array,$min_array[0], '', 'value');
	if($time_format==12) $output.=f_build_select('Start_ampm',$ampm_array,$ampm_array[0], '', 'value');			
	$output.='</div><div style="line-height:25px;"><span class="rvts8" style="'.$caption_style.'">&nbsp;&nbsp;'.ucfirst($lang_l['end time']).'</span>&nbsp;'
	.f_build_select('End_hour',$h_array,$h_array[0], '', 'value').':' .f_build_select('End_min',$min_array,$min_array[0], '', 'value');
	if($time_format==12) $output.=f_build_select('End_ampm',$ampm_array,$ampm_array[0], '', 'value');	
	$output.='</div>';

	if($em_enabled) //event manager 
	{
		$output.='<div style="line-height:25px;"><input type="checkbox" name="use_em" value="yes" checked="checked"'.$f_ct.'<span class="rvts8" style="'.$caption_style.'"> Use EM --> '.ucfirst($lang_l['deadline']).' </span>'.f_build_select('Deadline_month',$month_name,$month_name[$mon-1], '', 'value')
		.f_build_select('Deadline_day',$days_in_month_array,$mday,'','value').f_build_select('Deadline_year',$years_array,$year,'', 'value')
		."</span></div>";
	}	
	$output.='<div style="line-height:25px;"><input type="radio" name="event_frequency" value="once" id="once" checked="checked"'.$f_ct
	.'<span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['once']).'</span>';
	$output.=' <input type="radio" name="event_frequency" value="repeating" id="repeating" onclick="javascript:show(\'once\',\'recurring\', \'floating\');"'.$f_ct.'<span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['repeat every']).'</span> ' .f_build_select("repeatPeriod",$repeatPeriod_list,$repeatPeriod_list[0]).'</div>';
	//$output .= '<tr><td><span class="rvts8">Repeat every </span></td><td><input class="input1" type="text" name="repeatEvery" value = "1"  size="4" maxlength="4"> '.f_build_select("repeatPeriod", $repeatPeriod_list, $repeatPeriod_list[0]).' <span class="rvts8">Stop after </span><input class="input1" type="text" name="stopAfter" value = "0"  size="4" maxlength="4"> <span class="rvts8">events. (0- unlimited)</span></td></tr>';
	$output.=$f_br.'<input class="input1" name="Save" type="submit" value="'.ucfirst($lang_l['submit']).'"'.$f_ct;
	$output.=' <input class="input1" type="button" value=" '.ucfirst($lang_l['cancel'])
	.' " onclick="document.location=\'' .$s_path."?action=index&amp;view=$view_type&amp;mon=$mon&amp;year=$year&amp;".$lg_.'\'"'.$f_ct;
	$output.=' <input class="input1" name="savetemplate" type="submit" value="'.ucfirst($lang_l['save as template']).'"'.$f_ct."</div></form>";
	return $output;
}
function edit_event_form($event_record,$view_type,$mon='',$year='')  
{
	global $page_id,$s_path,$category_name,$category_color,$category_id,$month_name,$days_in_month_array, $f_br,$f_ct;
	global $years_array,$time_format,$location_label,$lang_l,$f_lf,$lg_, $em_enabled, $use_editor, $innova_def,$js_innova;
	global $ampm_array,$hours_array,$hours12_array,$min_array,$repeatPeriod_list,$cal_settings_fname,$rel_path;
	
	$caption_style="font-size:10px;font-weight:bolder;line-height:16px;";
	$span8='<span class="rvts8" style="'.$caption_style.'">'.ucfirst('%s')."</span>".$f_br;
	$input="<input class=\"input1\" type=\"text\" name=\"%s\" value=\"%s\" style=\"width:500px;\"".$f_ct.$f_br;
	$marks_array=array('NA','X','@','#','$','%','&','*','!','?','~','+','-','^','<','>');

	if($time_format==12) $h_array=$hours12_array;  else	$h_array=$hours_array;
	$occur_type=(isset($event_record['event_frequency'])?$event_record['event_frequency']:'once');

	$location_value=f_sth(urldecode($event_record['Location'])); 
	$hidden_value=(isset($event_record['HIDDEN'])? urldecode($event_record['HIDDEN']):""); 
	$hidden_value=str_replace($f_br,$f_lf,$hidden_value);
	$desc_value=f_sth(urldecode($event_record['Short_description']));
	if(strpos($desc_value,'%%TEMPLATE1%%')!==false) $is_template=true;
	else $is_template=false;
	$desc_value=str_replace('%%TEMPLATE1%%','',$desc_value);
	if($use_editor==true) $details_value=f_sth_2(urldecode($event_record['Details']));
	else $details_value=str_replace($f_br, $f_lf, f_sth_2(urldecode($event_record['Details'])));

	$output="<form action='".$s_path."?action=saveevent&amp;view=$view_type&amp;".$lg_.($mon!=''?"&amp;mon=$mon&amp;year=$year":'') ."' method='post' enctype='multipart/form-data'>".(array_key_exists('Id',$event_record)?f_fmt_admin_title($lang_l['edit event']):f_fmt_admin_title($lang_l['add event'])).$f_br.$f_br;
	$output.='<div style="margin: 0 auto;text-align:left;">';
	if(array_key_exists('Id',$event_record)) { $output.="<input class='input1' type='hidden' name='Id' value='{$event_record['Id']}'".$f_ct; }
	if(isset($event_record['USER']) && !empty($event_record['USER']))  //USER
		{ $output.="<input class='input1' type='hidden' name='USER' value='".f_sth(urldecode($event_record['USER']))."'".$f_ct; }
	if($is_template) $output.="<input class='input1' type='hidden' name='savetemplate' value='savetemplate'".$f_ct;

	$output.=sprintf($span8,ucfirst($lang_l['short description']).'<em style="color: red;">*</em>').sprintf($input,'Short_description',$desc_value);
	$output.=sprintf($span8,ucfirst($lang_l['category'])).build_select_category('Category',$category_name,$category_color,(in_array($event_record['Category'],$category_id)? $event_record['Category']: '1'),' style="width:500px;" ').$f_br;

	$block_flag=(isset($_POST['add_category']) && (empty($_POST['cat_color']) || empty($_POST['cat_name']) || $_POST['cat_name']=='#'));
	$output.='<a class="rvts12" href="javascript:void(0);" onclick="javascript:divShow(\'new_cat\');">'.ucfirst($lang_l['add category']).'</a>'.$f_br; 
	
	$output.='<div id="new_cat" style="height:170px;padding:10px 0px 0px 65px;display:'.($block_flag ?'block':'none').';">'; 
	$output.=build_add_category_form((isset($_POST['cat_name'])?$_POST['cat_name']:''), (isset($_POST['cat_color'])?$_POST['cat_color']:'#'), (isset($_POST['cat_mark'])? $_POST['cat_mark']: $marks_array[0]), (isset($_POST['mark_color'])?$_POST['mark_color']:'#'), (isset($_POST['cat_invisible'])? 'checked="checked"': ''))
	.'<div><input class="input1" type="submit" name="add_category" value="'.ucfirst($lang_l['submit']).'"'.$f_ct.$f_br.'</div></div>';
	$output.="<script type='text/javascript'>function divShow(id) { if(document.getElementById(id).style.display!='block') {document.getElementById(id).style.display='block';} else {document.getElementById(id).style.display='none';} }</script>".$f_br;
	
	$tinymice_flag=(strpos($js_innova,'tiny_mce.js')!==false && $use_editor==true);
	$output.=sprintf($span8,ucfirst($lang_l['details']))."<textarea class='input1".($tinymice_flag?' mceEditor':'')."' id='htmlarea' name='Details' cols='80' rows='".($use_editor==true? 7:5)."' style='width:500px;'>".$details_value."</textarea>"; 
	if($use_editor==true) $output.=$innova_def;

	$output.=$f_br.sprintf($span8,$location_label).sprintf($input,'Location',$location_value);
	$output.=sprintf($span8,ucfirst($lang_l['hidden info']))."<textarea class='input1".($tinymice_flag?' mceNoEditor':'')."' name='Hiddeninfo' cols='80' rows='5' style='width:500px;'>".f_sth_2($hidden_value)."</textarea>".$f_br;

	$s_d=$event_record['Start_date']; $e_d=$event_record['End_date'];
	$st_mon=date('n',$s_d); $st_day=date('j',$s_d); $st_year=date('Y',$s_d);	
	$output.=$f_br.'<div style="float:left;line-height:25px;"><span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['start date'])
	.'</span>&nbsp;'.f_build_select('Start_month',$month_name,$month_name[$st_mon-1], '', 'value')
	.f_build_select('Start_day',$days_in_month_array,$st_day, '', 'value').f_build_select('Start_year',$years_array,$st_year, '', 'value').'</div>';
	
	$end_mon=date('n',$e_d); $end_day=date('j',$e_d); $end_year=date('Y',$e_d);	
	$output.='<div style="line-height:25px;"><span class="rvts8" style="'.$caption_style.'">&nbsp;&nbsp;'.ucfirst($lang_l['end date']).'</span>&nbsp;'
	.f_build_select('End_month',$month_name,$month_name[$end_mon-1], '', 'value')
	.f_build_select('End_day',$days_in_month_array,$end_day, '', 'value').f_build_select('End_year',$years_array,$end_year, '', 'value').'</div>';

	$st_min=date('i',$s_d); $end_min=date('i',$e_d);
	if($time_format==12) { $st_hour=date('g',$s_d); $end_hour=date('g',$e_d); $st_ampm=date('A',$s_d); $end_ampm=date('A',$e_d);}
	else				{ $st_hour=date('G',$s_d); $end_hour=date('G',$e_d); }
		
	$output.='<div style="float:left;line-height:25px;"><span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['start time'])
	.'</span>&nbsp;';
	if($time_format==12) 
	{
		if($st_hour==$end_hour && $end_hour=='12' && $st_min==$end_min && $end_min=='00' && $st_ampm==$end_ampm && $end_ampm=='AM') 
			{$output.=f_build_select('Start_hour',$h_array,$h_array[0], '', 'value'); }
		else { $output.=f_build_select('Start_hour', $h_array, $h_array[$st_hour], '', 'value'); }			
	}
	else 
	{
		if($st_hour==$end_hour && $end_hour=='24' && $st_min==$end_min && $end_min=='00') 
			{$output.=f_build_select('Start_hour', $h_array, $h_array[0], '', 'value');}
		else { $output.=f_build_select('Start_hour',$h_array,$h_array[$st_hour],'','value'); }		
	}
	$output.=f_build_select('Start_min', $min_array, $st_min, '', 'value');
	if($time_format==12) $output.=f_build_select('Start_ampm',$ampm_array,$st_ampm,'','value');
	$output.='</div>';
	$output.='<div style="line-height:25px;"><span class="rvts8" style="'.$caption_style.'">&nbsp;&nbsp;'.ucfirst($lang_l['end time']).'</span>&nbsp;';
	if($time_format==12) 
	{
		if( ($st_hour==$end_hour && $end_hour=='12' && $st_min==$end_min && $end_min=='00' && $st_ampm==$end_ampm && $end_ampm=='AM') 
			|| ($st_hour==$end_hour && $st_min==$end_min && $st_ampm==$end_ampm)  )
			{$output.=f_build_select('End_hour',$h_array,$h_array[0],'','value');}
		else $output.=f_build_select('End_hour',$h_array,$h_array[$end_hour],'','value');		
	}
	else 
	{
		if( ($st_hour==$end_hour && $end_hour=='24' && $st_min==$end_min && $end_min=='00') || ($st_hour==$end_hour && $st_min==$end_min)  )
			{$output.=f_build_select('End_hour',$h_array, $h_array[0],'','value');}
		else $output.=f_build_select('End_hour',$h_array,$h_array[$end_hour],'','value');		
		
	}
	$output.=f_build_select('End_min',$min_array,$end_min,'','value');
	if($time_format==12) $output.=f_build_select('End_ampm',$ampm_array,$end_ampm,'','value');
	$output.='</div>';

	if($em_enabled)
	{
		$em_use=(isset($event_record['DEADLINE']) && !empty($event_record['DEADLINE']));
		$dline=($em_use? $event_record['DEADLINE']: $event_record['Start_date']);
		$dl_mon=date('n',$dline); $dl_day=date('j',$dline); $dl_year=date('Y',$dline);
		
		$output.='<div style="line-height:25px;"><input type="checkbox" name="use_em" value="yes" '.($em_use? 'checked="checked"': '').$f_ct.	
		'<span class="rvts8" style="'.$caption_style.'"> Use EM --> '.ucfirst($lang_l['deadline']).' </span>' .f_build_select('Deadline_month',$month_name,$month_name[$dl_mon-1], '', 'value')
		.f_build_select('Deadline_day',$days_in_month_array,$dl_day, '', 'value').f_build_select('Deadline_year',$years_array,$dl_year, '', 'value')."</span></div>";
	}
	$output.='<div style="line-height:25px;"><input type="radio" name="event_frequency" value="once" id="once" '.($occur_type=='once'?'checked="checked"':'').' onclick="javascript:show(\'once\',\'recurring\',\'floating\');"'.$f_ct.'<span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['once']).'</span>';
	$output.=' <input type="radio" name="event_frequency" value="repeating" id="repeating" ' .($occur_type=='repeating'?'checked="checked"':'').$f_ct.'<span class="rvts8">'.ucfirst($lang_l['repeat every']).' </span>'.f_build_select("repeatPeriod", $repeatPeriod_list, (isset($event_record['repeatPeriod'])?$event_record['repeatPeriod']:$repeatPeriod_list[0])).'</div>';
	$output.=$f_br.'<input class="input1" name="Save" type="submit" value="'.ucfirst($lang_l['submit']).'"'.$f_ct;
	$output.=' <input class="input1" type="button" value=" '.ucfirst($lang_l['cancel']).' " onclick="document.location=\'' .$s_path."?action=index&amp;view=$view_type&amp;".$lg_.($mon!=''?"&amp;mon=$mon&amp;year=$year":'').'\'"'.$f_ct;
	if(array_key_exists('Id', $event_record)) 
		{$output.=' <input class="input1" name="Delete" type="submit" value=" '.ucfirst($lang_l['delete']).' " onclick="javascript:return confirm(\''.$lang_l['delete MSG'].'\')"'.$f_ct;}
	$output.="</div></form>";
	return $output;
}
function register_form($event_data,$header_text,$action,$id,$user_info,$reg_info,$event_info,$bt_name)
{
	global $lang_l, $f_br,$f_ct;
	$output=$f_br."<form action='".$action."' method='post' enctype='multipart/form-data'>"; 
	$output.="<table align='left'><tr><td align='left'>"
	."<input type='hidden' name='user' value='".$user_info['username']."'".$f_ct."<input type='hidden' name='Id' value='".$id."'".$f_ct
	."<span class='rvts8'><b>".$header_text."</b></span>".$f_br.$f_br."<span class='rvts8'>".$user_info['details']['name'].' ' .$user_info['details']['sirname'].$f_br.$f_br.$user_info['details']['email'].$f_br.'</td></tr><tr><td>&nbsp;</td></tr><tr><td>';
	if(isset($reg_info['Event_id']))	$output.=view_events($event_data,0,0,'user',3,0,0,$id,$reg_info);		
	else								$output.=view_events($event_data,0,0,'user',3,0,0,$id);								
	$output.='</td></tr><tr><td> </td></tr>';
	$output.="<tr><td align='left'><input class='input1' name='submit' type='submit' value='".strtoupper($lang_l["$bt_name"])."'";
	if($bt_name=='cancel my registration')  
		$output.=" onclick=\"javascript:return confirm('".$lang_l['cancel MSG'].' '.f_sth(urldecode($event_info['Short_description']))."')\"";	
	$output.=$f_ct."</td></tr></table></form>";
	return $output;
}
function mailing_form($def_mail,$def_subject,$def_message,$send_to_group,$send_to_list,$all_users,$cat_id,$event_id='',$short_form=false) 
{
	global $s_path,$lg_,$lang_l,$category_id,$mails_list,$css_details,$def_view, $f_br,$f_ct;
	
	if(isset($_GET['view']))	{ $view_type=$_GET['view'];}
	else						{ $view_type=$def_view;}
	$current_date=getdate();	
	$mon=(isset($_GET['mon'])? $_GET['mon']: $current_date['mon']); 
	$year=(isset($_GET['year'])? $_GET['year']: $current_date['year']);
	$url_p="&amp;".$lg_.'&amp;mon='.$mon.'&amp;year='.$year;
	$jstring="onchange=\"document.location='".$s_path."?action=mailing&amp;Id=$event_id&amp;view=$view_type"
		.$url_p."&amp;type=' + this.options[this.selectedIndex].value;\" style='width:100%;' ";
	$jstring2="onchange=\"document.location='".$s_path."?action=".($short_form?'emregister':'mailing') ."&amp;view=$view_type"
		.$url_p."&amp;Id=$event_id&amp;type=$def_mail&amp;send_to=' + this.options[this.selectedIndex].value;\" ";	
	
	$output=$f_br."<form name='mailing' action='".$s_path."?action=".($short_form?'emregister':'mailing')."&amp;view=$view_type".$url_p 
	."' method='post' enctype='multipart/form-data'>";
	$output.="<table align='center'><tr><td align='center'>".($short_form? '<span class="rvts8">'.ucfirst($lang_l['register']).'</span>': f_fmt_admin_title(ucfirst($lang_l['mailing']))).$f_br.$f_br.'</td></tr>';
	if($short_form==false)
	{
		$output.="<tr><td align='left' ".bl_fn($css_details)."><b>".ucfirst($lang_l['mail type'])."</b>".$f_br;
		$output.=f_build_select("type", $mails_list, $def_mail, '', 'key',$jstring).$f_br.$f_br."</td></tr>";
		$output.="<tr><td align='left' ".bl_fn($css_details)."><b>".ucfirst($lang_l['mail subject'])."</b>".$f_br."<input class='input1' name='Subject' value='".$def_subject."' type='text' style='width:100%;'".$f_ct.$f_br.$f_br."</td></tr>";
		$output.="<tr><td align='left' ".bl_fn($css_details)."><b>".ucfirst($lang_l['message'])."</b>".$f_br."<textarea class='input1' name='Message' rows='18' cols='80'>" .$def_message."</textarea>".$f_br."</td></tr>";	
	}
	$output.="<tr><td align='left' ".bl_fn($css_details).">";
	$output.="<input type='hidden' name='Id' value='".$event_id."'".$f_ct."<fieldset width='200px'><legend><b>".ucfirst($short_form? $lang_l['users']: $lang_l['send to'])."</b></legend>";
	$output.="<select class='input1' name='send_to' style='width:100%;' ".$jstring2.">";
	foreach($category_id as $k=>$v) 
	{
		if($v!=0) { $output.="<option value='$v' ".($send_to_group==(string)$v?"selected='selected''":"") 
		.' style="background-color:'.get_category($category_id[$k],'color').'"> '.ucfirst($lang_l['subscribed for']).' ' .strtoupper(get_category($v))."</option>"; }
	}
	$output.="<option value='registered' ".($send_to_group=='registered'?"selected='selected'":"").">"
	.ucfirst($lang_l['registered for'])."</option>";
	$output.="<option value='all' ".($send_to_group=='all'?"selected='selected'":"").">".ucfirst($lang_l['all users'])."</option>";
	if($short_form==false)
		$output.="<option value='admin' ".($send_to_group=='admin'?"selected='selected'":"").">".ucfirst($lang_l['admin only'])."</option>";
	$output.="</select>".$f_br.$f_br;

	$output.="<table><tr><td ".bl_fn($css_details)."><b>".ucfirst($lang_l['users list'])."</b>".$f_br."<select id='users_list' class='input1' multiple size='8' style='width:180px' name='users_list[]'>";
	
	asort($all_users,SORT_STRING); 
	foreach ($all_users as $k=>$v) $output.="<option value='".$k."'>".$k.' ('.$v.")</option>";
	$output.="</select></td>";
	$output.="<td align='center'><input class='input1' name='right' type='button' value=' >> ' onclick='moveright();'".$f_ct.$f_br.$f_br."<input class='input1' name='left' type='button' value=' << ' onclick='moveleft();'".$f_ct."</td>";

	$output.="<td ".bl_fn($css_details)."><b>".ucfirst($lang_l['selected'])."</b>".$f_br."<select id='selected_list' multiple class='input1' size='8' style='width:180px' name='selected_list[]'>"; 
	if(!empty($send_to_list))  asort($send_to_list,SORT_STRING); 
	foreach ($send_to_list as $k=>$v) $output.="<option value='".$k."'>".$k.' ('.$v.")</option>";
	$output.="</select></td></tr></table></fieldset></td></tr>"; 
	if($short_form==false)
		$output.="<tr><td align='left' style='width:100%'".bl_fn($css_details).">".$f_br."<b>".ucfirst($lang_l['file attachment'])."</b>".$f_br."<input class='input1' type='file' name='Attachment' style='width:100%;'".$f_ct."<input type='hidden' name='MAX_FILE_SIZE' value='30000'".$f_ct.$f_br."</td></tr>";
	$output.="<tr><td colspan='3' align='center'>".$f_br."<input class='input1' name='Submit' type='submit' value=' ".($short_form?'Submit':'Send')." ' onclick='mark();'".$f_ct.$f_br.$f_br."</td></tr></table></form>";
	return $output;
}
function get_mailing_settings($tag)
{
	global $EA_subject,$EA_message, $ECA_subject,$ECA_message, $ER_subject,$ER_message, $AG_subject,$AG_message, $cal_settings_fname;
	global $RConf_subject,$RConf_message, $RCancel_subject,$RCancel_message, $RChange_subject,$RChange_message, $GE_subject,$GE_message;
	
	$settings=array('EA_subject'=>$EA_subject, 'EA_message'=>$EA_message, 'ECA_subject'=>$ECA_subject, 'ECA_message'=>$ECA_message, 'ER_subject'=>$ER_subject, 'ER_message'=>$ER_message, 'AG_subject'=>$AG_subject, 'AG_message'=>$AG_message, 'RConf_subject'=>$RConf_subject, 'RConf_message'=>$RConf_message, 'RCancel_subject'=>$RCancel_subject, 'RCancel_message'=>$RCancel_message, 'RChange_subject'=>$RChange_subject, 'RChange_message'=>$RChange_message, 'GE_subject'=>$GE_subject, 'GE_message'=>$GE_message);
	$set_raw=f_read_tagged_data($cal_settings_fname, $tag);

	if(strpos($set_raw,'<subject>')!==false)	$settings[$tag.'_subject']=f_sth(f_GFS($set_raw,'<subject>','</subject>'));
	if(strpos($set_raw,'<message>')!==false)	$settings[$tag.'_message']=f_sth_2(f_GFS($set_raw,'<message>','</message>'));
	
	return $settings;
}

//EVENT MANAGER functions
function parse_event_info($username,$message,$ev_info,$user_info,$reg_info='') //event manager
{ 
	global $time_format;
		
	$content=str_replace("%short_description%",f_sth(urldecode($ev_info['Short_description'])),$message);
	$content=str_replace("%details%",f_sth_2(urldecode($ev_info['Details'])),$content);
	$content=str_replace("%category%",get_category($ev_info['Category']),$content);
	$content=str_replace("%location%",f_sth(urldecode($ev_info['Location'])),$content);			
		
	$st_d=$ev_info['Start_date'];
	$end_d=$ev_info['End_date'];
	if(date('n j, Y',$st_d)==date('n j, Y',$end_d))  { $content=str_replace("%date%",format_date($st_d),$content);}
	else   { $content=str_replace("%date%",format_date($st_d).' - '.format_date($end_d),$content); }		
	
	if($time_format==12) { $t_f='g:i A';  $pattern='12:00 AM'; }
	else				{ $t_f='G:i'; $pattern='0:00'; }				
	if(date($t_f,$st_d)==date($t_f,$end_d) && date($t_f,$st_d)==$pattern)	{$content=str_replace("%time%",'',$content);}
	elseif(date($t_f,$st_d)==date($t_f,$end_d) && date($t_f,$st_d)!=$pattern) {$content=str_replace("%time%",date($t_f,$st_d),$content);}
	else  { $content=str_replace("%time%",date($t_f,$st_d)." - ".date($t_f,$end_d),$content);}

	if(isset($ev_info['DEADLINE']) && !empty($ev_info['DEADLINE']))
		$content=str_replace("%deadline%",format_date($ev_info['DEADLINE']),$content); 

	$content=str_replace("%username%",$username,$content);
	$content=str_replace("%name%",$user_info['name'],$content);
	$content=str_replace("%sirname%",$user_info['sirname'],$content);
	$content=str_replace("%email%",$user_info['email'],$content);

	if(!empty($reg_info))
	{
		$content=str_replace("%notes%",f_sth(urldecode($reg_info['Notes'])),$content);
		$content=str_replace("%register_date%",format_date($reg_info['Timestamp']),$content);
	}
	return $content;
}
function build_reg_url($event_id)
{
	global $script_name, $full_path_to_script;
	return $full_path_to_script.'/'.$script_name.'?event_id='.$event_id;
}
function build_reg_subject($event_desc,$mail_subject)
{
	return str_replace("%short_description%", f_sth(urldecode($event_desc)), f_sth($mail_subject));
}
function register($action_id, $logged_user) //event manager  
{
	global $db_fname, $db_fname_reg,$db_fields_reg, $db_fname_recur,$category_vis, $cal_template_fname, $cal_css;
	global $s_path,$lang_l,$lg_,$css_event,$time_format,$f_lf,$script_name,$admin_email, $f_br, $css_calurl;
		
	$body_section='';		
	if(isset($_POST['Id']))		$event_id=$_POST['Id'];
	elseif(isset($_GET['Id']))	$event_id=$_GET['Id'];
	else $event_id='';
	$user_info=get_user($logged_user);  // user info
	$event_info=db_get_specific_event($db_fname,$event_id); // event info
	$reg_info=db_get_registered($logged_user,$event_id); // registration info
	$mktime=my_mktime();
	$today_ts = mktime(0,0,0,date("n",$mktime),date("j",$mktime),date("Y",$mktime)); 
	
	if(f_is_logged('SID_ADMIN')) {$body_section=$f_br.'<span class="rvts8"><b>'.ucfirst($lang_l['logged as admin MSG']).'</b></span>'; }
	elseif($action_id=='register' && isset($_POST['submit'])) // user confirms registration
	{	
		$mail_settings=get_mailing_settings('RConf'); 
		$reg_record['Event_id']=$_POST['Id'];
		$reg_record['User']=$_POST['user'];
		$reg_record['Timestamp']=mktime();
		$reg_record['Notes']=$_POST['notes'];
		$register_line=prepare_for_write($reg_record);
		db_add_event($db_fname_reg,$db_fields_reg,$register_line);
			
		$subject=build_reg_subject($event_info['Short_description'],$mail_settings['RConf_subject']);
		$url=build_reg_url($event_id);
		$content=parse_event_info($user_info['username'],f_sth_2($mail_settings['RConf_message']),$event_info,$user_info['details'],$reg_record);
		$content_text=str_replace("%calendarurl%",$url,$content);
		$content=str_replace("%calendarurl%",'<a href="'.$url.'">'.$url.'</a>',$content);		
		$res=send_mail($content,$content_text,$subject,$user_info['details']['email']);
		send_mail($content,$content_text,ucfirst($lang_l['notification']).' - '.$subject,$admin_email);
		show_calendar('show','<span class="rvts8"><b>'.$lang_l['success registered MSG'].'</b></span>'.$f_br.$f_br); 
		exit; 
	}
	elseif($action_id=='register' && isset($_GET['Id']))   // show registration form
	{
		if(isset($reg_info['Event_id']))
		{
			$body_section=$f_br."<span class='rvts8'>".ucfirst($lang_l['dear'])." <i>$logged_user</i>,</span> ".$f_br.$f_br."<span class='rvts8'><b>".ucfirst($lang_l['already registered'])."</b></span>".$f_br.$f_br."<span class='rvts8'>".ucfirst($lang_l['details follow']) .":".$f_br."<i>".ucfirst($lang_l['registration date']).": ".format_date($reg_info['Timestamp']).$f_br.ucfirst($lang_l['notes']).": " .f_sth(urldecode($reg_info['Notes']))."</i>".$f_br.$f_br.ucfirst($lang_l['edit registration MSG'])." ";		
			$body_section.='<a class="rvts12" href="'.$s_path.'?action=chregister&amp;'.$lg_.'&amp;Id='.$_GET['Id'].'">['.ucfirst($lang_l['edit']).']</a> <a class="rvts12" href="'.$s_path.'?action=clregister&amp;'.$lg_.'&amp;Id='.$_GET['Id'].'">['.ucfirst($lang_l['cancel']).']</a> <span class="rvts8">'.$lang_l['my registration'].'.</span>';
		}
		else
		{
			$recurring=db_get_specific_event($db_fname_recur,$event_id); 
			if(isset($event_info['DEADLINE']) && !empty($event_info['DEADLINE'])&& $event_info['DEADLINE']>=$today_ts)
			{
				$action=$s_path.'?action=register&amp;'.$lg_;  $id=$event_id;  $bt_name='submit';			
				$header_text=ucfirst($lang_l['register event MSG']);	
				$body_section=register_form(array($event_info),$header_text,$action,$id,$user_info,$reg_info,$event_info,$bt_name);
			}
			else
			{ 
				$msg_text="<span class='rvts8'><b>";
				if(!empty($recurring) || $category_vis[get_cat_index($event_info['Category'])]==false) 
					{$msg_text.=ucfirst($lang_l['register event MSG']); }	
				else { $msg_text.=ucfirst($lang_l['cant register MSG2']); }
				$msg_text.='</b></span>'.$f_br.$f_br; 
				show_calendar('show',$msg_text); exit; 
			}
		}
	}
	elseif($action_id=='chregister' && isset($_POST['submit'])) // change registration
	{
		if($event_info['Start_date']>$today_ts)
		{
			$mail_settings=get_mailing_settings('RChange');
			$reg_record['Event_id']=$_POST['Id'];
			$reg_record['User']=$_POST['user'];
			$reg_record['Timestamp']=$_POST['timestamp'];
			$reg_record['Notes']=$_POST['notes'];
			$register_line=prepare_for_write($reg_record);
			db_edit_event($db_fname_reg,$_POST['Id'],$register_line,$_POST['user']);
		
			$subject=build_reg_subject($event_info['Short_description'],$mail_settings['RChange_subject']);
			$url=build_reg_url($_POST['Id']);
			$content=parse_event_info($user_info['username'],f_sth_2($mail_settings['RChange_message']),$event_info,$user_info['details'],$reg_record);	
			$content_text=str_replace("%calendarurl%", $url, $content);
			$content=str_replace("%calendarurl%", '<a href="'.$url.'">'.$url.'</a>', $content);		
			$res=send_mail($content,$content_text,$subject,$user_info['details']['email']);
			send_mail($content,$content_text,ucfirst($lang_l['notification']).' - '.$subject,$admin_email);
			$msg_text=$lang_l['success edit MSG'];
		}
		else { $msg_text=$lang_l['cant edit MSG']; }
		show_calendar('show','<span class="rvts8"><b>'.$msg_text.'</b></span>'.$f_br.$f_br);  exit;	 
	}
	elseif($action_id=='clregister' && isset($_POST['submit']))  // cancel registration
	{
		if($event_info['Start_date']>$today_ts)
		{
			$mail_settings=get_mailing_settings('RCancel');
			db_delete_event($db_fname_reg,$_POST['Id'],$_POST['user']);

			$subject=build_reg_subject($event_info['Short_description'],$mail_settings['RCancel_subject']);
			$url=build_reg_url($_POST['Id']);
			$content=parse_event_info($user_info['username'],f_sth_2($mail_settings['RCancel_message']),$event_info,$user_info['details'],$reg_info);
			$content_text=str_replace("%calendarurl%", $url, $content);
			$content=str_replace("%calendarurl%", '<a href="'.$url.'">'.$url.'</a>', $content);		
			$res=send_mail($content,$content_text,$subject,$user_info['details']['email']);
			send_mail($content,$content_text,ucfirst($lang_l['notification']).' - '.$subject,$admin_email);
			$msg_text=$lang_l['success cancel MSG'];
		}
		else { $msg_text=$lang_l['cant cancel MSG']; }
		show_calendar('show','<span class="rvts8"><b>'.$msg_text.'</b></span>'.$f_br.$f_br);  exit;
	}	
	elseif(($action_id=='chregister' || $action_id=='clregister') && isset($_GET['Id']))   //show change/cancel form
	{
	  $em_use=(isset($event_info['DEADLINE']) && !empty($event_info['DEADLINE']));
	  if($event_info['Start_date']>$today_ts)
	  {
		if(isset($reg_info['Event_id']))
		{
			if($action_id=='chregister') { $action=$s_path.'?action=chregister&amp;'.$lg_; $bt_name='edit';	}
			else						{ $action=$s_path.'?action=clregister&amp;'.$lg_; $bt_name='cancel my registration'; }
			$id=$reg_info['Event_id'];  	
			$header_text=ucfirst($lang_l['dear'])." <i>$logged_user</i>,".$f_br.$f_br;	
			if($action_id=='chregister') $header_text.=$lang_l['to edit MSG'];	
			else $header_text.=$lang_l['to cancel MSG'];	
			if($em_use && $event_info['DEADLINE']<$today_ts) {$header_text.=$f_br.'<em style="color:red;">'.$lang_l['not recommended MSG'].'</em>';}
			$body_section=register_form(array($event_info),$header_text,$action,$id,$user_info,$reg_info,$event_info,$bt_name);
		}
		elseif($em_use && $event_info['DEADLINE']>=$today_ts)
		{
			$body_section.=$lang_l['to register MSG'].' <a '.bl_fn($css_calurl).' href="'.$s_path.'?action=register&amp;'.$lg_.'&amp;Id='.$_GET['Id'] .'">['.ucfirst($lang_l['register']).']</a>';
		}
	  }
	  else {show_calendar('show','<span class="rvts8"><b>'.$lang_l['cant edit/cancel MSG'].'</b></span>'.$f_br.$f_br);  exit;}
	}  
	$output=f_fmt_in_template($cal_template_fname,$body_section,$cal_css);
	if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) {print $output;}
	else {f_eval_php_code($output);}
}
function em_register($action_id) 
{
	global $db_fname,$db_fname_reg,$db_fields_reg,$category_id,$js_move,$admin_email, $f_br;
	global $s_path,$page_id,$script_name,$lang_l,$css_details,$f_lf, $cal_template_fname, $cal_css;
		$body_section = '';	
		
	if(isset($_POST['Id'])) $event_id=$_POST['Id'];
	elseif(isset($_GET['Id'])) $event_id=$_GET['Id'];
	else $event_id='';
	$event_info=db_get_specific_event($db_fname,$event_id); // event info
	
	$users=get_user('all');
	if(isset($_POST['Submit'])) 
	{	
		$res_msg='';
		$send_to = array();
		$mail_settings = get_mailing_settings('RConf');
		$message = $mail_settings['RConf_message'];
		$subject = $mail_settings['RConf_subject'];

		if(isset($_POST["selected_list"]) && $_POST["selected_list"]!=null)
		{
			$selected_list = (array) $_POST["selected_list"]; 
			foreach($users as $k=>$v) { if(in_array($v['username'],$selected_list)) {$send_to[]=$v;} }	
		}
		else { $res_msg = $lang_l['none users']; }
	      	       		
		$subject = build_reg_subject($event_info['Short_description'],$subject);
		$url = build_reg_url($event_id);	
		$content_text = str_replace("%calendarurl%", $url, f_sth_2($message));
		$content = str_replace("%calendarurl%", '<a href="'.$url.'">'.$url.'</a>', f_sth_2($message));
		$content = str_replace($f_lf,$f_br,$content);
		
		foreach($send_to as $k=>$v) 
		{	
			$reg_info = db_get_registered($v['username'],$event_id);
			if(!isset($reg_info['Event_id']))
			{
				$reg_record['Event_id'] = $event_id;
				$reg_record['User'] = $v['username'];
				$reg_record['Timestamp'] = mktime();
				$reg_record['Notes'] = '';
				$register_line = prepare_for_write($reg_record);
				db_add_event($db_fname_reg,$db_fields_reg,$register_line);	
				$content_u = parse_event_info($v['username'],$content,$event_info,$v['details'],$reg_record);
				$content_text_u = parse_event_info($v['username'],$content_text,$event_info,$v['details'],$reg_record);
				$res = send_mail($content_u,$content_text_u,$subject,$v['details']['email']);
				send_mail($content_u,$content_text_u,ucfirst($lang_l['notification']).' - '.$subject,$admin_email);
				if(!$res) $res_msg .= $lang_l['send to'].$v['details']['email'].' FAILED; ';
			}
			else { $res_msg.=' '.ucfirst($lang_l['user']).' "'.$v['username'].'" ALREADY REGISTERED.'; }
		}
		show_calendar('index','<span class="rvts8"><b>'.($res_msg!=''? $res_msg:' '.$lang_l['users regsitered MSG']).'</b></span>'.$f_br.$f_br);
		exit;
	}
	elseif(isset($_GET['remove']))
	{
		$remove_user = $_GET['remove']; 
		$event_id = $_GET['Id'];
		$reg_info = db_get_registered($remove_user,$event_id); // registered info
		$user_info = get_user($remove_user);  // user info
		$mail_settings = get_mailing_settings('RCancel');
		$message = $mail_settings['RCancel_message'];
		$subject = $mail_settings['RCancel_subject'];
		db_delete_event($db_fname_reg,$event_id,$remove_user);

		$subject = build_reg_subject($event_info['Short_description'],$mail_settings['RCancel_subject']);
		$url = build_reg_url($event_id);
		$content = parse_event_info($user_info['username'],f_sth_2($mail_settings['RCancel_message']),$event_info,$user_info['details'],$reg_info);
		$content_text = str_replace("%calendarurl%", $url, $content);
		$content = str_replace("%calendarurl%", '<a href="'.$url.'">'.$url.'</a>',$content);		
		$res = send_mail($content,$content_text,$subject,$user_info['details']['email']);
		send_mail($content,$content_text,ucfirst($lang_l['notification']).' - '.$subject,$admin_email);
		$msg_text = $lang_l['users unregsitered MSG'];
		show_calendar('index','<span class="rvts8"><b>'.$msg_text.'</b></span>'.$f_br.$f_br);
		exit;

	}
	else
	{
		$all_users = array();
		$send_to_list = array();
		$def_mail = (isset($_GET['type'])? $_GET['type']:'EA');
		if(isset($_GET['send_to'])) $send_to_group = $_GET['send_to'];
		elseif($def_mail=='EA'|| $def_mail=='ECA') $send_to_group = $event_info['Category'];
		else $send_to_group = 'registered';
		
		if(!empty($users))  
		{   
			foreach ($users as $key => $row) 
			{ 
				$u_name[$key]=$row['details']['name']; 
				$u_name_lower=array_map('strtolower', $u_name);
			}
			array_multisort($u_name_lower,SORT_ASC, $users); 
		}
		foreach($users as $k=>$v) 
			{ if(!empty($v['details']['email']))  $all_users [$v['username']] = $v['details']['name'].' '.$v['details']['sirname']; }

		if($send_to_group=='admin') { $send_to_list [$admin_email] = 'Admin'; }
		elseif($send_to_group=='all') { $send_to_list = $all_users; }
		elseif($send_to_group=='registered') 
		{ 	
			$registered = db_get_registered();
			if(!empty($registered) && isset($registered[$event_id]))  
			{  		
				foreach($registered[$event_id] as $curr_user=>$n) { $send_to_list[$curr_user] = $all_users[$curr_user]; }
			}
		}
		else
		{
			foreach($users as $k=>$v) 
			{
				if(isset($v['news']) && !empty($v['news']))
				{
					foreach($v['news'] as $key=>$val) 
					{ 
						if($val['page']==$page_id && $val['cat']==$send_to_group) 
						{ $send_to_list [$v['username']] = $v['details']['name'].' '.$v['details']['sirname'];}	 
					}
				}
			}
		}
		$output='<table align="center" width="90%">';    
		$output.='<tr><td align="center">'.build_admin_menu($action_id).$f_br.$f_br.'</td></tr>';
		$output.='<tr><td align="center">';
		$output.=view_events(array($event_info),0,0,'admin',3,0,0, $event_id,'',$def_mail,$all_users,$send_to_list,$send_to_group,true);
		$output.='</td></tr></table>';
	}
	$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
	$output = str_replace(array('</HEAD>','</head>'),array(' '.$js_move.' </HEAD>',' '.$js_move.' </head>'),$output);
	if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) {print $output;}
	else {f_eval_php_code($output);}
}
function send_mail($content,$content_text,$subject,$send_to_email='',$attachment='',$file='',$file_type='') //event manager
{
	global $f_use_linefeed, $admin_email, $f_return_path, $f_sendmail_from, $f_lf, $f_br;
	global $f_mail_type, $f_SMTP_HOST, $f_SMTP_PORT, $f_SMTP_HELLO, $f_SMTP_AUTH, $f_SMTP_AUTH_USR, $f_SMTP_AUTH_PWD;
		$res = false;

	if(strpos($admin_email,'your@email.here')===false && $admin_email!='') 
	{	
		$content_text = str_replace($f_br, $f_lf, $content_text);
		$mail = new htmlMimeMail();
		if ($f_use_linefeed) $mail->setCrlf("\r\n"); 	
		$mail->setHtml($content, $content_text);
		$mail->setSubject($subject);
		if($f_sendmail_from=='') $mail->setFrom($admin_email);
		else $mail->setFrom($f_sendmail_from);
		if ($f_return_path!='') {$mail->setReturnPath($f_return_path);}
		if($attachment!='') $mail->addAttachment($attachment, $file, $file_type);  //attachment
		if(($f_mail_type=='smtp')&&($f_SMTP_HOST!=='')) $mail->setSMTPParams($f_SMTP_HOST,$f_SMTP_PORT,$f_SMTP_HELLO,$f_SMTP_AUTH,$f_SMTP_AUTH_USR,$f_SMTP_AUTH_PWD);
		if($send_to_email!='') $res = $mail->send(array($send_to_email),$f_mail_type);
		else $res = $mail->send(array($admin_email),$f_mail_type);				
	}
	return $res;
}
function mailing($action_id) //event manager
{
	global $db_fname,$db_fname_reg,$db_fields_reg,$js_move,$admin_email, $f_br;
	global $page_id,$script_name,$s_path,$lang_l,$css_event,$f_lf, $cal_template_fname, $cal_css;

	$event_id=(isset($_POST['Id'])? $_POST['Id']: $_GET['Id']);
	$event_info=db_get_specific_event($db_fname,$event_id);
	$users=get_user('all');
	if(isset($_POST['Submit'])) //send mail
	{
		if(isset($_POST["selected_list"]) && $_POST["selected_list"]!=null)
		{
			$selected_list=(array) $_POST["selected_list"]; 
			foreach($users as $k=>$v) { if(in_array($v['username'],$selected_list)) {$send_to[]=$v;} }
		}
		else { $send_to=$admin_email; }

		$attachment='';  
		if($_FILES['Attachment']['name']!="")  
		{
			$file_attach=$_FILES['Attachment']['name'];
			$file_type=$_FILES['Attachment']['type'];
			$file_path=$_FILES['Attachment']['tmp_name'];
			if (!strlen($file_type))  { $file_type="applicaton/octet-stream"; }
			if ($file_type=='application/x-msdownload')  { $file_type="applicaton/octet-stream"; }
				
			if(file_exists($file_path))
			{				
				$f=@fopen($file_path, "rb");
				if($f) { while($f && !feof($f)) { $attachment.=fread($f,4096); }  fclose($f); }		
			}     
		}				      	       		
		$subject=build_reg_subject($event_info['Short_description'],$_POST['Subject']);
		$url=build_reg_url($event_id);	
		$content_text=str_replace("%calendarurl%",$url,f_sth_2($_POST['Message']));
		$content=str_replace("%calendarurl%",'<a href="'.$url.'">'.$url.'</a>',f_sth_2($_POST['Message']));
		$content=str_replace($f_lf,$f_br,$content);
		
		$res_msg='';
		if($send_to==$admin_email) 
		{
			$content=parse_event_info('Administrator',$content,$event_info,array('name'=>'Administrator','sirname'=>'','email'=>$send_to));
			$content_text=parse_event_info('Administrator',$content_text, $event_info,array('name'=>'Administrator','sirname'=>'','email'=>$send_to));
			if(!empty($attachment)) send_mail($content,$content_text,$subject,$send_to,$attachment,$file_attach,$file_type);
			else send_mail($content,$content_text,$subject,$send_to);
		}
		else
		{
			$res_msg='';
			foreach($send_to as $k=>$v) 
			{	
				$reg_info=db_get_registered($v['username'],$event_id); // registration info - if any
				$content_u=parse_event_info($v['username'],$content,$event_info,$v['details'],$reg_info);
				$content_text_u=parse_event_info($v['username'],$content_text,$event_info,$v['details'],$reg_info);
				if(!empty($attachment)) 
					$res=send_mail($content_u,$content_text_u,$subject,$v['details']['email'],$attachment,$file_attach,$file_type);
				else $res= send_mail($content_u,$content_text_u,$subject,$v['details']['email']);
				if(!$res) $res_msg.=ucfirst($lang_l['send to']).' '.$v['details']['email'].' FAILED; ';
			}
		}
		show_calendar('index','<span class="rvts8"><b>'.($res_msg!=''? $res_msg: $lang_l['mail sent MSG']).'</b></span>'.$f_br.$f_br);
	}
	else // send mail form
	{
		$all_users=array();
		$send_to_list=array();
		$def_mail=(isset($_GET['type'])? $_GET['type']:'EA');
		if(isset($_GET['send_to'])) $send_to_group=$_GET['send_to'];
		elseif($def_mail=='EA'|| $def_mail=='ECA') $send_to_group=$event_info['Category'];
		else $send_to_group='registered';
		
		if(!empty($users))  
		{   
			foreach ($users as $key => $row) 
			{ 
				$u_name[$key]=$row['details']['name']; 
				$u_name_lower=array_map('strtolower', $u_name);
			} 
			array_multisort($u_name_lower,SORT_ASC, $users); 
		}
		foreach($users as $k=>$v) 
			{ if(!empty($v['details']['email']))  $all_users [$v['username']] = $v['details']['name'].' '.$v['details']['sirname']; }


		if($send_to_group=='admin') { $send_to_list [$admin_email]='Admin'; }
		elseif($send_to_group=='all') { $send_to_list=$all_users; }
		elseif($send_to_group=='registered') 
		{ 	
			$registered=db_get_registered();
			if(!empty($registered) && isset($registered[$event_id]))  
			{  		
				foreach($registered[$event_id] as $curr_user=>$n) { $send_to_list[$curr_user]=$all_users[$curr_user];  }
			}
		}
		else
		{
			foreach($users as $k=>$v) 
			{
				if(isset($v['news']) && !empty($v['news']))
				{
					foreach($v['news'] as $key=>$val) 
					{ 
						if($val['page']==$page_id && $val['cat']==$send_to_group) 
						{ $send_to_list [$v['username']]=$v['details']['name'].' '.$v['details']['sirname'];}	 
					}
				}
			}
		}
		$output='<table align="center" width="90%">';    
		$output.='<tr><td align="center">'.build_admin_menu($action_id).$f_br.$f_br.'</td></tr>';	
		$output.='<tr><td align="center">';
		$output.=view_events(array($event_info),0,0,'admin',3,0,0, $event_id,'',$def_mail,$all_users,$send_to_list,$send_to_group);
		$output.='</td></tr></table>';
		$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
		$output=str_replace(array('</HEAD>','</head>'),array(' '.$js_move.' </HEAD>',' '.$js_move.' </head>'),$output);
		if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) {print $output;}
		else {f_eval_php_code($output);}
	}
}
function set_mailing($action_id) // EA, ECA, AG, RC, GE //event manager
{
	global $s_path,$lg_,$lang_l,$mails_list,$f_lf, $cal_template_fname, $cal_css, $f_br, $f_ct;
		
	$jstring="onchange=\"document.location='".
		$s_path."?action=setmailing&amp;$lg_&amp;type=' + this.options[this.selectedIndex].value;\" style='width:100%;'";

	if(isset($_POST['Submit']))
	{
		$tag=$_POST['type'];
		$new_setting='<subject>'.$_POST['Subject'].'</subject>'.'<message>'.str_replace($f_lf,$f_br,$_POST['Message']).'</message>';

		if(db_write_data($tag,$new_setting)) $output='<span class="rvts8"><b>'.ucfirst($lang_l['settings saved']).'</b></span>';			
		else $output='<span class="rvts8"><b>Settings save failed</b></span>';			
	}
	else 
	{
		$def_mail=(isset($_GET['type'])? $_GET['type']:'EA');
		$settings=get_mailing_settings($def_mail);
		$def_subject=$settings[$def_mail.'_subject'];
		$def_message=str_replace($f_br,$f_lf,$settings[$def_mail.'_message']);
		
		$output="<form name='setmailing' action='".$s_path."?action=setmailing&amp;".$lg_."' method='post' enctype='multipart/form-data'>";
		$output.=f_fmt_admin_title($lang_l['settings']).$f_br.$f_br;
		$output.='<table align="center" cellpadding="0" cellspacing="0">'; 
		$output.="<tr><td align='left'><span class='rvts8'><b>".ucfirst($lang_l['mail type'])."</b></span>".$f_br;
		$output.=f_build_select("type", $mails_list, $def_mail, '', 'key', $jstring).$f_br.$f_br."</td></tr>";
		$output.="<tr><td align='left'><span class='rvts8'><b>".ucfirst($lang_l['mail subject'])."</b></span>".$f_br
		."<input class='input1' name='Subject' value='".$def_subject."' type='text' style='width:385px;'".$f_ct.$f_br.$f_br."</td></tr>"; 
		$output.="<tr><td align='left'><span class='rvts8'><b>".ucfirst($lang_l['message'])."</b></span>".$f_br
		."<textarea class='input1' name='Message' rows='18' cols='73'>".$def_message."</textarea></td></tr>";			
		$output.="<tr><td align='center'>".$f_br."<span class='rvts8'><i>".ucfirst($lang_l['explanations'])."</i></span></td></tr>";
		$output.="<tr><td align='center'><span class='rvts8'><i>Use %register_date% and %notes% for user registration info.</i></span></td></tr>";
		$output.="<tr><td align='center'><span class='rvts8'><i>Use %calendarurl% for calendar page url.<i></span></td></tr>";
		$output.="<tr><td align='center'>".$f_br."<input class='input1' name='Submit' type='submit' value=' ".ucfirst($lang_l['submit'])." '".$f_ct .$f_br.$f_br."</td></tr></table></form>";
	}	
	$output=f_fmt_admin_screen($output, build_admin_menu($action_id));		
	$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
	if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) print $output;
	else f_eval_php_code($output);
}
function get_sitemap_list()  //event manager
{
	global $sitemap_fname,$f_max_chars;
		$pages=array();
		$sp_pages_ids=array('136','137','138','143'); 
	if(file_exists($sitemap_fname)) 
	{
		$fsize=filesize($sitemap_fname);
		if($fsize > 0)
		{
			$fp=fopen($sitemap_fname,'r');
			while($data=fgetcsv($fp,$f_max_chars,'|')) 
			{
				$data_str=implode('|',$data);
				$buffer=array();
				if(strpos($data_str,'*/ ?>')===false && strpos($data_str,'<?php')===false) 
				{				
					if(strpos($data_str,'<id>')!==false && in_array($data[4],$sp_pages_ids)) 
					{	
						$p_name=(strpos($data[0],'#')!==false && strpos($data[0],'#')==0? str_replace('#','',$data[0]): $data[0]);
						$id=str_replace('<id>','',$data[10]);	
						$pages["'".$id."'"]=array('name'=>trim($p_name),'url'=>$data[1]);
					}
				}
			}
			fclose($fp);
        }      
   }
   return $pages;
}
function format_users($users)
{
	$users_array = array();
	$details_arr = array();
	$i = 1;
	while(strpos($users, '<user id="'.$i.'" ')!==false) 
	{				
		$all = '<user id="'.$i.'" '. f_GFS($users, '<user id="'.$i.'" ', '</user>');
		$basic = f_GFS($all, '<user id="'.$i.'" ', '>').' ';
		$details = f_GFS($all, '<details ', '></details>').' ';
		$access = f_GFS($all, '<access_data>', '</access_data>').' ';
		$news = f_GFS($all,'<news_data>','</news_data>').' '; // event manager
		
		list($username, $password) = explode (' ', $basic);
		$details_arr['email']=f_GFS($details,'email="','"');
		$details_arr['name']=f_GFS($details,'name="','"');
		$details_arr['sirname']=f_GFS($details,'sirname="','"');

		$access_arr = array(); $j = 1;
		while (strpos($access, '<access id="'.$j.'" ')!==false)
		{
			$access_full=f_GFSAbi($access,'<access id="'.$j.'" ','</access>');
			$page_access_arr=array(); $m=1;
			while(strpos($access_full,'<p id="'.$m.'" ')!==false) 
			{
				$page_access_str=f_GFSAbi($access_full,'<p id="'.$m.'" ','>');
				$page_access_arr []=array('page'=>f_GFS($page_access_str,'page="','"'), 'type'=>f_GFS($page_access_str,'type="','"'));
				$m++;
			} 
			$access_str = f_GFS($access_full, '<access id="'.$j.'" ', '>');
			list($section, $type) = explode (' ', $access_str);
			$access_arr [] = array(substr($section, 0, strpos($section, '=')) => f_GFS($section, '="', '"'), substr($type, 0, strpos($type, '=')) => f_GFS($type, '="', '"'),'page_access'=>$page_access_arr);
			$j++;
		}
		$news_arr=array();$j=1; // event manager
		while(strpos($news,'<news id="'.$j.'" ')!==false) 
		{
			$news_str=f_GFS($news,'<news id="'.$j.'" ','>');
			list($page,$cat)=explode(' ',$news_str);
			$news_arr []=array(substr($page,0,strpos($page,'='))=>f_GFS($page,'="','"'), substr($cat,0,strpos($cat,'='))=>f_GFS($cat,'="','"'));
			$j++;
		}
		
		$user = f_GFS($username,'="','"');
		$users_array [$user] = array('id'=>$i, 'username'=>$user, 'password'=>f_GFS($password,'="','"'), 'access'=>$access_arr, 'details'=>$details_arr, 'news'=>$news_arr);		
		$i++;
	}
	return $users_array;
}
function get_user($username)
{
	global $ca_fname;

	$users_arr=array();
	$result=array();   
    
	$file_contents=f_read_file($ca_fname);
	$users=f_GFS($file_contents,'<users>','</users>');			     
	if($users!='') $users_arr=format_users($users);		
	if(!empty($users_arr))
	{
		foreach($users_arr as $k=>$v)
		{
			if($username=='all') { $result[$k]=$v; }
			elseif(array_search($username,$v)!==false) { $result=$v; break; }
		}
	}
    return $result;	
}
function has_access($pv_user,$page_info, $type) 
{
	global $page_id, $rel_path;
		$auth = false;
		$section_flag = false;
		$write_flag = false;
		$user_account = array();
		$user_account = get_user($pv_user);
    if (isset($page_info [7]) && $page_info [7]!='' && $page_info [7]!='-1' && !empty($user_account)) 
	{ 
		if($user_account['access'][0]['section']!='ALL' && $user_account['username']==$pv_user) 
		{
			foreach($user_account['access'] as $k=>$v)
			{
				if( $page_info[7]==$v['section']) 
				{											
					if($type=='write' && $v['type']=='1')	{ $auth = true; }
					elseif($type=='write' && $v['type']=='2' && isset($v['page_access'])) 
					{
						foreach($v['page_access'] as $key=>$val)
						{
							if($page_id==$val['page'] && $val['type']=='1') {$auth=true; break;}
						}
					} 
					elseif($type=='read') { $auth = true; }
					break;
				}
			}							
		}
		elseif($user_account['username']==$pv_user)  
		{ 
			if($user_account['access'][0]['type']=='1'&& $type=='write') { $auth=true; }
			elseif($type=='read') { $auth=true; }
		}
    }
    return $auth;
}
function update_rssfeed() 
{
	global $db_fname, $f_use_linefeed, $f_lf, $cal_dir, $script_name, $lang_l, $page_charset, $location_label, $time_format, $full_path_to_script; 
	global $rss_settings, $max_items_in_rss, $max_lines_in_rss_desc, $include_date_in_rss_desc, $category_vis;
	
	$entries_records=db_get_events_raw(0,0);
	$entries_records=db_get_events($entries_records,0,0);
	if(!empty($entries_records))
	{
		foreach($entries_records as $key=>$row) {$row['Start_date']=intval($row['Start_date']); $sort_name[$key]=$row['Start_date'];} //sort 
		$flag=array_multisort($sort_name,SORT_ASC,SORT_NUMERIC,$entries_records); 
		if($max_items_in_rss!=0) $entries_records=array_slice($entries_records,0,$max_items_in_rss);
		if(isset($_GET['cat']))
		{
			$temp=array();
			foreach($entries_records as $k=>$v) { if(get_category($v['Category'])==$_GET['cat'] || $v['Category']==$_GET['cat']) {$temp[]=$v;} }
			$entries_records=$temp;
		}
	}	
	$output=f_build_rss_header($rss_settings, $page_charset, $full_path_to_script."/".$script_name, filemtime($db_fname)); 		
	foreach ($entries_records as $k=>$v) 
	{	
	  if(strpos(urldecode($v['Short_description']),'%%TEMPLATE1%%')===false && $category_vis[get_cat_index($v['Category'])]==true)
	  {
		if(count($entries_records)==1 || $max_lines_in_rss_desc==0) { $details=f_sth_2(urldecode($v['Details'])); }
		else 
		{									
			$temp=f_sth_2(urldecode($v['Details']));
			$max_chrl=$max_lines_in_rss_desc*60;
			if(strlen($temp)>$max_chrl)	$details=f_split_html_content($temp, $max_chrl).' ...';
			else						$details=$temp;
		}
		$details=preg_replace("'<[/!]*?[^<>]*?>'si"," ",$details);
		$details=str_replace (array('<','&','&quot;','&nbsp;'),array('&#60;','&amp;','"',' '),$details);	
		$more='';
		if($include_date_in_rss_desc)
		{
			if(date('n j, Y',$v['Start_date'])==date('n j, Y',$v['End_date']))  {$more.=format_date($v['Start_date']).', ';}
			else   {$more.=format_date($v['Start_date']).' - '.format_date($v['End_date']).', ';} 
			
			if($time_format==12) {$t_format='g:i A';$pattern='12:00 AM';} else {$t_format='G:i';$pattern='0:00';}					
			
			if((date($t_format,$v['Start_date'])==date($t_format,$v['End_date'])) && (date($t_format,$v['Start_date'])!=$pattern))
			{
				$more.=date($t_format,$v['Start_date']).', ';
			}
			elseif(date($t_format,$v['Start_date'])!=$pattern)  {$more.=date($t_format,$v['Start_date'])." - ".date($t_format,$v['End_date']).', ';}
		}	
		$location_field_value=f_sth(urldecode($v['Location']));
		if(!empty($location_field_value)) { $more.=$location_label.': '.$location_field_value.', '; }

		$output.='<item>'.$f_lf.'<title>'.(empty($v['Short_description'])?'empty':f_sth(urldecode($v['Short_description']))).'</title>'.$f_lf;	
		$output.='<link>'.$full_path_to_script."/".$script_name."?entry_id=".$v['Id'].'</link>'.$f_lf;
		$output.='<description>'.$more.(empty($v['Details'])?' ': $details).'&#60;br clear="all"></description>'.$f_lf;
		$output.='<pubDate>'.date('r', $v['Start_date']).'</pubDate>'.$f_lf;	
		$output.='<guid>'.$full_path_to_script."/".$script_name."?entry_id=".$v['Id'].'</guid>'.$f_lf;
		$output.='<category>'.f_sth(get_category($v['Category'],'color')).'</category>'.$f_lf;
		$output.='</item>'.$f_lf;
	  }
	}
	$output.='</channel>'.$f_lf.'</rss>'; 
	header('Content-Type: text/xml; charset='.$page_charset);
	echo $output;		
}
function process_calendar()
{
	global $prefix,$thispage_id,$page_id,$preview_on, $version,$doc_dir,$lg_, $cal_template_fname, $cal_css, $em_enabled, $admin_email, $s_path;
	global $def_view,$em_enabled,$s_path,$read_access,$available_lang_sets,$lang_l, $rel_path, $f_br, $f_ct, $cal_template_fname, $cal_settings_fname;
	global $category_id, $category_vis, $category_mark, $category_mark_color;
		
	$page_info=f_get_page_params($page_id, $rel_path);
	$action_id='show';
	if(isset($_GET['action']))			$action_id=$_GET['action'];
	elseif (isset($_POST['action']))	$action_id=$_POST['action'];

	if($em_enabled && (strpos($admin_email,'your@email.here')!==false || empty($admin_email)) ) 
		{print f_fmt_in_template($cal_template_fname,f_fmt_error_msg('EMAIL_NOTSET', '', 'calendar')); exit;}
	if(in_array($action_id, array("show","showcal","showevents","showcaljs","showeventsjs")))
	{ 
		if($em_enabled)
		{
			if(!isset($_SESSION))  f_int_start_session();
			if(isset($_SESSION['cur_user']) && has_access(f_get_session_var('cur_user'), $page_info, 'read')==true) { $read_access=true; }
		}
		show_calendar($action_id); 
	}
	elseif($action_id=="logout")	{ if(!isset($_SESSION)) f_int_start_session('private'); f_unset_session();  show_calendar('show');}  
	elseif($action_id=="preview")	{ $preview_on=true;  show_calendar("show"); }
	elseif($action_id=="version")	{ echo $version; }
	elseif(in_array($action_id, array("register","chregister","clregister")) && $em_enabled)	//event manager
	{ 
		if(!isset($_SESSION))  f_int_start_session();
		if(isset($_SESSION['cur_user']) && has_access(f_get_session_var('cur_user'),$page_info,'read')==true)
			{ register($action_id, f_get_session_var('cur_user')); }
		elseif(f_is_logged('SID_ADMIN')) { register($action_id, f_get_session_var('SID_ADMIN')); }
		else 
		{
			$ref_url=$s_path.'?action='.$action_id.'&Id='.$_GET['Id']."&".$lg_.(isset($_GET['user'])? '&user='.$_GET['user']:'');
			f_url_redirect($doc_dir."centraladmin.php?pageid=$page_id&ref_url=".urlencode($ref_url),false); exit; 	
		}
	}
	elseif($action_id=="register" && !$em_enabled)	{ echo "Registering for Calendar Events is not supported."; exit;}
	elseif($action_id=="rss")  {update_rssfeed();}
	else
	{
		if(!isset($_SESSION))  { f_int_start_session('private'); f_regenerate_session_id(); }
		if(!f_is_logged('SID_ADMIN') || (f_is_logged('HTTP_USER_AGENT') && f_get_session_var('HTTP_USER_AGENT')!= md5($_SERVER['HTTP_USER_AGENT']))) 
		{  		
			if(!isset($_SESSION['cur_user']) || has_access(f_get_session_var('cur_user'),$page_info,'write')==false) 
			{		
				 f_url_redirect($doc_dir."centraladmin.php?pageid=$page_id&indexflag=index&".$lg_,false); exit; 
			}
		} 		
        if($action_id=="index")			{ show_calendar($action_id); }
        elseif($action_id=="addevent")	{ add_event($action_id);}
        elseif($action_id=="editevent")	{ edit_event($action_id);}
		elseif($action_id=="delevent")	{ save_event('index');}
        elseif($action_id=="saveevent")	{ save_event('index');}
		elseif($action_id=="mailing")	{ mailing($action_id);}
		elseif($action_id=="setmailing"){ set_mailing($action_id);}
		elseif($action_id=="emregister" && $em_enabled) { em_register($action_id);}
		elseif($action_id=="mng_settings")    
		{
			if(isset($_GET['view']))	$view_type=$_GET['view'];
			else						$view_type=$def_view;
			$current_date=my_getdate();	
			$mday=(isset($_GET['mday'])? $_GET['mday']: $current_date['mday']);
			$mon=(isset($_GET['mon'])? $_GET['mon']: $current_date['mon']); 
			$year=(isset($_GET['year'])? $_GET['year']: $current_date['year']);
			   
			if(isset($_POST['submit'])) 
			{  
				$tags=array('language', 'public_rss');
				$newset=array($_POST['lang'], $_POST['public_rss']);
				f_write_tagged_data($tags, $newset, $cal_settings_fname, $cal_template_fname);
				$output='<span class="rvts8"><b>'.ucfirst($lang_l['settings saved'])."</b></span>";
			}
			else   
			{
				$rss_public_options=array('0'=>'false','1'=>'true');
				$all_settings=f_read_file($cal_settings_fname);		
				$def_lang=f_GFS($all_settings,'<language>','</language>'); if($def_lang=='' || $def_lang=='EZG') $def_lang='EN'; 
				$def_public_rss=f_GFS($all_settings,'<public_rss>','</public_rss>'); if($def_public_rss=='') $def_public_rss='0';

				$output="<form action='".$s_path."?action=mng_settings&amp;".$lg_."' method='post' enctype='multipart/form-data'>" .f_fmt_admin_title($lang_l['settings']).$f_br.$f_br.'<table cellspacing="2" cellpadding="4" align="center"><tr><td style="text-align:left"><span class="rvts8">'.ucfirst($lang_l['language']).'</span></td><td style="text-align:right">';  
				$output.=f_build_select('lang',$available_lang_sets,strtoupper($def_lang)).'</td></tr>';
				$output.='<tr><td style="text-align:left"><span class="rvts8">'.ucfirst($lang_l['public rss']).'</span></td><td style="text-align:right">'.f_build_select('public_rss',$rss_public_options,$def_public_rss).'</td></tr>';
				$output.="<tr><td>".$f_br."<input class='input1' name='submit' type='submit' value=' ".ucfirst($lang_l['submit'])." '".$f_ct."</td></tr></table></form>";	
			}
			$admin_menu=build_admin_menu($action_id);
			$output=f_fmt_admin_screen($output,$admin_menu);		
			$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
			if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) {print $output;}
			else {f_eval_php_code($output);}
		} 
		elseif($action_id=='mng_categories' || $action_id=='del_category' || $action_id=='edit_category' || $action_id=='add_category')
		{
			$caption_style="font-size:10px;font-weight:bolder;line-height:16px;";
			$span8='<span class="rvts8" style="'.$caption_style.'">'.ucfirst('%s')."</span>".$f_br;
			$marks_array=array('NA','X','@','#','$','%','&','*','!','?','~','+','-','^','<','>');
			$err_on_submit=(isset($_POST['submit']) && (empty($_POST['cat_color']) || empty($_POST['cat_name']) || $_POST['cat_name']=='#')); $show_list_flag=true;
		
			$output=f_fmt_admin_title($lang_l['manage categories']).$f_br.$f_br;	
			if($err_on_submit) $output.=f_format_err_msg('You have to set both Name and Color for the category').$f_br;
		
			if($action_id=='del_category' && isset($_GET['cat_id']) && $_GET['cat_id']!='0') 
				{ add_edit_category('del',$_GET['cat_id']); update_categories_list(); } 
			elseif($action_id=='edit_category' && isset($_POST['submit']) && !$err_on_submit) 
				{add_edit_category('edit',$_POST['cat_id']); update_categories_list();}
			elseif($action_id=='add_category' && isset($_POST['submit']) && !$err_on_submit) {add_edit_category('add'); update_categories_list();}
			elseif($action_id=='edit_category' || $action_id=='add_category')
			{
				$show_list_flag=false;  $cat_name=''; $cat_color='#'; $cat_mark='NA'; $cat_mark_color='#'; $invis_checked='';
				if($action_id=='edit_category') 
				{ 
					$cat_id=$_REQUEST['cat_id']; settype($cat_id,'integer');  
					$cat_color=get_category($cat_id,'color'); $cat_name=get_category($cat_id,'name');
					
					$index=get_cat_index($cat_id);
					if($category_vis[$index]==false) $invis_checked=' checked="checked"';
					if(isset($category_mark[$index])) $cat_mark=$category_mark[$index];
					if(isset($category_mark_color[$index])) $cat_mark_color=$category_mark_color[$index];
					if($cat_mark!='NA' && empty($cat_mark_color)) $cat_mark_color='#ffffff';
				}
				$cat_name=(isset($_POST['cat_name'])? $_POST['cat_name']: $cat_name);
				$cat_color=(isset($_POST['cat_color'])? $_POST['cat_color']: $cat_color);
				$cat_mark=(isset($_POST['cat_mark'])? $_POST['cat_mark']: $cat_mark);
				$cat_mark_color=(isset($_POST['mark_color'])? $_POST['mark_color']: $cat_mark_color); if(empty($cat_mark_color)) $cat_mark_color='#';
				$invis_checked=(isset($_POST['cat_invisible'])? ' checked="checked"': $invis_checked);

				$output.='<form method="post" action="'.$s_path.'?action='.($action_id=='edit_category'? 'edit_category': 'add_category').'">';
				if($action_id=='edit_category') $output.='<input class="input1" type="hidden" name="cat_id" value="'.$cat_id.'"'.$f_ct;	
				$output.='<div id="edit_cat" style="margin: 0 auto;width:433px;display:block;text-align:left;">';
				$output.=build_add_category_form($cat_name, $cat_color, $cat_mark, $cat_mark_color, $invis_checked)
				.'<div><input class="input1" type="submit" name="submit" value="'.ucfirst($lang_l['submit']).'"'.$f_ct.'&nbsp;<input class="input1" type="button" value="'.ucfirst($lang_l['cancel']).'" onclick="document.location=\''.$s_path.'?action=mng_categories\'"' .$f_ct.$f_br.'</div></div></form>'.$f_br;
			}	
			if($show_list_flag)
			{	
				$output.='<table cellspacing="2" cellpadding="4" align="center">';
				foreach($category_id as $k=>$v)
				{ 
					$cat_name=get_category($v,'name');		
					$output.='<tr><td align="left"><div title="'.$cat_name.'" style="width:10px;height:13px;float:left;background:' .get_category($v,'color').';">&nbsp;</div>&nbsp;<span class="rvts8">'.$cat_name.'</span></td><td align="right"><a class="rvts12" href="'.$s_path.'?action=edit_category&amp;cat_id='.$v.'">'.ucfirst($lang_l['edit']).'</a> ';
					if($k!=0) $output.='<a class="rvts12" href="'.$s_path.'?action=del_category&amp;cat_id='.$v.'" onclick="javascript:return confirm(\''.ucfirst($lang_l['del category msg']).'\')">'.ucfirst($lang_l['delete']).'</a></td></tr>';
				}
				$output.='<tr><td colspan="2" align="center"><input class="input1" type="button" value="'.ucfirst($lang_l['add category'])
				.'" onclick=\'document.location="'.$s_path.'?action=add_category"\''.$f_ct.'&nbsp;<input class="input1" type="button" value="'.ucfirst($lang_l['cancel']).'" onclick="document.location=\''.$s_path.'?action=index\'"'.$f_ct.'</td></tr>';
				$output.="</table>";
			}	
			$output=f_fmt_admin_screen($output, build_admin_menu($action_id));		
			$output=f_fmt_in_template($cal_template_fname,$output,$cal_css);
			if(strpos($output,'<'.'?php')===false && strpos($output,'<'.'?')===false) {print $output;}
			else {f_eval_php_code($output);}
		}
   }
}
function build_add_category_form($cat_name, $cat_color, $cat_mark, $cat_mark_color, $invis_checked)
{
	global $lang_l, $f_br, $f_ct, $s_path, $rel_path;

	$caption_style="font-size:10px;font-weight:bolder;line-height:16px;";
	$span8='<span class="rvts8" style="'.$caption_style.'">'.ucfirst('%s')."</span>";
	$marks_array=array('NA','X','@','#','$','%','&','*','!','?','~','+','-','^','<','>');

	$output='<div style="float:left;">'.sprintf($span8,ucfirst($lang_l['name']))
	.$f_br.'<input class="input1" type="text" value="'.$cat_name.'" name="cat_name" id="cat_name" style="width:265px;"'.$f_ct.'&nbsp;<input class="input1" type="text" value="'.$cat_color.'" name="cat_color" id="cat_color" style="width:50px;background-color:'.$cat_color.'" onclick="javascript:showCatPicker();"'.$f_ct.'&nbsp;</div>'
	.'<div style="padding:0px 0px 0px 7px;"><div style="margin:0px 0px 0px 7px;">' .sprintf($span8,ucfirst($lang_l['mark'])).$f_br .'</div><div>' .f_build_select('cat_mark', $marks_array, $cat_mark, ' title="'.ucfirst($lang_l['mark msg']).'" ', 'value').' <input class="input1" type="text" value="'.$cat_mark_color.'" name="mark_color" id="mark_color" style="width:50px;background-color:' .$cat_mark_color.'" onclick="javascript:showMarkPicker();"'.$f_ct.'</div></div>'	
	.'<div id="cat_colorpicker" style="display:block;padding:5px 0px 3px 0px;">'.sprintf($span8,ucfirst($lang_l['category'])).$f_br .f_color_picker('cat_color',$rel_path).'</div>'
	.'<div id="mark_colorpicker" style="display:none;padding:5px 0px 3px 0px;">'.sprintf($span8,'Mark').$f_br .f_color_picker('mark_color',$rel_path).'</div>'
	."<script type='text/javascript'>function showCatPicker() { document.getElementById('cat_colorpicker').style.display='block'; document.getElementById('mark_colorpicker').style.display='none'; }</script>"
	."<script type='text/javascript'>function showMarkPicker() { document.getElementById('mark_colorpicker').style.display='block'; document.getElementById('cat_colorpicker').style.display='none'; }</script>"							
	.'<div style="padding:5px 0px 5px 0px;"><input type="checkbox" style="vertical-align:middle;" name="cat_invisible" value="yes" '.$invis_checked.$f_ct.' <span class="rvts8" style="'.$caption_style.'">'.ucfirst($lang_l['invisible']).'</span></div>'; 
	return $output;
}
process_calendar();
?>