compose.php
No OneTemporary
Actions

Size

65 KB

Referenced Files

None

Subscribers

None

compose.php
View Options

	<?php

	/**
	+-----------------------------------------------------------------------+
	\| This file is part of the Roundcube Webmail client \|
	\| \|
	\| Copyright (C) The Roundcube Dev Team \|
	\| \|
	\| Licensed under the GNU General Public License version 3 or \|
	\| any later version with exceptions for skins & plugins. \|
	\| See the README file for a full license statement. \|
	\| \|
	\| PURPOSE: \|
	\| Compose a new mail message with all headers and attachments \|
	+-----------------------------------------------------------------------+
	\| Author: Thomas Bruederli <roundcube@gmail.com> \|
	+-----------------------------------------------------------------------+
	*/

	class rcmail_action_mail_compose extends rcmail_action_mail_index
	{
	protected static $COMPOSE_ID;
	protected static $COMPOSE;
	protected static $MESSAGE;
	protected static $MESSAGE_BODY;
	protected static $CID_MAP = [];
	protected static $HTML_MODE = false;
	protected static $SENDMAIL;

	/**
	* Request handler.
	*
	* @param array $args Arguments from the previous step(s)
	*/
	public function run($args = [])
	{
	$rcmail = rcmail::get_instance();

	self::$COMPOSE_ID = rcube_utils::get_input_value('_id', rcube_utils::INPUT_GET);
	self::$COMPOSE = null;

	if (self::$COMPOSE_ID && $_SESSION['compose_data_' . self::$COMPOSE_ID]) {
	self::$COMPOSE =& $_SESSION['compose_data_' . self::$COMPOSE_ID];
	}

	// give replicated session storage some time to synchronize
	$retries = 0;
	while (self::$COMPOSE_ID && !is_array(self::$COMPOSE) && $rcmail->db->is_replicated() && $retries++ < 5) {
	usleep(500000);
	$rcmail->session->reload();
	if ($_SESSION['compose_data_' . self::$COMPOSE_ID]) {
	self::$COMPOSE =& $_SESSION['compose_data_' . self::$COMPOSE_ID];
	}
	}

	// Nothing below is called during message composition, only at "new/forward/reply/draft" initialization or
	// if a compose-ID is given (i.e. when the compose step is opened in a new window/tab).
	if (!is_array(self::$COMPOSE)) {
	// Infinite redirect prevention in case of broken session (#1487028)
	if (self::$COMPOSE_ID) {
	// if we know the message with specified ID was already sent
	// we can ignore the error and compose a new message (#1490009)
	if (
	!isset($_SESSION['last_compose_session'])
	\|\| self::$COMPOSE_ID != $_SESSION['last_compose_session']
	) {
	rcube::raise_error(['code' => 450], false, true);
	}
	}

	self::$COMPOSE_ID = uniqid(mt_rand());
	$params = rcube_utils::request2param(rcube_utils::INPUT_GET, 'task\|action', true);

	$_SESSION['compose_data_' . self::$COMPOSE_ID] = [
	'id' => self::$COMPOSE_ID,
	'param' => $params,
	'mailbox' => isset($params['mbox']) && strlen($params['mbox'])
	? $params['mbox'] : $rcmail->storage->get_folder(),
	];

	self::$COMPOSE =& $_SESSION['compose_data_' . self::$COMPOSE_ID];
	self::process_compose_params(self::$COMPOSE);

	// check if folder for saving sent messages exists and is subscribed (#1486802)
	if (!empty(self::$COMPOSE['param']['sent_mbox'])) {
	$sent_folder = self::$COMPOSE['param']['sent_mbox'];
	rcmail_sendmail::check_sent_folder($sent_folder, true);
	}

	// redirect to a unique URL with all parameters stored in session
	$rcmail->output->redirect([
	'_action' => 'compose',
	'_id' => self::$COMPOSE['id'],
	'_search' => !empty($_REQUEST['_search']) ? $_REQUEST['search'] : null,
	]);
	}

	// add some labels to client
	$rcmail->output->add_label('notuploadedwarning', 'savingmessage', 'siginserted', 'responseinserted',
	'messagesaved', 'converting', 'editorwarning', 'discard',
	'fileuploaderror', 'sendmessage', 'newresponse', 'responsename', 'responsetext', 'save',
	'savingresponse', 'restoresavedcomposedata', 'restoremessage', 'delete', 'restore', 'ignore',
	'selectimportfile', 'messageissent', 'loadingdata', 'nopubkeyfor', 'nopubkeyforsender',
	'encryptnoattachments','encryptedsendialog','searchpubkeyservers', 'importpubkeys',
	'encryptpubkeysfound', 'search', 'close', 'import', 'keyid', 'keylength', 'keyexpired',
	'keyrevoked', 'keyimportsuccess', 'keyservererror', 'attaching', 'namex', 'attachmentrename'
	);

	$rcmail->output->set_pagetitle($rcmail->gettext('compose'));

	$rcmail->output->set_env('compose_id', self::$COMPOSE['id']);
	$rcmail->output->set_env('session_id', session_id());
	$rcmail->output->set_env('mailbox', $rcmail->storage->get_folder());
	$rcmail->output->set_env('top_posting', intval($rcmail->config->get('reply_mode')) > 0);
	$rcmail->output->set_env('sig_below', $rcmail->config->get('sig_below'));
	$rcmail->output->set_env('save_localstorage', (bool) $rcmail->config->get('compose_save_localstorage'));
	$rcmail->output->set_env('is_sent', false);
	$rcmail->output->set_env('mimetypes', self::supported_mimetypes());
	$rcmail->output->set_env('keyservers', $rcmail->config->keyservers());
	$rcmail->output->set_env('mailvelope_main_keyring', $rcmail->config->get('mailvelope_main_keyring'));

	$drafts_mbox = $rcmail->config->get('drafts_mbox');
	$config_show_sig = $rcmail->config->get('show_sig', 1);

	// add config parameters to client script
	if (strlen($drafts_mbox)) {
	$rcmail->output->set_env('drafts_mailbox', $drafts_mbox);
	$rcmail->output->set_env('draft_autosave', $rcmail->config->get('draft_autosave'));
	}

	// default font for HTML editor
	$font = self::font_defs($rcmail->config->get('default_font'));
	if ($font && !is_array($font)) {
	$rcmail->output->set_env('default_font', $font);
	}

	// default font size for HTML editor
	if ($font_size = $rcmail->config->get('default_font_size')) {
	$rcmail->output->set_env('default_font_size', $font_size);
	}

	$compose_mode = null;
	$msg_uid = null;

	// get reference message and set compose mode
	if (!empty(self::$COMPOSE['param']['draft_uid'])) {
	$msg_uid = self::$COMPOSE['param']['draft_uid'];
	$compose_mode = rcmail_sendmail::MODE_DRAFT;
	$rcmail->output->set_env('draft_id', $msg_uid);
	$rcmail->storage->set_folder($drafts_mbox);
	}
	else if (!empty(self::$COMPOSE['param']['reply_uid'])) {
	$msg_uid = self::$COMPOSE['param']['reply_uid'];
	$compose_mode = rcmail_sendmail::MODE_REPLY;
	}
	else if (!empty(self::$COMPOSE['param']['forward_uid'])) {
	$msg_uid = self::$COMPOSE['param']['forward_uid'];
	$compose_mode = rcmail_sendmail::MODE_FORWARD;
	self::$COMPOSE['forward_uid'] = $msg_uid;
	self::$COMPOSE['as_attachment'] = !empty(self::$COMPOSE['param']['attachment']);
	}
	else if (!empty(self::$COMPOSE['param']['uid'])) {
	$msg_uid = self::$COMPOSE['param']['uid'];
	$compose_mode = rcmail_sendmail::MODE_EDIT;
	}

	self::$COMPOSE['mode'] = $compose_mode;

	if ($compose_mode) {
	$rcmail->output->set_env('compose_mode', $compose_mode);
	}

	if ($compose_mode == rcmail_sendmail::MODE_EDIT \|\| $compose_mode == rcmail_sendmail::MODE_DRAFT) {
	// don't add signature in draft/edit mode, we'll also not remove the old-one
	// but only on page display, later we should be able to change identity/sig (#1489229)
	if ($config_show_sig == 1 \|\| $config_show_sig == 2) {
	$rcmail->output->set_env('show_sig_later', true);
	}
	}
	else if ($config_show_sig == 1) {
	$rcmail->output->set_env('show_sig', true);
	}
	else if ($config_show_sig == 2 && empty($compose_mode)) {
	$rcmail->output->set_env('show_sig', true);
	}
	else if (
	$config_show_sig == 3
	&& ($compose_mode == rcmail_sendmail::MODE_REPLY \|\| $compose_mode == rcmail_sendmail::MODE_FORWARD)
	) {
	$rcmail->output->set_env('show_sig', true);
	}

	if (!empty($msg_uid) && (empty(self::$COMPOSE['as_attachment']) \|\| $compose_mode == rcmail_sendmail::MODE_DRAFT)) {
	$mbox_name = $rcmail->storage->get_folder();

	// set format before rcube_message construction
	// use the same format as for the message view
	if (isset($_SESSION['msg_formats'][$mbox_name . ':' . $msg_uid])) {
	$rcmail->config->set('prefer_html', $_SESSION['msg_formats'][$mbox_name . ':' . $msg_uid]);
	}
	else {
	$prefer_html = $rcmail->config->get('prefer_html')
	\|\| $rcmail->config->get('htmleditor')
	\|\| $compose_mode == rcmail_sendmail::MODE_DRAFT
	\|\| $compose_mode == rcmail_sendmail::MODE_EDIT;

	$rcmail->config->set('prefer_html', $prefer_html);
	}

	self::$MESSAGE = new rcube_message($msg_uid);

	// make sure message is marked as read
	if (self::$MESSAGE->headers && self::$MESSAGE->context === null && empty(self::$MESSAGE->headers->flags['SEEN'])) {
	$rcmail->storage->set_flag($msg_uid, 'SEEN');
	}

	if (!empty(self::$MESSAGE->headers->charset)) {
	$rcmail->storage->set_charset(self::$MESSAGE->headers->charset);
	}

	if (!self::$MESSAGE->headers) {
	// error
	}
	else if ($compose_mode == rcmail_sendmail::MODE_FORWARD \|\| $compose_mode == rcmail_sendmail::MODE_REPLY) {
	if ($compose_mode == rcmail_sendmail::MODE_REPLY) {
	self::$COMPOSE['reply_uid'] = self::$MESSAGE->context === null ? $msg_uid : null;

	if (!empty(self::$COMPOSE['param']['all'])) {
	self::$MESSAGE->reply_all = self::$COMPOSE['param']['all'];
	}
	}
	else {
	self::$COMPOSE['forward_uid'] = $msg_uid;
	}

	self::$COMPOSE['reply_msgid'] = self::$MESSAGE->headers->messageID;
	self::$COMPOSE['references'] = trim(self::$MESSAGE->headers->references . " " . self::$MESSAGE->headers->messageID);

	// Save the sent message in the same folder of the message being replied to
	if (
	$rcmail->config->get('reply_same_folder')
	&& ($sent_folder = self::$COMPOSE['mailbox'])
	&& rcmail_sendmail::check_sent_folder($sent_folder, false)
	) {
	self::$COMPOSE['param']['sent_mbox'] = $sent_folder;
	}
	}
	else if ($compose_mode == rcmail_sendmail::MODE_DRAFT \|\| $compose_mode == rcmail_sendmail::MODE_EDIT) {
	if ($compose_mode == rcmail_sendmail::MODE_DRAFT) {
	if ($draft_info = self::$MESSAGE->headers->get('x-draft-info')) {
	// get reply_uid/forward_uid to flag the original message when sending
	$info = rcmail_sendmail::draftinfo_decode($draft_info);

	if ($info['type'] == 'reply') {
	self::$COMPOSE['reply_uid'] = $info['uid'];
	}
	else if ($info['type'] == 'forward') {
	self::$COMPOSE['forward_uid'] = $info['uid'];
	}

	self::$COMPOSE['mailbox'] = $info['folder'];

	// Save the sent message in the same folder of the message being replied to
	if (
	$rcmail->config->get('reply_same_folder')
	&& ($sent_folder = $info['folder'])
	&& rcmail_sendmail::check_sent_folder($sent_folder, false)
	) {
	self::$COMPOSE['param']['sent_mbox'] = $sent_folder;
	}
	}

	if (($msgid = self::$MESSAGE->headers->get('message-id')) && !preg_match('/^mid:[0-9]+$/', $msgid)) {
	self::$COMPOSE['param']['message-id'] = $msgid;
	}

	// use message UID as draft_id
	$rcmail->output->set_env('draft_id', $msg_uid);
	}

	if ($in_reply_to = self::$MESSAGE->headers->get('in-reply-to')) {
	self::$COMPOSE['reply_msgid'] = '<' . $in_reply_to . '>';
	}

	self::$COMPOSE['references'] = self::$MESSAGE->headers->references;
	}
	}
	else {
	self::$MESSAGE = new stdClass();

	// apply mailto: URL parameters
	if (!empty(self::$COMPOSE['param']['in-reply-to'])) {
	self::$COMPOSE['reply_msgid'] = '<' . trim(self::$COMPOSE['param']['in-reply-to'], '<> ') . '>';
	}

	if (!empty(self::$COMPOSE['param']['references'])) {
	self::$COMPOSE['references'] = self::$COMPOSE['param']['references'];
	}
	}

	if (!empty(self::$COMPOSE['reply_msgid'])) {
	$rcmail->output->set_env('reply_msgid', self::$COMPOSE['reply_msgid']);
	}

	// Initialize helper class to build the UI
	self::$SENDMAIL = new rcmail_sendmail(self::$COMPOSE, ['message' => self::$MESSAGE]);

	// process self::$MESSAGE body/attachments, set self::$MESSAGE_BODY/$HTML_MODE vars and some session data
	self::$MESSAGE_BODY = self::prepare_message_body();

	// register UI objects (Note: some objects are registered by rcmail_sendmail above)
	$rcmail->output->add_handlers([
	'composebody' => [$this, 'compose_body'],
	'composeattachmentlist' => [$this, 'compose_attachment_list'],
	'composeattachmentform' => [$this, 'compose_attachment_form'],
	'composeattachment' => [$this, 'compose_attachment_field'],
	'filedroparea' => [$this, 'compose_file_drop_area'],
	'editorselector' => [$this, 'editor_selector'],
	'addressbooks' => [$this, 'addressbook_list'],
	'addresslist' => [$this, 'contacts_list'],
	'responseslist' => [$this, 'compose_responses_list'],
	]);

	$rcmail->output->include_script('publickey.js');

	self::spellchecker_init();

	$rcmail->output->send('compose');
	}

	// process compose request parameters
	public static function process_compose_params(&$COMPOSE)
	{
	if (!empty($COMPOSE['param']['to'])) {
	$mailto = explode('?', $COMPOSE['param']['to'], 2);

	// #1486037: remove "mailto:" prefix
	$COMPOSE['param']['to'] = preg_replace('/^mailto:/i', '', $mailto[0]);
	// #1490346: decode the recipient address
	// #1490510: use raw encoding for correct "+" character handling as specified in RFC6068
	$COMPOSE['param']['to'] = rawurldecode($COMPOSE['param']['to']);

	// Supported case-insensitive tokens in mailto URL
	$url_tokens = ['to', 'cc', 'bcc', 'reply-to', 'in-reply-to', 'references', 'subject', 'body'];

	if (!empty($mailto[1])) {
	parse_str($mailto[1], $query);
	foreach ($query as $f => $val) {
	if (($key = array_search(strtolower($f), $url_tokens)) !== false) {
	$f = $url_tokens[$key];
	}

	// merge mailto: addresses with addresses from 'to' parameter
	if ($f == 'to' && !empty($COMPOSE['param']['to'])) {
	$to_addresses = rcube_mime::decode_address_list($COMPOSE['param']['to'], null, true, null, true);
	$add_addresses = rcube_mime::decode_address_list($val, null, true);

	foreach ($add_addresses as $addr) {
	if (!in_array($addr['mailto'], $to_addresses)) {
	$to_addresses[] = $addr['mailto'];
	$COMPOSE['param']['to'] = (!empty($to_addresses) ? ', ' : '') . $addr['string'];
	}
	}
	}
	else {
	$COMPOSE['param'][$f] = $val;
	}
	}
	}
	}

	// resolve _forward_uid=* to an absolute list of messages from a search result
	if (
	!empty($COMPOSE['param']['forward_uid'])
	&& $COMPOSE['param']['forward_uid'] == '*'
	&& !empty($_SESSION['search'][1])
	&& is_object($_SESSION['search'][1])
	) {
	$COMPOSE['param']['forward_uid'] = $_SESSION['search'][1]->get();
	}

	// clean HTML message body which can be submitted by URL
	if (!empty($COMPOSE['param']['body'])) {
	if ($COMPOSE['param']['html'] = strpos($COMPOSE['param']['body'], '<') !== false) {
	$wash_params = ['safe' => false, 'inline_html' => true];
	$COMPOSE['param']['body'] = self::prepare_html_body($COMPOSE['param']['body'], $wash_params);
	}
	}

	$rcmail = rcmail::get_instance();

	// select folder where to save the sent message
	$COMPOSE['param']['sent_mbox'] = $rcmail->config->get('sent_mbox');

	// pipe compose parameters thru plugins
	$plugin = $rcmail->plugins->exec_hook('message_compose', $COMPOSE);

	$COMPOSE['param'] = array_merge($COMPOSE['param'], $plugin['param']);

	// add attachments listed by message_compose hook
	if (!empty($plugin['attachments'])) {
	foreach ($plugin['attachments'] as $attach) {
	// we have structured data
	if (is_array($attach)) {
	$attachment = $attach + ['group' => self::$COMPOSE_ID];
	}
	// only a file path is given
	else {
	$filename = basename($attach);
	$attachment = [
	'group' => self::$COMPOSE_ID,
	'name' => $filename,
	'mimetype' => rcube_mime::file_content_type($attach, $filename),
	'size' => filesize($attach),
	'path' => $attach,
	];
	}

	// save attachment if valid
	if (
	(!empty($attachment['data']) && !empty($attachment['name']))
	\|\| (!empty($attachment['path']) && file_exists($attachment['path']))
	) {
	$attachment = $rcmail->plugins->exec_hook('attachment_save', $attachment);
	}

	if (!empty($attachment['status']) && empty($attachment['abort'])) {
	unset($attachment['data'], $attachment['status'], $attachment['abort']);
	$COMPOSE['attachments'][$attachment['id']] = $attachment;
	}
	}
	}
	}

	public static function compose_editor_mode()
	{
	static $useHtml;

	if ($useHtml !== null) {
	return $useHtml;
	}

	$rcmail = rcmail::get_instance();
	$html_editor = intval($rcmail->config->get('htmleditor'));
	$compose_mode = self::$COMPOSE['mode'];

	if (isset(self::$COMPOSE['param']['html']) && is_bool(self::$COMPOSE['param']['html'])) {
	$useHtml = self::$COMPOSE['param']['html'];
	}
	else if (isset($_POST['_is_html'])) {
	$useHtml = !empty($_POST['_is_html']);
	}
	else if ($compose_mode == rcmail_sendmail::MODE_DRAFT \|\| $compose_mode == rcmail_sendmail::MODE_EDIT) {
	$useHtml = self::message_is_html();
	}
	else if ($compose_mode == rcmail_sendmail::MODE_REPLY) {
	$useHtml = $html_editor == 1 \|\| ($html_editor >= 2 && self::message_is_html());
	}
	else if ($compose_mode == rcmail_sendmail::MODE_FORWARD) {
	$useHtml = $html_editor == 1 \|\| $html_editor == 4
	\|\| ($html_editor == 3 && self::message_is_html());
	}
	else {
	$useHtml = $html_editor == 1 \|\| $html_editor == 4;
	}

	return $useHtml;
	}

	public static function message_is_html()
	{
	return rcmail::get_instance()->config->get('prefer_html')
	&& (self::$MESSAGE instanceof rcube_message)
	&& self::$MESSAGE->has_html_part(true);
	}

	public static function spellchecker_init()
	{
	$rcmail = rcmail::get_instance();

	// Set language list
	if ($rcmail->config->get('enable_spellcheck')) {
	$spellchecker = new rcube_spellchecker();
	}
	else {
	return;
	}

	$spellcheck_langs = $spellchecker->languages();

	if (empty($spellcheck_langs)) {
	if ($err = $spellchecker->error()) {
	rcube::raise_error(['code' => 500,
	'file' => __FILE__, 'line' => __LINE__,
	'message' => "Spell check engine error: " . trim($err)],
	true, false
	);
	}
	}
	else {
	$dictionary = (bool) $rcmail->config->get('spellcheck_dictionary');
	$lang = $_SESSION['language'];

	// if not found in the list, try with two-letter code
	if (empty($spellcheck_langs[$lang])) {
	$lang = strtolower(substr($lang, 0, 2));
	}

	if (empty($spellcheck_langs[$lang])) {
	$lang = 'en';
	}

	// include GoogieSpell
	$rcmail->output->include_script('googiespell.js');
	$rcmail->output->add_script(sprintf(
	"var googie = new GoogieSpell('%s/images/googiespell/','%s&lang=', %s);\n".
	"googie.lang_chck_spell = \"%s\";\n".
	"googie.lang_rsm_edt = \"%s\";\n".
	"googie.lang_close = \"%s\";\n".
	"googie.lang_revert = \"%s\";\n".
	"googie.lang_no_error_found = \"%s\";\n".
	"googie.lang_learn_word = \"%s\";\n".
	"googie.setLanguages(%s);\n".
	"googie.setCurrentLanguage('%s');\n".
	"googie.setDecoration(false);\n".
	"googie.decorateTextarea(rcmail.env.composebody);\n",
	$rcmail->output->asset_url($rcmail->output->get_skin_path()),
	$rcmail->url(['_task' => 'utils', '_action' => 'spell', '_remote' => 1]),
	!empty($dictionary) ? 'true' : 'false',
	rcube::JQ(rcube::Q($rcmail->gettext('checkspelling'))),
	rcube::JQ(rcube::Q($rcmail->gettext('resumeediting'))),
	rcube::JQ(rcube::Q($rcmail->gettext('close'))),
	rcube::JQ(rcube::Q($rcmail->gettext('revertto'))),
	rcube::JQ(rcube::Q($rcmail->gettext('nospellerrors'))),
	rcube::JQ(rcube::Q($rcmail->gettext('addtodict'))),
	rcube_output::json_serialize($spellcheck_langs),
	$lang
	), 'foot');

	$rcmail->output->add_label('checking');
	$rcmail->output->set_env('spell_langs', $spellcheck_langs);
	$rcmail->output->set_env('spell_lang', $lang);
	}
	}

	public static function prepare_message_body()
	{
	$rcmail = rcmail::get_instance();
	$body = '';

	// use posted message body
	if (!empty($_POST['_message'])) {
	$body = rcube_utils::get_input_value('_message', rcube_utils::INPUT_POST, true);
	$isHtml = (bool) rcube_utils::get_input_value('_is_html', rcube_utils::INPUT_POST);
	}
	else if (!empty(self::$COMPOSE['param']['body'])) {
	$body = self::$COMPOSE['param']['body'];
	$isHtml = !empty(self::$COMPOSE['param']['html']);
	}
	// forward as attachment
	else if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_FORWARD && !empty(self::$COMPOSE['as_attachment'])) {
	$isHtml = self::compose_editor_mode();

	self::write_forward_attachments();
	}
	// reply/edit/draft/forward
	else if (!empty(self::$COMPOSE['mode'])
	&& (self::$COMPOSE['mode'] != rcmail_sendmail::MODE_REPLY \|\| intval($rcmail->config->get('reply_mode')) != -1)
	) {
	$isHtml = self::compose_editor_mode();
	$messages = [];

	// Create a (fake) image attachments map. We need it before we handle
	// the message body. After that we'll go throughout the list and check
	// which images were used in the body and attach them for real or skip.
	if ($isHtml) {
	self::$CID_MAP = self::cid_map(self::$MESSAGE);
	}

	// set is_safe flag (before HTML body washing)
	if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_DRAFT) {
	self::$MESSAGE->is_safe = true;
	}
	else {
	self::check_safe(self::$MESSAGE);
	}

	if (!empty(self::$MESSAGE->parts)) {
	// collect IDs of message/rfc822 parts
	foreach (self::$MESSAGE->mime_parts() as $part) {
	if ($part->mimetype == 'message/rfc822') {
	$messages[] = $part->mime_id;
	}
	}

	foreach (self::$MESSAGE->parts as $part) {
	if (!empty($part->realtype) && $part->realtype == 'multipart/encrypted') {
	// find the encrypted message payload part
	if ($pgp_mime_part = self::$MESSAGE->get_multipart_encrypted_part()) {
	$rcmail->output->set_env('pgp_mime_message', [
	'_mbox' => $rcmail->storage->get_folder(),
	'_uid' => self::$MESSAGE->uid,
	'_part' => $pgp_mime_part->mime_id,
	]);
	}
	continue;
	}

	// skip no-content and attachment parts (#1488557)
	if ($part->type != 'content' \|\| !$part->size \|\| self::$MESSAGE->is_attachment($part)) {
	continue;
	}

	// skip all content parts inside the message/rfc822 part
	foreach ($messages as $mimeid) {
	if (strpos($part->mime_id, $mimeid . '.') === 0) {
	continue 2;
	}
	}

	if ($part_body = self::compose_part_body($part, $isHtml)) {
	$body .= ($body ? ($isHtml ? '<br/>' : "\n") : '') . $part_body;
	}
	}
	}
	else {
	$body = self::compose_part_body(self::$MESSAGE, $isHtml);
	}

	// compose reply-body
	if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_REPLY) {
	$body = self::create_reply_body($body, $isHtml);

	if (!empty(self::$MESSAGE->pgp_mime)) {
	$rcmail->output->set_env('compose_reply_header', self::get_reply_header(self::$MESSAGE));
	}
	}
	// forward message body inline
	else if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_FORWARD) {
	$body = self::create_forward_body($body, $isHtml);
	}
	// load draft message body
	else if (
	self::$COMPOSE['mode'] == rcmail_sendmail::MODE_DRAFT
	\|\| self::$COMPOSE['mode'] == rcmail_sendmail::MODE_EDIT
	) {
	$body = self::create_draft_body($body, $isHtml);
	}

	// Save forwarded files (or inline images) as attachments
	// This will also update inline images location in the body
	self::write_compose_attachments(self::$MESSAGE, $isHtml, $body);
	}
	// new message
	else {
	$isHtml = self::compose_editor_mode();
	}

	$plugin = $rcmail->plugins->exec_hook('message_compose_body', [
	'body' => $body,
	'html' => $isHtml,
	'mode' => self::$COMPOSE['mode'],
	'message' => self::$MESSAGE,
	]);

	$body = $plugin['body'];
	unset($plugin);

	// add blocked.gif attachment (#1486516)
	$regexp = '/ src="' . preg_quote($rcmail->output->asset_url('program/resources/blocked.gif'), '/') . '"/';
	if ($isHtml && preg_match($regexp, $body)) {
	$content = self::get_resource_content('blocked.gif');

	if ($content && ($attachment = self::save_image('blocked.gif', 'image/gif', $content))) {
	self::$COMPOSE['attachments'][$attachment['id']] = $attachment;
	$url = sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s',
	$rcmail->comm_path, self::$COMPOSE['id'], $attachment['id']);
	$body = preg_replace($regexp, ' src="' . $url . '"', $body);
	}
	}

	self::$HTML_MODE = $isHtml;

	return $body;
	}

	public static function compose_part_body($part, $isHtml = false)
	{
	// Check if we have enough memory to handle the message in it
	// #1487424: we need up to 10x more memory than the body
	if (!rcube_utils::mem_check($part->size * 10)) {
	return '';
	}

	// fetch part if not available
	$body = self::$MESSAGE->get_part_body($part->mime_id, true);

	// message is cached but not exists (#1485443), or other error
	if ($body === false) {
	return '';
	}

	$rcmail = rcmail::get_instance();

	// register this part as pgp encrypted
	if (strpos($body, '-----BEGIN PGP MESSAGE-----') !== false) {
	self::$MESSAGE->pgp_mime = true;
	$rcmail->output->set_env('pgp_mime_message', [
	'_mbox' => $rcmail->storage->get_folder(),
	'_uid' => self::$MESSAGE->uid,
	'_part' => $part->mime_id,
	]);
	}

	$strip_signature = self::$COMPOSE['mode'] != rcmail_sendmail::MODE_DRAFT
	&& self::$COMPOSE['mode'] != rcmail_sendmail::MODE_EDIT
	&& $rcmail->config->get('strip_existing_sig', true);

	$flowed = !empty($part->ctype_parameters['format']) && $part->ctype_parameters['format'] == 'flowed';
	$delsp = $flowed && !empty($part->ctype_parameters['delsp']) && $part->ctype_parameters['delsp'] == 'yes';

	if ($isHtml) {
	if ($part->ctype_secondary == 'html') {
	$body = self::prepare_html_body($body);
	}
	else if ($part->ctype_secondary == 'enriched') {
	$body = rcube_enriched::to_html($body);
	}
	else {
	// try to remove the signature
	if ($strip_signature) {
	$body = self::remove_signature($body);
	}

	// add HTML formatting
	$body = self::plain_body($body, $flowed, $delsp);
	}
	}
	else {
	if ($part->ctype_secondary == 'enriched') {
	$body = rcube_enriched::to_html($body);
	$part->ctype_secondary = 'html';
	}

	if ($part->ctype_secondary == 'html') {
	// set line length for body wrapping
	$line_length = $rcmail->config->get('line_length', 72);

	// use html part if it has been used for message (pre)viewing
	// decrease line length for quoting
	$len = self::$COMPOSE['mode'] == rcmail_sendmail::MODE_REPLY ? $line_length-2 : $line_length;
	$body = $rcmail->html2text($body, ['width' => $len]);
	}
	else {
	if ($part->ctype_secondary == 'plain' && $flowed) {
	$body = rcube_mime::unfold_flowed($body, null, $delsp);
	}

	// try to remove the signature
	if ($strip_signature) {
	$body = self::remove_signature($body);
	}
	}
	}

	return $body;
	}

	public static function compose_body($attrib)
	{
	list($form_start, $form_end) = self::$SENDMAIL->form_tags($attrib);
	unset($attrib['form']);

	if (empty($attrib['id'])) {
	$attrib['id'] = 'rcmComposeBody';
	}

	// If desired, set this textarea to be editable by TinyMCE
	$attrib['data-html-editor'] = true;
	if (self::$HTML_MODE) {
	$attrib['class'] = trim($attrib['class'] . ' mce_editor');
	}

	$attrib['name'] = '_message';

	$rcmail = rcmail::get_instance();
	$textarea = new html_textarea($attrib);
	$hidden = new html_hiddenfield();

	$hidden->add(['name' => '_draft_saveid', 'value' => $rcmail->output->get_env('draft_id')]);
	$hidden->add(['name' => '_draft', 'value' => '']);
	$hidden->add(['name' => '_is_html', 'value' => self::$HTML_MODE ? "1" : "0"]);
	$hidden->add(['name' => '_framed', 'value' => '1']);

	$rcmail->output->set_env('composebody', $attrib['id']);

	// include HTML editor
	self::html_editor();

	return ($form_start ? "$form_start\n" : '')
	. "\n" . $hidden->show() . "\n" . $textarea->show(self::$MESSAGE_BODY)
	. ($form_end ? "\n$form_end\n" : '');
	}

	public static function create_reply_body($body, $bodyIsHtml)
	{
	$rcmail = rcmail::get_instance();
	$reply_mode = (int) $rcmail->config->get('reply_mode');
	$reply_indent = $reply_mode != 2;

	// In top-posting without quoting it's better to use multi-line header
	if ($reply_mode == 2) {
	$prefix = self::get_forward_header(self::$MESSAGE, $bodyIsHtml, false);
	}
	else {
	$prefix = self::get_reply_header(self::$MESSAGE);
	if ($bodyIsHtml) {
	$prefix = '<p id="reply-intro">' . rcube::Q($prefix) . '</p>';
	}
	else {
	$prefix .= "\n";
	}
	}

	if (!$bodyIsHtml) {
	// soft-wrap and quote message text
	$line_length = $rcmail->config->get('line_length', 72);
	$body = self::wrap_and_quote($body, $line_length, $reply_indent);

	if ($reply_mode > 0) { // top-posting
	$prefix = "\n\n\n" . $prefix;
	$suffix = '';
	}
	else {
	$suffix = "\n";
	}
	}
	else {
	$suffix = '';

	if ($reply_indent) {
	$prefix .= '<blockquote>';
	$suffix .= '</blockquote>';
	}

	if ($reply_mode == 2) {
	// top-posting, no indent
	}
	else if ($reply_mode > 0) {
	// top-posting
	$prefix = '<br>' . $prefix;
	}
	else {
	$suffix .= '<p><br/></p>';
	}
	}

	return $prefix . $body . $suffix;
	}

	public static function get_reply_header($message)
	{
	$rcmail = rcmail::get_instance();
	$list = rcube_mime::decode_address_list($message->get_header('from'), 1, false, $message->headers->charset);
	$from = array_pop($list);

	return $rcmail->gettext([
	'name' => 'mailreplyintro',
	'vars' => [
	'date' => $rcmail->format_date($message->headers->date, $rcmail->config->get('date_long')),
	'sender' => !empty($from['name']) ? $from['name'] : rcube_utils::idn_to_utf8($from['mailto']),
	]
	]);
	}

	public static function create_forward_body($body, $bodyIsHtml)
	{
	return self::get_forward_header(self::$MESSAGE, $bodyIsHtml) . trim($body, "\r\n");
	}

	public static function get_forward_header($message, $bodyIsHtml = false, $extended = true)
	{
	$rcmail = rcmail::get_instance();
	$date = $rcmail->format_date($message->headers->date, $rcmail->config->get('date_long'));

	if (!$bodyIsHtml) {
	$prefix = "\n\n\n-------- " . $rcmail->gettext('originalmessage') . " --------\n";
	$prefix .= $rcmail->gettext('subject') . ': ' . $message->subject . "\n";
	$prefix .= $rcmail->gettext('date') . ': ' . $date . "\n";
	$prefix .= $rcmail->gettext('from') . ': ' . $message->get_header('from') . "\n";
	$prefix .= $rcmail->gettext('to') . ': ' . $message->get_header('to') . "\n";

	if ($extended && ($cc = $message->headers->get('cc'))) {
	$prefix .= $rcmail->gettext('cc') . ': ' . $cc . "\n";
	}

	if ($extended && ($replyto = $message->headers->get('reply-to')) && $replyto != $message->get_header('from')) {
	$prefix .= $rcmail->gettext('replyto') . ': ' . $replyto . "\n";
	}

	$prefix .= "\n";
	}
	else {
	$prefix = sprintf(
	"<br /><p>-------- " . $rcmail->gettext('originalmessage') . " --------</p>" .
	"<table border=\"0\" cellpadding=\"0\" cellspacing=\"0\"><tbody>" .
	"<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>" .
	"<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>" .
	"<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>" .
	"<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>",
	$rcmail->gettext('subject'), rcube::Q($message->subject),
	$rcmail->gettext('date'), rcube::Q($date),
	$rcmail->gettext('from'), rcube::Q($message->get_header('from'), 'replace'),
	$rcmail->gettext('to'), rcube::Q($message->get_header('to'), 'replace')
	);

	if ($extended && ($cc = $message->headers->get('cc'))) {
	$prefix .= sprintf("<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>",
	$rcmail->gettext('cc'), rcube::Q($cc, 'replace'));
	}

	if ($extended && ($replyto = $message->headers->get('reply-to')) && $replyto != $message->get_header('from')) {
	$prefix .= sprintf("<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>",
	$rcmail->gettext('replyto'), rcube::Q($replyto, 'replace'));
	}

	$prefix .= "</tbody></table><br>";
	}

	return $prefix;
	}

	public static function create_draft_body($body, $bodyIsHtml)
	{
	// Return the draft body as-is
	return $body;
	}

	// Clean up HTML content of Draft/Reply/Forward (part of the message)
	public static function prepare_html_body($body, $wash_params = [])
	{
	static $part_no;

	// Set attributes of the part container
	$container_id = self::$COMPOSE['mode'] . 'body' . (++$part_no);
	$container_attrib = ['id' => $container_id];
	$body_args = [
	'safe' => self::$MESSAGE->is_safe,
	'plain' => false,
	'css_prefix' => 'v' . $part_no,
	];

	// remove comments (produced by washtml)
	$replace = ['/<!--[^>]+-->/' => ''];

	if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_DRAFT) {
	// convert TinyMCE's empty-line sequence (#1490463)
	$replace['/<p>\xC2\xA0<\/p>/'] = '<p><br /></p>';
	// remove <body> tags
	$replace['/<body([^>]*)>/i'] = '';
	$replace['/<\/body>/i'] = '';
	}
	else {
	$body_args['container_id'] = $container_id;
	$body_args['container_attrib'] = $container_attrib;
	}

	// Make the HTML content safe and clean
	$body = self::wash_html($body, $wash_params + $body_args, self::$CID_MAP);
	$body = preg_replace(array_keys($replace), array_values($replace), $body);
	$body = self::html4inline($body, $body_args);

	if (self::$COMPOSE['mode'] != rcmail_sendmail::MODE_DRAFT) {
	$body = html::div($container_attrib, $body);
	}

	return $body;
	}

	// Removes signature from the message body
	public static function remove_signature($body)
	{
	$rcmail = rcmail::get_instance();
	$body = str_replace("\r\n", "\n", $body);
	$len = strlen($body);
	$sig_max_lines = $rcmail->config->get('sig_max_lines', 15);

	while (($sp = strrpos($body, "-- \n", !empty($sp) ? -$len + $sp - 1 : 0)) !== false) {
	if ($sp == 0 \|\| $body[$sp-1] == "\n") {
	// do not touch blocks with more that X lines
	if (substr_count($body, "\n", $sp) < $sig_max_lines) {
	$body = substr($body, 0, max(0, $sp-1));
	}
	break;
	}
	}

	return $body;
	}

	public static function write_compose_attachments(&$message, $bodyIsHtml, &$message_body)
	{
	if (!empty($message->pgp_mime) \|\| !empty(self::$COMPOSE['forward_attachments'])) {
	return;
	}

	$messages = [];
	$loaded_attachments = [];

	if (!empty(self::$COMPOSE['attachments'])) {
	foreach ((array) self::$COMPOSE['attachments'] as $attachment) {
	$loaded_attachments[$attachment['name'] . $attachment['mimetype']] = $attachment;
	}
	}

	$rcmail = rcmail::get_instance();
	$has_html = $message->has_html_part();

	foreach ((array) $message->mime_parts() as $pid => $part) {
	if ($part->mimetype == 'message/rfc822') {
	$messages[] = $part->mime_id;
	}

	if (
	$part->disposition == 'attachment'
	\|\| ($part->disposition == 'inline' && $bodyIsHtml)
	\|\| $part->filename
	\|\| $part->mimetype == 'message/rfc822'
	) {
	// skip parts that aren't valid attachments
	if ($part->ctype_primary == 'multipart' \|\| $part->mimetype == 'application/ms-tnef') {
	continue;
	}

	// skip message attachments in reply mode
	if ($part->ctype_primary == 'message' && self::$COMPOSE['mode'] == rcmail_sendmail::MODE_REPLY) {
	continue;
	}

	// skip version.txt parts of multipart/encrypted messages
	if (!empty($message->pgp_mime) && $part->mimetype == 'application/pgp-encrypted' && $part->filename == 'version.txt') {
	continue;
	}

	// skip attachments included in message/rfc822 attachment (#1486487, #1490607)
	foreach ($messages as $mimeid) {
	if (strpos($part->mime_id, $mimeid . '.') === 0) {
	continue 2;
	}
	}

	$replace = null;

	// Skip inline images when not used in the body
	// Note: Apple Mail sends PDF files marked as inline (#7382)
	// Note: Apple clients send inline images even if there's no HTML body (#7414)
	if ($has_html && $part->disposition == 'inline' && $part->mimetype != 'application/pdf') {
	if (!$bodyIsHtml) {
	continue;
	}

	$idx = $part->content_id ? ('cid:' . $part->content_id) : $part->content_location;

	if ($idx && isset(self::$CID_MAP[$idx]) && strpos($message_body, self::$CID_MAP[$idx]) !== false) {
	$replace = self::$CID_MAP[$idx];
	}
	else {
	continue;
	}
	}
	// skip any other attachment on Reply
	else if (self::$COMPOSE['mode'] == rcmail_sendmail::MODE_REPLY) {
	continue;
	}

	$key = self::attachment_name($part) . $part->mimetype;

	if (!empty($loaded_attachments[$key])) {
	$attachment = $loaded_attachments[$key];
	}
	else {
	$attachment = self::save_attachment($message, $pid, self::$COMPOSE['id']);
	}

	if ($attachment) {
	if ($replace) {
	$url = sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s',
	$rcmail->comm_path, self::$COMPOSE['id'], $attachment['id']);

	$message_body = str_replace($replace, $url, $message_body);
	}
	}
	}
	}

	self::$COMPOSE['forward_attachments'] = true;
	}

	/**
	* Create a map of attachment content-id/content-locations
	*/
	public static function cid_map($message)
	{
	if (!empty($message->pgp_mime)) {
	return [];
	}

	$messages = [];
	$map = [];

	foreach ((array) $message->mime_parts() as $pid => $part) {
	if ($part->mimetype == 'message/rfc822') {
	$messages[] = $part->mime_id;
	}

	if (!empty($part->content_id) \|\| !empty($part->content_location)) {
	// skip attachments included in message/rfc822 attachment (#1486487, #1490607)
	foreach ($messages as $mimeid) {
	if (strpos($part->mime_id, $mimeid . '.') === 0) {
	continue 2;
	}
	}

	$url = sprintf('RCMAP%s', md5($message->folder . '/' . $message->uid . '/' . $pid));
	$idx = !empty($part->content_id) ? ('cid:' . $part->content_id) : $part->content_location;

	$map[$idx] = $url;
	}
	}

	return $map;
	}

	// Creates attachment(s) from the forwarded message(s)
	public static function write_forward_attachments()
	{
	if (!empty(self::$MESSAGE->pgp_mime)) {
	return;
	}

	$rcmail = rcmail::get_instance();
	$storage = $rcmail->get_storage();
	$names = [];
	$refs = [];
	$size_errors = 0;
	$size_limit = parse_bytes($rcmail->config->get('max_message_size'));
	$total_size = 10 * 1024; // size of message body, to start with

	$loaded_attachments = [];

	if (!empty(self::$COMPOSE['attachments'])) {
	foreach ((array) self::$COMPOSE['attachments'] as $attachment) {
	$loaded_attachments[$attachment['name'] . $attachment['mimetype']] = $attachment;
	$total_size += $attachment['size'];
	}
	}

	if (self::$COMPOSE['forward_uid'] == '*') {
	$index = $storage->index(null, self::sort_column(), self::sort_order());
	self::$COMPOSE['forward_uid'] = $index->get();
	}
	else if (!is_array(self::$COMPOSE['forward_uid']) && strpos(self::$COMPOSE['forward_uid'], ':')) {
	self::$COMPOSE['forward_uid'] = rcube_imap_generic::uncompressMessageSet(self::$COMPOSE['forward_uid']);
	}
	else if (is_string(self::$COMPOSE['forward_uid'])) {
	self::$COMPOSE['forward_uid'] = explode(',', self::$COMPOSE['forward_uid']);
	}

	foreach ((array) self::$COMPOSE['forward_uid'] as $uid) {
	$message = new rcube_message($uid);

	if (empty($message->headers)) {
	continue;
	}

	if (!empty($message->headers->charset)) {
	$storage->set_charset($message->headers->charset);
	}

	if (empty(self::$MESSAGE->subject)) {
	self::$MESSAGE->subject = $message->subject;
	}

	// generate (unique) attachment name
	$name = strlen($message->subject) ? mb_substr($message->subject, 0, 64) : 'message_rfc822';
	if (!empty($names[$name])) {
	$names[$name]++;
	$name .= '_' . $names[$name];
	}
	$names[$name] = 1;
	$name .= '.eml';

	if (!empty($loaded_attachments[$name . 'message/rfc822'])) {
	continue;
	}

	if ($size_limit && $size_limit < $total_size + $message->headers->size) {
	$size_errors++;
	continue;
	}

	$total_size += $message->headers->size;

	self::save_attachment($message, null, self::$COMPOSE['id'], ['filename' => $name]);

	if ($message->headers->messageID) {
	$refs[] = $message->headers->messageID;
	}
	}

	// set In-Reply-To and References headers
	if (count($refs) == 1) {
	self::$COMPOSE['reply_msgid'] = $refs[0];
	}

	if (!empty($refs)) {
	self::$COMPOSE['references'] = implode(' ', $refs);
	}

	if ($size_errors) {
	$limit = self::show_bytes($size_limit);
	$error = $rcmail->gettext([
	'name' => 'msgsizeerrorfwd',
	'vars' => ['num' => $size_errors, 'size' => $limit]
	]);
	$script = sprintf("%s.display_message('%s', 'error');", rcmail_output::JS_OBJECT_NAME, rcube::JQ($error));
	$rcmail->output->add_script($script, 'docready');
	}
	}

	/**
	* Saves an image as attachment
	*/
	public static function save_image($path, $mimetype = '', $data = null)
	{
	$is_file = false;

	// handle attachments in memory
	if (empty($data)) {
	$data = file_get_contents($path);
	$is_file = true;
	}

	$name = self::basename($path);

	if (empty($mimetype)) {
	if ($is_file) {
	$mimetype = rcube_mime::file_content_type($path, $name);
	}
	else {
	$mimetype = rcube_mime::file_content_type($data, $name, 'application/octet-stream', true);
	}
	}

	$attachment = [
	'group' => self::$COMPOSE['id'],
	'name' => $name,
	'mimetype' => $mimetype,
	'data' => $data,
	'size' => strlen($data),
	];

	$attachment = rcmail::get_instance()->plugins->exec_hook('attachment_save', $attachment);

	if ($attachment['status']) {
	unset($attachment['data'], $attachment['status'], $attachment['content_id'], $attachment['abort']);
	return $attachment;
	}

	return false;
	}

	/**
	* Unicode-safe basename()
	*/
	public static function basename($filename)
	{
	// basename() is not unicode safe and locale dependent
	if (stristr(PHP_OS, 'win') \|\| stristr(PHP_OS, 'netware')) {
	return preg_replace('/^.*[\\\\\\/]/', '', $filename);
	}
	else {
	return preg_replace('/^.*[\/]/', '', $filename);
	}
	}

	/**
	* Attachments list object for templates
	*/
	public static function compose_attachment_list($attrib)
	{
	// add ID if not given
	if (empty($attrib['id'])) {
	$attrib['id'] = 'rcmAttachmentList';
	}

	$rcmail = rcmail::get_instance();
	$out = '';
	$button = '';
	$jslist = [];

	if (!empty($attrib['icon_pos']) && $attrib['icon_pos'] == 'left') {
	self::$COMPOSE['icon_pos'] = 'left';
	}
	$icon_pos = isset(self::$COMPOSE['icon_pos']) ? self::$COMPOSE['icon_pos'] : null;

	if (!empty(self::$COMPOSE['attachments'])) {
	if (!empty($attrib['deleteicon'])) {
	$button = html::img([
	'src' => $rcmail->output->asset_url($attrib['deleteicon'], true),
	'alt' => $rcmail->gettext('delete')
	]);
	}
	else if (self::get_bool_attr($attrib, 'textbuttons')) {
	$button = rcube::Q($rcmail->gettext('delete'));
	}

	foreach (self::$COMPOSE['attachments'] as $id => $a_prop) {
	if (empty($a_prop)) {
	continue;
	}

	$link_content = sprintf(
	'<span class="attachment-name" onmouseover="rcube_webmail.long_subject_title_ex(this)">%s</span>'
	. ' <span class="attachment-size">(%s)</span>',
	rcube::Q($a_prop['name']),
	self::show_bytes($a_prop['size'])
	);

	$content_link = html::a([
	'href' => '#load',
	'class' => 'filename',
	'onclick' => sprintf(
	"return %s.command('load-attachment','rcmfile%s', this, event)",
	rcmail_output::JS_OBJECT_NAME,
	$id
	),
	'tabindex' => !empty($attrib['tabindex']) ? $attrib['tabindex'] : '0',
	],
	$link_content
	);

	$delete_link = html::a([
	'href' => '#delete',
	'title' => $rcmail->gettext('delete'),
	'onclick' => sprintf(
	"return %s.command('remove-attachment','rcmfile%s', this, event)",
	rcmail_output::JS_OBJECT_NAME,
	$id
	),
	'class' => 'delete',
	'tabindex' => !empty($attrib['tabindex']) ? $attrib['tabindex'] : '0',
	'aria-label' => $rcmail->gettext('delete') . ' ' . $a_prop['name'],
	],
	$button
	);

	$out .= html::tag('li', [
	'id' => 'rcmfile' . $id,
	'class' => rcube_utils::file2class($a_prop['mimetype'], $a_prop['name']),
	],
	$icon_pos == 'left' ? $delete_link.$content_link : $content_link.$delete_link
	);

	$jslist['rcmfile'.$id] = [
	'name' => $a_prop['name'],
	'complete' => true,
	'mimetype' => $a_prop['mimetype']
	];
	}
	}

	if (!empty($attrib['deleteicon'])) {
	self::$COMPOSE['deleteicon'] = $rcmail->output->asset_url($attrib['deleteicon'], true);
	}
	else if (self::get_bool_attr($attrib, 'textbuttons')) {
	self::$COMPOSE['textbuttons'] = true;
	}
	if (!empty($attrib['cancelicon'])) {
	$rcmail->output->set_env('cancelicon', $rcmail->output->asset_url($attrib['cancelicon'], true));
	}
	if (!empty($attrib['loadingicon'])) {
	$rcmail->output->set_env('loadingicon', $rcmail->output->asset_url($attrib['loadingicon'], true));
	}

	$rcmail->output->set_env('attachments', $jslist);
	$rcmail->output->add_gui_object('attachmentlist', $attrib['id']);

	// put tabindex value into data-tabindex attribute
	if (isset($attrib['tabindex'])) {
	$attrib['data-tabindex'] = $attrib['tabindex'];
	unset($attrib['tabindex']);
	}

	return html::tag('ul', $attrib, $out, html::$common_attrib);
	}

	/**
	* Attachment upload form object for templates
	*/
	public static function compose_attachment_form($attrib)
	{
	$rcmail = rcmail::get_instance();

	// Limit attachment size according to message size limit
	$limit = parse_bytes($rcmail->config->get('max_message_size')) / 1.33;

	return self::upload_form($attrib, 'uploadform', 'send-attachment', ['multiple' => true], $limit);
	}

	/**
	* Register a certain container as active area to drop files onto
	*/
	public static function compose_file_drop_area($attrib)
	{
	$rcmail = rcmail::get_instance();

	if (!empty($attrib['id'])) {
	$rcmail->output->add_gui_object('filedrop', $attrib['id']);
	$rcmail->output->set_env('filedrop', ['action' => 'upload', 'fieldname' => '_attachments']);
	}
	}

	/**
	* Editor mode selector object for templates
	*/
	public static function editor_selector($attrib)
	{
	$rcmail = rcmail::get_instance();

	// determine whether HTML or plain text should be checked
	$useHtml = self::compose_editor_mode();

	if (empty($attrib['editorid'])) {
	$attrib['editorid'] = 'rcmComposeBody';
	}

	if (empty($attrib['name'])) {
	$attrib['name'] = 'editorSelect';
	}

	$attrib['onchange'] = "return rcmail.command('toggle-editor', {id: '".$attrib['editorid']."', html: this.value == 'html'}, '', event)";

	$select = new html_select($attrib);

	$select->add(rcube::Q($rcmail->gettext('htmltoggle')), 'html');
	$select->add(rcube::Q($rcmail->gettext('plaintoggle')), 'plain');

	return $select->show($useHtml ? 'html' : 'plain');
	}

	/**
	* Addressbooks list object for templates
	*/
	public static function addressbook_list($attrib = [])
	{
	$rcmail = rcmail::get_instance();

	$attrib += ['id' => 'rcmdirectorylist'];

	$line_templ = html::tag('li',
	['id' => 'rcmli%s', 'class' => '%s'],
	html::a([
	'href' => '#list',
	'rel' => '%s',
	'onclick' => "return ".rcmail_output::JS_OBJECT_NAME.".command('list-addresses','%s',this)"
	],
	'%s'
	)
	);

	$out = '';

	foreach ($rcmail->get_address_sources(false, true) as $j => $source) {
	$id = strval(strlen($source['id']) ? $source['id'] : $j);
	$js_id = rcube::JQ($id);

	// set class name(s)
	$class_name = 'addressbook';
	if (!empty($source['class_name'])) {
	$class_name .= ' ' . $source['class_name'];
	}

	$out .= sprintf($line_templ,
	rcube_utils::html_identifier($id,true),
	$class_name,
	$source['id'],
	$js_id,
	!empty($source['name']) ? $source['name'] : $id
	);
	}

	$rcmail->output->add_gui_object('addressbookslist', $attrib['id']);

	return html::tag('ul', $attrib, $out, html::$common_attrib);
	}

	/**
	* Contacts list object for templates
	*/
	public static function contacts_list($attrib = [])
	{
	$rcmail = rcmail::get_instance();

	$attrib += ['id' => 'rcmAddressList'];

	// set client env
	$rcmail->output->add_gui_object('contactslist', $attrib['id']);
	$rcmail->output->set_env('pagecount', 0);
	$rcmail->output->set_env('current_page', 0);
	$rcmail->output->include_script('list.js');

	return $rcmail->table_output($attrib, [], ['name'], 'ID');
	}

	/**
	* Responses list object for templates
	*/
	public static function compose_responses_list($attrib)
	{
	$rcmail = rcmail::get_instance();

	$attrib += ['id' => 'rcmresponseslist', 'tagname' => 'ul', 'cols' => 1];

	$jsenv = [];
	$list = new html_table($attrib);

	foreach ($rcmail->get_compose_responses(true) as $response) {
	$key = $response['key'];
	$item = html::a([
	'href' => '#' . urlencode($response['name']),
	'class' => rtrim('insertresponse ' . $attrib['itemclass']),
	'unselectable' => 'on',
	'tabindex' => '0',
	'rel' => $key,
	],
	rcube::Q($response['name'])
	);

	$jsenv[$key] = $response;

	$list->add([], $item);
	}

	// add placeholder text when there are no responses available
	if (!empty($attrib['list-placeholder']) && $list->size() == 0) {
	$list->add([], html::a([
	'href' => '#',
	'class' => rtrim('insertresponse placeholder disabled'),
	'unselectable' => 'on',
	'tabindex' => '0',
	'aria-disabled' => 'true',
	],
	rcube::Q($rcmail->gettext($attrib['list-placeholder']))
	));
	}

	// set client env
	$rcmail->output->set_env('textresponses', $jsenv);
	$rcmail->output->add_gui_object('responseslist', $attrib['id']);

	return $list->show();
	}

	public static function save_attachment($message, $pid, $compose_id, $params = [])
	{
	$rcmail = rcmail::get_instance();
	$storage = $rcmail->get_storage();

	if ($pid) {
	// attachment requested
	$part = $message->mime_parts[$pid];
	$size = $part->size;
	$mimetype = $part->ctype_primary . '/' . $part->ctype_secondary;
	$filename = !empty($params['filename']) ? $params['filename'] : self::attachment_name($part);
	}
	else if ($message instanceof rcube_message) {
	// the whole message requested
	$size = isset($message->size) ? $message->size : null;
	$mimetype = 'message/rfc822';
	$filename = !empty($params['filename']) ? $params['filename'] : 'message_rfc822.eml';
	}
	else if (is_string($message)) {
	// the whole message requested
	$size = strlen($message);
	$data = $message;
	$mimetype = $params['mimetype'];
	$filename = $params['filename'];
	}
	else {
	return;
	}

	if (!isset($data)) {
	$data = null;
	$path = null;

	// don't load too big attachments into memory
	if (!rcube_utils::mem_check($size)) {
	$path = rcube_utils::temp_filename('attmnt');

	if ($fp = fopen($path, 'w')) {
	if ($pid) {
	// part body
	$message->get_part_body($pid, false, 0, $fp);
	}
	else {
	// complete message
	$storage->get_raw_body($message->uid, $fp);
	}

	fclose($fp);
	}
	else {
	return false;
	}
	}
	else if ($pid) {
	// part body
	$data = $message->get_part_body($pid);
	}
	else {
	// complete message
	$data = $storage->get_raw_body($message->uid);
	}
	}

	$attachment = [
	'group' => $compose_id,
	'name' => $filename,
	'mimetype' => $mimetype,
	'content_id' => !empty($part) && isset($part->content_id) ? $part->content_id : null,
	'data' => $data,
	'path' => isset($path) ? $path : null,
	'size' => isset($path) ? filesize($path) : strlen($data),
	'charset' => !empty($part) ? $part->charset : (isset($params['charset']) ? $params['charset'] : null),
	];

	$attachment = $rcmail->plugins->exec_hook('attachment_save', $attachment);

	if ($attachment['status']) {
	unset($attachment['data'], $attachment['status'], $attachment['content_id'], $attachment['abort']);

	// rcube_session::append() replaces current session data with the old values
	// (in rcube_session::reload()). This is a problem in 'compose' action, because before
	// the first append() use we set some important data in the session.
	// It also overwrites attachments list. Fixing reload() is not so simple if possible
	// as we don't really know what has been added and what removed in meantime.
	// So, for now we'll do not use append() on 'compose' action (#1490608).

	if ($rcmail->action == 'compose') {
	self::$COMPOSE['attachments'][$attachment['id']] = $attachment;
	}
	else {
	$rcmail->session->append('compose_data_' . $compose_id . '.attachments', $attachment['id'], $attachment);
	}

	return $attachment;
	}
	else if (!empty($path)) {
	@unlink($path);
	}

	return false;
	}
	}

File Metadata

Mime Type: text/x-php
Expires: Fri, May 22, 4:29 AM (1 d, 23 h)
Storage Engine: blob
Storage Format: Raw Data
Storage Handle: 756175
Default Alt Text: compose.php (65 KB)

compose.phpNo OneTemporaryActions

compose.phpView Options

File Metadata

Event Timeline

compose.php
No OneTemporary
Actions

compose.php
View Options