Elep

<?php

/*
 * Your installation or use of this SugarCRM file is subject to the applicable
 * terms available at
 * http://support.sugarcrm.com/Resources/Master_Subscription_Agreements/.
 * If you do not agree to all of the applicable terms or do not have the
 * authority to bind the entity as an authorized representative, then do not
 * install or use this SugarCRM file.
 *
 * Copyright (C) SugarCRM Inc. All rights reserved.
 */

/******************************************************************************
 * Extend baseActions.php with custom actions in
 * "cache/routing/customActions.php"
 * The file should look like the following:
	<?php
		$customActions = array(
			'custom1',
			'custom2'
		);

///////////////////////////////////////////////////////////////////////////////
////	SUGARBEAN RULES
/**
 * Logically deletes a SugarBean derivative
 * @param array $action Array of options and criteria for the action current being processed
 * @param object $bean SugarBean
 * @return bool
 */
function delete_bean($action, $bean) {
    $bean->mark_deleted($bean->id);
	return true;
}
////	END SUGARBEAN RULES
///////////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////////
////	FILESYSTEM RULES
/**
 * unlinks a file in the cache directory
 * @param array $action Array of options and criteria for the action current being processed
 * @param string file Path to file
 * @return bool
 */
function delete_file($action, $file) {
	global $sugar_config;

// file must exist
	if(file_exists($file)) {
		// file must be located in the cache dir
		if(strpos($file, $sugar_config['cache_dir']) !== false) {
			if(unlink($file)) {
				return true;
			}
		}
	}

$GLOBALS['log']->error("*** SugarRouting: Rule delete_file did not complete successfully [ file: {$file} ].");
	return false;
}
////	END FILESYSTEM RULES
///////////////////////////////////////////////////////////////////////////////

///////////////////////////////////////////////////////////////////////////////
////	MAIL SERVER RULES
/**
 * Marks an email Unread
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 */
function reply($action, $bean, $ie) {
	global $app_strings;
	global $current_user;

$etId = $action['action1'];

$et = BeanFactory::getBean('EmailTemplates', $etId);
	$ie->setEmailForDisplay($bean->uid, false);
	$ie->email->name = $app_strings['LBL_ROUTING_FW'].$et->name." - ".$ie->email->name;
	$ie->email->description = trim($ie->email->description);
	$ie->email->description_html = trim($ie->email->description_html);

if(!empty($ie->email->description)) {
		$ie->email->description = $et->body."\n\n{$app_strings['LBL_ROUTING_ORIGINAL_MESSAGE_FOLLOWS']}\n\n".$ie->email->description;
	}
	if(!empty($ie->email->description_html)) {
		$ie->email->description_html = $et->body_html."<br><br>{$app_strings['LBL_ROUTING_ORIGINAL_MESSAGE_FOLLOWS']}<br><br>".$ie->email->description_html;
	}

// set to/from
	$toEmail = (isset($ie->email->reply_to_email) && !empty($ie->email->reply_to_email)) ? trim($ie->email->reply_to_email) : trim($ie->email->from_addr);
	$toDisplayName = (isset($ie->email->reply_to_name) && !empty($ie->email->reply_to_name)) ? trim($ie->email->reply_to_name) : trim($ie->email->from_name);

if($toEmail == $toDisplayName) {
		$toDisplayName = ''; // where email address is used
	}

$ie->email->to_addrs_arr = array(
		0 => array(
			'email' => $toEmail,
			'display' => $toDisplayName,
		)
	);

$ea = BeanFactory::newBean('EmailAddresses');
	$ie->email->from_name = $current_user->full_name;
	$ie->email->from_addr = $ea->getReplyToAddress($current_user);

return $ie->email->send();
}

