<?php
/*
* This file is part of Contao.
*
* (c) Leo Feyer
*
* @license LGPL-3.0-or-later
*/
namespace Contao;
use Contao\CoreBundle\Exception\InternalServerErrorException;
use Contao\CoreBundle\Exception\PageNotFoundException;
use Contao\CoreBundle\Exception\RedirectResponseException;
use Contao\CoreBundle\Image\Studio\Studio;
use Contao\CoreBundle\Routing\ResponseContext\HtmlHeadBag\HtmlHeadBag;
use Contao\CoreBundle\Routing\ResponseContext\ResponseContextAccessor;
use Patchwork\Utf8;
/**
* Front end module "event reader".
*
* @property Comments $Comments
* @property string $com_template
* @property string $cal_template
* @property array $cal_calendar
*
* @author Leo Feyer <https://github.com/leofeyer>
*/
class ModuleEventReader extends Events
{
/**
* Template
* @var string
*/
protected $strTemplate = 'mod_eventreader';
/**
* Display a wildcard in the back end
*
* @throws InternalServerErrorException
*
* @return string
*/
public function generate()
{
$request = System::getContainer()->get('request_stack')->getCurrentRequest();
if ($request && System::getContainer()->get('contao.routing.scope_matcher')->isBackendRequest($request))
{
$objTemplate = new BackendTemplate('be_wildcard');
$objTemplate->wildcard = '### ' . Utf8::strtoupper($GLOBALS['TL_LANG']['FMD']['eventreader'][0]) . ' ###';
$objTemplate->title = $this->headline;
$objTemplate->id = $this->id;
$objTemplate->link = $this->name;
$objTemplate->href = 'contao/main.php?do=themes&table=tl_module&act=edit&id=' . $this->id;
return $objTemplate->parse();
}
// Set the item from the auto_item parameter
if (!isset($_GET['events']) && isset($_GET['auto_item']) && Config::get('useAutoItem'))
{
Input::setGet('events', Input::get('auto_item'));
}
// Return an empty string if "events" is not set (to combine list and reader on same page)
if (!Input::get('events'))
{
return '';
}
$this->cal_calendar = $this->sortOutProtected(StringUtil::deserialize($this->cal_calendar));
if (empty($this->cal_calendar) || !\is_array($this->cal_calendar))
{
throw new InternalServerErrorException('The event reader ID ' . $this->id . ' has no calendars specified.');
}
return parent::generate();
}
/**
* Generate the module
*/
protected function compile()
{
/** @var PageModel $objPage */
global $objPage;
$this->Template->event = '';
$this->Template->referer = 'javascript:history.go(-1)';
$this->Template->back = $GLOBALS['TL_LANG']['MSC']['goBack'];
// Get the current event
$objEvent = CalendarEventsModel::findPublishedByParentAndIdOrAlias(Input::get('events'), $this->cal_calendar);
// The event does not exist (see #33)
if ($objEvent === null)
{
throw new PageNotFoundException('Page not found: ' . Environment::get('uri'));
}
// Redirect if the event has a target URL (see #1498)
switch ($objEvent->source) {
case 'internal':
if ($page = PageModel::findPublishedById($objEvent->jumpTo))
{
throw new RedirectResponseException($page->getAbsoluteUrl(), 301);
}
throw new InternalServerErrorException('Invalid "jumpTo" value or target page not public');
case 'article':
if (($article = ArticleModel::findByPk($objEvent->articleId)) && ($page = PageModel::findPublishedById($article->pid)))
{
throw new RedirectResponseException($page->getAbsoluteUrl('/articles/' . ($article->alias ?: $article->id)), 301);
}
throw new InternalServerErrorException('Invalid "articleId" value or target page not public');
case 'external':
if ($objEvent->url)
{
throw new RedirectResponseException($objEvent->url, 301);
}
throw new InternalServerErrorException('Empty target URL');
}
// Overwrite the page meta data (see #2853, #4955 and #87)
$responseContext = System::getContainer()->get(ResponseContextAccessor::class)->getResponseContext();
if ($responseContext && $responseContext->has(HtmlHeadBag::class))
{
/** @var HtmlHeadBag $htmlHeadBag */
$htmlHeadBag = $responseContext->get(HtmlHeadBag::class);
if ($objEvent->pageTitle)
{
$htmlHeadBag->setTitle($objEvent->pageTitle); // Already stored decoded
}
elseif ($objEvent->title)
{
$htmlHeadBag->setTitle(StringUtil::inputEncodedToPlainText($objEvent->title));
}
if ($objEvent->description)
{
$htmlHeadBag->setMetaDescription(StringUtil::inputEncodedToPlainText($objEvent->description));
}
elseif ($objEvent->teaser)
{
$htmlHeadBag->setMetaDescription(StringUtil::htmlToPlainText($objEvent->teaser));
}
if ($objEvent->robots)
{
$htmlHeadBag->setMetaRobots($objEvent->robots);
}
}
$intStartTime = $objEvent->startTime;
$intEndTime = $objEvent->endTime;
$span = Calendar::calculateSpan($intStartTime, $intEndTime);
// Do not show dates in the past if the event is recurring (see #923)
if ($objEvent->recurring)
{
$arrRange = StringUtil::deserialize($objEvent->repeatEach);
if (isset($arrRange['unit'], $arrRange['value']))
{
while (($this->cal_hideRunning ? $intStartTime : $intEndTime) < time() && $intEndTime < $objEvent->repeatEnd)
{
$intStartTime = strtotime('+' . $arrRange['value'] . ' ' . $arrRange['unit'], $intStartTime);
$intEndTime = strtotime('+' . $arrRange['value'] . ' ' . $arrRange['unit'], $intEndTime);
}
}
}
// Mark past and upcoming events (see #187)
if ($intEndTime < strtotime('00:00:00'))
{
$objEvent->cssClass .= ' bygone';
}
elseif ($intStartTime > strtotime('23:59:59'))
{
$objEvent->cssClass .= ' upcoming';
}
else
{
$objEvent->cssClass .= ' current';
}
list($strDate, $strTime) = $this->getDateAndTime($objEvent, $objPage, $intStartTime, $intEndTime, $span);
$until = '';
$recurring = '';
$arrRange = array();
// Recurring event
if ($objEvent->recurring)
{
$arrRange = StringUtil::deserialize($objEvent->repeatEach);
if (isset($arrRange['unit'], $arrRange['value']))
{
if ($arrRange['value'] == 1)
{
$repeat = $GLOBALS['TL_LANG']['MSC']['cal_single_' . $arrRange['unit']];
}
else
{
$repeat = sprintf($GLOBALS['TL_LANG']['MSC']['cal_multiple_' . $arrRange['unit']], $arrRange['value']);
}
if ($objEvent->recurrences > 0)
{
$until = ' ' . sprintf($GLOBALS['TL_LANG']['MSC']['cal_until'], Date::parse($objPage->dateFormat, $objEvent->repeatEnd));
}
if ($objEvent->recurrences > 0 && $intEndTime <= time())
{
$recurring = sprintf($GLOBALS['TL_LANG']['MSC']['cal_repeat_ended'], $repeat, $until);
}
elseif ($objEvent->addTime)
{
$recurring = sprintf($GLOBALS['TL_LANG']['MSC']['cal_repeat'], $repeat, $until, date('Y-m-d\TH:i:sP', $intStartTime), $strDate . ($strTime ? ' ' . $strTime : ''));
}
else
{
$recurring = sprintf($GLOBALS['TL_LANG']['MSC']['cal_repeat'], $repeat, $until, date('Y-m-d', $intStartTime), $strDate);
}
}
}
$objTemplate = new FrontendTemplate($this->cal_template ?: 'event_full');
$objTemplate->setData($objEvent->row());
$objTemplate->date = $strDate;
$objTemplate->time = $strTime;
$objTemplate->datetime = $objEvent->addTime ? date('Y-m-d\TH:i:sP', $intStartTime) : date('Y-m-d', $intStartTime);
$objTemplate->begin = $intStartTime;
$objTemplate->end = $intEndTime;
$objTemplate->class = $objEvent->cssClass ? ' ' . trim($objEvent->cssClass) : '';
$objTemplate->recurring = $recurring;
$objTemplate->until = $until;
$objTemplate->locationLabel = $GLOBALS['TL_LANG']['MSC']['location'];
$objTemplate->calendar = $objEvent->getRelated('pid');
$objTemplate->details = '';
$objTemplate->hasDetails = false;
$objTemplate->hasTeaser = false;
$objTemplate->hasReader = true;
// Clean the RTE output
if ($objEvent->teaser)
{
$objTemplate->hasTeaser = true;
$objTemplate->teaser = StringUtil::toHtml5($objEvent->teaser);
$objTemplate->teaser = StringUtil::encodeEmail($objTemplate->teaser);
}
// Display the "read more" button for external/article links
if ($objEvent->source != 'default')
{
$objTemplate->hasDetails = true;
$objTemplate->hasReader = false;
}
// Compile the event text
else
{
$id = $objEvent->id;
$objTemplate->details = function () use ($id)
{
$strDetails = '';
$objElement = ContentModel::findPublishedByPidAndTable($id, 'tl_calendar_events');
if ($objElement !== null)
{
while ($objElement->next())
{
$strDetails .= $this->getContentElement($objElement->current());
}
}
return $strDetails;
};
$objTemplate->hasDetails = static function () use ($id)
{
return ContentModel::countPublishedByPidAndTable($id, 'tl_calendar_events') > 0;
};
}
$objTemplate->addImage = false;
$objTemplate->addBefore = false;
// Add an image
if ($objEvent->addImage)
{
$imgSize = $objEvent->size ?: null;
// Override the default image size
if ($this->imgSize)
{
$size = StringUtil::deserialize($this->imgSize);
if ($size[0] > 0 || $size[1] > 0 || is_numeric($size[2]) || ($size[2][0] ?? null) === '_')
{
$imgSize = $this->imgSize;
}
}
$figure = System::getContainer()
->get(Studio::class)
->createFigureBuilder()
->from($objEvent->singleSRC)
->setSize($imgSize)
->setMetadata($objEvent->getOverwriteMetadata())
->enableLightbox((bool) $objEvent->fullsize)
->buildIfResourceExists();
if (null !== $figure)
{
$figure->applyLegacyTemplateData($objTemplate, $objEvent->imagemargin, $objEvent->floating);
}
}
$objTemplate->enclosure = array();
// Add enclosures
if ($objEvent->addEnclosure)
{
$this->addEnclosuresToTemplate($objTemplate, $objEvent->row());
}
// Add a function to retrieve upcoming dates (see #175)
$objTemplate->getUpcomingDates = function ($recurrences) use ($objEvent, $objPage, $intStartTime, $intEndTime, $arrRange, $span)
{
if (!$objEvent->recurring || !isset($arrRange['unit'], $arrRange['value']))
{
return array();
}
$dates = array();
$startTime = $intStartTime;
$endTime = $intEndTime;
$strtotime = '+ ' . $arrRange['value'] . ' ' . $arrRange['unit'];
for ($i=0; $i<$recurrences; $i++)
{
$startTime = strtotime($strtotime, $startTime);
$endTime = strtotime($strtotime, $endTime);
if ($endTime > $objEvent->repeatEnd)
{
break;
}
list($strDate, $strTime) = $this->getDateAndTime($objEvent, $objPage, $startTime, $endTime, $span);
$dates[] = array
(
'date' => $strDate,
'time' => $strTime,
'datetime' => $objEvent->addTime ? date('Y-m-d\TH:i:sP', $startTime) : date('Y-m-d', $endTime),
'begin' => $startTime,
'end' => $endTime
);
}
return $dates;
};
// Add a function to retrieve past dates (see #175)
$objTemplate->getPastDates = function ($recurrences) use ($objEvent, $objPage, $intStartTime, $intEndTime, $arrRange, $span)
{
if (!$objEvent->recurring || !isset($arrRange['unit'], $arrRange['value']))
{
return array();
}
$dates = array();
$startTime = $intStartTime;
$endTime = $intEndTime;
$strtotime = '- ' . $arrRange['value'] . ' ' . $arrRange['unit'];
for ($i=0; $i<$recurrences; $i++)
{
$startTime = strtotime($strtotime, $startTime);
$endTime = strtotime($strtotime, $endTime);
if ($startTime < $objEvent->startDate)
{
break;
}
list($strDate, $strTime) = $this->getDateAndTime($objEvent, $objPage, $startTime, $endTime, $span);
$dates[] = array
(
'date' => $strDate,
'time' => $strTime,
'datetime' => $objEvent->addTime ? date('Y-m-d\TH:i:sP', $startTime) : date('Y-m-d', $endTime),
'begin' => $startTime,
'end' => $endTime
);
}
return $dates;
};
// schema.org information
$objTemplate->getSchemaOrgData = static function () use ($objTemplate, $objEvent): array
{
$jsonLd = Events::getSchemaOrgData($objEvent);
if ($objTemplate->addImage && $objTemplate->figure)
{
$jsonLd['image'] = $objTemplate->figure->getSchemaOrgData();
}
return $jsonLd;
};
$this->Template->event = $objTemplate->parse();
// Tag the event (see #2137)
if (System::getContainer()->has('fos_http_cache.http.symfony_response_tagger'))
{
$responseTagger = System::getContainer()->get('fos_http_cache.http.symfony_response_tagger');
$responseTagger->addTags(array('contao.db.tl_calendar_events.' . $objEvent->id));
}
$bundles = System::getContainer()->getParameter('kernel.bundles');
// HOOK: comments extension required
if ($objEvent->noComments || !isset($bundles['ContaoCommentsBundle']))
{
$this->Template->allowComments = false;
return;
}
/** @var CalendarModel $objCalendar */
$objCalendar = $objEvent->getRelated('pid');
$this->Template->allowComments = $objCalendar->allowComments;
// Comments are not allowed
if (!$objCalendar->allowComments)
{
return;
}
// Adjust the comments headline level
$intHl = min((int) str_replace('h', '', $this->hl), 5);
$this->Template->hlc = 'h' . ($intHl + 1);
$this->import(Comments::class, 'Comments');
$arrNotifies = array();
// Notify the system administrator
if ($objCalendar->notify != 'notify_author')
{
$arrNotifies[] = $GLOBALS['TL_ADMIN_EMAIL'];
}
/** @var UserModel $objAuthor */
if ($objCalendar->notify != 'notify_admin' && ($objAuthor = $objEvent->getRelated('author')) instanceof UserModel && $objAuthor->email)
{
$arrNotifies[] = $objAuthor->email;
}
$objConfig = new \stdClass();
$objConfig->perPage = $objCalendar->perPage;
$objConfig->order = $objCalendar->sortOrder;
$objConfig->template = $this->com_template;
$objConfig->requireLogin = $objCalendar->requireLogin;
$objConfig->disableCaptcha = $objCalendar->disableCaptcha;
$objConfig->bbcode = $objCalendar->bbcode;
$objConfig->moderate = $objCalendar->moderate;
$this->Comments->addCommentsToTemplate($this->Template, $objConfig, 'tl_calendar_events', $objEvent->id, $arrNotifies);
}
/**
* Return the date and time strings
*
* @param CalendarEventsModel $objEvent
* @param PageModel $objPage
* @param integer $intStartTime
* @param integer $intEndTime
* @param integer $span
*
* @return array
*/
private function getDateAndTime(CalendarEventsModel $objEvent, PageModel $objPage, $intStartTime, $intEndTime, $span)
{
$strDate = Date::parse($objPage->dateFormat, $intStartTime);
if ($span > 0)
{
$strDate = Date::parse($objPage->dateFormat, $intStartTime) . $GLOBALS['TL_LANG']['MSC']['cal_timeSeparator'] . Date::parse($objPage->dateFormat, $intEndTime);
}
$strTime = '';
if ($objEvent->addTime)
{
if ($span > 0)
{
$strDate = Date::parse($objPage->datimFormat, $intStartTime) . $GLOBALS['TL_LANG']['MSC']['cal_timeSeparator'] . Date::parse($objPage->datimFormat, $intEndTime);
}
elseif ($intStartTime == $intEndTime)
{
$strTime = Date::parse($objPage->timeFormat, $intStartTime);
}
else
{
$strTime = Date::parse($objPage->timeFormat, $intStartTime) . $GLOBALS['TL_LANG']['MSC']['cal_timeSeparator'] . Date::parse($objPage->timeFormat, $intEndTime);
}
}
return array($strDate, $strTime);
}
}
class_alias(ModuleEventReader::class, 'ModuleEventReader');