1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
<?php
/**
* $Horde: kronolith/fb.php,v 1.25.10.10 2008/01/02 11:32:16 jan Exp $
*
* Copyright 1999-2008 The Horde Project (http://www.horde.org/)
*
* See the enclosed file COPYING for license information (GPL). If you
* did not receive this file, see http://www.fsf.org/copyleft/gpl.html.
*
* @author Chuck Hagenbuch <chuck@horde.org>
*/
@define('AUTH_HANDLER', true);
@define('KRONOLITH_BASE', dirname(__FILE__));
$session_control = 'none';
require_once KRONOLITH_BASE . '/lib/base.php';
require_once KRONOLITH_BASE . '/lib/FreeBusy.php';
require_once 'Horde/Cache.php';
// We want to always generate UTF-8 iCalendar data.
NLS::setCharset('UTF-8');
// Determine the username to show free/busy time for.
$cal = Util::getFormData('c');
$user = Util::getFormData('u');
if (!empty($cal)) {
if (is_array($cal)) {
$cal = implode('|', $cal);
}
} elseif (!empty($_SERVER['PATH_INFO'])) {
$user = basename($_SERVER['PATH_INFO']);
}
$cache = Horde_Cache::factory($conf['cache']['driver'], Horde::getDriverConfig('cache', $conf['cache']['driver']));
$key = 'kronolith.fb.' . ($user ? 'u.' . $user : 'c.' . $cal);
$fb = $cache->get($key, 360);
if (!$fb) {
if ($user) {
$prefs = &Prefs::singleton($conf['prefs']['driver'], 'kronolith', $user, '', null, false);
$prefs->retrieve();
NLS::setTimeZone();
$cal = @unserialize($prefs->getValue('fb_cals'));
if (is_array($cal)) {
$cal = implode('|', $cal);
}
// If the free/busy calendars preference is empty, default to
// the user's default_share preference, and if that's empty,
// to their username.
if (!$cal) {
$cal = $prefs->getValue('default_share');
if (!$cal) {
$cal = $user;
}
}
}
$fb = Kronolith_FreeBusy::generate(explode('|', $cal), null, null, false, $user);
if (is_a($fb, 'PEAR_Error')) {
Horde::logMessage($fb, __FILE__, __LINE__, PEAR_LOG_ERR);
exit;
}
$cache->set($key, $fb);
}
$browser->downloadHeaders(($user ? $user : $cal) . '.vfb',
'text/calendar; charset=' . NLS::getCharset(),
true,
strlen($fb));
echo $fb;
|