/**
 * Marks an email Unread
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 */
function forward($action, $bean, $ie) {
	global $app_strings;

$to = $action['action1'];

$ie->setEmailForDisplay($bean->uid, false);

$ie->email->name = $app_strings['LBL_ROUTING_FW'].$ie->email->name;

$ie->email->to_addrs_arr = array(
		0 => array(
			'email' => $to,
		)
	);

return $ie->email->send();
}

/**
 * Marks an email Unread
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 */
function mark_unread($action, $bean, $ie) {
	return imap_clearflag_full($ie->conn, $bean->uid, '\\Seen', ST_UID);
}

/**
 * Marks an email Read
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 */
function mark_read($action, $bean, $ie) {
	return mark_flag($action, $bean, $ie, '\\Seen');
}

/**
 * Marks an email Unread
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 */
function mark_flagged($action, $bean, $ie) {
	return mark_flag($action, $bean, $ie, '\\Flagged');
}

/**
 * Generic flag-setting
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 * @param string $flag Flag to set
 */
function mark_flag($action, $bean, $ie, $flag) {
	$result = imap_setflag_full($ie->conn, $bean->uid, $flag, ST_UID);
	return $result;
}

/**
 * Copies an email to a folder
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 * @return bool
 */
function copy_mail($action, $bean, $ie, $copy=true) {
	$args = explode("::", $action['action1']);

if($args[0] == 'sugar') {
		// we're dealing with a target Sugar Folder
		$folder_id = $args[1];

$GLOBALS['log']->fatal("*** SUGARROUTING: dest folder is Sugar Folder");
		// destination is a Sugar folder
		$sf = new SugarFolder();

if($sf->retrieve($folder_id)) {
			$result = $ie->setEmailForDisplay($bean->uid, false);

if($result == 'import') {
				$ie->email->save();
			}

$sf->addBean($ie->email);
		} else {
			$GLOBALS['log']->fatal("*** SUGARROUTING: baseActions:copy_mail: could not retrieve SugarFolder with id [ {$folder_id} ]");
		}
	} else {
		$ieId = $args[1];
		$folder = "";
		for($i=2; $i<count($args); $i++) {
			if(!empty($folder))
				$folder .= ".";
			$folder .= $args[$i];
		}

$GLOBALS['log']->fatal("*** SUGARROUTING: baseActions:copy_email [ {$folder} ] [ {$ieId} ] [ {$bean->uid} ]");
		$ie = BeanFactory::getBean('InboundEmail', $ieId, array('disable_row_level_security' => true));
		$GLOBALS['log']->fatal("*** SUGARROUTING: dest folder is IMAP Folder");
		// destination is an IMAP folder
		/**
		 * moveEmails($fromIe, $fromFolder, $toIe, $toFolder, $uids) {
		 * $args['toFolder'] - XXXX-XXX-XXXXXXX-XXXX-XXX::INBOX::[folderPath]
		 */
		if($copy)
			$ie->copyEmails($ie->id, "INBOX", $ie->id, $folder, $bean->uid);
		else
			$ie->moveEmails($ie->id, "INBOX", $ie->id, $folder, $bean->uid);
	}
	return true;
}
/**
 * Moves an email to a folder
 * @param array $action Array of options and criteria for the action current being processed
 * @param string $ieId ID of InboundEmail instance fully retrieved
 * @param string $uid UID of email
 * @param object $ie InboundEmail instance
 * @return bool
 */
function move_mail($action, $bean, $ie) {
	// does functionally the same thing as copy, but we will remove the message from the original folder
	if(copy_mail($action, $bean, $ie, false)) {
		return true;
	}
	return false;
}

/**
 * Deletes mail from a mailserver
 * @param array $action Array of options and criteria for the action current being processed
 * @param object ie InboundEmail instance fully retrieved
 * @param string uid UID of email on mail server
 * @return bool
 */
function delete_mail($action, $bean, $ie) {
	return $ie->deleteMessageOnMailServer($bean->uid);
}
////	END MAIL SERVER RULES
///////////////////////////////////////////////////////////////////////////////