xref: /plugin/davcal/syntax/table.php (revision d0b117dfa6df3ed8f0a324b01ce799b42d6fc857)
16fbb086dSAndreas Boehler<?php
26fbb086dSAndreas Boehler/**
36fbb086dSAndreas Boehler * DokuWiki Plugin DAVCal (Table Syntax Component)
46fbb086dSAndreas Boehler *
56fbb086dSAndreas Boehler * @license GPL 2 http://www.gnu.org/licenses/gpl-2.0.html
66fbb086dSAndreas Boehler * @author  Andreas Böhler <dev@aboehler.at>
76fbb086dSAndreas Boehler */
86fbb086dSAndreas Boehler
96fbb086dSAndreas Boehler// must be run within Dokuwiki
106fbb086dSAndreas Boehlerif(!defined('DOKU_INC')) die();
116fbb086dSAndreas Boehler
126fbb086dSAndreas Boehlerif(!defined('DOKU_PLUGIN')) define('DOKU_PLUGIN',DOKU_INC.'lib/plugins/');
136fbb086dSAndreas Boehlerrequire_once(DOKU_PLUGIN.'syntax.php');
146fbb086dSAndreas Boehler
156fbb086dSAndreas Boehlerclass syntax_plugin_davcal_table extends DokuWiki_Syntax_Plugin {
166fbb086dSAndreas Boehler
176fbb086dSAndreas Boehler    protected $hlp = null;
186fbb086dSAndreas Boehler
196fbb086dSAndreas Boehler    // Load the helper plugin
206fbb086dSAndreas Boehler    public function syntax_plugin_davcal_table() {
216fbb086dSAndreas Boehler        $this->hlp =& plugin_load('helper', 'davcal');
226fbb086dSAndreas Boehler    }
236fbb086dSAndreas Boehler
246fbb086dSAndreas Boehler
256fbb086dSAndreas Boehler    /**
266fbb086dSAndreas Boehler     * What kind of syntax are we?
276fbb086dSAndreas Boehler     */
286fbb086dSAndreas Boehler    function getType(){
296fbb086dSAndreas Boehler        return 'substition';
306fbb086dSAndreas Boehler    }
316fbb086dSAndreas Boehler
326fbb086dSAndreas Boehler    /**
336fbb086dSAndreas Boehler     * What about paragraphs?
346fbb086dSAndreas Boehler     */
356fbb086dSAndreas Boehler    function getPType(){
366fbb086dSAndreas Boehler        return 'normal';
376fbb086dSAndreas Boehler    }
386fbb086dSAndreas Boehler
396fbb086dSAndreas Boehler    /**
406fbb086dSAndreas Boehler     * Where to sort in?
416fbb086dSAndreas Boehler     */
426fbb086dSAndreas Boehler    function getSort(){
436fbb086dSAndreas Boehler        return 165;
446fbb086dSAndreas Boehler    }
456fbb086dSAndreas Boehler
466fbb086dSAndreas Boehler    /**
476fbb086dSAndreas Boehler     * Connect pattern to lexer
486fbb086dSAndreas Boehler     */
496fbb086dSAndreas Boehler    function connectTo($mode) {
506fbb086dSAndreas Boehler        $this->Lexer->addSpecialPattern('\{\{davcaltable>[^}]*\}\}',$mode,'plugin_davcal_table');
516fbb086dSAndreas Boehler    }
526fbb086dSAndreas Boehler
536fbb086dSAndreas Boehler    /**
546fbb086dSAndreas Boehler     * Handle the match
556fbb086dSAndreas Boehler     */
560b57b6d7SAndreas Boehler    function handle($match, $state, $pos, Doku_Handler $handler){
576fbb086dSAndreas Boehler        global $ID;
586fbb086dSAndreas Boehler        $options = trim(substr($match,14,-2));
596fbb086dSAndreas Boehler        $options = explode(',', $options);
606fbb086dSAndreas Boehler
616fbb086dSAndreas Boehler        $data = array('id' => array(),
626fbb086dSAndreas Boehler                      'startdate' => 'today',
636fbb086dSAndreas Boehler                      'numdays' => 30,
64a469597cSAndreas Boehler                      'startisend' => false,
656fbb086dSAndreas Boehler                      'dateformat' => 'Y-m-d H:i',
667bbaf436SAndreas Boehler                      'alldayformat' => 'Y-m-d',
676fbb086dSAndreas Boehler                      'onlystart' => false,
68*d0b117dfSAndreas Boehler                      'location' => true,
6982a48dfbSAndreas Boehler                      'sort' => 'desc',
7082a48dfbSAndreas Boehler                      'timezone' => 'local'
716fbb086dSAndreas Boehler                      );
726fbb086dSAndreas Boehler        $lastid = $ID;
736fbb086dSAndreas Boehler
746fbb086dSAndreas Boehler        foreach($options as $option)
756fbb086dSAndreas Boehler        {
766fbb086dSAndreas Boehler            list($key, $val) = explode('=', $option);
776fbb086dSAndreas Boehler            $key = strtolower(trim($key));
786fbb086dSAndreas Boehler            $val = trim($val);
796fbb086dSAndreas Boehler            switch($key)
806fbb086dSAndreas Boehler            {
816fbb086dSAndreas Boehler                case 'id':
826fbb086dSAndreas Boehler                    $lastid = $val;
836fbb086dSAndreas Boehler                    if(!in_array($val, $data['id']))
846fbb086dSAndreas Boehler                        $data['id'][$val] = '#3a87ad';
856fbb086dSAndreas Boehler                break;
866fbb086dSAndreas Boehler                case 'onlystart':
876fbb086dSAndreas Boehler                    if(($val === 'on') || ($val === 'true'))
886fbb086dSAndreas Boehler                        $data['onlystart'] = true;
896fbb086dSAndreas Boehler                break;
90a469597cSAndreas Boehler                case 'startisend':
91a469597cSAndreas Boehler                    if(($val === 'on') || ($val === 'true'))
92a469597cSAndreas Boehler                        $data['startisend'] = true;
93a469597cSAndreas Boehler                break;
9482a48dfbSAndreas Boehler                case 'timezone':
9582a48dfbSAndreas Boehler                    $tzlist = \DateTimeZone::listIdentifiers(DateTimeZone::ALL);
9682a48dfbSAndreas Boehler                    if(in_array($val, $tzlist) || $val === 'no')
9782a48dfbSAndreas Boehler                        $data['timezone'] = $val;
9882a48dfbSAndreas Boehler                    else
9982a48dfbSAndreas Boehler                        msg($this->getLang('error_timezone_not_in_list'), -1);
10082a48dfbSAndreas Boehler                break;
101*d0b117dfSAndreas Boehler                case 'nolocation':
102*d0b117dfSAndreas Boehler                    $data['location'] = false;
103*d0b117dfSAndreas Boehler                break;
1046fbb086dSAndreas Boehler                default:
1056fbb086dSAndreas Boehler                    $data[$key] = $val;
1066fbb086dSAndreas Boehler            }
1076fbb086dSAndreas Boehler        }
1086fbb086dSAndreas Boehler
1096fbb086dSAndreas Boehler        // Handle the default case when the user didn't enter a different ID
1106fbb086dSAndreas Boehler        if(empty($data['id']))
1116fbb086dSAndreas Boehler        {
1126fbb086dSAndreas Boehler            $data['id'] = array($ID => '#3a87ad');
1136fbb086dSAndreas Boehler        }
1146fbb086dSAndreas Boehler
1156fbb086dSAndreas Boehler        return $data;
1166fbb086dSAndreas Boehler    }
1176fbb086dSAndreas Boehler
1186fbb086dSAndreas Boehler    private static function sort_events_asc($a, $b)
1196fbb086dSAndreas Boehler    {
1206fbb086dSAndreas Boehler        $from1 = new \DateTime($a['start']);
1216fbb086dSAndreas Boehler        $from2 = new \DateTime($b['start']);
1226fbb086dSAndreas Boehler        return $from2 < $from1;
1236fbb086dSAndreas Boehler    }
1246fbb086dSAndreas Boehler
1256fbb086dSAndreas Boehler    private static function sort_events_desc($a, $b)
1266fbb086dSAndreas Boehler    {
1276fbb086dSAndreas Boehler        $from1 = new \DateTime($a['start']);
1286fbb086dSAndreas Boehler        $from2 = new \DateTime($b['start']);
1296fbb086dSAndreas Boehler        return $from1 < $from2;
1306fbb086dSAndreas Boehler    }
1316fbb086dSAndreas Boehler
1326fbb086dSAndreas Boehler    /**
1336fbb086dSAndreas Boehler     * Create output
1346fbb086dSAndreas Boehler     */
1350b57b6d7SAndreas Boehler    function render($format, Doku_Renderer $R, $data) {
1366fbb086dSAndreas Boehler        if($format == 'metadata')
1376fbb086dSAndreas Boehler        {
1386fbb086dSAndreas Boehler            $R->meta['plugin_davcal']['table'] = true;
1396fbb086dSAndreas Boehler            return true;
1406fbb086dSAndreas Boehler        }
1416fbb086dSAndreas Boehler        if(($format != 'xhtml') && ($format != 'odt')) return false;
1426fbb086dSAndreas Boehler        global $ID;
1436fbb086dSAndreas Boehler
1446fbb086dSAndreas Boehler        $events = array();
1456fbb086dSAndreas Boehler        $from = $data['startdate'];
146a469597cSAndreas Boehler        $toStr = null;
147a469597cSAndreas Boehler
148a469597cSAndreas Boehler        // Handle the various options to 'startDate'
1496fbb086dSAndreas Boehler        if($from === 'today')
1507bbaf436SAndreas Boehler        {
1516fbb086dSAndreas Boehler            $from = new \DateTime();
1527bbaf436SAndreas Boehler        }
1537bbaf436SAndreas Boehler        elseif(strpos($from, 'today-') === 0)
1547bbaf436SAndreas Boehler        {
155a469597cSAndreas Boehler            $days = intval(str_replace('today-', '', $from));
1567bbaf436SAndreas Boehler            $from = new \DateTime();
1577bbaf436SAndreas Boehler            $from->sub(new \DateInterval('P'.$days.'D'));
1587bbaf436SAndreas Boehler        }
159a469597cSAndreas Boehler        elseif(strpos($from, 'today+') === 0)
160a469597cSAndreas Boehler        {
161a469597cSAndreas Boehler            $days = intval(str_replace('today+', '', $from));
162a469597cSAndreas Boehler            $from = new \DateTime();
163a469597cSAndreas Boehler            $from->add(new \DateInterval('P'.$days.'D'));
164a469597cSAndreas Boehler        }
1656fbb086dSAndreas Boehler        else
1667bbaf436SAndreas Boehler        {
1676fbb086dSAndreas Boehler            $from = new \DateTime($from);
1687bbaf436SAndreas Boehler        }
169a469597cSAndreas Boehler
170a469597cSAndreas Boehler        // Handle the option 'startisend'
171a469597cSAndreas Boehler        if($data['startisend'] === true)
172a469597cSAndreas Boehler        {
173a469597cSAndreas Boehler            if($data['numdays'] > 0)
174a469597cSAndreas Boehler            {
175a469597cSAndreas Boehler                $to = clone $from;
176a469597cSAndreas Boehler                $to->sub(new \DateInterval('P'.$data['numdays'].'D'));
177a469597cSAndreas Boehler                $fromStr = $to->format('Y-m-d');
178a469597cSAndreas Boehler            }
179a469597cSAndreas Boehler            else
180a469597cSAndreas Boehler            {
181a469597cSAndreas Boehler                $fromStr = null;
182a469597cSAndreas Boehler            }
183a469597cSAndreas Boehler            $toStr = $from->format('Y-m-d');
184a469597cSAndreas Boehler        }
185a469597cSAndreas Boehler        else
186a469597cSAndreas Boehler        {
187a469597cSAndreas Boehler            if($data['numdays'] > 0)
188a469597cSAndreas Boehler            {
1896fbb086dSAndreas Boehler                $to = clone $from;
1906fbb086dSAndreas Boehler                $to->add(new \DateInterval('P'.$data['numdays'].'D'));
191a469597cSAndreas Boehler                $toStr = $to->format('Y-m-d');
192a469597cSAndreas Boehler            }
193a469597cSAndreas Boehler            else
194a469597cSAndreas Boehler            {
195a469597cSAndreas Boehler                $toStr = null;
196a469597cSAndreas Boehler            }
197a469597cSAndreas Boehler            $fromStr = $from->format('Y-m-d');
198a469597cSAndreas Boehler        }
199a469597cSAndreas Boehler
200a469597cSAndreas Boehler        // Support for timezone
20182a48dfbSAndreas Boehler        $timezone = $data['timezone'];
202a469597cSAndreas Boehler
20380e1ddf7SAndreas Boehler        // Filter events by user permissions
20480e1ddf7SAndreas Boehler        $userEvents = $this->hlp->filterCalendarPagesByUserPermission($data['id']);
20580e1ddf7SAndreas Boehler
206a469597cSAndreas Boehler        // Fetch the events
20780e1ddf7SAndreas Boehler        foreach($userEvents as $calPage => $color)
2086fbb086dSAndreas Boehler        {
2096fbb086dSAndreas Boehler            $events = array_merge($events, $this->hlp->getEventsWithinDateRange($calPage,
210a469597cSAndreas Boehler                                      $user, $fromStr, $toStr, $timezone));
211a469597cSAndreas Boehler
2126fbb086dSAndreas Boehler        }
213a469597cSAndreas Boehler        // Sort the events
2146fbb086dSAndreas Boehler        if($data['sort'] === 'desc')
2156fbb086dSAndreas Boehler            usort($events, array("syntax_plugin_davcal_table", "sort_events_desc"));
2166fbb086dSAndreas Boehler        else
2176fbb086dSAndreas Boehler            usort($events, array("syntax_plugin_davcal_table", "sort_events_asc"));
2186fbb086dSAndreas Boehler
219a469597cSAndreas Boehler        // Create tabular output
2206fbb086dSAndreas Boehler        $R->table_open();
2216fbb086dSAndreas Boehler        $R->tablethead_open();
2226fbb086dSAndreas Boehler        $R->tableheader_open();
223f6f0bafeSAndreas Boehler        $R->doc .= $data['onlystart'] ? hsc($this->getLang('at')) : hsc($this->getLang('from'));
2246fbb086dSAndreas Boehler        $R->tableheader_close();
2256fbb086dSAndreas Boehler        if(!$data['onlystart'])
2266fbb086dSAndreas Boehler        {
2276fbb086dSAndreas Boehler            $R->tableheader_open();
228f6f0bafeSAndreas Boehler            $R->doc .= hsc($this->getLang('to'));
2296fbb086dSAndreas Boehler            $R->tableheader_close();
2306fbb086dSAndreas Boehler        }
2316fbb086dSAndreas Boehler        $R->tableheader_open();
232f6f0bafeSAndreas Boehler        $R->doc .= hsc($this->getLang('title'));
2336fbb086dSAndreas Boehler        $R->tableheader_close();
234*d0b117dfSAndreas Boehler        if($data['location'])
235*d0b117dfSAndreas Boehler        {
236*d0b117dfSAndreas Boehler            $R->tableheader_open();
237*d0b117dfSAndreas Boehler            $R->doc .= hsc($this->getLang('location'));
238*d0b117dfSAndreas Boehler            $R->tableheader_close();
239*d0b117dfSAndreas Boehler        }
2406fbb086dSAndreas Boehler        $R->tableheader_open();
241f6f0bafeSAndreas Boehler        $R->doc .= hsc($this->getLang('description'));
2426fbb086dSAndreas Boehler        $R->tableheader_close();
2436fbb086dSAndreas Boehler        $R->tablethead_close();
2446fbb086dSAndreas Boehler        foreach($events as $event)
2456fbb086dSAndreas Boehler        {
2466fbb086dSAndreas Boehler            $R->tablerow_open();
2476fbb086dSAndreas Boehler            $R->tablecell_open();
2486fbb086dSAndreas Boehler            $from = new \DateTime($event['start']);
24932cad826SAndreas Boehler            if($timezone !== 'local')
25032cad826SAndreas Boehler            {
251c841370aSAndreas Boehler                $from->setTimezone(new \DateTimeZone($timezone));
252c841370aSAndreas Boehler                $to->setTimezone(new \DateTimeZone($timezone));
25332cad826SAndreas Boehler            }
2547bbaf436SAndreas Boehler            if($event['allDay'] === true)
2557bbaf436SAndreas Boehler                $R->doc .= $from->format($data['alldayformat']);
2567bbaf436SAndreas Boehler            else
2576fbb086dSAndreas Boehler                $R->doc .= $from->format($data['dateformat']);
2586fbb086dSAndreas Boehler            $R->tablecell_close();
2596fbb086dSAndreas Boehler            if(!$data['onlystart'])
2606fbb086dSAndreas Boehler            {
26106f3ffd9SAndreas Boehler                $to = new \DateTime($event['end']);
26206f3ffd9SAndreas Boehler                // Fixup all day events, which have one day in excess
26306f3ffd9SAndreas Boehler                if($event['allDay'] === true)
26406f3ffd9SAndreas Boehler                {
26506f3ffd9SAndreas Boehler                    $to->sub(new \DateInterval('P1D'));
26606f3ffd9SAndreas Boehler                }
2676fbb086dSAndreas Boehler                $R->tablecell_open();
2687bbaf436SAndreas Boehler                if($event['allDay'] === true)
2697bbaf436SAndreas Boehler                    $R->doc .= $to->format($data['alldayformat']);
2707bbaf436SAndreas Boehler                else
2716fbb086dSAndreas Boehler                    $R->doc .= $to->format($data['dateformat']);
2726fbb086dSAndreas Boehler                $R->tablecell_close();
2736fbb086dSAndreas Boehler            }
2746fbb086dSAndreas Boehler            $R->tablecell_open();
275f6f0bafeSAndreas Boehler            $R->doc .= hsc($event['title']);
2766fbb086dSAndreas Boehler            $R->tablecell_close();
277*d0b117dfSAndreas Boehler            if($data['location'])
278*d0b117dfSAndreas Boehler            {
279*d0b117dfSAndreas Boehler                $R->tablecell_open();
280*d0b117dfSAndreas Boehler                $R->doc .= hsc($event['location']);
281*d0b117dfSAndreas Boehler                $R->tablecell_close();
282*d0b117dfSAndreas Boehler            }
2836fbb086dSAndreas Boehler            $R->tablecell_open();
284f6f0bafeSAndreas Boehler            $R->doc .= hsc($event['description']);
2856fbb086dSAndreas Boehler            $R->tablecell_close();
2866fbb086dSAndreas Boehler            $R->tablerow_close();
2876fbb086dSAndreas Boehler        }
2886fbb086dSAndreas Boehler        $R->table_close();
2896fbb086dSAndreas Boehler    }
2906fbb086dSAndreas Boehler
2916fbb086dSAndreas Boehler
2926fbb086dSAndreas Boehler
2936fbb086dSAndreas Boehler}
2946fbb086dSAndreas Boehler
2956fbb086dSAndreas Boehler// vim:ts=4:sw=4:et:enc=utf-8:
296