<?php
	/***************************************************************************\
	* eGroupWare - FeLaMiMail                                                   *
	* http://www.linux-at-work.de                                               *
	* http://www.phpgw.de                                                       *
	* http://www.egroupware.org                                                 *
	* Written by : Lars Kneschke [lkneschke@linux-at-work.de]                   *
	* -------------------------------------------------                         *
	* 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; version 2 of the License.                       *
	\***************************************************************************/
	/* $Id$ */

	class bocompose
	{
		var $public_functions = array
		(
			'addAtachment'	=> True,
			'action'	=> True
		);

		var $attachments;	// Array of attachments
		var $preferences;	// the prefenrences(emailserver, username, ...)
		var $preferencesArray;
		var $bofelamimail;
		var $bopreferences;
		var $bosignatures;
		var $displayCharset;
		var $sessionData;

		function bocompose($_composeID = '', $_charSet = 'iso-8859-1', &$mailObject=null)
		{
			$profileID = 0;
			if (isset($GLOBALS['egw_info']['user']['preferences']['felamimail']['ActiveProfileID']))
					$profileID = (int)$GLOBALS['egw_info']['user']['preferences']['felamimail']['ActiveProfileID'];
			$this->displayCharset	= strtolower($_charSet);
			$this->bosignatures	= new felamimail_bosignatures();
			if (!is_null($mailObject))
			{
				$this->bofelamimail	=& $mailObject;
			} else {
				$this->bofelamimail	=& felamimail_bo::getInstance(true,$profileID);
			}
			$profileID = $GLOBALS['egw_info']['user']['preferences']['felamimail']['ActiveProfileID'] = $this->bofelamimail->profileID;
			$this->bopreferences =& $this->bofelamimail->bopreferences;
			$this->preferences	=& $this->bofelamimail->mailPreferences; // $this->bopreferences->getPreferences();
			// we should get away from this $this->preferences->preferences should hold the same info
			$this->preferencesArray =& $this->preferences->preferences; //$GLOBALS['egw_info']['user']['preferences']['felamimail'];
			//force the default for the forwarding -> asmail
			if (is_array($this->preferencesArray)) {
				if (!array_key_exists('message_forwarding',$this->preferencesArray)
					|| !isset($this->preferencesArray['message_forwarding'])
					|| empty($this->preferencesArray['message_forwarding'])) $this->preferencesArray['message_forwarding'] = 'asmail';
			} else {
				$this->preferencesArray['message_forwarding'] = 'asmail';
			}
			if (is_null(felamimail_bo::$felamimailConfig)) felamimail_bo::$felamimailConfig = config::read('felamimail');
			// check if there is a composeid set, and restore the session, if so
			if (!empty($_composeID))
			{
				$this->composeID = $_composeID;
				$this->restoreSessionData();
			}
			else	// new email
			{
				$this->setDefaults();
			}
		}

		/**
		 * adds uploaded files or files in eGW's temp directory as attachments
		 *
		 * It also stores the given data in the session
		 *
		 * @param array $_formData fields of the compose form (to,cc,bcc,reply_to,subject,body,priority,signature), plus data of the file (name,file,size,type)
		 */
		function addAttachment($_formData,$eliminateDoubleAttachments=false)
		{
			$attachfailed = false;
			// to guard against exploits the file must be either uploaded or be in the temp_dir
			// check if formdata meets basic restrictions (in tmp dir, or vfs, mimetype, etc.)
			try
			{
				$tmpFileName = felamimail_bo::checkFileBasics($_formData,$this->composeID,false);
			}
			catch (egw_exception_wrong_userinput $e)
			{
				$attachfailed = true;
				$alert_msg = $e->getMessage();
			}

			if ($eliminateDoubleAttachments == true)
				foreach ((array)$this->sessionData['attachments'] as $k =>$attach)
					if ($attach['name'] && $attach['name'] == $_formData['name'] &&
						strtolower($_formData['type'])== strtolower($attach['type']) &&
						stripos($_formData['file'],'vfs://') !== false) return;

			if ($attachfailed === false)
			{
				$buffer = array(
					'name'	=> $_formData['name'],
					'type'	=> $_formData['type'],
					'file'	=> $tmpFileName,
					'size'	=> $_formData['size']
				);
				// trying different ID-ing Method, as getRandomString seems to produce non Random String on certain systems.
				$attachmentID = md5(time().serialize($buffer));
				//error_log(__METHOD__." add Attachment with ID:".$attachmentID." (md5 of serialized array)");
				if (!is_array($this->sessionData['attachments'])) $this->sessionData['attachments']=array();
				$this->sessionData['attachments'][$attachmentID] = $buffer;
				unset($buffer);
			}
			else
			{
				error_log(__METHOD__.__LINE__.array2string($alert_msg));
			}

			$this->saveSessionData();
			//print"<pre>";
			//error_log(__METHOD__.__LINE__.print_r($this->sessionData,true));
			//print"</pre>";exit;
		}

		function addMessageAttachment($_uid, $_partID, $_folder, $_name, $_type, $_size)
		{
			$this->sessionData['attachments'][]=array (
				'uid'		=> $_uid,
				'partID'	=> $_partID,
				'name'		=> $_name,
				'type'		=> $_type,
				'size'		=> $_size,
				'folder'	=> $_folder
			);
			$this->saveSessionData();
		}

		/**
		* replace emailaddresses eclosed in <> (eg.: <me@you.de>) with the emailaddress only (e.g: me@you.de)
		* always returns 1
		*/
		static function replaceEmailAdresses(&$text)
		{
			// replace emailaddresses eclosed in <> (eg.: <me@you.de>) with the emailaddress only (e.g: me@you.de)
			felamimail_bo::replaceEmailAdresses($text);
			return 1;
		}

		function convertHTMLToText(&$_html,$sourceishtml = true, $stripcrl=false)
		{
			$stripalltags = true;
			// third param is stripalltags, we may not need that, if the source is already in ascii
			if (!$sourceishtml) $stripalltags=false;
			return felamimail_bo::convertHTMLToText($_html,$stripcrl,$stripalltags);
		}

		function convertHTMLToTextTiny($_html)
		{
			print "<pre>"; print htmlspecialchars($_html); print "</pre>";
			// remove these tags and any spaces behind the tags
			$search = array('/<p.*?> */', '/<.?strong>/', '/<.?em>/', '/<.?u>/', '/<.?ul> */', '/<.?ol> */', '/<.?font.*?> */', '/<.?blockquote> */');
			$replace = '';
			$text = preg_replace($search, $replace, $_html);

			// convert these tags and any spaces behind the tags to line breaks
			$search = array('/<\/li> */', '/<br \/> */');
			$replace = "\r\n";
			$text = preg_replace($search, $replace, $text);

			// convert these tags and any spaces behind the tags to double line breaks
			$search = array('/&nbsp;<\/p> */', '/<\/p> */');
			$replace = "\r\n\r\n";
			$text = preg_replace($search, $replace, $text);

			// special replacements
			$search = array('/<li>/');
			$replace = array('  * ');

			$text = preg_replace($search, $replace, $text);

			$text = html_entity_decode($text, ENT_COMPAT, $this->displayCharset);

			print "<pre>"; print htmlspecialchars($text); print "</pre>"; exit;

			return $text;
		}

		function generateRFC822Address($_addressObject)
		{
			if(!empty($_addressObject->personal) && !empty($_addressObject->mailbox) && !empty($_addressObject->host)) {
				return sprintf('"%s" <%s@%s>', $this->bofelamimail->decode_header($_addressObject->personal), $_addressObject->mailbox, $this->bofelamimail->decode_header($_addressObject->host,'FORCE'));
			} elseif(!empty($_addressObject->mailbox) && !empty($_addressObject->host)) {
				return sprintf("%s@%s", $_addressObject->mailbox, $this->bofelamimail->decode_header($_addressObject->host,'FORCE'));
			} else {
				return $this->bofelamimail->decode_header($_addressObject->mailbox,true);
			}
		}

		// create a hopefully unique id, to keep track of different compose windows
		// if you do this, you are creating a new email
		function getComposeID()
		{
			$this->composeID = $this->getRandomString();

			$this->setDefaults();

			return $this->composeID;
		}

		// $_mode can be:
		// single: for a reply to one address
		// all: for a reply to all
		function getDraftData($_icServer, $_folder, $_uid, $_partID=NULL)
		{
			$this->sessionData['to'] = array();

			$bofelamimail =& $this->bofelamimail;
			$existingConnection = $bofelamimail->icServer->_connected;
			if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
			$bofelamimail->reopen($_folder);

			// the array $userEMailAddresses was used for filtering out emailaddresses that are owned by the user, for draft data we should not do this
			//$userEMailAddresses = $this->preferences->getUserEMailAddresses();
			//error_log(__METHOD__.__LINE__.array2string($userEMailAddresses));

			// get message headers for specified message
			#$headers	= $bofelamimail->getMessageHeader($_folder, $_uid);
			$headers	= $bofelamimail->getMessageEnvelope($_uid, $_partID);
			$addHeadInfo = $bofelamimail->getMessageHeader($_uid, $_partID);
			//error_log(__METHOD__.__LINE__.array2string($headers));
			if (!empty($addHeadInfo['X-MAILFOLDER'])) {
				foreach ( explode('|',$addHeadInfo['X-MAILFOLDER']) as $val ) {
					$this->sessionData['folder'][] = $val;
				}
			}
			if (!empty($addHeadInfo['X-SIGNATURE'])) {
				$this->sessionData['signatureID'] = $addHeadInfo['X-SIGNATURE'];
			}
			if (!empty($addHeadInfo['X-STATIONERY'])) {
				$this->sessionData['stationeryID'] = $addHeadInfo['X-STATIONERY'];
			}
			if (!empty($addHeadInfo['X-IDENTITY'])) {
				$this->sessionData['identity'] = $addHeadInfo['X-IDENTITY'];
			}
			// if the message is located within the draft folder, add it as last drafted version (for possible cleanup on abort))
			if ($bofelamimail->isDraftFolder($_folder)) $this->sessionData['lastDrafted'] = array('uid'=>$_uid,'folder'=>$_folder);
			$this->sessionData['uid'] = $_uid;
			$this->sessionData['messageFolder'] = $_folder;
			$this->sessionData['isDraft'] = true;
			foreach((array)$headers['CC'] as $val) {
				if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
					continue;
				}

				//if($userEMailAddresses[$val['EMAIL']]) {
				//	continue;
				//}

				if(!$foundAddresses[$val['EMAIL']]) {
					$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
					$address = $this->bofelamimail->decode_header($address,true);
					$this->sessionData['cc'][] = $address;
					$foundAddresses[$val['EMAIL']] = true;
				}
			}

			foreach((array)$headers['TO'] as $val) {
				if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
					continue;
				}

				//if($userEMailAddresses[$val['EMAIL']]) {
				//	continue;
				//}

				if(!$foundAddresses[$val['EMAIL']]) {
					$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
					$address = $this->bofelamimail->decode_header($address,true);
					$this->sessionData['to'][] = $address;
					$foundAddresses[$val['EMAIL']] = true;
				}
			}

			foreach((array)$headers['REPLY_TO'] as $val) {
				if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
					continue;
				}

				//if($userEMailAddresses[$val['EMAIL']]) {
				//	continue;
				//}

				if(!$foundAddresses[$val['EMAIL']]) {
					$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
					$address = $this->bofelamimail->decode_header($address,true);
					$this->sessionData['replyto'][] = $address;
					$foundAddresses[$val['EMAIL']] = true;
				}
			}

			foreach((array)$headers['BCC'] as $val) {
				if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
					continue;
				}

				//if($userEMailAddresses[$val['EMAIL']]) {
				//	continue;
				//}

				if(!$foundAddresses[$val['EMAIL']]) {
					$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
					$address = $this->bofelamimail->decode_header($address,true);
					$this->sessionData['bcc'][] = $address;
					$foundAddresses[$val['EMAIL']] = true;
				}
			}

			$this->sessionData['subject']	= $bofelamimail->decode_header($headers['SUBJECT']);
			// remove a printview tag if composing
			$searchfor = '/^\['.lang('printview').':\]/';
			$this->sessionData['subject'] = preg_replace($searchfor,'',$this->sessionData['subject']);
			$bodyParts = $bofelamimail->getMessageBody($_uid, $this->preferencesArray['always_display'], $_partID);
			//_debug_array($bodyParts);
			#$fromAddress = ($headers['FROM'][0]['PERSONAL_NAME'] != 'NIL') ? $headers['FROM'][0]['RFC822_EMAIL'] : $headers['FROM'][0]['EMAIL'];
			if($bodyParts['0']['mimeType'] == 'text/html') {
				$this->sessionData['mimeType'] 	= 'html';

				for($i=0; $i<count($bodyParts); $i++) {
					if($i>0) {
						$this->sessionData['body'] .= '<hr>';
					}
					if($bodyParts[$i]['mimeType'] == 'text/plain') {
						#$bodyParts[$i]['body'] = nl2br($bodyParts[$i]['body']);
						$bodyParts[$i]['body'] = "<pre>".$bodyParts[$i]['body']."</pre>";
					}
					if ($bodyParts[$i]['charSet']===false) $bodyParts[$i]['charSet'] = felamimail_bo::detect_encoding($bodyParts[$i]['body']);
					$bodyParts[$i]['body'] = translation::convert($bodyParts[$i]['body'], $bodyParts[$i]['charSet']);
					#error_log( "GetDraftData (HTML) CharSet:".mb_detect_encoding($bodyParts[$i]['body'] . 'a' , strtoupper($bodyParts[$i]['charSet']).','.strtoupper($this->displayCharset).',UTF-8, ISO-8859-1'));
					$this->sessionData['body'] .= ($i>0?"<br>":""). $bodyParts[$i]['body'] ;
				}

			} else {
				$this->sessionData['mimeType']	= 'plain';

				for($i=0; $i<count($bodyParts); $i++) {
					if($i>0) {
						$this->sessionData['body'] .= "<hr>";
					}
					if ($bodyParts[$i]['charSet']===false) $bodyParts[$i]['charSet'] = felamimail_bo::detect_encoding($bodyParts[$i]['body']);
					$bodyParts[$i]['body'] = translation::convert($bodyParts[$i]['body'], $bodyParts[$i]['charSet']);
					#error_log( "GetDraftData (Plain) CharSet".mb_detect_encoding($bodyParts[$i]['body'] . 'a' , strtoupper($bodyParts[$i]['charSet']).','.strtoupper($this->displayCharset).',UTF-8, ISO-8859-1'));
					$this->sessionData['body'] .= ($i>0?"\r\n":""). $bodyParts[$i]['body'] ;
				}
			}

			if($attachments = $bofelamimail->getMessageAttachments($_uid,$_partID)) {
				foreach($attachments as $attachment) {
					$this->addMessageAttachment($_uid, $attachment['partID'],
						$_folder,
						$attachment['name'],
						$attachment['mimeType'],
						$attachment['size']);
				}
			}
			if (!$existingConnection) $bofelamimail->closeConnection(); // close our own, if not established before

			$this->saveSessionData();
		}

		function getErrorInfo()
		{
			if(isset($this->errorInfo)) {
				$errorInfo = $this->errorInfo;
				unset($this->errorInfo);
				return $errorInfo;
			}
			return false;
		}

		function getForwardData($_icServer, $_folder, $_uid, $_partID, $_mode=false)
		{
			if ($_mode)
			{
				$modebuff = $this->preferencesArray['message_forwarding'];
				$this->preferencesArray['message_forwarding'] = $_mode;
			}
			if  ($this->preferencesArray['message_forwarding'] == 'inline') {
				$this->getReplyData('forward', $_icServer, $_folder, $_uid, $_partID);
			}
			$bofelamimail    = $this->bofelamimail;
			$existingConnection = $bofelamimail->icServer->_connected;
			if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
			$bofelamimail->reopen($_folder);

			// get message headers for specified message
			$headers	= $bofelamimail->getMessageEnvelope($_uid, $_partID);

			//_debug_array($headers); exit;
			// check for Re: in subject header
			$this->sessionData['subject'] 	= "[FWD] " . $bofelamimail->decode_header($headers['SUBJECT']);
			$this->sessionData['sourceFolder']=$_folder;
			$this->sessionData['forwardFlag']='forwarded';
			$this->sessionData['forwardedUID']=$_uid;
			if  ($this->preferencesArray['message_forwarding'] == 'asmail') {
				$this->sessionData['mimeType']  = $this->preferencesArray['composeOptions'];
				if($headers['SIZE'])
					$size				= $headers['SIZE'];
				else
					$size				= lang('unknown');

				$this->addMessageAttachment($_uid, $_partID, $_folder,
					$bofelamimail->decode_header(($headers['SUBJECT']?$headers['SUBJECT']:lang('no subject'))),
					'MESSAGE/RFC822', $size);
			}
			else
			{
				unset($this->sessionData['in-reply-to']);
				unset($this->sessionData['to']);
				unset($this->sessionData['cc']);
				if($attachments = $bofelamimail->getMessageAttachments($_uid,$_partID)) {
					foreach($attachments as $attachment) {
						$this->addMessageAttachment($_uid, $attachment['partID'],
							$_folder,
							$attachment['name'],
							$attachment['mimeType'],
							$attachment['size']);
					}
				}
			}
			if (!$existingConnection) $bofelamimail->closeConnection(); // close our own, if not established before
			if ($_mode)
			{
				$this->preferencesArray['message_forwarding'] = $modebuff;
			}
			$this->saveSessionData();
		}

		/**
		 * getRandomString - function to be used to fetch a random string and md5 encode that one
		 * @param none
		 * @return string - a random number which is md5 encoded
		 */
		function getRandomString() {
			return felamimail_bo::getRandomString();
		}

		/**
		 * getReplyData - function to gather the replyData and save it with the session, to be used then.
		 * @param $_mode can be:
		 * 		single: for a reply to one address
		 * 		all: for a reply to all
		 * 		forward: inlineforwarding of a message with its attachments
		 * @param $_icServer number (0 as it is the active Profile)
		 * @param $_folder string
		 * @param $_uid number
		 * @param $_partID number
		 */
		function getReplyData($_mode, $_icServer, $_folder, $_uid, $_partID)
		{
			$foundAddresses = array();

			$bofelamimail    =& $this->bofelamimail;
			$existingConnection = $bofelamimail->icServer->_connected;
			if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
			$bofelamimail->reopen($_folder);

			$userEMailAddresses = $this->preferences->getUserEMailAddresses();

			// get message headers for specified message
			#print "AAAA: $_folder, $_uid, $_partID<br>";
			$headers	= $bofelamimail->getMessageEnvelope($_uid, $_partID);
			#$headers	= $bofelamimail->getMessageHeader($_uid, $_partID);
			$this->sessionData['uid'] = $_uid;
			$this->sessionData['messageFolder'] = $_folder;
			$this->sessionData['in-reply-to'] = $headers['MESSAGE_ID'];

			// check for Reply-To: header and use if available
			if(!empty($headers['REPLY_TO']) && ($headers['REPLY_TO'] != $headers['FROM'])) {
				foreach($headers['REPLY_TO'] as $val) {
					if($val['EMAIL'] == 'NIL') {
						continue;
					}

					if(!$foundAddresses[$val['EMAIL']]) {
						$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
						$address = $this->bofelamimail->decode_header($address,true);
						$oldTo[] = $address;
						$foundAddresses[$val['EMAIL']] = true;
					}
				}
				$oldToAddress	= $headers['REPLY_TO'][0]['EMAIL'];
			} else {
				foreach($headers['FROM'] as $val) {
					if($val['EMAIL'] == 'NIL') {
						continue;
					}
					if(!$foundAddresses[$val['EMAIL']]) {
						$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
						$address = $this->bofelamimail->decode_header($address,true);
						$oldTo[] = $address;
						$foundAddresses[$val['EMAIL']] = true;
					}
				}
				$oldToAddress	= $headers['REPLY_TO'][0]['EMAIL'];
			}

			if($_mode != 'all' || ($_mode == 'all' && !$userEMailAddresses[$oldToAddress]) ) {
				$this->sessionData['to'] = $oldTo;
			}

			if($_mode == 'all') {
				// reply to any address which is cc, but not to my self
				#if($headers->cc) {
					foreach($headers['CC'] as $val) {
						if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
							continue;
						}

						if($userEMailAddresses[$val['EMAIL']]) {
							continue;
						}

						if(!$foundAddresses[$val['EMAIL']]) {
							$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
							$address = $this->bofelamimail->decode_header($address,true);
							$this->sessionData['cc'][] = $address;
							$foundAddresses[$val['EMAIL']] = true;
						}
					}
				#}

				// reply to any address which is to, but not to my self
				#if($headers->to) {
					foreach($headers['TO'] as $val) {
						if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
							continue;
						}

						if($userEMailAddresses[$val['EMAIL']]) {
							continue;
						}

						if(!$foundAddresses[$val['EMAIL']]) {
							$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
							$address = $this->bofelamimail->decode_header($address,true);
							$this->sessionData['to'][] = $address;
							$foundAddresses[$val['EMAIL']] = true;
						}
					}
				#}

				#if($headers->from) {
					foreach($headers['FROM'] as $val) {
						if($val['MAILBOX_NAME'] == 'undisclosed-recipients' || (empty($val['MAILBOX_NAME']) && empty($val['HOST_NAME'])) ) {
							continue;
						}

						if($userEMailAddresses[$val['EMAIL']]) {
							continue;
						}

						if(!$foundAddresses[$val['EMAIL']]) {
							$address = $val['PERSONAL_NAME'] != 'NIL' ? $val['RFC822_EMAIL'] : $val['EMAIL'];
							$address = $this->bofelamimail->decode_header($address,true);
							$this->sessionData['to'][] = $address;
							$foundAddresses[$val['EMAIL']] = true;
						}
					}
				#}
			}

			// check for Re: in subject header
			if(strtolower(substr(trim($bofelamimail->decode_header($headers['SUBJECT'])), 0, 3)) == "re:") {
				$this->sessionData['subject'] = $bofelamimail->decode_header($headers['SUBJECT']);
			} else {
				$this->sessionData['subject'] = "Re: " . $bofelamimail->decode_header($headers['SUBJECT']);
			}

			//_debug_array($headers);
			//error_log(__METHOD__.__LINE__.'->'.array2string($this->preferencesArray['htmlOptions']));
			$bodyParts = $bofelamimail->getMessageBody($_uid, ($this->preferencesArray['htmlOptions']?$this->preferencesArray['htmlOptions']:''), $_partID);
			//_debug_array($bodyParts);
			$styles = felamimail_bo::getStyles($bodyParts);

			$fromAddress = felamimail_bo::htmlspecialchars((($headers['FROM'][0]['PERSONAL_NAME'] != 'NIL') ? str_replace(array('<','>'),array('[',']'),$bofelamimail->decode_header($headers['FROM'][0]['RFC822_EMAIL'],true)) : $bofelamimail->decode_header($headers['FROM'][0]['EMAIL'],true)));

			$toAddressA = array();
			$toAddress = '';
			foreach ($headers['TO'] as $mailheader) {
				$toAddressA[] =  trim($bofelamimail->decode_header((($mailheader['PERSONAL_NAME'] != 'NIL') ? $mailheader['RFC822_EMAIL'] : $mailheader['EMAIL']),true));
			}
			if (count($toAddressA)>0)
			{
				$toAddress = felamimail_bo::htmlspecialchars(implode(', ', str_replace(array('<','>'),array('[',']'),$toAddressA)));
				$toAddress = @htmlspecialchars(lang("to")).": ".$toAddress.($bodyParts['0']['mimeType'] == 'text/html'?"<br>":"\r\n");
			}
			$ccAddressA = array();
			$ccAddress = '';
			foreach ($headers['CC'] as $mailheader) {
				$ccAddressA[] =  trim($bofelamimail->decode_header((($mailheader['PERSONAL_NAME'] != 'NIL') ? $mailheader['RFC822_EMAIL'] : $mailheader['EMAIL']),true));
			}
			if (count($ccAddressA)>0)
			{
				$ccAddress = felamimail_bo::htmlspecialchars(implode(', ', str_replace(array('<','>'),array('[',']'),$ccAddressA)));
				$ccAddress = @htmlspecialchars(lang("cc")).": ".$ccAddress.($bodyParts['0']['mimeType'] == 'text/html'?"<br>":"\r\n");
			}
			if($bodyParts['0']['mimeType'] == 'text/html') {
				$this->sessionData['body']	= /*"<br>".*//*"&nbsp;".*/"<div>".'----------------'.lang("original message").'-----------------'."".'<br>'.
					@htmlspecialchars(lang("from")).": ".$fromAddress."<br>".
					$toAddress.$ccAddress.
					@htmlspecialchars(lang("date").": ".$headers['DATE'],ENT_QUOTES | ENT_IGNORE,felamimail_bo::$displayCharset, false)."<br>".
					'----------------------------------------------------------'."</div>";
				$this->sessionData['mimeType'] 	= 'html';
				if (!empty($styles)) $this->sessionData['body'] .= $styles;
				$this->sessionData['body']	.= '<blockquote type="cite">';

				for($i=0; $i<count($bodyParts); $i++) {
					if($i>0) {
						$this->sessionData['body'] .= '<hr>';
					}
					if($bodyParts[$i]['mimeType'] == 'text/plain') {
						#$bodyParts[$i]['body'] = nl2br($bodyParts[$i]['body'])."<br>";
						$bodyParts[$i]['body'] = "<pre>".$bodyParts[$i]['body']."</pre>";
					}
					if ($bodyParts[$i]['charSet']===false) $bodyParts[$i]['charSet'] = felamimail_bo::detect_encoding($bodyParts[$i]['body']);

					$_htmlConfig = felamimail_bo::$htmLawed_config;
					felamimail_bo::$htmLawed_config['comment'] = 2;
					felamimail_bo::$htmLawed_config['transform_anchor'] = false;
					$this->sessionData['body'] .= "<br>".self::_getCleanHTML(translation::convert($bodyParts[$i]['body'], $bodyParts[$i]['charSet']));
					felamimail_bo::$htmLawed_config = $_htmlConfig;
					#error_log( "GetReplyData (HTML) CharSet:".mb_detect_encoding($bodyParts[$i]['body'] . 'a' , strtoupper($bodyParts[$i]['charSet']).','.strtoupper($this->displayCharset).',UTF-8, ISO-8859-1'));
				}

				$this->sessionData['body']	.= '</blockquote><br>';
			} else {
				//$this->sessionData['body']	= @htmlspecialchars(lang("on")." ".$headers['DATE']." ".$bofelamimail->decode_header($fromAddress), ENT_QUOTES) . " ".lang("wrote").":\r\n";
				// take care the way the ReplyHeader is created here, is used later on in uicompose::compose, in case you force replys to be HTML (prefs)
                $this->sessionData['body']  = " \r\n \r\n".'----------------'.lang("original message").'-----------------'."\r\n".
                    @htmlspecialchars(lang("from")).": ".$fromAddress."\r\n".
					$toAddress.$ccAddress.
					@htmlspecialchars(lang("date").": ".$headers['DATE'], ENT_QUOTES | ENT_IGNORE,felamimail_bo::$displayCharset, false)."\r\n".
                    '-------------------------------------------------'."\r\n \r\n ";
				$this->sessionData['mimeType']	= 'plain';

				for($i=0; $i<count($bodyParts); $i++) {
					if($i>0) {
						$this->sessionData['body'] .= "<hr>";
					}

					// add line breaks to $bodyParts
					if ($bodyParts[$i]['charSet']===false) $bodyParts[$i]['charSet'] = felamimail_bo::detect_encoding($bodyParts[$i]['body']);
					$newBody	= translation::convert($bodyParts[$i]['body'], $bodyParts[$i]['charSet']);
					#error_log( "GetReplyData (Plain) CharSet:".mb_detect_encoding($bodyParts[$i]['body'] . 'a' , strtoupper($bodyParts[$i]['charSet']).','.strtoupper($this->displayCharset).',UTF-8, ISO-8859-1'));

					$newBody        = explode("\n",$newBody);
					$this->sessionData['body'] .= "\r\n";
					// create body new, with good line breaks and indention
					foreach($newBody as $value) {
						// the explode is removing the character
						if (trim($value) != '') {
							#if ($value != "\r") $value .= "\n";
						}
						$numberOfChars = strspn(trim($value), ">");
						$appendString = str_repeat('>', $numberOfChars + 1);

						$bodyAppend = $this->bofelamimail->wordwrap($value, 76-strlen("\r\n$appendString "), "\r\n$appendString ",'>');

						if($bodyAppend[0] == '>') {
							$bodyAppend = '>'. $bodyAppend;
						} else {
							$bodyAppend = '> '. $bodyAppend;
						}

						$this->sessionData['body'] .= $bodyAppend;
					}
				}
			}

			if (!$existingConnection) $bofelamimail->closeConnection(); // close our own, if not established before

			$this->saveSessionData();
		}

		static function _getCleanHTML($_body, $usepurify = false, $cleanTags=true)
		{
			static $nonDisplayAbleCharacters = array('[\016]','[\017]',
					'[\020]','[\021]','[\022]','[\023]','[\024]','[\025]','[\026]','[\027]',
					'[\030]','[\031]','[\032]','[\033]','[\034]','[\035]','[\036]','[\037]');
			felamimail_bo::getCleanHTML($_body, $usepurify, $cleanTags);
			$_body	= preg_replace($nonDisplayAbleCharacters, '', $_body);

			return $_body;
		}

		function getSessionData()
		{
			return $this->sessionData;
		}

		function removeAttachment($_attachmentID) {
			if (parse_url($this->sessionData['attachments'][$_attachmentID]['file'],PHP_URL_SCHEME) != 'vfs') {
				unlink($this->sessionData['attachments'][$_attachmentID]['file']);
			}
			unset($this->sessionData['attachments'][$_attachmentID]);
			$this->saveSessionData();
		}

		function restoreSessionData()
		{
			$this->sessionData = $GLOBALS['egw']->session->appsession('compose_session_data_'.$this->composeID, 'felamimail');
		}

		function saveSessionData()
		{
			$GLOBALS['egw']->session->appsession('compose_session_data_'.$this->composeID,'felamimail',$this->sessionData);
		}

		function createMessage(&$_mailObject, $_formData, $_identity, $_signature = false, $_convertLinks=false)
		{
			$bofelamimail	=& $this->bofelamimail;
			$_mailObject->PluginDir = EGW_SERVER_ROOT."/phpgwapi/inc/";
			$activeMailProfile = $this->preferences->getIdentity($this->bofelamimail->profileID, true);
			$_mailObject->IsSMTP();
			$_mailObject->CharSet	= $this->displayCharset;
			// you need to set the sender, if you work with different identities, since most smtp servers, dont allow
			// sending in the name of someone else
			if ($_identity->id != $activeMailProfile->id && strtolower($activeMailProfile->emailAddress) != strtolower($_identity->emailAddress)) error_log(__METHOD__.__LINE__.' Faking From/SenderInfo for '.$activeMailProfile->emailAddress.' with ID:'.$activeMailProfile->id.'. Identitiy to use for sending:'.array2string($_identity));
			$_mailObject->Sender  = ($_identity->id<0 && $activeMailProfile->id < 0 ? $_identity->emailAddress : $activeMailProfile->emailAddress);
			$_mailObject->From 	= $_identity->emailAddress;
			$_mailObject->FromName = $_mailObject->EncodeHeader(felamimail_bo::generateIdentityString($_identity,false));
			$_mailObject->Priority = $_formData['priority'];
			$_mailObject->Encoding = 'quoted-printable';
			$_mailObject->AddCustomHeader('X-Mailer: FeLaMiMail');
			if(isset($this->sessionData['in-reply-to'])) {
				$_mailObject->AddCustomHeader('In-Reply-To: '. $this->sessionData['in-reply-to']);
			}
			if($_formData['disposition']) {
				$_mailObject->AddCustomHeader('Disposition-Notification-To: '. $_identity->emailAddress);
			}
			if(!empty($_identity->organization) && (felamimail_bo::$felamimailConfig['how2displayIdentities'] == '' || felamimail_bo::$felamimailConfig['how2displayIdentities'] == 'orgNemail')) {
				#$_mailObject->AddCustomHeader('Organization: '. $bofelamimail->encodeHeader($_identity->organization, 'q'));
				$_mailObject->AddCustomHeader('Organization: '. $_identity->organization);
			}

			foreach((array)$_formData['to'] as $address) {
				$address_array	= imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address), '');
				foreach((array)$address_array as $addressObject) {
					if ($addressObject->host == '.SYNTAX-ERROR.') continue;
					$_emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$bofelamimail->idna2->encode($addressObject->host) : '');
					#$emailName = $bofelamimail->encodeHeader($addressObject->personal, 'q');
					#$_mailObject->AddAddress($emailAddress, $emailName);
					$_mailObject->AddAddress($emailAddress, str_replace(array('@'),' ',($addressObject->personal?$addressObject->personal:$_emailAddress)));
				}
			}

			foreach((array)$_formData['cc'] as $address) {
				$address_array	= imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address),'');
				foreach((array)$address_array as $addressObject) {
					if ($addressObject->host == '.SYNTAX-ERROR.') continue;
					$_emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$bofelamimail->idna2->encode($addressObject->host) : '');
					#$emailName = $bofelamimail->encodeHeader($addressObject->personal, 'q');
					#$_mailObject->AddCC($emailAddress, $emailName);
					$_mailObject->AddCC($emailAddress, str_replace(array('@'),' ',($addressObject->personal?$addressObject->personal:$_emailAddress)));
				}
			}

			foreach((array)$_formData['bcc'] as $address) {
				$address_array	= imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address),'');
				foreach((array)$address_array as $addressObject) {
				if ($addressObject->host == '.SYNTAX-ERROR.') continue;
					$_emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$bofelamimail->idna2->encode($addressObject->host) : '');
					#$emailName = $bofelamimail->encodeHeader($addressObject->personal, 'q');
					#$_mailObject->AddBCC($emailAddress, $emailName);
					$_mailObject->AddBCC($emailAddress, str_replace(array('@'),' ',($addressObject->personal?$addressObject->personal:$_emailAddress)));
				}
			}

			foreach((array)$_formData['replyto'] as $address) {
				$address_array  = imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address),'');
				foreach((array)$address_array as $addressObject) {
					if ($addressObject->host == '.SYNTAX-ERROR.') continue;
					$_emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					#$emailName = $bofelamimail->encodeHeader($addressObject->personal, 'q');
					#$_mailObject->AddBCC($emailAddress, $emailName);
					$_mailObject->AddReplyto($emailAddress, str_replace(array('@'),' ',($addressObject->personal?$addressObject->personal:$_emailAddress)));
				}
			}

			//$_mailObject->WordWrap = 76; // as we break lines ourself, we will not need/use the buildin WordWrap
			#$_mailObject->Subject = $bofelamimail->encodeHeader($_formData['subject'], 'q');
			$_mailObject->Subject = $_formData['subject'];
			#$realCharset = mb_detect_encoding($_formData['body'] . 'a' , strtoupper($this->displayCharset).',UTF-8, ISO-8859-1');
			#error_log("bocompose::createMessage:".$realCharset);
			// this should never happen since we come from the edit dialog
			if (felamimail_bo::detect_qp($_formData['body'])) {
				error_log("Error: bocompose::createMessage found QUOTED-PRINTABLE while Composing Message. Charset:$realCharset Message:".print_r($_formData['body'],true));
				$_formData['body'] = preg_replace('/=\r\n/', '', $_formData['body']);
				$_formData['body'] = quoted_printable_decode($_formData['body']);
			}
			$disableRuler = false;
			#if ($realCharset != $this->displayCharset) error_log("Error: bocompose::createMessage found Charset ($realCharset) differs from DisplayCharset (".$this->displayCharset.")");
			$signature = $_signature->fm_signature;

			if ((isset($this->preferencesArray['insertSignatureAtTopOfMessage']) && $this->preferencesArray['insertSignatureAtTopOfMessage']))
			{
				// note: if you use stationery ' s the insert signatures at the top does not apply here anymore, as the signature
				// is already part of the body, so the signature part of the template will not be applied.
				$signature = null; // note: no signature, no ruler!!!!
			}
			if ((isset($this->preferencesArray['disableRulerForSignatureSeparation']) &&
				$this->preferencesArray['disableRulerForSignatureSeparation']) ||
				empty($signature) || trim($this->convertHTMLToText($signature)) =='')
			{
				$disableRuler = true;
			}

			if($signature)
			{
				$signature = felamimail_bo::merge($signature,array($GLOBALS['egw']->accounts->id2name($GLOBALS['egw_info']['user']['account_id'],'person_id')));
			}

			if($_formData['mimeType'] =='html') {
				$_mailObject->IsHTML(true);
				if(!empty($signature)) {
					#$_mailObject->Body    = array($_formData['body'], $_signature['signature']);
					if($this->sessionData['stationeryID']) {
						$bostationery = new felamimail_bostationery();
						$_mailObject->Body = $bostationery->render($this->sessionData['stationeryID'],$_formData['body'],$signature);
					} else {
						$_mailObject->Body = $_formData['body'] .
							($disableRuler ?'<br>':'<hr style="border:1px dotted silver; width:90%;">').
							$signature;
					}
					$_mailObject->AltBody = $this->convertHTMLToText($_formData['body'],true,true).
						($disableRuler ?"\r\n":"\r\n-- \r\n").
						$this->convertHTMLToText($signature,true,true);
					#print "<pre>$_mailObject->AltBody</pre>";
					#print htmlentities($_signature['signature']);
				} else {
					if($this->sessionData['stationeryID']) {
						$bostationery = new felamimail_bostationery();
						$_mailObject->Body = $bostationery->render($this->sessionData['stationeryID'],$_formData['body']);
					} else {
						$_mailObject->Body	= $_formData['body'];
					}
					$_mailObject->AltBody	= $this->convertHTMLToText($_formData['body'],true,true);
				}
				// convert URL Images to inline images - if possible
				if ($_convertLinks) felamimail_bo::processURL2InlineImages($_mailObject, $_mailObject->Body);
				if (strpos($_mailObject->Body,"<!-- HTMLSIGBEGIN -->")!==false)
				{
					$_mailObject->Body = str_replace(array('<!-- HTMLSIGBEGIN -->','<!-- HTMLSIGEND -->'),'',$_mailObject->Body);
				}
			} else {
				$_mailObject->IsHTML(false);
				$_mailObject->Body = $this->convertHTMLToText($_formData['body'],false);
				#$_mailObject->Body = $_formData['body'];
				if(!empty($signature)) {
					$_mailObject->Body .= ($disableRuler ?"\r\n":"\r\n-- \r\n").
						$this->convertHTMLToText($signature,true,true);
				}
			}

			// add the attachments, on probably existing connection
			$existingConnection = $bofelamimail->icServer->_connected;
			if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
			if (is_array($this->sessionData) && isset($this->sessionData['attachments']))
			{
				$tnfattachments = null;
				foreach((array)$this->sessionData['attachments'] as $attachment) {
					if(is_array($attachment))
					{
						if (!empty($attachment['uid']) && !empty($attachment['folder'])) {
							$bofelamimail->reopen($attachment['folder']);
							switch($attachment['type']) {
								case 'MESSAGE/RFC822':
									$rawHeader='';
									if (isset($attachment['partID'])) {
										$rawHeader      = $bofelamimail->getMessageRawHeader($attachment['uid'], $attachment['partID']);
									}
									$rawBody        = $bofelamimail->getMessageRawBody($attachment['uid'], $attachment['partID']);
									$_mailObject->AddStringAttachment($rawHeader.$rawBody, $_mailObject->EncodeHeader($attachment['name']), '7bit', 'message/rfc822');
									break;
								default:
									$attachmentData	= $bofelamimail->getAttachment($attachment['uid'], $attachment['partID']);
									if ($attachmentData['type'] == 'APPLICATION/MS-TNEF')
									{
										if (!is_array($tnfattachments)) $tnfattachments = $bofelamimail->decode_winmail($attachment['uid'], $attachment['partID']);
										foreach ($tnfattachments as $k)
										{
											if ($k['name'] == $attachment['name'])
											{
												$tnfpart = $bofelamimail->decode_winmail($attachment['uid'], $attachment['partID'],$k['is_winmail']);
												$attachmentData['attachment'] = $tnfpart['attachment'];
												//error_log(__METHOD__.__LINE__.$k['name'].'<->'.$attachment['name'].':'.array2string($attachmentData['attachment']));
												break;
											}
										}
									}
									$_mailObject->AddStringAttachment($attachmentData['attachment'], $_mailObject->EncodeHeader($attachment['name']), 'base64', $attachment['type']);
									break;

							}
						} else {
							if (isset($attachment['file']) && parse_url($attachment['file'],PHP_URL_SCHEME) == 'vfs')
							{
								egw_vfs::load_wrapper('vfs');
							}
							if (isset($attachment['type']) && stripos($attachment['type'],"text/calendar; method=")!==false )
							{
								$_mailObject->AltExtended = file_get_contents($attachment['file']);
								$_mailObject->AltExtendedContentType = $attachment['type'];
							}
							else
							{
								$_mailObject->AddAttachment (
									$attachment['file'],
									$_mailObject->EncodeHeader($attachment['name']),
									(strtoupper($attachment['type'])=='MESSAGE/RFC822'?'7bit':'base64'),
									$attachment['type']
								);
							}
						}
					}
				}
			}
			if (!$existingConnection) $bofelamimail->closeConnection(); // close our own
		}

		function saveAsDraft($_formData, &$savingDestination='')
		{
			$bofelamimail	=& $this->bofelamimail;
			$mail		= new egw_mailer();

			// preserve the bcc and if possible the save to folder information
			$this->sessionData['folder']    = $_formData['folder'];
			$this->sessionData['bcc']   = $_formData['bcc'];
			$this->sessionData['signatureID'] = $_formData['signatureID'];
			$this->sessionData['stationeryID'] = $_formData['stationeryID'];
			$this->sessionData['identity']  = $_formData['identity'];

			$identity = $this->preferences->getIdentity((int)$this->sessionData['identity'],true);

			$flags = '\\Seen \\Draft';
			$BCCmail = '';

			$this->createMessage($mail, $_formData, $identity);

			foreach((array)$this->sessionData['bcc'] as $address) {
				$address_array  = imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address),'');
				foreach((array)$address_array as $addressObject) {
					$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
					$mailAddr[] = array($emailAddress, $addressObject->personal);
				}
			}
			// folder list as Customheader
			if (!empty($this->sessionData['folder']))
			{
				$folders = implode('|',array_unique($this->sessionData['folder']));
				$mail->AddCustomHeader("X-Mailfolder: $folders");
			}
			$mail->AddCustomHeader('X-Signature: '.$this->sessionData['signatureID']);
			$mail->AddCustomHeader('X-Stationery: '.$this->sessionData['stationeryID']);
			$mail->AddCustomHeader('X-Identity: '.(int)$this->sessionData['identity']);
			// decide where to save the message (default to draft folder, if we find nothing else)
			// if the current folder is in draft or template folder save it there
			// if it is called from printview then save it with the draft folder
			//error_log(__METHOD__.__LINE__.array2string($this->preferences->ic_server));
			$savingDestination = $bofelamimail->getDraftFolder();
			if (empty($this->sessionData['messageFolder']) && !empty($this->sessionData['mailbox']))
			{
				$this->sessionData['messageFolder'] = $this->sessionData['mailbox'];
			}
			if (!empty($this->sessionData['messageFolder']) && ($bofelamimail->isDraftFolder($this->sessionData['messageFolder'])
				|| $bofelamimail->isTemplateFolder($this->sessionData['messageFolder'])))
			{
				$savingDestination = $this->sessionData['messageFolder'];
				//error_log(__METHOD__.__LINE__.' SavingDestination:'.$savingDestination);
			}
			if (  !empty($_formData['printit']) && $_formData['printit'] == 0 ) $savingDestination = $bofelamimail->getDraftFolder();

			if (count($mailAddr)>0) $BCCmail = $mail->AddrAppend("Bcc",$mailAddr);
			//error_log(__METHOD__.__LINE__.$BCCmail.$mail->getMessageHeader().$mail->getMessageBody());
			$existingConnection = $bofelamimail->icServer->_connected;
			if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
			//error_log(__METHOD__.__LINE__.' SavingDestination:'.$savingDestination.' ConnectedBefore?:'.$existingConnection.' Socket:'.array2string($bofelamimail->icServer->_socket->fp));
			if ($bofelamimail->folderExists($savingDestination,true)) {
				try
				{
					$messageUid = $bofelamimail->appendMessage($savingDestination,
						$BCCmail.$mail->getMessageHeader(),
						$mail->getMessageBody(),
						$flags);
				}
				catch (egw_exception_wrong_userinput $e)
				{
					error_log(__METHOD__.__LINE__.lang("Save of message %1 failed. Could not save message to folder %2 due to: %3",__METHOD__,$savingDestination,$e->getMessage()));
					return false;
				}

			} else {
				error_log("felamimail_bo::saveAsDraft->".lang("folder")." ". $savingDestination." ".lang("does not exist on IMAP Server."));
				return false;
			}
			if (!$existingConnection) $bofelamimail->closeConnection();//No, close my own
			return $messageUid;
		}

		function send($_formData)
		{
			$bofelamimail	= $this->bofelamimail;
			$mail 		= new egw_mailer();
			$messageIsDraft	=  false;

			$this->sessionData['identity']	= $_formData['identity'];
			$this->sessionData['to']	= $_formData['to'];
			$this->sessionData['cc']	= $_formData['cc'];
			$this->sessionData['bcc']	= $_formData['bcc'];
			$this->sessionData['folder']	= $_formData['folder'];
			$this->sessionData['replyto']	= $_formData['replyto'];
			$this->sessionData['subject']	= trim($_formData['subject']);
			$this->sessionData['body']	= $_formData['body'];
			$this->sessionData['priority']	= $_formData['priority'];
			$this->sessionData['signatureID'] = $_formData['signatureID'];
			$this->sessionData['stationeryID'] = $_formData['stationeryID'];
			$this->sessionData['disposition'] = $_formData['disposition'];
			$this->sessionData['mimeType']	= $_formData['mimeType'];
			$this->sessionData['to_infolog'] = $_formData['to_infolog'];
			$this->sessionData['to_tracker'] = $_formData['to_tracker'];
			// if the body is empty, maybe someone pasted something with scripts, into the message body
			// this should not happen anymore, unless you call send directly, since the check was introduced with the action command
			if(empty($this->sessionData['body']))
			{
				// this is to be found with the egw_unset_vars array for the _POST['body'] array
				$name='_POST';
				$key='body';
				#error_log($GLOBALS['egw_unset_vars'][$name.'['.$key.']']);
				if (isset($GLOBALS['egw_unset_vars'][$name.'['.$key.']']))
				{
					$this->sessionData['body'] = self::_getCleanHTML( $GLOBALS['egw_unset_vars'][$name.'['.$key.']']);
					$_formData['body']=$this->sessionData['body'];
				}
				#error_log($this->sessionData['body']);
			}
			if(empty($this->sessionData['to']) && empty($this->sessionData['cc']) &&
			   empty($this->sessionData['bcc']) && empty($this->sessionData['folder'])) {
			   	$messageIsDraft = true;
			}
			#error_log(print_r($this->preferences,true));
			$identity = $this->preferences->getIdentity((int)$this->sessionData['identity'],true);
			$signature = $this->bosignatures->getSignature((int)$this->sessionData['signatureID']);
			//error_log($this->sessionData['identity']);
			//error_log(print_r($identity,true));
			// create the messages
			$this->createMessage($mail, $_formData, $identity, $signature, true);
			// remember the identity
			if ($_formData['to_infolog'] == 'on' || $_formData['to_tracker'] == 'on') $fromAddress = $mail->FromName.($mail->FromName?' <':'').$mail->From.($mail->FromName?'>':'');
			#print "<pre>". $mail->getMessageHeader() ."</pre><hr><br>";
			#print "<pre>". $mail->getMessageBody() ."</pre><hr><br>";
			#exit;

			$ogServer = $this->preferences->getOutgoingServer($this->bofelamimail->profileID);
			#_debug_array($ogServer);
			$mail->Host 	= $ogServer->host;
			$mail->Port	= $ogServer->port;
			// SMTP Auth??
			if($ogServer->smtpAuth) {
				$mail->SMTPAuth	= true;
				// check if username contains a ; -> then a sender is specified (and probably needed)
				list($username,$senderadress) = explode(';', $ogServer->username,2);
				if (isset($senderadress) && !empty($senderadress)) $mail->Sender = $senderadress;
				$mail->Username = $username;
				$mail->Password	= $ogServer->password;
			}

			// check if there are folders to be used
			$folder = (array)$this->sessionData['folder'];
			$sentFolder = $this->bofelamimail->getSentFolder();
			if(isset($sentFolder) && $sentFolder != 'none' &&
				$this->preferences->preferences['sendOptions'] != 'send_only' &&
				$messageIsDraft == false)
			{
				if ($this->bofelamimail->folderExists($sentFolder, true))
				{
					$folder[] = $sentFolder;
				}
				else
				{
					$this->errorInfo = lang("No (valid) Send Folder set in preferences");
				}
			}
			else
			{
				if ((!isset($sentFolder) && $this->preferences->preferences['sendOptions'] != 'send_only') ||
					($this->preferences->preferences['sendOptions'] != 'send_only' &&
					$sentFolder != 'none')) $this->errorInfo = lang("No Send Folder set in preferences");
			}
			if($messageIsDraft == true) {
				$draftFolder = $this->bofelamimail->getDraftFolder();
				if(!empty($draftFolder) && $this->bofelamimail->folderExists($draftFolder)) {
					$this->sessionData['folder'] = array($draftFolder);
					$folder[] = $draftFolder;
				}
			}
			$folder = array_unique($folder);
			if (($this->preferences->preferences['sendOptions'] != 'send_only' && $sentFolder != 'none') && !(count($folder) > 0) &&
				!($_formData['to_infolog']=='on' || $_formData['to_tracker']=='on'))
			{
				$this->errorInfo = lang("Error: ").lang("No Folder destination supplied, and no folder to save message or other measure to store the mail (save to infolog/tracker) provided, but required.").($this->errorInfo?' '.$this->errorInfo:'');
				#error_log($this->errorInfo);
				return false;
			}

			// set a higher timeout for big messages
			@set_time_limit(120);
			//$mail->SMTPDebug = 10;
			//error_log("Folder:".count(array($this->sessionData['folder']))."To:".count((array)$this->sessionData['to'])."CC:". count((array)$this->sessionData['cc']) ."bcc:".count((array)$this->sessionData['bcc']));
			if(count((array)$this->sessionData['to']) > 0 || count((array)$this->sessionData['cc']) > 0 || count((array)$this->sessionData['bcc']) > 0) {
				try {
					$mail->Send();
				}
				catch(phpmailerException $e) {
					$this->errorInfo = $e->getMessage();
					if ($mail->ErrorInfo) // use the complete mailer ErrorInfo, for full Information
					{
						if (stripos($mail->ErrorInfo, $this->errorInfo)===false)
						{
							$this->errorInfo = $mail->ErrorInfo.'<br>'.$this->errorInfo;
						}
						else
						{
							$this->errorInfo = $mail->ErrorInfo;
						}
					}
					error_log(__METHOD__.__LINE__.array2string($this->errorInfo));
					return false;
				}
			} else {
				if (count(array($this->sessionData['folder']))>0 && !empty($this->sessionData['folder'])) {
					//error_log(__METHOD__.__LINE__."Folders:".print_r($this->sessionData['folder'],true));
				} else {
					$this->errorInfo = lang("Error: ").lang("No Address TO/CC/BCC supplied, and no folder to save message to provided.");
					//error_log(__METHOD__.__LINE__.$this->errorInfo);
					return false;
				}
			}
			#error_log("Mail Sent.!");
			#error_log("Number of Folders to move copy the message to:".count($folder));
			if ((count($folder) > 0) || (isset($this->sessionData['uid']) && isset($this->sessionData['messageFolder']))
                || (isset($this->sessionData['forwardFlag']) && isset($this->sessionData['sourceFolder']))) {
				$bofelamimail =& $this->bofelamimail;
				$existingConnection = $bofelamimail->icServer->_connected;
				if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
				//$bofelamimail->reopen($this->sessionData['messageFolder']);
				#error_log("(re)opened Connection");
			}
			// if copying mail to folder, or saving mail to infolog, we need to gather the needed information
			if (count($folder) > 0 || $_formData['to_infolog'] == 'on') {
				foreach((array)$this->sessionData['bcc'] as $address) {
					$address_array  = imap_rfc822_parse_adrlist((get_magic_quotes_gpc()?stripslashes($address):$address),'');
					foreach((array)$address_array as $addressObject) {
						$emailAddress = $addressObject->mailbox. (!empty($addressObject->host) ? '@'.$addressObject->host : '');
						$mailAddr[] = array($emailAddress, $addressObject->personal);
					}
				}
				$BCCmail='';
				if (count($mailAddr)>0) $BCCmail = $mail->AddrAppend("Bcc",$mailAddr);
				$sentMailHeader = $BCCmail.$mail->getMessageHeader();
				$sentMailBody = $mail->getMessageBody();
			}
			// copying mail to folder
			if (count($folder) > 0)
			{
				foreach($folder as $folderName) {
					if (is_array($folderName)) $folderName = array_shift($folderName); // should not happen at all
					if($bofelamimail->isSentFolder($folderName)) {
						$flags = '\\Seen';
					} elseif($bofelamimail->isDraftFolder($folderName)) {
						$flags = '\\Draft';
					} else {
						$flags = '';
					}
					#$mailHeader=explode('From:',$mail->getMessageHeader());
					#$mailHeader[0].$mail->AddrAppend("Bcc",$mailAddr).'From:'.$mailHeader[1],
					if ($bofelamimail->folderExists($folderName,true)) {
						try
						{
							$bofelamimail->appendMessage($folderName,
									$sentMailHeader,
									$sentMailBody,
									$flags);
						}
						catch (egw_exception_wrong_userinput $e)
						{
							error_log(__METHOD__.__LINE__.'->'.lang("Import of message %1 failed. Could not save message to folder %2 due to: %3",$this->sessionData['subject'],$folderName,$e->getMessage()));
						}
					}
					else
					{
						error_log(__METHOD__.__LINE__.'->'.lang("Import of message %1 failed. Destination Folder %2 does not exist.",$this->sessionData['subject'],$folderName));
					}
				}
				//$bofelamimail->closeConnection();
			}
			// handle previous drafted versions of that mail
			$lastDrafted = false;
			if (isset($this->sessionData['lastDrafted']))
			{
				$lastDrafted = $this->sessionData['lastDrafted'];
				if (isset($lastDrafted['uid']) && !empty($lastDrafted['uid'])) $lastDrafted['uid']=trim($lastDrafted['uid']);
				if (isset($lastDrafted['uid']) && (empty($lastDrafted['uid']) || $lastDrafted['uid'] == $this->sessionData['uid'])) $lastDrafted=false;
				//error_log(__METHOD__.__LINE__.array2string($lastDrafted));
			}
			if ($lastDrafted && is_array($lastDrafted) && $bofelamimail->isDraftFolder($lastDrafted['folder'])) $bofelamimail->deleteMessages((array)$lastDrafted['uid'],$lastDrafted['folder'],"remove_immediately");
			unset($this->sessionData['lastDrafted']);

			//error_log("handling draft messages, flagging and such");
			if((isset($this->sessionData['uid']) && isset($this->sessionData['messageFolder']))
				|| (isset($this->sessionData['forwardFlag']) && isset($this->sessionData['sourceFolder']))) {
				// mark message as answered
				$existingConnection = $bofelamimail->icServer->_connected;
				if (!$existingConnection) $bofelamimail->openConnection();//No, establish our own
				$bofelamimail->reopen($this->sessionData['messageFolder']);
				// if the draft folder is a starting part of the messages folder, the draft message will be deleted after the send
				// unless your templatefolder is a subfolder of your draftfolder, and the message is in there
				if ($bofelamimail->isDraftFolder($this->sessionData['messageFolder']) && !$bofelamimail->isTemplateFolder($this->sessionData['messageFolder']))
				{
					$bofelamimail->deleteMessages(array($this->sessionData['uid']),$this->sessionData['messageFolder']);
				} else {
					$bofelamimail->flagMessages("answered", array($this->sessionData['uid']));
					if (array_key_exists('forwardFlag',$this->sessionData) && $this->sessionData['forwardFlag']=='forwarded')
					{
						$bofelamimail->flagMessages("forwarded", array($this->sessionData['forwardedUID']));
					}
				}
				//$bofelamimail->closeConnection();
			}
			if ($bofelamimail && !$existingConnection) $bofelamimail->closeConnection();
			//error_log("performing Infolog Stuff");
			//error_log(print_r($this->sessionData['to'],true));
			//error_log(print_r($this->sessionData['cc'],true));
			//error_log(print_r($this->sessionData['bcc'],true));
			if (is_array($this->sessionData['to']))
			{
				$mailaddresses['to'] = $this->sessionData['to'];
			}
			else
			{
				$mailaddresses = array();
			}
			if (is_array($this->sessionData['cc'])) $mailaddresses['cc'] = $this->sessionData['cc'];
			if (is_array($this->sessionData['bcc'])) $mailaddresses['bcc'] = $this->sessionData['bcc'];
			if (!empty($mailaddresses)) $mailaddresses['from'] = $GLOBALS['egw']->translation->decodeMailHeader($fromAddress);
			// attention: we dont return from infolog/tracker. You cannot check both. cleanups will be done there.
			if ($_formData['to_infolog'] == 'on') {
				$uiinfolog =& CreateObject('infolog.infolog_ui');
				$uiinfolog->import_mail(
					$mailaddresses,
					$this->sessionData['subject'],
					$this->convertHTMLToText($this->sessionData['body']),
					$this->sessionData['attachments'],
					false, // date
					$sentMailHeader, // raw SentMailHeader
					$sentMailBody // raw SentMailBody
				);
			}
			if ($_formData['to_tracker'] == 'on') {
				$uitracker =& CreateObject('tracker.tracker_ui');
				$uitracker->import_mail(
					$mailaddresses,
					$this->sessionData['subject'],
					$this->convertHTMLToText($this->sessionData['body']),
					$this->sessionData['attachments']
				);
			}
/*
			if ($_formData['to_calendar'] == 'on') {
				$uical =& CreateObject('calendar.calendar_uiforms');
				$uical->import_mail(
					$mailaddresses,
					$this->sessionData['subject'],
					$this->convertHTMLToText($this->sessionData['body']),
					$this->sessionData['attachments']
				);
			}
*/


			if(is_array($this->sessionData['attachments'])) {
				reset($this->sessionData['attachments']);
				while(list($key,$value) = @each($this->sessionData['attachments'])) {
					#print "$key: ".$value['file']."<br>";
					if (!empty($value['file']) && parse_url($value['file'],PHP_URL_SCHEME) != 'vfs') {	// happens when forwarding mails
						unlink($value['file']);
					}
				}
			}

			$this->sessionData = '';
			$this->saveSessionData();

			return true;
		}

		function setDefaults()
		{
			require_once(EGW_INCLUDE_ROOT.'/felamimail/inc/class.felamimail_bosignatures.inc.php');
			$boSignatures = new felamimail_bosignatures();

			if($signatureData = $boSignatures->getDefaultSignature()) {
				if (is_array($signatureData)) {
					$this->sessionData['signatureID'] = $signatureData['signatureid'];
				} else {
					$this->sessionData['signatureID'] = $signatureData;
				}
			} else {
				$this->sessionData['signatureID'] = -1;
			}
			// retrieve the signature accociated with the identity
			$accountData    = $this->bopreferences->getAccountData($this->preferences,'active');
			if ($accountData['identity']->signature) $this->sessionData['signatureID'] = $accountData['identity']->signature;
			// apply the current mailbox to the compose session data of the/a new email
			$appsessionData = $GLOBALS['egw']->session->appsession('session_data');
			$this->sessionData['mailbox'] = $appsessionData['mailbox'];

			$this->sessionData['mimeType'] = 'html';
			if (!empty($this->preferencesArray['composeOptions']) && $this->preferencesArray['composeOptions']=="text") $this->sessionData['mimeType']  = 'plain';

			$this->saveSessionData();
		}

		function stripSlashes($_string)
		{
			if (get_magic_quotes_gpc()) {
				return stripslashes($_string);
			} else {
				return $_string;
			}
		}
}