mirror of
https://github.com/EGroupware/egroupware.git
synced 2024-12-03 05:14:12 +01:00
9cfe8a012d
In the sidebox menu, resource categories are returned and selectable and will show events for all resources in that category. In the edit popup, if the category name matches the search string, all resources of that category are returned and user can select them as if they would have searched for the name of the resource.
2272 lines
77 KiB
PHP
2272 lines
77 KiB
PHP
<?php
|
|
/**
|
|
* EGroupware - Calendar's buisness-object - access only
|
|
*
|
|
* @link http://www.egroupware.org
|
|
* @package calendar
|
|
* @author Ralf Becker <RalfBecker-AT-outdoor-training.de>
|
|
* @author Joerg Lehrke <jlehrke@noc.de>
|
|
* @copyright (c) 2004-16 by RalfBecker-At-outdoor-training.de
|
|
* @license http://opensource.org/licenses/gpl-license.php GPL - GNU General Public License
|
|
* @version $Id$
|
|
*/
|
|
|
|
use EGroupware\Api;
|
|
use EGroupware\Api\Link;
|
|
use EGroupware\Api\Acl;
|
|
|
|
if (!defined('ACL_TYPE_IDENTIFER')) // used to mark ACL-values for the debug_message methode
|
|
{
|
|
define('ACL_TYPE_IDENTIFER','***ACL***');
|
|
}
|
|
|
|
define('HOUR_s',60*60);
|
|
define('DAY_s',24*HOUR_s);
|
|
define('WEEK_s',7*DAY_s);
|
|
|
|
/**
|
|
* Required (!) include, as we use the MCAL_* constants, BEFORE instanciating (and therefore autoloading) the class
|
|
*/
|
|
require_once(EGW_INCLUDE_ROOT.'/calendar/inc/class.calendar_so.inc.php');
|
|
|
|
/**
|
|
* Class to access all calendar data
|
|
*
|
|
* For updating calendar data look at the bocalupdate class, which extends this class.
|
|
*
|
|
* 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 in server-time
|
|
*
|
|
* As this BO class deals with dates/times of several types and timezone, each variable should have a postfix
|
|
* appended, telling with type it is: _s = seconds, _su = secs in user-time, _ss = secs in server-time, _h = hours
|
|
*
|
|
* All new BO code (should be true for eGW in general) NEVER use any $_REQUEST ($_POST or $_GET) vars itself.
|
|
* Nor does it store the state of any UI-elements (eg. cat-id selectbox). All this is the task of the UI class(es) !!!
|
|
*
|
|
* All permanent debug messages of the calendar-code should done via the debug-message method of this class !!!
|
|
*/
|
|
class calendar_bo
|
|
{
|
|
/**
|
|
* Gives read access to the calendar, but all events the user is not participating are private!
|
|
* Used by addressbook.
|
|
*/
|
|
const ACL_READ_FOR_PARTICIPANTS = Acl::CUSTOM1;
|
|
/**
|
|
* Right to see free/busy data only
|
|
*/
|
|
const ACL_FREEBUSY = Acl::CUSTOM2;
|
|
/**
|
|
* Allows to invite an other user (if configured to be used!)
|
|
*/
|
|
const ACL_INVITE = Acl::CUSTOM3;
|
|
|
|
/**
|
|
* @var int $debug name of method to debug or level of debug-messages:
|
|
* False=Off as higher as more messages you get ;-)
|
|
* 1 = function-calls incl. parameters to general functions like search, read, write, delete
|
|
* 2 = function-calls to exported helper-functions like check_perms
|
|
* 4 = function-calls to exported conversation-functions like date2ts, date2array, ...
|
|
* 5 = function-calls to private functions
|
|
*/
|
|
var $debug=false;
|
|
|
|
/**
|
|
* @var int $now timestamp in server-time
|
|
*/
|
|
var $now;
|
|
|
|
/**
|
|
* @var int $now_su timestamp of actual user-time
|
|
*/
|
|
var $now_su;
|
|
|
|
/**
|
|
* @var array $cal_prefs calendar-specific prefs
|
|
*/
|
|
var $cal_prefs;
|
|
|
|
/**
|
|
* @var array $common_prefs common preferences
|
|
*/
|
|
var $common_prefs;
|
|
/**
|
|
* Custom fields read from the calendar config
|
|
*
|
|
* @var array
|
|
*/
|
|
var $customfields = array();
|
|
/**
|
|
* @var int $user nummerical id of the current user-id
|
|
*/
|
|
var $user=0;
|
|
|
|
/**
|
|
* @var array $grants grants of the current user, array with user-id / ored-ACL-rights pairs
|
|
*/
|
|
var $grants=array();
|
|
|
|
/**
|
|
* @var array $verbose_status translated 1-char status values to a verbose name, run through lang() by the constructor
|
|
*/
|
|
var $verbose_status = array(
|
|
'A' => 'Accepted',
|
|
'R' => 'Rejected',
|
|
'T' => 'Tentative',
|
|
'U' => 'No Response',
|
|
'D' => 'Delegated',
|
|
'G' => 'Group invitation',
|
|
);
|
|
/**
|
|
* @var array recur_types translates MCAL recur-types to verbose labels
|
|
*/
|
|
var $recur_types = Array(
|
|
MCAL_RECUR_NONE => 'No recurrence',
|
|
MCAL_RECUR_DAILY => 'Daily',
|
|
MCAL_RECUR_WEEKLY => 'Weekly',
|
|
MCAL_RECUR_MONTHLY_WDAY => 'Monthly (by day)',
|
|
MCAL_RECUR_MONTHLY_MDAY => 'Monthly (by date)',
|
|
MCAL_RECUR_YEARLY => 'Yearly'
|
|
);
|
|
/**
|
|
* @var array recur_days translates MCAL recur-days to verbose labels
|
|
*/
|
|
var $recur_days = array(
|
|
MCAL_M_MONDAY => 'Monday',
|
|
MCAL_M_TUESDAY => 'Tuesday',
|
|
MCAL_M_WEDNESDAY => 'Wednesday',
|
|
MCAL_M_THURSDAY => 'Thursday',
|
|
MCAL_M_FRIDAY => 'Friday',
|
|
MCAL_M_SATURDAY => 'Saturday',
|
|
MCAL_M_SUNDAY => 'Sunday',
|
|
);
|
|
/**
|
|
* Standard iCal attendee roles
|
|
*
|
|
* @var array
|
|
*/
|
|
var $roles = array(
|
|
'REQ-PARTICIPANT' => 'Requested',
|
|
'CHAIR' => 'Chair',
|
|
'OPT-PARTICIPANT' => 'Optional',
|
|
'NON-PARTICIPANT' => 'None',
|
|
);
|
|
/**
|
|
* Alarm times
|
|
*
|
|
* @var array
|
|
*/
|
|
var $alarms = array(
|
|
300 => '5 Minutes',
|
|
600 => '10 Minutes',
|
|
900 => '15 Minutes',
|
|
1800 => '30 Minutes',
|
|
3600 => '1 Hour',
|
|
7200 => '2 Hours',
|
|
43200 => '12 Hours',
|
|
86400 => '1 Day',
|
|
172800 => '2 Days',
|
|
604800 => '1 Week',
|
|
);
|
|
/**
|
|
* @var array $resources registered scheduling resources of the calendar (gets cached in the session for performance reasons)
|
|
*/
|
|
var $resources;
|
|
/**
|
|
* @var array $cached_event here we do some caching to read single events only once
|
|
*/
|
|
protected static $cached_event = array();
|
|
protected static $cached_event_date_format = false;
|
|
protected static $cached_event_date = 0;
|
|
/**
|
|
* @var array $cached_holidays holidays plus birthdays (gets cached in the session for performance reasons)
|
|
*/
|
|
var $cached_holidays;
|
|
/**
|
|
* Instance of the socal class
|
|
*
|
|
* @var calendar_so
|
|
*/
|
|
var $so;
|
|
/**
|
|
* Instance of the categories class
|
|
*
|
|
* @var Api\Categories
|
|
*/
|
|
var $categories;
|
|
/**
|
|
* Config values for "calendar", only used for horizont, regular calendar config is under phpgwapi
|
|
*
|
|
* @var array
|
|
*/
|
|
var $config;
|
|
|
|
/**
|
|
* Does a user require an extra invite grant, to be able to invite an other user, default no
|
|
*
|
|
* @var string 'all', 'groups' or null
|
|
*/
|
|
public $require_acl_invite = null;
|
|
|
|
/**
|
|
* Warnings to show in regular UI
|
|
*
|
|
* @var array
|
|
*/
|
|
var $warnings = array();
|
|
|
|
/**
|
|
* Constructor
|
|
*/
|
|
function __construct()
|
|
{
|
|
if ($this->debug > 0) $this->debug_message('calendar_bo::bocal() started',True);
|
|
|
|
$this->so = new calendar_so();
|
|
|
|
$this->common_prefs =& $GLOBALS['egw_info']['user']['preferences']['common'];
|
|
$this->cal_prefs =& $GLOBALS['egw_info']['user']['preferences']['calendar'];
|
|
|
|
$this->now = time();
|
|
$this->now_su = Api\DateTime::server2user($this->now,'ts');
|
|
|
|
$this->user = $GLOBALS['egw_info']['user']['account_id'];
|
|
|
|
$this->grants = $GLOBALS['egw']->acl->get_grants('calendar');
|
|
|
|
if (!is_array($this->resources = Api\Cache::getSession('calendar', 'resources')))
|
|
{
|
|
$this->resources = array();
|
|
foreach(Api\Hooks::process('calendar_resources') as $app => $data)
|
|
{
|
|
if ($data && $data['type'])
|
|
{
|
|
$this->resources[$data['type']] = $data + array('app' => $app);
|
|
}
|
|
}
|
|
$this->resources['e'] = array(
|
|
'type' => 'e',
|
|
'info' => __CLASS__.'::email_info',
|
|
'app' => 'email',
|
|
);
|
|
$this->resources['l'] = array(
|
|
'type' => 'l',// one char type-identifier for this resources
|
|
'info' => __CLASS__ .'::mailing_lists',// info method, returns array with id, type & name for a given id
|
|
'app' => 'Mailing list'
|
|
);
|
|
$this->resources[''] = array(
|
|
'type' => '',
|
|
'app' => 'api-accounts',
|
|
);
|
|
Api\Cache::setSession('calendar', 'resources', $this->resources);
|
|
}
|
|
//error_log(__METHOD__ . " registered resources=". array2string($this->resources));
|
|
|
|
$this->config = Api\Config::read('calendar'); // only used for horizont, regular calendar config is under phpgwapi
|
|
$this->require_acl_invite = $GLOBALS['egw_info']['server']['require_acl_invite'];
|
|
|
|
$this->categories = new Api\Categories($this->user,'calendar');
|
|
|
|
$this->customfields = Api\Storage\Customfields::get('calendar');
|
|
|
|
foreach($this->alarms as $secs => &$label)
|
|
{
|
|
$label = self::secs2label($secs);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Generate translated label for a given number of seconds
|
|
*
|
|
* @param int $secs
|
|
* @return string
|
|
*/
|
|
static public function secs2label($secs)
|
|
{
|
|
if ($secs <= 3600)
|
|
{
|
|
$label = lang('%1 minutes', $secs/60);
|
|
}
|
|
elseif($secs <= 86400)
|
|
{
|
|
$label = lang('%1 hours', $secs/3600);
|
|
}
|
|
else
|
|
{
|
|
$label = lang('%1 days', $secs/86400);
|
|
}
|
|
return $label;
|
|
}
|
|
|
|
/**
|
|
* returns info about email addresses as participants
|
|
*
|
|
* @param int|array $ids single contact-id or array of id's
|
|
* @return array
|
|
*/
|
|
static function email_info($ids)
|
|
{
|
|
if (!$ids) return null;
|
|
|
|
$data = array();
|
|
foreach((array)$ids as $id)
|
|
{
|
|
$email = $id;
|
|
$name = '';
|
|
$matches = null;
|
|
if (preg_match('/^(.*) *<([a-z0-9_.@-]{8,})>$/iU',$email,$matches))
|
|
{
|
|
$name = $matches[1];
|
|
$email = $matches[2];
|
|
}
|
|
$data[] = array(
|
|
'res_id' => $id,
|
|
'email' => $email,
|
|
'rights' => self::ACL_READ_FOR_PARTICIPANTS,
|
|
'name' => $name,
|
|
);
|
|
}
|
|
//error_log(__METHOD__.'('.array2string($ids).')='.array2string($data).' '.function_backtrace());
|
|
return $data;
|
|
}
|
|
|
|
/**
|
|
* returns info about mailing lists as participants
|
|
*
|
|
* @param int|array $ids single mailing list ID or array of id's
|
|
* @return array
|
|
*/
|
|
static function mailing_lists($ids)
|
|
{
|
|
if(!is_array($ids))
|
|
{
|
|
$ids = array($ids);
|
|
}
|
|
$data = array();
|
|
|
|
// Email list
|
|
$contacts_obj = new Api\Contacts();
|
|
$bo = new calendar_bo();
|
|
foreach($ids as $id)
|
|
{
|
|
$list = $contacts_obj->read_list((int)$id);
|
|
|
|
$data[] = array(
|
|
'res_id' => $id,
|
|
'rights' => self::ACL_READ_FOR_PARTICIPANTS,
|
|
'name' => $list['list_name'],
|
|
'resources' => $bo->enum_mailing_list('l'.$id, false, false)
|
|
);
|
|
}
|
|
|
|
return $data;
|
|
}
|
|
|
|
/**
|
|
* Enumerates the contacts in a contact list, and returns the list of contact IDs
|
|
*
|
|
* This is used to enable mailing lists as owner/participant
|
|
*
|
|
* @param string $id Mailing list participant ID, which is the mailing list
|
|
* ID prefixed with 'l'
|
|
* @param boolean $ignore_acl = false Flag to skip ACL checks
|
|
* @param boolean $use_freebusy =true should freebusy rights are taken into account, default true, can be set to false eg. for a search
|
|
*
|
|
* @return array
|
|
*/
|
|
public function enum_mailing_list($id, $ignore_acl= false, $use_freebusy = true)
|
|
{
|
|
$contact_list = array();
|
|
$contacts = new Api\Contacts();
|
|
if($contacts->check_list((int)substr($id,1), ACL::READ))
|
|
{
|
|
$options = array('list' => substr($id,1));
|
|
$lists = $contacts->search('',true,'','','',false,'AND',false,$options);
|
|
if(!$lists)
|
|
{
|
|
return $contact_list;
|
|
}
|
|
foreach($lists as &$contact)
|
|
{
|
|
$contact = 'c'.$contact['id'];
|
|
if ($ignore_acl || $this->check_perms(ACL::READ|self::ACL_READ_FOR_PARTICIPANTS|($use_freebusy?self::ACL_FREEBUSY:0),0,$contact))
|
|
{
|
|
if ($contact && !in_array($contact,$contact_list)) // already added?
|
|
{
|
|
$contact_list[] = $contact;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return $contact_list;
|
|
}
|
|
|
|
/**
|
|
* Add group-members as participants with status 'G'
|
|
*
|
|
* @param array $event event-array
|
|
* @return int number of added participants
|
|
*/
|
|
function enum_groups(&$event)
|
|
{
|
|
$added = 0;
|
|
foreach(array_keys($event['participants']) as $uid)
|
|
{
|
|
if (is_numeric($uid) && $GLOBALS['egw']->accounts->get_type($uid) == 'g' &&
|
|
($members = $GLOBALS['egw']->accounts->members($uid, true)))
|
|
{
|
|
foreach($members as $member)
|
|
{
|
|
if (!isset($event['participants'][$member]))
|
|
{
|
|
$event['participants'][$member] = 'G';
|
|
++$added;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return $added;
|
|
}
|
|
|
|
/**
|
|
* Resolve users to add memberships for users and members for groups
|
|
*
|
|
* @param int|array $_users
|
|
* @param boolean $no_enum_groups =true
|
|
* @param boolean $ignore_acl =false
|
|
* @param boolean $use_freebusy =true should freebusy rights are taken into account, default true, can be set to false eg. for a search
|
|
* @return array of user-ids
|
|
*/
|
|
private function resolve_users($_users, $no_enum_groups=true, $ignore_acl=false, $use_freebusy=true)
|
|
{
|
|
if (!is_array($_users))
|
|
{
|
|
$_users = $_users ? array($_users) : array();
|
|
}
|
|
// only query calendars of users, we have READ-grants from
|
|
$users = array();
|
|
foreach($_users as $user)
|
|
{
|
|
$user = trim($user);
|
|
|
|
// Handle email lists
|
|
if(!is_numeric($user) && $user[0] == 'l')
|
|
{
|
|
foreach($this->enum_mailing_list($user, $ignore_acl, $use_freebusy) as $contact)
|
|
{
|
|
if ($contact && !in_array($contact,$users)) // already added?
|
|
{
|
|
$users[] = $contact;
|
|
}
|
|
}
|
|
continue;
|
|
}
|
|
if ($ignore_acl || $this->check_perms(ACL::READ|self::ACL_READ_FOR_PARTICIPANTS|($use_freebusy?self::ACL_FREEBUSY:0),0,$user))
|
|
{
|
|
if ($user && !in_array($user,$users)) // already added?
|
|
{
|
|
// General expansion check
|
|
if (!is_numeric($user) && $this->resources[$user[0]]['info'])
|
|
{
|
|
$info = $this->resource_info($user);
|
|
if($info && $info['resources'])
|
|
{
|
|
foreach($info['resources'] as $_user)
|
|
{
|
|
if($_user && !in_array($_user, $users))
|
|
{
|
|
$users[] = $_user;
|
|
}
|
|
}
|
|
continue;
|
|
}
|
|
}
|
|
$users[] = $user;
|
|
}
|
|
}
|
|
elseif ($GLOBALS['egw']->accounts->get_type($user) != 'g')
|
|
{
|
|
continue; // for non-groups (eg. users), we stop here if we have no read-rights
|
|
}
|
|
// the further code is only for real users
|
|
if (!is_numeric($user)) continue;
|
|
|
|
// for groups we have to include the members
|
|
if ($GLOBALS['egw']->accounts->get_type($user) == 'g')
|
|
{
|
|
if ($no_enum_groups) continue;
|
|
|
|
$members = $GLOBALS['egw']->accounts->members($user, true);
|
|
if (is_array($members))
|
|
{
|
|
foreach($members as $member)
|
|
{
|
|
// use only members which gave the user a read-grant
|
|
if (!in_array($member, $users) &&
|
|
($ignore_acl || $this->check_perms(Acl::READ|($use_freebusy?self::ACL_FREEBUSY:0),0,$member)))
|
|
{
|
|
$users[] = $member;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
else // for users we have to include all the memberships, to get the group-events
|
|
{
|
|
$memberships = $GLOBALS['egw']->accounts->memberships($user, true);
|
|
if (is_array($memberships))
|
|
{
|
|
foreach($memberships as $group)
|
|
{
|
|
if (!in_array($group,$users))
|
|
{
|
|
$users[] = $group;
|
|
}
|
|
}
|
|
}
|
|
}
|
|
}
|
|
return $users;
|
|
}
|
|
|
|
/**
|
|
* Searches / lists calendar entries, including repeating ones
|
|
*
|
|
* @param array $params array with the following keys
|
|
* start date startdate of the search/list, defaults to today
|
|
* end date enddate of the search/list, defaults to start + one day
|
|
* users int|array integer user-id or array of user-id's to use, defaults to the current user
|
|
* cat_id int|array category-id or array of cat-id's (incl. all sub-categories), default 0 = all
|
|
* filter string all (not rejected), accepted, unknown, tentative, rejected, hideprivate or everything (incl. rejected, deleted)
|
|
* query string pattern so search for, if unset or empty all matching entries are returned (no search)
|
|
* Please Note: a search never returns repeating events more then once AND does not honor start+end date !!!
|
|
* daywise boolean on True it returns an array with YYYYMMDD strings as keys and an array with events
|
|
* (events spanning multiple days are returned each day again (!)) otherwise it returns one array with
|
|
* the events (default), not honored in a search ==> always returns an array of events!
|
|
* date_format string date-formats: 'ts'=timestamp (default), 'array'=array, or string with format for date
|
|
* offset boolean|int false (default) to return all entries or integer offset to return only a limited result
|
|
* enum_recuring boolean if true or not set (default) or daywise is set, each recurence of a recuring events is returned,
|
|
* otherwise the original recuring event (with the first start- + enddate) is returned
|
|
* num_rows int number of entries to return, default or if 0, max_entries from the prefs
|
|
* order column-names plus optional DESC|ASC separted by comma
|
|
* ignore_acl if set and true no check_perms for a general Acl::READ grants is performed
|
|
* enum_groups boolean if set and true, group-members will be added as participants with status 'G'
|
|
* cols string|array columns to select, if set an iterator will be returned
|
|
* append string to append to the query, eg. GROUP BY
|
|
* cfs array if set, query given custom fields or all for empty array, none are returned, if not set (default)
|
|
* master_only boolean default false, true only take into account participants/status from master (for AS)
|
|
* @param string $sql_filter =null sql to be and'ed into query (fully quoted), default none
|
|
* @return iterator|array|boolean array of events or array with YYYYMMDD strings / array of events pairs (depending on $daywise param)
|
|
* or false if there are no read-grants from _any_ of the requested users or iterator/recordset if cols are given
|
|
*/
|
|
function &search($params,$sql_filter=null)
|
|
{
|
|
$params_in = $params;
|
|
|
|
$params['sql_filter'] = $sql_filter; // dont allow to set it via UI or xmlrpc
|
|
|
|
// check if any resource wants to hook into
|
|
foreach($this->resources as $data)
|
|
{
|
|
if (isset($data['search_filter']))
|
|
{
|
|
$params = ExecMethod($data['search_filter'],$params);
|
|
}
|
|
}
|
|
|
|
if (!isset($params['users']) || !$params['users'] ||
|
|
count($params['users']) == 1 && isset($params['users'][0]) && !$params['users'][0]) // null or '' casted to an array
|
|
{
|
|
// for a search use all account you have read grants from
|
|
$params['users'] = $params['query'] ? array_keys($this->grants) : $this->user;
|
|
}
|
|
// resolve users to add memberships for users and members for groups
|
|
// for search, do NOT use freebusy rights, as it would allow to probe the content of event entries
|
|
$users = $this->resolve_users($params['users'], $params['filter'] == 'no-enum-groups', $params['ignore_acl'], empty($params['query']));
|
|
|
|
// supply so with private_grants, to not query them again from the database
|
|
if (!empty($params['query']))
|
|
{
|
|
$params['private_grants'] = array();
|
|
foreach($this->grants as $user => $rights)
|
|
{
|
|
if ($rights & Acl::PRIVAT) $params['private_grants'][] = $user;
|
|
}
|
|
}
|
|
|
|
// replace (by so not understood filter 'no-enum-groups' with 'default' filter
|
|
if ($params['filter'] == 'no-enum-groups')
|
|
{
|
|
$params['filter'] = 'default';
|
|
}
|
|
// if we have no grants from the given user(s), we directly return no events / an empty array,
|
|
// as calling the so-layer without users would give the events of all users (!)
|
|
if (!count($users))
|
|
{
|
|
return false;
|
|
}
|
|
if (isset($params['start'])) $start = $this->date2ts($params['start']);
|
|
|
|
if (isset($params['end']))
|
|
{
|
|
$end = $this->date2ts($params['end']);
|
|
$this->check_move_horizont($end);
|
|
}
|
|
$daywise = !isset($params['daywise']) ? False : !!$params['daywise'];
|
|
$params['enum_recuring'] = $enum_recuring = $daywise || !isset($params['enum_recuring']) || !!$params['enum_recuring'];
|
|
$cat_id = isset($params['cat_id']) ? $params['cat_id'] : 0;
|
|
$filter = isset($params['filter']) ? $params['filter'] : 'all';
|
|
$offset = isset($params['offset']) && $params['offset'] !== false ? (int) $params['offset'] : false;
|
|
// socal::search() returns rejected group-invitations, as only the user not also the group is rejected
|
|
// as we cant remove them efficiantly in SQL, we kick them out here, but only if just one user is displayed
|
|
$users_in = (array)$params_in['users'];
|
|
$remove_rejected_by_user = !in_array($filter,array('all','rejected','everything')) &&
|
|
count($users_in) == 1 && $users_in[0] > 0 ? $users_in[0] : null;
|
|
//error_log(__METHOD__.'('.array2string($params_in).", $sql_filter) params[users]=".array2string($params['users']).' --> remove_rejected_by_user='.array2string($remove_rejected_by_user));
|
|
|
|
if ($this->debug && ($this->debug > 1 || $this->debug == 'search'))
|
|
{
|
|
$this->debug_message('calendar_bo::search(%1) start=%2, end=%3, daywise=%4, cat_id=%5, filter=%6, query=%7, offset=%8, num_rows=%9, order=%10, sql_filter=%11)',
|
|
True,$params,$start,$end,$daywise,$cat_id,$filter,$params['query'],$offset,(int)$params['num_rows'],$params['order'],$params['sql_filter']);
|
|
}
|
|
// date2ts(,true) converts to server time, db2data converts again to user-time
|
|
$events =& $this->so->search(isset($start) ? $this->date2ts($start,true) : null,isset($end) ? $this->date2ts($end,true) : null,
|
|
$users,$cat_id,$filter,$offset,(int)$params['num_rows'],$params,$remove_rejected_by_user);
|
|
|
|
if (isset($params['cols']))
|
|
{
|
|
return $events;
|
|
}
|
|
$this->total = $this->so->total;
|
|
$this->db2data($events,isset($params['date_format']) ? $params['date_format'] : 'ts');
|
|
|
|
//echo "<p align=right>remove_rejected_by_user=$remove_rejected_by_user, filter=$filter, params[users]=".print_r($param['users'])."</p>\n";
|
|
foreach($events as $id => $event)
|
|
{
|
|
if ($params['enum_groups'] && $this->enum_groups($event))
|
|
{
|
|
$events[$id] = $event;
|
|
}
|
|
$matches = null;
|
|
if (!(int)$event['id'] && preg_match('/^([a-z_]+)([0-9]+)$/',$event['id'],$matches))
|
|
{
|
|
$is_private = self::integration_get_private($matches[1],$matches[2],$event);
|
|
}
|
|
else
|
|
{
|
|
$is_private = !$this->check_perms(Acl::READ,$event);
|
|
}
|
|
if ($is_private || (!$event['public'] && $filter == 'hideprivate'))
|
|
{
|
|
$this->clear_private_infos($events[$id],$users);
|
|
}
|
|
}
|
|
|
|
if ($daywise)
|
|
{
|
|
if ($this->debug && ($this->debug > 2 || $this->debug == 'search'))
|
|
{
|
|
$this->debug_message('socalendar::search daywise sorting from %1 to %2 of %3',False,$start,$end,$events);
|
|
}
|
|
// create empty entries for each day in the reported time
|
|
for($ts = $start; $ts <= $end; $ts += DAY_s) // good enough for array creation, but see while loop below.
|
|
{
|
|
$daysEvents[$this->date2string($ts)] = array();
|
|
}
|
|
foreach($events as $k => $event)
|
|
{
|
|
$e_start = max($this->date2ts($event['start']),$start);
|
|
// $event['end']['raw']-1 to allow events to end on a full hour/day without the need to enter it as minute=59
|
|
$e_end = min($this->date2ts($event['end'])-1,$end);
|
|
|
|
// add event to each day in the reported time
|
|
$ts = $e_start;
|
|
// $ts += DAY_s in a 'for' loop does not work for daylight savings in week view
|
|
// because the day is longer than DAY_s: Fullday events will be added twice.
|
|
$ymd = null;
|
|
while ($ts <= $e_end)
|
|
{
|
|
$daysEvents[$ymd = $this->date2string($ts)][] =& $events[$k];
|
|
$ts = strtotime("+1 day",$ts);
|
|
}
|
|
if ($ymd != ($last = $this->date2string($e_end)))
|
|
{
|
|
$daysEvents[$last][] =& $events[$k];
|
|
}
|
|
}
|
|
$events =& $daysEvents;
|
|
if ($this->debug && ($this->debug > 2 || $this->debug == 'search'))
|
|
{
|
|
$this->debug_message('socalendar::search daywise events=%1',False,$events);
|
|
}
|
|
}
|
|
if ($this->debug && ($this->debug > 0 || $this->debug == 'search'))
|
|
{
|
|
$this->debug_message('calendar_bo::search(%1)=%2',True,$params,$events);
|
|
}
|
|
//error_log(__METHOD__."() returning ".count($events)." entries, total=$this->total ".function_backtrace());
|
|
return $events;
|
|
}
|
|
|
|
/**
|
|
* Get integration data for a given app of a part (value for a certain key) of it
|
|
*
|
|
* @param string $app
|
|
* @param string $part
|
|
* @return array
|
|
*/
|
|
static function integration_get_data($app,$part=null)
|
|
{
|
|
static $integration_data=null;
|
|
|
|
if (!isset($integration_data))
|
|
{
|
|
$integration_data = calendar_so::get_integration_data();
|
|
}
|
|
|
|
if (!isset($integration_data[$app])) return null;
|
|
|
|
return $part ? $integration_data[$app][$part] : $integration_data[$app];
|
|
}
|
|
|
|
/**
|
|
* Get private attribute for an integration event
|
|
*
|
|
* Attribute 'is_private' is either a boolean value, eg. false to make all events of $app public
|
|
* or an ExecMethod callback with parameters $id,$event
|
|
*
|
|
* @param string $app
|
|
* @param int|string $id
|
|
* @return string
|
|
*/
|
|
static function integration_get_private($app,$id,$event)
|
|
{
|
|
$app_data = self::integration_get_data($app,'is_private');
|
|
|
|
// no method, fall back to link title
|
|
if (is_null($app_data))
|
|
{
|
|
$is_private = !Link::title($app,$id);
|
|
}
|
|
// boolean value to make all events of $app public (false) or private (true)
|
|
elseif (is_bool($app_data))
|
|
{
|
|
$is_private = $app_data;
|
|
}
|
|
else
|
|
{
|
|
$is_private = (bool)ExecMethod2($app_data,$id,$event);
|
|
}
|
|
//echo '<p>'.__METHOD__."($app,$id,) app_data=".array2string($app_data).' returning '.array2string($is_private)."</p>\n";
|
|
return $is_private;
|
|
}
|
|
|
|
/**
|
|
* Clears all non-private info from a privat event
|
|
*
|
|
* That function only returns the infos allowed to be viewed by people without Acl::PRIVAT grants
|
|
*
|
|
* @param array &$event
|
|
* @param array $allowed_participants ids of the allowed participants, eg. the ones the search is over or eg. the owner of the calendar
|
|
*/
|
|
function clear_private_infos(&$event,$allowed_participants = array())
|
|
{
|
|
if ($event == false) return;
|
|
if (!is_array($event['participants'])) error_log(__METHOD__.'('.array2string($event).', '.array2string($allowed_participants).') NO PARTICIPANTS '.function_backtrace());
|
|
|
|
$event = array(
|
|
'id' => $event['id'],
|
|
'start' => $event['start'],
|
|
'end' => $event['end'],
|
|
'whole_day' => $event['whole_day'],
|
|
'tzid' => $event['tzid'],
|
|
'title' => lang('private'),
|
|
'modified' => $event['modified'],
|
|
'owner' => $event['owner'],
|
|
'uid' => $event['uid'],
|
|
'etag' => $event['etag'],
|
|
'participants' => array_intersect_key($event['participants'],array_flip($allowed_participants)),
|
|
'public'=> 0,
|
|
'category' => $event['category'], // category is visible anyway, eg. by using planner by cat
|
|
'non_blocking' => $event['non_blocking'],
|
|
'caldav_name' => $event['caldav_name'],
|
|
// we need full recurrence information, as they are relevant free/busy information
|
|
)+($event['recur_type'] ? array(
|
|
'recur_type' => $event['recur_type'],
|
|
'recur_interval' => $event['recur_interval'],
|
|
'recur_data' => $event['recur_data'],
|
|
'recur_enddate' => $event['recur_enddate'],
|
|
'recur_exception'=> $event['recur_exception'],
|
|
):array(
|
|
'reference' => $event['reference'],
|
|
'recurrence' => $event['recurrence'],
|
|
));
|
|
}
|
|
|
|
/**
|
|
* check and evtl. move the horizont (maximum date for unlimited recuring events) to a new date
|
|
*
|
|
* @internal automaticaly called by search
|
|
* @param mixed $_new_horizont time to set the horizont to (user-time)
|
|
*/
|
|
function check_move_horizont($_new_horizont)
|
|
{
|
|
if ((int) $this->debug >= 2 || $this->debug == 'check_move_horizont')
|
|
{
|
|
$this->debug_message('calendar_bo::check_move_horizont(%1) horizont=%2',true,$_new_horizont,(int)$this->config['horizont']);
|
|
}
|
|
$new_horizont = $this->date2ts($_new_horizont,true); // now we are in server-time, where this function operates
|
|
|
|
if ($new_horizont <= $this->config['horizont']) // no move necessary
|
|
{
|
|
if ($this->debug == 'check_move_horizont') $this->debug_message('calendar_bo::check_move_horizont(%1) horizont=%2 is bigger ==> nothing to do',true,$new_horizont,(int)$this->config['horizont']);
|
|
return;
|
|
}
|
|
if (!empty($GLOBALS['egw_info']['server']['calendar_horizont']))
|
|
{
|
|
$maxdays = abs($GLOBALS['egw_info']['server']['calendar_horizont']);
|
|
}
|
|
if (empty($maxdays)) $maxdays = 1000; // old default
|
|
if ($new_horizont > time()+$maxdays*DAY_s) // some user tries to "look" more then the maximum number of days in the future
|
|
{
|
|
if ($this->debug == 'check_move_horizont') $this->debug_message('calendar_bo::check_move_horizont(%1) horizont=%2 new horizont more then %3 days from now --> ignoring it',true,$new_horizont,(int)$this->config['horizont'],$maxdays);
|
|
$this->warnings['horizont'] = lang('Requested date %1 outside allowed range of %2 days: recurring events obmitted!', Api\DateTime::to($new_horizont,true), $maxdays);
|
|
return;
|
|
}
|
|
if ($new_horizont < time()+31*DAY_s)
|
|
{
|
|
$new_horizont = time()+31*DAY_s;
|
|
}
|
|
$old_horizont = $this->config['horizont'];
|
|
$this->config['horizont'] = $new_horizont;
|
|
|
|
// create further recurrences for all recurring and not yet (at the old horizont) ended events
|
|
if (($recuring = $this->so->unfinished_recuring($old_horizont)))
|
|
{
|
|
@set_time_limit(0); // disable time-limit, in case it takes longer to calculate the recurrences
|
|
foreach($this->read(array_keys($recuring)) as $cal_id => $event)
|
|
{
|
|
if ($this->debug == 'check_move_horizont')
|
|
{
|
|
$this->debug_message('calendar_bo::check_move_horizont(%1): calling set_recurrences(%2,%3)',true,$new_horizont,$event,$old_horizont);
|
|
}
|
|
// insert everything behind max(cal_start), which can be less then $old_horizont because of bugs in the past
|
|
$this->set_recurrences($event,Api\DateTime::server2user($recuring[$cal_id]+1)); // set_recurences operates in user-time!
|
|
}
|
|
}
|
|
// update the horizont
|
|
Api\Config::save_value('horizont',$this->config['horizont'],'calendar');
|
|
|
|
if ($this->debug == 'check_move_horizont') $this->debug_message('calendar_bo::check_move_horizont(%1) new horizont=%2, exiting',true,$new_horizont,(int)$this->config['horizont']);
|
|
}
|
|
|
|
/**
|
|
* set all recurrences for an event until the defined horizont $this->config['horizont']
|
|
*
|
|
* This methods operates in usertime, while $this->config['horizont'] is in servertime!
|
|
*
|
|
* @param array $event
|
|
* @param mixed $start =0 minimum start-time for new recurrences or !$start = since the start of the event
|
|
*/
|
|
function set_recurrences($event,$start=0)
|
|
{
|
|
if ($this->debug && ((int) $this->debug >= 2 || $this->debug == 'set_recurrences' || $this->debug == 'check_move_horizont'))
|
|
{
|
|
$this->debug_message('calendar_bo::set_recurrences(%1,%2)',true,$event,$start);
|
|
}
|
|
// check if the caller gave us enough information and if not read it from the DB
|
|
if (!isset($event['participants']) || !isset($event['start']) || !isset($event['end']))
|
|
{
|
|
list(,$event_read) = each($this->so->read($event['id']));
|
|
if (!isset($event['participants']))
|
|
{
|
|
$event['participants'] = $event_read['participants'];
|
|
}
|
|
if (!isset($event['start']) || !isset($event['end']))
|
|
{
|
|
$event['start'] = $event_read['start'];
|
|
$event['end'] = $event_read['end'];
|
|
}
|
|
}
|
|
if (!$start) $start = $event['start'];
|
|
|
|
$events = array();
|
|
$this->insert_all_recurrences($event,$start,$this->date2usertime($this->config['horizont']),$events);
|
|
|
|
$exceptions = array();
|
|
foreach((array)$event['recur_exception'] as $exception)
|
|
{
|
|
$exceptions[] = Api\DateTime::to($exception, true); // true = date
|
|
}
|
|
foreach($events as $event)
|
|
{
|
|
$is_exception = in_array(Api\DateTime::to($event['start'], true), $exceptions);
|
|
$start = $this->date2ts($event['start'],true);
|
|
if ($event['whole_day'])
|
|
{
|
|
$time = $this->so->startOfDay(new Api\DateTime($event['end'], Api\DateTime::$user_timezone));
|
|
$time->setTime(23, 59, 59);
|
|
$end = $this->date2ts($time,true);
|
|
}
|
|
else
|
|
{
|
|
$end = $this->date2ts($event['end'],true);
|
|
}
|
|
//error_log(__METHOD__."() start=".Api\DateTime::to($start).", is_exception=".array2string($is_exception));
|
|
$this->so->recurrence($event['id'], $start, $end, $event['participants'], $is_exception);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Convert data read from the db, eg. convert server to user-time
|
|
*
|
|
* Also make sure all timestamps comming from DB as string are converted to integer,
|
|
* to avoid misinterpretation by Api\DateTime as Ymd string.
|
|
*
|
|
* @param array &$events array of event-arrays (reference)
|
|
* @param $date_format ='ts' date-formats: 'ts'=timestamp, 'server'=timestamp in server-time, 'array'=array or string with date-format
|
|
*/
|
|
function db2data(&$events,$date_format='ts')
|
|
{
|
|
if (!is_array($events)) echo "<p>calendar_bo::db2data(\$events,$date_format) \$events is no array<br />\n".function_backtrace()."</p>\n";
|
|
foreach ($events as &$event)
|
|
{
|
|
// convert timezone id of event to tzid (iCal id like 'Europe/Berlin')
|
|
if (empty($event['tzid']) && (!$event['tz_id'] || !($event['tzid'] = calendar_timezones::id2tz($event['tz_id']))))
|
|
{
|
|
$event['tzid'] = Api\DateTime::$server_timezone->getName();
|
|
}
|
|
// database returns timestamps as string, convert them to integer
|
|
// to avoid misinterpretation by Api\DateTime as Ymd string
|
|
// (this will fail on 32bit systems for times > 2038!)
|
|
$event['start'] = (int)$event['start']; // this is for isWholeDay(), which also calls Api\DateTime
|
|
$event['end'] = (int)$event['end'];
|
|
$event['whole_day'] = self::isWholeDay($event);
|
|
if ($event['whole_day'] && $date_format != 'server')
|
|
{
|
|
// Adjust dates to user TZ
|
|
$stime =& $this->so->startOfDay(new Api\DateTime((int)$event['start'], Api\DateTime::$server_timezone), $event['tzid']);
|
|
$event['start'] = Api\DateTime::to($stime, $date_format);
|
|
$time =& $this->so->startOfDay(new Api\DateTime((int)$event['end'], Api\DateTime::$server_timezone), $event['tzid']);
|
|
$time->setTime(23, 59, 59);
|
|
$event['end'] = Api\DateTime::to($time, $date_format);
|
|
if (!empty($event['recurrence']))
|
|
{
|
|
$time =& $this->so->startOfDay(new Api\DateTime((int)$event['recurrence'], Api\DateTime::$server_timezone), $event['tzid']);
|
|
$event['recurrence'] = Api\DateTime::to($time, $date_format);
|
|
}
|
|
if (!empty($event['recur_enddate']))
|
|
{
|
|
$time =& $this->so->startOfDay(new Api\DateTime((int)$event['recur_enddate'], Api\DateTime::$server_timezone), $event['tzid']);
|
|
$time->setTime(23, 59, 59);
|
|
$event['recur_enddate'] = Api\DateTime::to($time, $date_format);
|
|
}
|
|
$timestamps = array('modified','created');
|
|
}
|
|
else
|
|
{
|
|
$timestamps = array('start','end','modified','created','recur_enddate','recurrence','recur_date');
|
|
}
|
|
// we convert here from the server-time timestamps to user-time and (optional) to a different date-format!
|
|
foreach ($timestamps as $ts)
|
|
{
|
|
if (!empty($event[$ts]))
|
|
{
|
|
$event[$ts] = $this->date2usertime((int)$event[$ts],$date_format);
|
|
}
|
|
}
|
|
// same with the recur exceptions
|
|
if (isset($event['recur_exception']) && is_array($event['recur_exception']))
|
|
{
|
|
foreach($event['recur_exception'] as &$date)
|
|
{
|
|
if ($event['whole_day'] && $date_format != 'server')
|
|
{
|
|
// Adjust dates to user TZ
|
|
$time =& $this->so->startOfDay(new Api\DateTime((int)$date, Api\DateTime::$server_timezone), $event['tzid']);
|
|
$date = Api\DateTime::to($time, $date_format);
|
|
}
|
|
else
|
|
{
|
|
$date = $this->date2usertime((int)$date,$date_format);
|
|
}
|
|
}
|
|
}
|
|
// same with the alarms
|
|
if (isset($event['alarm']) && is_array($event['alarm']))
|
|
{
|
|
foreach($event['alarm'] as &$alarm)
|
|
{
|
|
$alarm['time'] = $this->date2usertime((int)$alarm['time'],$date_format);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
|
|
/**
|
|
* convert a date from server to user-time
|
|
*
|
|
* @param int $ts timestamp in server-time
|
|
* @param string $date_format ='ts' date-formats: 'ts'=timestamp, 'server'=timestamp in server-time, 'array'=array or string with date-format
|
|
* @return mixed depending of $date_format
|
|
*/
|
|
function date2usertime($ts,$date_format='ts')
|
|
{
|
|
if (empty($ts) || $date_format == 'server') return $ts;
|
|
|
|
return Api\DateTime::server2user($ts,$date_format);
|
|
}
|
|
|
|
/**
|
|
* Reads a calendar-entry
|
|
*
|
|
* @param int|array|string $ids id or array of id's of the entries to read, or string with a single uid
|
|
* @param mixed $date =null date to specify a single event of a series
|
|
* @param boolean $ignore_acl should we ignore the acl, default False for a single id, true for multiple id's
|
|
* @param string $date_format ='ts' date-formats: 'ts'=timestamp, 'server'=timestamp in servertime, 'array'=array, or string with date-format
|
|
* @param array|int $clear_private_infos_users =null if not null, return events with self::ACL_FREEBUSY too,
|
|
* but call clear_private_infos() with the given users
|
|
* @return boolean|array event or array of id => event pairs, false if the acl-check went wrong, null if $ids not found
|
|
*/
|
|
function read($ids,$date=null,$ignore_acl=False,$date_format='ts',$clear_private_infos_users=null)
|
|
{
|
|
if (!$ids) return false;
|
|
|
|
if ($date) $date = $this->date2ts($date);
|
|
|
|
$return = null;
|
|
|
|
$check = $clear_private_infos_users ? self::ACL_FREEBUSY : Acl::READ;
|
|
if ($ignore_acl || is_array($ids) || ($return = $this->check_perms($check,$ids,0,$date_format,$date)))
|
|
{
|
|
if (is_array($ids) || !isset(self::$cached_event['id']) || self::$cached_event['id'] != $ids ||
|
|
self::$cached_event_date_format != $date_format ||
|
|
self::$cached_event['recur_type'] != MCAL_RECUR_NONE && self::$cached_event_date != $date)
|
|
{
|
|
$events = $this->so->read($ids,$date ? $this->date2ts($date,true) : 0);
|
|
|
|
if ($events)
|
|
{
|
|
$this->db2data($events,$date_format);
|
|
|
|
if (is_array($ids))
|
|
{
|
|
$return =& $events;
|
|
}
|
|
else
|
|
{
|
|
self::$cached_event = array_shift($events);
|
|
self::$cached_event_date_format = $date_format;
|
|
self::$cached_event_date = $date;
|
|
$return = self::$cached_event;
|
|
}
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$return = self::$cached_event;
|
|
}
|
|
}
|
|
if ($clear_private_infos_users && !is_array($ids) && !$this->check_perms(Acl::READ,$return))
|
|
{
|
|
$this->clear_private_infos($return, (array)$clear_private_infos_users);
|
|
}
|
|
if ($this->debug && ($this->debug > 1 || $this->debug == 'read'))
|
|
{
|
|
$this->debug_message('calendar_bo::read(%1,%2,%3,%4,%5)=%6',True,$ids,$date,$ignore_acl,$date_format,$clear_private_infos_users,$return);
|
|
}
|
|
return $return;
|
|
}
|
|
|
|
/**
|
|
* Inserts all repetions of $event in the timespan between $start and $end into $events
|
|
*
|
|
* The new entries are just appended to $events, so $events is no longer sorted by startdate !!!
|
|
*
|
|
* Recurrences get calculated by rrule iterator implemented in calendar_rrule class.
|
|
*
|
|
* @param array $event repeating event whos repetions should be inserted
|
|
* @param mixed $start start-date
|
|
* @param mixed $end end-date
|
|
* @param array $events where the repetions get inserted
|
|
* @param array $recur_exceptions with date (in Ymd) as key (and True as values), seems not to be used anymore
|
|
*/
|
|
function insert_all_recurrences($event,$_start,$end,&$events)
|
|
{
|
|
if ((int) $this->debug >= 3 || $this->debug == 'set_recurrences' || $this->debug == 'check_move_horizont' || $this->debug == 'insert_all_recurrences')
|
|
{
|
|
$this->debug_message(__METHOD__.'(%1,%2,%3,&$events)',true,$event,$_start,$end);
|
|
}
|
|
$end_in = $end;
|
|
|
|
$start = $this->date2ts($_start);
|
|
$event_start_ts = $this->date2ts($event['start']);
|
|
$event_length = $this->date2ts($event['end']) - $event_start_ts; // we use a constant event-length, NOT a constant end-time!
|
|
|
|
// if $end is before recur_enddate, use it instead
|
|
if (!$event['recur_enddate'] || $this->date2ts($event['recur_enddate']) > $this->date2ts($end))
|
|
{
|
|
//echo "<p>recur_enddate={$event['recur_enddate']}=".Api\DateTime::to($event['recur_enddate'])." > end=$end=".Api\DateTime::to($end)." --> using end instead of recur_enddate</p>\n";
|
|
// insert at least the event itself, if it's behind the horizont
|
|
$event['recur_enddate'] = $this->date2ts($end) < $this->date2ts($event['end']) ? $event['end'] : $end;
|
|
}
|
|
// unset exceptions, as we need to add them as recurrence too, but marked as exception
|
|
unset($event['recur_exception']);
|
|
// loop over all recurrences and insert them, if they are after $start
|
|
$rrule = calendar_rrule::event2rrule($event, true); // true = we operate in usertime, like the rest of calendar_bo
|
|
foreach($rrule as $time)
|
|
{
|
|
$time->setUser(); // $time is in timezone of event, convert it to usertime used here
|
|
if (($ts = $this->date2ts($time)) < $start-$event_length)
|
|
{
|
|
//echo "<p>".$time." --> ignored as $ts < $start-$event_length</p>\n";
|
|
continue; // to early or original event (returned by interator too)
|
|
}
|
|
|
|
$ts_end = $ts + $event_length;
|
|
// adjust ts_end for whole day events in case it does not fit due to
|
|
// spans over summer/wintertime adjusted days
|
|
if($event['whole_day'] && ($arr_end = $this->date2array($ts_end)) &&
|
|
!($arr_end['hour'] == 23 && $arr_end['minute'] == 59 && $arr_end['second'] == 59))
|
|
{
|
|
$arr_end['hour'] = 23;
|
|
$arr_end['minute'] = 59;
|
|
$arr_end['second'] = 59;
|
|
$ts_end_guess = $this->date2ts($arr_end);
|
|
if($ts_end_guess - $ts_end > DAY_s/2)
|
|
{
|
|
$ts_end = $ts_end_guess - DAY_s; // $ts_end_guess was one day too far in the future
|
|
}
|
|
else
|
|
{
|
|
$ts_end = $ts_end_guess; // $ts_end_guess was ok
|
|
}
|
|
}
|
|
|
|
$event['start'] = $ts;
|
|
$event['end'] = $ts_end;
|
|
$events[] = $event;
|
|
}
|
|
if ($this->debug && ((int) $this->debug > 2 || $this->debug == 'set_recurrences' || $this->debug == 'check_move_horizont' || $this->debug == 'insert_all_recurrences'))
|
|
{
|
|
$event['start'] = $event_start_ts;
|
|
$event['end'] = $event_start_ts + $event_length;
|
|
$this->debug_message(__METHOD__.'(%1,start=%2,end=%3,events) events=%5',True,$event,$_start,$end_in,$events);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Adds one repetion of $event for $date_ymd to the $events array, after adjusting its start- and end-time
|
|
*
|
|
* @param array $events array in which the event gets inserted
|
|
* @param array $event event to insert, it has start- and end-date of the first recurrence, not of $date_ymd
|
|
* @param int|string $date_ymd of the date of the event
|
|
*/
|
|
function add_adjusted_event(&$events,$event,$date_ymd)
|
|
{
|
|
$event_in = $event;
|
|
// calculate the new start- and end-time
|
|
$length_s = $this->date2ts($event['end']) - $this->date2ts($event['start']);
|
|
$event_start_arr = $this->date2array($event['start']);
|
|
|
|
$date_arr = $this->date2array((string) $date_ymd);
|
|
$date_arr['hour'] = $event_start_arr['hour'];
|
|
$date_arr['minute'] = $event_start_arr['minute'];
|
|
$date_arr['second'] = $event_start_arr['second'];
|
|
unset($date_arr['raw']); // else date2ts would use it
|
|
$event['start'] = $this->date2ts($date_arr);
|
|
$event['end'] = $event['start'] + $length_s;
|
|
|
|
$events[] = $event;
|
|
|
|
if ($this->debug && ($this->debug > 2 || $this->debug == 'add_adjust_event'))
|
|
{
|
|
$this->debug_message('calendar_bo::add_adjust_event(,%1,%2) as %3',True,$event_in,$date_ymd,$event);
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Fetch information about a resource
|
|
*
|
|
* We do some caching here, as the resource itself might not do it.
|
|
*
|
|
* @param string $uid string with one-letter resource-type and numerical resource-id, eg. "r19"
|
|
* @return array|boolean array with keys res_id,cat_id,name,useable (name definied by max_quantity in $this->resources),rights,responsible or false if $uid is not found
|
|
*/
|
|
function resource_info($uid)
|
|
{
|
|
static $res_info_cache = array();
|
|
|
|
if (!is_scalar($uid)) throw new Api\Exception\WrongParameter(__METHOD__.'('.array2string($uid).') parameter must be scalar');
|
|
|
|
if (!isset($res_info_cache[$uid]))
|
|
{
|
|
if (is_numeric($uid))
|
|
{
|
|
$info = array(
|
|
'res_id' => $uid,
|
|
'email' => $GLOBALS['egw']->accounts->id2name($uid,'account_email'),
|
|
'name' => trim($GLOBALS['egw']->accounts->id2name($uid,'account_firstname'). ' ' .
|
|
$GLOBALS['egw']->accounts->id2name($uid,'account_lastname')),
|
|
'type' => $GLOBALS['egw']->accounts->get_type($uid),
|
|
'app' => 'accounts',
|
|
);
|
|
}
|
|
else
|
|
{
|
|
list($info) = $this->resources[$uid[0]]['info'] ? ExecMethod($this->resources[$uid[0]]['info'],substr($uid,1)) : false;
|
|
if ($info)
|
|
{
|
|
$info['type'] = $uid[0];
|
|
if (!$info['email'] && $info['responsible'])
|
|
{
|
|
$info['email'] = $GLOBALS['egw']->accounts->id2name($info['responsible'],'account_email');
|
|
}
|
|
$info['app'] = $this->resources[$uid[0]]['app'];
|
|
}
|
|
}
|
|
$res_info_cache[$uid] = $info;
|
|
}
|
|
if ($this->debug && ($this->debug > 2 || $this->debug == 'resource_info'))
|
|
{
|
|
$this->debug_message('calendar_bo::resource_info(%1) = %2',True,$uid,$res_info_cache[$uid]);
|
|
}
|
|
return $res_info_cache[$uid];
|
|
}
|
|
|
|
/**
|
|
* Checks if the current user has the necessary ACL rights
|
|
*
|
|
* The check is performed on an event or generally on the cal of an other user
|
|
*
|
|
* Note: Participating in an event is considered as haveing read-access on that event,
|
|
* even if you have no general read-grant from that user.
|
|
*
|
|
* @param int $needed necessary ACL right: Acl::{READ|EDIT|DELETE}
|
|
* @param mixed $event event as array or the event-id or 0 for a general check
|
|
* @param int $other uid to check (if event==0) or 0 to check against $this->user
|
|
* @param string $date_format ='ts' date-format used for reading: 'ts'=timestamp, 'array'=array, 'string'=iso8601 string for xmlrpc
|
|
* @param mixed $date_to_read =null date used for reading, internal param for the caching
|
|
* @param int $user =null for which user to check, default current user
|
|
* @return boolean true permission granted, false for permission denied or null if event not found
|
|
*/
|
|
function check_perms($needed,$event=0,$other=0,$date_format='ts',$date_to_read=null,$user=null)
|
|
{
|
|
if (!$user) $user = $this->user;
|
|
if ($user == $this->user)
|
|
{
|
|
$grants = $this->grants;
|
|
}
|
|
else
|
|
{
|
|
$grants = $GLOBALS['egw']->acl->get_grants('calendar',true,$user);
|
|
}
|
|
|
|
if ($other && !is_numeric($other))
|
|
{
|
|
$resource = $this->resource_info($other);
|
|
return $needed & $resource['rights'];
|
|
}
|
|
if (is_int($event) && $event == 0)
|
|
{
|
|
$owner = $other ? $other : $user;
|
|
}
|
|
else
|
|
{
|
|
if (!is_array($event))
|
|
{
|
|
$event = $this->read($event,$date_to_read,true,$date_format); // = no ACL check !!!
|
|
}
|
|
if (!is_array($event))
|
|
{
|
|
if ($this->xmlrpc)
|
|
{
|
|
$GLOBALS['server']->xmlrpc_error($GLOBALS['xmlrpcerr']['not_exist'],$GLOBALS['xmlrpcstr']['not_exist']);
|
|
}
|
|
return null; // event not found
|
|
}
|
|
$owner = $event['owner'];
|
|
$private = !$event['public'];
|
|
}
|
|
$grant = $grants[$owner];
|
|
|
|
// now any ACL rights (but invite rights!) implicate FREEBUSY rights (at least READ has to include FREEBUSY)
|
|
if ($grant & ~self::ACL_INVITE) $grant |= self::ACL_FREEBUSY;
|
|
|
|
if (is_array($event) && ($needed == Acl::READ || $needed == self::ACL_FREEBUSY))
|
|
{
|
|
// Check if the $user is one of the participants or has a read-grant from one of them
|
|
// in that case he has an implicite READ grant for that event
|
|
//
|
|
if ($event['participants'] && is_array($event['participants']))
|
|
{
|
|
foreach(array_keys($event['participants']) as $uid)
|
|
{
|
|
if ($uid == $user || $uid < 0 && in_array($user, (array)$GLOBALS['egw']->accounts->members($uid,true)))
|
|
{
|
|
// if we are a participant, we have an implicite FREEBUSY, READ and PRIVAT grant
|
|
$grant |= self::ACL_FREEBUSY | Acl::READ | Acl::PRIVAT;
|
|
break;
|
|
}
|
|
elseif ($grants[$uid] & Acl::READ)
|
|
{
|
|
// if we have a READ grant from a participant, we dont give an implicit privat grant too
|
|
$grant |= Acl::READ;
|
|
// we cant break here, as we might be a participant too, and would miss the privat grant
|
|
}
|
|
elseif (!is_numeric($uid))
|
|
{
|
|
// if the owner only grants self::ACL_FREEBUSY we are not interested in the recources explicit rights
|
|
if ($grant == self::ACL_FREEBUSY) continue;
|
|
// if we have a resource as participant
|
|
$resource = $this->resource_info($uid);
|
|
$grant |= $resource['rights'];
|
|
}
|
|
}
|
|
}
|
|
}
|
|
if ($GLOBALS['egw']->accounts->get_type($owner) == 'g' && $needed == Acl::ADD)
|
|
{
|
|
$access = False; // a group can't be the owner of an event
|
|
}
|
|
else
|
|
{
|
|
$access = $user == $owner || $grant & $needed
|
|
&& ($needed == self::ACL_FREEBUSY || !$private || $grant & Acl::PRIVAT);
|
|
}
|
|
// do NOT allow users to purge deleted events, if we dont have 'userpurge' enabled
|
|
if ($access && $needed == Acl::DELETE && $event['deleted'] &&
|
|
!$GLOBALS['egw_info']['user']['apps']['admin'] &&
|
|
$GLOBALS['egw_info']['server']['calendar_delete_history'] != 'userpurge')
|
|
{
|
|
$access = false;
|
|
}
|
|
if ($this->debug && ($this->debug > 2 || $this->debug == 'check_perms'))
|
|
{
|
|
$this->debug_message('calendar_bo::check_perms(%1,%2,other=%3,%4,%5,user=%6)=%7',True,ACL_TYPE_IDENTIFER.$needed,$event,$other,$date_format,$date_to_read,$user,$access);
|
|
}
|
|
//error_log(__METHOD__."($needed,".array2string($event).",$other,...,$user) returning ".array2string($access));
|
|
return $access;
|
|
}
|
|
|
|
/**
|
|
* Converts several date-types to a timestamp and optionally converts user- to server-time
|
|
*
|
|
* @param mixed $date date to convert, should be one of the following types
|
|
* string (!) in form YYYYMMDD or iso8601 YYYY-MM-DDThh:mm:ss or YYYYMMDDThhmmss
|
|
* int already a timestamp
|
|
* array with keys 'second', 'minute', 'hour', 'day' or 'mday' (depricated !), 'month' and 'year'
|
|
* @param boolean $user2server =False conversion between user- and server-time; default False == Off
|
|
*/
|
|
static function date2ts($date,$user2server=False)
|
|
{
|
|
return $user2server ? Api\DateTime::user2server($date,'ts') : Api\DateTime::to($date,'ts');
|
|
}
|
|
|
|
/**
|
|
* Converts a date to an array and optionally converts server- to user-time
|
|
*
|
|
* @param mixed $date date to convert
|
|
* @param boolean $server2user conversation between user- and server-time default False == Off
|
|
* @return array with keys 'second', 'minute', 'hour', 'day', 'month', 'year', 'raw' (timestamp) and 'full' (Ymd-string)
|
|
*/
|
|
static function date2array($date,$server2user=False)
|
|
{
|
|
return $server2user ? Api\DateTime::server2user($date,'array') : Api\DateTime::to($date,'array');
|
|
}
|
|
|
|
/**
|
|
* Converts a date as timestamp or array to a date-string and optionaly converts server- to user-time
|
|
*
|
|
* @param mixed $date integer timestamp or array with ('year','month',..,'second') to convert
|
|
* @param boolean $server2user conversation between user- and server-time default False == Off, not used if $format ends with \Z
|
|
* @param string $format ='Ymd' format of the date to return, eg. 'Y-m-d\TH:i:sO' (2005-11-01T15:30:00+0100)
|
|
* @return string date formatted according to $format
|
|
*/
|
|
static function date2string($date,$server2user=False,$format='Ymd')
|
|
{
|
|
return $server2user ? Api\DateTime::server2user($date,$format) : Api\DateTime::to($date,$format);
|
|
}
|
|
|
|
/**
|
|
* Formats a date given as timestamp or array
|
|
*
|
|
* @param mixed $date integer timestamp or array with ('year','month',..,'second') to convert
|
|
* @param string|boolean $format ='' default common_prefs[dateformat], common_prefs[timeformat], false=time only, true=date only
|
|
* @return string the formated date (incl. time)
|
|
*/
|
|
static function format_date($date,$format='')
|
|
{
|
|
return Api\DateTime::to($date,$format);
|
|
}
|
|
|
|
/**
|
|
* Gives out a debug-message with certain parameters
|
|
*
|
|
* All permanent debug-messages in the calendar should be done by this function !!!
|
|
* (In future they may be logged or sent as xmlrpc-faults back.)
|
|
*
|
|
* Permanent debug-message need to make sure NOT to give secret information like passwords !!!
|
|
*
|
|
* This function do NOT honor the setting of the debug variable, you may use it like
|
|
* if ($this->debug > N) $this->debug_message('Error ;-)');
|
|
*
|
|
* The parameters get formated depending on their type. ACL-values need a ACL_TYPE_IDENTIFER prefix.
|
|
*
|
|
* @param string $msg message with parameters/variables like lang(), eg. '%1'
|
|
* @param boolean $backtrace =True include a function-backtrace, default True=On
|
|
* should only be set to False=Off, if your code ensures a call with backtrace=On was made before !!!
|
|
* @param mixed $param a variable number of parameters, to be inserted in $msg
|
|
* arrays get serialized with print_r() !
|
|
*/
|
|
static function debug_message($msg,$backtrace=True)
|
|
{
|
|
static $acl2string = array(
|
|
0 => 'ACL-UNKNOWN',
|
|
Acl::READ => 'ACL_READ',
|
|
Acl::ADD => 'ACL_ADD',
|
|
Acl::EDIT => 'ACL_EDIT',
|
|
Acl::DELETE => 'ACL_DELETE',
|
|
Acl::PRIVAT => 'ACL_PRIVATE',
|
|
self::ACL_FREEBUSY => 'ACL_FREEBUSY',
|
|
);
|
|
for($i = 2; $i < func_num_args(); ++$i)
|
|
{
|
|
$param = func_get_arg($i);
|
|
|
|
if (is_null($param))
|
|
{
|
|
$param='NULL';
|
|
}
|
|
else
|
|
{
|
|
switch(gettype($param))
|
|
{
|
|
case 'string':
|
|
if (substr($param,0,strlen(ACL_TYPE_IDENTIFER))== ACL_TYPE_IDENTIFER)
|
|
{
|
|
$param = (int) substr($param,strlen(ACL_TYPE_IDENTIFER));
|
|
$param = (isset($acl2string[$param]) ? $acl2string[$param] : $acl2string[0])." ($param)";
|
|
}
|
|
else
|
|
{
|
|
$param = "'$param'";
|
|
}
|
|
break;
|
|
case 'EGroupware\\Api\\DateTime':
|
|
case 'egw_time':
|
|
case 'datetime':
|
|
$p = $param;
|
|
unset($param);
|
|
$param = $p->format('l, Y-m-d H:i:s').' ('.$p->getTimeZone()->getName().')';
|
|
break;
|
|
case 'array':
|
|
case 'object':
|
|
$param = array2string($param);
|
|
break;
|
|
case 'boolean':
|
|
$param = $param ? 'True' : 'False';
|
|
break;
|
|
case 'integer':
|
|
if ($param >= mktime(0,0,0,1,1,2000)) $param = adodb_date('Y-m-d H:i:s',$param)." ($param)";
|
|
break;
|
|
}
|
|
}
|
|
$msg = str_replace('%'.($i-1),$param,$msg);
|
|
}
|
|
error_log($msg);
|
|
if ($backtrace) error_log(function_backtrace(1));
|
|
}
|
|
|
|
/**
|
|
* Formats one or two dates (range) as long date (full monthname), optionaly with a time
|
|
*
|
|
* @param mixed $_first first date
|
|
* @param mixed $last =0 last date if != 0 (default)
|
|
* @param boolean $display_time =false should a time be displayed too
|
|
* @param boolean $display_day =false should a day-name prefix the date, eg. monday June 20, 2006
|
|
* @return string with formated date
|
|
*/
|
|
function long_date($_first,$last=0,$display_time=false,$display_day=false)
|
|
{
|
|
$first = $this->date2array($_first);
|
|
if ($last)
|
|
{
|
|
$last = $this->date2array($last);
|
|
}
|
|
$datefmt = $this->common_prefs['dateformat'];
|
|
$timefmt = $this->common_prefs['timeformat'] == 12 ? 'h:i a' : 'H:i';
|
|
|
|
$month_before_day = strtolower($datefmt[0]) == 'm' ||
|
|
strtolower($datefmt[2]) == 'm' && $datefmt[4] == 'd';
|
|
|
|
if ($display_day)
|
|
{
|
|
$range = lang(adodb_date('l',$first['raw'])).($this->common_prefs['dateformat'][0] != 'd' ? ' ' : ', ');
|
|
}
|
|
for ($i = 0; $i < 5; $i += 2)
|
|
{
|
|
switch($datefmt[$i])
|
|
{
|
|
case 'd':
|
|
$range .= $first['day'] . ($datefmt[1] == '.' ? '.' : '');
|
|
if ($first['month'] != $last['month'] || $first['year'] != $last['year'])
|
|
{
|
|
if (!$month_before_day)
|
|
{
|
|
$range .= ' '.lang(strftime('%B',$first['raw']));
|
|
}
|
|
if ($first['year'] != $last['year'] && $datefmt[0] != 'Y')
|
|
{
|
|
$range .= ($datefmt[0] != 'd' ? ', ' : ' ') . $first['year'];
|
|
}
|
|
if ($display_time)
|
|
{
|
|
$range .= ' '.adodb_date($timefmt,$first['raw']);
|
|
}
|
|
if (!$last)
|
|
{
|
|
return $range;
|
|
}
|
|
$range .= ' - ';
|
|
|
|
if ($first['year'] != $last['year'] && $datefmt[0] == 'Y')
|
|
{
|
|
$range .= $last['year'] . ', ';
|
|
}
|
|
|
|
if ($month_before_day)
|
|
{
|
|
$range .= lang(strftime('%B',$last['raw']));
|
|
}
|
|
}
|
|
else
|
|
{
|
|
if ($display_time)
|
|
{
|
|
$range .= ' '.adodb_date($timefmt,$first['raw']);
|
|
}
|
|
$range .= ' - ';
|
|
}
|
|
$range .= ' ' . $last['day'] . ($datefmt[1] == '.' ? '.' : '');
|
|
break;
|
|
case 'm':
|
|
case 'M':
|
|
$range .= ' '.lang(strftime('%B',$month_before_day ? $first['raw'] : $last['raw'])) . ' ';
|
|
break;
|
|
case 'Y':
|
|
if ($datefmt[0] != 'm')
|
|
{
|
|
$range .= ' ' . ($datefmt[0] == 'Y' ? $first['year'].($datefmt[2] == 'd' ? ', ' : ' ') : $last['year'].' ');
|
|
}
|
|
break;
|
|
}
|
|
}
|
|
if ($display_time && $last)
|
|
{
|
|
$range .= ' '.adodb_date($timefmt,$last['raw']);
|
|
}
|
|
if ($datefmt[4] == 'Y' && $datefmt[0] == 'm')
|
|
{
|
|
$range .= ', ' . $last['year'];
|
|
}
|
|
return $range;
|
|
}
|
|
|
|
/**
|
|
* Displays a timespan, eg. $both ? "10:00 - 13:00: 3h" (10:00 am - 1 pm: 3h) : "10:00 3h" (10:00 am 3h)
|
|
*
|
|
* @param int $start_m start time in minutes since 0h
|
|
* @param int $end_m end time in minutes since 0h
|
|
* @param boolean $both =false display the end-time too, duration is always displayed
|
|
*/
|
|
function timespan($start_m,$end_m,$both=false)
|
|
{
|
|
$duration = $end_m - $start_m;
|
|
if ($end_m == 24*60-1) ++$duration;
|
|
$duration = floor($duration/60).lang('h').($duration%60 ? $duration%60 : '');
|
|
|
|
$timespan = $t = Api\DateTime::to('20000101T'.sprintf('%02d',$start_m/60).sprintf('%02d',$start_m%60).'00', false);
|
|
|
|
if ($both) // end-time too
|
|
{
|
|
$timespan .= ' - '.Api\DateTime::to('20000101T'.sprintf('%02d',$end_m/60).sprintf('%02d',$end_m%60).'00', false);
|
|
// dont double am/pm if they are the same in both times
|
|
if ($this->common_prefs['timeformat'] == 12 && substr($timespan,-2) == substr($t,-2))
|
|
{
|
|
$timespan = str_replace($t,substr($t,0,-3),$timespan);
|
|
}
|
|
$timespan .= ':';
|
|
}
|
|
return $timespan . ' ' . $duration;
|
|
}
|
|
|
|
/**
|
|
* Converts a participant into a (readable) user- or resource-name
|
|
*
|
|
* @param string|int $id id of user or resource
|
|
* @param string|boolean $use_type =false type-letter or false
|
|
* @param boolean $append_email =false append email (Name <email>)
|
|
* @return string with name
|
|
*/
|
|
function participant_name($id,$use_type=false, $append_email=false)
|
|
{
|
|
static $id2lid = array();
|
|
static $id2email = array();
|
|
|
|
if ($use_type && $use_type != 'u') $id = $use_type.$id;
|
|
|
|
if (!isset($id2lid[$id]))
|
|
{
|
|
if (!is_numeric($id))
|
|
{
|
|
$id2lid[$id] = '#'.$id;
|
|
if (($info = $this->resource_info($id)))
|
|
{
|
|
$id2lid[$id] = $info['name'] ? $info['name'] : $info['email'];
|
|
if ($info['name']) $id2email[$id] = $info['email'];
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$id2lid[$id] = Api\Accounts::username($id);
|
|
$id2email[$id] = $GLOBALS['egw']->accounts->id2name($id,'account_email');
|
|
}
|
|
}
|
|
return $id2lid[$id].(($append_email || $id[0] == 'e') && $id2email[$id] ? ' <'.$id2email[$id].'>' : '');
|
|
}
|
|
|
|
/**
|
|
* Converts participants array of an event into array of (readable) participant-names with status
|
|
*
|
|
* @param array $event event-data
|
|
* @param boolean $long_status =false should the long/verbose status or an icon be use
|
|
* @param boolean $show_group_invitation =false show group-invitations (status == 'G') or not (default)
|
|
* @return array with id / names with status pairs
|
|
*/
|
|
function participants($event,$long_status=false,$show_group_invitation=false)
|
|
{
|
|
//error_log(__METHOD__.__LINE__.array2string($event['participants']));
|
|
$names = array();
|
|
foreach((array)$event['participants'] as $id => $status)
|
|
{
|
|
if (!is_string($status)) continue;
|
|
$quantity = $role = null;
|
|
calendar_so::split_status($status,$quantity,$role);
|
|
|
|
if ($status == 'G' && !$show_group_invitation) continue; // dont show group-invitation
|
|
|
|
$lang_status = lang($this->verbose_status[$status]);
|
|
if (!$long_status)
|
|
{
|
|
switch($status[0])
|
|
{
|
|
case 'A': // accepted
|
|
$status = Api\Html::image('calendar','accepted',$lang_status);
|
|
break;
|
|
case 'R': // rejected
|
|
$status = Api\Html::image('calendar','rejected',$lang_status);
|
|
break;
|
|
case 'T': // tentative
|
|
$status = Api\Html::image('calendar','tentative',$lang_status);
|
|
break;
|
|
case 'U': // no response = unknown
|
|
$status = Api\Html::image('calendar','needs-action',$lang_status);
|
|
break;
|
|
case 'D': // delegated
|
|
$status = Api\Html::image('calendar','forward',$lang_status);
|
|
break;
|
|
case 'G': // group invitation
|
|
// Todo: Image, seems not to be used
|
|
$status = '('.$lang_status.')';
|
|
break;
|
|
}
|
|
}
|
|
else
|
|
{
|
|
$status = '('.$lang_status.')';
|
|
}
|
|
$names[$id] = Api\Html::htmlspecialchars($this->participant_name($id)).($quantity > 1 ? ' ('.$quantity.')' : '').' '.$status;
|
|
|
|
// add role, if not a regular participant
|
|
if ($role != 'REQ-PARTICIPANT')
|
|
{
|
|
if (isset($this->roles[$role]))
|
|
{
|
|
$role = lang($this->roles[$role]);
|
|
}
|
|
// allow to use cats as roles (beside regular iCal ones)
|
|
elseif (substr($role,0,6) == 'X-CAT-' && ($cat_id = (int)substr($role,6)) > 0)
|
|
{
|
|
$role = $GLOBALS['egw']->categories->id2name($cat_id);
|
|
}
|
|
else
|
|
{
|
|
$role = lang(str_replace('X-','',$role));
|
|
}
|
|
$names[$id] .= ' '.$role;
|
|
}
|
|
}
|
|
natcasesort($names);
|
|
|
|
return $names;
|
|
}
|
|
|
|
/**
|
|
* Converts category string of an event into array of (readable) category-names
|
|
*
|
|
* @param string $category cat-id (multiple id's commaseparated)
|
|
* @param int $color color of the category, if multiple cats, the color of the last one with color is returned
|
|
* @return array with id / names
|
|
*/
|
|
function categories($category,&$color)
|
|
{
|
|
static $id2cat = array();
|
|
$cats = array();
|
|
$color = 0;
|
|
|
|
foreach(explode(',',$category) as $cat_id)
|
|
{
|
|
if (!$cat_id) continue;
|
|
|
|
if (!isset($id2cat[$cat_id]))
|
|
{
|
|
$id2cat[$cat_id] = Api\Categories::read($cat_id);
|
|
}
|
|
$cat = $id2cat[$cat_id];
|
|
|
|
$parts = null;
|
|
if (is_array($cat['data']) && !empty($cat['data']['color']))
|
|
{
|
|
$color = $cat['data']['color'];
|
|
}
|
|
elseif(preg_match('/(#[0-9A-Fa-f]{6})/', $cat['description'], $parts))
|
|
{
|
|
$color = $parts[1];
|
|
}
|
|
$cats[$cat_id] = stripslashes($cat['name']);
|
|
}
|
|
return $cats;
|
|
}
|
|
|
|
/**
|
|
* This is called only by list_cals(). It was moved here to remove fatal error in php5 beta4
|
|
*/
|
|
private static function _list_cals_add($id,&$users,&$groups)
|
|
{
|
|
$name = Api\Accounts::username($id);
|
|
if (!($egw_name = $GLOBALS['egw']->accounts->id2name($id)))
|
|
{
|
|
return; // do not return no longer existing accounts which eg. still mentioned in acl
|
|
}
|
|
if (($type = $GLOBALS['egw']->accounts->get_type($id)) == 'g')
|
|
{
|
|
$arr = &$groups;
|
|
}
|
|
else
|
|
{
|
|
$arr = &$users;
|
|
}
|
|
$arr[$id] = array(
|
|
'grantor' => $id,
|
|
'value' => ($type == 'g' ? 'g_' : '') . $id,
|
|
'name' => $name,
|
|
'sname' => $egw_name
|
|
);
|
|
}
|
|
|
|
/**
|
|
* generate list of user- / group-calendars for the selectbox in the header
|
|
*
|
|
* @return array alphabeticaly sorted array with users first and then groups: array('grantor'=>$id,'value'=>['g_'.]$id,'name'=>$name)
|
|
*/
|
|
function list_cals()
|
|
{
|
|
return self::list_calendars($GLOBALS['egw_info']['user']['account_id'], $this->grants);
|
|
}
|
|
|
|
/**
|
|
* generate list of user- / group-calendars or a given user
|
|
*
|
|
* @param int $user account_id of user to generate list for
|
|
* @param array $grants =null calendar grants from user, or null to query them from acl class
|
|
*/
|
|
public static function list_calendars($user, array $grants=null)
|
|
{
|
|
if (is_null($grants)) $grants = $GLOBALS['egw']->acl->get_grants('calendar', true, $user);
|
|
|
|
$users = $groups = array();
|
|
foreach(array_keys($grants) as $id)
|
|
{
|
|
self::_list_cals_add($id,$users,$groups);
|
|
}
|
|
if (($memberships = $GLOBALS['egw']->accounts->memberships($user, true)))
|
|
{
|
|
foreach($memberships as $group)
|
|
{
|
|
self::_list_cals_add($group,$users,$groups);
|
|
|
|
if (($account_perms = $GLOBALS['egw']->acl->get_ids_for_location($group,Acl::READ,'calendar')))
|
|
{
|
|
foreach($account_perms as $id)
|
|
{
|
|
self::_list_cals_add($id,$users,$groups);
|
|
}
|
|
}
|
|
}
|
|
}
|
|
usort($users, array(__CLASS__, 'name_cmp'));
|
|
usort($groups, array(__CLASS__, 'name_cmp'));
|
|
|
|
return array_merge($users, $groups); // users first and then groups, both alphabeticaly
|
|
}
|
|
|
|
/**
|
|
* Compare function for sort by value of key 'name'
|
|
*
|
|
* @param array $a
|
|
* @param array $b
|
|
* @return int
|
|
*/
|
|
public static function name_cmp(array $a, array $b)
|
|
{
|
|
return strnatcasecmp($a['name'], $b['name']);
|
|
}
|
|
|
|
/**
|
|
* Convert the recurrence-information of an event, into a human readable string
|
|
*
|
|
* @param array $event
|
|
* @return string
|
|
*/
|
|
function recure2string($event)
|
|
{
|
|
if (!is_array($event)) return false;
|
|
return (string)calendar_rrule::event2rrule($event);
|
|
}
|
|
|
|
/**
|
|
* Read the holidays for a given $year
|
|
*
|
|
* The holidays get cached in the session (performance), so changes in holidays or birthdays do NOT affect a current session!!!
|
|
*
|
|
* @param int $year =0 year, defaults to 0 = current year
|
|
* @return array indexed with Ymd of array of holidays. A holiday is an array with the following fields:
|
|
* name: string
|
|
* title: optional string with description
|
|
* day: numerical day in month
|
|
* month: numerical month
|
|
* occurence: numerical year or 0 for every year
|
|
*/
|
|
function read_holidays($year=0)
|
|
{
|
|
if (!$year) $year = (int) date('Y',$this->now_su);
|
|
|
|
if (!$this->cached_holidays) // try reading the holidays from the session
|
|
{
|
|
$this->cached_holidays = Api\Cache::getSession('calendar', 'holidays');
|
|
}
|
|
if (!isset($this->cached_holidays[$year]))
|
|
{
|
|
$this->cached_holidays[$year] = calendar_holidays::read(
|
|
!empty($GLOBALS['egw_info']['server']['ical_holiday_url']) ?
|
|
$GLOBALS['egw_info']['server']['ical_holiday_url'] :
|
|
$GLOBALS['egw_info']['user']['preferences']['common']['country'], $year);
|
|
|
|
// search for birthdays
|
|
if ($GLOBALS['egw_info']['server']['hide_birthdays'] != 'yes')
|
|
{
|
|
$contacts = new Api\Contacts();
|
|
$filter = array(
|
|
'n_family' => "!''",
|
|
'bday' => "!''",
|
|
);
|
|
$bdays =& $contacts->search('',array('id','n_family','n_given','n_prefix','n_middle','bday'),
|
|
'contact_bday ASC',$extra_cols='',$wildcard='',$empty=False,$op='AND',$start=false,$filter);
|
|
// search accounts too, if not stored in contacts repository
|
|
$extra_accounts_search = $contacts->account_repository == 'ldap' && !is_null($contacts->so_accounts) &&
|
|
!$GLOBALS['egw_info']['user']['preferences']['addressbook']['hide_accounts'];
|
|
if ($extra_accounts_search && ($bdays2 =& $contacts->search('',array('id','n_family','n_given','n_prefix','n_middle','bday'),
|
|
'contact_bday ASC',$extra_cols='',$wildcard='',$empty=False,$op='AND',$start=false,$filter+array('owner' => 0))))
|
|
{
|
|
$bdays = !$bdays ? $bdays2 : array_merge($bdays,$bdays2);
|
|
}
|
|
if ($bdays)
|
|
{
|
|
// sort by month and day only
|
|
usort($bdays, function($a, $b)
|
|
{
|
|
return (int) $a['bday'] == (int) $b['bday'] ?
|
|
strcmp($a['bday'], $b['bday']) :
|
|
(int) $a['bday'] - (int) $b['bday'];
|
|
});
|
|
foreach($bdays as $pers)
|
|
{
|
|
if (empty($pers['bday']) || $pers['bday']=='0000-00-00 0' || $pers['bday']=='0000-00-00' || $pers['bday']=='0.0.00')
|
|
{
|
|
//error_log(__METHOD__.__LINE__.' Skipping entry for invalid birthday:'.array2string($pers));
|
|
continue;
|
|
}
|
|
list($y,$m,$d) = explode('-',$pers['bday']);
|
|
if ($y > $year) continue; // not yet born
|
|
$this->cached_holidays[$year][sprintf('%04d%02d%02d',$year,$m,$d)][] = array(
|
|
'day' => $d,
|
|
'month' => $m,
|
|
'occurence' => 0,
|
|
'name' => lang('Birthday').' '.($pers['n_given'] ? $pers['n_given'] : $pers['n_prefix']).' '.$pers['n_middle'].' '.
|
|
$pers['n_family'].($y && !$GLOBALS['egw_info']['server']['hide_birthdays'] ? ' ('.$y.')' : ''),
|
|
'birthyear' => $y, // this can be used to identify birthdays from holidays
|
|
);
|
|
}
|
|
}
|
|
}
|
|
// store holidays and birthdays in the session
|
|
Api\Cache::setSession('calendar', 'holidays', $this->cached_holidays);
|
|
}
|
|
if ((int) $this->debug >= 2 || $this->debug == 'read_holidays')
|
|
{
|
|
$this->debug_message('calendar_bo::read_holidays(%1)=%2',true,$year,$this->cached_holidays[$year]);
|
|
}
|
|
return $this->cached_holidays[$year];
|
|
}
|
|
|
|
/**
|
|
* Get translated calendar event fields, presenting as link title options
|
|
*
|
|
* @param type $event
|
|
* @return array array of selected calendar fields
|
|
*/
|
|
public static function get_link_options ($event = array())
|
|
{
|
|
unset($event); // not used, but required by function signature
|
|
$options = array (
|
|
'end' => lang('End date'),
|
|
'id' => lang('ID'),
|
|
'owner' => lang('Event owner'),
|
|
'category' => lang('Category'),
|
|
'location' => lang('Location'),
|
|
'creator' => lang('Creator'),
|
|
'participants' => lang('Participants')
|
|
);
|
|
return $options;
|
|
}
|
|
|
|
/**
|
|
* get title for an event identified by $event
|
|
*
|
|
* Is called as hook to participate in the linking
|
|
*
|
|
* @param int|array $entry int cal_id or array with event
|
|
* @param string|boolean string with title, null if not found or false if not read perms
|
|
*/
|
|
function link_title($event)
|
|
{
|
|
if (!is_array($event) && strpos($event, '-') !== false)
|
|
{
|
|
list($id, $recur) = explode('-', $event, 2);
|
|
$event = $this->read($id, $recur);
|
|
}
|
|
else if (!is_array($event) && (int) $event > 0)
|
|
{
|
|
$event = $this->read($event);
|
|
}
|
|
if (!is_array($event))
|
|
{
|
|
return $event;
|
|
}
|
|
$type = explode(',',$this->cal_prefs['link_title']);
|
|
if (is_array($type))
|
|
{
|
|
foreach ($type as &$val)
|
|
{
|
|
switch ($val)
|
|
{
|
|
case 'end':
|
|
case 'modified':
|
|
$extra_fields [$val] = $this->format_date($event[$val]);
|
|
break;
|
|
case 'participants':
|
|
foreach (array_keys($event[$val]) as $key)
|
|
{
|
|
$extra_fields [$val] = Api\Accounts::id2name($key, 'account_fullname');
|
|
}
|
|
break;
|
|
case 'modifier':
|
|
case 'creator':
|
|
case 'owner':
|
|
$extra_fields [$val] = Api\Accounts::id2name($event[$val], 'account_fullname');
|
|
break;
|
|
default:
|
|
$extra_fields [] = $event[$val];
|
|
}
|
|
}
|
|
$str_fields = implode(', ',$extra_fields);
|
|
if (is_array($extra_fields)) return $this->format_date($event['start']) . ': ' . $event['title'] . ($str_fields? ', ' . $str_fields:'');
|
|
}
|
|
return $this->format_date($event['start']) . ': ' . $event['title'];
|
|
}
|
|
|
|
/**
|
|
* query calendar for events matching $pattern
|
|
*
|
|
* Is called as hook to participate in the linking
|
|
*
|
|
* @param string $pattern pattern to search
|
|
* @return array with cal_id - title pairs of the matching entries
|
|
*/
|
|
function link_query($pattern, Array &$options = array())
|
|
{
|
|
$result = array();
|
|
$query = array(
|
|
'query' => $pattern,
|
|
'offset' => $options['start'],
|
|
'order' => 'cal_start DESC',
|
|
);
|
|
if($options['num_rows']) {
|
|
$query['num_rows'] = $options['num_rows'];
|
|
}
|
|
foreach((array) $this->search($query) as $event)
|
|
{
|
|
$result[$event['id']] = $this->link_title($event);
|
|
}
|
|
$options['total'] = $this->total;
|
|
return $result;
|
|
}
|
|
|
|
/**
|
|
* Check access to the file store
|
|
*
|
|
* @param int $id id of entry
|
|
* @param int $check Acl::READ for read and Acl::EDIT for write or delete access
|
|
* @param string $rel_path =null currently not used in calendar
|
|
* @param int $user =null for which user to check, default current user
|
|
* @return boolean true if access is granted or false otherwise
|
|
*/
|
|
function file_access($id,$check,$rel_path,$user=null)
|
|
{
|
|
unset($rel_path); // not used, but required by function signature
|
|
|
|
return $this->check_perms($check,$id,0,'ts',null,$user);
|
|
}
|
|
|
|
/**
|
|
* sets the default prefs, if they are not already set (on a per pref. basis)
|
|
*
|
|
* It sets a flag in the app-session-data to be called only once per session
|
|
*/
|
|
function check_set_default_prefs()
|
|
{
|
|
if ($this->cal_prefs['interval'] && ($set = Api\Cache::getSession('calendar', 'default_prefs_set')))
|
|
{
|
|
return;
|
|
}
|
|
Api\Cache::setSession('calendar', 'default_prefs_set', 'set');
|
|
|
|
$default_prefs =& $GLOBALS['egw']->preferences->default['calendar'];
|
|
$forced_prefs =& $GLOBALS['egw']->preferences->forced['calendar'];
|
|
|
|
$subject = lang('Calendar Event') . ' - $$action$$: $$startdate$$ $$title$$'."\n";
|
|
$values = array(
|
|
'notifyAdded' => $subject . lang ('You have a meeting scheduled for %1','$$startdate$$'),
|
|
'notifyCanceled' => $subject . lang ('Your meeting scheduled for %1 has been canceled','$$startdate$$'),
|
|
'notifyModified' => $subject . lang ('Your meeting that had been scheduled for %1 has been rescheduled to %2','$$olddate$$','$$startdate$$'),
|
|
'notifyDisinvited'=> $subject . lang ('You have been disinvited from the meeting at %1','$$startdate$$'),
|
|
'notifyResponse' => $subject . lang ('On %1 %2 %3 your meeting request for %4','$$date$$','$$fullname$$','$$action$$','$$startdate$$'),
|
|
'notifyAlarm' => lang('Alarm for %1 at %2 in %3','$$title$$','$$startdate$$','$$location$$')."\n".lang ('Here is your requested alarm.'),
|
|
'interval' => 30,
|
|
);
|
|
foreach($values as $var => $default)
|
|
{
|
|
$type = substr($var,0,6) == 'notify' ? 'forced' : 'default';
|
|
|
|
// only set, if neither default nor forced pref exists
|
|
if ((!isset($default_prefs[$var]) || (string)$default_prefs[$var] === '') && (!isset($forced_prefs[$var]) || (string)$forced_prefs[$var] === ''))
|
|
{
|
|
$GLOBALS['egw']->preferences->add('calendar',$var,$default,'default'); // always store default, even if we have a forced too
|
|
if ($type == 'forced') $GLOBALS['egw']->preferences->add('calendar',$var,$default,'forced');
|
|
$this->cal_prefs[$var] = $default;
|
|
$need_save = True;
|
|
}
|
|
}
|
|
if ($need_save)
|
|
{
|
|
$GLOBALS['egw']->preferences->save_repository(False,'default');
|
|
$GLOBALS['egw']->preferences->save_repository(False,'forced');
|
|
}
|
|
}
|
|
|
|
/**
|
|
* Get the freebusy URL of a user
|
|
*
|
|
* @param int|string $user account_id or account_lid
|
|
* @param string $pw =null password
|
|
*/
|
|
static function freebusy_url($user='',$pw=null)
|
|
{
|
|
if (is_numeric($user)) $user = $GLOBALS['egw']->accounts->id2name($user);
|
|
|
|
$credentials = '';
|
|
|
|
if ($pw)
|
|
{
|
|
$credentials = '&password='.urlencode($pw);
|
|
}
|
|
elseif ($GLOBALS['egw_info']['user']['preferences']['calendar']['freebusy'] == 2)
|
|
{
|
|
$credentials = $GLOBALS['egw_info']['user']['account_lid']
|
|
. ':' . $GLOBALS['egw_info']['user']['passwd'];
|
|
$credentials = '&cred=' . base64_encode($credentials);
|
|
}
|
|
return (!$GLOBALS['egw_info']['server']['webserver_url'] || $GLOBALS['egw_info']['server']['webserver_url'][0] == '/' ?
|
|
($_SERVER['HTTPS'] ? 'https://' : 'http://').$_SERVER['HTTP_HOST'] : '').
|
|
$GLOBALS['egw_info']['server']['webserver_url'].'/calendar/freebusy.php/?user='.urlencode($user).$credentials;
|
|
}
|
|
|
|
/**
|
|
* Check if the event is the whole day
|
|
*
|
|
* @param array $event event
|
|
* @return boolean true if whole day event, false othwerwise
|
|
*/
|
|
public static function isWholeDay($event)
|
|
{
|
|
// check if the event is the whole day
|
|
$start = self::date2array($event['start']);
|
|
$end = self::date2array($event['end']);
|
|
|
|
return !$start['hour'] && !$start['minute'] && $end['hour'] == 23 && $end['minute'] == 59;
|
|
}
|
|
|
|
/**
|
|
* Get the etag for an entry
|
|
*
|
|
* As all update routines (incl. set_status and add/delete alarms) update (series master) modified timestamp,
|
|
* we do NOT need any special handling for series master anymore
|
|
*
|
|
* @param array|int|string $entry array with event or cal_id, or cal_id:recur_date for virtual exceptions
|
|
* @param string &$schedule_tag=null on return schedule-tag (egw_cal.cal_id:egw_cal.cal_etag, no participant modifications!)
|
|
* @return string|boolean string with etag or false
|
|
*/
|
|
function get_etag($entry, &$schedule_tag=null)
|
|
{
|
|
if (!is_array($entry))
|
|
{
|
|
list($id,$recur_date) = explode(':',$entry);
|
|
$entry = $this->read($id, $recur_date, true, 'server');
|
|
}
|
|
$etag = $schedule_tag = $entry['id'].':'.$entry['etag'];
|
|
$etag .= ':'.$entry['modified'];
|
|
|
|
//error_log(__METHOD__ . "($entry[id],$client_share_uid_excpetions) entry=".array2string($entry)." --> etag=$etag");
|
|
return $etag;
|
|
}
|
|
|
|
/**
|
|
* Query ctag for calendar
|
|
*
|
|
* @param int|string|array $user integer user-id or array of user-id's to use, defaults to the current user
|
|
* @param string $filter ='owner' all (not rejected), accepted, unknown, tentative, rejected or hideprivate
|
|
* @param boolean $master_only =false only check recurance master (egw_cal_user.recur_date=0)
|
|
* @return integer
|
|
*/
|
|
public function get_ctag($user, $filter='owner', $master_only=false)
|
|
{
|
|
if ($this->debug > 1) $startime = microtime(true);
|
|
|
|
// resolve users to add memberships for users and members for groups
|
|
$users = $this->resolve_users($user);
|
|
$ctag = $users ? $this->so->get_ctag($users, $filter == 'owner', $master_only) : 0; // no rights, return 0 as ctag (otherwise we get SQL error!)
|
|
|
|
if ($this->debug > 1) error_log(__METHOD__. "($user, '$filter', $master_only) = $ctag = ".date('Y-m-d H:i:s',$ctag)." took ".(microtime(true)-$startime)." secs");
|
|
return $ctag;
|
|
}
|
|
|
|
/**
|
|
* Hook for infolog to set some extra data and links
|
|
*
|
|
* @param array $data event-array preset by infolog plus
|
|
* @param int $data[id] cal_id
|
|
* @return array with key => value pairs to set in new event and link_app/link_id arrays
|
|
*/
|
|
function infolog_set($data)
|
|
{
|
|
if (!($calendar = $this->read($data['id'])))
|
|
{
|
|
return array();
|
|
}
|
|
|
|
$content = array(
|
|
'info_cat' => $GLOBALS['egw']->categories->check_list(Acl::READ, $calendar['category']),
|
|
'info_priority' => $calendar['priority'] ,
|
|
'info_public' => $calendar['public'] != 'private',
|
|
'info_subject' => $calendar['title'],
|
|
'info_des' => $calendar['description'],
|
|
'info_location' => $calendar['location'],
|
|
'info_startdate' => $calendar['range_start'],
|
|
//'info_enddate' => $calendar['range_end'] ? $calendar['range_end'] : $calendar['uid']
|
|
'info_contact' => 'calendar:'.$data['id'],
|
|
);
|
|
|
|
unset($content['id']);
|
|
// Add calendar link to infolog entry
|
|
$content['link_app'][] = $calendar['info_link']['app'];
|
|
$content['link_id'][] = $calendar['info_link']['id'];
|
|
// Copy claendar's links
|
|
foreach(Link::get_links('calendar',$calendar['id'],'','link_lastmod DESC',true) as $link)
|
|
{
|
|
if ($link['app'] != Link::VFS_APPNAME)
|
|
{
|
|
$content['link_app'][] = $link['app'];
|
|
$content['link_id'][] = $link['id'];
|
|
}
|
|
if ($link['app'] == 'addressbook') // prefering contact as primary contact over calendar entry set above
|
|
{
|
|
$content['info_contact'] = 'addressbook:'.$link['id'];
|
|
}
|
|
}
|
|
// Copy same custom fields
|
|
foreach(array_keys(Api\Storage\Customfields::get('infolog')) as $name)
|
|
{
|
|
if ($this->customfields[$name]) $content['#'.$name] = $calendar['#'.$name];
|
|
}
|
|
//error_log(__METHOD__.'('.array2string($data).') calendar='.array2string($calendar).' returning '.array2string($content));
|
|
return $content;
|
|
}
|
|
|
|
/**
|
|
* Hook for timesheet to set some extra data and links
|
|
*
|
|
* @param array $data
|
|
* @param int $data[id] cal_id:recurrence
|
|
* @return array with key => value pairs to set in new timesheet and link_app/link_id arrays
|
|
*/
|
|
function timesheet_set($data)
|
|
{
|
|
$set = array();
|
|
list($id,$recurrence) = explode(':',$data['id']);
|
|
if ((int)$id && ($event = $this->read($id,$recurrence)))
|
|
{
|
|
$set['ts_start'] = $event['start'];
|
|
$set['ts_title'] = $this->link_title($event);
|
|
$set['start_time'] = Api\DateTime::to($event['start'],'H:i');
|
|
$set['ts_description'] = $event['description'];
|
|
if ($this->isWholeDay($event)) $event['end']++; // whole day events are 1sec short
|
|
$set['ts_duration'] = ($event['end'] - $event['start']) / 60;
|
|
$set['ts_quantity'] = ($event['end'] - $event['start']) / 3600;
|
|
$set['end_time'] = null; // unset end-time
|
|
$set['cat_id'] = (int)$event['category'];
|
|
|
|
foreach(Link::get_links('calendar',$id,'','link_lastmod DESC',true) as $link)
|
|
{
|
|
if ($link['app'] != 'timesheet' && $link['app'] != Link::VFS_APPNAME)
|
|
{
|
|
$set['link_app'][] = $link['app'];
|
|
$set['link_id'][] = $link['id'];
|
|
}
|
|
}
|
|
}
|
|
return $set;
|
|
}
|
|
}
|