From 7c4a55d1333be08bc64c67a6b8994faec5ebef3f Mon Sep 17 00:00:00 2001
From: Lars Kneschke <lkeschke@alumni.egroupware.org>
Date: Mon, 20 Jun 2005 09:51:54 +0000
Subject: [PATCH] class which handles vcal import into infolog

---
 infolog/inc/class.vcalinfolog.inc.php | 156 ++++++++++++++++++++++++++
 1 file changed, 156 insertions(+)
 create mode 100644 infolog/inc/class.vcalinfolog.inc.php

diff --git a/infolog/inc/class.vcalinfolog.inc.php b/infolog/inc/class.vcalinfolog.inc.php
new file mode 100644
index 0000000000..8b2dd6f5d8
--- /dev/null
+++ b/infolog/inc/class.vcalinfolog.inc.php
@@ -0,0 +1,156 @@
+<?php
+	/**************************************************************************\
+	* eGroupWare - iCalendar Parser                                            *
+	* http://www.egroupware.org                                                *
+	* Written by Lars Kneschke <lkneschke@egroupware.org>                      *
+	* --------------------------------------------                             *
+	*  This program is free software; you can redistribute it and/or modify it *
+	*  under the terms of the GNU General Public License as published by the   *
+	*  Free Software Foundation; either version 2 of the License.              *
+	\**************************************************************************/
+
+	/* $Id$ */
+
+	require_once PHPGW_SERVER_ROOT.'/infolog/inc/class.boinfolog.inc.php';
+	require_once PHPGW_SERVER_ROOT.'/phpgwapi/inc/horde/Horde/iCalendar.php';
+
+	class vcalinfolog extends boinfolog
+	{
+		function exportVTODO($_taskID, $_version)
+		{
+			$taskData = $this->read($_taskID);
+			
+			_debug_array($taskData);
+			
+			$taskGUID = $GLOBALS['phpgw']->common->generate_uid('infolog_task',$_taskID);
+			#print "<br>";
+			#print $GLOBALS['phpgw']->contenthistory->getTSforAction($eventGUID,'add');
+			#print "<br>";
+			
+			$vcal = &new Horde_iCalendar;
+			$vcal->setAttribute('VERSION',$_version);
+			$vcal->setAttribute('METHOD','PUBLISH');
+			
+			$vevent = Horde_iCalendar::newComponent('VTODO',$vcal);
+			
+			$options = array();
+			
+			$vevent->setAttribute('SUMMARY',$taskData['info_subject']);
+			$vevent->setAttribute('DESCRIPTION',$taskData['info_des']);
+			if($taskData['info_startdate'])
+				$vevent->setAttribute('DTSTART',$taskData['info_startdate']);
+			if($taskData['info_enddate'])
+				$vevent->setAttribute('DUE',$taskData['info_enddate']);
+			$vevent->setAttribute('DTSTAMP',time());
+			$vevent->setAttribute('CREATED',$GLOBALS['phpgw']->contenthistory->getTSforAction($eventGUID,'add'));
+			$vevent->setAttribute('LAST-MODIFIED',$GLOBALS['phpgw']->contenthistory->getTSforAction($eventGUID,'modify'));
+			$vevent->setAttribute('UID',$taskGUID);
+			$vevent->setAttribute('CLASS',(($taskData['info_access'] == 'public')?'PUBLIC':'PRIVATE'));
+			$vevent->setAttribute('STATUS',(($taskData['info_status'] == 'completed')?'COMPLETED':'NEEDS-ACTION'));
+			switch($taskData['info_pri'])
+			{
+				case 'urgent':
+					$vevent->setAttribute('PRIORITY',1);
+					break;
+				case 'high':
+					$vevent->setAttribute('PRIORITY',2);
+					break;
+				case 'normal':
+					$vevent->setAttribute('PRIORITY',3);
+					break;
+				case 'low':
+					$vevent->setAttribute('PRIORITY',4);
+					break;
+					
+			}
+			#$vevent->setAttribute('TRANSP','OPAQUE');
+			# status
+			# ATTENDEE
+			
+			$options = array('CHARSET' => 'UTF-8','ENCODING' => 'QUOTED-PRINTABLE');
+			$vevent->setParameter('SUMMARY', $options);
+			$vevent->setParameter('DESCRIPTION', $options);
+			
+			$vcal->addComponent($vevent);
+			
+			#print "<pre>";
+			#print $vcal->exportvCalendar();
+			#print "</pre>";
+			
+			return $vcal->exportvCalendar();
+		}
+		
+		function importVTODO(&$_vcalData, $_taskID=-1)
+		{
+			$botranslation  = CreateObject('phpgwapi.translation');
+			
+			$vcal = &new Horde_iCalendar;
+			if(!$vcal->parsevCalendar($_vcalData))
+			{
+				return FALSE;
+			}
+			$components = $vcal->getComponents();
+			if(count($components) > 0)
+			{
+				$component = $components[0];
+				if(is_a($component, 'Horde_iCalendar_vtodo'))
+				{
+					if($_taskID>0)
+						$taskData['info_id'] = $_taskID;
+					
+					foreach($component->_attributes as $attributes)
+					{
+						#print $attributes['name'].' - '.$attributes['value'].'<br>';
+						switch($attributes['name'])
+						{
+							case 'CLASS':
+								$taskData['info_access']	= strtolower($attributes['value']);
+								break;
+							case 'DESCRIPTION':
+								$taskData['info_des']		= $botranslation->convert($attributes['value'],'utf-8');
+								break;
+							case 'DUE':
+								$taskData['info_enddate']		= $attributes['value'];
+								break;
+							case 'DTSTART':
+								$taskData['info_startdate']		= $attributes['value'];
+								break;
+							case 'PRIORITY':
+								switch($attributes['value'])
+								{
+									case '1':
+										$taskData['info_pri']		= 'urgent';
+										break;
+									case '2':
+										$taskData['info_pri']		= 'high';
+										break;
+									case '3':
+										$taskData['info_pri']		= 'normal';
+										break;
+									case '4':
+										$taskData['info_pri']		= 'low';
+										break;
+									default:
+										$taskData['info_pri']		= 'low';
+										break;
+								}
+								break;
+							case 'STATUS':
+								$taskData['info_status']		= (strtolower($attributes['value']) == 'completed') ? 'done' : 'ongoing';
+								break;
+							case 'SUMMARY':
+								$taskData['info_subject']		= $attributes['value'];
+								break;
+						}
+					}
+					#_debug_array($eventData);exit;
+					return $this->write($taskData);
+				}
+			}
+			
+			return FALSE;
+		}
+		
+		
+	}
+?>