View source for Ics.php

{{Obsolete}}

This code still needs to be cleaned up some.

*Note, this script requires: [[Drupal.login.php]]

&lt;?php<br>
<br>
include('Drupal.login.php');<br>
<br>
$ics_contents = &quot;BEGIN:VCALENDAR\n&quot;;<br>
$ics_contents .= &quot;VERSION:2.0\n&quot;;<br>
$ics_contents .= &quot;PRODID:PHP\n&quot;;<br>
$ics_contents .= &quot;METHOD:PUBLISH\n&quot;;<br>
$ics_contents .= &quot;X-WR-CALNAME:HacDC Schedule\n&quot;;<br>
<br>
<nowiki>#</nowiki> Change the timezone as well daylight settings if need be<br>
$ics_contents .= &quot;X-WR-TIMEZONE:America/New_York\n&quot;;<br>
$ics_contents .= &quot;BEGIN:VTIMEZONE\n&quot;;<br>
$ics_contents .= &quot;TZID:America/New_York\n&quot;;<br>
$ics_contents .= &quot;BEGIN:DAYLIGHT\n&quot;;<br>
$ics_contents .= &quot;TZOFFSETFROM:-0500\n&quot;;<br>
$ics_contents .= &quot;TZOFFSETTO:-0400\n&quot;;<br>
$ics_contents .= &quot;DTSTART:20070311T020000\n&quot;;<br>
$ics_contents .= &quot;RRULE:FREQ=YEARLY;BYMONTH=3;BYDAY=2SU\n&quot;;<br>
$ics_contents .= &quot;TZNAME:EDT\n&quot;;<br>
$ics_contents .= &quot;END:DAYLIGHT\n&quot;;<br>
$ics_contents .= &quot;BEGIN:STANDARD\n&quot;;<br>
$ics_contents .= &quot;TZOFFSETFROM:-0400\n&quot;;<br>
$ics_contents .= &quot;TZOFFSETTO:-0500\n&quot;;<br>
$ics_contents .= &quot;DTSTART:20071104T020000\n&quot;;<br>
$ics_contents .= &quot;RRULE:FREQ=YEARLY;BYMONTH=11;BYDAY=1SU\n&quot;;<br>
$ics_contents .= &quot;TZNAME:EST\n&quot;;<br>
$ics_contents .= &quot;END:STANDARD\n&quot;;<br>
$ics_contents .= &quot;END:VTIMEZONE\n&quot;;<br>
<br>
$events = mysql_query(&quot;SELECT <br>
node.nid AS nid,<br>
node.title AS title,<br>
node.changed as node_changed,<br>
node.type AS node_type,<br>
node.vid AS node_vid,<br>
content_field_date.field_date_value as Start, <br>
content_field_date.field_date_value2 as End<br>
FROM (node<br>
left join content_field_date on node.vid = content_field_date.vid)<br>
WHERE type = 'event'<br>
ORDER BY Start<br>
&quot;);<br>
<br>
function clean_url($desc) {<br>
$desc = html_entity_decode($desc);<br>
$desc = strip_tags($desc);<br>
$desc = ereg_replace(&quot;[^A-Za-z0-9 -|=`~!@#$%^&amp;*()_+,./?&gt;&lt;:;'{}]&quot;, &quot;&quot;, $desc );<br>
return $desc;<br>
} <br>
<br>
while ($schedule_details = mysql_fetch_assoc($events)) {<br>
<br>
if (date('T', strtotime($schedule_details['Start'])) == &quot;EDT&quot;) {<br>
$Offset = 4*60*60;<br>
} else {<br>
$Offset = 5*60*60;<br>
}<br>
$Start = strtotime($schedule_details['Start'])-$Offset;<br>
$End = strtotime($schedule_details['End'])-$Offset;<br>
<br>
<br>
$desc1 = mysql_query(&quot;SELECT * from node_revisions<br>
WHERE <br>
nid = '&quot;.$schedule_details['nid'].&quot;' and <br>
vid = '&quot;.$schedule_details['node_vid'].&quot;'&quot;);<br>
<br>
$desc1 = mysql_fetch_assoc($desc1);<br>
<br>
$Yr = date(Y,$Start);<br>
$Mo = date(m,$Start);<br>
$Day = date(d,$Start);<br>
$Hr = date(H,$Start);<br>
$Min = date(i,$Start);<br>
$Yr1 = date(Y,$End);<br>
$Mo1 = date(m,$End);<br>
$Day1 = date(d,$End);<br>
$Hr1 = date(H,$End);<br>
$Min1 = date(i,$End);<br>
<br>
$id = $schedule_details['nid'];<br>
$start_date = $Yr.&quot;-&quot;.$Mo.&quot;-&quot;.$Day;<br>
$start_time = $Hr.&quot;:&quot;.$Min.&quot;:00&quot;;<br>
$end_date = $Yr1.&quot;-&quot;.$Mo1.&quot;-&quot;.$Day1;<br>
$end_time = $Hr1.&quot;:&quot;.$Min1.&quot;:00&quot;; <br>
<br>
$category = &quot;HacDC&quot;;<br>
$name = $schedule_details['title'];<br>
$location = &quot;1525 Newton St NW, Washington DC 20010 (Near corner of 16th and Newton NW)&quot;;<br>
$description = clean_url(strip_tags($desc1['body']));<br>
<br>
<nowiki>#</nowiki> Remove '-' in $start_date and $end_date<br>
$estart_date = str_replace(&quot;-&quot;, &quot;&quot;, $start_date);<br>
$eend_date = str_replace(&quot;-&quot;, &quot;&quot;, $end_date);<br>
<br>
<nowiki>#</nowiki> Remove ':' in $start_time and $end_time<br>
$estart_time = str_replace(&quot;:&quot;, &quot;&quot;, $start_time);<br>
$eend_time = str_replace(&quot;:&quot;, &quot;&quot;, $end_time);<br>
<br>
<nowiki>#</nowiki> Replace some HTML tags<br>
$name = str_replace(&quot;&lt;br&gt;&quot;, &quot;\\r\\n&quot;, $name);<br>
$name = str_replace(&quot;&amp;amp;&quot;, &quot;&amp;&quot;, $name);<br>
$name = str_replace(&quot;&amp;rarr;&quot;, &quot;--&gt;&quot;, $name);<br>
$name = str_replace(&quot;&amp;larr;&quot;, &quot;&lt;--&quot;, $name);<br>
$name = str_replace(&quot;,&quot;, &quot;\\,&quot;, $name);<br>
$name = str_replace(&quot;;&quot;, &quot;\\;&quot;, $name);<br>
<br>
$location = str_replace(&quot;&lt;br&gt;&quot;, &quot;\\r\\n&quot;, $location);<br>
$location = str_replace(&quot;&amp;amp;&quot;, &quot;&amp;&quot;, $location);<br>
$location = str_replace(&quot;&amp;rarr;&quot;, &quot;--&gt;&quot;, $location);<br>
$location = str_replace(&quot;&amp;larr;&quot;, &quot;&lt;--&quot;, $location);<br>
$location = str_replace(&quot;,&quot;, &quot;\\,&quot;, $location);<br>
$location = str_replace(&quot;;&quot;, &quot;\\;&quot;, $location);<br>
<br>
$description = str_replace(&quot;&lt;br&gt;&quot;, &quot;\\r\\n&quot;, $description);<br>
$description = str_replace(&quot;&amp;amp;&quot;, &quot;&amp;&quot;, $description);<br>
$description = str_replace(&quot;&amp;rarr;&quot;, &quot;--&gt;&quot;, $description);<br>
$description = str_replace(&quot;&amp;larr;&quot;, &quot;&lt;--&quot;, $description);<br>
$description = str_replace(&quot;&lt;em&gt;&quot;, &quot;&quot;, $description);<br>
$description = str_replace(&quot;&lt;/em&gt;&quot;, &quot;&quot;, $description);<br>
<br>
<nowiki>#</nowiki> Change TZID if need be<br>
$ics_contents .= &quot;BEGIN:VEVENT\r\n&quot;;<br>
$ics_contents .= &quot;DTSTART;TZID=America/New_York:&quot; . $estart_date . &quot;T&quot;. 
$estart_time . &quot;\r\n&quot;;<br>
$ics_contents .= &quot;DTEND;TZID=America/New_York:&quot; . $eend_date . &quot;T&quot;. $eend_time . 
&quot;\r\n&quot;;<br>
$ics_contents .= &quot;DTSTAMP:&quot; . date('Ymd') . &quot;T&quot;. date('His') . &quot;Z\r\n&quot;;<br>
$ics_contents .= &quot;SUMMARY:&quot; . $name . &quot;\r\n&quot;;<br>
$ics_contents .= &quot;LOCATION:&quot; . $location . &quot;\r\n&quot;;<br>
$ics_contents .= &quot;DESCRIPTION:&quot; . $description . &quot;\r\n&quot;;<br>
$ics_contents .= &quot;UID:&quot; . $id .rand(0,9999). &quot;\r\n&quot;;<br>
$ics_contents .= &quot;SEQUENCE:0\r\n&quot;;<br>
$ics_contents .= &quot;END:VEVENT\r\n&quot;;<br>
}<br>
$ics_contents .= &quot;END:VCALENDAR\r\n&quot;;<br>
<br>
echo $ics_contents;<br>