<?php
/**
 * Display a list of calendar items grouped by month.
 */
class Kronolith_Block_Monthlist extends Horde_Core_Block
{
    /**
     */
    public function __construct($app, $params = array())
    {
        parent::__construct($app, $params);

        $this->_name = _("Upcoming Events");
    }

    /**
     */
    protected function _params()
    {
        $params = array(
            'calendar' => array(
                'name' => _("Calendar"),
                'type' => 'enum',
                'default' => '__all'),
            'months' => array(
                'name' => _("Months Ahead"),
                'type' => 'int',
                'default' => 2),
            'maxevents' => array(
                'name' => _("Maximum number of events to display (0 = no limit)"),
                'type' => 'int',
                'default' => 0),
            'alarms' => array(
                'name' => _("Show only events that have an alarm set?"),
                'type' => 'checkbox',
                'default' => 0
            )
        );

        $params['calendar']['values']['__all'] = _("All Visible");
        foreach (Kronolith::listCalendars(Horde_Perms::SHOW, true) as $id => $cal) {
            $params['calendar']['values'][$id] = $cal->name();
        }

        return $params;
    }

    /**
     */
    protected function _title()
    {
        $url = Horde::url($GLOBALS['registry']->getInitialPage(), true);
        if (isset($this->_params['calendar']) &&
            $this->_params['calendar'] != '__all') {
            $url->add('display_cal', $this->_params['calendar']);
        }
        return $url->link() . _("Upcoming Events") . '</a>';
    }

    /**
     */
    protected function _content()
    {
        global $page_output;

        $page_output->addScriptFile('tooltips.js', 'horde');

        $now = new Horde_Date($_SERVER['REQUEST_TIME']);
        $today = date('j');
        $current_month = '';

        $startDate = new Horde_Date(array(
            'year' => date('Y'),
            'month' => date('n'),
            'mday' => date('j')));
        $endDate = new Horde_Date(array(
            'year' => date('Y'),
            'month' => date('n') + $this->_params['months'],
            'mday' => date('j') - 1));

        try {
            if (isset($this->_params['calendar']) &&
                $this->_params['calendar'] != '__all') {
                $calendars = Kronolith::listCalendars();
                if (!isset($calendars[$this->_params['calendar']])) {
                    return _("Calendar not found");
                }
                if (!$calendars[$this->_params['calendar']]->hasPermission(Horde_Perms::READ)) {
                    return _("Permission Denied");
                }
                list($type, $calendar) = explode('_', $this->_params['calendar'], 2);
                $driver = Kronolith::getDriver($type, $calendar);
                $all_events = $driver->listEvents(
                    $startDate,
                    $endDate,
                    array('show_recurrence' => true,
                          'has_alarm' => !empty($this->_params['alarms']),
                          'cover_dates' => false)
                );
            } else {
                $all_events = Kronolith::listEvents(
                    $startDate,
                    $endDate,
                    $GLOBALS['display_calendars'], array(
                        'has_alarm' => !empty($this->_params['alarms']),
                        'cover_dates' => false)
                );
            }
        } catch (Exception $e) {
            return '<em>' . $e->getMessage() . '</em>';
        }

        /* How many days do we need to check. */
        $days = Date_Calc::dateDiff(
            $startDate->mday, $startDate->month, $startDate->year,
            $endDate->mday, $endDate->month, $endDate->year);

        /* Loop through the days. */
        $totalevents = 0;

        $html = '';
        for ($i = 0; $i < $days; ++$i) {
            $day = new Kronolith_Day($startDate->month, $today + $i);
            $date_stamp = $day->dateString();
            if (empty($all_events[$date_stamp])) {
                continue;
            }

            if (!empty($this->_params['maxevents']) &&
                $totalevents >= $this->_params['maxevents']) {
                break;
            }

            /* Output month header. */
            if ($current_month != $day->month) {
                $html .= '<tr><td colspan="4" class="control"><strong>' . $day->strftime('%B') . '</strong></td></tr>';
            }

            $firstevent = true;
            $tomorrow = $day->getTomorrow();
            foreach ($all_events[$date_stamp] as $event) {
                $isMultiDay = false;
                if ($event->start->compareDate($day) < 0) {
                    $event->start = new Horde_Date($day);
                }
                if ($event->end->compareDate($tomorrow) >= 1) {
                    $isMultiDay = true;
                }
                if (($event->end->compareDate($now) < 0 && !$event->isAllDay()) ||
                    (!empty($this->_params['alarms']) && !$event->alarm)) {
                    continue;
                }

                if ($firstevent || $isMultiDay) {
                    $html .= '<tr';
                    if ($current_month == $day->month) {
                        $html .= ' class="upcomingday"';
                    }
                    $html .= '><td class="text" valign="top" align="right"><strong>';
                    if ($day->isToday()) {
                        $html .= _("Today");
                    } elseif ($day->isTomorrow()) {
                        $html .= _("Tomorrow");
                    } else {
                        $html .= $day->mday;
                    }
                    if ($isMultiDay) {
                        $endDay = new Kronolith_Day($event->end->month, $event->end->mday);
                        $html .= ' - ';
                        if ($endDay->isTomorrow()) {
                            $html .= _("Tomorrow");
                        } else {
                            $html .= $event->end->mday;
                        }
                    }
                    $html .= '</strong>&nbsp;</td>';
                    $firstevent = $isMultiDay;
                } else {
                    $html .= '<tr><td class="text">&nbsp;</td>';
                }

                $html .= '<td class="text" nowrap="nowrap" valign="top">';
                if ($event->start->compareDate($now) < 0 &&
                    $event->end->compareDate($now) > 0) {
                    $html .= '<strong>' . htmlspecialchars($event->getLocation()) . '</strong>';
                } else {
                    $html .= htmlspecialchars($event->getLocation());
                }
                if ($event->start->compareDate($now) < 0 &&
                    $event->end->compareDate($now) > 0) {
                    $html .= '<strong>';
                }
                $html .= $event->getLink(null, true, null, true);
                if ($event->start->compareDate($now) < 0 &&
                    $event->end->compareDate($now) > 0) {
                    $html .= '</strong>';
                }
                $html .= '</td></tr>';

                $totalevents++;
            }

            $current_month = $day->strftime('%m');
        }

        if (empty($html)) {
            return '<em>' . _("No events to display") . '</em>';
        }

        return '<table cellspacing="0" width="100%">' . $html . '</table>';
    }

}
