2001-07-16 13:38:40 +02:00
< ? php
/************************************************************************** \
* phpGroupWare - Calendar *
* http :// www . phpgroupware . org *
* Based on Webcalendar by Craig Knudsen < cknudsen @ radix . net > *
* http :// www . radix . net /~ cknudsen *
* Modified by Mark Peters < skeeter @ phpgroupware . org > *
* -------------------------------------------- *
* This program is free software ; you can redistribute it and / or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation ; either version 2 of the License , or ( at your *
* option ) any later version . *
\ **************************************************************************/
/* $Id$ */
class bocalendar
{
var $public_functions = Array (
'read_entry' => True ,
2001-07-18 19:32:10 +02:00
'delete_entry' => True ,
2001-08-01 13:06:17 +02:00
'delete_calendar' => True ,
2001-07-28 15:17:30 +02:00
'update' => True ,
2001-07-30 00:09:24 +02:00
'preferences' => True ,
2001-08-29 21:18:32 +02:00
'store_to_cache' => True ,
'export_event' => True
2001-07-30 00:09:24 +02:00
);
var $soap_functions = Array (
'read_entry' => Array (
'in' => Array (
'int'
),
'out' => Array (
'SOAPStruct'
)
),
'delete_entry' => Array (
'in' => Array (
'int'
),
'out' => Array (
'int'
)
),
2001-08-13 03:34:32 +02:00
'delete_calendar' => Array (
'in' => Array (
'int'
),
'out' => Array (
'int'
)
),
2001-07-30 00:09:24 +02:00
'update' => Array (
'in' => Array (
'array' ,
'array' ,
'array' ,
'array' ,
'array'
),
'out' => Array (
'array'
)
),
'store_to_cache' => Array (
'in' => Array (
2001-08-13 03:34:32 +02:00
'struct'
2001-07-30 00:09:24 +02:00
),
'out' => Array (
'SOAPStruct'
)
2001-08-29 21:18:32 +02:00
),
'store_to_cache' => Array (
'in' => Array (
'array'
),
'out' => Array (
'string'
)
2001-07-30 00:09:24 +02:00
)
2001-07-16 13:38:40 +02:00
);
var $debug = False ;
2001-08-17 02:24:20 +02:00
// var $debug = True;
2001-07-16 13:38:40 +02:00
var $so ;
var $cached_events ;
var $repeating_events ;
var $datetime ;
var $day ;
var $month ;
var $year ;
2001-07-18 19:32:10 +02:00
var $prefs ;
2001-07-16 13:38:40 +02:00
var $owner ;
var $holiday_color ;
var $printer_friendly = False ;
var $cached_holidays ;
var $filter ;
var $cat_id ;
var $users_timeformat ;
2001-07-22 01:35:22 +02:00
var $modified ;
var $deleted ;
var $added ;
2001-07-30 00:09:24 +02:00
var $soap = False ;
2001-07-22 01:35:22 +02:00
2001-07-16 13:38:40 +02:00
var $use_session = False ;
2001-08-12 16:47:23 +02:00
var $today ;
2001-07-18 19:32:10 +02:00
function bocalendar ( $session = 0 )
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$this -> grants = $GLOBALS [ 'phpgw' ] -> acl -> get_grants ( 'calendar' );
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
if ( $this -> debug ) { echo " Read Use_Session : ( " . $session . " )<br> \n " ; }
2001-07-16 13:38:40 +02:00
if ( $session )
{
$this -> read_sessiondata ();
$this -> use_session = True ;
}
2001-07-22 01:35:22 +02:00
if ( $this -> debug )
{
echo " BO Filter : ( " . $this -> filter . " )<br> \n " ;
echo " Owner : " . $this -> owner . " <br> \n " ;
}
2001-08-12 16:47:23 +02:00
if ( isset ( $GLOBALS [ 'owner' ]))
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
$this -> owner = intval ( $GLOBALS [ 'owner' ]);
2001-07-16 13:38:40 +02:00
}
2001-09-07 21:03:51 +02:00
elseif ( !@ isset ( $this -> owner ) || !@ $this -> owner )
2001-07-16 13:38:40 +02:00
{
2001-09-07 21:03:51 +02:00
$this -> owner = intval ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ]);
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
$this -> prefs [ 'common' ] = $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ];
$this -> prefs [ 'calendar' ] = $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'calendar' ];
2001-07-18 19:32:10 +02:00
if ( $this -> prefs [ 'common' ][ 'timeformat' ] == '12' )
2001-07-16 13:38:40 +02:00
{
$this -> users_timeformat = 'h:i a' ;
}
else
{
$this -> users_timeformat = 'H:i' ;
}
2001-08-12 16:47:23 +02:00
$this -> holiday_color = ( substr ( $GLOBALS [ 'phpgw_info' ][ 'theme' ][ 'bg07' ], 0 , 1 ) == '#' ? '' : '#' ) . $GLOBALS [ 'phpgw_info' ][ 'theme' ][ 'bg07' ];
2001-07-16 13:38:40 +02:00
2001-08-12 16:47:23 +02:00
$this -> printer_friendly = ( $GLOBALS [ 'friendly' ] == 1 ? True : False );
2001-07-16 13:38:40 +02:00
2001-08-12 16:47:23 +02:00
if ( isset ( $GLOBALS [ 'filter' ])) { $this -> filter = $GLOBALS [ 'filter' ]; }
if ( isset ( $GLOBALS [ 'cat_id' ])) { $this -> cat_id = $GLOBALS [ 'cat_id' ]; }
2001-07-18 19:32:10 +02:00
if ( ! isset ( $this -> filter ))
{
$this -> filter = ' ' . $this -> prefs [ 'calendar' ][ 'defaultfilter' ] . ' ' ;
}
2001-07-16 13:38:40 +02:00
2001-09-17 13:33:10 +02:00
$date = ( isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'date' ]) ? $GLOBALS [ 'HTTP_GET_VARS' ][ 'date' ] : '' );
$date = ( $date == '' && isset ( $GLOBALS [ 'HTTP_POST_VARS' ][ 'date' ]) ? $GLOBALS [ 'HTTP_POST_VARS' ][ 'date' ] : $date );
$year = ( isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'year' ]) ? $GLOBALS [ 'HTTP_GET_VARS' ][ 'year' ] : '' );
$year = ( $year == '' && isset ( $GLOBALS [ 'HTTP_POST_VARS' ][ 'year' ]) ? $GLOBALS [ 'HTTP_POST_VARS' ][ 'year' ] : $year );
$month = ( isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'month' ]) ? $GLOBALS [ 'HTTP_GET_VARS' ][ 'month' ] : '' );
$month = ( $month == '' && isset ( $GLOBALS [ 'HTTP_POST_VARS' ][ 'month' ]) ? $GLOBALS [ 'HTTP_POST_VARS' ][ 'month' ] : $month );
$day = ( isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'day' ]) ? $GLOBALS [ 'HTTP_GET_VARS' ][ 'day' ] : '' );
$day = ( $day == '' && isset ( $GLOBALS [ 'HTTP_POST_VARS' ][ 'day' ]) ? $GLOBALS [ 'HTTP_POST_VARS' ][ 'day' ] : '' );
2001-09-17 04:33:19 +02:00
2001-09-17 13:33:10 +02:00
if ( isset ( $date ) && $date )
2001-07-16 13:38:40 +02:00
{
2001-09-17 04:33:19 +02:00
$this -> year = intval ( substr ( $date , 0 , 4 ));
$this -> month = intval ( substr ( $date , 4 , 2 ));
$this -> day = intval ( substr ( $date , 6 , 2 ));
2001-07-16 13:38:40 +02:00
}
else
{
2001-09-17 13:33:10 +02:00
if ( isset ( $year ) && $year )
2001-07-16 13:38:40 +02:00
{
2001-09-17 04:33:19 +02:00
$this -> year = $year ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
elseif ( $this -> year == 0 )
{
$this -> year = date ( 'Y' , time ());
}
2001-09-17 13:33:10 +02:00
if ( isset ( $month ) && $month )
2001-07-16 13:38:40 +02:00
{
2001-09-17 04:33:19 +02:00
$this -> month = $month ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
elseif ( $this -> month == 0 )
{
$this -> month = date ( 'm' , time ());
}
2001-09-17 13:33:10 +02:00
if ( isset ( $day ) && $day )
2001-07-16 13:38:40 +02:00
{
2001-09-17 04:33:19 +02:00
$this -> day = $day ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
elseif ( $this -> day == 0 )
{
$this -> day = date ( 'd' , time ());
}
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
$this -> so = CreateObject ( 'calendar.socalendar' ,
Array (
'owner' => $this -> owner ,
'filter' => $this -> filter ,
'category' => $this -> cat_id
)
);
2001-07-18 19:32:10 +02:00
$this -> datetime = $this -> so -> datetime ;
2001-08-12 16:47:23 +02:00
$this -> today = date ( 'Ymd' , time ());
2001-07-22 01:35:22 +02:00
if ( $this -> debug )
{
echo " BO Filter : ( " . $this -> filter . " )<br> \n " ;
echo " Owner : " . $this -> owner . " <br> \n " ;
}
2001-07-16 13:38:40 +02:00
}
2001-08-26 06:30:41 +02:00
function list_methods ( $_type = 'xmlrpc' )
{
2001-08-27 13:21:38 +02:00
/*
This handles introspection or discovery by the logged in client ,
in which case the input might be an array . The server always calls
this function to fill the server dispatch map using a string .
*/
if ( is_array ( $_type ))
{
$_type = $_type [ 'type' ];
}
2001-08-26 06:30:41 +02:00
switch ( $_type )
{
case 'xmlrpc' :
$xml_functions = array (
2001-08-27 13:21:38 +02:00
'list_methods' => array (
'function' => 'list_methods' ,
'signature' => array ( array ( xmlrpcStruct , xmlrpcString )),
'docstring' => lang ( 'Read this list of methods.' )
),
2001-08-26 06:30:41 +02:00
'read_entry' => array (
'function' => 'read_entry' ,
'signature' => array ( array ( xmlrpcStruct , xmlrpcInt )),
'docstring' => lang ( 'Read a single entry by passing the id and fieldlist.' )
),
'add_entry' => array (
'function' => 'update' ,
2001-08-27 13:21:38 +02:00
'signature' => array ( array ( xmlrpcStruct , xmlrpcStruct )),
2001-08-26 06:30:41 +02:00
'docstring' => lang ( 'Add a single entry by passing the fields.' )
),
'update_entry' => array (
'function' => 'update' ,
2001-08-27 13:21:38 +02:00
'signature' => array ( array ( xmlrpcStruct , xmlrpcStruct )),
2001-08-26 06:30:41 +02:00
'docstring' => lang ( 'Update a single entry by passing the fields.' )
),
'delete_entry' => array (
'function' => 'delete_entry' ,
'signature' => array ( array ( xmlrpcInt , xmlrpcInt )),
'docstring' => lang ( 'Delete a single entry by passing the id.' )
),
'delete_calendar' => array (
'function' => 'delete_calendar' ,
'signature' => array ( array ( xmlrpcInt , xmlrpcInt )),
'docstring' => lang ( 'Delete an entire users calendar.' )
),
'store_to_cache' => array (
'function' => 'store_to_cache' ,
'signature' => array ( array ( xmlrpcStruct , xmlrpcStruct )),
'docstring' => lang ( 'Read a list of entries.' )
2001-08-29 21:18:32 +02:00
),
'export_event' => array (
'function' => 'export_event' ,
'signature' => array ( array ( xmlrpcString , xmlrpcStruct )),
'docstring' => lang ( 'Export a list of entries in iCal format.' )
2001-08-26 06:30:41 +02:00
)
);
return $xml_functions ;
break ;
case 'soap' :
return $this -> soap_functions ;
break ;
default :
return array ();
break ;
}
}
2001-07-16 13:38:40 +02:00
function save_sessiondata ( $data )
{
if ( $this -> use_session )
{
if ( $this -> debug ) { echo '<br>Save:' ; _debug_array ( $data ); }
2001-08-17 02:24:20 +02:00
$GLOBALS [ 'phpgw' ] -> session -> appsession ( 'session_data' , 'calendar' , $data );
2001-07-16 13:38:40 +02:00
}
}
function read_sessiondata ()
{
2001-08-12 16:47:23 +02:00
$data = $GLOBALS [ 'phpgw' ] -> session -> appsession ( 'session_data' , 'calendar' );
2001-07-16 13:38:40 +02:00
if ( $this -> debug ) { echo '<br>Read:' ; _debug_array ( $data ); }
$this -> filter = $data [ 'filter' ];
$this -> cat_id = $data [ 'cat_id' ];
2001-07-22 01:35:22 +02:00
$this -> owner = intval ( $data [ 'owner' ]);
$this -> year = intval ( $data [ 'year' ]);
$this -> month = intval ( $data [ 'month' ]);
$this -> day = intval ( $data [ 'day' ]);
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
function read_entry ( $id )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
if ( $this -> check_perms ( PHPGW_ACL_READ ))
{
2001-07-30 00:09:24 +02:00
$event = $this -> so -> read_entry ( $id );
return $event ;
2001-07-18 19:32:10 +02:00
}
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
function delete_entry ( $id )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $this -> check_perms ( PHPGW_ACL_DELETE ))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$temp_event = $this -> read_entry ( $id );
2001-08-06 04:41:36 +02:00
if ( $this -> owner == $temp_event [ 'owner' ])
2001-07-28 15:17:30 +02:00
{
$this -> so -> delete_entry ( $id );
$cd = 16 ;
}
else
{
$cd = 60 ;
}
}
return $cd ;
2001-07-18 19:32:10 +02:00
}
2001-08-01 13:06:17 +02:00
function delete_calendar ( $owner )
{
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'apps' ][ 'admin' ])
2001-08-01 13:06:17 +02:00
{
$this -> so -> delete_calendar ( $owner );
}
}
function change_owner ( $account_id , $new_owner )
{
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw_info' ][ 'server' ][ 'calendar_type' ] == 'sql' )
2001-08-01 13:06:17 +02:00
{
$this -> so -> change_owner ( $account_id , $new_owner );
}
}
2001-07-28 15:17:30 +02:00
function expunge ()
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $this -> check_perms ( PHPGW_ACL_DELETE ))
2001-07-16 13:38:40 +02:00
{
2001-08-17 02:24:20 +02:00
reset ( $this -> so -> cal -> deleted_events );
2001-07-28 15:17:30 +02:00
for ( $i = 0 ; $i < count ( $this -> so -> cal -> deleted_events ); $i ++ )
2001-07-22 01:35:22 +02:00
{
2001-07-28 15:17:30 +02:00
$event_id = $this -> so -> cal -> deleted_events [ $i ];
$event = $this -> so -> read_entry ( $event_id );
2001-07-30 00:09:24 +02:00
$this -> send_update ( MSG_DELETED , $event [ 'participants' ], $event );
2001-07-22 01:35:22 +02:00
}
2001-07-28 15:17:30 +02:00
$this -> so -> expunge ();
2001-07-16 13:38:40 +02:00
}
}
2001-07-28 15:17:30 +02:00
function search_keywords ( $keywords )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
return $this -> so -> list_events_keyword ( $keywords );
2001-07-16 13:38:40 +02:00
}
2001-09-07 19:17:05 +02:00
function update ( $params = '' )
2001-07-18 19:32:10 +02:00
{
2001-09-07 19:17:05 +02:00
$l_cal = ( @ isset ( $params [ 'cal' ]) && $params [ 'cal' ] ? $params [ 'cal' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'cal' ]);
$l_participants = ( @ $params [ 'participants' ] ? $params [ 'participants' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'participants' ]);
2001-09-17 04:33:19 +02:00
$l_categories = ( @ $params [ 'categories' ] ? $params [ 'categories' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'categories' ]);
2001-09-07 19:17:05 +02:00
$l_start = ( @ isset ( $params [ 'start' ]) && $params [ 'start' ] ? $params [ 'start' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'start' ]);
$l_end = ( @ isset ( $params [ 'end' ]) && $params [ 'end' ] ? $params [ 'end' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'end' ]);
$l_recur_enddate = ( @ isset ( $params [ 'recur_enddate' ]) && $params [ 'recur_enddate' ] ? $params [ 'recur_enddate' ] : $GLOBALS [ 'HTTP_POST_VARS' ][ 'recur_enddate' ]);
2001-07-28 15:17:30 +02:00
2001-07-30 00:09:24 +02:00
$send_to_ui = True ;
2001-08-06 04:41:36 +02:00
if ( $p_cal || $p_participants || $p_start || $p_end || $p_recur_enddata )
2001-07-30 00:09:24 +02:00
{
$send_to_ui = False ;
}
2001-08-06 04:41:36 +02:00
if ( $this -> debug )
{
2001-08-12 16:47:23 +02:00
echo " ID : " . $l_cal [ 'id' ] . " <br> \n " ;
2001-08-06 04:41:36 +02:00
}
2001-07-28 15:17:30 +02:00
$ui = CreateObject ( 'calendar.uicalendar' );
2001-08-24 14:12:51 +02:00
2001-08-30 21:06:24 +02:00
if ( isset ( $GLOBALS [ 'HTTP_GET_VARS' ][ 'readsess' ]))
2001-07-28 15:17:30 +02:00
{
$event = $this -> restore_from_appsession ();
2001-08-30 21:06:24 +02:00
$event [ 'title' ] = stripslashes ( $event [ 'title' ]);
$event [ 'description' ] = stripslashes ( $event [ 'description' ]);
2001-07-28 15:17:30 +02:00
$datetime_check = $this -> validate_update ( $event );
if ( $datetime_check )
{
2001-08-12 16:47:23 +02:00
$ui -> edit (
Array (
'cd' => $datetime_check ,
'readsess' => 1
)
);
2001-07-28 15:17:30 +02:00
}
2001-08-06 04:41:36 +02:00
$overlapping_events = False ;
2001-07-28 15:17:30 +02:00
}
else
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
if ( ! $l_cal [ 'id' ] && ! $this -> check_perms ( PHPGW_ACL_ADD ))
2001-07-28 15:17:30 +02:00
{
$ui -> index ();
}
2001-08-12 16:47:23 +02:00
elseif ( $l_cal [ 'id' ] && ! $this -> check_perms ( PHPGW_ACL_EDIT ))
2001-07-28 15:17:30 +02:00
{
$ui -> index ();
}
2001-08-12 16:47:23 +02:00
$this -> fix_update_time ( $l_start );
$this -> fix_update_time ( $l_end );
2001-07-28 15:17:30 +02:00
2001-08-12 16:47:23 +02:00
if ( ! isset ( $l_cal [ 'private' ]))
2001-07-22 01:35:22 +02:00
{
2001-08-12 16:47:23 +02:00
$l_cal [ 'private' ] = 'public' ;
2001-07-22 01:35:22 +02:00
}
2001-07-28 15:17:30 +02:00
2001-09-17 04:33:19 +02:00
if ( ! isset ( $l_categories ))
2001-09-07 18:37:11 +02:00
{
2001-09-17 04:33:19 +02:00
$l_categories = 0 ;
2001-09-07 18:37:11 +02:00
}
2001-08-12 16:47:23 +02:00
$is_public = ( $l_cal [ 'private' ] == 'public' ? 1 : 0 );
2001-07-28 15:17:30 +02:00
$this -> so -> event_init ();
2001-09-07 18:37:11 +02:00
$this -> add_attribute ( 'uid' , $l_cal [ 'uid' ]);
2001-09-20 03:39:46 +02:00
$this -> so -> set_category ( implode ( ',' , $l_categories ));
2001-08-12 16:47:23 +02:00
$this -> so -> set_title ( $l_cal [ 'title' ]);
$this -> so -> set_description ( $l_cal [ 'description' ]);
$this -> so -> set_start ( $l_start [ 'year' ], $l_start [ 'month' ], $l_start [ 'mday' ], $l_start [ 'hour' ], $l_start [ 'min' ], 0 );
$this -> so -> set_end ( $l_end [ 'year' ], $l_end [ 'month' ], $l_end [ 'mday' ], $l_end [ 'hour' ], $l_end [ 'min' ], 0 );
2001-07-28 15:17:30 +02:00
$this -> so -> set_class ( $is_public );
2001-09-08 10:48:38 +02:00
$this -> so -> add_attribute ( 'reference' ,( @ isset ( $l_cal [ 'reference' ]) && $l_cal [ 'reference' ] ? $l_cal [ 'reference' ] : 0 ));
$this -> so -> add_attribute ( 'location' ,( @ isset ( $l_cal [ 'location' ]) && $l_cal [ 'location' ] ? $l_cal [ 'location' ] : '' ));
2001-08-12 16:47:23 +02:00
if ( $l_cal [ 'id' ])
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
$this -> so -> add_attribute ( 'id' , $l_cal [ 'id' ]);
2001-07-28 15:17:30 +02:00
}
2001-08-12 16:47:23 +02:00
if ( $l_cal [ 'rpt_use_end' ] != 'y' )
2001-07-28 15:17:30 +02:00
{
2001-08-12 16:47:23 +02:00
$l_recur_enddate [ 'year' ] = 0 ;
$l_recur_enddate [ 'month' ] = 0 ;
$l_recur_enddate [ 'mday' ] = 0 ;
2001-07-28 15:17:30 +02:00
}
2001-09-20 03:39:46 +02:00
2001-08-25 23:12:51 +02:00
switch ( intval ( $l_cal [ 'recur_type' ]))
2001-07-28 15:17:30 +02:00
{
case MCAL_RECUR_NONE :
$this -> so -> set_recur_none ();
break ;
case MCAL_RECUR_DAILY :
2001-08-25 23:12:51 +02:00
$this -> so -> set_recur_daily ( intval ( $l_recur_enddate [ 'year' ]), intval ( $l_recur_enddate [ 'month' ]), intval ( $l_recur_enddate [ 'mday' ]), intval ( $l_cal [ 'recur_interval' ]));
2001-07-28 15:17:30 +02:00
break ;
case MCAL_RECUR_WEEKLY :
2001-09-20 03:39:46 +02:00
$l_cal [ 'recur_data' ] = intval ( $l_cal [ 'rpt_sun' ]) + intval ( $l_cal [ 'rpt_mon' ]) + intval ( $l_cal [ 'rpt_tue' ]) + intval ( $l_cal [ 'rpt_wed' ]) + intval ( $l_cal [ 'rpt_thu' ]) + intval ( $l_cal [ 'rpt_fri' ]) + intval ( $l_cal [ 'rpt_sat' ]);
2001-08-25 23:10:54 +02:00
$this -> so -> set_recur_weekly ( intval ( $l_recur_enddate [ 'year' ]), intval ( $l_recur_enddate [ 'month' ]), intval ( $l_recur_enddate [ 'mday' ]), intval ( $l_cal [ 'recur_interval' ]), $l_cal [ 'recur_data' ]);
2001-07-28 15:17:30 +02:00
break ;
case MCAL_RECUR_MONTHLY_MDAY :
2001-08-25 23:10:54 +02:00
$this -> so -> set_recur_monthly_mday ( intval ( $l_recur_enddate [ 'year' ]), intval ( $l_recur_enddate [ 'month' ]), intval ( $l_recur_enddate [ 'mday' ]), intval ( $l_cal [ 'recur_interval' ]));
2001-07-28 15:17:30 +02:00
break ;
case MCAL_RECUR_MONTHLY_WDAY :
2001-08-25 23:10:54 +02:00
$this -> so -> set_recur_monthly_wday ( intval ( $l_recur_enddate [ 'year' ]), intval ( $l_recur_enddate [ 'month' ]), intval ( $l_recur_enddate [ 'mday' ]), intval ( $l_cal [ 'recur_interval' ]));
2001-07-28 15:17:30 +02:00
break ;
case MCAL_RECUR_YEARLY :
2001-08-25 23:10:54 +02:00
$this -> so -> set_recur_yearly ( intval ( $l_recur_enddate [ 'year' ]), intval ( $l_recur_enddate [ 'month' ]), intval ( $l_recur_enddate [ 'mday' ]), intval ( $l_cal [ 'recur_interval' ]));
2001-07-28 15:17:30 +02:00
break ;
}
2001-08-25 04:12:02 +02:00
if ( $l_participants )
2001-07-28 15:17:30 +02:00
{
2001-08-25 04:12:02 +02:00
$parts = $l_participants ;
$minparts = min ( $l_participants );
$part = Array ();
for ( $i = 0 ; $i < count ( $parts ); $i ++ )
2001-07-28 15:17:30 +02:00
{
2001-08-25 04:12:02 +02:00
$acct_type = $GLOBALS [ 'phpgw' ] -> accounts -> get_type ( intval ( $parts [ $i ]));
if ( $acct_type == 'u' )
2001-07-28 15:17:30 +02:00
{
2001-08-25 04:12:02 +02:00
$part [ $parts [ $i ]] = 1 ;
2001-07-28 15:17:30 +02:00
}
2001-08-25 04:12:02 +02:00
elseif ( $acct_type == 'g' )
2001-07-28 15:17:30 +02:00
{
2001-08-25 04:12:02 +02:00
/* This pulls ALL users of a group and makes them as participants to the event */
/* I would like to turn this back into a group thing. */
$acct = CreateObject ( 'phpgwapi.accounts' , intval ( $parts [ $i ]));
$members = $acct -> members ( intval ( $parts [ $i ]));
unset ( $acct );
if ( $members == False )
{
continue ;
}
while ( $member = each ( $members ))
{
$part [ $member [ 1 ][ 'account_id' ]] = 1 ;
}
2001-07-28 15:17:30 +02:00
}
}
2001-08-25 05:21:26 +02:00
}
else
{
$part = False ;
2001-07-28 15:17:30 +02:00
}
2001-08-25 04:12:02 +02:00
if ( $part )
2001-07-28 15:17:30 +02:00
{
2001-08-25 04:12:02 +02:00
@ reset ( $part );
while ( list ( $key , $value ) = each ( $part ))
{
$this -> so -> add_attribute ( 'participants' , 'U' , intval ( $key ));
}
2001-07-28 15:17:30 +02:00
}
$event = $this -> get_cached_event ();
2001-09-07 20:47:48 +02:00
if ( !@ isset ( $event [ 'participants' ][ $l_cal [ 'owner' ]]))
2001-07-28 15:17:30 +02:00
{
$this -> so -> add_attribute ( 'owner' , $minparts );
}
2001-08-06 04:41:36 +02:00
else
{
2001-08-12 16:47:23 +02:00
$this -> so -> add_attribute ( 'owner' , $l_cal [ 'owner' ]);
2001-08-06 04:41:36 +02:00
}
2001-08-12 16:47:23 +02:00
$this -> so -> add_attribute ( 'priority' , $l_cal [ 'priority' ]);
2001-07-28 15:17:30 +02:00
$event = $this -> get_cached_event ();
2001-09-17 04:33:19 +02:00
$event [ 'title' ] = $GLOBALS [ 'phpgw' ] -> db -> db_addslashes ( $event [ 'title' ]);
$event [ 'description' ] = $GLOBALS [ 'phpgw' ] -> db -> db_addslashes ( $event [ 'description' ]);
2001-07-28 15:17:30 +02:00
$this -> store_to_appsession ( $event );
$datetime_check = $this -> validate_update ( $event );
if ( $datetime_check )
{
2001-08-12 16:47:23 +02:00
$ui -> edit (
Array (
'cd' => $datetime_check ,
'readsess' => 1
)
);
2001-07-28 15:17:30 +02:00
}
2001-08-27 03:30:40 +02:00
$event_ids = Array ();
if ( $event [ 'id' ])
{
$event_ids [] = $event [ 'id' ];
}
if ( $event [ 'reference' ])
{
$event_ids [] = $event [ 'reference' ];
}
2001-08-06 04:41:36 +02:00
$overlapping_events = $this -> overlap (
$this -> maketime ( $event [ 'start' ]) - $this -> datetime -> tz_offset ,
$this -> maketime ( $event [ 'end' ]) - $this -> datetime -> tz_offset ,
$event [ 'participants' ],
$event [ 'owner' ],
2001-08-27 03:30:40 +02:00
$event_ids
2001-08-06 04:41:36 +02:00
);
2001-07-28 15:17:30 +02:00
}
if ( $overlapping_events )
{
2001-07-30 00:09:24 +02:00
if ( $send_to_ui )
{
2001-08-12 16:47:23 +02:00
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'noheader' ]);
unset ( $GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nonavbar' ]);
2001-07-30 00:09:24 +02:00
$ui -> overlap ( $overlapping_events , $event );
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'flags' ][ 'nofooter' ] = True ;
2001-08-06 04:41:36 +02:00
return ;
2001-07-30 00:09:24 +02:00
}
else
{
return $overlapping_events ;
}
2001-07-28 15:17:30 +02:00
}
else
{
2001-07-30 00:09:24 +02:00
if ( ! $event [ 'id' ])
2001-07-28 15:17:30 +02:00
{
$this -> so -> add_entry ( $event );
2001-07-30 00:09:24 +02:00
$this -> send_update ( MSG_ADDED , $event [ 'participants' ], '' , $this -> get_cached_event ());
2001-07-28 15:17:30 +02:00
}
else
{
$new_event = $event ;
2001-08-06 04:41:36 +02:00
$old_event = $this -> read_entry ( $event [ 'id' ]);
2001-07-28 15:17:30 +02:00
$this -> prepare_recipients ( $new_event , $old_event );
2001-08-06 04:41:36 +02:00
$this -> so -> cal -> event = $event ;
2001-07-28 15:17:30 +02:00
$this -> so -> add_entry ( $event );
}
2001-07-30 00:09:24 +02:00
$date = sprintf ( " %04d%02d%02d " , $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ]);
if ( $send_to_ui )
{
$ui -> index ();
}
2001-07-18 19:32:10 +02:00
}
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
/* Private functions */
2001-07-18 19:32:10 +02:00
function read_holidays ()
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$holiday = CreateObject ( 'calendar.boholiday' );
$holiday -> prepare_read_holidays ( $this -> year , $this -> owner );
2001-07-18 19:32:10 +02:00
$this -> cached_holidays = $holiday -> read_holiday ();
unset ( $holiday );
}
2001-07-16 13:38:40 +02:00
2001-07-30 00:09:24 +02:00
function maketime ( $time )
{
return mktime ( $time [ 'hour' ], $time [ 'min' ], $time [ 'sec' ], $time [ 'month' ], $time [ 'mday' ], $time [ 'year' ]);
}
2001-07-18 19:32:10 +02:00
function can_user_edit ( $event )
{
$can_edit = False ;
2001-08-06 04:41:36 +02:00
if (( $event [ 'owner' ] == $this -> owner ) && ( $this -> check_perms ( PHPGW_ACL_EDIT ) == True ))
2001-07-18 19:32:10 +02:00
{
2001-09-07 20:47:48 +02:00
if ( $event [ 'public' ] == False || $event [ 'public' ] == 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
if ( $this -> check_perms ( PHPGW_ACL_PRIVATE ) == True )
{
$can_edit = True ;
}
2001-07-16 13:38:40 +02:00
}
else
{
2001-07-18 19:32:10 +02:00
$can_edit = True ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
}
return $can_edit ;
}
function fix_update_time ( & $time_param )
{
if ( $this -> prefs [ 'common' ][ 'timeformat' ] == '12' )
{
2001-07-28 15:17:30 +02:00
if ( $time_param [ 'ampm' ] == 'pm' )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $time_param [ 'hour' ] <> 12 )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$time_param [ 'hour' ] += 12 ;
2001-07-18 19:32:10 +02:00
}
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
elseif ( $time_param [ 'ampm' ] == 'am' )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $time_param [ 'hour' ] == 12 )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$time_param [ 'hour' ] -= 12 ;
2001-07-16 13:38:40 +02:00
}
}
2001-07-18 19:32:10 +02:00
2001-07-28 15:17:30 +02:00
if ( $time_param [ 'hour' ] > 24 )
2001-07-18 19:32:10 +02:00
{
2001-07-28 15:17:30 +02:00
$time_param [ 'hour' ] -= 12 ;
2001-07-18 19:32:10 +02:00
}
2001-07-16 13:38:40 +02:00
}
}
2001-07-18 19:32:10 +02:00
function validate_update ( $event )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$error = 0 ;
// do a little form verifying
2001-08-30 21:06:24 +02:00
if ( ! count ( $event [ 'participants' ]))
2001-08-24 14:12:51 +02:00
{
$error = 43 ;
}
elseif ( $event [ 'title' ] == '' )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$error = 40 ;
}
2001-07-30 00:09:24 +02:00
elseif (( $this -> datetime -> time_valid ( $event [ 'start' ][ 'hour' ], $event [ 'start' ][ 'min' ], 0 ) == False ) || ( $this -> datetime -> time_valid ( $event [ 'end' ][ 'hour' ], $event [ 'end' ][ 'min' ], 0 ) == False ))
2001-07-18 19:32:10 +02:00
{
$error = 41 ;
}
2001-07-30 00:09:24 +02:00
elseif (( $this -> datetime -> date_valid ( $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ]) == False ) || ( $this -> datetime -> date_valid ( $event [ 'end' ][ 'year' ], $event [ 'end' ][ 'month' ], $event [ 'end' ][ 'mday' ]) == False ) || ( $this -> datetime -> date_compare ( $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ], $event [ 'end' ][ 'year' ], $event [ 'end' ][ 'month' ], $event [ 'end' ][ 'mday' ]) == 1 ))
2001-07-18 19:32:10 +02:00
{
$error = 42 ;
2001-07-16 13:38:40 +02:00
}
2001-07-30 00:09:24 +02:00
elseif ( $this -> datetime -> date_compare ( $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ], $event [ 'end' ][ 'year' ], $event [ 'end' ][ 'month' ], $event [ 'end' ][ 'mday' ]) == 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
if ( $this -> datetime -> time_compare ( $event [ 'start' ][ 'hour' ], $event [ 'start' ][ 'min' ], 0 , $event [ 'end' ][ 'hour' ], $event [ 'end' ][ 'min' ], 0 ) == 1 )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$error = 42 ;
2001-07-16 13:38:40 +02:00
}
}
2001-07-18 19:32:10 +02:00
return $error ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
function overlap ( $starttime , $endtime , $participants , $owner = 0 , $id = 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$retval = Array ();
$ok = False ;
2001-08-27 03:30:40 +02:00
/* This needs some attention.. by commenting this chunk of code it will fix bug #444265 */
2001-08-12 16:47:23 +02:00
if ( $starttime == $endtime && $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'Hi' ) == 0 )
2001-07-18 19:32:10 +02:00
{
2001-08-12 16:47:23 +02:00
$endtime = mktime ( 23 , 59 , 59 , $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'm' ), $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'd' ) + 1 , $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'Y' )) - $this -> datetime -> tz_offset ;
2001-07-18 19:32:10 +02:00
}
$sql = 'AND (((' . $starttime . ' <= phpgw_cal.datetime) AND (' . $endtime . ' >= phpgw_cal.datetime) AND (' . $endtime . ' <= phpgw_cal.edatetime)) '
. 'OR ((' . $starttime . ' >= phpgw_cal.datetime) AND (' . $starttime . ' < phpgw_cal.edatetime) AND (' . $endtime . ' >= phpgw_cal.edatetime)) '
. 'OR ((' . $starttime . ' <= phpgw_cal.datetime) AND (' . $endtime . ' >= phpgw_cal.edatetime)) '
. 'OR ((' . $starttime . ' >= phpgw_cal.datetime) AND (' . $endtime . ' <= phpgw_cal.edatetime))) ' ;
if ( count ( $participants ) > 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$p_g = '' ;
if ( count ( $participants ))
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$users = Array ();
while ( list ( $user , $status ) = each ( $participants ))
{
$users [] = $user ;
}
if ( $users )
2001-07-16 13:38:40 +02:00
{
2001-08-27 03:30:40 +02:00
$p_g .= 'phpgw_cal_user.cal_login IN (' . implode ( ',' , $users ) . ')' ;
2001-07-16 13:38:40 +02:00
}
}
2001-07-18 19:32:10 +02:00
if ( $p_g )
{
$sql .= ' AND (' . $p_g . ')' ;
}
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
if ( $id )
2001-07-16 13:38:40 +02:00
{
2001-08-27 03:30:40 +02:00
@ reset ( $id );
$sql .= ' AND phpgw_cal.cal_id NOT IN (' . ( count ( $id ) == 1 ? $id [ 0 ] : implode ( ',' , $id )) . ')' ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
$sql .= ' ORDER BY phpgw_cal.datetime ASC, phpgw_cal.edatetime ASC, phpgw_cal.priority ASC' ;
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
$events = $this -> so -> get_event_ids ( False , $sql );
if ( $events == False )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
return false ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
2001-08-12 16:47:23 +02:00
$db2 = $GLOBALS [ 'phpgw' ] -> db ;
2001-07-16 13:38:40 +02:00
2001-07-18 19:32:10 +02:00
for ( $i = 0 ; $i < count ( $events ); $i ++ )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$db2 -> query ( 'SELECT recur_type FROM phpgw_cal_repeats WHERE cal_id=' . $events [ $i ], __LINE__ , __FILE__ );
if ( $db2 -> num_rows () == 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$retval [] = $events [ $i ];
$ok = True ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
else
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
$db2 -> next_record ();
if ( $db2 -> f ( 'recur_type' ) <> MCAL_RECUR_MONTHLY_MDAY )
{
$retval [] = $events [ $i ];
$ok = True ;
}
2001-07-16 13:38:40 +02:00
}
}
2001-07-18 19:32:10 +02:00
if ( $ok == True )
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
return $retval ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
else
2001-07-16 13:38:40 +02:00
{
2001-07-18 19:32:10 +02:00
return False ;
2001-07-16 13:38:40 +02:00
}
}
function check_perms ( $needed , $user = 0 )
{
if ( $user == 0 )
{
2001-09-07 21:18:03 +02:00
return !! ( $this -> grants [ $this -> owner ] & $needed );
2001-07-16 13:38:40 +02:00
}
else
{
2001-09-07 21:18:03 +02:00
return !! ( $this -> grants [ intval ( $user )] & $needed );
2001-07-16 13:38:40 +02:00
}
}
2001-07-22 01:35:22 +02:00
function get_fullname ( $accountid )
{
$account_id = get_account_id ( $accountid );
2001-08-12 16:47:23 +02:00
if ( $GLOBALS [ 'phpgw' ] -> accounts -> exists ( $account_id ) == False )
2001-07-22 01:35:22 +02:00
{
return False ;
}
2001-09-11 05:04:44 +02:00
$GLOBALS [ 'phpgw' ] -> accounts -> get_account_name ( $account_id , $lid , $fname , $lname );
$fullname = $lid ;
if ( $lname && $fname )
2001-07-22 01:35:22 +02:00
{
2001-09-11 05:04:44 +02:00
$fullname = $lname . ', ' . $fname ;
2001-07-22 01:35:22 +02:00
}
2001-09-11 05:04:44 +02:00
return $fullname ;
2001-07-22 01:35:22 +02:00
}
2001-07-16 13:38:40 +02:00
function display_status ( $user_status )
{
2001-07-22 01:35:22 +02:00
if ( @ $this -> prefs [ 'calendar' ][ 'display_status' ])
2001-07-16 13:38:40 +02:00
{
return ' (' . $user_status . ')' ;
}
else
{
return '' ;
}
}
function get_long_status ( $status_short )
{
switch ( $status_short )
{
case 'A' :
$status = lang ( 'Accepted' );
break ;
case 'R' :
$status = lang ( 'Rejected' );
break ;
case 'T' :
$status = lang ( 'Tentative' );
break ;
case 'U' :
$status = lang ( 'No Response' );
break ;
}
return $status ;
}
2001-07-22 01:35:22 +02:00
function is_private ( $event , $owner )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $owner == 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
$owner = $this -> owner ;
}
2001-08-12 16:47:23 +02:00
if ( $owner == $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ] || ( $event [ 'public' ] == 1 ) || ( $this -> check_perms ( PHPGW_ACL_PRIVATE , $owner ) && $event [ 'public' ] == 0 ))
2001-07-28 15:17:30 +02:00
{
return False ;
2001-07-16 13:38:40 +02:00
}
2001-07-30 00:09:24 +02:00
elseif ( $event [ 'public' ] == 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
return True ;
2001-07-16 13:38:40 +02:00
}
2001-07-30 00:09:24 +02:00
elseif ( $event [ 'public' ] == 2 )
2001-07-16 13:38:40 +02:00
{
$is_private = True ;
2001-08-12 16:47:23 +02:00
$groups = $GLOBALS [ 'phpgw' ] -> accounts -> membership ( $owner );
2001-07-28 15:17:30 +02:00
while ( list ( $key , $group ) = each ( $groups ))
2001-07-16 13:38:40 +02:00
{
2001-09-20 03:39:46 +02:00
if ( strpos ( ' ' . implode ( ',' , $event [ 'groups' ]) . ' ' , $group [ 'account_id' ]))
2001-07-16 13:38:40 +02:00
{
2001-07-28 15:17:30 +02:00
return False ;
2001-07-16 13:38:40 +02:00
}
}
}
else
{
2001-07-28 15:17:30 +02:00
return False ;
2001-07-16 13:38:40 +02:00
}
return $is_private ;
}
function get_short_field ( $event , $is_private = True , $field = '' )
{
if ( $is_private )
{
2001-07-28 15:17:30 +02:00
return 'private' ;
2001-07-16 13:38:40 +02:00
}
2001-07-30 00:09:24 +02:00
elseif ( strlen ( $event [ $field ]) > 19 )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
return substr ( $event [ $field ], 0 , 19 ) . '...' ;
2001-07-16 13:38:40 +02:00
}
else
{
2001-07-30 00:09:24 +02:00
return $event [ $field ];
2001-07-16 13:38:40 +02:00
}
2001-07-28 15:17:30 +02:00
}
2001-07-16 13:38:40 +02:00
2001-07-28 15:17:30 +02:00
function get_week_label ()
{
$first = $this -> datetime -> gmtdate ( $this -> datetime -> get_weekday_start ( $this -> year , $this -> month , $this -> day ));
$last = $this -> datetime -> gmtdate ( $first [ 'raw' ] + 518400 );
// Week Label
$week_id = lang ( strftime ( " %B " , $first [ 'raw' ])) . ' ' . $first [ 'day' ];
if ( $first [ 'month' ] <> $last [ 'month' ] && $first [ 'year' ] <> $last [ 'year' ])
{
$week_id .= ', ' . $first [ 'year' ];
}
$week_id .= ' - ' ;
if ( $first [ 'month' ] <> $last [ 'month' ])
{
$week_id .= lang ( strftime ( " %B " , $last [ 'raw' ])) . ' ' ;
}
$week_id .= $last [ 'day' ] . ', ' . $last [ 'year' ];
return $week_id ;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
function normalizeminutes ( & $minutes )
{
$hour = 0 ;
$min = intval ( $minutes );
if ( $min >= 60 )
{
$hour += $min / 60 ;
$min %= 60 ;
}
settype ( $minutes , 'integer' );
$minutes = $min ;
return $hour ;
}
function splittime ( $time , $follow_24_rule = True )
{
$temp = array ( 'hour' , 'minute' , 'second' , 'ampm' );
$time = strrev ( $time );
$second = intval ( strrev ( substr ( $time , 0 , 2 )));
$minute = intval ( strrev ( substr ( $time , 2 , 2 )));
$hour = intval ( strrev ( substr ( $time , 4 )));
$hour += $this -> normalizeminutes ( & $minute );
$temp [ 'second' ] = $second ;
$temp [ 'minute' ] = $minute ;
$temp [ 'hour' ] = $hour ;
$temp [ 'ampm' ] = ' ' ;
if ( $follow_24_rule == True )
{
if ( $this -> prefs [ 'common' ][ 'timeformat' ] == '24' )
{
return $temp ;
}
$temp [ 'ampm' ] = 'am' ;
if (( int ) $temp [ 'hour' ] > 12 )
{
$temp [ 'hour' ] = ( int )(( int ) $temp [ 'hour' ] - 12 );
$temp [ 'ampm' ] = 'pm' ;
}
elseif (( int ) $temp [ 'hour' ] == 12 )
{
$temp [ 'ampm' ] = 'pm' ;
}
}
return $temp ;
}
function build_time_for_display ( $fixed_time )
{
$time = $this -> splittime ( $fixed_time );
2001-07-28 15:17:30 +02:00
$str = $time [ 'hour' ] . ':' . (( int ) $time [ 'minute' ] <= 9 ? '0' : '' ) . $time [ 'minute' ];
2001-07-18 19:32:10 +02:00
if ( $this -> prefs [ 'common' ][ 'timeformat' ] == '12' )
{
$str .= ' ' . $time [ 'ampm' ];
}
return $str ;
}
2001-07-16 13:38:40 +02:00
function sort_event ( $event , $date )
{
$inserted = False ;
if ( $this -> cached_events [ $date ])
{
2001-08-12 16:47:23 +02:00
$year = substr ( $date , 0 , 4 );
$month = substr ( $date , 4 , 2 );
$day = substr ( $date , 6 , 2 );
if ( $this -> debug )
{
echo " Date : " . $date . " Count : " . count ( $this -> cached_events [ $date ]) . " <br> \n " ;
}
2001-07-16 13:38:40 +02:00
for ( $i = 0 ; $i < count ( $this -> cached_events [ $date ]); $i ++ )
{
$events = $this -> cached_events [ $date ][ $i ];
2001-08-27 03:30:40 +02:00
if ( $this -> cached_events [ $date ][ $i ][ 'id' ] == $event [ 'id' ] || $this -> cached_events [ $date ][ $i ][ 'reference' ] == $event [ 'id' ])
2001-07-16 13:38:40 +02:00
{
2001-08-12 16:47:23 +02:00
if ( $this -> debug )
{
echo " Item already inserted!<br> \n " ;
}
2001-07-16 13:38:40 +02:00
$inserted = True ;
break ;
}
2001-08-12 16:47:23 +02:00
/* This puts all spanning events across multiple days up at the top. */
if ( $this -> cached_events [ $date ][ $i ][ 'recur_type' ] == MCAL_RECUR_NONE )
{
if ( $this -> cached_events [ $date ][ $i ][ 'start' ][ 'mday' ] != $day && $this -> cached_events [ $date ][ $i ][ 'end' ][ 'mday' ] >= $day )
{
continue ;
}
}
if ( date ( 'Hi' , mktime ( $event [ 'start' ][ 'hour' ], $event [ 'start' ][ 'min' ], $event [ 'start' ][ 'sec' ], $month , $day , $year )) < date ( 'Hi' , mktime ( $this -> cached_events [ $date ][ $i ][ 'start' ][ 'hour' ], $this -> cached_events [ $date ][ $i ][ 'start' ][ 'min' ], $this -> cached_events [ $date ][ $i ][ 'start' ][ 'sec' ], $month , $day , $year )))
2001-07-16 13:38:40 +02:00
{
for ( $j = count ( $this -> cached_events [ $date ]); $j >= $i ; $j -- )
{
2001-08-12 16:47:23 +02:00
$this -> cached_events [ $date ][ $j ] = $this -> cached_events [ $date ][ $j - 1 ];
2001-07-16 13:38:40 +02:00
}
$inserted = True ;
2001-08-12 16:47:23 +02:00
$this -> cached_events [ $date ][ $i ] = $event ;
2001-07-16 13:38:40 +02:00
break ;
}
}
}
if ( ! $inserted )
{
$this -> cached_events [ $date ][] = $event ;
}
}
function check_repeating_events ( $datetime )
{
@ reset ( $this -> repeating_events );
$search_date_full = date ( 'Ymd' , $datetime );
$search_date_year = date ( 'Y' , $datetime );
$search_date_month = date ( 'm' , $datetime );
$search_date_day = date ( 'd' , $datetime );
$search_date_dow = date ( 'w' , $datetime );
$search_beg_day = mktime ( 0 , 0 , 0 , $search_date_month , $search_date_day , $search_date_year );
$repeated = $this -> repeating_events ;
$r_events = count ( $repeated );
for ( $i = 0 ; $i < $r_events ; $i ++ )
{
$rep_events = $this -> repeating_events [ $i ];
$id = $rep_events -> id ;
2001-07-30 00:09:24 +02:00
$event_beg_day = mktime ( 0 , 0 , 0 , $rep_events [ 'start' ][ 'month' ], $rep_events [ 'start' ][ 'mday' ], $rep_events [ 'start' ][ 'year' ]);
if ( $rep_events [ 'recur_enddate' ][ 'month' ] != 0 && $rep_events [ 'recur_enddate' ][ 'mday' ] != 0 && $rep_events [ 'recur_enddate' ][ 'year' ] != 0 )
2001-07-16 13:38:40 +02:00
{
2001-07-30 00:09:24 +02:00
$event_recur_time = $this -> maketime ( $rep_events [ 'recur_enddate' ]);
2001-07-16 13:38:40 +02:00
}
else
{
$event_recur_time = mktime ( 0 , 0 , 0 , 1 , 1 , 2030 );
}
$end_recur_date = date ( 'Ymd' , $event_recur_time );
$full_event_date = date ( 'Ymd' , $event_beg_day );
// only repeat after the beginning, and if there is an rpt_end before the end date
if (( $search_date_full > $end_recur_date ) || ( $search_date_full < $full_event_date ))
{
continue ;
}
if ( $search_date_full == $full_event_date )
{
$this -> sort_event ( $rep_events , $search_date_full );
continue ;
}
else
{
2001-07-30 00:09:24 +02:00
$freq = $rep_events [ 'recur_interval' ];
$type = $rep_events [ 'recur_type' ];
2001-07-16 13:38:40 +02:00
switch ( $type )
{
case MCAL_RECUR_DAILY :
if ( floor (( $search_beg_day - $event_beg_day ) / 86400 ) % $freq )
{
continue ;
}
else
{
$this -> sort_event ( $rep_events , $search_date_full );
}
break ;
case MCAL_RECUR_WEEKLY :
if ( floor (( $search_beg_day - $event_beg_day ) / 604800 ) % $freq )
{
continue ;
}
$check = 0 ;
switch ( $search_date_dow )
{
case 0 :
$check = MCAL_M_SUNDAY ;
break ;
case 1 :
$check = MCAL_M_MONDAY ;
break ;
case 2 :
$check = MCAL_M_TUESDAY ;
break ;
case 3 :
$check = MCAL_M_WEDNESDAY ;
break ;
case 4 :
$check = MCAL_M_THURSDAY ;
break ;
case 5 :
$check = MCAL_M_FRIDAY ;
break ;
case 6 :
$check = MCAL_M_SATURDAY ;
break ;
}
2001-07-30 00:09:24 +02:00
if ( $rep_events [ 'recur_data' ] & $check )
2001-07-16 13:38:40 +02:00
{
$this -> sort_event ( $rep_events , $search_date_full );
}
break ;
case MCAL_RECUR_MONTHLY_WDAY :
2001-07-30 00:09:24 +02:00
if ((( $search_date_year - $rep_events [ 'start' ][ 'year' ]) * 12 + $search_date_month - $rep_events [ 'start' ][ 'month' ]) % $freq )
2001-07-16 13:38:40 +02:00
{
continue ;
}
2001-07-30 00:09:24 +02:00
if (( $this -> datetime -> day_of_week ( $rep_events [ 'start' ][ 'year' ], $rep_events [ 'start' ][ 'month' ], $rep_events [ 'start' ][ 'mday' ]) == $this -> datetime -> day_of_week ( $search_date_year , $search_date_month , $search_date_day )) &&
( ceil ( $rep_events [ 'start' ][ 'mday' ] / 7 ) == ceil ( $search_date_day / 7 )))
2001-07-16 13:38:40 +02:00
{
$this -> sort_event ( $rep_events , $search_date_full );
}
break ;
case MCAL_RECUR_MONTHLY_MDAY :
2001-07-30 00:09:24 +02:00
if ((( $search_date_year - $rep_events [ 'start' ][ 'year' ]) * 12 + $search_date_month - $rep_events [ 'start' ][ 'month' ]) % $freq )
2001-07-16 13:38:40 +02:00
{
continue ;
}
2001-07-30 00:09:24 +02:00
if ( $search_date_day == $rep_events [ 'start' ][ 'mday' ])
2001-07-16 13:38:40 +02:00
{
$this -> sort_event ( $rep_events , $search_date_full );
}
break ;
case MCAL_RECUR_YEARLY :
2001-07-30 00:09:24 +02:00
if (( $search_date_year - $rep_events [ 'start' ][ 'year' ]) % $freq )
2001-07-16 13:38:40 +02:00
{
continue ;
}
if ( date ( 'dm' , $datetime ) == date ( 'dm' , $event_beg_day ))
{
$this -> sort_event ( $rep_events , $search_date_full );
}
break ;
}
}
} // end for loop
} // end function
2001-08-13 03:34:32 +02:00
function store_to_cache ( $params )
2001-07-16 13:38:40 +02:00
{
2001-08-13 03:34:32 +02:00
if ( ! is_array ( $params ))
{
return False ;
}
$syear = $params [ 'syear' ];
$smonth = $params [ 'smonth' ];
$sday = $params [ 'sday' ];
$eyear = ( isset ( $params [ 'eyear' ]) ? $params [ 'eyear' ] : 0 );
$emonth = ( isset ( $params [ 'emonth' ]) ? $params [ 'emonth' ] : 0 );
$eday = ( isset ( $params [ 'eday' ]) ? $params [ 'eday' ] : 0 );
2001-07-18 19:32:10 +02:00
if ( ! $eyear && ! $emonth && ! $eday )
{
$edate = mktime ( 23 , 59 , 59 , $smonth + 1 , $sday + 1 , $syear );
$eyear = date ( 'Y' , $edate );
$emonth = date ( 'm' , $edate );
$eday = date ( 'd' , $edate );
}
else
{
if ( ! $eyear )
{
$eyear = $syear ;
}
if ( ! $emonth )
{
$emonth = $smonth + 1 ;
2001-08-17 02:24:20 +02:00
if ( $emonth > 12 )
{
$emonth = 1 ;
$eyear ++ ;
}
2001-07-18 19:32:10 +02:00
}
if ( ! $eday )
{
$eday = $sday + 1 ;
}
$edate = mktime ( 23 , 59 , 59 , $emonth , $eday , $eyear );
}
2001-08-12 16:47:23 +02:00
if ( $this -> debug )
{
echo " Start Date : " . sprintf ( " %04d%02d%02d " , $syear , $smonth , $sday ) . " <br> \n " ;
echo " End Date : " . sprintf ( " %04d%02d%02d " , $eyear , $emonth , $eday ) . " <br> \n " ;
}
2001-07-16 13:38:40 +02:00
$cached_event_ids = $this -> so -> list_events ( $syear , $smonth , $sday , $eyear , $emonth , $eday );
$cached_event_ids_repeating = $this -> so -> list_repeated_events ( $syear , $smonth , $sday , $eyear , $emonth , $eday );
$c_cached_ids = count ( $cached_event_ids );
$c_cached_ids_repeating = count ( $cached_event_ids_repeating );
2001-07-22 01:35:22 +02:00
if ( $this -> debug )
{
echo " events cached : $c_cached_ids : for : " . sprintf ( " %04d%02d%02d " , $syear , $smonth , $sday ) . " <br> \n " ;
echo " repeating events cached : $c_cached_ids_repeating : for : " . sprintf ( " %04d%02d%02d " , $syear , $smonth , $sday ) . " <br> \n " ;
}
2001-07-16 13:38:40 +02:00
$this -> cached_events = Array ();
if ( $c_cached_ids == 0 && $c_cached_ids_repeating == 0 )
{
return ;
}
$this -> cached_events = Array ();
if ( $c_cached_ids )
{
for ( $i = 0 ; $i < $c_cached_ids ; $i ++ )
{
$event = $this -> so -> read_entry ( $cached_event_ids [ $i ]);
2001-08-06 04:41:36 +02:00
$startdate = intval ( date ( 'Ymd' , $this -> maketime ( $event [ 'start' ])));
2001-08-12 16:47:23 +02:00
$enddate = intval ( date ( 'Ymd' , $this -> maketime ( $event [ 'end' ])));
2001-08-06 04:41:36 +02:00
$this -> cached_events [ $startdate ][] = $event ;
2001-08-12 16:47:23 +02:00
if ( $startdate != $enddate )
{
2001-08-06 04:41:36 +02:00
$start [ 'year' ] = intval ( substr ( $startdate , 0 , 4 ));
$start [ 'month' ] = intval ( substr ( $startdate , 4 , 2 ));
2001-08-12 16:47:23 +02:00
$start [ 'mday' ] = intval ( substr ( $startdate , 6 , 2 ));
for ( $j = $startdate , $k = 0 ; $j <= $enddate ; $k ++ , $j = intval ( date ( 'Ymd' , mktime ( 0 , 0 , 0 , $start [ 'month' ], $start [ 'mday' ] + $k , $start [ 'year' ]))))
2001-08-06 04:41:36 +02:00
{
2001-08-12 16:47:23 +02:00
$c_evt_day = count ( $this -> cached_events [ $j ]) - 1 ;
2001-08-17 02:24:20 +02:00
if ( $c_evt_day < 0 )
2001-08-06 04:41:36 +02:00
{
2001-08-17 02:24:20 +02:00
$c_evt_day = 0 ;
2001-08-12 16:47:23 +02:00
}
2001-08-27 03:30:40 +02:00
if ( $this -> debug )
{
echo " Date: " . $j . " Count : " . $c_evt_day . " <br> \n " ;
}
2001-08-12 16:47:23 +02:00
if ( $this -> cached_events [ $j ][ $c_evt_day ][ 'id' ] != $event [ 'id' ])
{
2001-08-27 03:30:40 +02:00
if ( $this -> debug )
{
echo " Adding Event for Date: " . $j . " <br> \n " ;
}
2001-08-06 04:41:36 +02:00
$this -> cached_events [ $j ][] = $event ;
}
2001-08-12 16:47:23 +02:00
}
2001-07-16 13:38:40 +02:00
}
}
}
$this -> repeating_events = Array ();
if ( $c_cached_ids_repeating )
{
for ( $i = 0 ; $i < $c_cached_ids_repeating ; $i ++ )
{
$this -> repeating_events [ $i ] = $this -> so -> read_entry ( $cached_event_ids_repeating [ $i ]);
}
$edate -= $this -> datetime -> tz_offset ;
2001-08-12 16:47:23 +02:00
for ( $date = mktime ( 0 , 0 , 0 , $smonth , $sday , $syear ) - $this -> datetime -> tz_offset ; $date < $edate ; $date += 86400 )
2001-07-16 13:38:40 +02:00
{
$this -> check_repeating_events ( $date );
}
}
2001-08-17 02:24:20 +02:00
$retval = Array ();
2001-08-13 03:34:32 +02:00
for ( $j = date ( 'Ymd' , mktime ( 0 , 0 , 0 , $smonth , $sday , $syear )), $k = 0 ; $j <= date ( 'Ymd' , mktime ( 0 , 0 , 0 , $emonth , $eday , $eyear )); $k ++ , $j = date ( 'Ymd' , mktime ( 0 , 0 , 0 , $smonth , $sday + $k , $syear )))
{
2001-08-27 03:30:40 +02:00
if ( is_array ( $this -> cached_events [ $j ]))
{
$retval [ $j ] = $this -> cached_events [ $j ];
}
2001-08-13 03:34:32 +02:00
}
return $retval ;
// return $this->cached_events;
2001-07-16 13:38:40 +02:00
}
2001-07-18 19:32:10 +02:00
/* Begin Appsession Data */
function store_to_appsession ( $event )
{
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw' ] -> session -> appsession ( 'entry' , 'calendar' , $event );
2001-07-18 19:32:10 +02:00
}
function restore_from_appsession ()
{
$this -> event_init ();
2001-08-12 16:47:23 +02:00
$event = $GLOBALS [ 'phpgw' ] -> session -> appsession ( 'entry' , 'calendar' );
2001-07-18 19:32:10 +02:00
$this -> so -> cal -> event = $event ;
return $event ;
}
/* End Appsession Data */
/* Begin of SO functions */
function get_cached_event ()
{
return $this -> so -> get_cached_event ();
}
function add_attribute ( $var , $value )
{
$this -> so -> add_attribute ( $var , $value );
}
function event_init ()
{
$this -> so -> event_init ();
}
function set_start ( $year , $month , $day = 0 , $hour = 0 , $min = 0 , $sec = 0 )
{
$this -> so -> set_start ( $year , $month , $day , $hour , $min , $sec );
}
function set_end ( $year , $month , $day = 0 , $hour = 0 , $min = 0 , $sec = 0 )
{
$this -> so -> set_end ( $year , $month , $day , $hour , $min , $sec );
}
function set_title ( $title = '' )
{
$this -> so -> set_title ( $title );
}
function set_description ( $description = '' )
{
$this -> so -> set_description ( $description );
}
function set_class ( $class )
{
$this -> so -> set_class ( $class );
}
function set_category ( $category = '' )
{
$this -> so -> set_category ( $category );
}
function set_alarm ( $alarm )
{
$this -> so -> set_alarm ( $alarm );
}
function set_recur_none ()
{
$this -> so -> set_recur_none ();
}
function set_recur_daily ( $year , $month , $day , $interval )
{
$this -> so -> set_recur_daily ( $year , $month , $day , $interval );
}
function set_recur_weekly ( $year , $month , $day , $interval , $weekdays )
{
$this -> so -> set_recur_weekly ( $year , $month , $day , $interval , $weekdays );
}
function set_recur_monthly_mday ( $year , $month , $day , $interval )
{
$this -> so -> set_recur_monthly_mday ( $year , $month , $day , $interval );
}
function set_recur_monthly_wday ( $year , $month , $day , $interval )
{
$this -> so -> set_recur_monthly_wday ( $year , $month , $day , $interval );
}
function set_recur_yearly ( $year , $month , $day , $interval )
{
$this -> so -> set_recur_yearly ( $year , $month , $day , $interval );
}
/* End of SO functions */
2001-07-22 01:35:22 +02:00
function prepare_matrix ( $interval , $increment , $part , $status , $fulldate )
{
for ( $h = 0 ; $h < 24 ; $h ++ )
{
for ( $m = 0 ; $m < $interval ; $m ++ )
{
$index = (( $h * 10000 ) + (( $m * $increment ) * 100 ));
$time_slice [ $index ][ 'marker' ] = ' ' ;
$time_slice [ $index ][ 'description' ] = '' ;
}
}
for ( $k = 0 ; $k < count ( $this -> cached_events [ $fulldate ]); $k ++ )
{
$event = $this -> cached_events [ $fulldate ][ $k ];
$eventstart = $this -> datetime -> localdates ( $event -> datetime );
$eventend = $this -> datetime -> localdates ( $event -> edatetime );
$start = ( $eventstart [ 'hour' ] * 10000 ) + ( $eventstart [ 'minute' ] * 100 );
$starttemp = $this -> splittime ( " $start " , False );
$subminute = 0 ;
for ( $m = 0 ; $m < $interval ; $m ++ )
{
$minutes = $increment * $m ;
if ( intval ( $starttemp [ 'minute' ]) > $minutes && intval ( $starttemp [ 'minute' ]) < ( $minutes + $increment ))
{
$subminute = ( $starttemp [ 'minute' ] - $minutes ) * 100 ;
}
}
$start -= $subminute ;
$end = ( $eventend [ 'hour' ] * 10000 ) + ( $eventend [ 'minute' ] * 100 );
$endtemp = $this -> splittime ( " $end " , False );
$addminute = 0 ;
for ( $m = 0 ; $m < $interval ; $m ++ )
{
$minutes = ( $increment * $m );
if ( $endtemp [ 'minute' ] < ( $minutes + $increment ) && $endtemp [ 'minute' ] > $minutes )
{
$addminute = ( $minutes + $increment - $endtemp [ 'minute' ]) * 100 ;
}
}
$end += $addminute ;
$starttemp = $this -> splittime ( " $start " , False );
$endtemp = $this -> splittime ( " $end " , False );
// Do not display All-Day events in this free/busy time
if ((( $starttemp [ 'hour' ] == 0 ) && ( $starttemp [ 'minute' ] == 0 )) && (( $endtemp [ 'hour' ] == 23 ) && ( $endtemp [ 'minute' ] == 59 )))
{
}
else
{
for ( $h = $starttemp [ 'hour' ]; $h <= $endtemp [ 'hour' ]; $h ++ )
{
$startminute = 0 ;
$endminute = $interval ;
$hour = $h * 10000 ;
if ( $h == intval ( $starttemp [ 'hour' ]))
{
$startminute = ( $starttemp [ 'minute' ] / $increment );
}
if ( $h == intval ( $endtemp [ 'hour' ]))
{
$endminute = ( $endtemp [ 'minute' ] / $increment );
}
$private = $this -> is_private ( $event , $part );
2001-08-12 16:47:23 +02:00
$time_display = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $eventstart [ 'raw' ], $this -> users_timeformat ) . '-' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( $eventend [ 'raw' ], $this -> users_timeformat );
2001-07-30 00:09:24 +02:00
$time_description = '(' . $time_display . ') ' . $this -> get_short_field ( $event , $private , 'title' ) . $this -> display_status ( $event [ 'participants' ][ $part ]);
2001-07-22 01:35:22 +02:00
for ( $m = $startminute ; $m <= $endminute ; $m ++ )
{
$index = ( $hour + (( $m * $increment ) * 100 ));
$time_slice [ $index ][ 'marker' ] = '-' ;
$time_slice [ $index ][ 'description' ] = $time_description ;
}
}
}
}
return $time_slice ;
}
function set_status ( $cal_id , $status )
{
$old_event = $this -> so -> read_entry ( $cal_id );
switch ( $status )
{
case REJECTED :
2001-07-30 00:09:24 +02:00
$this -> send_update ( MSG_REJECTED , $old_event [ 'participants' ], $old_event );
2001-07-22 01:35:22 +02:00
$this -> so -> set_status ( $cal_id , $status );
break ;
case TENTATIVE :
2001-07-30 00:09:24 +02:00
$this -> send_update ( MSG_TENTATIVE , $old_event [ 'participants' ], $old_event );
2001-07-22 01:35:22 +02:00
$this -> so -> set_status ( $cal_id , $status );
break ;
case ACCEPTED :
2001-07-30 00:09:24 +02:00
$this -> send_update ( MSG_ACCEPTED , $old_event [ 'participants' ], $old_event );
2001-07-22 01:35:22 +02:00
$this -> so -> set_status ( $cal_id , $status );
break ;
}
return True ;
}
function send_update ( $msg_type , $participants , $old_event = False , $new_event = False )
{
2001-08-12 16:47:23 +02:00
$db = $GLOBALS [ 'phpgw' ] -> db ;
2001-07-22 01:35:22 +02:00
$db -> query ( " SELECT app_version FROM phpgw_applications WHERE app_name='calendar' " , __LINE__ , __FILE__ );
$db -> next_record ();
$version = $db -> f ( 'app_version' );
unset ( $db );
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ] = $GLOBALS [ 'phpgw' ] -> common -> create_emailpreferences ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ]);
$sender = $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'email' ][ 'address' ];
2001-07-22 01:35:22 +02:00
$temp_tz_offset = $this -> prefs [ 'common' ][ 'tz_offset' ];
$temp_timeformat = $this -> prefs [ 'common' ][ 'timeformat' ];
$temp_dateformat = $this -> prefs [ 'common' ][ 'dateformat' ];
$tz_offset = (( 60 * 60 ) * intval ( $temp_tz_offset ));
if ( $old_event != False )
{
2001-07-30 00:09:24 +02:00
$t_old_start_time = $this -> maketime ( $old_event [ 'start' ]);
2001-07-22 01:35:22 +02:00
if ( $t_old_start_time < ( time () - 86400 ))
{
return False ;
}
}
2001-08-12 16:47:23 +02:00
$temp_user = $GLOBALS [ 'phpgw_info' ][ 'user' ];
2001-07-22 01:35:22 +02:00
if ( $this -> owner != $temp_user [ 'account_id' ])
{
$user = $this -> owner ;
$accounts = CreateObject ( 'phpgwapi.accounts' , $user );
$phpgw_info [ 'user' ] = $accounts -> read_repository ();
$pref = CreateObject ( 'phpgwapi.preferences' , $user );
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ] = $pref -> read_repository ();
2001-07-22 01:35:22 +02:00
}
else
{
2001-08-12 16:47:23 +02:00
$user = $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ];
2001-07-22 01:35:22 +02:00
}
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ] = $GLOBALS [ 'phpgw' ] -> common -> create_emailpreferences ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ], $user );
2001-07-22 01:35:22 +02:00
switch ( $msg_type )
{
case MSG_DELETED :
$action = 'Deleted' ;
2001-07-30 00:09:24 +02:00
$event_id = $old_event [ 'id' ];
2001-07-22 01:35:22 +02:00
$msgtype = '"calendar";' ;
break ;
case MSG_MODIFIED :
$action = 'Modified' ;
2001-07-30 00:09:24 +02:00
$event_id = $old_event [ 'id' ];
2001-09-07 20:11:38 +02:00
$msgtype = '"calendar"; Version="' . $version . '"; Id="' . $new_event [ 'id' ] . '"' ;
2001-07-22 01:35:22 +02:00
break ;
case MSG_ADDED :
$action = 'Added' ;
2001-07-30 00:09:24 +02:00
$event_id = $new_event [ 'id' ];
2001-09-07 20:11:38 +02:00
$msgtype = '"calendar"; Version="' . $version . '"; Id="' . $new_event [ 'id' ] . '"' ;
2001-07-22 01:35:22 +02:00
break ;
case MSG_REJECTED :
$action = 'Rejected' ;
2001-07-30 00:09:24 +02:00
$event_id = $old_event [ 'id' ];
2001-07-22 01:35:22 +02:00
$msgtype = '"calendar";' ;
break ;
case MSG_TENTATIVE :
$action = 'Tentative' ;
2001-07-30 00:09:24 +02:00
$event_id = $old_event [ 'id' ];
2001-07-22 01:35:22 +02:00
$msgtype = '"calendar";' ;
break ;
case MSG_ACCEPTED :
2001-08-17 15:18:08 +02:00
$action = 'Accepted' ;
2001-07-30 00:09:24 +02:00
$event_id = $old_event [ 'id' ];
2001-07-22 01:35:22 +02:00
$msgtype = '"calendar";' ;
break ;
}
if ( $old_event != False )
{
$old_event_datetime = $t_old_start_time - $this -> datetime -> tz_offset ;
}
if ( $new_event != False )
{
2001-07-30 00:09:24 +02:00
$new_event_datetime = $this -> maketime ( $new_event [ 'start' ]) - $this -> datetime -> tz_offset ;
2001-07-22 01:35:22 +02:00
}
while ( list ( $userid , $statusid ) = each ( $participants ))
{
2001-08-26 05:08:31 +02:00
if (( intval ( $userid ) != $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ]) &&
(
(
( $msg_type == MSG_REJECTED || $msg_type == MSG_TENTATIVE || $msg_type == MSG_ACCEPTED ) &&
( $old_event [ 'owner' ] == $userid )
) ||
( $msg_type == MSG_DELETED || $msg_type == MSG_MODIFIED || $msg_type == MSG_ADDED )
)
)
2001-07-22 01:35:22 +02:00
{
2001-08-12 16:47:23 +02:00
if ( $this -> debug )
{
echo " Msg Type = " . $msg_type . " <br> \n " ;
echo " userid = " . $userid . " <br> \n " ;
}
2001-08-06 04:41:36 +02:00
if ( ! is_object ( $send ))
{
$send = CreateObject ( 'phpgwapi.send' );
}
2001-07-22 01:35:22 +02:00
$preferences = CreateObject ( 'phpgwapi.preferences' , intval ( $userid ));
$part_prefs = $preferences -> read_repository ();
if ( ! isset ( $part_prefs [ 'calendar' ][ 'send_updates' ]) || ! $part_prefs [ 'calendar' ][ 'send_updates' ])
{
continue ;
}
2001-08-12 16:47:23 +02:00
$part_prefs = $GLOBALS [ 'phpgw' ] -> common -> create_emailpreferences ( $part_prefs , intval ( $userid ));
2001-07-22 01:35:22 +02:00
$to = $part_prefs [ 'email' ][ 'address' ];
2001-08-12 16:47:23 +02:00
if ( $this -> debug )
{
echo " Email being sent to: " . $to . " <br> \n " ;
}
2001-07-22 01:35:22 +02:00
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'tz_offset' ] = $part_prefs [ 'common' ][ 'tz_offset' ];
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] = $part_prefs [ 'common' ][ 'timeformat' ];
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'dateformat' ] = $part_prefs [ 'common' ][ 'dateformat' ];
2001-07-22 01:35:22 +02:00
2001-08-12 16:47:23 +02:00
$new_tz_offset = (( 60 * 60 ) * intval ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'tz_offset' ]));
2001-07-22 01:35:22 +02:00
if ( $old_event != False )
{
2001-08-12 16:47:23 +02:00
$old_event_date = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $old_event_datetime );
2001-07-22 01:35:22 +02:00
}
if ( $new_event != False )
{
2001-08-12 16:47:23 +02:00
$new_event_date = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $new_event_datetime );
2001-07-22 01:35:22 +02:00
}
switch ( $msg_type )
{
case MSG_DELETED :
$action_date = $old_event_date ;
$body = 'Your meeting scehduled for ' . $old_event_date . ' has been canceled' ;
break ;
case MSG_MODIFIED :
$action_date = $new_event_date ;
$body = 'Your meeting that had been scheduled for ' . $old_event_date . ' has been rescheduled to ' . $new_event_date ;
break ;
case MSG_ADDED :
$action_date = $new_event_date ;
$body = 'You have a meeting scheduled for ' . $new_event_date ;
break ;
case MSG_REJECTED :
case MSG_TENTATIVE :
case MSG_ACCEPTED :
$action_date = $old_event_date ;
2001-08-30 05:12:38 +02:00
$body = 'On ' . $GLOBALS [ 'phpgw' ] -> common -> show_date ( time () - $new_tz_offset ) . ' ' . $GLOBALS [ 'phpgw' ] -> common -> grab_owner_name ( $GLOBALS [ 'phpgw_info' ][ 'user' ][ 'account_id' ]) . ' ' . $action . ' your meeting request for ' . $old_event_date ;
2001-07-22 01:35:22 +02:00
break ;
}
$subject = 'Calendar Event (' . $action . ') #' . $event_id . ': ' . $action_date . ' (L)' ;
$returncode = $send -> msg ( 'email' , $to , $subject , $body , $msgtype , '' , '' , '' , $sender );
}
}
unset ( $send );
if (( is_int ( $this -> user ) && $this -> user != $temp_user [ 'account_id' ]) ||
( is_string ( $this -> user ) && $this -> user != $temp_user [ 'account_lid' ]))
{
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ] = $temp_user ;
2001-07-22 01:35:22 +02:00
}
2001-08-12 16:47:23 +02:00
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'tz_offset' ] = $temp_tz_offset ;
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'timeformat' ] = $temp_timeformat ;
$GLOBALS [ 'phpgw_info' ][ 'user' ][ 'preferences' ][ 'common' ][ 'dateformat' ] = $temp_dateformat ;
2001-07-22 01:35:22 +02:00
}
2001-09-04 05:17:49 +02:00
function get_alarms ( $event_id )
{
return $this -> so -> get_alarm ( $event_id );
}
2001-09-08 10:48:38 +02:00
function alarm_today ( $event , $today , $starttime )
{
$found = False ;
@ reset ( $event [ 'alarm' ]);
$starttime_hi = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'Hi' );
$t_appt [ 'month' ] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $today , 'm' );
$t_appt [ 'mday' ] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $today , 'd' );
$t_appt [ 'year' ] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $today , 'Y' );
$t_appt [ 'hour' ] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'H' );
$t_appt [ 'min' ] = $GLOBALS [ 'phpgw' ] -> common -> show_date ( $starttime , 'i' );
$t_appt [ 'sec' ] = 0 ;
$t_time = $this -> maketime ( $t_appt ) - $this -> datetime -> tz_offset ;
$y_time = $t_time - 86400 ;
$tt_time = $t_time + 86399 ;
//echo 'T_TIME : '.$t_time."<br>\n";
//echo 'Y_TIME : '.$y_time."<br>\n";
//echo 'TT_TIME : '.$tt_time."<br>\n";
while ( list ( $key , $alarm ) = each ( $event [ 'alarm' ]))
{
//echo 'TIME : '.$alarm['time']."<br>\n";
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE ) /* Recurring Event */
{
if ( $alarm [ 'time' ] > $y_time && $GLOBALS [ 'phpgw' ] -> common -> show_date ( $alarm [ 'time' ], 'Hi' ) < $starttime_hi && $alarm [ 'time' ] < $t_time )
{
$found = True ;
}
}
elseif ( $GLOBALS [ 'phpgw' ] -> common -> show_date ( $alarm [ 'time' ], 'Hi' ) < $starttime_hi )
{
$found = True ;
}
}
return $found ;
}
2001-07-22 01:35:22 +02:00
function prepare_recipients ( & $new_event , $old_event )
{
// Find modified and deleted users.....
2001-07-30 00:09:24 +02:00
while ( list ( $old_userid , $old_status ) = each ( $old_event [ 'participants' ]))
2001-07-22 01:35:22 +02:00
{
2001-07-30 00:09:24 +02:00
if ( isset ( $new_event [ 'participants' ][ $old_userid ]))
2001-07-22 01:35:22 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $this -> debug )
{
echo " Modifying event for user " . $old_userid . " <br> \n " ;
}
2001-07-22 01:35:22 +02:00
$this -> modified [ intval ( $old_userid )] = $new_status ;
}
else
{
2001-07-28 15:17:30 +02:00
if ( $this -> debug )
{
echo " Deleting user " . $old_userid . " from the event<br> \n " ;
}
2001-07-22 01:35:22 +02:00
$this -> deleted [ intval ( $old_userid )] = $old_status ;
}
}
// Find new users.....
2001-07-30 00:09:24 +02:00
while ( list ( $new_userid , $new_status ) = each ( $new_event [ 'participants' ]))
2001-07-22 01:35:22 +02:00
{
2001-07-30 00:09:24 +02:00
if ( ! isset ( $old_event [ 'participants' ][ $new_userid ]))
2001-07-22 01:35:22 +02:00
{
2001-07-28 15:17:30 +02:00
if ( $this -> debug )
{
echo " Adding event for user " . $new_userid . " <br> \n " ;
}
2001-07-22 01:35:22 +02:00
$this -> added [ $new_userid ] = 'U' ;
2001-07-30 00:09:24 +02:00
$new_event [ 'participants' ][ $new_userid ] = 'U' ;
2001-07-22 01:35:22 +02:00
}
}
if ( count ( $this -> added ) > 0 || count ( $this -> modified ) > 0 || count ( $this -> deleted ) > 0 )
{
if ( count ( $this -> added ) > 0 )
{
$this -> send_update ( MSG_ADDED , $this -> added , '' , $new_event );
}
if ( count ( $this -> modified ) > 0 )
{
$this -> send_update ( MSG_MODIFIED , $this -> modified , $old_event , $new_event );
}
if ( count ( $this -> deleted ) > 0 )
{
$this -> send_update ( MSG_DELETED , $this -> deleted , $old_event );
}
}
}
2001-08-06 05:36:58 +02:00
function remove_doubles_in_cache ( $firstday , $lastday )
{
2001-08-17 02:24:20 +02:00
$already_moved = Array ();
for ( $v = $firstday ; $v <= $lastday ; $v ++ )
2001-08-06 05:36:58 +02:00
{
2001-08-17 02:24:20 +02:00
if ( ! $this -> cached_events [ $v ])
2001-08-06 05:36:58 +02:00
{
continue ;
}
2001-08-17 02:24:20 +02:00
while ( list ( $g , $event ) = each ( $this -> cached_events [ $v ]))
2001-08-06 05:36:58 +02:00
{
$start = sprintf ( '%04d%02d%02d' , $event [ 'start' ][ 'year' ], $event [ 'start' ][ 'month' ], $event [ 'start' ][ 'mday' ]);
if ( $this -> debug )
{
2001-08-17 02:24:20 +02:00
echo " <p>Event:<br> " ; print_r ( $event ); echo " </p> " ;
echo " <p>start=' $start ', v=' $v ' " ;
2001-08-06 05:36:58 +02:00
}
2001-08-17 02:24:20 +02:00
// if ($start != $v && $event['recur_type'] == MCAL_RECUR_NONE) // this is an enddate-entry --> remove it
2001-08-06 05:36:58 +02:00
if ( $start != $v ) // this is an enddate-entry --> remove it
{
unset ( $this -> cached_events [ $v ][ $g ]);
2001-08-17 02:24:20 +02:00
if ( $g != count ( $this -> cached_events [ $v ]))
{
for ( $h = $g + 1 ; $h < $c_daily ; $h ++ )
{
$this -> cached_events [ $v ][ $h - 1 ] = $this -> cached_events [ $v ][ $h ];
}
unset ( $this -> cached_events [ $v ][ $h ]);
}
// if ($start < $firstday && $event['recur_type'] == MCAL_RECUR_NONE) // start before period --> move it to the beginning
2001-08-06 05:36:58 +02:00
if ( $start < $firstday ) // start before period --> move it to the beginning
{
2001-08-17 02:24:20 +02:00
if ( $already_moved [ $event [ 'id' ]] > 0 )
2001-08-06 05:36:58 +02:00
{
2001-08-17 02:24:20 +02:00
continue ;
}
$add_event = True ;
$c_events = count ( $this -> cached_events [ $firstday ]);
for ( $i = 0 ; $i < $c_events ; $i ++ )
{
$add_event = ( $this -> cached_events [ $firstday ][ $i ][ 'id' ] == $event [ 'id' ] ? False : $add_event );
}
if ( $add_event )
{
$this -> cached_events [ $firstday ][] = $event ;
$already_moved [ $event [ 'id' ]] = 1 ;
if ( $this -> debug )
{
echo " moved</p> \n " ;
}
}
else
{
$already_moved [ $event [ 'id' ]] = 2 ;
if ( $this -> debug )
{
echo " removed (not moved)</p> \n " ;
}
2001-08-06 05:36:58 +02:00
}
}
elseif ( $this -> debug )
{
echo " removed</p> \n " ;
}
}
elseif ( $this -> debug )
{
echo " ok</p> \n " ;
}
}
2001-08-17 02:24:20 +02:00
flush ();
2001-08-06 05:36:58 +02:00
}
}
2001-07-16 13:38:40 +02:00
function _debug_array ( $data )
{
echo '<br>UI:' ;
_debug_array ( $data );
}
}
?>