2004-10-08 00:11:18 +02:00
< ? php
2007-03-09 12:39:47 +01:00
/**
2011-04-07 09:28:46 +02:00
* EGroupware - Calendar ' s forms of the UserInterface
2007-03-09 12:39:47 +01:00
*
* @ link http :// www . egroupware . org
* @ package calendar
* @ author Ralf Becker < RalfBecker - AT - outdoor - training . de >
2018-08-10 11:31:06 +02:00
* @ copyright ( c ) 2004 - 18 by RalfBecker - At - outdoor - training . de
2007-03-09 12:39:47 +01:00
* @ license http :// opensource . org / licenses / gpl - license . php GPL - GNU General Public License
*/
2004-10-08 00:11:18 +02:00
2016-05-01 19:47:59 +02:00
use EGroupware\Api ;
use EGroupware\Api\Link ;
use EGroupware\Api\Framework ;
use EGroupware\Api\Egw ;
use EGroupware\Api\Acl ;
use EGroupware\Api\Vfs ;
use EGroupware\Api\Etemplate ;
2004-10-08 00:11:18 +02:00
/**
2005-11-09 00:15:14 +01:00
* calendar UserInterface forms : view and edit events , freetime search
*
* The new UI , BO and SO classes have a strikt definition , in which time - zone they operate :
* UI only operates in user - time , so there have to be no conversation at all !!!
* BO ' s functions take and return user - time only ( ! ), they convert internaly everything to servertime , because
* SO operates only on server - time
*
* The state of the UI elements is managed in the uical class , which all UI classes extend .
*
* All permanent debug messages of the calendar - code should done via the debug - message method of the bocal class ! ! !
2004-10-08 00:11:18 +02:00
*/
2008-06-07 19:45:33 +02:00
class calendar_uiforms extends calendar_ui
2004-10-08 00:11:18 +02:00
{
var $public_functions = array (
'freetimesearch' => True ,
2019-01-10 00:48:04 +01:00
'ajax_add' => true ,
2019-06-17 18:24:36 +02:00
'ajax_conflicts' => true ,
2005-11-09 00:15:14 +01:00
'edit' => true ,
2010-02-05 04:34:17 +01:00
'process_edit' => true ,
2005-11-09 00:15:14 +01:00
'export' => true ,
'import' => true ,
2009-12-03 19:24:19 +01:00
'cat_acl' => true ,
2011-05-27 22:32:46 +02:00
'meeting' => true ,
2015-04-15 17:55:18 +02:00
'mail_import' => true ,
2021-02-09 21:42:51 +01:00
'notify' => true
2004-10-08 00:11:18 +02:00
);
2008-05-08 00:12:25 +02:00
2006-06-03 01:36:43 +02:00
/**
* Standard durations used in edit and freetime search
*
* @ var array
*/
var $durations = array ();
2008-05-08 00:12:25 +02:00
2008-01-15 09:21:25 +01:00
/**
2009-10-18 14:59:12 +02:00
* default locking time for entries , that are opened by another user
2008-01-15 09:21:25 +01:00
*
2009-10-18 14:59:12 +02:00
* @ var locktime in seconds
2008-01-15 09:21:25 +01:00
*/
var $locktime_default = 1 ;
2004-10-08 00:11:18 +02:00
/**
* Constructor
*/
2008-06-07 19:45:33 +02:00
function __construct ()
2004-10-08 00:11:18 +02:00
{
2008-06-07 19:45:33 +02:00
parent :: __construct ( true ); // call the parent's constructor
2008-05-08 00:12:25 +02:00
2012-12-03 19:05:04 +01:00
for ( $n = 15 ; $n <= 16 * 60 ; $n += ( $n < 60 ? 15 : ( $n < 240 ? 30 : ( $n < 600 ? 60 : 120 ))))
2006-06-03 01:36:43 +02:00
{
$this -> durations [ $n * 60 ] = sprintf ( '%d:%02d' , $n / 60 , $n % 60 );
}
2005-11-09 00:15:14 +01:00
}
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
/**
* Create a default event ( adding a new event ) by evaluating certain _GET vars
*
* @ return array event - array
2008-05-08 00:12:25 +02:00
*/
2005-11-09 00:15:14 +01:00
function & default_add_event ()
{
2016-10-04 09:54:21 +02:00
$extra_participants = $_GET [ 'participants' ] ?
2016-09-27 18:21:25 +02:00
( ! is_array ( $_GET [ 'participants' ]) ? explode ( ',' , $_GET [ 'participants' ]) : $_GET [ 'participants' ]) :
array ();
2005-11-23 15:21:20 +01:00
2014-09-03 18:22:05 +02:00
// if participant is a contact, add its link title as title
foreach ( $extra_participants as $uid )
{
if ( $uid [ 0 ] == 'c' )
{
2016-05-01 19:47:59 +02:00
$title = Link :: title ( 'addressbook' , substr ( $uid , 1 ));
2014-09-03 18:22:05 +02:00
break ;
}
}
2019-01-10 00:48:04 +01:00
if ( $_GET [ 'title' ])
{
$title = $_GET [ 'title' ];
}
2006-03-03 19:56:01 +01:00
if ( isset ( $_GET [ 'owner' ]))
{
$owner = $_GET [ 'owner' ];
2016-09-13 18:10:36 +02:00
if ( ! is_array ( $owner ) && strpos ( $owner , ',' ))
{
$owner = explode ( ',' , $owner );
}
2016-01-05 23:54:33 +01:00
if ( is_array ( $owner ))
{
2016-10-04 09:54:21 +02:00
// old behavior "selected" should also be used for not set preference, therefore we need to test for !== '0'
if ( $this -> cal_prefs [ 'default_participant' ] !== '0' || count ( $extra_participants ) === 0 && count ( $owner ) === 1 )
2016-09-12 20:00:49 +02:00
{
$extra_participants += $owner ;
}
2016-01-05 23:54:33 +01:00
$owner = count ( $owner ) > 1 ? $this -> user : $owner [ 0 ];
}
2016-04-28 01:06:51 +02:00
else if ( $owner )
2016-01-05 23:54:33 +01:00
{
$extra_participants [] = $owner ;
}
2006-03-03 19:56:01 +01:00
}
2015-12-17 01:02:38 +01:00
else
2006-03-03 19:56:01 +01:00
{
2016-10-04 09:54:21 +02:00
// old behavior "selected" should also be used for not set preference, therefore we need to test for === '0'
$owner = $this -> cal_prefs [ 'default_participant' ] === '0' ? $this -> user : $this -> owner ;
2006-03-03 19:56:01 +01:00
}
2008-11-12 10:22:45 +01:00
2008-05-08 00:12:25 +02:00
if ( ! $owner || ! is_numeric ( $owner ) || $GLOBALS [ 'egw' ] -> accounts -> get_type ( $owner ) != 'u' ||
2016-05-01 19:47:59 +02:00
! $this -> bo -> check_perms ( Acl :: ADD , 0 , $owner ))
2005-11-23 15:21:20 +01:00
{
if ( $owner ) // make an owner who is no user or we have no add-rights a participant
{
2015-11-23 19:01:21 +01:00
if ( ! is_array ( $owner ))
{
$owner = explode ( ',' , $owner );
}
2008-11-12 10:22:45 +01:00
// if we come from ressources we don't need any users selected in calendar
if ( ! isset ( $_GET [ 'participants' ]) || $_GET [ 'participants' ][ 0 ] != 'r' )
2008-10-25 08:43:15 +02:00
{
2015-11-23 19:01:21 +01:00
foreach ( $owner as $uid )
2008-11-12 10:22:45 +01:00
{
2016-06-21 19:17:06 +02:00
$extra_participants [] = $uid ;
2008-11-12 10:22:45 +01:00
}
2008-10-25 08:43:15 +02:00
}
2005-11-23 15:21:20 +01:00
}
$owner = $this -> user ;
}
2015-11-13 18:07:48 +01:00
//error_log("this->owner=$this->owner, _GET[owner]=$_GET[owner], user=$this->user => owner=$owner, extra_participants=".implode(',',$extra_participants).")");
2005-11-09 00:15:14 +01:00
2015-11-17 18:59:23 +01:00
if ( isset ( $_GET [ 'start' ]))
{
2016-05-01 19:47:59 +02:00
$start = Api\DateTime :: to ( $_GET [ 'start' ], 'ts' );
2015-11-17 18:59:23 +01:00
}
else
{
2019-01-14 19:07:34 +01:00
$ts = new Api\DateTime ();
$ts -> setUser ();
2015-11-17 18:59:23 +01:00
$start = $this -> bo -> date2ts ( array (
'full' => isset ( $_GET [ 'date' ]) && ( int ) $_GET [ 'date' ] ? ( int ) $_GET [ 'date' ] : $this -> date ,
2019-01-14 19:07:34 +01:00
'hour' => ( int ) ( isset ( $_GET [ 'hour' ]) ? $_GET [ 'hour' ] : ( $ts -> format ( 'H' ) + 1 )),
2015-11-17 18:59:23 +01:00
'minute' => ( int ) $_GET [ 'minute' ],
));
}
2005-11-09 00:15:14 +01:00
//echo "<p>_GET[date]=$_GET[date], _GET[hour]=$_GET[hour], _GET[minute]=$_GET[minute], this->date=$this->date ==> start=$start=".date('Y-m-d H:i',$start)."</p>\n";
2008-05-08 00:12:25 +02:00
2005-11-23 15:21:20 +01:00
$participant_types [ 'u' ] = $participant_types = $participants = array ();
foreach ( $extra_participants as $uid )
2005-11-09 00:15:14 +01:00
{
2005-11-23 15:21:20 +01:00
if ( isset ( $participants [ $uid ])) continue ; // already included
2009-11-19 19:56:04 +01:00
if ( ! $this -> bo -> check_acl_invite ( $uid )) continue ; // no right to invite --> ignored
2005-11-23 15:21:20 +01:00
if ( is_numeric ( $uid ))
2005-11-09 00:15:14 +01:00
{
2009-10-13 11:00:01 +02:00
$participants [ $uid ] = $participant_types [ 'u' ][ $uid ] =
2009-11-27 09:04:29 +01:00
calendar_so :: combine_status ( $uid == $this -> user ? 'A' : 'U' , 1 ,
2016-05-01 19:47:59 +02:00
( $uid == $this -> user || ( $uid == $owner && $this -> bo -> check_perms ( Acl :: ADD , 0 , $owner ))) ? 'CHAIR' : 'REQ-PARTICIPANT' );
2005-11-23 15:21:20 +01:00
}
2008-05-08 17:02:35 +02:00
elseif ( is_array ( $this -> bo -> resources [ $uid [ 0 ]]))
2005-11-23 15:21:20 +01:00
{
2016-07-12 19:22:25 +02:00
// Expand mailing lists
if ( $uid [ 0 ] == 'l' )
{
foreach ( $this -> bo -> enum_mailing_list ( $uid ) as $contact )
{
$participants [ $contact ] = $participant_types [ 'c' ][ substr ( $contact , 1 )] =
calendar_so :: combine_status ( 'U' , 1 , 'REQ-PARTICIPANT' );
}
continue ;
}
2011-02-15 12:34:36 +01:00
// if contact is a user, use the user instead (as the GUI)
if ( $uid [ 0 ] == 'c' && ( $account_id = $GLOBALS [ 'egw' ] -> accounts -> name2id ( substr ( $uid , 1 ), 'person_id' )))
{
$uid = $account_id ;
$participants [ $uid ] = $participant_types [ 'u' ][ $uid ] =
calendar_so :: combine_status ( $uid == $this -> user ? 'A' : 'U' , 1 ,
2016-05-01 19:47:59 +02:00
( $uid == $this -> user || ( $uid == $owner && $this -> bo -> check_perms ( Acl :: ADD , 0 , $owner ))) ? 'CHAIR' : 'REQ-PARTICIPANT' );
2011-02-15 12:34:36 +01:00
continue ;
}
2008-05-08 17:02:35 +02:00
$res_data = $this -> bo -> resources [ $uid [ 0 ]];
2005-11-23 15:21:20 +01:00
list ( $id , $quantity ) = explode ( ':' , substr ( $uid , 1 ));
2009-10-12 21:16:42 +02:00
if (( $status = $res_data [ 'new_status' ] ? ExecMethod ( $res_data [ 'new_status' ], $id ) : 'U' ))
2005-11-09 00:15:14 +01:00
{
2009-10-13 11:00:01 +02:00
$participants [ $uid ] = $participant_types [ $uid [ 0 ]][ $id ] =
calendar_so :: combine_status ( $status , $quantity , 'REQ-PARTICIPANT' );
2005-11-09 00:15:14 +01:00
}
}
}
2009-11-19 19:56:04 +01:00
if ( ! $participants ) // if all participants got removed, include current user
{
2016-01-05 23:54:33 +01:00
$participants [ $this -> user ] = $participant_types [ 'u' ][ $this -> user ] = calendar_so :: combine_status ( 'A' , 1 , 'CHAIR' );
}
2015-11-05 21:56:13 +01:00
if ( isset ( $_GET [ 'cat_id' ]))
{
$cat_id = explode ( ',' , $_GET [ 'cat_id' ]);
foreach ( $cat_id as & $cat )
{
$cat = ( int ) $cat ;
}
}
2018-12-13 22:35:26 +01:00
else
{
$cat_id = $this -> cal_prefs [ 'default_category' ];
}
2018-05-23 18:58:19 +02:00
$duration = isset ( $_GET [ 'duration' ]) ? ( int ) $_GET [ 'duration' ] : ( int ) $this -> bo -> cal_prefs [ 'defaultlength' ] * 60 ;
if ( isset ( $_GET [ 'end' ]))
{
$end = Api\DateTime :: to ( $_GET [ 'end' ], 'ts' );
$duration = $end - $start ;
}
else
{
$end = $start + $duration ;
}
$whole_day = ( $duration + 60 == DAY_s );
2014-06-06 13:59:20 +02:00
$alarms = array ();
2018-05-23 18:58:19 +02:00
$alarm_pref = $whole_day ? 'default-alarm-wholeday' : 'default-alarm' ;
2014-06-06 13:59:20 +02:00
// if default alarm set in prefs --> add it
// we assume here that user does NOT have a whole-day but no regular default-alarm, no whole-day!
2018-05-23 18:58:19 +02:00
if (( string ) $this -> cal_prefs [ $alarm_pref ] !== '' )
2014-06-06 13:59:20 +02:00
{
2018-05-23 18:58:19 +02:00
$offset = 60 * $this -> cal_prefs [ $alarm_pref ];
2014-06-06 13:59:20 +02:00
$alarms [ 1 ] = array (
'default' => 1 ,
2020-04-07 11:10:49 +02:00
'offset' => $offset ,
2014-06-06 13:59:20 +02:00
'time' => $start - $offset ,
'all' => false ,
'owner' => $owner ,
'id' => 1 ,
);
}
2020-04-07 11:10:49 +02:00
// add automatic alarm 5min before videoconference for all participants
if ( ! empty ( $_GET [ 'videoconference' ]))
{
2020-04-07 16:16:31 +02:00
$offset = 5 * 60 ;
2020-04-07 11:10:49 +02:00
$alarms [ 1 + count ( $alarms )] = array (
'offset' => $offset ,
'time' => $start - $offset ,
'all' => true ,
'owner' => $owner ,
'id' => 2 ,
);
}
2018-05-23 18:58:19 +02:00
2005-11-09 00:15:14 +01:00
return array (
'participant_types' => $participant_types ,
'participants' => $participants ,
'owner' => $owner ,
'start' => $start ,
2016-06-30 21:21:13 +02:00
'end' => $end ,
2009-11-04 08:56:00 +01:00
'tzid' => $this -> bo -> common_prefs [ 'tz' ],
2005-11-09 00:15:14 +01:00
'priority' => 2 , // normal
'public' => $this -> cal_prefs [ 'default_private' ] ? 0 : 1 ,
2014-06-06 13:59:20 +02:00
'alarm' => $alarms ,
2014-05-23 10:16:22 +02:00
'recur_exception' => array (),
2014-09-03 18:22:05 +02:00
'title' => $title ? $title : '' ,
2015-11-05 21:56:13 +01:00
'category' => $cat_id ,
2020-04-07 16:16:31 +02:00
'videoconference' => ! empty ( $_GET [ 'videoconference' ]),
2020-04-03 10:28:34 +02:00
'##notify_externals' => ! empty ( $_GET [ 'videoconference' ]) ? 'yes' : $this -> cal_prefs [ 'notify_externals' ],
2005-11-09 00:15:14 +01:00
);
}
2014-06-06 13:59:20 +02:00
2005-11-09 00:15:14 +01:00
/**
* Process the edited event and evtl . call edit to redisplay it
*
* @ param array $content posted eTemplate content
2010-11-11 14:29:37 +01:00
* @ ToDo add conflict check / available quantity of resources when adding participants
2005-11-09 00:15:14 +01:00
*/
function process_edit ( $content )
{
2010-02-05 04:34:17 +01:00
if ( ! is_array ( $content )) // redirect from etemplate, if POST empty
{
return $this -> edit ( null , null , strip_tags ( $_GET [ 'msg' ]));
}
2014-06-05 13:03:12 +02:00
// clear notification errors
notifications :: errors ( true );
2010-05-12 13:15:45 +02:00
$messages = null ;
$msg_permission_denied_added = false ;
2016-05-01 11:57:48 +02:00
2015-11-13 21:22:58 +01:00
// We'd like to just refresh the data as that's the fastest, but some changes
// affect more than just one event widget, so require a full refresh.
// $update_type is one of the update types
// (add, edit, update, delete)
2015-12-07 17:11:44 +01:00
$update_type = $content [ 'id' ] ? ( $content [ 'recur_type' ] == MCAL_RECUR_NONE ? 'update' : 'edit' ) : 'add' ;
2015-11-13 21:22:58 +01:00
2019-02-12 22:13:45 +01:00
$button = @ key ( $content [ 'button' ]);
2006-12-22 20:51:56 +01:00
if ( ! $button && $content [ 'action' ]) $button = $content [ 'action' ]; // action selectbox
unset ( $content [ 'button' ]); unset ( $content [ 'action' ]);
2005-11-09 00:15:14 +01:00
2006-12-22 20:51:56 +01:00
$view = $content [ 'view' ];
if ( $button == 'ical' )
2005-11-09 00:15:14 +01:00
{
$msg = $this -> export ( $content [ 'id' ], true );
}
// delete a recur-exception
if ( $content [ 'recur_exception' ][ 'delete_exception' ])
{
2018-12-18 18:20:23 +01:00
$date = key ( $content [ 'recur_exception' ][ 'delete_exception' ]);
2015-02-06 10:47:50 +01:00
// eT2 converts time to
2016-05-01 19:47:59 +02:00
if ( ! is_numeric ( $date )) $date = Api\DateTime :: to ( str_replace ( 'Z' , '' , $date ), 'ts' );
2005-11-09 00:15:14 +01:00
unset ( $content [ 'recur_exception' ][ 'delete_exception' ]);
if (( $key = array_search ( $date , $content [ 'recur_exception' ])) !== false )
{
2010-05-19 19:41:46 +02:00
// propagate the exception to a single event
$recur_exceptions = $this -> bo -> so -> get_related ( $content [ 'uid' ]);
foreach ( $recur_exceptions as $id )
{
if ( ! ( $exception = $this -> bo -> read ( $id )) ||
$exception [ 'recurrence' ] != $content [ 'recur_exception' ][ $key ]) continue ;
2016-05-01 19:47:59 +02:00
$exception [ 'uid' ] = Api\CalDAV :: generate_uid ( 'calendar' , $id );
2010-05-19 19:41:46 +02:00
$exception [ 'reference' ] = $exception [ 'recurrence' ] = 0 ;
2014-05-27 17:02:56 +02:00
$this -> bo -> update ( $exception , true , true , false , true , $messages , $content [ 'no_notifications' ]);
2010-05-19 19:41:46 +02:00
break ;
}
2005-11-09 00:15:14 +01:00
unset ( $content [ 'recur_exception' ][ $key ]);
$content [ 'recur_exception' ] = array_values ( $content [ 'recur_exception' ]);
}
2015-11-13 21:22:58 +01:00
$update_type = 'edit' ;
2005-11-09 00:15:14 +01:00
}
// delete an alarm
if ( $content [ 'alarm' ][ 'delete_alarm' ])
{
2018-12-18 18:20:23 +01:00
$id = key ( $content [ 'alarm' ][ 'delete_alarm' ]);
2005-11-09 00:15:14 +01:00
//echo "delete alarm $id"; _debug_array($content['alarm']['delete_alarm']);
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
if ( $content [ 'id' ])
{
if ( $this -> bo -> delete_alarm ( $id ))
{
$msg = lang ( 'Alarm deleted' );
unset ( $content [ 'alarm' ][ $id ]);
}
else
{
2008-05-08 00:12:25 +02:00
$msg = lang ( 'Permission denied' );
2005-11-09 00:15:14 +01:00
}
}
else
{
unset ( $content [ 'alarm' ][ $id ]);
}
}
2020-10-06 21:55:06 +02:00
if ( $content [ 'end' ] && $content [ 'start' ] >= $content [ 'end' ])
{
unset ( $content [ 'end' ]);
$content [ 'duration' ] = $this -> bo -> cal_prefs [ 'defaultlength' ] * 60 ;
}
2006-06-03 01:36:43 +02:00
if ( $content [ 'duration' ])
{
$content [ 'end' ] = $content [ 'start' ] + $content [ 'duration' ];
}
2014-06-06 13:59:20 +02:00
// fix default alarm for a new (whole day) event, to be according to default-alarm(-wholeday) pref
if ( $content [ 'alarm' ][ 1 ][ 'default' ])
2014-06-05 18:07:59 +02:00
{
2014-06-06 13:59:20 +02:00
$def_alarm = $this -> cal_prefs [ 'default-alarm' . ( $content [ 'whole_day' ] ? '-wholeday' : '' )];
if (( string ) $def_alarm === '' )
{
unset ( $content [ 'alarm' ][ 1 ]); // '' = no alarm on whole day --> delete it
}
else
{
$content [ 'alarm' ][ 1 ][ 'offset' ] = $offset = 60 * $def_alarm ;
2018-03-09 23:38:47 +01:00
$content [ 'start' ] = $this -> bo -> date2array ( $content [ 'start' ]);
2018-05-15 17:47:10 +02:00
$content [ 'start' ][ 1 ][ 'time' ] = $this -> bo -> date2ts ( $content [ 'start' ]) - $offset ;
2018-03-09 23:38:47 +01:00
$content [ 'start' ] = $this -> bo -> date2ts ( $content [ 'start' ]);
2014-06-06 13:59:20 +02:00
}
2014-06-05 18:07:59 +02:00
}
2018-05-23 18:58:19 +02:00
else if ( $content [ 'cal_id' ] && count ( $content [ 'alarm' ]) > 0 && current ( $content [ 'alarm' ])[ 'default' ] &&
// Existing event, check for change from/to whole day
( $old = $this -> bo -> read ( $content [ 'cal_id' ])) && $old [ 'whole_day' ] !== $content [ 'whole_day' ] &&
( $def_alarm = $this -> cal_prefs [ 'default-alarm' . ( $content [ 'whole_day' ] ? '-wholeday' : '' )])
)
{
// Reset default alarm
$old_default = array_shift ( $content [ 'alarm' ]);
$this -> bo -> delete_alarm ( $old_default [ 'id' ]);
$offset = 60 * $def_alarm ;
array_unshift ( $content [ 'alarm' ], array (
'default' => 1 ,
'offset' => $offset ,
'time' => $content [ 'start' ] - $offset ,
'all' => false ,
2018-06-27 09:42:16 +02:00
'owner' => 0 ,
2018-05-23 18:58:19 +02:00
'id' => 1
));
}
2014-06-06 13:59:20 +02:00
2005-11-09 00:15:14 +01:00
$event = $content ;
unset ( $event [ 'new_alarm' ]);
unset ( $event [ 'alarm' ][ 'delete_alarm' ]);
2006-09-28 06:32:38 +02:00
unset ( $event [ 'duration' ]);
2005-11-09 00:15:14 +01:00
2013-02-21 17:29:13 +01:00
if ( in_array ( $button , array ( 'ignore' , 'freetime' , 'reedit' , 'confirm_edit_series' )))
2006-03-07 21:30:29 +01:00
{
// no conversation necessary, event is already in the right format
}
2010-06-16 12:41:45 +02:00
else
2005-11-09 00:15:14 +01:00
{
2010-06-16 12:41:45 +02:00
// convert content => event
2005-11-09 00:15:14 +01:00
if ( $content [ 'whole_day' ])
{
$event [ 'start' ] = $this -> bo -> date2array ( $event [ 'start' ]);
$event [ 'start' ][ 'hour' ] = $event [ 'start' ][ 'minute' ] = 0 ; unset ( $event [ 'start' ][ 'raw' ]);
$event [ 'start' ] = $this -> bo -> date2ts ( $event [ 'start' ]);
$event [ 'end' ] = $this -> bo -> date2array ( $event [ 'end' ]);
$event [ 'end' ][ 'hour' ] = 23 ; $event [ 'end' ][ 'minute' ] = $event [ 'end' ][ 'second' ] = 59 ; unset ( $event [ 'end' ][ 'raw' ]);
$event [ 'end' ] = $this -> bo -> date2ts ( $event [ 'end' ]);
}
2010-02-24 16:05:00 +01:00
// some checks for recurrences, if you give a date, make it a weekly repeating event and visa versa
2005-11-09 00:15:14 +01:00
if ( $event [ 'recur_type' ] == MCAL_RECUR_NONE && $event [ 'recur_data' ]) $event [ 'recur_type' ] = MCAL_RECUR_WEEKLY ;
if ( $event [ 'recur_type' ] == MCAL_RECUR_WEEKLY && ! $event [ 'recur_data' ])
{
$event [ 'recur_data' ] = 1 << ( int ) date ( 'w' , $event [ 'start' ]);
}
2015-11-23 20:23:39 +01:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && ! isset ( $event [ 'recur_enddate' ]))
{
// No recur end date, make sure it's set to something or it won't be changed
$event [ 'recur_enddate' ] = 0 ;
}
2010-11-11 14:29:37 +01:00
if ( isset ( $content [ 'participants' ]))
2005-11-09 00:15:14 +01:00
{
2010-11-11 14:29:37 +01:00
2010-06-16 12:41:45 +02:00
$event [ 'participants' ] = $event [ 'participant_types' ] = array ();
2010-11-11 14:29:37 +01:00
2010-06-16 12:41:45 +02:00
foreach ( $content [ 'participants' ] as $key => $data )
2005-11-09 00:15:14 +01:00
{
2010-06-16 12:41:45 +02:00
switch ( $key )
{
case 'delete' : // handled in default
case 'quantity' : // handled in new_resource
case 'role' : // handled in add, account or resource
case 'cal_resources' :
case 'status_date' :
break ;
2020-04-03 10:28:34 +02:00
case 'notify_externals' :
$event [ '##notify_externals' ] = $data ;
break ;
2016-02-18 21:54:26 +01:00
case 'participant' :
foreach ( $data as $participant )
2016-07-25 23:06:20 +02:00
{
if ( is_null ( $participant ))
{
continue ;
}
2016-07-26 09:03:02 +02:00
2016-07-25 23:06:20 +02:00
// email or rfc822 addresse (eg. "Ralf Becker <ralf@domain.com>")
2016-02-18 21:54:26 +01:00
$email = array ();
2021-02-17 17:40:21 +01:00
if ( preg_match ( '/^(.*<)?([a-z0-9_.+#$%&-]+@[a-z0-9_.-]{5,})>?$/i' , $participant , $email ))
2010-06-16 12:41:45 +02:00
{
2016-02-18 21:54:26 +01:00
$status = calendar_so :: combine_status ( 'U' , $content [ 'participants' ][ 'quantity' ], $content [ 'participants' ][ 'role' ]);
if (( $data = $GLOBALS [ 'egw' ] -> accounts -> name2id ( $email [ 2 ], 'account_email' )) && $this -> bo -> check_acl_invite ( $data ))
{
$event [ 'participants' ][ $data ] = $event [ 'participant_types' ][ 'u' ][ $data ] = $status ;
}
elseif (( list ( $data ) = ExecMethod2 ( 'addressbook.addressbook_bo.search' , array (
'email' => $email [ 2 ],
'email_home' => $email [ 2 ],
), true , '' , '' , '' , false , 'OR' )))
{
$event [ 'participants' ][ 'c' . $data [ 'id' ]] = $event [ 'participant_types' ][ 'c' ][ $data [ 'id' ]] = $status ;
}
else
{
$event [ 'participants' ][ 'e' . $participant ] = $event [ 'participant_types' ][ 'e' ][ $participant ] = $status ;
}
2010-06-16 12:41:45 +02:00
}
else
{
2016-02-18 21:54:26 +01:00
if ( is_numeric ( $participant ))
{
2016-10-17 19:23:27 +02:00
$uid = $participant ;
2016-02-18 21:54:26 +01:00
$id = $participant ;
$resource = $this -> bo -> resources [ '' ];
}
else
{
$uid = $participant ;
$id = substr ( $participant , 1 );
$resource = $this -> bo -> resources [ $participant [ 0 ]];
}
if ( ! $this -> bo -> check_acl_invite ( $uid ))
{
if ( ! $msg_permission_denied_added )
{
$msg .= lang ( 'Permission denied!' );
$msg_permission_denied_added = true ;
}
continue ;
}
$type = $resource [ 'type' ];
$status = isset ( $this -> bo -> resources [ $type ][ 'new_status' ]) ?
ExecMethod ( $this -> bo -> resources [ $type ][ 'new_status' ], $id ) :
( $uid == $this -> bo -> user ? 'A' : 'U' );
2010-11-11 14:29:37 +01:00
2016-07-12 19:22:25 +02:00
// Expand mailing lists
if ( $type == 'l' )
{
2017-08-01 17:02:09 +02:00
// Ignore ACL here, allow inviting anyone in the list
foreach ( $this -> bo -> enum_mailing_list ( $participant , true ) as $contact )
2016-07-12 19:22:25 +02:00
{
2016-09-01 17:26:56 +02:00
// Mailing lists can contain users, so allow for that possibility
$_type = is_numeric ( $contact ) ? '' : $contact [ 0 ];
$_uid = is_numeric ( $contact ) ? $contact : substr ( $contact , 1 );
$event [ 'participants' ][ $contact ] = $event [ 'participant_types' ][ $_type ][ $_uid ] =
2016-07-12 19:22:25 +02:00
calendar_so :: combine_status ( $status , $content [ 'participants' ][ 'quantity' ], $content [ 'participants' ][ 'role' ]);
}
continue ;
}
2010-06-16 12:41:45 +02:00
if ( $status )
{
2010-11-11 14:29:37 +01:00
$res_info = $this -> bo -> resource_info ( $uid );
// todo check real availability = maximum - already booked quantity
if ( isset ( $res_info [ 'useable' ]) && $content [ 'participants' ][ 'quantity' ] > $res_info [ 'useable' ])
{
$msg .= lang ( 'Maximum available quantity of %1 exceeded!' , $res_info [ 'useable' ]);
foreach ( array ( 'quantity' , 'resource' , 'role' ) as $n )
{
$event [ 'participants' ][ $n ] = $content [ 'participants' ][ $n ];
}
2016-02-18 21:54:26 +01:00
continue ;
2010-11-11 14:29:37 +01:00
}
else
{
$event [ 'participants' ][ $uid ] = $event [ 'participant_types' ][ $type ][ $id ] =
calendar_so :: combine_status ( $status , $content [ 'participants' ][ 'quantity' ], $content [ 'participants' ][ 'role' ]);
}
2010-06-16 12:41:45 +02:00
}
2009-10-12 21:16:42 +02:00
}
2009-07-02 13:26:52 +02:00
}
2016-02-18 21:54:26 +01:00
break ;
case 'add' :
if ( ! $content [ 'participants' ][ 'participant' ])
2010-06-16 12:41:45 +02:00
{
2016-02-18 21:54:26 +01:00
$msg = lang ( 'You need to select an account, contact or resource first!' );
2010-06-16 12:41:45 +02:00
}
break ;
2010-11-11 14:29:37 +01:00
2010-06-16 12:41:45 +02:00
default : // existing participant row
2020-04-03 10:28:34 +02:00
if ( ! is_array ( $data )) continue 2 ; // widgets in participant tab, above participant list
2018-07-19 21:38:24 +02:00
$quantity = $status = $role = null ;
2010-06-16 12:41:45 +02:00
foreach ( array ( 'uid' , 'status' , 'quantity' , 'role' ) as $name )
{
2010-11-11 14:29:37 +01:00
$$name = $data [ $name ];
2010-06-16 12:41:45 +02:00
}
2010-11-11 14:29:37 +01:00
if ( $content [ 'participants' ][ 'delete' ][ $uid ] || $content [ 'participants' ][ 'delete' ][ md5 ( $uid )])
2005-11-09 00:15:14 +01:00
{
2010-11-11 14:29:37 +01:00
$uid = false ; // entry has been deleted
2006-12-22 20:51:56 +01:00
}
2011-06-21 08:46:51 +02:00
elseif ( $uid )
2006-12-22 20:51:56 +01:00
{
2010-11-11 14:29:37 +01:00
if ( is_numeric ( $uid ))
2006-12-22 20:51:56 +01:00
{
2010-11-11 14:29:37 +01:00
$id = $uid ;
$type = 'u' ;
}
else
{
$id = substr ( $uid , 1 );
$type = $uid [ 0 ];
}
if ( $data [ 'old_status' ] != $status && ! ( ! $data [ 'old_status' ] && $status == 'G' ))
{
//echo "<p>$uid: status changed '$data[old_status]' --> '$status<'/p>\n";
$new_status = calendar_so :: combine_status ( $status , $quantity , $role );
2011-03-09 18:26:20 +01:00
if ( $this -> bo -> set_status ( $event [ 'id' ], $uid , $new_status , isset ( $content [ 'edit_single' ]) ? $content [ 'participants' ][ 'status_date' ] : 0 , false , true , $content [ 'no_notifications' ]))
2009-08-17 16:38:18 +02:00
{
2016-06-16 18:28:56 +02:00
// Update main window
2016-10-19 15:24:50 +02:00
$d = new Api\DateTime ( $content [ 'edit_single' ], Api\DateTime :: $user_timezone );
2016-09-05 18:18:14 +02:00
$client_updated = $this -> update_client ( $event [ 'id' ], $d );
2016-07-26 09:03:02 +02:00
2010-11-11 14:29:37 +01:00
// refreshing the calendar-view with the changed participant-status
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE )
2009-08-17 22:05:46 +02:00
{
2010-11-11 14:29:37 +01:00
$msg = lang ( 'Status for all future scheduled days changed' );
2009-08-17 22:05:46 +02:00
}
else
{
2010-11-11 14:29:37 +01:00
if ( isset ( $content [ 'edit_single' ]))
{
$msg = lang ( 'Status for this particular day changed' );
// prevent accidentally creating a real exception afterwards
$view = true ;
$hide_delete = true ;
}
else
{
$msg = lang ( 'Status changed' );
2014-11-28 10:48:57 +01:00
//Refresh the event in the main window after changing status
2016-06-16 18:28:56 +02:00
Framework :: refresh_opener ( $msg , 'calendar' , $event [ 'id' ], $client_updated ? 'update' : 'delete' );
2010-11-11 14:29:37 +01:00
}
}
if ( ! $content [ 'no_popup' ])
{
2013-10-31 15:51:19 +01:00
//we are handling refreshing for status changes on client side
2009-08-17 22:05:46 +02:00
}
2013-08-15 16:56:34 +02:00
if ( $status == 'R' && $event [ 'alarm' ])
{
// remove from bo->set_status deleted alarms of rejected users from UI too
foreach ( $event [ 'alarm' ] as $alarm_id => $alarm )
{
if (( string ) $alarm [ 'owner' ] === ( string ) $uid )
{
unset ( $event [ 'alarm' ][ $alarm_id ]);
}
}
}
2006-12-22 20:51:56 +01:00
}
}
2010-11-11 14:29:37 +01:00
if ( $uid && $status != 'G' )
{
$event [ 'participants' ][ $uid ] = $event [ 'participant_types' ][ $type ][ $id ] =
calendar_so :: combine_status ( $status , $quantity , $role );
}
2005-11-09 00:15:14 +01:00
}
2010-11-11 14:29:37 +01:00
break ;
2010-06-16 12:41:45 +02:00
}
2005-11-09 00:15:14 +01:00
}
}
}
$preserv = array (
2009-08-17 22:05:46 +02:00
'view' => $view ,
'hide_delete' => $hide_delete ,
'edit_single' => $content [ 'edit_single' ],
'reference' => $content [ 'reference' ],
'recurrence' => $content [ 'recurrence' ],
'actual_date' => $content [ 'actual_date' ],
'no_popup' => $content [ 'no_popup' ],
2010-08-16 09:13:47 +02:00
'tabs' => $content [ 'tabs' ],
2009-11-25 21:16:41 +01:00
'template' => $content [ 'template' ],
2005-11-09 00:15:14 +01:00
);
2008-01-15 09:21:25 +01:00
$noerror = true ;
2010-11-11 14:29:37 +01:00
2010-06-08 11:52:48 +02:00
//error_log(__METHOD__.$button.'#'.array2string($content['edit_single']).'#');
2010-11-11 14:29:37 +01:00
2014-01-23 18:15:49 +01:00
$ignore_conflicts = $status_reset_to_unknown = false ;
2010-11-11 14:29:37 +01:00
2010-06-09 20:00:11 +02:00
switch (( string ) $button )
{
case 'ignore' :
$ignore_conflicts = true ;
$button = $event [ 'button_was' ]; // save or apply
unset ( $event [ 'button_was' ]);
break ;
2014-01-30 11:12:08 +01:00
2010-06-09 20:00:11 +02:00
}
2010-11-11 14:29:37 +01:00
2006-12-22 20:51:56 +01:00
switch (( string ) $button )
2005-11-09 00:15:14 +01:00
{
2005-11-23 22:39:37 +01:00
case 'exception' : // create an exception in a recuring event
2008-02-07 03:38:55 +01:00
$msg = $this -> _create_exception ( $event , $preserv );
2005-11-23 22:39:37 +01:00
break ;
2018-12-13 22:35:26 +01:00
case 'edit' :
// Going from add dialog to full edit dialog
unset ( $preserv [ 'template' ]);
unset ( $event [ 'template' ]);
break ;
2005-11-23 22:39:37 +01:00
2005-11-09 00:15:14 +01:00
case 'copy' : // create new event with copied content, some content need to be unset to make a "new" event
unset ( $event [ 'id' ]);
unset ( $event [ 'uid' ]);
unset ( $event [ 'reference' ]);
2015-07-16 13:18:54 +02:00
unset ( $preserv [ 'reference' ]);
2009-07-23 18:14:22 +02:00
unset ( $event [ 'recurrence' ]);
2015-07-16 13:18:54 +02:00
unset ( $preserv [ 'recurrence' ]);
2005-11-09 00:15:14 +01:00
unset ( $event [ 'recur_exception' ]);
unset ( $event [ 'edit_single' ]); // in case it has been set
unset ( $event [ 'modified' ]);
unset ( $event [ 'modifier' ]);
2011-04-07 09:28:46 +02:00
unset ( $event [ 'caldav_name' ]);
2016-07-28 21:25:44 +02:00
$event [ 'owner' ] = ! ( int ) $event [ 'owner' ] || ! $this -> bo -> check_perms ( Acl :: ADD , 0 , $event [ 'owner' ]) ? $this -> user : $event [ 'owner' ];
2010-04-30 18:00:03 +02:00
// Clear participant stati
2010-06-16 12:41:45 +02:00
foreach ( $event [ 'participant_types' ] as $type => & $participants )
{
2016-01-19 01:42:27 +01:00
foreach ( $participants as $id => & $p_response )
2010-04-30 18:00:03 +02:00
{
if ( $type == 'u' && $id == $event [ 'owner' ]) continue ;
2016-01-19 01:42:27 +01:00
calendar_so :: split_status ( $p_response , $quantity , $role );
2012-05-15 13:20:07 +02:00
// if resource defines callback for status of new status (eg. Resources app acknowledges direct booking acl), call it
$status = isset ( $this -> bo -> resources [ $type ][ 'new_status' ]) ? ExecMethod ( $this -> bo -> resources [ $type ][ 'new_status' ], $id ) : 'U' ;
2016-01-19 01:42:27 +01:00
$p_response = calendar_so :: combine_status ( $status , $quantity , $role );
2010-04-30 18:00:03 +02:00
}
}
2012-10-23 20:35:48 +02:00
// Copy alarms
2013-06-21 11:58:55 +02:00
if ( is_array ( $event [ 'alarm' ]))
2012-10-23 20:35:48 +02:00
{
2021-03-24 23:36:01 +01:00
$alarm_index = 0 ;
$alarms = $event [ 'alarm' ];
$event [ 'alarm' ] = Array ();
foreach ( $alarms as $n => $alarm )
2013-06-21 11:58:55 +02:00
{
unset ( $alarm [ 'cal_id' ]);
2021-03-24 23:36:01 +01:00
$alarm [ 'id' ] = $alarm_index ++ ;
$event [ 'alarm' ][] = $alarm ;
2013-06-21 11:58:55 +02:00
}
2012-10-23 20:35:48 +02:00
}
2012-10-22 18:15:06 +02:00
// Get links to be copied
// With no ID, $content['link_to']['to_id'] is used
2019-10-23 22:12:00 +02:00
$content [ 'link_to' ] = array ( 'to_app' => 'calendar' , 'to_id' => 0 );
2016-05-01 19:47:59 +02:00
foreach ( Link :: get_links ( 'calendar' , $content [ 'id' ]) as $link )
2012-10-22 18:15:06 +02:00
{
2016-05-01 19:47:59 +02:00
if ( $link [ 'app' ] != Link :: VFS_APPNAME )
2012-10-22 18:15:06 +02:00
{
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $content [ 'link_to' ][ 'to_id' ], $link [ 'app' ], $link [ 'id' ], $link [ 'remark' ]);
2012-10-22 18:15:06 +02:00
}
2016-05-01 19:47:59 +02:00
elseif ( $link [ 'app' ] == Link :: VFS_APPNAME )
2012-10-22 18:15:06 +02:00
{
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $content [ 'link_to' ][ 'to_id' ], Link :: VFS_APPNAME , array (
'tmp_name' => Link :: vfs_path ( $link [ 'app2' ], $link [ 'id2' ]) . '/' . $link [ 'id' ],
2012-10-22 18:15:06 +02:00
'name' => $link [ 'id' ],
), $link [ 'remark' ]);
}
}
unset ( $link );
2005-11-09 00:15:14 +01:00
$preserv [ 'view' ] = $preserv [ 'edit_single' ] = false ;
2016-11-24 18:30:36 +01:00
$msg = lang ( '%1 copied - the copy can now be edited' , lang ( Link :: get_registry ( 'calendar' , 'entry' )));
2005-11-09 00:15:14 +01:00
$event [ 'title' ] = lang ( 'Copy of:' ) . ' ' . $event [ 'title' ];
break ;
2008-05-08 00:12:25 +02:00
2006-12-22 20:51:56 +01:00
case 'mail' :
2011-12-16 10:55:57 +01:00
case 'sendrequest' :
2005-11-09 00:15:14 +01:00
case 'save' :
2008-12-18 15:47:21 +01:00
case 'print' :
2005-11-09 00:15:14 +01:00
case 'apply' :
2013-05-10 12:54:36 +02:00
case 'infolog' :
2016-05-01 19:47:59 +02:00
if ( $event [ 'id' ] && ! $this -> bo -> check_perms ( Acl :: EDIT , $event ))
2008-05-08 00:12:25 +02:00
{
2008-12-18 15:47:21 +01:00
$msg = lang ( 'Permission denied' );
2009-10-01 21:16:38 +02:00
$button = '' ;
2008-12-18 15:47:21 +01:00
break ;
}
2005-11-23 15:21:20 +01:00
if ( $event [ 'start' ] > $event [ 'end' ])
{
$msg = lang ( 'Error: Starttime has to be before the endtime !!!' );
$button = '' ;
break ;
}
2009-10-01 21:16:38 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $event [ 'recur_enddate' ] && $event [ 'start' ] > $event [ 'recur_enddate' ])
{
$msg = lang ( 'repetition' ) . ': ' . lang ( 'Error: Starttime has to be before the endtime !!!' );
$button = '' ;
break ;
}
2012-10-22 17:47:06 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $event [ 'end' ] - $event [ 'start' ] > calendar_rrule :: recurrence_interval ( $event [ 'recur_type' ], $event [ 'recur_interval' ]))
{
$msg = lang ( 'Error: Duration of event longer then recurrence interval!' );
$button = '' ;
break ;
}
2005-11-23 15:21:20 +01:00
if ( ! $event [ 'participants' ])
{
$msg = lang ( 'Error: no participants selected !!!' );
$button = '' ;
break ;
}
2008-10-10 12:24:31 +02:00
// if private event with ressource reservation is forbidden
if ( ! $event [ 'public' ] && $GLOBALS [ 'egw_info' ][ 'server' ][ 'no_ressources_private' ])
{
2015-06-25 22:35:24 +02:00
foreach ( array_keys ( $event [ 'participants' ]) as $uid )
2008-10-10 12:24:31 +02:00
{
if ( $uid [ 0 ] == 'r' ) //ressource detection
{
$msg = lang ( 'Error: ressources reservation in private events is not allowed!!!' );
$button = '' ;
break 2 ; //break foreach and case
}
}
}
2005-11-09 00:15:14 +01:00
if ( $content [ 'edit_single' ]) // we edited a single event from a series
{
$event [ 'reference' ] = $event [ 'id' ];
2009-07-23 18:14:22 +02:00
$event [ 'recurrence' ] = $content [ 'edit_single' ];
2005-11-09 00:15:14 +01:00
unset ( $event [ 'id' ]);
2011-03-09 18:26:20 +01:00
$conflicts = $this -> bo -> update ( $event , $ignore_conflicts , true , false , true , $messages , $content [ 'no_notifications' ]);
2005-11-09 00:15:14 +01:00
if ( ! is_array ( $conflicts ) && $conflicts )
{
// now we need to add the original start as recur-execption to the series
$recur_event = $this -> bo -> read ( $event [ 'reference' ]);
$recur_event [ 'recur_exception' ][] = $content [ 'edit_single' ];
2015-06-25 22:35:24 +02:00
// check if we need to move the alarms, because they are next on that exception
foreach ( $recur_event [ 'alarm' ] as $id => $alarm )
{
if ( $alarm [ 'time' ] == $content [ 'edit_single' ] - $alarm [ 'offset' ])
{
$rrule = calendar_rrule :: event2rrule ( $recur_event , true );
foreach ( $rrule as $time )
{
if ( $content [ 'edit_single' ] < $time -> format ( 'ts' ))
{
$alarm [ 'time' ] = $time -> format ( 'ts' ) - $alarm [ 'offset' ];
$this -> bo -> save_alarm ( $event [ 'reference' ], $alarm );
break ;
}
}
}
}
2005-11-23 22:39:37 +01:00
unset ( $recur_event [ 'start' ]); unset ( $recur_event [ 'end' ]); // no update necessary
2011-11-11 13:46:34 +01:00
unset ( $recur_event [ 'alarm' ]); // unsetting alarms too, as they cant be updated without start!
2005-11-09 00:15:14 +01:00
$this -> bo -> update ( $recur_event , true ); // no conflict check here
2016-05-01 11:57:48 +02:00
2017-05-08 21:18:04 +02:00
// Save links
if ( $content [ 'links' ])
{
Link :: link ( 'calendar' , $event [ 'id' ], $content [ 'links' ][ 'to_id' ]);
}
2016-05-16 23:56:08 +02:00
if ( Api\Json\Response :: isJSONResponse ())
{
// Sending null will trigger a removal of the original
// for that date
Api\Json\Response :: get () -> generic ( 'data' , array ( 'uid' => 'calendar::' . $content [ 'reference' ] . ':' . $content [ 'actual_date' ], 'data' => null ));
}
2005-11-09 00:15:14 +01:00
unset ( $recur_event );
unset ( $event [ 'edit_single' ]); // if we further edit it, it's just a single event
2005-11-23 22:39:37 +01:00
unset ( $preserv [ 'edit_single' ]);
2005-11-09 00:15:14 +01:00
}
else // conflict or error, we need to reset everything to the state befor we tried to save it
{
$event [ 'id' ] = $event [ 'reference' ];
2015-01-20 14:49:18 +01:00
$event [ 'reference' ] = $event [ 'recurrence' ] = 0 ;
2005-11-09 00:15:14 +01:00
$event [ 'uid' ] = $content [ 'uid' ];
}
2015-11-13 21:22:58 +01:00
$update_type = 'edit' ;
2005-11-09 00:15:14 +01:00
}
else // we edited a non-reccuring event or the whole series
{
2011-11-10 19:39:08 +01:00
if (( $old_event = $this -> bo -> read ( $event [ 'id' ])))
2010-06-09 20:00:11 +02:00
{
2010-06-23 16:47:34 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE )
2010-06-09 20:00:11 +02:00
{
2015-11-13 21:22:58 +01:00
$update_type = 'edit' ;
2016-04-27 20:53:15 +02:00
2010-06-23 16:47:34 +02:00
// we edit a existing series event
if ( $event [ 'start' ] != $old_event [ 'start' ] ||
2015-12-03 23:56:52 +01:00
$event [ 'whole_day' ] != $old_event [ 'whole_day' ] ||
$event [ 'end' ] != $old_event [ 'end' ])
2010-06-09 20:00:11 +02:00
{
2014-04-14 18:10:57 +02:00
// calculate offset against old series start or clicked recurrance,
// depending on which is smaller
$offset = $event [ 'start' ] - $old_event [ 'start' ];
if ( abs ( $offset ) > abs ( $off2 = $event [ 'start' ] - $event [ 'actual_date' ]))
{
$offset = $off2 ;
}
2015-11-27 17:57:25 +01:00
$msg = $this -> _break_recurring ( $event , $old_event , $event [ 'actual_date' ] + $offset , $content [ 'no_notifications' ]);
if ( $msg )
2014-04-14 18:10:57 +02:00
{
2015-11-27 17:57:25 +01:00
$noerror = false ;
2010-06-09 20:00:11 +02:00
}
}
}
else
{
2010-06-23 16:47:34 +02:00
if ( $old_event [ 'start' ] != $event [ 'start' ] ||
$old_event [ 'end' ] != $event [ 'end' ] ||
$event [ 'whole_day' ] != $old_event [ 'whole_day' ])
{
2016-01-18 18:45:25 +01:00
// check if we need to move the alarms, because they are relative
$this -> bo -> check_move_alarms ( $event , $old_event );
2010-06-23 16:47:34 +02:00
}
2010-06-09 20:00:11 +02:00
}
}
2017-07-04 16:32:59 +02:00
// Update alarm (default alarm or set alarm before change start date)
// for new event.
elseif ( is_array ( $event [ 'alarm' ]) && ( $event [ 'alarm' ][ 1 ][ 'time' ] + $event [ 'alarm' ][ 1 ][ 'offset' ] != $event [ 'start' ]))
{
$this -> bo -> check_move_alarms ( $event );
}
2016-02-04 20:30:32 +01:00
// Adding participants needs to be done as an edit, in case we
// have participants visible in seperate calendars
2016-03-14 16:58:25 +01:00
if ( is_array ( $old_event [ 'participants' ]) && count ( array_diff_key ( $event [ 'participants' ], $old_event [ 'participants' ])))
2016-02-04 20:30:32 +01:00
{
$update_type = 'edit' ;
}
2016-06-16 18:28:56 +02:00
// Changing category may affect event filtering
if ( $this -> cal_prefs [ 'saved_states' ][ 'cat_id' ] && $old_event [ 'category' ] != $event [ 'category' ])
{
$update_type = 'edit' ;
}
2011-03-09 18:26:20 +01:00
$conflicts = $this -> bo -> update ( $event , $ignore_conflicts , true , false , true , $messages , $content [ 'no_notifications' ]);
2005-11-09 00:15:14 +01:00
unset ( $event [ 'ignore' ]);
}
if ( is_array ( $conflicts ))
{
$event [ 'button_was' ] = $button ; // remember for ignore
return $this -> conflicts ( $event , $conflicts , $preserv );
}
2016-05-01 11:57:48 +02:00
2015-11-17 17:57:34 +01:00
// Event spans multiple days, need an edit to make sure they all get updated
// We could check old date, as removing from days could still be an update
if ( date ( 'Ymd' , $event [ 'start' ]) != date ( 'Ymd' , $event [ 'end' ]))
{
$update_type = 'edit' ;
}
2016-05-01 19:47:59 +02:00
// check if there are messages from update, eg. removed participants or Api\Categories because of missing rights
2009-12-03 19:24:19 +01:00
if ( $messages )
{
$msg .= ( $msg ? ', ' : '' ) . implode ( ', ' , $messages );
}
if ( $conflicts === 0 )
2008-01-15 09:21:25 +01:00
{
$msg .= ( $msg ? ', ' : '' ) . lang ( 'Error: the entry has been updated since you opened it for editing!' ) . '<br />' .
lang ( 'Copy your changes to the clipboard, %1reload the entry%2 and merge them.' , '<a href="' .
2016-05-01 19:47:59 +02:00
htmlspecialchars ( Egw :: link ( '/index.php' , array (
2008-06-07 19:45:33 +02:00
'menuaction' => 'calendar.calendar_uiforms.edit' ,
2009-12-03 19:24:19 +01:00
'cal_id' => $content [ 'id' ],
))) . '">' , '</a>' );
2010-06-09 20:00:11 +02:00
$noerror = false ;
2008-01-15 09:21:25 +01:00
}
2009-07-23 18:14:22 +02:00
elseif ( $conflicts > 0 )
2005-11-09 00:15:14 +01:00
{
2014-01-30 11:12:08 +01:00
// series moved by splitting in two --> move alarms and exceptions
if ( $old_event && $old_event [ 'id' ] != $event [ 'id' ])
{
2015-11-13 21:22:58 +01:00
$update_type = 'edit' ;
2016-05-01 19:47:59 +02:00
foreach (( array ) $old_event [ 'alarms' ] as $alarm )
2010-06-09 20:00:11 +02:00
{
2011-11-10 19:39:08 +01:00
// check if alarms still needed in old event, if not delete it
$event_time = $alarm [ 'time' ] + $alarm [ 'offset' ];
2016-05-01 19:47:59 +02:00
if ( $event_time >= $this -> bo -> now_su )
2010-06-11 09:32:10 +02:00
{
$this -> bo -> delete_alarm ( $alarm [ 'id' ]);
}
2010-06-09 20:00:11 +02:00
$alarm [ 'time' ] += $offset ;
unset ( $alarm [ 'id' ]);
2011-11-10 19:39:08 +01:00
// if alarm would be in the past (eg. event moved back) --> move to next possible recurrence
if ( $alarm [ 'time' ] < $this -> bo -> now_su )
{
if (( $next_occurrence = $this -> bo -> read ( $event [ 'id' ], $this -> bo -> now_su + $alarm [ 'offset' ], true )))
{
$alarm [ 'time' ] = $next_occurrence [ 'start' ] - $alarm [ 'offset' ];
}
else
{
$alarm = false ; // no (further) recurence found --> ignore alarm
}
}
// alarm is currently on a previous recurrence --> set for first recurrence of new series
elseif ( $event_time < $event [ 'start' ])
2010-06-09 20:00:11 +02:00
{
2011-11-10 19:39:08 +01:00
$alarm [ 'time' ] = $event [ 'start' ] - $alarm [ 'offset' ];
}
if ( $alarm )
{
$alarm [ 'id' ] = $this -> bo -> save_alarm ( $event [ 'id' ], $alarm );
$event [ 'alarm' ][ $alarm [ 'id' ]] = $alarm ;
2010-06-09 20:00:11 +02:00
}
}
// attach all future exceptions to the new series
$events =& $this -> bo -> search ( array (
'query' => array ( 'cal_uid' => $old_event [ 'uid' ]),
'filter' => 'owner' , // return all possible entries
'daywise' => false ,
'date_format' => 'ts' ,
));
foreach (( array ) $events as $exception )
{
2016-05-01 19:47:59 +02:00
if ( $exception [ 'recurrence' ] > $this -> bo -> now_su )
2010-06-09 20:00:11 +02:00
{
$exception [ 'recurrence' ] += $offset ;
$exception [ 'reference' ] = $event [ 'id' ];
$exception [ 'uid' ] = $event [ 'uid' ];
2011-11-10 19:39:08 +01:00
$this -> bo -> update ( $exception , true , true , true , true , $msg = null , $content [ 'no_notifications' ]);
2010-06-09 20:00:11 +02:00
}
}
2014-01-30 11:12:08 +01:00
}
2010-11-11 14:29:37 +01:00
2010-06-23 16:47:34 +02:00
$message = lang ( 'Event saved' );
if ( $status_reset_to_unknown )
{
foreach (( array ) $event [ 'participants' ] as $uid => $status )
{
if ( $uid [ 0 ] != 'c' && $uid [ 0 ] != 'e' && $uid != $this -> bo -> user )
{
calendar_so :: split_status ( $status , $q , $r );
$status = calendar_so :: combine_status ( 'U' , $q , $r );
2010-06-24 18:21:23 +02:00
$this -> bo -> set_status ( $event [ 'id' ], $uid , $status , 0 , true );
2010-06-23 16:47:34 +02:00
}
}
$message .= lang ( ', stati of participants reset' );
}
2010-11-11 14:29:37 +01:00
2016-05-01 19:47:59 +02:00
$response = Api\Json\Response :: get ();
2020-07-27 18:13:13 +02:00
if ( $response && $update_type != 'delete' && ! $client_updated )
2015-07-01 01:34:38 +02:00
{
2016-06-16 18:28:56 +02:00
$client_updated = $this -> update_client ( $event [ 'id' ]);
2015-07-01 01:34:38 +02:00
}
2010-06-23 16:47:34 +02:00
$msg = $message . ( $msg ? ', ' . $msg : '' );
2016-06-16 18:28:56 +02:00
Framework :: refresh_opener ( $msg , 'calendar' , $event [ 'id' ], $client_updated ? ( $event [ 'recur_type' ] ? 'edit' : $update_type ) : 'delete' );
2005-11-09 00:15:14 +01:00
// writing links for new entry, existing ones are handled by the widget itself
2008-05-08 00:12:25 +02:00
if ( ! $content [ 'id' ] && is_array ( $content [ 'link_to' ][ 'to_id' ]))
2005-11-09 00:15:14 +01:00
{
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $event [ 'id' ], $content [ 'link_to' ][ 'to_id' ]);
2005-11-09 00:15:14 +01:00
}
}
else
{
$msg = lang ( 'Error: saving the event !!!' );
}
break ;
2008-05-08 00:12:25 +02:00
2007-01-15 23:58:32 +01:00
case 'cancel' :
if ( $content [ 'cancel_needs_refresh' ])
{
2016-05-01 19:47:59 +02:00
Framework :: refresh_opener ( $msg , 'calendar' );
2007-01-15 23:58:32 +01:00
}
break ;
2015-11-16 17:45:02 +01:00
case 'delete' : // delete of event (regular or series)
2015-06-25 22:35:24 +02:00
$exceptions_kept = null ;
2015-07-16 12:05:18 +02:00
if ( $this -> bo -> delete ( $event [ 'id' ], ( int ) $content [ 'edit_single' ], false , $event [ 'no_notifications' ],
2015-11-16 17:45:02 +01:00
$content [ 'delete_exceptions' ] == 'true' , $exceptions_kept ))
2005-11-09 00:15:14 +01:00
{
2010-06-08 18:36:55 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $content [ 'reference' ] == 0 && ! $content [ 'edit_single' ])
2010-01-22 20:49:37 +01:00
{
2010-05-12 13:15:45 +02:00
$msg = lang ( 'Series deleted' );
2012-10-22 15:15:40 +02:00
if ( $exceptions_kept ) $msg .= lang ( ', exceptions preserved' );
2010-05-12 13:15:45 +02:00
}
else
{
$msg = lang ( 'Event deleted' );
2010-01-22 20:49:37 +01:00
}
2013-10-31 15:51:19 +01:00
2005-11-09 00:15:14 +01:00
}
break ;
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
case 'freetime' :
// the "click" has to be in onload, to make sure the button is already created
2013-10-31 15:51:19 +01:00
$event [ 'button_was' ] = $button ;
2005-11-09 00:15:14 +01:00
break ;
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
case 'add_alarm' :
2014-12-09 23:35:36 +01:00
$time = $content [ 'start' ];
2014-05-27 17:02:56 +02:00
$offset = $time - $content [ 'new_alarm' ][ 'date' ];
2010-06-08 18:36:55 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE &&
2010-06-09 20:00:11 +02:00
( $next_occurrence = $this -> bo -> read ( $event [ 'id' ], $this -> bo -> now_su + $offset , true )) &&
2010-06-08 18:36:55 +02:00
$time < $next_occurrence [ 'start' ])
{
2014-12-09 23:35:36 +01:00
$content [ 'new_alarm' ][ 'date' ] = $next_occurrence [ 'start' ] - $offset ;
2010-06-08 18:36:55 +02:00
}
2020-06-08 22:07:15 +02:00
// Avoid duplicates
foreach ( $content [ 'alarm' ] as $key => $alarm )
{
if ( $alarm [ 'offset' ] == $offset && (
( $alarm [ 'all' ] && $content [ 'new_alarm' ][ 'owner' ] == 0 ) ||
( ! $alarm [ 'all' ] && $alarm [ 'owner' ] == $content [ 'new_alarm' ][ 'owner' ])
))
{
break 2 ;
}
}
2016-05-01 19:47:59 +02:00
if ( $this -> bo -> check_perms ( Acl :: EDIT , ! $content [ 'new_alarm' ][ 'owner' ] ? $event : 0 , $content [ 'new_alarm' ][ 'owner' ]))
2005-11-09 00:15:14 +01:00
{
$alarm = array (
'offset' => $offset ,
2014-05-27 17:02:56 +02:00
'time' => $content [ 'new_alarm' ][ 'date' ],
2005-11-09 00:15:14 +01:00
'all' => ! $content [ 'new_alarm' ][ 'owner' ],
'owner' => $content [ 'new_alarm' ][ 'owner' ] ? $content [ 'new_alarm' ][ 'owner' ] : $this -> user ,
);
if ( $alarm [ 'time' ] < $this -> bo -> now_su )
{
$msg = lang ( " Can't add alarms in the past !!! " );
}
elseif ( $event [ 'id' ]) // save the alarm immediatly
{
2010-06-09 20:00:11 +02:00
if (( $alarm_id = $this -> bo -> save_alarm ( $event [ 'id' ], $alarm )))
2005-11-09 00:15:14 +01:00
{
$alarm [ 'id' ] = $alarm_id ;
$event [ 'alarm' ][ $alarm_id ] = $alarm ;
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
$msg = lang ( 'Alarm added' );
2016-05-01 19:47:59 +02:00
Framework :: refresh_opener ( $msg , 'calendar' , $event [ 'id' ], 'update' );
2005-11-09 00:15:14 +01:00
}
else
{
$msg = lang ( 'Error adding the alarm' );
}
}
else
{
2015-06-25 22:35:24 +02:00
for ( $alarm [ 'id' ] = 1 ; isset ( $event [ 'alarm' ][ $alarm [ 'id' ]]); $alarm [ 'id' ] ++ ) {} // get a temporary non-conflicting, numeric id
2005-11-09 00:15:14 +01:00
$event [ 'alarm' ][ $alarm [ 'id' ]] = $alarm ;
}
}
else
{
$msg = lang ( 'Permission denied' );
}
break ;
}
2014-06-05 13:03:12 +02:00
// add notification-errors, if we have some
if (( $notification_errors = notifications :: errors ( true )))
{
$msg .= ( $msg ? " \n " : '' ) . implode ( " \n " , $notification_errors );
}
2016-01-14 16:46:55 +01:00
// New event, send data before updating so it's there
2016-05-01 19:47:59 +02:00
$response = Api\Json\Response :: get ();
2020-07-27 18:13:13 +02:00
if ( $response && ! $content [ 'id' ] && $event [ 'id' ] && ! $client_updated )
2016-01-14 16:46:55 +01:00
{
2016-06-16 18:28:56 +02:00
$client_updated = $this -> update_client ( $event [ 'id' ]);
2016-01-14 16:46:55 +01:00
}
2010-05-20 11:19:15 +02:00
if ( in_array ( $button , array ( 'cancel' , 'save' , 'delete' , 'delete_exceptions' , 'delete_keep_exceptions' )) && $noerror )
2005-11-09 00:15:14 +01:00
{
2008-05-08 00:12:25 +02:00
if ( $content [ 'lock_token' ]) // remove an existing lock
{
2016-05-01 19:47:59 +02:00
Vfs :: unlock ( Vfs :: app_entry_lock_path ( 'calendar' , $content [ 'id' ]), $content [ 'lock_token' ], false );
2008-05-08 00:12:25 +02:00
}
2005-11-09 00:15:14 +01:00
if ( $content [ 'no_popup' ])
{
2016-05-01 19:47:59 +02:00
Egw :: redirect_link ( '/index.php' , array (
2010-06-10 19:24:22 +02:00
'menuaction' => 'calendar.calendar_uiviews.index' ,
2005-11-09 00:15:14 +01:00
'msg' => $msg ,
2017-10-05 19:20:21 +02:00
'ajax' => 'true'
2005-11-09 00:15:14 +01:00
));
}
2015-06-25 22:35:24 +02:00
if ( in_array ( $button , array ( 'delete_exceptions' , 'delete_keep_exceptions' )) || $content [ 'recur_type' ] && $button == 'delete' )
2014-06-17 09:48:59 +02:00
{
2016-05-01 19:47:59 +02:00
Framework :: refresh_opener ( $msg , 'calendar' );
2014-06-17 09:48:59 +02:00
}
else
{
2016-07-26 09:03:02 +02:00
Framework :: refresh_opener ( $msg , 'calendar' ,
2016-06-21 19:42:44 +02:00
$event [ 'id' ] . ( $content [ 'edit_single' ] ? ':' . ( int ) $content [ 'edit_single' ] : '' ),
2016-06-16 18:28:56 +02:00
$button == 'save' && $client_updated ? ( $content [ 'id' ] ? $update_type : 'add' ) : 'delete'
);
2014-09-03 18:22:05 +02:00
}
2020-12-09 21:43:56 +01:00
// Don't try to close quick add, it's not in a popup
if ( $content [ 'template' ] !== 'calendar.add' )
{
Framework :: window_close ();
}
2016-05-01 19:47:59 +02:00
exit ();
2005-11-09 00:15:14 +01:00
}
2011-03-09 18:26:20 +01:00
unset ( $event [ 'no_notifications' ]);
2013-10-31 15:51:19 +01:00
return $this -> edit ( $event , $preserv , $msg , $event [ 'id' ] ? $event [ 'id' ] : $content [ 'link_to' ][ 'to_id' ]);
2005-11-09 00:15:14 +01:00
}
2008-05-08 00:12:25 +02:00
2008-02-07 03:38:55 +01:00
/**
* Create an exception from the clicked event
2008-05-08 00:12:25 +02:00
*
2008-02-07 03:38:55 +01:00
* It ' s not stored to the DB unless the user saves it !
*
* @ param array & $event
* @ param array & $preserv
* @ return string message that exception was created
*/
function _create_exception ( & $event , & $preserv )
{
2012-10-22 19:03:02 +02:00
// In some cases where the user makes the first day an exception, actual_date may be missing
2015-06-10 23:51:28 +02:00
$preserv [ 'actual_date' ] = $preserv [ 'actual_date' ] ? $preserv [ 'actual_date' ] : $event [ 'start' ];
2012-10-22 19:03:02 +02:00
2008-02-07 03:38:55 +01:00
$event [ 'end' ] += $preserv [ 'actual_date' ] - $event [ 'start' ];
2009-07-23 18:14:22 +02:00
$event [ 'reference' ] = $preserv [ 'reference' ] = $event [ 'id' ];
2009-08-07 11:26:11 +02:00
$event [ 'recurrence' ] = $preserv [ 'recurrence' ] = $preserv [ 'actual_date' ];
2008-02-07 03:38:55 +01:00
$event [ 'start' ] = $preserv [ 'edit_single' ] = $preserv [ 'actual_date' ];
$event [ 'recur_type' ] = MCAL_RECUR_NONE ;
foreach ( array ( 'recur_enddate' , 'recur_interval' , 'recur_exception' , 'recur_data' ) as $name )
{
unset ( $event [ $name ]);
}
2015-06-25 22:35:24 +02:00
// add all alarms as new alarms to execption
2015-07-16 14:51:13 +02:00
$event [ 'alarm' ] = array_values (( array ) $event [ 'alarm' ]);
2015-06-25 22:35:24 +02:00
foreach ( $event [ 'alarm' ] as & $alarm )
{
unset ( $alarm [ 'uid' ], $alarm [ 'id' ], $alarm [ 'time' ]);
}
2017-05-08 21:18:04 +02:00
// Copy links
if ( ! is_array ( $event [ 'link_to' ])) $event [ 'link_to' ] = array ();
$event [ 'link_to' ][ 'to_app' ] = 'calendar' ;
$event [ 'link_to' ][ 'to_id' ] = 0 ;
2017-06-14 10:27:51 +02:00
2017-05-08 21:18:04 +02:00
foreach ( Link :: get_links ( $event [ 'link_to' ][ 'to_app' ], $event [ 'id' ]) as $link )
{
if ( ! $link [ 'id' ]) continue ;
if ( $link [ 'app' ] != Link :: VFS_APPNAME )
{
Link :: link ( 'calendar' , $event [ 'link_to' ][ 'to_id' ], $link [ 'app' ], $link [ 'id' ], $link [ 'remark' ]);
}
elseif ( $link [ 'app' ] == Link :: VFS_APPNAME )
{
Link :: link ( 'calendar' , $event [ 'link_to' ][ 'to_id' ], Link :: VFS_APPNAME , array (
'tmp_name' => Link :: vfs_path ( $link [ 'app2' ], $link [ 'id2' ]) . '/' . $link [ 'id' ],
'name' => $link [ 'id' ],
), $link [ 'remark' ]);
}
}
$event [ 'links' ] = $event [ 'link_to' ];
2016-05-01 19:47:59 +02:00
if ( $this -> bo -> check_perms ( Acl :: EDIT , $event ))
2009-07-22 17:38:58 +02:00
{
2009-08-17 23:15:40 +02:00
return lang ( 'Save event as exception - Delete single occurrence - Edit status or alarms for this particular day' );
2009-07-22 17:38:58 +02:00
}
2009-08-17 23:15:40 +02:00
return lang ( 'Edit status or alarms for this particular day' );
2008-02-07 03:38:55 +01:00
}
2005-11-09 00:15:14 +01:00
2015-11-27 17:57:25 +01:00
/**
* Since we cannot change recurrences in the past , break a recurring
* event ( that starts in the past ), and create a new event .
*
* $old_event will be ended ( if needed ) and $event will be modified with the
* new start date and time . It is not allowed to edit events in the past ,
* so if $as_of_date is in the past , it will be adjusted to today .
*
* @ param array & $event Event to be modified
* @ param array $old_event Unmodified ( original ) event , as read from the database
* @ param date $as_of_date If provided , the break will be done as of this
* date instead of today
* @ param boolean $no_notifications Toggle notifications to participants
*
* @ return false or error message
*/
function _break_recurring ( & $event , $old_event , $as_of_date = null , $no_notifications = true )
{
$msg = false ;
if ( ! $as_of_date )
{
$as_of_date = time ();
}
2016-05-01 19:47:59 +02:00
//error_log(__METHOD__ . Api\DateTime::to($old_event['start']) . ' -> '. Api\DateTime::to($event['start']) . ' as of ' . Api\DateTime::to($as_of_date));
2016-05-01 11:57:48 +02:00
2015-11-27 17:57:25 +01:00
if ( ! ( $next_occurrence = $this -> bo -> read ( $event [ 'id' ], $this -> bo -> now_su + 1 , true )))
{
$msg = lang ( " Error: You can't shift a series from the past! " );
return $msg ;
}
// Hold on to this in case something goes wrong
$orig_event = $event ;
$offset = $event [ 'start' ] - $old_event [ 'start' ];
2015-12-03 23:56:52 +01:00
$duration = $event [ 'duration' ] ? $event [ 'duration' ] : $event [ 'end' ] - $event [ 'start' ];
2016-05-01 11:57:48 +02:00
2015-11-27 17:57:25 +01:00
// base start-date of new series on actual / clicked date
$event [ 'start' ] = $as_of_date ;
2016-05-01 19:47:59 +02:00
if ( Api\DateTime :: to ( $old_event [ 'start' ], 'Ymd' ) < Api\DateTime :: to ( $as_of_date , 'Ymd' ) ||
2015-11-27 17:57:25 +01:00
// Adjust for requested date in the past
2016-05-01 19:47:59 +02:00
Api\DateTime :: to ( $as_of_date , 'ts' ) < time ()
2015-11-27 17:57:25 +01:00
)
{
2016-05-01 11:57:48 +02:00
2015-11-27 17:57:25 +01:00
unset ( $orig_event );
// copy event by unsetting the id(s)
unset ( $event [ 'id' ]);
unset ( $event [ 'uid' ]);
unset ( $event [ 'caldav_name' ]);
$event [ 'alarm' ] = array ();
// set enddate of existing event
$rriter = calendar_rrule :: event2rrule ( $old_event , true );
$rriter -> rewind ();
$last = $rriter -> current ();
do
{
$rriter -> next_no_exception ();
$occurrence = $rriter -> current ();
}
while ( $rriter -> valid () && (
2016-05-01 19:47:59 +02:00
Api\DateTime :: to ( $occurrence , 'ts' ) <= time () ||
Api\DateTime :: to ( $occurrence , 'Ymd' ) < Api\DateTime :: to ( $as_of_date , 'Ymd' )
2015-11-27 17:57:25 +01:00
) && ( $last = $occurrence ));
// Make sure as_of_date is still valid, may have to move forward
2016-05-01 19:47:59 +02:00
if ( Api\DateTime :: to ( $as_of_date , 'ts' ) < Api\DateTime :: to ( $last , 'ts' ) ||
Api\DateTime :: to ( $as_of_date , 'Ymd' ) == Api\DateTime :: to ( $last , 'Ymd' ))
2015-12-08 18:00:49 +01:00
{
2016-05-01 19:47:59 +02:00
$event [ 'start' ] = Api\DateTime :: to ( $rriter -> current (), 'ts' ) + $offset ;
2015-11-27 17:57:25 +01:00
}
2016-05-01 19:47:59 +02:00
//error_log(__METHOD__ ." Series should end at " . Api\DateTime::to($last) . " New series starts at " . Api\DateTime::to($event['start']));
2015-12-03 23:56:52 +01:00
if ( $duration )
2015-11-27 17:57:25 +01:00
{
2015-12-03 23:56:52 +01:00
$event [ 'end' ] = $event [ 'start' ] + $duration ;
2015-11-27 17:57:25 +01:00
}
elseif ( $event [ 'end' ] < $event [ 'start' ])
{
$event [ 'end' ] = $old_event [ 'end' ] - $old_event [ 'start' ] + $event [ 'start' ];
}
2016-05-01 19:47:59 +02:00
//error_log(__LINE__.": event[start]=$event[start]=".Api\DateTime::to($event['start']).", duration={$duration}, event[end]=$event[end]=".Api\DateTime::to($event['end']).", offset=$offset\n");
2015-11-27 17:57:25 +01:00
$event [ 'participants' ] = $old_event [ 'participants' ];
foreach ( $old_event [ 'recur_exception' ] as $key => $exdate )
{
2016-05-01 19:47:59 +02:00
if ( $exdate > Api\DateTime :: to ( $last , 'ts' ))
2015-11-27 17:57:25 +01:00
{
2016-05-01 19:47:59 +02:00
//error_log("Moved exception on " . Api\DateTime::to($exdate));
2015-11-27 17:57:25 +01:00
unset ( $old_event [ 'recur_exception' ][ $key ]);
$event [ 'recur_exception' ][ $key ] += $offset ;
}
else
{
2016-05-01 19:47:59 +02:00
//error_log("Kept exception on ". Api\DateTime::to($exdate));
2015-11-27 17:57:25 +01:00
unset ( $event [ 'recur_exception' ][ $key ]);
}
}
2015-12-08 18:00:49 +01:00
$last -> setTime ( 0 , 0 , 0 );
2016-05-01 19:47:59 +02:00
$old_event [ 'recur_enddate' ] = Api\DateTime :: to ( $last , 'ts' );
2015-11-27 17:57:25 +01:00
if ( ! $this -> bo -> update ( $old_event , true , true , false , true , $dummy = null , $no_notifications ))
{
$msg .= ( $msg ? ', ' : '' ) . lang ( 'Error: the entry has been updated since you opened it for editing!' ) . '<br />' .
lang ( 'Copy your changes to the clipboard, %1reload the entry%2 and merge them.' , '<a href="' .
2016-05-01 19:47:59 +02:00
htmlspecialchars ( Egw :: link ( '/index.php' , array (
2015-11-27 17:57:25 +01:00
'menuaction' => 'calendar.calendar_uiforms.edit' ,
2016-05-01 19:47:59 +02:00
'cal_id' => $event [ 'id' ],
2015-11-27 17:57:25 +01:00
))) . '">' , '</a>' );
$event = $orig_event ;
}
}
2016-05-01 19:47:59 +02:00
$event [ 'start' ] = Api\DateTime :: to ( $event [ 'start' ], 'ts' );
2015-11-27 17:57:25 +01:00
return $msg ;
}
2005-11-09 00:15:14 +01:00
/**
2014-03-20 17:10:52 +01:00
* return javascript to open mail compose window with preset content to mail all participants
2005-11-09 00:15:14 +01:00
*
* @ param array $event
* @ param boolean $added
* @ return string javascript window . open command
*/
2013-10-31 15:51:19 +01:00
function ajax_custom_mail ( $event , $added , $asrequest = false )
2005-11-09 00:15:14 +01:00
{
$to = array ();
2008-05-08 17:02:35 +02:00
2005-11-09 00:15:14 +01:00
foreach ( $event [ 'participants' ] as $uid => $status )
{
2014-04-22 15:51:32 +02:00
//error_log(__METHOD__.__LINE__.' '.$uid.':'.array2string($status));
if ( empty ( $status )) continue ;
2018-06-19 22:35:08 +02:00
if ( ! is_array ( $status ))
{
2018-06-27 09:42:16 +02:00
$quantity = $role = null ;
2018-06-19 22:35:08 +02:00
calendar_so :: split_status ( $status , $quantity , $role );
$status = array (
'status' => $status ,
'uid' => $uid ,
);
}
2009-03-05 16:18:40 +01:00
$toadd = '' ;
2014-03-20 17:10:52 +01:00
if (( isset ( $status [ 'status' ]) && $status [ 'status' ] == 'R' ) || ( isset ( $status [ 'uid' ]) && $status [ 'uid' ] == $this -> user )) continue ;
2008-05-08 00:12:25 +02:00
2014-03-20 17:10:52 +01:00
if ( isset ( $status [ 'uid' ]) && is_numeric ( $status [ 'uid' ]) && $GLOBALS [ 'egw' ] -> accounts -> get_type ( $status [ 'uid' ]) == 'u' )
2005-11-09 00:15:14 +01:00
{
2014-01-29 09:32:01 +01:00
if ( ! ( $email = $GLOBALS [ 'egw' ] -> accounts -> id2name ( $status [ 'uid' ], 'account_email' ))) continue ;
2007-12-11 08:13:08 +01:00
2017-03-28 19:49:40 +02:00
$toadd = $GLOBALS [ 'egw' ] -> accounts -> id2name ( $status [ 'uid' ], 'account_firstname' ) . ' ' .
$GLOBALS [ 'egw' ] -> accounts -> id2name ( $status [ 'uid' ], 'account_lastname' ) . ' <' . $email . '>' ;
2008-05-08 00:12:25 +02:00
2009-03-05 16:18:40 +01:00
if ( ! in_array ( $toadd , $to )) $to [] = $toadd ;
2007-12-11 08:13:08 +01:00
}
elseif ( $uid < 0 )
{
foreach ( $GLOBALS [ 'egw' ] -> accounts -> members ( $uid , true ) as $uid )
{
if ( ! ( $email = $GLOBALS [ 'egw' ] -> accounts -> id2name ( $uid , 'account_email' ))) continue ;
2017-03-28 19:49:40 +02:00
$toadd = $GLOBALS [ 'egw' ] -> accounts -> id2name ( $uid , 'account_firstname' ) . ' ' .
$GLOBALS [ 'egw' ] -> accounts -> id2name ( $uid , 'account_lastname' ) . ' <' . $email . '>' ;
2008-05-08 00:12:25 +02:00
2009-03-05 16:52:57 +01:00
// dont add groupmembers if they already rejected the event, or are the current user
if ( ! in_array ( $toadd , $to ) && ( $event [ 'participants' ][ $uid ] !== 'R' && $uid != $this -> user )) $to [] = $toadd ;
2007-12-11 08:13:08 +01:00
}
2005-11-09 00:15:14 +01:00
}
2014-04-22 15:51:32 +02:00
elseif ( ! empty ( $status [ 'uid' ]) && ! is_numeric ( substr ( $status [ 'uid' ], 0 , 1 )) && ( $info = $this -> bo -> resource_info ( $status [ 'uid' ])))
2006-12-22 20:51:56 +01:00
{
2008-05-08 17:02:35 +02:00
$to [] = $info [ 'email' ];
2014-04-22 15:51:32 +02:00
//error_log(__METHOD__.__LINE__.array2string($to));
}
elseif ( ! is_numeric ( substr ( $uid , 0 , 1 )) && ( $info = $this -> bo -> resource_info ( $uid )))
{
$to [] = $info [ 'email' ];
//error_log(__METHOD__.__LINE__.array2string($to));
2006-12-22 20:51:56 +01:00
}
2005-11-09 00:15:14 +01:00
}
2015-10-19 21:48:52 +02:00
// prefer event description over standard notification text
if ( empty ( $event [ 'description' ]))
{
list (, $body ) = $this -> bo -> get_update_message ( $event , $added ? MSG_ADDED : MSG_MODIFIED ); // update-message is in TZ of the user
}
else
{
$body = $event [ 'description' ];
}
// respect user preference about html mail
if ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'mail' ][ 'composeOptions' ] != 'text' )
{
$body = '<pre>' . $body . '</pre>' ;
}
2014-03-20 17:10:52 +01:00
//error_log(__METHOD__.print_r($event,true));
2008-06-12 09:33:44 +02:00
$boical = new calendar_ical ();
2012-03-12 13:45:54 +01:00
// we need to pass $event[id] so iCal class reads event again,
// as event is in user TZ, but iCal class expects server TZ!
2014-02-05 16:15:00 +01:00
$ics = $boical -> exportVCal ( array ( $event [ 'id' ]), '2.0' , 'REQUEST' , false );
2005-11-09 00:15:14 +01:00
$ics_file = tempnam ( $GLOBALS [ 'egw_info' ][ 'server' ][ 'temp_dir' ], 'ics' );
if (( $f = fopen ( $ics_file , 'w' )))
{
fwrite ( $f , $ics );
fclose ( $f );
}
2014-04-22 15:51:32 +02:00
//error_log(__METHOD__.__LINE__.array2string($to));
2005-11-09 00:15:14 +01:00
$vars = array (
2013-10-31 15:51:19 +01:00
'menuaction' => 'mail.mail_compose.compose' ,
2015-10-19 21:48:52 +02:00
'mimeType' => $GLOBALS [ 'egw_info' ][ 'user' ][ 'preferences' ][ 'mail' ][ 'composeOptions' ] != 'text' ? 'html' : 'plain' ,
2015-10-06 12:49:36 +02:00
'preset[subject]' => $event [ 'title' ],
2005-11-09 00:15:14 +01:00
'preset[body]' => $body ,
'preset[name]' => 'event.ics' ,
'preset[file]' => $ics_file ,
2014-02-05 16:15:00 +01:00
'preset[type]' => 'text/calendar' . ( $asrequest ? '; method=REQUEST' : '' ),
2005-11-09 00:15:14 +01:00
'preset[size]' => filesize ( $ics_file ),
);
2018-06-20 21:32:47 +02:00
$vars [ $asrequest ? 'preset[to]' : 'preset[bcc]' ] = $to ;
2011-12-16 10:55:57 +01:00
if ( $asrequest ) $vars [ 'preset[msg]' ] = lang ( 'You attempt to mail a meetingrequest to the recipients above. Depending on the client this mail is opened with, the recipient may or may not see the mailbody below, but only see the meeting request attached.' );
2016-05-01 19:47:59 +02:00
$response = Api\Json\Response :: get ();
2013-10-31 15:51:19 +01:00
$response -> call ( 'app.calendar.custom_mail' , $vars );
2013-05-10 12:54:36 +02:00
}
2012-11-13 12:23:29 +01:00
/**
* Get title of a uid / calendar participant
*
* @ param int | string $uid
* @ return string
*/
public function get_title ( $uid )
{
if ( is_numeric ( $uid ))
{
2016-05-01 19:47:59 +02:00
return Api\Accounts :: username ( $uid );
2012-11-13 12:23:29 +01:00
}
elseif (( $info = $this -> bo -> resource_info ( $uid )))
{
2014-03-13 11:20:17 +01:00
if ( $uid [ 0 ] == 'e' && $info [ 'name' ] && $info [ 'name' ] != $info [ 'email' ])
{
return $info [ 'name' ] . ' <' . $info [ 'email' ] . '>' ;
}
2012-11-13 12:23:29 +01:00
return $info [ 'name' ] ? $info [ 'name' ] : $info [ 'email' ];
}
return '#' . $uid ;
}
/**
* Compare two uid by there title
*
* @ param int | string $uid1
* @ param int | string $uid2
* @ return int see strnatcasecmp
*/
public function uid_title_cmp ( $uid1 , $uid2 )
{
return strnatcasecmp ( $this -> get_title ( $uid1 ), $this -> get_title ( $uid2 ));
}
2008-12-18 15:47:21 +01:00
2019-02-21 15:06:26 +01:00
public function ajax_add ()
2019-01-10 00:48:04 +01:00
{
// This tells etemplate to send as JSON response, not full
// This avoids errors from trying to send header again
if ( Api\Json\Request :: isJSONRequest ())
{
$GLOBALS [ 'egw' ] -> framework -> response = Api\Json\Response :: get ();
}
$this -> edit ();
}
2019-06-24 17:56:18 +02:00
/**
* Get conflict dialog via ajax . Used by quick add .
*
*/
2019-06-17 18:24:36 +02:00
public function ajax_conflicts ()
{
$participants = json_decode ( $_GET [ 'participants' ], true );
unset ( $_GET [ 'participants' ]);
$content = $this -> default_add_event ();
// Process edit wants to see input values
$participants = array ( 1 => false );
$participants [ 'cal_resources' ] = '' ;
foreach ( $content [ 'participants' ] as $id => $status )
{
$quantity = $role = '' ;
calendar_so :: split_status ( $status , $quantity , $role );
$participants [] = array (
'uid' => $id ,
'status' => $status ,
'quantity' => $quantity ,
'role' => $role
);
}
$content [ 'participants' ] = $participants ;
2019-06-24 17:56:18 +02:00
$content [ 'button' ] = array ( 'save' => true );
2019-06-17 18:24:36 +02:00
return $this -> process_edit ( $content );
}
2005-11-09 00:15:14 +01:00
/**
* Edit a calendar event
*
2014-05-27 17:02:56 +02:00
* @ param array $event Event to edit , if not $_GET [ 'cal_id' ] contains the event - id
* @ param array $preserv following keys :
2005-11-09 00:15:14 +01:00
* view boolean view - mode , if no edit - access we automatic fallback to view - mode
2009-08-17 22:05:46 +02:00
* hide_delete boolean hide delete button
2005-11-09 00:15:14 +01:00
* no_popup boolean use a popup or not
* edit_single int timestamp of single event edited , unset / null otherwise
2014-11-25 11:42:27 +01:00
* @ param string $msg = '' msg to display
* @ param mixed $link_to_id = '' from or for the link - widget
2015-09-16 13:36:51 +02:00
* @ param string $msg_type = null default automatic detect , if it contains " error "
2005-11-09 00:15:14 +01:00
*/
2015-09-16 13:36:51 +02:00
function edit ( $event = null , $preserv = null , $msg = '' , $link_to_id = '' , $msg_type = null )
2005-11-09 00:15:14 +01:00
{
2005-11-23 15:21:20 +01:00
$sel_options = array (
2006-12-22 20:51:56 +01:00
'recur_type' => & $this -> bo -> recur_types ,
'status' => $this -> bo -> verbose_status ,
'duration' => $this -> durations ,
2009-10-12 21:16:42 +02:00
'role' => $this -> bo -> roles ,
2014-06-05 18:07:59 +02:00
'new_alarm[options]' => $this -> bo -> alarms + array ( 0 => lang ( 'Custom' )),
2006-12-22 20:51:56 +01:00
'action' => array (
'copy' => array ( 'label' => 'Copy' , 'title' => 'Copy this event' ),
'ical' => array ( 'label' => 'Export' , 'title' => 'Download this event as iCal' ),
2008-12-18 15:47:21 +01:00
'print' => array ( 'label' => 'Print' , 'title' => 'Print this event' ),
2013-05-10 12:54:36 +02:00
'infolog' => array ( 'label' => 'InfoLog' , 'title' => 'Create an InfoLog from this event' ),
'mail' => array ( 'label' => 'Mail all participants' , 'title' => 'Compose a mail to all participants after the event is saved' ),
'sendrequest' => array ( 'label' => 'Meetingrequest to all participants' , 'title' => 'Send meetingrequest to all participants after the event is saved' ),
2006-12-22 20:51:56 +01:00
),
2020-04-03 10:28:34 +02:00
'participants[notify_externals]' => [
2020-04-02 15:15:04 +02:00
'yes' => [ 'label' => 'Yes' , 'title' => 'Notify all externals (non-users) about this event' ],
'no' => [ 'label' => 'No' , 'title' => 'Do NOT notify externals (non-users) about this event' ],
'never' => [ 'label' => 'Never' , 'title' => 'Never notify externals (non-users) about events I create' ],
'add_cancel' => [ 'label' => 'Always' , 'title' => 'on invitation / cancellation only' ],
'time_change_4h' => [ 'label' => 'Always' , 'title' => 'on time change of more than 4 hours too' ],
'time_change' => [ 'label' => 'Always' , 'title' => 'on any time change too' ],
'modifications' => [ 'label' => 'Always' , 'title' => 'on all modification, but responses' ],
'responses' => [ 'label' => 'Always' , 'title' => 'on participant responses too' ],
],
2005-11-23 15:21:20 +01:00
);
2006-12-22 20:51:56 +01:00
unset ( $sel_options [ 'status' ][ 'G' ]);
2005-11-09 00:15:14 +01:00
if ( ! is_array ( $event ))
{
$preserv = array (
'no_popup' => isset ( $_GET [ 'no_popup' ]),
2009-11-25 21:16:41 +01:00
'template' => isset ( $_GET [ 'template' ]) ? $_GET [ 'template' ] : ( isset ( $_REQUEST [ 'print' ]) ? 'calendar.print' : 'calendar.edit' ),
2005-11-09 00:15:14 +01:00
);
2019-09-25 10:56:36 +02:00
if ( ! isset ( $_REQUEST [ 'print' ]) && ! empty ( $preserv [ 'template' ]) && $this -> cal_prefs [ 'new_event_dialog' ] == 'edit' )
2018-12-13 22:35:26 +01:00
{
// User wants full thing
unset ( $preserv [ 'template' ]);
}
2005-11-09 00:15:14 +01:00
$cal_id = ( int ) $_GET [ 'cal_id' ];
2012-10-16 00:37:24 +02:00
if ( $_GET [ 'action' ])
{
$event = $this -> bo -> read ( $cal_id );
$event [ 'action' ] = $_GET [ 'action' ];
unset ( $event [ 'participants' ]);
return $this -> process_edit ( $event );
}
2015-03-25 19:35:31 +01:00
// vfs url
if ( ! empty ( $_GET [ 'ical_url' ]) && parse_url ( $_GET [ 'ical_url' ], PHP_URL_SCHEME ) == 'vfs' )
2015-03-24 10:43:38 +01:00
{
2015-03-25 19:35:31 +01:00
$_GET [ 'ical_vfs' ] = parse_url ( $_GET [ 'ical_url' ], PHP_URL_PATH );
2015-03-24 10:43:38 +01:00
}
2015-03-25 19:35:31 +01:00
// vfs path
if ( ! empty ( $_GET [ 'ical_vfs' ]) &&
2016-05-01 19:47:59 +02:00
( ! Vfs :: file_exists ( $_GET [ 'ical_vfs' ]) || ! ( $_GET [ 'ical' ] = file_get_contents ( Vfs :: PREFIX . $_GET [ 'ical_vfs' ]))))
2015-03-24 10:43:38 +01:00
{
2015-03-25 19:35:31 +01:00
//error_log(__METHOD__."() Error: importing the iCal: vfs file not found '$_GET[ical_vfs]'!");
$msg = lang ( 'Error: importing the iCal' ) . ': ' . lang ( 'VFS file not found' ) . ': ' . $_GET [ 'ical_vfs' ];
$event =& $this -> default_add_event ();
}
if ( ! empty ( $_GET [ 'ical_data' ]) &&
2016-05-01 19:47:59 +02:00
! ( $_GET [ 'ical' ] = Link :: get_data ( $_GET [ 'ical_data' ])))
2015-03-25 19:35:31 +01:00
{
//error_log(__METHOD__."() Error: importing the iCal: data not found '$_GET[ical_data]'!");
$msg = lang ( 'Error: importing the iCal' ) . ': ' . lang ( 'Data not found' ) . ': ' . $_GET [ 'ical_data' ];
$event =& $this -> default_add_event ();
2015-03-24 10:43:38 +01:00
}
if ( ! empty ( $_GET [ 'ical' ]))
2011-05-26 20:28:41 +02:00
{
$ical = new calendar_ical ();
2015-09-16 13:36:51 +02:00
if ( ! ( $events = $ical -> icaltoegw ( $_GET [ 'ical' ], '' , 'utf-8' )))
2011-05-26 20:28:41 +02:00
{
error_log ( __METHOD__ . " (' $_GET[ical] ') error parsing iCal! " );
$msg = lang ( 'Error: importing the iCal' );
$event =& $this -> default_add_event ();
}
else
{
2015-09-16 13:36:51 +02:00
if ( count ( $events ) > 1 )
{
$msg = lang ( '%1 events in iCal file, only first one imported and displayed!' , count ( $events ));
$msg_type = 'notice' ; // no not hide automatic
}
2012-03-22 15:02:06 +01:00
// as icaltoegw returns timestamps in server-time, we have to convert them here to user-time
$this -> bo -> db2data ( $events , 'ts' );
2011-05-26 20:28:41 +02:00
$event = array_shift ( $events );
2011-05-26 20:40:35 +02:00
if (( $existing_event = $this -> bo -> read ( $event [ 'uid' ])))
2011-05-26 20:28:41 +02:00
{
2011-05-26 20:40:35 +02:00
$event = $existing_event ;
}
else
{
$event [ 'participant_types' ] = array ();
foreach ( $event [ 'participants' ] as $uid => $status )
{
2015-06-25 22:35:24 +02:00
$user_type = $user_id = null ;
2011-05-26 20:40:35 +02:00
calendar_so :: split_user ( $uid , $user_type , $user_id );
$event [ 'participant_types' ][ $user_type ][ $user_id ] = $status ;
}
2011-05-26 20:28:41 +02:00
}
//error_log(__METHOD__."(...) parsed as ".array2string($event));
}
unset ( $ical );
2012-03-08 19:43:40 +01:00
}
elseif ( ! $cal_id || $cal_id && ! ( $event = $this -> bo -> read ( $cal_id )))
{
if ( $cal_id )
{
if ( ! $preserv [ 'no_popup' ])
{
2016-05-01 19:47:59 +02:00
Framework :: window_close ( lang ( 'Permission denied' ));
2012-03-08 19:43:40 +01:00
}
else
{
2013-11-11 15:02:08 +01:00
$GLOBALS [ 'egw' ] -> framework -> render ( '<p class="message" align="center">' . lang ( 'Permission denied' ) . " </p> \n " , null , true );
2016-05-01 19:47:59 +02:00
exit ();
2012-03-08 19:43:40 +01:00
}
}
$event =& $this -> default_add_event ();
2011-05-26 20:28:41 +02:00
}
2006-12-22 20:51:56 +01:00
else
{
$preserv [ 'actual_date' ] = $event [ 'start' ]; // remember the date clicked
2010-06-08 18:36:55 +02:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE )
2006-12-22 20:51:56 +01:00
{
2010-05-03 09:52:10 +02:00
if ( empty ( $event [ 'whole_day' ]))
2008-02-07 03:38:55 +01:00
{
2010-05-03 09:52:10 +02:00
$date = $_GET [ 'date' ];
2008-02-07 03:38:55 +01:00
}
2009-08-17 16:38:18 +02:00
else
{
2016-05-01 19:47:59 +02:00
$date = $this -> bo -> so -> startOfDay ( new Api\DateTime ( $_GET [ 'date' ], Api\DateTime :: $user_timezone ));
2010-05-03 09:52:10 +02:00
$date -> setUser ();
2009-08-17 16:38:18 +02:00
}
2010-05-03 09:52:10 +02:00
$event = $this -> bo -> read ( $cal_id , $date , true );
$preserv [ 'actual_date' ] = $event [ 'start' ]; // remember the date clicked
2010-06-08 18:36:55 +02:00
if ( $_GET [ 'exception' ])
{
$msg = $this -> _create_exception ( $event , $preserv );
}
else
{
$event = $this -> bo -> read ( $cal_id , null , true );
}
2006-12-22 20:51:56 +01:00
}
}
2007-01-15 23:58:32 +01:00
// set new start and end if given by $_GET
2016-05-01 19:47:59 +02:00
if ( isset ( $_GET [ 'start' ])) { $event [ 'start' ] = Api\DateTime :: to ( $_GET [ 'start' ], 'ts' ); }
if ( isset ( $_GET [ 'end' ])) { $event [ 'end' ] = Api\DateTime :: to ( $_GET [ 'end' ], 'ts' ); }
2015-10-29 22:53:47 +01:00
if ( isset ( $_GET [ 'non_blocking' ])) { $event [ 'non_blocking' ] = ( bool ) $_GET [ 'non_blocking' ]; }
2005-11-09 00:15:14 +01:00
// check if the event is the whole day
$start = $this -> bo -> date2array ( $event [ 'start' ]);
$end = $this -> bo -> date2array ( $event [ 'end' ]);
$event [ 'whole_day' ] = ! $start [ 'hour' ] && ! $start [ 'minute' ] && $end [ 'hour' ] == 23 && $end [ 'minute' ] == 59 ;
$link_to_id = $event [ 'id' ];
2015-05-04 14:19:33 +02:00
if ( ! $event [ 'id' ] && isset ( $_REQUEST [ 'link_app' ]) && isset ( $_REQUEST [ 'link_id' ]))
2005-11-09 00:15:14 +01:00
{
2011-12-12 22:51:12 +01:00
$link_ids = is_array ( $_REQUEST [ 'link_id' ]) ? $_REQUEST [ 'link_id' ] : array ( $_REQUEST [ 'link_id' ]);
foreach ( is_array ( $_REQUEST [ 'link_app' ]) ? $_REQUEST [ 'link_app' ] : array ( $_REQUEST [ 'link_app' ]) as $n => $link_app )
{
$link_id = $link_ids [ $n ];
if ( ! preg_match ( '/^[a-z_0-9-]+:[:a-z_0-9-]+$/i' , $link_app . ':' . $link_id )) // guard against XSS
{
continue ;
}
2012-02-22 13:31:00 +01:00
if ( ! $n )
2011-12-12 22:51:12 +01:00
{
2016-05-01 19:47:59 +02:00
$event [ 'title' ] = Link :: title ( $link_app , $link_id );
2012-02-22 13:31:00 +01:00
// ask first linked app via "calendar_set" hook, for further data to set, incl. links
2016-05-01 19:47:59 +02:00
if (( $set = Api\Hooks :: single ( $event + array ( 'location' => 'calendar_set' , 'entry_id' => $link_id ), $link_app )))
2012-02-22 13:31:00 +01:00
{
foreach (( array ) $set [ 'link_app' ] as $i => $l_app )
2011-12-12 22:51:12 +01:00
{
2016-05-01 19:47:59 +02:00
if (( $l_id = $set [ 'link_id' ][ $i ])) Link :: link ( 'calendar' , $event [ 'link_to' ][ 'to_id' ], $l_app , $l_id );
2011-12-12 22:51:12 +01:00
}
2012-02-22 13:31:00 +01:00
unset ( $set [ 'link_app' ]);
unset ( $set [ 'link_id' ]);
2011-12-12 22:51:12 +01:00
2012-02-22 13:31:00 +01:00
$event = array_merge ( $event , $set );
}
2011-12-12 22:51:12 +01:00
}
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $link_to_id , $link_app , $link_id );
2011-12-12 22:51:12 +01:00
}
2005-11-09 00:15:14 +01:00
}
}
2020-04-03 10:28:34 +02:00
// set videoconference from existence of url in cfs
if ( ! isset ( $event [ 'videoconference' ]) && ! empty ( $event [ '##videoconference' ]))
{
$event [ 'videoconference' ] = ! empty ( $event [ '##videoconference' ]);
}
2014-06-05 13:03:12 +02:00
2016-05-01 19:47:59 +02:00
$etpl = new Etemplate ();
2009-11-25 21:16:41 +01:00
if ( ! $etpl -> read ( $preserv [ 'template' ]))
{
$etpl -> read ( $preserv [ 'template' ] = 'calendar.edit' );
}
2016-05-01 19:47:59 +02:00
$view = $preserv [ 'view' ] = $preserv [ 'view' ] || $event [ 'id' ] && ! $this -> bo -> check_perms ( Acl :: EDIT , $event );
2005-11-09 00:15:14 +01:00
//echo "view=$view, event="; _debug_array($event);
2008-05-08 00:12:25 +02:00
// shared locking of entries to edit
if ( ! $view && ( $locktime = $GLOBALS [ 'egw_info' ][ 'server' ][ 'Lock_Time_Calender' ]) && $event [ 'id' ])
{
2016-05-01 19:47:59 +02:00
$lock_path = Vfs :: app_entry_lock_path ( 'calendar' , $event [ 'id' ]);
2008-05-08 00:12:25 +02:00
$lock_owner = 'mailto:' . $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_email' ];
2015-06-25 22:35:24 +02:00
if (( $preserv [ 'lock_token' ] = $event [ 'lock_token' ])) // already locked --> refresh the lock
2008-05-08 00:12:25 +02:00
{
2016-05-01 19:47:59 +02:00
Vfs :: lock ( $lock_path , $preserv [ 'lock_token' ], $locktime , $lock_owner , $scope = 'shared' , $type = 'write' , true , false );
2008-05-08 00:12:25 +02:00
}
2016-05-01 19:47:59 +02:00
if (( $lock = Vfs :: checkLock ( $lock_path )) && $lock [ 'owner' ] != $lock_owner )
2008-05-08 00:12:25 +02:00
{
$msg .= ' ' . lang ( 'This entry is currently opened by %1!' ,
(( $lock_uid = $GLOBALS [ 'egw' ] -> accounts -> name2id ( substr ( $lock [ 'owner' ], 7 ), 'account_email' )) ?
2016-05-01 19:47:59 +02:00
Api\Accounts :: username ( $lock_uid ) : $lock [ 'owner' ]));
2008-05-08 00:12:25 +02:00
}
elseif ( $lock )
{
$preserv [ 'lock_token' ] = $lock [ 'token' ];
}
2016-05-01 19:47:59 +02:00
elseif ( Vfs :: lock ( $lock_path , $preserv [ 'lock_token' ], $locktime , $lock_owner , $scope = 'shared' , $type = 'write' , false , false ))
2008-05-08 00:12:25 +02:00
{
2013-10-31 15:51:19 +01:00
//We handle AJAX_REQUEST in client-side for unlocking the locked entry, in case of closing the entry by X button or close button
2008-05-08 00:12:25 +02:00
}
else
{
$msg .= ' ' . lang ( " Can't aquire lock! " ); // eg. an exclusive lock via CalDAV ...
$view = true ;
}
}
2005-11-09 00:15:14 +01:00
$content = array_merge ( $event , array (
2017-04-10 19:21:03 +02:00
'cal_id' => $event [ 'id' ],
2005-11-09 00:15:14 +01:00
'link_to' => array (
'to_id' => $link_to_id ,
'to_app' => 'calendar' ,
),
'edit_single' => $preserv [ 'edit_single' ], // need to be in content too, as it is used in the template
2010-08-16 09:13:47 +02:00
'tabs' => $preserv [ 'tabs' ],
2005-11-09 00:15:14 +01:00
'view' => $view ,
2011-04-08 16:21:23 +02:00
'query_delete_exceptions' => ( int )( $event [ 'recur_type' ] && $event [ 'recur_exception' ]),
2005-11-09 00:15:14 +01:00
));
2016-05-01 19:47:59 +02:00
Framework :: message ( $msg , $msg_type );
2006-06-03 01:36:43 +02:00
$content [ 'duration' ] = $content [ 'end' ] - $content [ 'start' ];
if ( isset ( $this -> durations [ $content [ 'duration' ]])) $content [ 'end' ] = '' ;
2006-12-22 20:51:56 +01:00
$readonlys = $content [ 'participants' ] = $preserv [ 'participants' ] = array ();
2010-11-11 14:29:37 +01:00
// preserve some ui elements, if set eg. under error-conditions
foreach ( array ( 'quantity' , 'resource' , 'role' ) as $n )
{
if ( isset ( $event [ 'participants' ][ $n ])) $content [ 'participants' ][ $n ] = $event [ 'participants' ][ $n ];
}
2021-03-04 14:36:46 +01:00
$this -> setup_participants ( $event , $content , $sel_options , $readonlys , $preserv , $view );
2014-02-10 23:01:01 +01:00
2006-12-22 20:51:56 +01:00
$content [ 'participants' ][ 'status_date' ] = $preserv [ 'actual_date' ];
2020-04-03 10:28:34 +02:00
// set notify_externals in participants from cfs
if ( ! empty ( $event [ '##notify_externals' ]))
{
$content [ 'participants' ][ 'notify_externals' ] = $event [ '##notify_externals' ];
}
else
{
$content [ 'participants' ][ 'notify_externals' ] = $this -> cal_prefs [ 'notify_externals' ];
}
2015-06-25 22:35:24 +02:00
$preserved = array_merge ( $preserv , $content );
2014-05-28 17:04:06 +02:00
$event [ 'new_alarm' ][ 'options' ] = $content [ 'new_alarm' ][ 'options' ];
2005-11-09 00:15:14 +01:00
if ( $event [ 'alarm' ])
{
// makes keys of the alarm-array starting with 1
$content [ 'alarm' ] = array ( false );
2015-06-25 22:35:24 +02:00
foreach ( array_values ( $event [ 'alarm' ]) as $id => $alarm )
2005-11-09 00:15:14 +01:00
{
2016-05-01 19:47:59 +02:00
if ( ! $alarm [ 'all' ] && ! $this -> bo -> check_perms ( Acl :: READ , 0 , $alarm [ 'owner' ]))
2005-11-09 00:15:14 +01:00
{
2015-06-25 22:35:24 +02:00
continue ; // no read rights to the calendar of the alarm-owner, dont show the alarm
2005-11-09 00:15:14 +01:00
}
2015-06-25 22:35:24 +02:00
$alarm [ 'all' ] = ( int ) $alarm [ 'all' ];
2018-08-13 15:22:09 +02:00
// fix alarm time in case of alread run alarms, where the time will be their keep_time / when they will be cleaned up otherwise
$alarm [ 'time' ] = $event [ 'start' ] - $alarm [ 'offset' ];
2015-06-25 22:35:24 +02:00
$after = false ;
if ( $alarm [ 'offset' ] < 0 )
{
$after = true ;
$alarm [ 'offset' ] = - 1 * $alarm [ 'offset' ];
}
$days = ( int ) ( $alarm [ 'offset' ] / DAY_s );
$hours = ( int ) (( $alarm [ 'offset' ] % DAY_s ) / HOUR_s );
$minutes = ( int ) (( $alarm [ 'offset' ] % HOUR_s ) / 60 );
$label = array ();
if ( $days ) $label [] = $days . ' ' . lang ( 'days' );
if ( $hours ) $label [] = $hours . ' ' . lang ( 'hours' );
if ( $minutes ) $label [] = $minutes . ' ' . lang ( 'Minutes' );
2018-08-10 11:31:06 +02:00
if ( ! $label )
{
$alarm [ 'offset' ] = lang ( 'at start of the event' );
}
else
{
$alarm [ 'offset' ] = implode ( ', ' , $label ) . ' ' . ( $after ? lang ( 'after' ) : lang ( 'before' ));
}
2015-06-25 22:35:24 +02:00
$content [ 'alarm' ][] = $alarm ;
2016-05-01 19:47:59 +02:00
$readonlys [ 'alarm[delete_alarm][' . $alarm [ 'id' ] . ']' ] = ! $this -> bo -> check_perms ( Acl :: EDIT , $alarm [ 'all' ] ? $event : 0 , $alarm [ 'owner' ]);
2005-11-09 00:15:14 +01:00
}
2009-11-04 10:41:19 +01:00
if ( count ( $content [ 'alarm' ]) == 1 )
{
$content [ 'alarm' ] = false ; // no alarms added to content array
}
2005-11-09 00:15:14 +01:00
}
else
{
$content [ 'alarm' ] = false ;
}
2012-11-14 17:25:21 +01:00
$content [ 'msg' ] = $msg ;
2005-11-09 00:15:14 +01:00
if ( $view )
{
2011-08-01 17:57:23 +02:00
$readonlys [ '__ALL__' ] = true ; // making everything readonly, but widgets set explicitly to false
2014-10-01 16:08:31 +02:00
$readonlys [ 'button[cancel]' ] = $readonlys [ 'action' ] =
2011-08-01 17:57:23 +02:00
$readonlys [ 'before_after' ] = $readonlys [ 'button[add_alarm]' ] = $readonlys [ 'new_alarm[owner]' ] =
2014-09-23 15:49:22 +02:00
$readonlys [ 'new_alarm[options]' ] = $readonlys [ 'new_alarm[date]' ] = false ;
2008-05-08 00:12:25 +02:00
2006-12-22 20:51:56 +01:00
$content [ 'participants' ][ 'no_add' ] = true ;
2009-11-25 21:16:41 +01:00
2015-07-22 16:44:19 +02:00
if ( ! $event [ 'whole_day' ])
{
$etpl -> setElementAttribute ( 'whole_day' , 'disabled' , true );
}
2009-11-26 09:28:06 +01:00
// respect category permissions
if ( ! empty ( $event [ 'category' ]))
{
2016-05-01 19:47:59 +02:00
$content [ 'category' ] = $this -> categories -> check_list ( Acl :: READ , $event [ 'category' ]);
2009-11-26 09:28:06 +01:00
}
2005-11-09 00:15:14 +01:00
}
else
{
2010-06-09 20:00:11 +02:00
$readonlys [ 'recur_exception' ] = true ;
2010-02-24 16:05:00 +01:00
2010-01-23 11:40:44 +01:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE )
{
2010-06-09 20:00:11 +02:00
$readonlys [ 'recur_exception' ] = ! count ( $content [ 'recur_exception' ]); // otherwise we get a delete button
2013-10-31 15:51:19 +01:00
//$onclick =& $etpl->get_cell_attribute('button[delete]','onclick');
//$onclick = str_replace('Delete this event','Delete this series of recuring events',$onclick);
2010-01-23 11:40:44 +01:00
}
2010-01-23 13:43:35 +01:00
elseif ( $event [ 'reference' ] != 0 )
{
$readonlys [ 'recur_type' ] = $readonlys [ 'recur_enddate' ] = true ;
$readonlys [ 'recur_interval' ] = $readonlys [ 'recur_data' ] = true ;
}
2005-11-09 00:15:14 +01:00
}
2016-04-04 23:40:45 +02:00
if ( $content [ 'category' ] && ! is_array ( $content [ 'category' ]))
{
$content [ 'category' ] = explode ( ',' , $event [ 'category' ]);
}
2005-11-09 00:15:14 +01:00
// disabling the custom fields tab, if there are none
2010-08-16 09:13:47 +02:00
$readonlys [ 'tabs' ] = array (
2014-07-09 11:35:22 +02:00
'custom' => ! count ( $this -> bo -> customfields ),
2006-08-22 18:50:45 +02:00
'participants' => $this -> accountsel -> account_selection == 'none' ,
2014-02-05 12:14:44 +01:00
'history' => ! $event [ 'id' ],
2005-11-09 00:15:14 +01:00
);
2014-03-20 17:10:52 +01:00
if ( ! isset ( $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'mail' ])) // no mail without mail-app
2006-12-22 20:51:56 +01:00
{
unset ( $sel_options [ 'action' ][ 'mail' ]);
2011-12-16 10:55:57 +01:00
unset ( $sel_options [ 'action' ][ 'sendmeetingrequest' ]);
2006-12-22 20:51:56 +01:00
}
if ( ! $event [ 'id' ]) // no ical export for new (not saved) events
2005-11-09 00:15:14 +01:00
{
2006-12-22 20:51:56 +01:00
$readonlys [ 'action' ] = true ;
2005-11-09 00:15:14 +01:00
}
2016-05-01 19:47:59 +02:00
if ( ! ( $readonlys [ 'button[exception]' ] = ! $this -> bo -> check_perms ( Acl :: EDIT , $event ) || $event [ 'recur_type' ] == MCAL_RECUR_NONE || ( $event [ 'recur_enddate' ] && $event [ 'start' ] > $event [ 'recur_enddate' ])))
2005-11-09 00:15:14 +01:00
{
2015-06-25 22:35:24 +02:00
$content [ 'exception_label' ] = $this -> bo -> long_date ( max ( $preserved [ 'actual_date' ], $event [ 'start' ]));
2005-11-09 00:15:14 +01:00
}
2016-05-01 19:47:59 +02:00
$readonlys [ 'button[delete]' ] = ! $event [ 'id' ] || $preserved [ 'hide_delete' ] || ! $this -> bo -> check_perms ( Acl :: DELETE , $event );
2005-11-23 22:39:37 +01:00
2016-05-01 19:47:59 +02:00
if ( ! $event [ 'id' ] || $this -> bo -> check_perms ( Acl :: EDIT , $event )) // new event or edit rights to the event ==> allow to add alarm for all users
2005-11-09 00:15:14 +01:00
{
$sel_options [ 'owner' ][ 0 ] = lang ( 'All participants' );
}
2007-05-07 11:35:05 +02:00
if ( isset ( $event [ 'participant_types' ][ 'u' ][ $this -> user ]))
{
$sel_options [ 'owner' ][ $this -> user ] = $this -> bo -> participant_name ( $this -> user );
}
2005-11-09 00:15:14 +01:00
foreach (( array ) $event [ 'participant_types' ][ 'u' ] as $uid => $status )
{
2016-05-01 19:47:59 +02:00
if ( $uid != $this -> user && $status != 'R' && $this -> bo -> check_perms ( Acl :: EDIT , 0 , $uid ))
2005-11-09 00:15:14 +01:00
{
$sel_options [ 'owner' ][ $uid ] = $this -> bo -> participant_name ( $uid );
}
}
$content [ 'no_add_alarm' ] = ! count ( $sel_options [ 'owner' ]); // no rights to set any alarm
if ( ! $event [ 'id' ])
{
2008-05-08 00:12:25 +02:00
$etpl -> set_cell_attribute ( 'button[new_alarm]' , 'type' , 'checkbox' );
2005-11-09 00:15:14 +01:00
}
2015-06-25 22:35:24 +02:00
if ( $preserved [ 'no_popup' ])
2005-11-09 00:15:14 +01:00
{
2017-07-26 17:45:48 +02:00
// If not a popup, load the normal calendar interface on cancel
2017-10-05 19:20:21 +02:00
$etpl -> set_cell_attribute ( 'button[cancel]' , 'onclick' , 'app.calendar.linkHandler(\'index.php?menuaction=calendar.calendar_uiviews.index&ajax=true\')' );
2005-11-09 00:15:14 +01:00
}
2010-02-12 21:18:45 +01:00
2010-06-28 13:38:28 +02:00
// Allow admins to restore deleted events
2011-04-27 18:53:06 +02:00
if ( $GLOBALS [ 'egw_info' ][ 'server' ][ 'calendar_delete_history' ] && $event [ 'deleted' ] )
2010-06-28 13:38:28 +02:00
{
2015-06-25 22:35:24 +02:00
$content [ 'deleted' ] = $preserved [ 'deleted' ] = null ;
2010-09-09 11:11:57 +02:00
$etpl -> set_cell_attribute ( 'button[save]' , 'label' , 'Recover' );
2010-06-28 13:38:28 +02:00
$etpl -> set_cell_attribute ( 'button[apply]' , 'disabled' , true );
}
2011-03-21 17:57:11 +01:00
// Allow users to prevent notifications?
2011-04-27 18:53:06 +02:00
$etpl -> set_cell_attribute ( 'no_notifications' , 'disabled' , ! $GLOBALS [ 'egw_info' ][ 'server' ][ 'calendar_allow_no_notification' ]);
2010-06-28 13:38:28 +02:00
2010-02-12 21:18:45 +01:00
// Setup history tab
$this -> setup_history ( $content , $sel_options );
2009-07-22 17:38:58 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'calendar' ) . ' - '
. ( ! $event [ 'id' ] ? lang ( 'Add' )
: ( $view ? ( $content [ 'edit_single' ] ? lang ( 'View exception' ) : ( $content [ 'recur_type' ] ? lang ( 'View series' ) : lang ( 'View' )))
: ( $content [ 'edit_single' ] ? lang ( 'Create exception' ) : ( $content [ 'recur_type' ] ? lang ( 'Edit series' ) : lang ( 'Edit' )))));
2010-04-16 15:24:58 +02:00
2007-01-15 23:58:32 +01:00
$content [ 'cancel_needs_refresh' ] = ( bool ) $_GET [ 'cancel_needs_refresh' ];
2008-01-17 16:39:22 +01:00
2015-06-25 22:35:24 +02:00
if ( ! empty ( $preserved [ 'lock_token' ])) $content [ 'lock_token' ] = $preserved [ 'lock_token' ];
2013-10-31 15:51:19 +01:00
2020-11-19 12:38:03 +01:00
//Disable videoconference if the module is not enabled
2020-11-19 15:39:13 +01:00
$etpl -> disableElement ( 'videoconference' , $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'status' ] && EGroupware\Status\Hooks :: isVideoconferenceDisabled ());
2020-11-19 12:38:03 +01:00
2007-01-15 23:58:32 +01:00
// non_interactive==true from $_GET calls immediate save action without displaying the edit form
if ( isset ( $_GET [ 'non_interactive' ]) && ( bool ) $_GET [ 'non_interactive' ] === true )
{
unset ( $_GET [ 'non_interactive' ]); // prevent process_exec <--> edit loops
$content [ 'button' ][ 'save' ] = true ;
2015-06-25 22:35:24 +02:00
$this -> process_edit ( array_merge ( $content , $preserved ));
2007-01-15 23:58:32 +01:00
}
else
{
2020-04-03 10:28:34 +02:00
$etpl -> exec ( 'calendar.calendar_uiforms.process_edit' , $content , $sel_options , $readonlys , $preserved + [
'##videoconference' => $content [ '##videoconference' ],
], $preserved [ 'no_popup' ] ? 0 : 2 );
2007-01-15 23:58:32 +01:00
}
2005-11-09 00:15:14 +01:00
}
2021-02-09 21:42:51 +01:00
/**
* Set up the participants for display in edit dialog
*
2021-03-04 14:36:46 +01:00
* @ param array $event
* @ param array $content
* @ param array $sel_options
* @ param array $readonlys
* @ param array $preserv
* @ param string $view
2021-02-09 21:42:51 +01:00
*/
2021-03-04 14:36:46 +01:00
protected function setup_participants ( array $event , array & $content , array & $sel_options , array & $readonlys , array & $preserv , $view )
2021-02-09 21:42:51 +01:00
{
$row = 3 ;
foreach ( $event [ 'participant_types' ] as $type => $participants )
{
$name = 'accounts' ;
if ( isset ( $this -> bo -> resources [ $type ]))
{
$name = $this -> bo -> resources [ $type ][ 'app' ];
}
// sort participants (in there group/app) by title
uksort ( $participants , array ( $this , 'uid_title_cmp' ));
foreach ( $participants as $id => $status )
{
$uid = $type == 'u' ? $id : $type . $id ;
$quantity = $role = null ;
calendar_so :: split_status ( $status , $quantity , $role );
$preserv [ 'participants' ][ $row ] = $content [ 'participants' ][ $row ] = array (
'app' => $name == 'accounts' ? ( $GLOBALS [ 'egw' ] -> accounts -> get_type ( $id ) == 'g' ? 'Group' : 'User' ) : $name ,
'uid' => $uid ,
'status' => $status ,
'old_status' => $status ,
'quantity' => $quantity > 1 || $uid [ 0 ] == 'r' ? $quantity : '' , // only display quantity for resources or if > 1
'role' => $role ,
);
// replace iCal roles with a nicer label and remove regular REQ-PARTICIPANT
if ( isset ( $this -> bo -> roles [ $role ]))
{
$content [ 'participants' ][ $row ][ 'role_label' ] = lang ( $this -> bo -> roles [ $role ]);
}
// allow third party apps to use categories for roles
elseif ( substr ( $role , 0 , 6 ) == 'X-CAT-' )
{
$content [ 'participants' ][ $row ][ 'role_label' ] = $GLOBALS [ 'egw' ] -> categories -> id2name ( substr ( $role , 6 ));
}
else
{
$content [ 'participants' ][ $row ][ 'role_label' ] = lang ( str_replace ( 'X-' , '' , $role ));
}
$content [ 'participants' ][ $row ][ 'delete_id' ] = strpbrk ( $uid , '"\'<>' ) !== false ? md5 ( $uid ) : $uid ;
//echo "<p>$uid ($quantity): $role --> {$content['participants'][$row]['role']}</p>\n";
if (( $no_status = ! $this -> bo -> check_status_perms ( $uid , $event )) || $view )
$readonlys [ 'participants' ][ $row ][ 'status' ] = $no_status ;
if ( $preserv [ 'hide_delete' ] || ! $this -> bo -> check_perms ( Acl :: EDIT , $event ))
$readonlys [ 'participants' ][ 'delete' ][ $uid ] = true ;
// todo: make the participants available as links with email as title
$content [ 'participants' ][ $row ++ ][ 'title' ] = $this -> get_title ( $uid );
// enumerate group-invitations, so people can accept/reject them
if ( $name == 'accounts' && $GLOBALS [ 'egw' ] -> accounts -> get_type ( $id ) == 'g' &&
( $members = $GLOBALS [ 'egw' ] -> accounts -> members ( $id , true )))
{
$sel_options [ 'status' ][ 'G' ] = lang ( 'Select one' );
// sort members by title
usort ( $members , array ( $this , 'uid_title_cmp' ));
foreach ( $members as $member )
{
if ( ! isset ( $participants [ $member ]) && $this -> bo -> check_perms ( Acl :: READ , 0 , $member ))
{
$preserv [ 'participants' ][ $row ] = $content [ 'participants' ][ $row ] = array (
'app' => 'Group invitation' ,
'uid' => $member ,
'status' => 'G' ,
);
$readonlys [ 'participants' ][ $row ][ 'quantity' ] = $readonlys [ 'participants' ][ 'delete' ][ $member ] = true ;
// read access is enough to invite participants, but you need edit rights to change status
$readonlys [ 'participants' ][ $row ][ 'status' ] = ! $this -> bo -> check_perms ( Acl :: EDIT , 0 , $member );
$content [ 'participants' ][ $row ++ ][ 'title' ] = Api\Accounts :: username ( $member );
}
}
}
}
// resouces / apps we shedule, atm. resources and addressbook
$content [ 'participants' ][ 'cal_resources' ] = '' ;
foreach ( $this -> bo -> resources as $data )
{
if ( $data [ 'app' ] == 'email' ) continue ; // make no sense, as we cant search for email
$content [ 'participants' ][ 'cal_resources' ] .= ',' . $data [ 'app' ];
}
}
}
2008-05-08 00:12:25 +02:00
/**
* Remove ( shared ) lock via ajax , when edit popup get ' s closed
*
* @ param int $id
* @ param string $token
*/
function ajax_unlock ( $id , $token )
{
2016-05-01 19:47:59 +02:00
$lock_path = Vfs :: app_entry_lock_path ( 'calendar' , $id );
2008-05-08 00:12:25 +02:00
$lock_owner = 'mailto:' . $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_email' ];
2016-05-01 19:47:59 +02:00
if (( $lock = Vfs :: checkLock ( $lock_path )) && $lock [ 'owner' ] == $lock_owner || $lock [ 'token' ] == $token )
2008-05-08 00:12:25 +02:00
{
2016-05-01 19:47:59 +02:00
Vfs :: unlock ( $lock_path , $token , false );
2008-05-08 00:12:25 +02:00
}
}
2011-05-27 22:32:46 +02:00
/**
2019-02-21 15:06:26 +01:00
* Display iCal meeting request for EMail app and allow to accept , tentative or reject it or a reply and allow to apply it
2011-05-27 22:32:46 +02:00
*
* @ todo Handle situation when user is NOT invited , but eg . can view that mail ...
2015-05-04 14:19:33 +02:00
* @ param array $event = null ; special usage if $event is array ( 'event' => null , 'msg' => '' , 'useSession' => true ) we
2013-06-03 11:57:00 +02:00
* are called by new mail - app ; and we intend to use the stuff passed on by session
2015-05-04 14:19:33 +02:00
* @ param string $msg = null
2011-05-27 22:32:46 +02:00
*/
2014-06-05 13:03:12 +02:00
function meeting ( array $event = null , $msg = null )
2011-05-27 22:32:46 +02:00
{
$user = $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ];
2013-02-01 13:22:56 +01:00
$readonlys [ 'button[apply]' ] = true ;
2013-06-03 11:57:00 +02:00
$_usesession =! is_array ( $event );
//special usage if $event is array('event'=>null,'msg'=>'','useSession'=>true) we
//are called by new mail-app; and we intend to use the stuff passed on by session
if ( $event == array ( 'event' => null , 'msg' => '' , 'useSession' => true ))
{
$event = null ; // set to null
$_usesession = true ; // trigger session read
}
2011-05-27 22:32:46 +02:00
if ( ! is_array ( $event ))
{
2011-05-31 12:12:39 +02:00
$ical_charset = 'utf-8' ;
$ical_string = $_GET [ 'ical' ];
2013-06-03 11:57:00 +02:00
if ( $ical_string == 'session' || $_usesession )
2011-05-31 12:12:39 +02:00
{
2016-05-01 19:47:59 +02:00
$session_data = Api\Cache :: getSession ( 'calendar' , 'ical' );
2011-05-31 12:12:39 +02:00
$ical_string = $session_data [ 'attachment' ];
$ical_charset = $session_data [ 'charset' ];
2012-06-06 09:39:57 +02:00
$ical_method = $session_data [ 'method' ];
2011-05-31 12:12:39 +02:00
unset ( $session_data );
}
2011-05-27 22:32:46 +02:00
$ical = new calendar_ical ();
2011-05-31 12:12:39 +02:00
if ( ! ( $events = $ical -> icaltoegw ( $ical_string , '' , $ical_charset )) || count ( $events ) != 1 )
2011-05-27 22:32:46 +02:00
{
error_log ( __METHOD__ . " (' $_GET[ical] ') error parsing iCal! " );
2016-05-01 19:47:59 +02:00
$GLOBALS [ 'egw' ] -> framework -> render ( Api\Html :: fieldset ( '<pre>' . htmlspecialchars ( $ical_string ) . '</pre>' ,
2011-05-27 22:32:46 +02:00
lang ( 'Error: importing the iCal' )));
return ;
}
$event = array_shift ( $events );
2014-03-13 15:09:41 +01:00
// convert event from servertime returned by calendar_ical to user-time
$this -> bo -> server2usertime ( $event );
2020-12-08 20:30:49 +01:00
// Check if this is an exception
if ( $event [ 'recur_type' ] && count ( $event [ 'recur_exception' ]) && ! $event [ 'recurrence' ])
{
$diff = $event [ 'recur_exception' ][ 0 ] - $event [ 'start' ];
$event [ 'start' ] += $diff ;
$event [ 'end' ] += $diff ;
}
2018-06-27 18:26:42 +02:00
if (( $existing_event = $this -> bo -> read ( $event [ 'uid' ], $event [ 'recurrence' ], false , 'ts' , null , true )) && // true = read the exception
! $existing_event [ 'deleted' ])
2011-05-27 22:32:46 +02:00
{
2013-02-01 13:22:56 +01:00
switch ( strtolower ( $ical_method ))
2011-05-27 22:32:46 +02:00
{
2013-02-01 13:22:56 +01:00
case 'reply' :
2015-10-14 18:39:39 +02:00
// first participant is the one replying (our iCal parser adds owner first!)
$parts = $event [ 'participants' ];
unset ( $parts [ $existing_event [ 'owner' ]]);
2019-02-12 22:13:45 +01:00
$event [ 'ical_sender_uid' ] = key ( $parts );
$event [ 'ical_sender_status' ] = current ( $parts );
2015-10-14 18:39:39 +02:00
$quantity = $role = null ;
calendar_so :: split_status ( $event [ 'ical_sender_status' ], $quantity , $role );
if ( $event [ 'ical_sender_uid' ] && $this -> bo -> check_status_perms ( $event [ 'ical_sender_uid' ], $existing_event ))
2013-02-01 13:22:56 +01:00
{
$existing_status = $existing_event [ 'participants' ][ $event [ 'ical_sender_uid' ]];
calendar_so :: split_status ( $existing_status , $quantity , $role );
2013-02-01 17:54:51 +01:00
if ( $existing_status != $event [ 'ical_sender_status' ])
2013-02-01 13:22:56 +01:00
{
$readonlys [ 'button[apply]' ] = false ;
}
else
{
2019-01-10 18:59:29 +01:00
$event [ 'error' ] = lang ( 'Status already applied' );
2013-02-01 13:22:56 +01:00
}
}
break ;
case 'request' :
$status = $existing_event [ 'participants' ][ $user ];
calendar_so :: split_status ( $status , $quantity , $role );
if ( strtolower ( $ical_method ) == 'response' && isset ( $existing_event [ 'participants' ][ $user ]) &&
$status != 'U' && isset ( $this -> bo -> verbose_status [ $status ]))
{
2019-01-10 18:59:29 +01:00
$event [ 'error' ] = lang ( 'You already replied to this invitation with' ) . ': ' . lang ( $this -> bo -> verbose_status [ $status ]);
2013-02-01 13:22:56 +01:00
}
else
{
2019-01-10 18:59:29 +01:00
$event [ 'error' ] = lang ( 'Using already existing event on server.' );
2013-02-01 13:22:56 +01:00
}
2015-10-14 18:39:39 +02:00
$user_and_memberships = $GLOBALS [ 'egw' ] -> accounts -> memberships ( $user , true );
$user_and_memberships [] = $user ;
if ( ! array_intersect ( array_keys ( $event [ 'participants' ]), $user_and_memberships ))
{
2019-01-10 18:59:29 +01:00
$event [ 'error' ] .= ( $event [ 'error' ] ? " \n " : '' ) . lang ( 'You are not invited to that event!' );
2015-10-14 18:39:39 +02:00
if ( $event [ 'id' ])
{
$readonlys [ 'button[accept]' ] = $readonlys [ 'button[tentativ]' ] =
$readonlys [ 'button[reject]' ] = $readonlys [ 'button[cancel]' ] = true ;
}
}
2011-05-27 22:32:46 +02:00
break ;
2020-06-16 16:53:43 +02:00
case 'cancel' :
// first participant is the (external) organizer (our iCal parser adds owner first!)
$parts = $event [ 'participants' ];
unset ( $parts [ $existing_event [ 'owner' ]]);
$event [ 'ical_sender_uid' ] = key ( $parts );
if ( empty ( $existing_event [ 'id' ]) || ! $this -> bo -> check_perms ( Acl :: DELETE , $existing_event [ 'id' ]))
{
$readonlys [ 'button[delete]' ] = true ;
}
2011-05-27 22:32:46 +02:00
}
2013-02-01 13:22:56 +01:00
$event [ 'id' ] = $existing_event [ 'id' ];
2021-02-25 18:33:34 +01:00
if ( $existing_event [ '##videoconference' ])
{
$event [ '##videoconference' ] = $existing_event [ '##videoconference' ];
}
2011-05-27 22:32:46 +02:00
}
2015-07-16 11:34:55 +02:00
else // event not in calendar
{
$readonlys [ 'button[cancel]' ] = true ; // no way to remove a canceled event not in calendar
}
2013-02-01 13:22:56 +01:00
$event [ 'participant_types' ] = array ();
foreach ( $event [ 'participants' ] as $uid => $status )
2011-05-27 22:32:46 +02:00
{
2015-06-25 22:35:24 +02:00
$user_type = $user_id = null ;
2013-02-01 13:22:56 +01:00
calendar_so :: split_user ( $uid , $user_type , $user_id );
$event [ 'participants' ][ $uid ] = $event [ 'participant_types' ][ $user_type ][ $user_id ] =
$status && $status !== 'X' ? $status : 'U' ; // X --> no status given --> U = unknown
2011-05-27 22:32:46 +02:00
}
//error_log(__METHOD__."(...) parsed as ".array2string($event));
$event [ 'recure' ] = $this -> bo -> recure2string ( $event );
$event [ 'all_participants' ] = implode ( " , \n " , $this -> bo -> participants ( $event , true ));
2019-01-10 18:59:29 +01:00
// EGroupware event has been deleted, dont let user resurect it by accepting again
if ( $existing_event && $existing_event [ 'deleted' ] && strtolower ( $ical_method ) !== 'cancel' )
{
// check if this is an EGroupware event or has an external organizer
foreach ( $existing_event [ 'participants' ] as $uid => $status )
{
$quantity = $role = null ;
calendar_so :: split_status ( $status , $quantity , $role );
if ( ! is_numeric ( $uid ) && $role == 'CHAIR' ) break ;
}
if ( ! ( ! is_numeric ( $uid ) && $role == 'CHAIR' ))
{
$event [ 'error' ] = lang ( 'Event has been deleted by organizer!' );
$readonlys [ 'button[accept]' ] = $readonlys [ 'button[tentativ]' ] =
$readonlys [ 'button[reject]' ] = $readonlys [ 'button[cancel]' ] = true ;
}
}
2012-03-12 09:52:40 +01:00
// ignore events in the past (for recurring events check enddate!)
2019-01-10 18:59:29 +01:00
elseif ( $this -> bo -> date2ts ( $event [ 'start' ]) < $this -> bo -> now_su &&
2012-03-12 09:52:40 +01:00
( ! $event [ 'recur_type' ] || $event [ 'recur_enddate' ] && $event [ 'recur_enddate' ] < $this -> bo -> now_su ))
2011-05-27 22:32:46 +02:00
{
2019-01-10 18:59:29 +01:00
$event [ 'error' ] = lang ( 'Requested meeting is in the past!' );
2015-07-16 11:34:55 +02:00
$readonlys [ 'button[accept]' ] = $readonlys [ 'button[tentativ]' ] =
$readonlys [ 'button[reject]' ] = $readonlys [ 'button[cancel]' ] = true ;
2011-05-27 22:32:46 +02:00
}
}
else
{
//_debug_array($event);
2018-12-18 18:20:23 +01:00
$button = key ( $event [ 'button' ]);
2011-05-27 22:32:46 +02:00
unset ( $event [ 'button' ]);
2014-06-05 13:03:12 +02:00
// clear notification errors
notifications :: errors ( true );
2011-05-27 22:32:46 +02:00
switch ( $button )
{
case 'reject' :
if ( ! $event [ 'id' ])
{
// send reply to organizer
$this -> bo -> send_update ( MSG_REJECTED , array ( 'e' . $event [ 'organizer' ] => 'DCHAIR' ), $event );
break ; // no need to store rejected event
}
// fall-through
case 'accept' :
case 'tentativ' :
$status = strtoupper ( $button [ 0 ]); // A, R or T
if ( ! $event [ 'id' ])
{
2012-04-24 16:37:32 +02:00
// if organizer is a EGroupware user, but we have no rights to organizers calendar
2016-05-01 19:47:59 +02:00
if ( isset ( $event [ 'owner' ]) && ! $this -> bo -> check_perms ( Acl :: ADD , 0 , $event [ 'owner' ]))
2012-04-24 16:37:32 +02:00
{
// --> make organize a participant with role chair and current user the owner
$event [ 'participant_types' ][ 'u' ] = $event [ 'participants' ][ $event [ 'owner' ]] =
calendar_so :: combine_status ( 'A' , 1 , 'CHAIR' );
$event [ 'owner' ] = $this -> user ;
}
2011-05-27 22:32:46 +02:00
// store event without notifications!
if (( $event [ 'id' ] = $this -> bo -> update ( $event , $ignore_conflicts = true , true , false , true , $msg , true )))
{
2012-04-24 16:37:32 +02:00
$msg [] = lang ( 'Event saved' );
2011-05-27 22:32:46 +02:00
}
else
{
2012-04-24 16:37:32 +02:00
$msg [] = lang ( 'Error saving the event!' );
2011-05-27 22:32:46 +02:00
break ;
}
}
2019-02-21 15:06:26 +01:00
// do we need to update the event itself (user-status is reset to old in event_changed!)
2018-06-27 18:26:42 +02:00
elseif ( self :: event_changed ( $event , $event [ 'old' ]))
{
// check if we are allowed to update the event
if ( $this -> bo -> check_perms ( Acl :: EDIT , $event [ 'old' ]))
{
if ( $event [ 'recurrence' ] && ! $event [ 'old' ][ 'reference' ] && ( $recur_event = $this -> bo -> read ( $event [ 'id' ])))
{
// first we need to add the exception to the recurrence master
$recur_event [ 'recur_exception' ][] = $event [ 'recurrence' ];
// check if we need to move the alarms, because they are next on that exception
$this -> bo -> check_move_alarms ( $recur_event , null , $event [ 'recurrence' ]);
unset ( $recur_event [ 'start' ]); unset ( $recur_event [ 'end' ]); // no update necessary
unset ( $recur_event [ 'alarm' ]); // unsetting alarms too, as they cant be updated without start!
$this -> bo -> update ( $recur_event , $ignore_conflicts = true , true , false , true , $msg , true );
// then we need to create the exception as new event
unset ( $event [ 'id' ]);
$event [ 'reference' ] = $event [ 'old' ][ 'id' ];
$event [ 'caldav_name' ] = $event [ 'old' ][ 'caldav_name' ];
}
else
{
// keep all EGroupware only values of existing events plus alarms
unset ( $event [ 'alarm' ]);
$event = array_merge ( $event [ 'old' ], $event );
}
unset ( $event [ 'old' ]);
if (( $event [ 'id' ] = $this -> bo -> update ( $event , $ignore_conflicts = true , true , false , true , $msg , true )))
{
$msg [] = lang ( 'Event saved' );
}
else
{
$msg [] = lang ( 'Error saving the event!' );
break ;
}
}
else
{
$event [ 'id' ] = $event [ 'old' ][ 'id' ];
2019-01-10 17:34:33 +01:00
// disable "warning" that we have no rights to store any modifications
// as that confuses our users, who only want to accept or reject
//$msg[] = lang('Not enough rights to update the event!');
2018-06-27 18:26:42 +02:00
}
}
else
{
$event [ 'id' ] = $event [ 'old' ][ 'id' ];
}
2011-05-27 22:32:46 +02:00
// set status and send notification / meeting response
2018-06-27 18:26:42 +02:00
if ( $this -> bo -> set_status ( $event [ 'id' ], $user , $status , $event [ 'recurrence' ]))
2011-05-27 22:32:46 +02:00
{
2018-06-27 18:26:42 +02:00
$msg [] = lang ( 'Status changed' );
2011-05-27 22:32:46 +02:00
}
break ;
2013-02-01 13:22:56 +01:00
case 'apply' :
// set status and send notification / meeting response
2018-06-27 18:26:42 +02:00
if ( $this -> bo -> set_status ( $event [ 'id' ], $event [ 'ical_sender_uid' ], $event [ 'ical_sender_status' ], $event [ 'recurrence' ]))
2013-02-01 13:22:56 +01:00
{
$msg = lang ( 'Status changed' );
}
break ;
2015-07-16 11:34:55 +02:00
case 'cancel' :
2020-06-16 16:53:43 +02:00
if ( $event [ 'id' ] && $this -> bo -> set_status ( $event [ 'id' ], $user , 'R' , $event [ 'recurrence' ],
false , true , true )) // no reply to organizer
2015-07-16 11:34:55 +02:00
{
$msg = lang ( 'Status changed' );
}
break ;
2020-06-16 16:53:43 +02:00
case 'delete' :
if ( $event [ 'id' ] && $this -> bo -> delete ( $event [ 'id' ], $event [ 'recurrence' ],
false , [ $event [ 'ical_sender_uid' ]])) // no reply to organizer
{
$msg = lang ( 'Event deleted.' );
}
break ;
2011-05-27 22:32:46 +02:00
}
2014-06-05 13:03:12 +02:00
// add notification-errors, if we have some
$msg = array_merge (( array ) $msg , notifications :: errors ( true ));
2011-05-27 22:32:46 +02:00
}
2016-05-01 19:47:59 +02:00
Framework :: message ( implode ( " \n " , ( array ) $msg ));
2011-05-27 22:32:46 +02:00
$readonlys [ 'button[edit]' ] = ! $event [ 'id' ];
2012-06-06 09:39:57 +02:00
$event [ 'ics_method' ] = $readonlys [ 'ics_method' ] = strtolower ( $ical_method );
2015-07-16 11:34:55 +02:00
switch ( strtolower ( $ical_method ))
{
case 'reply' :
$event [ 'ics_method_label' ] = lang ( 'Reply to meeting request' );
break ;
case 'cancel' :
$event [ 'ics_method_label' ] = lang ( 'Meeting canceled' );
break ;
case 'request' :
default :
$event [ 'ics_method_label' ] = lang ( 'Meeting request' );
break ;
}
2016-05-01 19:47:59 +02:00
$tpl = new Etemplate ( 'calendar.meeting' );
2018-06-27 18:26:42 +02:00
$tpl -> exec ( 'calendar.calendar_uiforms.meeting' , $event , array (), $readonlys , $event + array (
'old' => $existing_event ,
), 2 );
}
/**
* Check if an event changed and need to be updated
*
2019-02-21 15:06:26 +01:00
* We are reseting ( keeping ) status of system users to old value , as they might have been updated !
*
* @ param array & $_event invitation , on return user status changed to the one from old $old
* @ param array $_old existing event on server
2018-06-27 18:26:42 +02:00
* @ return boolean true if there are some changes , false if not
*/
2019-02-21 15:06:26 +01:00
function event_changed ( array & $_event , array $_old )
2018-06-27 18:26:42 +02:00
{
static $keys_to_check = array ( 'start' , 'end' , 'title' , 'description' , 'location' , 'participants' ,
'recur_type' , 'recur_data' , 'recur_interval' , 'recur_exception' );
2019-02-21 15:06:26 +01:00
// only compare certain fields, taking account unset, null or '' values
$event = array_intersect_key ( $_event + array ( 'recur_exception' => array ()), array_flip ( $keys_to_check ));
$old = array_intersect_key ( array_diff ( $_old , array ( null , '' )), array_flip ( $keys_to_check ));
// keep the status of existing participants (users)
foreach ( $old [ 'participants' ] as $uid => $status )
{
if ( is_numeric ( $uid ) && $uid > 0 )
{
$event [ 'participants' ][ $uid ] = $_event [ 'participants' ][ $uid ] = $status ;
}
}
2018-06-27 18:26:42 +02:00
2019-02-21 15:06:26 +01:00
$ret = $event != $old ;
//error_log(__METHOD__."() returning ".array2string($ret)." diff=".array2string(array_udiff_assoc($event, $old, function($a, $b) { return (int)($a != $b); })));
2018-06-27 18:26:42 +02:00
return $ret ;
2011-05-27 22:32:46 +02:00
}
2005-11-09 00:15:14 +01:00
/**
2013-10-31 15:51:19 +01:00
* displays a scheduling conflict
2005-11-09 00:15:14 +01:00
*
2008-05-08 00:12:25 +02:00
* @ param array $event
2005-11-09 00:15:14 +01:00
* @ param array $conflicts array with conflicting events , the events are not garantied to be readable by the user !
* @ param array $preserv data to preserv
*/
function conflicts ( $event , $conflicts , $preserv )
{
2016-05-04 21:07:54 +02:00
$etpl = new Etemplate ( 'calendar.conflicts' );
2014-02-12 11:26:34 +01:00
$allConflicts = array ();
2008-05-08 00:12:25 +02:00
2005-11-09 00:15:14 +01:00
foreach ( $conflicts as $k => $conflict )
{
2016-05-01 19:47:59 +02:00
$is_readable = $this -> bo -> check_perms ( Acl :: READ , $conflict );
2008-05-08 00:12:25 +02:00
2021-02-10 19:32:51 +01:00
$conflict_participants = $this -> bo -> participants ( array (
'participants' => array_intersect_key (( array ) $conflict [ 'participants' ], $event [ 'participants' ]),
), true , true ); // show group invitations too
$conflict_participant_list = [];
foreach ( $conflict_participants as $c_id => $c_name )
{
$res_info = $this -> bo -> resource_info ( $c_id );
$conflict_participant_list [] = array (
'id' => $c_id ,
'name' => $c_name ,
'app' => $res_info [ 'app' ],
'type' => $res_info [ 'type' ]
);
}
2005-11-09 00:15:14 +01:00
$conflicts [ $k ] += array (
'icon_participants' => $is_readable ? ( count ( $conflict [ 'participants' ]) > 1 ? 'users' : 'single' ) : 'private' ,
'tooltip_participants' => $is_readable ? implode ( ', ' , $this -> bo -> participants ( $conflict )) : '' ,
'time' => $this -> bo -> long_date ( $conflict [ 'start' ], $conflict [ 'end' ], true ),
2021-02-10 19:32:51 +01:00
'conflicting_participants' => $conflict_participant_list ,
2005-11-09 00:15:14 +01:00
'icon_recur' => $conflict [ 'recur_type' ] != MCAL_RECUR_NONE ? 'recur' : '' ,
'text_recur' => $conflict [ 'recur_type' ] != MCAL_RECUR_NONE ? lang ( 'Recurring event' ) : ' ' ,
2008-05-08 00:12:25 +02:00
);
2019-02-21 15:06:26 +01:00
$allConflicts += array_intersect_key (( array ) $conflict [ 'participants' ], $event [ 'participants' ]);
}
2005-11-09 00:15:14 +01:00
$content = $event + array (
'conflicts' => array_values ( $conflicts ), // conflicts have id-start as key
);
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'calendar' ) . ' - ' . lang ( 'Scheduling conflict' );
2016-05-01 19:47:59 +02:00
$resources_config = Api\Config :: read ( 'resources' );
2014-01-28 17:26:18 +01:00
$readonlys = array ();
2014-02-19 18:48:25 +01:00
2014-02-12 11:26:34 +01:00
foreach ( array_keys ( $allConflicts ) as $pId )
2014-01-28 17:26:18 +01:00
{
2014-02-12 11:26:34 +01:00
if ( substr ( $pId , 0 , 1 ) == 'r' && $resources_config ) // resources Allow ignore conflicts
2014-01-28 17:26:18 +01:00
{
2014-01-30 11:12:08 +01:00
2014-02-12 11:26:34 +01:00
switch ( $resources_config [ 'ignoreconflicts' ])
{
case 'no' :
$readonlys [ 'button[ignore]' ] = true ;
break ;
case 'allusers' :
$readonlys [ 'button[ignore]' ] = false ;
break ;
default :
if ( ! $this -> bo -> check_status_perms ( $pId , $event ))
{
$readonlys [ 'button[ignore]' ] = true ;
break ;
}
}
2014-01-28 17:26:18 +01:00
}
}
$etpl -> exec ( 'calendar.calendar_uiforms.process_edit' , $content , array (), $readonlys , array_merge ( $event , $preserv ), $preserv [ 'no_popup' ] ? 0 : 2 );
2010-06-09 20:00:11 +02:00
}
2010-11-11 14:29:37 +01:00
2009-04-29 16:17:46 +02:00
/**
* Callback for freetimesearch button in edit
*
* It stores the data of the submitted form in the session under 'freetimesearch_args_' . $edit_content [ 'id' ],
* for later retrival of the freetimesearch method , called by the returned window . open () command .
*
* @ param array $edit_content
* @ return string with xajaxResponse
*/
function ajax_freetimesearch ( array $edit_content )
{
2016-05-01 19:47:59 +02:00
$response = Api\Json\Response :: get ();
2009-04-29 16:31:58 +02:00
//$response->addAlert(__METHOD__.'('.array2string($edit_content).')');
2009-04-29 16:17:46 +02:00
2014-09-04 15:03:48 +02:00
// convert start/end date-time values to timestamps
foreach ( array ( 'start' , 'end' ) as $name )
{
if ( ! empty ( $edit_content [ $name ]))
{
2016-05-01 19:47:59 +02:00
$date = new Api\DateTime ( $edit_content [ $name ]);
2014-09-04 15:03:48 +02:00
$edit_content [ $name ] = $date -> format ( 'ts' );
}
}
2009-04-29 16:17:46 +02:00
if ( $edit_content [ 'duration' ])
{
$edit_content [ 'end' ] = $edit_content [ 'start' ] + $edit_content [ 'duration' ];
}
if ( $edit_content [ 'whole_day' ])
{
$arr = $this -> bo -> date2array ( $edit_content [ 'start' ]);
$arr [ 'hour' ] = $arr [ 'minute' ] = $arr [ 'second' ] = 0 ; unset ( $arr [ 'raw' ]);
$edit_content [ 'start' ] = $this -> bo -> date2ts ( $arr );
2015-06-25 22:35:24 +02:00
$earr = $this -> bo -> date2array ( $edit_content [ 'end' ]);
$earr [ 'hour' ] = 23 ; $earr [ 'minute' ] = $earr [ 'second' ] = 59 ; unset ( $earr [ 'raw' ]);
$edit_content [ 'end' ] = $this -> bo -> date2ts ( $earr );
2009-04-29 16:17:46 +02:00
}
$content = array (
'start' => $edit_content [ 'start' ],
'duration' => $edit_content [ 'end' ] - $edit_content [ 'start' ],
'end' => $edit_content [ 'end' ],
'cal_id' => $edit_content [ 'id' ],
'recur_type' => $edit_content [ 'recur_type' ],
'participants' => array (),
);
foreach ( $edit_content [ 'participants' ] as $key => $data )
{
2010-04-16 12:19:29 +02:00
if ( is_numeric ( $key ) && ! $edit_content [ 'participants' ][ 'delete' ][ $data [ 'uid' ]] &&
! $edit_content [ 'participants' ][ 'delete' ][ md5 ( $data [ 'uid' ])])
2009-04-29 16:17:46 +02:00
{
$content [ 'participants' ][] = $data [ 'uid' ];
}
elseif ( $key == 'account' && ! is_array ( $data ) && $data )
{
$content [ 'participants' ][] = $data ;
}
}
// default search parameters
$content [ 'start_time' ] = $edit_content [ 'whole_day' ] ? 0 : $this -> cal_prefs [ 'workdaystarts' ];
$content [ 'end_time' ] = $this -> cal_prefs [ 'workdayends' ];
if ( $this -> cal_prefs [ 'workdayends' ] * HOUR_s < $this -> cal_prefs [ 'workdaystarts' ] * HOUR_s + $content [ 'duration' ])
{
$content [ 'end_time' ] = 0 ; // no end-time limit, as duration would never fit
}
$content [ 'weekdays' ] = MCAL_M_WEEKDAYS ;
$content [ 'search_window' ] = 7 * DAY_s ;
// store content in session
2016-05-01 19:47:59 +02:00
Api\Cache :: setSession ( 'calendar' , 'freetimesearch_args_' . ( int ) $edit_content [ 'id' ], $content );
2009-04-29 16:17:46 +02:00
//menuaction=calendar.calendar_uiforms.freetimesearch&values2url('start,end,duration,participants,recur_type,whole_day'),ft_search,700,500
2013-10-31 15:51:19 +01:00
$link = 'calendar.calendar_uiforms.freetimesearch&cal_id=' . $edit_content [ 'id' ];
2009-04-29 16:17:46 +02:00
2013-10-31 15:51:19 +01:00
$response -> call ( 'app.calendar.freetime_search_popup' , $link );
//$response->addScriptCall('egw_openWindowCentered2',$link,'ft_search',700,500);
2009-04-29 16:17:46 +02:00
}
2004-10-08 00:11:18 +02:00
/**
* Freetime search
*
* As the function is called in a popup via javascript , parametes get initialy transfered via the url
2005-11-09 00:15:14 +01:00
* @ param array $content = null array with parameters or false ( default ) to use the get - params
* @ param string start [ str ] start - date
* @ param string start [ hour ] start - hour
* @ param string start [ min ] start - minutes
* @ param string end [ str ] end - date
* @ param string end [ hour ] end - hour
* @ param string end [ min ] end - minutes
* @ param string participants ':' delimited string of user - id ' s
2004-10-08 00:11:18 +02:00
*/
2005-11-09 00:15:14 +01:00
function freetimesearch ( $content = null )
2004-10-08 00:11:18 +02:00
{
2016-05-01 19:47:59 +02:00
$etpl = new Etemplate ( 'calendar.freetimesearch' );
2004-12-12 13:31:41 +01:00
$sel_options [ 'search_window' ] = array (
7 * DAY_s => lang ( 'one week' ),
14 * DAY_s => lang ( 'two weeks' ),
31 * DAY_s => lang ( 'one month' ),
92 * DAY_s => lang ( 'three month' ),
365 * DAY_s => lang ( 'one year' ),
);
2004-10-08 00:11:18 +02:00
if ( ! is_array ( $content ))
{
2009-04-29 16:17:46 +02:00
// get content from session (and delete it immediatly)
2016-05-01 19:47:59 +02:00
$content = Api\Cache :: getSession ( 'calendar' , 'freetimesearch_args_' . ( int ) $_GET [ 'cal_id' ]);
Api\Cache :: unsetSession ( 'calendar' , 'freetimesearch_args_' . ( int ) $_GET [ 'cal_id' ]);
2013-10-31 15:51:19 +01:00
//Since the start_time and end_time from calendar_user_preferences are numbers, not timestamp, in order to show them on date-timeonly
//widget we need to convert them from numbers to timestamps, only for the first time when we have template without content
$sTime = $content [ 'start_time' ];
$eTime = $content [ 'end_time' ];
$content [ 'start_time' ] = strtotime ((( strlen ( $content [ 'start_time' ]) < 2 ) ? ( " 0 " . $content [ 'start_time' ]) : $content [ 'start_time' ]) . " :00 " );
$content [ 'end_time' ] = strtotime ((( strlen ( $content [ 'end_time' ]) < 2 ) ? ( " 0 " . $content [ 'end_time' ]) : $content [ 'end_time' ]) . " :00 " );
2008-05-08 00:12:25 +02:00
2004-12-12 13:31:41 +01:00
// pick a searchwindow fitting the duration (search for a 10 day slot in a one week window never succeeds)
2015-06-25 22:35:24 +02:00
foreach ( array_keys ( $sel_options [ 'search_window' ]) as $window )
2004-12-12 13:31:41 +01:00
{
2008-05-08 00:12:25 +02:00
if ( $window > $content [ 'duration' ])
2004-12-12 13:31:41 +01:00
{
$content [ 'search_window' ] = $window ;
break ;
}
}
2004-10-08 00:11:18 +02:00
}
else
{
2008-05-08 00:12:25 +02:00
if ( ! $content [ 'duration' ]) $content [ 'duration' ] = $content [ 'end' ] - $content [ 'start' ];
2013-10-31 15:51:19 +01:00
$weekds = 0 ;
2015-05-04 14:19:33 +02:00
foreach ( $content [ 'weekdays' ] as & $wdays )
2013-10-31 15:51:19 +01:00
{
$weekds = $weekds + $wdays ;
2004-10-08 00:11:18 +02:00
}
2013-10-31 15:51:19 +01:00
//split_freetime_daywise function expects to get start_time and end_time values as string numbers, only "hour", therefore, since the date-timeonly widget returns
//always timestamp, we need to convert them to only "hour" string numbers.
$sTime = date ( 'H' , $content [ 'start_time' ]);
$eTime = date ( 'H' , $content [ 'end_time' ]);
2004-10-08 18:04:50 +02:00
}
2013-10-31 15:51:19 +01:00
2004-10-08 18:04:50 +02:00
if ( $content [ 'recur_type' ])
{
2018-03-26 16:02:42 +02:00
$content [ 'msg' ] .= lang ( 'Only the initial date of that recurring event is checked!' );
2004-10-08 18:04:50 +02:00
}
2004-12-12 13:31:41 +01:00
$content [ 'freetime' ] = $this -> freetime ( $content [ 'participants' ], $content [ 'start' ], $content [ 'start' ] + $content [ 'search_window' ], $content [ 'duration' ], $content [ 'cal_id' ]);
2013-10-31 15:51:19 +01:00
$content [ 'freetime' ] = $this -> split_freetime_daywise ( $content [ 'freetime' ], $content [ 'duration' ],( is_array ( $content [ 'weekdays' ]) ? $weekds : $content [ 'weekdays' ]), $sTime , $eTime , $sel_options );
2004-10-08 00:11:18 +02:00
2005-11-09 00:15:14 +01:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'calendar' ) . ' - ' . lang ( 'freetime search' );
2008-05-08 00:12:25 +02:00
2006-06-03 01:36:43 +02:00
$sel_options [ 'duration' ] = $this -> durations ;
if ( $content [ 'duration' ] && isset ( $sel_options [ 'duration' ][ $content [ 'duration' ]])) $content [ 'end' ] = '' ;
2004-10-08 00:11:18 +02:00
2013-10-31 15:51:19 +01:00
$etpl -> exec ( 'calendar.calendar_uiforms.freetimesearch' , $content , $sel_options , NULL , array (
2004-10-08 00:11:18 +02:00
'participants' => $content [ 'participants' ],
2004-10-08 18:04:50 +02:00
'cal_id' => $content [ 'cal_id' ],
'recur_type' => $content [ 'recur_type' ],
2008-05-08 00:12:25 +02:00
), 2 );
2004-10-08 00:11:18 +02:00
}
2008-05-08 00:12:25 +02:00
2004-10-08 00:11:18 +02:00
/**
* calculate the freetime of given $participants in a certain time - span
*
2005-11-09 00:15:14 +01:00
* @ param array $participants user - id ' s
* @ param int $start start - time timestamp in user - time
* @ param int $end end - time timestamp in user - time
* @ param int $duration min . duration in sec , default 1
* @ param int $cal_id own id for existing events , to exclude them from being busy - time , default 0
2004-10-08 00:11:18 +02:00
* @ return array of free time - slots : array with start and end values
*/
2004-10-08 18:04:50 +02:00
function freetime ( $participants , $start , $end , $duration = 1 , $cal_id = 0 )
2004-10-08 00:11:18 +02:00
{
2015-07-16 14:09:19 +02:00
if ( $this -> debug > 2 ) $this -> bo -> debug_message ( __METHOD__ . '(participants=%1, start=%2, end=%3, duration=%4, cal_id=%5)' , true , $participants , $start , $end , $duration , $cal_id );
2004-12-12 13:31:41 +01:00
2004-10-08 00:11:18 +02:00
$busy = $this -> bo -> search ( array (
'start' => $start ,
'end' => $end ,
'users' => $participants ,
2006-03-16 19:03:43 +01:00
'ignore_acl' => true , // otherwise we get only events readable by the user
2004-10-08 00:11:18 +02:00
));
$busy [] = array ( // add end-of-search-date as event, to cope with empty search and get freetime til that date
2005-11-09 00:15:14 +01:00
'start' => $end ,
'end' => $end ,
2008-05-08 00:12:25 +02:00
);
2004-10-08 00:11:18 +02:00
$ft_start = $start ;
$freetime = array ();
$n = 0 ;
foreach ( $busy as $event )
{
2004-10-08 18:04:50 +02:00
if (( int ) $cal_id && $event [ 'id' ] == ( int ) $cal_id ) continue ; // ignore our own event
2006-03-08 11:23:44 +01:00
if ( $event [ 'non_blocking' ]) continue ; // ignore non_blocking events
2015-07-16 14:09:19 +02:00
// check if from all wanted participants at least one has a not rejected status in found event
$non_rejected_found = false ;
foreach ( $participants as $uid )
{
2017-08-18 09:49:02 +02:00
$status = $event [ 'participants' ][ $uid ];
$quantity = $role = null ;
calendar_so :: split_status ( $status , $quantity , $role );
if ( $status == 'R' || $role == 'NON-PARTICIPANT' ) continue ;
2015-07-16 14:09:19 +02:00
if ( isset ( $event [ 'participants' ][ $uid ]) ||
$uid > 0 && array_intersect ( array_keys (( array ) $event [ 'participants' ]),
$GLOBALS [ 'egw' ] -> accounts -> memberships ( $uid , true )))
{
$non_rejected_found = true ;
break ;
}
}
if ( ! $non_rejected_found ) continue ;
2004-10-08 00:11:18 +02:00
if ( $this -> debug )
{
echo " <p>ft_start= " . date ( 'D d.m.Y H:i' , $ft_start ) . " <br> \n " ;
echo " event[title]= $event[title] <br> \n " ;
2008-10-10 12:24:31 +02:00
echo " event[start]= " . date ( 'D d.m.Y H:i' , $event [ 'start' ]) . " <br> \n " ;
echo " event[end]= " . date ( 'D d.m.Y H:i' , $event [ 'end' ]) . " <br> \n " ;
2004-10-08 00:11:18 +02:00
}
// $events ends before our actual position ==> ignore it
2005-11-09 00:15:14 +01:00
if ( $event [ 'end' ] < $ft_start )
2004-10-08 00:11:18 +02:00
{
//echo "==> event ends before ft_start ==> continue<br>\n";
continue ;
}
// $events starts before our actual position ==> set start to it's end and go to next event
2005-11-09 00:15:14 +01:00
if ( $event [ 'start' ] < $ft_start )
2004-10-08 00:11:18 +02:00
{
//echo "==> event starts before ft_start ==> set ft_start to it's end & continue<br>\n";
2005-11-09 00:15:14 +01:00
$ft_start = $event [ 'end' ];
2004-10-08 00:11:18 +02:00
continue ;
}
2005-11-09 00:15:14 +01:00
$ft_end = $event [ 'start' ];
2004-10-08 00:11:18 +02:00
// only show slots equal or bigger to min_length
if ( $ft_end - $ft_start >= $duration )
{
$freetime [ ++ $n ] = array (
'start' => $ft_start ,
'end' => $ft_end ,
);
2004-12-12 13:31:41 +01:00
if ( $this -> debug > 1 ) echo " <p>freetime: " . date ( 'D d.m.Y H:i' , $ft_start ) . " - " . date ( 'D d.m.Y H:i' , $ft_end ) . " </p> \n " ;
2008-05-08 00:12:25 +02:00
}
2005-11-09 00:15:14 +01:00
$ft_start = $event [ 'end' ];
2004-10-08 00:11:18 +02:00
}
2004-12-12 13:31:41 +01:00
if ( $this -> debug > 0 ) $this -> bo -> debug_message ( 'uiforms::freetime(participants=%1, start=%2, end=%3, duration=%4, cal_id=%5) freetime=%6' , true , $participants , $start , $end , $duration , $cal_id , $freetime );
2008-05-08 00:12:25 +02:00
2004-10-08 00:11:18 +02:00
return $freetime ;
}
2008-05-08 00:12:25 +02:00
2004-10-08 00:11:18 +02:00
/**
* split the freetime in daywise slot , taking into account weekdays , start - and stop - times
*
2004-12-12 13:31:41 +01:00
* If the duration is bigger then the difference of start - and end_time , the end_time is ignored
*
2005-11-09 00:15:14 +01:00
* @ param array $freetime free time - slots : array with start and end values
* @ param int $duration min . duration in sec
* @ param int $weekdays allowed weekdays , bitfield of MCAL_M_ ...
2015-06-25 22:35:24 +02:00
* @ param int $_start_time minimum start - hour 0 - 23
* @ param int $_end_time maximum end - hour 0 - 23 , or 0 for none
2005-11-09 00:15:14 +01:00
* @ param array $sel_options on return options for start - time selectbox
2004-10-08 00:11:18 +02:00
* @ return array of free time - slots : array with start and end values
*/
2015-06-25 22:35:24 +02:00
function split_freetime_daywise ( $freetime , $duration , $weekdays , $_start_time , $_end_time , & $sel_options )
2004-10-08 00:11:18 +02:00
{
2015-06-25 22:35:24 +02:00
if ( $this -> debug > 1 ) $this -> bo -> debug_message ( 'uiforms::split_freetime_daywise(freetime=%1, duration=%2, start_time=%3, end_time=%4)' , true , $freetime , $duration , $_start_time , $_end_time );
2008-05-08 00:12:25 +02:00
2004-12-12 13:31:41 +01:00
$freetime_daywise = array ();
if ( ! is_array ( $sel_options )) $sel_options = array ();
2004-10-08 00:11:18 +02:00
$time_format = $this -> common_prefs [ 'timeformat' ] == 12 ? 'h:i a' : 'H:i' ;
2008-05-08 00:12:25 +02:00
2015-06-25 22:35:24 +02:00
$start_time = ( int ) $_start_time ; // ignore leading zeros
$end_time = ( int ) $_end_time ;
2004-10-08 00:11:18 +02:00
2004-12-12 13:31:41 +01:00
// ignore the end_time, if duration would never fit
2008-05-08 00:12:25 +02:00
if (( $end_time - $start_time ) * HOUR_s < $duration )
2004-12-12 13:31:41 +01:00
{
2008-05-08 00:12:25 +02:00
$end_time = 0 ;
2004-12-12 13:31:41 +01:00
if ( $this -> debug > 1 ) $this -> bo -> debug_message ( 'uiforms::split_freetime_daywise(, duration=%2, start_time=%3,..) end_time set to 0, it never fits durationn otherwise' , true , $duration , $start_time );
}
2004-10-08 00:11:18 +02:00
$n = 0 ;
foreach ( $freetime as $ft )
{
2015-06-25 22:35:24 +02:00
$adaybegin = $this -> bo -> date2array ( $ft [ 'start' ]);
$adaybegin [ 'hour' ] = $adaybegin [ 'minute' ] = $adaybegin [ 'second' ] = 0 ;
unset ( $adaybegin [ 'raw' ]);
$daybegin = $this -> bo -> date2ts ( $adaybegin );
2008-05-08 00:12:25 +02:00
2004-10-08 00:11:18 +02:00
for ( $t = $daybegin ; $t < $ft [ 'end' ]; $t += DAY_s , $daybegin += DAY_s )
{
$dow = date ( 'w' , $daybegin + DAY_s / 2 ); // 0=Sun, .., 6=Sat
$mcal_dow = pow ( 2 , $dow );
if ( ! ( $weekdays & $mcal_dow ))
{
2004-12-12 13:31:41 +01:00
//echo "wrong day of week $dow<br>\n";
2004-10-08 00:11:18 +02:00
continue ; // wrong day of week
}
$start = $t < $ft [ 'start' ] ? $ft [ 'start' ] : $t ;
2008-05-08 00:12:25 +02:00
2004-10-08 00:11:18 +02:00
if ( $start - $daybegin < $start_time * HOUR_s ) // start earlier then start_time
{
$start = $daybegin + $start_time * HOUR_s ;
}
// if end_time given use it, else the original slot's end
$end = $end_time ? $daybegin + $end_time * HOUR_s : $ft [ 'end' ];
if ( $end > $ft [ 'end' ]) $end = $ft [ 'end' ];
// slot to small for duration
if ( $end - $start < $duration )
{
2004-12-12 13:31:41 +01:00
//echo "slot to small for duration=$duration<br>\n";
2004-10-08 00:11:18 +02:00
continue ;
}
$freetime_daywise [ ++ $n ] = array (
'start' => $start ,
'end' => $end ,
);
$times = array ();
2004-12-12 13:31:41 +01:00
for ( $s = $start ; $s + $duration <= $end && $s < $daybegin + DAY_s ; $s += 60 * $this -> cal_prefs [ 'interval' ])
2004-10-08 00:11:18 +02:00
{
$e = $s + $duration ;
$end_date = $e - $daybegin > DAY_s ? lang ( date ( 'l' , $e )) . ' ' . date ( $this -> common_prefs [ 'dateformat' ], $e ) . ' ' : '' ;
$times [ $s ] = date ( $time_format , $s ) . ' - ' . $end_date . date ( $time_format , $e );
}
2013-10-31 15:51:19 +01:00
$sel_options [ $n . 'start' ] = $times ;
2004-10-08 00:11:18 +02:00
}
}
return $freetime_daywise ;
}
2008-05-08 00:12:25 +02:00
2016-05-25 00:44:14 +02:00
/**
* Export events as vCalendar version 2.0 files ( iCal )
*
* @ param int | array $content numeric cal_id or submitted content from etempalte :: exec
* @ param boolean $return_error should an error - msg be returned or a regular page with it generated ( default )
* @ return string error - msg if $return_error
*/
function export ( $content = 0 , $return_error = false )
{
$boical = new calendar_ical ();
#error_log(__METHOD__.print_r($content,true));
if ( is_numeric ( $cal_id = $content ? $content : $_REQUEST [ 'cal_id' ]))
{
if ( ! ( $ical =& $boical -> exportVCal ( array ( $cal_id ), '2.0' , 'PUBLISH' , false )))
{
$msg = lang ( 'Permission denied' );
if ( $return_error ) return $msg ;
}
else
{
2019-02-25 09:40:03 +01:00
Api\Header\Content :: type ( 'event.ics' , 'text/calendar' , bytes ( $ical ));
2016-05-25 00:44:14 +02:00
echo $ical ;
2019-02-25 09:40:03 +01:00
exit ();
2016-05-25 00:44:14 +02:00
}
}
if ( is_array ( $content ))
{
$events =& $this -> bo -> search ( array (
'start' => $content [ 'start' ],
'end' => $content [ 'end' ],
'enum_recuring' => false ,
'daywise' => false ,
'owner' => $this -> owner ,
'date_format' => 'server' , // timestamp in server time for boical class
));
if ( ! $events )
{
$msg = lang ( 'No events found' );
}
else
{
$ical =& $boical -> exportVCal ( $events , '2.0' , 'PUBLISH' , false );
2019-02-25 09:40:03 +01:00
Api\Header\Content :: type ( $content [ 'file' ] ? $content [ 'file' ] : 'event.ics' , 'text/calendar' , bytes ( $ical ));
2016-05-25 00:44:14 +02:00
echo $ical ;
2019-02-25 09:40:03 +01:00
exit ();
2016-05-25 00:44:14 +02:00
}
}
if ( ! is_array ( $content ))
{
$content = array (
'start' => $this -> bo -> date2ts ( $_REQUEST [ 'start' ] ? $_REQUEST [ 'start' ] : $this -> date ),
'end' => $this -> bo -> date2ts ( $_REQUEST [ 'end' ] ? $_REQUEST [ 'end' ] : $this -> date ),
'file' => 'event.ics' ,
'version' => '2.0' ,
);
}
$content [ 'msg' ] = $msg ;
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'calendar' ) . ' - ' . lang ( 'iCal Export' );
2019-02-25 09:40:03 +01:00
$etpl = new Etemplate ( 'calendar.export' );
2016-05-25 00:44:14 +02:00
$etpl -> exec ( 'calendar.calendar_uiforms.export' , $content );
}
2016-07-26 09:03:02 +02:00
2009-12-03 19:24:19 +01:00
/**
* Edit category ACL ( admin only )
*
2015-06-25 22:35:24 +02:00
* @ param array $_content
2009-12-03 19:24:19 +01:00
*/
2015-06-25 22:35:24 +02:00
function cat_acl ( array $_content = null )
2009-12-03 19:24:19 +01:00
{
if ( ! $GLOBALS [ 'egw_info' ][ 'user' ][ 'apps' ][ 'admin' ])
{
2016-05-01 19:47:59 +02:00
throw new Api\Exception\NoPermission\Admin ();
2009-12-03 19:24:19 +01:00
}
2015-06-25 22:35:24 +02:00
if ( $_content )
2009-12-03 19:24:19 +01:00
{
2018-12-18 18:20:23 +01:00
$button = key ( $_content [ 'button' ]);
2015-06-25 22:35:24 +02:00
unset ( $_content [ 'button' ]);
2016-05-01 19:47:59 +02:00
if ( $button != 'cancel' ) // store changed Acl
2009-12-03 19:24:19 +01:00
{
2015-06-25 22:35:24 +02:00
foreach ( $_content as $data )
2009-12-03 19:24:19 +01:00
{
if ( ! ( $cat_id = $data [ 'cat_id' ])) continue ;
foreach ( array_merge (( array ) $data [ 'add' ],( array ) $data [ 'status' ], array_keys (( array ) $data [ 'old' ])) as $account_id )
{
$rights = 0 ;
if ( in_array ( $account_id ,( array ) $data [ 'add' ])) $rights |= calendar_boupdate :: CAT_ACL_ADD ;
if ( in_array ( $account_id ,( array ) $data [ 'status' ])) $rights |= calendar_boupdate :: CAT_ACL_STATUS ;
if ( $account_id ) $this -> bo -> set_cat_rights ( $cat_id , $account_id , $rights );
}
}
}
if ( $button != 'apply' ) // end dialog
{
2016-05-01 19:47:59 +02:00
Egw :: redirect_link ( '/index.php' , array (
2014-09-22 17:25:23 +02:00
'menuaction' => 'admin.admin_ui.index' ,
'ajax' => 'true'
), 'admin' );
2009-12-03 19:24:19 +01:00
}
}
2014-07-15 17:18:06 +02:00
$content = $preserv = array ();
2009-12-03 19:24:19 +01:00
$n = 1 ;
foreach ( $this -> bo -> get_cat_rights () as $Lcat_id => $data )
{
2014-07-03 11:10:11 +02:00
$cat_id = substr ( $Lcat_id , 1 );
2009-12-03 19:24:19 +01:00
$row = array (
'cat_id' => $cat_id ,
'add' => array (),
'status' => array (),
);
foreach ( $data as $account_id => $rights )
{
if ( $rights & calendar_boupdate :: CAT_ACL_ADD ) $row [ 'add' ][] = $account_id ;
if ( $rights & calendar_boupdate :: CAT_ACL_STATUS ) $row [ 'status' ][] = $account_id ;
}
2014-07-15 17:18:06 +02:00
$content [ $n ] = $row ;
$preserv [ $n ] = array (
2009-12-03 19:24:19 +01:00
'cat_id' => $cat_id ,
'old' => $data ,
);
$readonlys [ $n . '[cat_id]' ] = true ;
++ $n ;
}
// add empty row for new entries
2014-07-15 17:18:06 +02:00
$content [] = array ( 'cat_id' => '' );
2009-12-03 19:24:19 +01:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'app_header' ] = lang ( 'Calendar' ) . ' - ' . lang ( 'Category ACL' );
2016-05-01 19:47:59 +02:00
$tmp = new Etemplate ( 'calendar.cat_acl' );
2015-08-12 18:37:02 +02:00
$GLOBALS [ 'egw_info' ][ 'flags' ][ 'nonavbar' ] = 1 ;
2009-12-03 19:24:19 +01:00
$tmp -> exec ( 'calendar.calendar_uiforms.cat_acl' , $content , null , $readonlys , $preserv );
}
2010-02-12 21:18:45 +01:00
/**
* Set up the required fields to get the history tab
*/
2011-04-08 16:21:23 +02:00
public function setup_history ( & $content , & $sel_options )
{
2010-02-12 21:18:45 +01:00
$status = 'history_status' ;
$content [ 'history' ] = array (
'id' => $content [ 'id' ],
'app' => 'calendar' ,
2011-08-04 16:00:15 +02:00
'status-widgets' => array (
'owner' => 'select-account' ,
'creator' => 'select-account' ,
'category' => 'select-cat' ,
'non_blocking' => array ( '' => lang ( 'No' ), 1 => lang ( 'Yes' )),
'public' => array ( '' => lang ( 'No' ), 1 => lang ( 'Yes' )),
2010-02-24 16:05:00 +01:00
2011-08-04 16:00:15 +02:00
'start' => 'date-time' ,
'end' => 'date-time' ,
2015-05-26 20:34:03 +02:00
'deleted' => 'date-time' ,
2016-04-26 18:41:22 +02:00
'recur_enddate' => 'date' ,
2015-05-26 20:34:03 +02:00
2011-08-04 16:00:15 +02:00
'tz_id' => 'select-timezone' ,
2010-02-12 21:18:45 +01:00
// Participants
'participants' => array (
'select-account' ,
$sel_options [ 'status' ],
$sel_options [ 'role' ]
),
'participants-c' => array (
'link:addressbook' ,
$sel_options [ 'status' ],
'label' ,
$sel_options [ 'role' ]
),
2011-08-04 16:00:15 +02:00
'participants-r' => array (
'link:resources' ,
$sel_options [ 'status' ],
'label' ,
$sel_options [ 'role' ]
),
2010-02-12 21:18:45 +01:00
),
);
// Get participants for only this one, if it's recurring. The date is on the end of the value.
2011-08-04 16:00:15 +02:00
if ( $content [ 'recur_type' ] || $content [ 'recurrence' ])
{
2010-02-12 21:18:45 +01:00
$content [ 'history' ][ 'filter' ] = array (
' ( history_status NOT LIKE \ ' participants % \ ' OR ( history_status LIKE \ ' participants % \ ' AND (
2016-05-01 19:47:59 +02:00
history_new_value LIKE \ '%' . Api\Storage\Tracking :: ONE2N_SEPERATOR . $content [ 'recurrence' ] . ' \ ' OR
history_old_value LIKE \ '%' . Api\Storage\Tracking :: ONE2N_SEPERATOR . $content [ 'recurrence' ] . '\')))'
2010-02-12 21:18:45 +01:00
);
}
2010-02-24 16:05:00 +01:00
2010-02-12 21:18:45 +01:00
// Translate labels
$tracking = new calendar_tracking ();
2011-08-04 16:00:15 +02:00
foreach ( $tracking -> field2label as $field => $label )
{
2010-02-12 21:18:45 +01:00
$sel_options [ $status ][ $field ] = lang ( $label );
}
2011-04-20 08:22:29 +02:00
// custom fields are now "understood" directly by historylog widget
2010-02-12 21:18:45 +01:00
}
2014-02-19 18:48:25 +01:00
/**
* moves an event to another date / time
*
2015-07-16 11:34:55 +02:00
* @ param string $_eventId id of the event which has to be moved
2014-02-19 18:48:25 +01:00
* @ param string $calendarOwner the owner of the calendar the event is in
* @ param string $targetDateTime the datetime where the event should be moved to , format : YYYYMMDD
2015-08-05 23:24:07 +02:00
* @ param string | string [] $targetOwner the owner of the target calendar
2014-02-19 18:48:25 +01:00
* @ param string $durationT the duration to support resizable calendar event
2015-11-27 17:57:25 +01:00
* @ param string $seriesInstance If moving a whole series , not an exception , this is
* which particular instance was dragged
2014-02-19 18:48:25 +01:00
* @ return string XML response if no error occurs
*/
2015-11-27 17:57:25 +01:00
function ajax_moveEvent ( $_eventId , $calendarOwner , $targetDateTime , $targetOwner , $durationT = null , $seriesInstance = null )
2014-02-19 18:48:25 +01:00
{
2015-12-16 01:28:56 +01:00
list ( $eventId , $date ) = explode ( ':' , $_eventId , 2 );
2016-04-27 20:53:15 +02:00
$ignore_conflicts = false ;
2016-05-01 11:57:48 +02:00
2014-02-19 18:48:25 +01:00
// we do not allow dragging into another users calendar ATM
2015-07-22 01:45:38 +02:00
if ( $targetOwner < 0 )
{
2015-08-04 16:26:00 +02:00
$targetOwner = array ( $targetOwner );
2015-07-22 01:45:38 +02:00
}
2015-08-05 23:24:07 +02:00
if ( $targetOwner == 0 || is_array ( $targetOwner ) && $targetOwner [ 0 ] == 0 )
{
$targetOwner = $calendarOwner ;
}
2015-07-22 01:45:38 +02:00
// But you may be viewing multiple users, or a group calendar and
2015-12-09 18:36:46 +01:00
// dragging your event - dragging across calendars does not change owner
2015-07-22 01:45:38 +02:00
if ( is_array ( $targetOwner ) && ! in_array ( $calendarOwner , $targetOwner ))
{
$return = true ;
foreach ( $targetOwner as $owner )
{
if ( $owner < 0 && in_array ( $calendarOwner , $GLOBALS [ 'egw' ] -> accounts -> members ( $owner , true )))
{
$return = false ;
break ;
}
2016-05-01 19:47:59 +02:00
else if ( $owner > 0 && $this -> bo -> check_perms ( Acl :: EDIT , $eventId , 0 , 'ts' , $date ))
2015-12-09 18:36:46 +01:00
{
$return = false ;
break ;
}
2015-07-22 01:45:38 +02:00
}
if ( $return ) return ;
}
2014-02-19 18:48:25 +01:00
$old_event = $event = $this -> bo -> read ( $eventId );
if ( ! $durationT )
{
$duration = $event [ 'end' ] - $event [ 'start' ];
}
2016-06-08 18:16:17 +02:00
// Drag a normal event to whole day non-blocking
else if ( $durationT == 'whole_day' )
{
$event [ 'whole_day' ] = true ;
$event [ 'non_blocking' ] = true ;
// Make duration whole days, less 1 second
$duration = round (( $event [ 'end' ] - $event [ 'start' ]) / DAY_s ) * DAY_s - 1 ;
}
2014-02-19 18:48:25 +01:00
else
{
2015-11-10 19:35:24 +01:00
$duration = ( int ) $durationT ;
2014-02-19 18:48:25 +01:00
}
2015-06-10 23:51:28 +02:00
// If we have a recuring event for a particular day, make an exception
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $date )
{
2016-05-01 19:47:59 +02:00
$d = new Api\DateTime ( $date , Api\DateTime :: $user_timezone );
2015-06-10 23:51:28 +02:00
if ( ! empty ( $event [ 'whole_day' ]))
{
2015-07-16 11:34:55 +02:00
$d =& $this -> bo -> so -> startOfDay ( $d );
$d -> setUser ();
2015-06-10 23:51:28 +02:00
}
2015-07-16 11:34:55 +02:00
$event = $this -> bo -> read ( $eventId , $d , true );
2015-06-10 23:51:28 +02:00
2015-11-13 21:22:58 +01:00
// For DnD, create an exception if they gave the date
2016-05-01 19:47:59 +02:00
$preserv = null ;
2015-06-10 23:51:28 +02:00
$this -> _create_exception ( $event , $preserv );
unset ( $event [ 'id' ]);
2017-05-08 21:18:04 +02:00
$links = $event [ 'link_to' ][ 'to_id' ];
2016-05-01 11:57:48 +02:00
2016-05-01 19:47:59 +02:00
$messages = null ;
2015-11-13 21:22:58 +01:00
$conflicts = $this -> bo -> update ( $event , false , true , false , true , $messages );
if ( ! is_array ( $conflicts ) && $conflicts )
{
// now we need to add the original start as recur-execption to the series
$recur_event = $this -> bo -> read ( $event [ 'reference' ]);
2015-12-16 01:28:56 +01:00
$recur_event [ 'recur_exception' ][] = $d -> format ( 'ts' );
2015-11-13 21:22:58 +01:00
// check if we need to move the alarms, because they are next on that exception
2016-01-18 18:45:25 +01:00
$this -> bo -> check_move_alarms ( $recur_event , null , $d );
2015-11-13 21:22:58 +01:00
unset ( $recur_event [ 'start' ]); unset ( $recur_event [ 'end' ]); // no update necessary
unset ( $recur_event [ 'alarm' ]); // unsetting alarms too, as they cant be updated without start!
$this -> bo -> update ( $recur_event , true ); // no conflict check here
2016-05-16 23:56:08 +02:00
// Sending null will trigger a removal of the original for that date
Api\Json\Response :: get () -> generic ( 'data' , array ( 'uid' => 'calendar::' . $_eventId , 'data' => null ));
2015-11-13 21:22:58 +01:00
unset ( $recur_event );
unset ( $event [ 'edit_single' ]); // if we further edit it, it's just a single event
unset ( $preserv [ 'edit_single' ]);
}
2015-06-10 23:51:28 +02:00
}
2015-12-03 23:56:52 +01:00
2016-05-01 19:47:59 +02:00
$d = new Api\DateTime ( $targetDateTime , Api\DateTime :: $user_timezone );
2015-12-22 01:26:56 +01:00
$event [ 'start' ] = $d -> format ( 'ts' );
2015-12-03 23:56:52 +01:00
$event [ 'end' ] = $event [ 'start' ] + $duration ;
2015-12-22 01:26:56 +01:00
2015-12-03 23:56:52 +01:00
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && ! $date && $seriesInstance )
{
// calculate offset against clicked recurrance,
// depending on which is smaller
2016-05-01 19:47:59 +02:00
$offset = Api\DateTime :: to ( $targetDateTime , 'ts' ) - Api\DateTime :: to ( $seriesInstance , 'ts' );
2015-12-03 23:56:52 +01:00
$event [ 'start' ] = $old_event [ 'start' ] + $offset ;
$event [ 'duration' ] = $duration ;
2016-05-01 11:57:48 +02:00
2015-12-03 23:56:52 +01:00
// We have a recurring event starting in the past -
// stop it & create a new one.
$this -> _break_recurring ( $event , $old_event , $this -> bo -> date2ts ( $targetDateTime ));
2016-04-27 20:53:15 +02:00
// Can't handle conflict. Just ignore it.
$ignore_conflicts = true ;
2015-12-03 23:56:52 +01:00
}
2016-01-18 18:45:25 +01:00
if ( ! $event [ 'recur_type' ])
{
$this -> bo -> check_move_alarms ( $event , $old_event );
}
2015-12-03 23:56:52 +01:00
2015-11-02 21:04:31 +01:00
// Drag a whole day to a time
2015-11-12 16:42:14 +01:00
if ( $durationT && $durationT != 'whole_day' )
2015-11-02 21:04:31 +01:00
{
2015-11-10 19:35:24 +01:00
$event [ 'whole_day' ] = ( $duration == DAY_s );
$event [ 'non_blocking' ] = false ;
2015-11-12 19:54:20 +01:00
// If there's a conflict, it won't save the change and the conflict popup will be blank
// so save the change now, and then let the conflict check happen.
2016-05-01 19:47:59 +02:00
$message = null ;
2015-11-12 19:54:20 +01:00
$this -> bo -> update ( $event , true , true , false , true , $message , true );
2015-11-10 19:35:24 +01:00
// Whole day non blocking with DAY_s would add a day
if ( $duration == DAY_s ) $duration = 0 ;
}
2015-11-02 21:04:31 +01:00
2014-02-19 18:48:25 +01:00
$status_reset_to_unknown = false ;
$sameday = ( date ( 'Ymd' , $old_event [ 'start' ]) == date ( 'Ymd' , $event [ 'start' ]));
2015-07-22 01:45:38 +02:00
$message = false ;
2016-04-27 20:53:15 +02:00
$conflicts = $this -> bo -> update ( $event , $ignore_conflicts , true , false , true , $message );
2016-05-01 11:57:48 +02:00
2017-05-08 21:18:04 +02:00
// Save links
if ( $links )
{
Link :: link ( 'calendar' , $event [ 'id' ], $links );
}
2016-01-20 21:58:14 +01:00
$this -> update_client ( $event [ 'id' ], $d );
2016-05-01 19:47:59 +02:00
$response = Api\Json\Response :: get ();
2015-07-22 01:45:38 +02:00
if ( ! is_array ( $conflicts ) && $conflicts )
2014-02-19 18:48:25 +01:00
{
2015-11-27 17:57:25 +01:00
if ( is_int ( $conflicts ))
{
$event [ 'id' ] = $conflicts ;
2016-01-26 00:24:42 +01:00
$response -> call ( 'egw.refresh' , '' , 'calendar' , $event [ 'id' ], 'edit' );
2015-07-22 01:45:38 +02:00
}
2014-02-19 18:48:25 +01:00
}
2015-07-22 01:45:38 +02:00
else if ( $conflicts )
2014-02-19 18:48:25 +01:00
{
$response -> call (
'egw_openWindowCentered2' ,
$GLOBALS [ 'egw_info' ][ 'server' ][ 'webserver_url' ] . ' / index . php ? menuaction = calendar . calendar_uiforms . edit
& cal_id = '.$event[' id ' ]
. '&start=' . $event [ 'start' ]
. '&end=' . $event [ 'end' ]
. '&non_interactive=true'
. '&cancel_needs_refresh=true' ,
'' , 750 , 410 );
}
2015-07-22 01:45:38 +02:00
else if ( $message )
{
$response -> call ( 'egw.message' , implode ( '<br />' , $message ));
}
2020-08-31 19:23:25 +02:00
if ( $event [ 'id' ] != $eventId && ! $date ) $this -> update_client ( $_eventId );
2014-02-19 18:48:25 +01:00
}
2015-05-26 20:34:03 +02:00
2015-07-01 00:26:59 +02:00
/**
* Change the status via ajax
2015-07-16 11:34:55 +02:00
* @ param string $_eventId
* @ param integer $uid
2015-07-01 00:26:59 +02:00
* @ param string $status
*/
2015-07-16 11:34:55 +02:00
function ajax_status ( $_eventId , $uid , $status )
2015-07-01 00:26:59 +02:00
{
2015-07-16 11:34:55 +02:00
list ( $eventId , $date ) = explode ( ':' , $_eventId );
$event = $this -> bo -> read ( $eventId );
2016-05-18 19:30:50 +02:00
if ( $date )
{
$d = new Api\DateTime ( $date , Api\DateTime :: $user_timezone );
}
2016-07-26 09:03:02 +02:00
2015-07-01 00:26:59 +02:00
// If we have a recuring event for a particular day, make an exception
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $date )
{
if ( ! empty ( $event [ 'whole_day' ]))
{
2015-07-16 11:34:55 +02:00
$d =& $this -> bo -> so -> startOfDay ( $date );
$d -> setUser ();
2015-07-01 00:26:59 +02:00
}
2015-07-16 11:34:55 +02:00
$event = $this -> bo -> read ( $eventId , $d , true );
$date = $d -> format ( 'ts' );
2015-07-01 00:26:59 +02:00
}
if ( $event [ 'participants' ][ $uid ])
{
$q = $r = null ;
calendar_so :: split_status ( $event [ 'participants' ][ $uid ], $q , $r );
$event [ 'participants' ][ $uid ] = $status = calendar_so :: combine_status ( $status , $q , $r );
2016-05-18 19:30:50 +02:00
$this -> bo -> set_status ( $event [ 'id' ], $uid , $status , $date , true );
2015-07-01 00:26:59 +02:00
}
2016-05-24 22:51:16 +02:00
else
{
// Group membership
2018-03-22 11:56:10 +01:00
foreach ( array_keys ( $event [ 'participants' ]) as $id )
2016-05-24 22:51:16 +02:00
{
if ( $GLOBALS [ 'egw' ] -> accounts -> get_type ( $id ) == 'g' && in_array ( $uid , $GLOBALS [ 'egw' ] -> accounts -> members ( $id , true )))
{
calendar_so :: split_status ( $event [ 'participants' ][ $uid ], $q , $r );
$event [ 'participants' ][ $uid ] = $status = calendar_so :: combine_status ( $status , $q , $r );
$this -> bo -> set_status ( $event [ 'id' ], $uid , $status , $date , true );
break ;
}
}
}
2015-07-01 00:26:59 +02:00
}
2015-07-16 11:34:55 +02:00
2015-07-15 18:29:10 +02:00
/**
* Deletes an event
*/
public function ajax_delete ( $eventId )
{
2021-03-12 20:34:07 +01:00
$response = Api\Json\Response :: get ();
2016-01-20 21:58:14 +01:00
list ( $id , $date ) = explode ( ':' , $eventId );
2021-03-12 20:34:07 +01:00
// let integration take care of delete for integration-events
if ( ! is_numeric ( $id ) && preg_match ( '/^([^\d]+)(\d+)$/' , $id , $matches ) &&
! empty ( $app_data = calendar_bo :: integration_get_data ( $matches [ 1 ], 'delete' , true )))
{
try {
$msg = is_callable ( $app_data ) ? $app_data ( $matches [ 2 ]) : ExecMethod2 ( $app_data , $matches [ 2 ]);
$response -> call ( 'egw.refresh' , $msg , 'calendar' , $eventId , 'delete' );
}
catch ( \Exception $e ) {
$response -> apply ( 'egw.message' , $e -> getMessage (), 'error' );
}
return ;
}
2016-01-20 21:58:14 +01:00
$event = $this -> bo -> read ( $id );
2015-07-15 18:29:10 +02:00
if ( $this -> bo -> delete ( $event [ 'id' ], ( int ) $date ))
{
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && ! $date )
{
$msg = lang ( 'Series deleted' );
}
else
{
$msg = lang ( 'Event deleted' );
}
$response -> apply ( 'egw.refresh' , Array ( $msg , 'calendar' , $eventId , 'delete' ));
}
else
{
2016-01-20 21:58:14 +01:00
$response -> apply ( 'egw.message' , Array ( lang ( 'Error' )), 'error' );
2015-07-15 18:29:10 +02:00
}
}
2015-07-16 12:05:18 +02:00
2016-05-11 19:29:58 +02:00
/**
*
* @ param string $_eventId id of the event to be changed . For recurring events
* it may contain the instance date
* @ param string [] $invite Resources to invite
* @ param string [] $remove Remove resource from participants
*/
public function ajax_invite ( $_eventId , $invite = array (), $remove = array ())
{
list ( $eventId , $date ) = explode ( ':' , $_eventId , 2 );
2016-06-01 01:18:46 +02:00
$event = $this -> bo -> read ( $eventId );
if ( $date )
{
$d = new Api\DateTime ( $date , Api\DateTime :: $user_timezone );
}
// If we have a recuring event for a particular day, make an exception
if ( $event [ 'recur_type' ] != MCAL_RECUR_NONE && $date )
{
if ( ! empty ( $event [ 'whole_day' ]))
{
$d =& $this -> bo -> so -> startOfDay ( $date );
$d -> setUser ();
}
$event = $this -> bo -> read ( $eventId , $d , true );
// For DnD, create an exception if they gave the date
$preserv = null ;
$this -> _create_exception ( $event , $preserv );
unset ( $event [ 'id' ]);
$messages = null ;
2016-06-01 21:47:18 +02:00
$conflicts = $this -> bo -> update ( $event , true , true , false , true , $messages );
2016-06-01 01:18:46 +02:00
if ( ! is_array ( $conflicts ) && $conflicts )
{
// now we need to add the original start as recur-execption to the series
$recur_event = $this -> bo -> read ( $event [ 'reference' ]);
$recur_event [ 'recur_exception' ][] = $d -> format ( 'ts' );
// check if we need to move the alarms, because they are next on that exception
$this -> bo -> check_move_alarms ( $recur_event , null , $d );
unset ( $recur_event [ 'start' ]); unset ( $recur_event [ 'end' ]); // no update necessary
unset ( $recur_event [ 'alarm' ]); // unsetting alarms too, as they cant be updated without start!
$this -> bo -> update ( $recur_event , true ); // no conflict check here
// Sending null will trigger a removal of the original for that date
Api\Json\Response :: get () -> generic ( 'data' , array ( 'uid' => 'calendar::' . $_eventId , 'data' => null ));
unset ( $recur_event );
unset ( $event [ 'edit_single' ]); // if we further edit it, it's just a single event
unset ( $preserv [ 'edit_single' ]);
}
}
2016-05-11 19:29:58 +02:00
foreach ( $remove as $participant )
{
unset ( $event [ 'participants' ][ $participant ]);
}
foreach ( $invite as $participant )
{
$event [ 'participants' ][ $participant ] = 'U' ;
}
2016-10-19 15:24:50 +02:00
$message = null ;
2016-05-11 19:29:58 +02:00
$conflicts = $this -> bo -> update ( $event , false , true , false , true , $message );
$response = Api\Json\Response :: get ();
2016-06-01 21:47:18 +02:00
if ( is_array ( $conflicts ) && $conflicts )
2016-05-11 19:29:58 +02:00
{
2016-06-01 21:47:18 +02:00
// Save it anyway, was done with explicit user interaction,
// and if we don't we lose the invite
$this -> bo -> update ( $event , true ); // no conflict check here
$this -> update_client ( $event [ 'id' ], $d );
2016-05-11 19:29:58 +02:00
$response -> call (
'egw_openWindowCentered2' ,
$GLOBALS [ 'egw_info' ][ 'server' ][ 'webserver_url' ] . ' / index . php ? menuaction = calendar . calendar_uiforms . edit
& cal_id = '.$event[' id ' ]
. '&start=' . $event [ 'start' ]
. '&end=' . $event [ 'end' ]
. '&non_interactive=true'
. '&cancel_needs_refresh=true' ,
'' , 750 , 410 );
}
else if ( $message )
{
$response -> call ( 'egw.message' , implode ( '<br />' , $message ));
}
2016-06-01 21:47:18 +02:00
if ( $conflicts )
{
$this -> update_client ( $event [ 'id' ], $d );
if ( is_int ( $conflicts ))
{
$event [ 'id' ] = $conflicts ;
}
if ( $event [ 'id' ])
{
$response -> call ( 'egw.refresh' , '' , 'calendar' , $event [ 'id' ], 'edit' );
}
}
2016-05-11 19:29:58 +02:00
}
2015-04-15 13:23:59 +02:00
/**
* imports a mail as Calendar
*
2015-04-15 17:55:18 +02:00
* @ param array $mailContent = null mail content
2015-04-15 13:23:59 +02:00
* @ return array
*/
2015-04-15 17:55:18 +02:00
function mail_import ( array $mailContent = null )
2015-04-15 13:23:59 +02:00
{
2015-04-15 17:55:18 +02:00
// It would get called from compose as a popup with egw_data
if ( ! is_array ( $mailContent ) && ( $_GET [ 'egw_data' ]))
{
// get raw mail data
2016-05-01 19:47:59 +02:00
Link :: get_data ( $_GET [ 'egw_data' ]);
2015-04-15 17:55:18 +02:00
return false ;
}
2015-05-26 20:34:03 +02:00
2015-04-15 13:23:59 +02:00
if ( is_array ( $mailContent ))
{
2015-04-23 15:47:12 +02:00
// Addressbook
2016-05-01 19:47:59 +02:00
$AB = new Api\Contacts ();
2015-04-23 15:47:12 +02:00
$accounts = array ( 0 => $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ]);
2015-05-26 20:34:03 +02:00
2015-04-15 13:23:59 +02:00
$participants [ 0 ] = array (
'uid' => $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ],
'delete_id' => $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ],
'status' => 'A' ,
'old_status' => 'A' ,
'app' => 'User' ,
'role' => 'REQ-PARTICIPANT'
);
foreach ( $mailContent [ 'addresses' ] as $address )
{
2015-04-23 15:47:12 +02:00
// Get available contacts from the email
2015-05-04 14:19:33 +02:00
$contacts = $AB -> search ( array (
2015-04-23 15:47:12 +02:00
'email' => $address [ 'email' ],
'email_home' => $address [ 'email' ]
), 'contact_id,contact_email,contact_email_home,egw_addressbook.account_id as account_id' , '' , '' , '' , false , 'OR' , false , array ( 'owner' => 0 ), '' , false );
2015-05-04 14:19:33 +02:00
if ( is_array ( $contacts ))
2015-04-23 15:47:12 +02:00
{
2015-05-04 14:19:33 +02:00
foreach ( $contacts as $account )
2015-04-23 15:47:12 +02:00
{
$accounts [] = $account [ 'account_id' ];
}
}
else
{
$participants [] = array (
'app' => 'email' ,
'uid' => 'e' . $address [ 'email' ],
'status' => 'U' ,
'old_status' => 'U'
);
}
2015-04-15 13:23:59 +02:00
}
2015-04-23 15:47:12 +02:00
$participants = array_merge ( $participants , array (
2016-03-14 16:58:25 +01:00
" participant " => $accounts ,
2015-04-23 15:47:12 +02:00
" role " => " REQ-PARTICIPANT " ,
" add " => " pressed "
));
2015-05-26 20:34:03 +02:00
2015-04-15 13:23:59 +02:00
// Prepare calendar event draft
2020-04-27 19:02:26 +02:00
$event = $this -> default_add_event ();
$event = array_merge ( $event , array (
2015-04-15 13:23:59 +02:00
'title' => $mailContent [ 'subject' ],
'description' => $mailContent [ 'message' ],
'participants' => $participants ,
'link_to' => array (
'to_app' => 'calendar' ,
'to_id' => 0 ,
),
2016-01-12 12:13:16 +01:00
'duration' => 60 * $this -> cal_prefs [ 'interval' ],
'owner' => $GLOBALS [ 'egw_info' ][ 'user' ][ 'account_id' ]
2020-04-27 19:02:26 +02:00
));
$ts = new Api\DateTime ();
$ts -> setUser ();
if ( $mailContent [ 'date' ] >= $ts -> format ( 'ts' ))
{
// Mail from the future! Ok, use that date
$event [ 'start' ] = $mailContent [ 'date' ];
}
2015-05-26 20:34:03 +02:00
2015-04-15 13:23:59 +02:00
if ( is_array ( $mailContent [ 'attachments' ]))
{
foreach ( $mailContent [ 'attachments' ] as $attachment )
{
if ( $attachment [ 'egw_data' ])
{
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $event [ 'link_to' ][ 'to_id' ], Link :: DATA_APPNAME , $attachment );
2015-04-15 13:23:59 +02:00
}
2015-08-27 12:12:55 +02:00
else if ( is_readable ( $attachment [ 'tmp_name' ]) ||
2016-05-01 19:47:59 +02:00
( Vfs :: is_readable ( $attachment [ 'tmp_name' ]) && parse_url ( $attachment [ 'tmp_name' ], PHP_URL_SCHEME ) === 'vfs' ))
2015-04-17 11:39:22 +02:00
{
2016-05-01 19:47:59 +02:00
Link :: link ( 'calendar' , $event [ 'link_to' ][ 'to_id' ], 'file' , $attachment );
2015-04-17 11:39:22 +02:00
}
2015-04-15 13:23:59 +02:00
}
}
}
else
{
2016-05-01 19:47:59 +02:00
Framework :: window_close ( lang ( 'No content found to show up as calendar entry.' ));
2015-04-15 13:23:59 +02:00
}
2015-05-26 20:34:03 +02:00
2015-04-15 13:23:59 +02:00
return $this -> process_edit ( $event );
}
2021-02-09 21:42:51 +01:00
2021-02-11 19:43:47 +01:00
/**
* Immediately send notification to selected users
*
* @ param array $content
* @ throws Api\Exception\AssertionFailed
*/
2021-02-09 21:42:51 +01:00
public function notify ( $content = array ())
{
2021-02-17 17:40:21 +01:00
list ( $id , $date ) = explode ( ':' , $_GET [ 'id' ] ? : $content [ 'id' ]);
$event = $this -> bo -> read ( $id , $date );
2021-02-09 21:42:51 +01:00
if ( is_array ( $content ) && $content [ 'button' ])
{
$participants = array_filter ( $content [ 'participants' ][ 'notify' ]);
2021-02-17 17:40:21 +01:00
$this -> bo -> send_update ( MSG_REQUEST , $participants , $event , null , 0 , null , true );
2021-02-09 21:42:51 +01:00
Framework :: window_close ();
}
2021-03-10 16:40:56 +01:00
$content = $readonlys = $preserve = array ();
2021-02-09 21:42:51 +01:00
$sel_options = array (
2021-03-04 14:36:46 +01:00
'recur_type' => & $this -> bo -> recur_types ,
'status' => $this -> bo -> verbose_status ,
'duration' => $this -> durations ,
'role' => $this -> bo -> roles
2021-02-09 21:42:51 +01:00
);
2021-03-04 14:36:46 +01:00
$this -> setup_participants ( $event , $content , $sel_options , $readonlys , $preserve , true );
$content = array_merge ( $event , $content );
2021-02-09 21:42:51 +01:00
$readonlys = [];
$etpl = new Etemplate ( 'calendar.notify_dialog' );
$preserve = $content ;
2021-02-17 17:40:21 +01:00
$preserve [ 'id' ] = $_GET [ 'id' ];
2021-02-09 21:42:51 +01:00
$etpl -> exec ( 'calendar.calendar_uiforms.notify' , $content , $sel_options , $readonlys , $preserve , 2 );
}
2004-10-08 00:11:18 +02:00
}