egroupware/calendar/inc/hook_email.inc.php
2004-01-27 00:31:58 +00:00

55 lines
1.9 KiB
PHP
Executable File

<?php
/**************************************************************************\
* eGroupWare - Calendar *
* http://www.egroupware.org *
* Based on Webcalendar by Craig Knudsen <cknudsen@radix.net> *
* http://www.radix.net/~cknudsen *
* Written by Mark Peters <skeeter@phpgroupware.org> *
* -------------------------------------------- *
* This program is free software; you can redistribute it and/or modify it *
* under the terms of the GNU General Public License as published by the *
* Free Software Foundation; either version 2 of the License, or (at your *
* option) any later version. *
\**************************************************************************/
/* $Id$ */
global $calendar_id;
$d1 = strtolower(substr($GLOBALS['phpgw_info']['server']['app_inc'],0,3));
if($d1 == 'htt' || $d1 == 'ftp')
{
echo 'Failed attempt to break in via an old Security Hole!<br>'."\n";
$phpgw->common->phpgw_exit();
}
unset($d1);
if ($calendar_id)
{
$GLOBALS['phpgw']->translation->add_app('calendar');
$cal = CreateObject('calendar.uicalendar');
//echo "Event ID: $calendar_id<br>\n";
if ($event = $cal->bo->read_entry($calendar_id))
{
echo $cal->timematrix(
Array(
'date' => $GLOBALS['phpgw']->datetime->localdates(mktime(0,0,0,$event['start']['month'],$event['start']['mday'],$event['start']['year']) - $phpgw->calendar->tz_offset),
'starttime' => $cal->bo->splittime('000000',False),
'endtime' => 0,
'participants' => $event['participants'])
) .
'</td></tr><tr><td>' .
$cal->view_event($event) .
'</td></tr><tr><td align="center">' .
$cal->get_response($calendar_id);
}
unset($cal); unset($event);
}
?>