+ $bd_format = t('l F d, Y \@ g:i A') ; // Friday January 18, 2011 @ 8 AM
+
+ $event_start = (($ev['adjust']) ? day_translate(datetime_convert('UTC', date_default_timezone_get(),
+ $ev['start'] , $bd_format ))
+ : day_translate(datetime_convert('UTC', 'UTC',
+ $ev['start'] , $bd_format)));
+
+ $event_end = (($ev['adjust']) ? day_translate(datetime_convert('UTC', date_default_timezone_get(),
+ $ev['finish'] , $bd_format ))
+ : day_translate(datetime_convert('UTC', 'UTC',
+ $ev['finish'] , $bd_format )));
+
+ if ($simple) {
+ $o = "<h3>".bbcode($ev['summary'])."</h3>";
+
+ $o .= "<p>".bbcode($ev['desc'])."</p>";
+
+ $o .= "<h4>".t('Starts:')."</h4><p>".$event_start."</p>";
+
+ if(! $ev['nofinish'])
+ $o .= "<h4>".t('Finishes:')."</h4><p>".$event_end."</p>";
+
+ if(strlen($ev['location']))
+ $o .= "<h4>".t('Location:')."</h4><p>".$ev['location']."</p>";
+
+ return $o;
+ }
+
+ $o = '<div class="vevent">' . "\r\n";
+
+
+ $o .= '<p class="summary event-summary">' . bbcode($ev['summary']) . '</p>' . "\r\n";
+
+ $o .= '<p class="description event-description">' . bbcode($ev['desc']) . '</p>' . "\r\n";
+
+ $o .= '<p class="event-start">' . t('Starts:') . ' <abbr class="dtstart" title="'
+ . datetime_convert('UTC','UTC',$ev['start'], (($ev['adjust']) ? ATOM_TIME : 'Y-m-d\TH:i:s' ))
+ . '" >'.$event_start
+ . '</abbr></p>' . "\r\n";
+
+ if(! $ev['nofinish'])
+ $o .= '<p class="event-end" >' . t('Finishes:') . ' <abbr class="dtend" title="'
+ . datetime_convert('UTC','UTC',$ev['finish'], (($ev['adjust']) ? ATOM_TIME : 'Y-m-d\TH:i:s' ))
+ . '" >'.$event_end
+ . '</abbr></p>' . "\r\n";
+
+ if(strlen($ev['location'])){
+ $o .= '<p class="event-location"> ' . t('Location:') . ' <span class="location">'
+ . bbcode($ev['location'])
+ . '</span></p>' . "\r\n";
+
+ if (strpos($ev['location'], "[map") !== False) {
+ $map = generate_named_map($ev['location']);
+ if ($map!==$ev['location']) $o.=$map;
+ }
+
+ }
+
+ $o .= '</div>' . "\r\n";
+ return $o;
+}
+
+/*
+function parse_event($h) {
+
+ require_once('include/Scrape.php');
+ require_once('include/html2bbcode');
+
+ $h = '<html><body>' . $h . '</body></html>';
+
+ $ret = array();
+
+
+ try {
+ $dom = HTML5_Parser::parse($h);
+ } catch (DOMException $e) {
+ logger('parse_event: parse error: ' . $e);
+ }
+
+ if(! $dom)
+ return $ret;
+
+ $items = $dom->getElementsByTagName('*');
+
+ foreach($items as $item) {
+ if(attribute_contains($item->getAttribute('class'), 'vevent')) {
+ $level2 = $item->getElementsByTagName('*');
+ foreach($level2 as $x) {
+ if(attribute_contains($x->getAttribute('class'),'dtstart') && $x->getAttribute('title')) {
+ $ret['start'] = $x->getAttribute('title');
+ if(! strpos($ret['start'],'Z'))
+ $ret['adjust'] = true;
+ }
+ if(attribute_contains($x->getAttribute('class'),'dtend') && $x->getAttribute('title'))
+ $ret['finish'] = $x->getAttribute('title');
+
+ if(attribute_contains($x->getAttribute('class'),'description'))
+ $ret['desc'] = $x->textContent;
+ if(attribute_contains($x->getAttribute('class'),'location'))
+ $ret['location'] = $x->textContent;
+ }
+ }
+ }
+
+ // sanitise
+
+ if((x($ret,'desc')) && ((strpos($ret['desc'],'<') !== false) || (strpos($ret['desc'],'>') !== false))) {
+ $config = HTMLPurifier_Config::createDefault();
+ $config->set('Cache.DefinitionImpl', null);
+ $purifier = new HTMLPurifier($config);
+ $ret['desc'] = html2bbcode($purifier->purify($ret['desc']));
+ }
+
+ if((x($ret,'location')) && ((strpos($ret['location'],'<') !== false) || (strpos($ret['location'],'>') !== false))) {
+ $config = HTMLPurifier_Config::createDefault();
+ $config->set('Cache.DefinitionImpl', null);
+ $purifier = new HTMLPurifier($config);
+ $ret['location'] = html2bbcode($purifier->purify($ret['location']));
+ }
+
+ if(x($ret,'start'))
+ $ret['start'] = datetime_convert('UTC','UTC',$ret['start']);
+ if(x($ret,'finish'))
+ $ret['finish'] = datetime_convert('UTC','UTC',$ret['finish']);
+
+ return $ret;
+}
+*/
+
+function format_event_bbcode($ev) {
+
+ $o = '';
+
+ if($ev['summary'])
+ $o .= '[event-summary]' . $ev['summary'] . '[/event-summary]';
+
+ if($ev['desc'])
+ $o .= '[event-description]' . $ev['desc'] . '[/event-description]';
+
+ if($ev['start'])
+ $o .= '[event-start]' . $ev['start'] . '[/event-start]';
+
+ if(($ev['finish']) && (! $ev['nofinish']))
+ $o .= '[event-finish]' . $ev['finish'] . '[/event-finish]';
+
+ if($ev['location'])
+ $o .= '[event-location]' . $ev['location'] . '[/event-location]';
+
+ if($ev['adjust'])
+ $o .= '[event-adjust]' . $ev['adjust'] . '[/event-adjust]';
+
+
+ return $o;
+
+}
+
+function bbtovcal($s) {
+ $o = '';
+ $ev = bbtoevent($s);
+ if($ev['desc'])
+ $o = format_event_html($ev);
+ return $o;
+}
+
+
+function bbtoevent($s) {
+
+ $ev = array();
+
+ $match = '';
+ if(preg_match("/\[event\-summary\](.*?)\[\/event\-summary\]/is",$s,$match))
+ $ev['summary'] = $match[1];
+ $match = '';
+ if(preg_match("/\[event\-description\](.*?)\[\/event\-description\]/is",$s,$match))
+ $ev['desc'] = $match[1];
+ $match = '';
+ if(preg_match("/\[event\-start\](.*?)\[\/event\-start\]/is",$s,$match))
+ $ev['start'] = $match[1];
+ $match = '';
+ if(preg_match("/\[event\-finish\](.*?)\[\/event\-finish\]/is",$s,$match))
+ $ev['finish'] = $match[1];
+ $match = '';
+ if(preg_match("/\[event\-location\](.*?)\[\/event\-location\]/is",$s,$match))
+ $ev['location'] = $match[1];
+ $match = '';
+ if(preg_match("/\[event\-adjust\](.*?)\[\/event\-adjust\]/is",$s,$match))
+ $ev['adjust'] = $match[1];
+ $ev['nofinish'] = (((x($ev, 'start') && $ev['start']) && (!x($ev, 'finish') || !$ev['finish'])) ? 1 : 0);
+ return $ev;
+
+}
+
+
+function sort_by_date($a) {
+
+ usort($a,'ev_compare');
+ return $a;
+}
+