Your IP : 216.73.216.111
<?php
/**
* JEvents Component for Joomla! 3.x
*
* @version $Id: icals.php 3549 2012-04-20 09:26:21Z geraintedwards $
* @package JEvents
* @copyright Copyright (C) 2008-2019 GWE Systems Ltd
* @license GNU/GPLv2, see http://www.gnu.org/licenses/gpl-2.0.html
* @link http://www.jevents.net
*/
defined('JPATH_BASE') or die('Direct Access to this location is not allowed.');
include_once(JEV_ADMINPATH . "/controllers/icals.php");
use Joomla\Utilities\ArrayHelper;
use Joomla\String\StringHelper;
class ICalsController extends AdminIcalsController
{
function __construct($config = array())
{
parent::__construct($config);
// TODO get this from config
$this->registerDefaultTask('ical');
// $this->registerTask( 'show', 'showContent' );
// Ensure authorised to do this
$cfg = JEVConfig::getInstance();
if ($cfg->get("disableicalexport", 0) && !$cfg->get("feimport", 0))
{
$query = "SELECT icsf.* FROM #__jevents_icsfile as icsf where icsf.autorefresh=1";
$db = JFactory::getDbo();
$db->setQuery($query);
$allICS = $db->loadObjectList();
if (count($allICS)==0){
throw new Exception( JText::_('ALERTNOTAUTH'), 403);
return false;
}
}
// Load abstract "view" class
$theme = JEV_CommonFunctions::getJEventsViewName();
JLoader::register('JEvents' . ucfirst($theme) . 'View', JEV_VIEWS . "/$theme/abstract/abstract.php");
if (!isset($this->_basePath))
{
$this->_basePath = $this->basePath;
$this->_task = $this->task;
}
}
// Thanks to HiFi
function ical()
{
// Ensure authorised to do this
$cfg = JEVConfig::getInstance();
if ($cfg->get("disableicalexport", 0))
{
throw new Exception( JText::_('ALERTNOTAUTH'), 403);
return false;
}
list($year, $month, $day) = JEVHelper::getYMD();
$Itemid = JEVHelper::getItemid();
// get the view
$document = JFactory::getDocument();
$viewType = $document->getType();
$cfg = JEVConfig::getInstance();
$theme = JEV_CommonFunctions::getJEventsViewName();
$view = "icals";
$this->addViewPath($this->_basePath . '/' . "views" . '/' . $theme);
$this->view = $this->getView($view,$viewType, $theme."View",
array('base_path' => $this->_basePath,
"template_path" => $this->_basePath . '/' . "views" . '/' . $theme . '/' . $view . '/' . 'tmpl',
"name" => $theme . '/' . $view));
// Set the layout
$this->view->setLayout('ical');
$this->view->assign("Itemid", $Itemid);
$this->view->assign("month", $month);
$this->view->assign("day", $day);
$this->view->assign("year", $year);
$this->view->assign("task", $this->_task);
// View caching logic -- simple... are we logged in?
$cfg = JEVConfig::getInstance();
$joomlaconf = JFactory::getConfig();
$useCache = intval($cfg->get('com_cache', 0)) && $joomlaconf->get('caching', 1);
$user = JFactory::getUser();
if ($user->get('id') || !$useCache)
{
$this->view->display();
}
else
{
$cache = JFactory::getCache(JEV_COM_COMPONENT, 'view');
$cache->get($this->view, 'display');
}
}
function export()
{
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
$years = JRequest::getVar('years', 'NONE');
$cats = JRequest::getVar('catids', 'NONE');
// validate the key
$icalkey = $params->get("icalkey", "secret phrase");
$outlook2003icalexport = JRequest::getInt("outlook2003", 0) && $params->get("outlook2003icalexport", 0);
if ($outlook2003icalexport)
{
JRequest::setVar("icf", 1);
}
$privatecalendar = false;
$k = JRequest::getString("k", "NONE");
$pk = JRequest::getString("pk", "NONE");
$userid = JRequest::getInt("i", 0);
if ($pk != "NONE")
{
if (!$userid) {
throw new Exception( JText::_('JEV_ERROR'), 403);
return false;
}
$privatecalendar = true;
$puser = JUser::getInstance($userid);
$key = md5($icalkey . $cats . $years . $puser->password . $puser->username . $puser->id);
if ($key != $pk) {
throw new Exception( JText::_('JEV_ERROR'), 403);
return false;
}
// ensure "user" can access non-public categories etc.
$this->dataModel->aid = JEVHelper::getAid($puser);
$this->dataModel->accessuser = $puser->get('id');
$registry = JRegistry::getInstance("jevents");
$registry->set("jevents.icaluser", $puser);
}
else if ($k != "NONE")
{
if ($params->get("disableicalexport", 0))
{
throw new Exception( JText::_('ALERTNOTAUTH'), 403);
return false;
}
$key = md5($icalkey . $cats . $years);
if ($key != $k) {
throw new Exception( JText::_('JEV_ERROR'), 403);
return false;
}
}
else
{
throw new Exception( JText::_('JEV_ERROR'), 403);
return false;
}
// Fix the cats
$cats = explode(',', $cats);
// hardening!
JEVHelper::forceIntegerArray($cats, false);
if ($cats != array(0))
{
JRequest::setVar("catids", implode("|", $cats));
}
else
{
JRequest::setVar("catids", '');
}
//Parsing variables from URL
//Year
// All years
if ($years == 0)
{
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
$years = array();
for ($y = JEVHelper::getMinYear(); $y <= JEVHelper::getMaxYear(); $y++)
{
if (!in_array($y, $years))
$years[] = $y;
}
$years = ArrayHelper::toInteger($years);
}
else if ($years != "NONE")
{
$years = explode(",", JRequest::getVar('years'));
if (!is_array($years) || count($years) == 0)
{
list($y, $m, $d) = JEVHelper::getYMD();
$years = array($y);
}
$years = ArrayHelper::toInteger($years);
}
else
{
list($y, $m, $d) = JEVHelper::getYMD();
$years = array($y);
}
// Lockin hte categories from the URL
$Itemid = JRequest::getInt("Itemid",0);
if (!$Itemid){
JRequest::setVar("Itemid",1);
}
$this->dataModel->setupComponentCatids();
$dispatcher = JEventDispatcher::getInstance();
// just incase we don't have jevents plugins registered yet
JPluginHelper::importPlugin("jevents");
//And then the real work
// Force all only the one repeat
$cfg = JEVConfig::getInstance();
$cfg->set('com_showrepeats', 0);
$icalEvents = array();
foreach ($years as $year)
{
$startdate = $year . "-01-01";
$enddate = $year . "-12-31";
$rows = $this->dataModel->getRangeData($startdate, $enddate, 0, 0);
if (!isset($rows["rows"]))
continue;
foreach ($rows["rows"] as $row)
{
if (!array_key_exists($row->ev_id(), $icalEvents))
{
$dispatcher->trigger('onExportRow', array(&$row));
$icalEvents[$row->ev_id()] = $row;
}
}
unset($rows);
}
if ($userid)
$user = JUser::getInstance($userid);
$mainframe = JFactory::getApplication();
// get the view
$this->view = $this->getView("icals", "html");
$this->view->setLayout("export");
$this->view->assign("dataModel",$this->dataModel) ;
$this->view->assign("outlook2003icalexport", $outlook2003icalexport);
$this->view->assign("icalEvents", $icalEvents);
$this->view->assign("withrepeats", true);
$this->view->export();
return;
}
function icalevent()
{
$this->exportEvent(true);
}
function icalrepeat()
{
$this->exportEvent(false);
}
function importform()
{
// Can only do this if can add an event
// Must be at least an event creator to edit or create events
$is_event_editor = JEVHelper::isEventCreator();
if (!$is_event_editor)
{
$user = JFactory::getUser();
if ($user->id)
{
$this->setRedirect(JURI::root(), JText::_('JEV_NOTAUTH_CREATE_EVENT'));
$this->redirect();
}
else
{
$comuser = version_compare(JVERSION, '1.6.0', '>=') ? "com_users" : "com_user";
$this->setRedirect(JRoute::_("index.php?option=$comuser&view=login"), JText::_('JEV_NOTAUTH_CREATE_EVENT'), 'ERROR');
$this->redirect();
}
return;
}
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
if (!$params->get("feimport", 0))
{
return;
}
$document = JFactory::getDocument();
$viewType = $document->getType();
$cfg = JEVConfig::getInstance();
$theme = JEV_CommonFunctions::getJEventsViewName();
$view = "icals";
$this->addViewPath($this->_basePath . '/' . "views" . '/' . $theme);
$this->view = $this->getView($view,$viewType, $theme."View",
array('base_path' => $this->_basePath,
"template_path" => $this->_basePath . '/' . "views" . '/' . $theme . '/' . $view . '/' . 'tmpl',
"name" => $theme . '/' . $view));
// Set the layout
$this->view->setLayout('importform');
$this->view->assign("task", $this->_task);
// get all the raw native calendars
$nativeCals = $this->dataModel->queryModel->getNativeIcalendars();
// Strip this list down based on user permissions
$jevuser = JEVHelper::getAuthorisedUser();
if ($jevuser && $jevuser->calendars != "" && $jevuser->calendars != "all")
{
$cals = array_keys($nativeCals);
$allowedcals = explode("|", $jevuser->calendars);
foreach ($cals as $calid)
{
if (!in_array($calid, $allowedcals))
unset($nativeCals[$calid]);
}
}
$excats = "0";
if ($jevuser && $jevuser->categories != "" && $jevuser->categories != "all")
{
// Find which categories to exclude
$db = JFactory::getDbo();
$catsql = 'SELECT id FROM #__categories WHERE id NOT IN (' . str_replace("|", ",", $jevuser->categories) . ') AND extension="com_jevents"';
$db->setQuery($catsql);
$excats = implode(",", $db->loadColumn());
}
// only offer a choice of native calendars if it exists!
if (count($nativeCals) > 1)
{
$icalList = array();
$icalList[] = JHTML::_('select.option', '0', JText::_('JEV_EVENT_CHOOSE_ICAL'), 'ics_id', 'label');
$icalList = array_merge($icalList, $nativeCals);
$clist = JHTML::_('select.genericlist', $icalList, 'icsid', " onchange='preselectCategory(this);'", 'ics_id', 'label', 0);
$this->view->assign('clistChoice', true);
$this->view->assign('defaultCat', 0);
}
else
{
if (count($nativeCals) == 0 || !is_array($nativeCals))
{
JFactory::getApplication()->enqueueMessage(JText::_('INVALID_CALENDAR_STRUCTURE'), 'warning');
}
$icsid = current($nativeCals)->ics_id;
$clist = '<input type="hidden" name="icsid" value="' . $icsid . '" />';
$this->view->assign('clistChoice', false);
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
if ($params->get("defaultcat", false))
{
$this->view->assign('defaultCat', current($nativeCals)->catid);
}
else
{
$this->view->assign('defaultCat', 0);
}
}
$this->view->assign('excats', $excats);
$this->view->assign('nativeCals', $nativeCals);
$this->view->assign('clist', $clist);
// View caching logic -- simple... are we logged in?
$cfg = JEVConfig::getInstance();
$joomlaconf = JFactory::getConfig();
$useCache = intval($cfg->get('com_cache', 0)) && $joomlaconf->get('caching', 1);
$user = JFactory::getUser();
if ($user->get('id') || !$useCache)
{
$this->view->display();
}
else
{
$cache = JFactory::getCache(JEV_COM_COMPONENT, 'view');
$cache->get($this->view, 'display');
}
}
function importdata()
{
// Check for request forgeries
JSession::checkToken() or jexit('Invalid Token');
// Can only do this if can add an event
// Must be at least an event creator to edit or create events
$is_event_editor = JEVHelper::isEventCreator();
if (!$is_event_editor)
{
$user = JFactory::getUser();
if ($user->id)
{
$this->setRedirect(JURI::root(), JText::_('JEV_NOTAUTH_CREATE_EVENT'), 'ERROR');
$this->redirect();
}
else
{
$comuser = version_compare(JVERSION, '1.6.0', '>=') ? "com_users" : "com_user";
$this->setRedirect(JRoute::_("index.php?option=$comuser&view=login"), JText::_('JEV_NOTAUTH_CREATE_EVENT'), 'ERROR');
$this->redirect();
}
return;
}
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
if (!$params->get("feimport", 0))
{
return;
}
$catid = JRequest::getInt('catid', 0);
$ignoreembedcat = JRequest::getInt('ignoreembedcat', 0);
// Should come from the form or existing item
$access = 0;
$state = 1;
$uploadURL = JRequest::getVar('uploadURL', '');
$icsLabel = uniqid('icsLabel');
$icsid = JRequest::getInt('icsid', 0);
$autorefresh = 0;
if ($catid == 0)
{
// Paranoia, should not be here, validation is done by java script
// Just load the ical event list on redirect for now.
$redirect_task = "icalevent.list";
JFactory::getApplication()->enqueueMessage(JTExt::_('JEV_FATAL_ERROR') . JText::_('JEV_E_WARNCAT'), 'error');
$this->setRedirect("index.php?option=" . JEV_COM_COMPONENT . "&task=$redirect_task", JText::_('JEV_E_WARNCAT'));
$this->redirect();
return;
}
// I need a better check and expiry information etc.
if (JString::strlen($uploadURL) > 0)
{
$icsFile = iCalICSFile::newICSFileFromURL($uploadURL, $icsid, $catid, $access, $state, $icsLabel, $autorefresh, $ignoreembedcat);
}
else if (isset($_FILES['upload']) && is_array($_FILES['upload']))
{
$file = $_FILES['upload'];
if ($file['size'] == 0)
{//|| !($file['type']=="text/calendar" || $file['type']=="application/octet-stream")){
JFactory::getApplication()->enqueueMessage(JText::_('JEV_EMPTY_FILE_UPLOAD'), 'warning');
$icsFile = false;
}
else
{
$icsFile = iCalICSFile::newICSFileFromFile($file, $icsid, $catid, $access, $state, $icsLabel, 0, $ignoreembedcat);
}
}
$count = 0;
if ($icsFile !== false)
{
$count = $icsFile->storeEvents();
}
list($year, $month, $day) = JEVHelper::getYMD();
ob_end_clean();
?>
<script type="text/javascript">
window.alert("<?php echo JText::sprintf("JEV_EVENTS_IMPORTED", $count); ?>");
try {
window.parent.jQuery('#myImportModal').modal('hide');
}
catch (e){}
try {
window.parent.SqueezeBox.close();
}
catch (e){}
//window.parent.location.reload();
</script>
<?php
exit();
}
private function exportEvent($withrepeats = true)
{
$rpid = JRequest::getInt("evid", 0);
if (!$rpid)
return;
list($year, $month, $day) = JEVHelper::getYMD();
$repeat = $this->dataModel->getEventData($rpid, "icaldb", $year, $month, $day);
if ($repeat && is_array($repeat) && isset($repeat["row"]) && $repeat["row"]->rp_id() == $rpid)
{
$a = $repeat["row"];
$this->dataModel->setupComponentCatids();
if ($withrepeats && $a->hasrepetition())
{
$a = $a->getOriginalFirstRepeat();
}
if (!$a) return;
JRequest::setVar("tmpl", "component");
//$dispatcher = JEventDispatcher::getInstance();
// just incase we don't have jevents plugins registered yet
//JPluginHelper::importPlugin("jevents");
//$dispatcher->trigger('onExportRow', array(&$row));
$icalEvents = array();
$icalEvents[$a->ev_id()] = $a;
// get the view
$this->view = $this->getView("icals", "html");
$this->view->setLayout("export");
$this->view->assign("dataModel",$this->dataModel) ;
$this->view->assign("outlook2003icalexport", false);
$this->view->assign("icalEvents", $icalEvents);
$this->view->assign("withrepeats", $withrepeats);
$this->view->export();
return;
}
}
private function setDescription($desc)
{
// TODO - run this through plugins first ?
$icalformatted = JRequest::getInt("icf", 0);
if (!$icalformatted)
$description = $this->replacetags($desc);
else
$description = $desc;
// wraplines from vCard class
$cfg = JEVConfig::getInstance();
if ($cfg->get("outlook2003icalexport", 0))
{
return "DESCRIPTION:" . $this->wraplines($description, 76, false);
}
else
{
return "DESCRIPTION;ENCODING=QUOTED-PRINTABLE:" . $this->wraplines($description);
}
}
private function replacetags($description)
{
$description = str_replace('<p>', '\n\n', $description);
$description = str_replace('<P>', '\n\n', $description);
$description = str_replace('</p>', '\n', $description);
$description = str_replace('</P>', '\n', $description);
$description = str_replace('<p/>', '\n\n', $description);
$description = str_replace('<P/>', '\n\n', $description);
$description = str_replace('<br />', '\n', $description);
$description = str_replace('<br/>', '\n', $description);
$description = str_replace('<br>', '\n', $description);
$description = str_replace('<BR />', '\n', $description);
$description = str_replace('<BR/>', '\n', $description);
$description = str_replace('<BR>', '\n', $description);
$description = str_replace('<li>', '\n - ', $description);
$description = str_replace('<LI>', '\n - ', $description);
$description = strip_tags($description);
//$description = strtr( $description, array_flip(get_html_translation_table( HTML_ENTITIES ) ) );
//$description = preg_replace( "/&#([0-9]+);/me","chr('\\1')", $description );
return $description;
}
private function wraplines($input, $line_max = 76, $quotedprintable = false)
{
$hex = array('0', '1', '2', '3', '4', '5', '6', '7', '8', '9', 'A', 'B', 'C', 'D', 'E', 'F');
$eol = "\r\n";
$input = str_replace($eol, "", $input);
// new version
$output = '';
while (JString::strlen($input) >= $line_max)
{
$output .= JString::substr($input, 0, $line_max - 1);
$input = JString::substr($input, $line_max - 1);
if (JString::strlen($input) > 0)
{
$output .= $eol . " ";
}
}
if (JString::strlen($input) > 0)
{
$output .= $input;
}
return $output;
$escape = '=';
$output = '';
$outline = "";
$newline = ' ';
$linlen = JString::strlen($input);
for ($i = 0; $i < $linlen; $i++)
{
$c = JString::substr($input, $i, 1);
/*
$dec = ord($c);
if (!$quotedprintable) {
if (($dec == 32) && ($i == ($linlen - 1))) { // convert space at eol only
$c = '=20';
} elseif (($dec == 61) || ($dec < 32 ) || ($dec > 126)) { // always encode "\t", which is *not* required
$h2 = floor($dec / 16);
$h1 = floor($dec % 16);
$c = $escape . $hex["$h2"] . $hex["$h1"];
}
}
*/
if ((JString::strlen($outline) + 1) >= $line_max)
{ // CRLF is not counted
$output .= $outline . $eol . $newline; // soft line break; "\r\n" is okay
$outline = $c;
//$newline .= " ";
}
else
{
$outline .= $c;
}
} // end of for
$output .= $outline;
return trim($output);
}
private function vtimezone($icalEvents)
{
$params = JComponentHelper::getParams(JEV_COM_COMPONENT);
$tzid = "";
if (is_callable("date_default_timezone_set"))
{
$current_timezone = date_default_timezone_get();
// Do the Timezone definition
$tzid = ";TZID=$current_timezone";
// find the earliest start date
$firststart = false;
foreach ($icalEvents as $a)
{
if (!$firststart || $a->getUnixStartTime() < $firststart)
$firststart = $a->getUnixStartTime();
}
// Subtract 1 leap year to make sure we have enough transitions
$firststart -= 31622400;
$timezone = new DateTimeZone($current_timezone);
if (version_compare(PHP_VERSION, "5.3.0") >= 0)
{
$transitions = $timezone->getTransitions($firststart);
}
else
{
$transitions = $timezone->getTransitions();
}
$tzindex = 0;
while (JevDate::strtotime($transitions[$tzindex]['time']) < $firststart)
{
$tzindex++;
}
$transitions = array_slice($transitions, $tzindex);
if (count($transitions) >= 2)
{
$lastyear = JEVHelper::getMaxYear();
echo "BEGIN:VTIMEZONE\n";
echo "TZID:$current_timezone\n";
for ($t = 0; $t < count($transitions); $t++)
{
$transition = $transitions[$t];
if ( (int) $transition['isdst'] == 0)
{
if (JevDate::strftime("%Y", $transition['ts']) > $lastyear)
continue;
echo "BEGIN:STANDARD\n";
echo "DTSTART:" . JevDate::strftime("%Y%m%dT%H%M%S\n", $transition['ts']);
if ($t < count($transitions) - 1)
{
echo "RDATE:" . JevDate::strftime("%Y%m%dT%H%M%S\n", $transitions[$t + 1]['ts']);
}
// if its the first transition then assume the old setting is the same as the next otherwise use the previous value
$prev = $t;
$prev += ( $t == 0) ? 1 : -1;
$offset = $transitions[$prev]["offset"];
$sign = $offset >= 0 ? "+" : "-";
$offset = abs($offset);
$offset = $sign . sprintf("%04s", (floor($offset / 3600) * 100 + $offset % 60));
echo "TZOFFSETFROM:$offset\n";
$offset = $transitions[$t]["offset"];
$sign = $offset >= 0 ? "" : "-";
$offset = abs($offset);
$offset = $sign . sprintf("%04s", (floor($offset / 3600) * 100 + $offset % 60));
echo "TZOFFSETTO:$offset\n";
echo "TZNAME:$current_timezone " . $transitions[$t]["abbr"] . "\n";
echo "END:STANDARD\n";
}
}
for ($t = 0; $t < count($transitions); $t++)
{
$transition = $transitions[$t];
if ( (int) $transition['isdst'] == 1)
{
if (JevDate::strftime("%Y", $transition['ts']) > $lastyear)
continue;
echo "BEGIN:DAYLIGHT\n";
echo "DTSTART:" . JevDate::strftime("%Y%m%dT%H%M%S\n", $transition['ts']);
if ($t < count($transitions) - 1)
{
echo "RDATE:" . JevDate::strftime("%Y%m%dT%H%M%S\n", $transitions[$t + 1]['ts']);
}
// if its the first transition then assume the old setting is the same as the next otherwise use the previous value
$prev = $t;
$prev += ( $t == 0) ? 1 : -1;
$offset = $transitions[$prev]["offset"];
$sign = $offset >= 0 ? "+" : "-";
$offset = abs($offset);
$offset = $sign . sprintf("%04s", (floor($offset / 3600) * 100 + $offset % 60));
echo "TZOFFSETFROM:$offset\n";
$offset = $transitions[$t]["offset"];
$sign = $offset >= 0 ? "" : "-";
$offset = abs($offset);
$offset = $sign . sprintf("%04s", (floor($offset / 3600) * 100 + $offset % 60));
echo "TZOFFSETTO:$offset\n";
echo "TZNAME:$current_timezone " . $transitions[$t]["abbr"] . "\n";
echo "END:DAYLIGHT\n";
}
}
echo "END:VTIMEZONE\n";
}
}
return $tzid;
}
}