xref: /plugin/davcal/syntax/table.php (revision 0b57b6d7671a80bb0227519855146fab15f9d2dc)
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     */
56*0b57b6d7SAndreas 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,
6882a48dfbSAndreas Boehler                      'sort' => 'desc',
6982a48dfbSAndreas Boehler                      'timezone' => 'local'
706fbb086dSAndreas Boehler                      );
716fbb086dSAndreas Boehler        $lastid = $ID;
726fbb086dSAndreas Boehler
736fbb086dSAndreas Boehler        foreach($options as $option)
746fbb086dSAndreas Boehler        {
756fbb086dSAndreas Boehler            list($key, $val) = explode('=', $option);
766fbb086dSAndreas Boehler            $key = strtolower(trim($key));
776fbb086dSAndreas Boehler            $val = trim($val);
786fbb086dSAndreas Boehler            switch($key)
796fbb086dSAndreas Boehler            {
806fbb086dSAndreas Boehler                case 'id':
816fbb086dSAndreas Boehler                    $lastid = $val;
826fbb086dSAndreas Boehler                    if(!in_array($val, $data['id']))
836fbb086dSAndreas Boehler                        $data['id'][$val] = '#3a87ad';
846fbb086dSAndreas Boehler                break;
856fbb086dSAndreas Boehler                case 'onlystart':
866fbb086dSAndreas Boehler                    if(($val === 'on') || ($val === 'true'))
876fbb086dSAndreas Boehler                        $data['onlystart'] = true;
886fbb086dSAndreas Boehler                break;
89a469597cSAndreas Boehler                case 'startisend':
90a469597cSAndreas Boehler                    if(($val === 'on') || ($val === 'true'))
91a469597cSAndreas Boehler                        $data['startisend'] = true;
92a469597cSAndreas Boehler                break;
9382a48dfbSAndreas Boehler                case 'timezone':
9482a48dfbSAndreas Boehler                    $tzlist = \DateTimeZone::listIdentifiers(DateTimeZone::ALL);
9582a48dfbSAndreas Boehler                    if(in_array($val, $tzlist) || $val === 'no')
9682a48dfbSAndreas Boehler                        $data['timezone'] = $val;
9782a48dfbSAndreas Boehler                    else
9882a48dfbSAndreas Boehler                        msg($this->getLang('error_timezone_not_in_list'), -1);
9982a48dfbSAndreas Boehler                break;
1006fbb086dSAndreas Boehler                default:
1016fbb086dSAndreas Boehler                    $data[$key] = $val;
1026fbb086dSAndreas Boehler            }
1036fbb086dSAndreas Boehler        }
1046fbb086dSAndreas Boehler
1056fbb086dSAndreas Boehler        // Handle the default case when the user didn't enter a different ID
1066fbb086dSAndreas Boehler        if(empty($data['id']))
1076fbb086dSAndreas Boehler        {
1086fbb086dSAndreas Boehler            $data['id'] = array($ID => '#3a87ad');
1096fbb086dSAndreas Boehler        }
1106fbb086dSAndreas Boehler
1116fbb086dSAndreas Boehler        return $data;
1126fbb086dSAndreas Boehler    }
1136fbb086dSAndreas Boehler
1146fbb086dSAndreas Boehler    private static function sort_events_asc($a, $b)
1156fbb086dSAndreas Boehler    {
1166fbb086dSAndreas Boehler        $from1 = new \DateTime($a['start']);
1176fbb086dSAndreas Boehler        $from2 = new \DateTime($b['start']);
1186fbb086dSAndreas Boehler        return $from2 < $from1;
1196fbb086dSAndreas Boehler    }
1206fbb086dSAndreas Boehler
1216fbb086dSAndreas Boehler    private static function sort_events_desc($a, $b)
1226fbb086dSAndreas Boehler    {
1236fbb086dSAndreas Boehler        $from1 = new \DateTime($a['start']);
1246fbb086dSAndreas Boehler        $from2 = new \DateTime($b['start']);
1256fbb086dSAndreas Boehler        return $from1 < $from2;
1266fbb086dSAndreas Boehler    }
1276fbb086dSAndreas Boehler
1286fbb086dSAndreas Boehler    /**
1296fbb086dSAndreas Boehler     * Create output
1306fbb086dSAndreas Boehler     */
131*0b57b6d7SAndreas Boehler    function render($format, Doku_Renderer $R, $data) {
1326fbb086dSAndreas Boehler        if($format == 'metadata')
1336fbb086dSAndreas Boehler        {
1346fbb086dSAndreas Boehler            $R->meta['plugin_davcal']['table'] = true;
1356fbb086dSAndreas Boehler            return true;
1366fbb086dSAndreas Boehler        }
1376fbb086dSAndreas Boehler        if(($format != 'xhtml') && ($format != 'odt')) return false;
1386fbb086dSAndreas Boehler        global $ID;
1396fbb086dSAndreas Boehler
1406fbb086dSAndreas Boehler        $events = array();
1416fbb086dSAndreas Boehler        $from = $data['startdate'];
142a469597cSAndreas Boehler        $toStr = null;
143a469597cSAndreas Boehler
144a469597cSAndreas Boehler        // Handle the various options to 'startDate'
1456fbb086dSAndreas Boehler        if($from === 'today')
1467bbaf436SAndreas Boehler        {
1476fbb086dSAndreas Boehler            $from = new \DateTime();
1487bbaf436SAndreas Boehler        }
1497bbaf436SAndreas Boehler        elseif(strpos($from, 'today-') === 0)
1507bbaf436SAndreas Boehler        {
151a469597cSAndreas Boehler            $days = intval(str_replace('today-', '', $from));
1527bbaf436SAndreas Boehler            $from = new \DateTime();
1537bbaf436SAndreas Boehler            $from->sub(new \DateInterval('P'.$days.'D'));
1547bbaf436SAndreas Boehler        }
155a469597cSAndreas Boehler        elseif(strpos($from, 'today+') === 0)
156a469597cSAndreas Boehler        {
157a469597cSAndreas Boehler            $days = intval(str_replace('today+', '', $from));
158a469597cSAndreas Boehler            $from = new \DateTime();
159a469597cSAndreas Boehler            $from->add(new \DateInterval('P'.$days.'D'));
160a469597cSAndreas Boehler        }
1616fbb086dSAndreas Boehler        else
1627bbaf436SAndreas Boehler        {
1636fbb086dSAndreas Boehler            $from = new \DateTime($from);
1647bbaf436SAndreas Boehler        }
165a469597cSAndreas Boehler
166a469597cSAndreas Boehler        // Handle the option 'startisend'
167a469597cSAndreas Boehler        if($data['startisend'] === true)
168a469597cSAndreas Boehler        {
169a469597cSAndreas Boehler            if($data['numdays'] > 0)
170a469597cSAndreas Boehler            {
171a469597cSAndreas Boehler                $to = clone $from;
172a469597cSAndreas Boehler                $to->sub(new \DateInterval('P'.$data['numdays'].'D'));
173a469597cSAndreas Boehler                $fromStr = $to->format('Y-m-d');
174a469597cSAndreas Boehler            }
175a469597cSAndreas Boehler            else
176a469597cSAndreas Boehler            {
177a469597cSAndreas Boehler                $fromStr = null;
178a469597cSAndreas Boehler            }
179a469597cSAndreas Boehler            $toStr = $from->format('Y-m-d');
180a469597cSAndreas Boehler        }
181a469597cSAndreas Boehler        else
182a469597cSAndreas Boehler        {
183a469597cSAndreas Boehler            if($data['numdays'] > 0)
184a469597cSAndreas Boehler            {
1856fbb086dSAndreas Boehler                $to = clone $from;
1866fbb086dSAndreas Boehler                $to->add(new \DateInterval('P'.$data['numdays'].'D'));
187a469597cSAndreas Boehler                $toStr = $to->format('Y-m-d');
188a469597cSAndreas Boehler            }
189a469597cSAndreas Boehler            else
190a469597cSAndreas Boehler            {
191a469597cSAndreas Boehler                $toStr = null;
192a469597cSAndreas Boehler            }
193a469597cSAndreas Boehler            $fromStr = $from->format('Y-m-d');
194a469597cSAndreas Boehler        }
195a469597cSAndreas Boehler
196a469597cSAndreas Boehler        // Support for timezone
19782a48dfbSAndreas Boehler        $timezone = $data['timezone'];
198a469597cSAndreas Boehler
19980e1ddf7SAndreas Boehler        // Filter events by user permissions
20080e1ddf7SAndreas Boehler        $userEvents = $this->hlp->filterCalendarPagesByUserPermission($data['id']);
20180e1ddf7SAndreas Boehler
202a469597cSAndreas Boehler        // Fetch the events
20380e1ddf7SAndreas Boehler        foreach($userEvents as $calPage => $color)
2046fbb086dSAndreas Boehler        {
2056fbb086dSAndreas Boehler            $events = array_merge($events, $this->hlp->getEventsWithinDateRange($calPage,
206a469597cSAndreas Boehler                                      $user, $fromStr, $toStr, $timezone));
207a469597cSAndreas Boehler
2086fbb086dSAndreas Boehler        }
209a469597cSAndreas Boehler        // Sort the events
2106fbb086dSAndreas Boehler        if($data['sort'] === 'desc')
2116fbb086dSAndreas Boehler            usort($events, array("syntax_plugin_davcal_table", "sort_events_desc"));
2126fbb086dSAndreas Boehler        else
2136fbb086dSAndreas Boehler            usort($events, array("syntax_plugin_davcal_table", "sort_events_asc"));
2146fbb086dSAndreas Boehler
215a469597cSAndreas Boehler        // Create tabular output
2166fbb086dSAndreas Boehler        $R->table_open();
2176fbb086dSAndreas Boehler        $R->tablethead_open();
2186fbb086dSAndreas Boehler        $R->tableheader_open();
2196fbb086dSAndreas Boehler        $R->doc .= $data['onlystart'] ? $this->getLang('at') : $this->getLang('from');
2206fbb086dSAndreas Boehler        $R->tableheader_close();
2216fbb086dSAndreas Boehler        if(!$data['onlystart'])
2226fbb086dSAndreas Boehler        {
2236fbb086dSAndreas Boehler            $R->tableheader_open();
2246fbb086dSAndreas Boehler            $R->doc .= $this->getLang('to');
2256fbb086dSAndreas Boehler            $R->tableheader_close();
2266fbb086dSAndreas Boehler        }
2276fbb086dSAndreas Boehler        $R->tableheader_open();
2286fbb086dSAndreas Boehler        $R->doc .= $this->getLang('title');
2296fbb086dSAndreas Boehler        $R->tableheader_close();
2306fbb086dSAndreas Boehler        $R->tableheader_open();
2316fbb086dSAndreas Boehler        $R->doc .= $this->getLang('description');
2326fbb086dSAndreas Boehler        $R->tableheader_close();
2336fbb086dSAndreas Boehler        $R->tablethead_close();
2346fbb086dSAndreas Boehler        foreach($events as $event)
2356fbb086dSAndreas Boehler        {
2366fbb086dSAndreas Boehler            $R->tablerow_open();
2376fbb086dSAndreas Boehler            $R->tablecell_open();
2386fbb086dSAndreas Boehler            $from = new \DateTime($event['start']);
23932cad826SAndreas Boehler            if($timezone !== 'local')
24032cad826SAndreas Boehler            {
241c841370aSAndreas Boehler                $from->setTimezone(new \DateTimeZone($timezone));
242c841370aSAndreas Boehler                $to->setTimezone(new \DateTimeZone($timezone));
24332cad826SAndreas Boehler            }
2447bbaf436SAndreas Boehler            if($event['allDay'] === true)
2457bbaf436SAndreas Boehler                $R->doc .= $from->format($data['alldayformat']);
2467bbaf436SAndreas Boehler            else
2476fbb086dSAndreas Boehler                $R->doc .= $from->format($data['dateformat']);
2486fbb086dSAndreas Boehler            $R->tablecell_close();
2496fbb086dSAndreas Boehler            if(!$data['onlystart'])
2506fbb086dSAndreas Boehler            {
25106f3ffd9SAndreas Boehler                $to = new \DateTime($event['end']);
25206f3ffd9SAndreas Boehler                // Fixup all day events, which have one day in excess
25306f3ffd9SAndreas Boehler                if($event['allDay'] === true)
25406f3ffd9SAndreas Boehler                {
25506f3ffd9SAndreas Boehler                    $to->sub(new \DateInterval('P1D'));
25606f3ffd9SAndreas Boehler                }
2576fbb086dSAndreas Boehler                $R->tablecell_open();
2587bbaf436SAndreas Boehler                if($event['allDay'] === true)
2597bbaf436SAndreas Boehler                    $R->doc .= $to->format($data['alldayformat']);
2607bbaf436SAndreas Boehler                else
2616fbb086dSAndreas Boehler                    $R->doc .= $to->format($data['dateformat']);
2626fbb086dSAndreas Boehler                $R->tablecell_close();
2636fbb086dSAndreas Boehler            }
2646fbb086dSAndreas Boehler            $R->tablecell_open();
2656fbb086dSAndreas Boehler            $R->doc .= $event['title'];
2666fbb086dSAndreas Boehler            $R->tablecell_close();
2676fbb086dSAndreas Boehler            $R->tablecell_open();
2686fbb086dSAndreas Boehler            $R->doc .= $event['description'];
2696fbb086dSAndreas Boehler            $R->tablecell_close();
2706fbb086dSAndreas Boehler            $R->tablerow_close();
2716fbb086dSAndreas Boehler        }
2726fbb086dSAndreas Boehler        $R->table_close();
2736fbb086dSAndreas Boehler    }
2746fbb086dSAndreas Boehler
2756fbb086dSAndreas Boehler
2766fbb086dSAndreas Boehler
2776fbb086dSAndreas Boehler}
2786fbb086dSAndreas Boehler
2796fbb086dSAndreas Boehler// vim:ts=4:sw=4:et:enc=utf-8:
280