!C99Shell v. 2.0 [PHP 7 Update] [25.02.2019]!

Software: Apache/2.2.22 (Debian). PHP/5.6.36 

uname -a: Linux h05.hvosting.ua 4.9.110-amd64 #3 SMP Sun Nov 4 16:27:09 UTC 2018 x86_64 

uid=1389(h33678) gid=1099(h33678) groups=1099(h33678),502(mgrsecure) 

Safe-mode: OFF (not secure)

/usr/share/roundcube/program/steps/mail/   drwxr-xr-x
Free 1.45 GB of 7.22 GB (20.03%)
Home    Back    Forward    UPDIR    Refresh    Search    Buffer    Encoder    Tools    Proc.    FTP brute    Sec.    SQL    PHP-code    Update    Feedback    Self remove    Logout    


Viewing file:     compose.inc (55.24 KB)      -rw-r--r--
Select action/file-type:
(+) | (+) | (+) | Code (+) | Session (+) | (+) | SDB (+) | (+) | (+) | (+) | (+) | (+) |
<?php

/*
 +-----------------------------------------------------------------------+
 | program/steps/mail/compose.inc                                        |
 |                                                                       |
 | This file is part of the Roundcube Webmail client                     |
 | Copyright (C) 2005-2012, 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>                        |
 +-----------------------------------------------------------------------+
*/

// define constants for message compose mode
define('RCUBE_COMPOSE_REPLY''reply');
define('RCUBE_COMPOSE_FORWARD''forward');
define('RCUBE_COMPOSE_DRAFT''draft');
define('RCUBE_COMPOSE_EDIT''edit');

$MESSAGE_FORM null;
$COMPOSE_ID   get_input_value('_id'RCUBE_INPUT_GET);
$COMPOSE      null;

if (
$COMPOSE_ID && $_SESSION['compose_data_'.$COMPOSE_ID])
  
$COMPOSE =& $_SESSION['compose_data_'.$COMPOSE_ID];

// give replicated session storage some time to synchronize
$retries 0;
while (
$COMPOSE_ID && !is_array($COMPOSE) && $RCMAIL->db->is_replicated() && $retries++ < 5) {
  
usleep(500000);
  
$RCMAIL->session->reload();
  if (
$_SESSION['compose_data_'.$COMPOSE_ID])
    
$COMPOSE =& $_SESSION['compose_data_'.$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($COMPOSE))
{
  
// Infinite redirect prevention in case of broken session (#1487028)
  
if ($COMPOSE_ID)
    
raise_error(array('code' => 500'type' => 'php',
      
'file' => __FILE__'line' => __LINE__,
      
'message' => "Invalid compose ID"), truetrue);

  
$COMPOSE_ID uniqid(mt_rand());
  
$_SESSION['compose_data_'.$COMPOSE_ID] = array(
    
'id'      => $COMPOSE_ID,
    
'param'   => request2param(RCUBE_INPUT_GET),
    
'mailbox' => $RCMAIL->storage->get_folder(),
  );
  
$COMPOSE =& $_SESSION['compose_data_'.$COMPOSE_ID];

  
// process values like "mailto:foo@bar.com?subject=new+message&cc=another"
  
if ($COMPOSE['param']['to']) {
    
// #1486037: remove "mailto:" prefix
    
$COMPOSE['param']['to'] = preg_replace('/^mailto:/i'''$COMPOSE['param']['to']);
    
$mailto explode('?'$COMPOSE['param']['to']);
    if (
count($mailto) > 1) {
      
$COMPOSE['param']['to'] = $mailto[0];
      
parse_str($mailto[1], $query);
      foreach (
$query as $f => $val)
        
$COMPOSE['param'][$f] = $val;
    }
  }

  
// 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 (is_array($plugin['attachments'])) {
    foreach (
$plugin['attachments'] as $attach) {
      
// we have structured data
      
if (is_array($attach)) {
        
$attachment $attach;
      }
      
// only a file path is given
      
else {
        
$filename basename($attach);
        
$attachment = array(
          
'group' => $COMPOSE_ID,
          
'name' => $filename,
          
'mimetype' => rc_mime_content_type($attach$filename),
          
'path' => $attach,
        );
      }

      
// save attachment if valid
      
if (($attachment['data'] && $attachment['name']) || ($attachment['path'] && file_exists($attachment['path']))) {
        
$attachment rcmail::get_instance()->plugins->exec_hook('attachment_save'$attachment);
      }

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

  
// check if folder for saving sent messages exists and is subscribed (#1486802)
  
if ($sent_folder $COMPOSE['param']['sent_mbox']) {
    
rcmail_check_sent_folder($sent_foldertrue);
  }

  
// redirect to a unique URL with all parameters stored in session
  
$OUTPUT->redirect(array(
    
'_action' => 'compose',
    
'_id'     => $COMPOSE['id'],
    
'_search' => $_REQUEST['_search'],
  ));
}


// add some labels to client
$OUTPUT->add_label('nosubject''nosenderwarning''norecipientwarning''nosubjectwarning''cancel',
    
'nobodywarning''notsentwarning''notuploadedwarning''savingmessage''sendingmessage'
    
'messagesaved''converting''editorwarning''searching''uploading''uploadingmany',
    
'fileuploaderror''sendmessage');

$OUTPUT->set_env('compose_id'$COMPOSE['id']);
$OUTPUT->set_pagetitle(rcube_label('compose'));

// add config parameters to client script
if (!empty($CONFIG['drafts_mbox'])) {
  
$OUTPUT->set_env('drafts_mailbox'$CONFIG['drafts_mbox']);
  
$OUTPUT->set_env('draft_autosave'$CONFIG['draft_autosave']);
}
// set current mailbox in client environment
$OUTPUT->set_env('mailbox'$RCMAIL->storage->get_folder());
$OUTPUT->set_env('top_posting'intval($RCMAIL->config->get('reply_mode')) > 0);
$OUTPUT->set_env('recipients_separator'trim($RCMAIL->config->get('recipients_separator'',')));

// default font for HTML editor
$font rcube_fontdefs($RCMAIL->config->get('default_font'));
if (
$font && !is_array($font)) {
  
$OUTPUT->set_env('default_font'$font);
}

// get reference message and set compose mode
if ($msg_uid $COMPOSE['param']['draft_uid']) {
  
$compose_mode RCUBE_COMPOSE_DRAFT;
  
$OUTPUT->set_env('draft_id'$msg_uid);
  
$RCMAIL->storage->set_folder($CONFIG['drafts_mbox']);
}
else if (
$msg_uid $COMPOSE['param']['reply_uid']) {
  
$compose_mode RCUBE_COMPOSE_REPLY;
}
else if (
$msg_uid $COMPOSE['param']['forward_uid']) {
  
$compose_mode RCUBE_COMPOSE_FORWARD;
  
$COMPOSE['forward_uid']   = $msg_uid;
  
$COMPOSE['as_attachment'] = !empty($COMPOSE['param']['attachment']);
}
else if (
$msg_uid $COMPOSE['param']['uid']) {
  
$compose_mode RCUBE_COMPOSE_EDIT;
}
$OUTPUT->set_env('compose_mode'$compose_mode);

$config_show_sig $RCMAIL->config->get('show_sig'1);
if (
$compose_mode == RCUBE_COMPOSE_EDIT || $compose_mode == RCUBE_COMPOSE_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 == || $config_show_sig == 2)
    
$OUTPUT->set_env('show_sig_later'true);
}
else if (
$config_show_sig == 1)
  
$OUTPUT->set_env('show_sig'true);
else if (
$config_show_sig == && empty($compose_mode))
  
$OUTPUT->set_env('show_sig'true);
else if (
$config_show_sig == && ($compose_mode == RCUBE_COMPOSE_REPLY || $compose_mode == RCUBE_COMPOSE_FORWARD))
  
$OUTPUT->set_env('show_sig'true);

// set line length for body wrapping
$LINE_LENGTH $RCMAIL->config->get('line_length'72);

if (!empty(
$msg_uid) && empty($COMPOSE['as_attachment']))
{
  
// similar as in program/steps/mail/show.inc
  // re-set 'prefer_html' to have possibility to use html part for compose
  
$CONFIG['prefer_html'] = $CONFIG['prefer_html'] || $CONFIG['htmleditor'] || $compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT;
  
$MESSAGE = new rcube_message($msg_uid);

  
// make sure message is marked as read
  
if ($MESSAGE->headers && empty($MESSAGE->headers->flags['SEEN']))
    
$RCMAIL->storage->set_flag($msg_uid'SEEN');

  if (!empty(
$MESSAGE->headers->charset))
    
$RCMAIL->storage->set_charset($MESSAGE->headers->charset);

  if (!
$MESSAGE->headers) {
    
// error
  
}
  else if (
$compose_mode == RCUBE_COMPOSE_REPLY) {
    
$COMPOSE['reply_uid'] = $msg_uid;
    
$COMPOSE['reply_msgid'] = $MESSAGE->headers->messageID;
    
$COMPOSE['references']  = trim($MESSAGE->headers->references " " $MESSAGE->headers->messageID);

    if (!empty(
$COMPOSE['param']['all']))
      
$MESSAGE->reply_all $COMPOSE['param']['all'];

    
// Save the sent message in the same folder of the message being replied to
    
if ($RCMAIL->config->get('reply_same_folder') && ($sent_folder $COMPOSE['mailbox'])
      && 
rcmail_check_sent_folder($sent_folderfalse)
    ) {
      
$COMPOSE['param']['sent_mbox'] = $sent_folder;
    }
  }
  else if (
$compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT) {
    if (
$compose_mode == RCUBE_COMPOSE_DRAFT && ($draft_info $MESSAGE->headers->get('x-draft-info'))) {
      
// get reply_uid/forward_uid to flag the original message when sending
      
$info rcmail_draftinfo_decode($draft_info);

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

      
$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_check_sent_folder($sent_folderfalse)
      ) {
        
$COMPOSE['param']['sent_mbox'] = $sent_folder;
      }
    }

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

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

$MESSAGE->compose = array();

// get user's identities
$MESSAGE->identities $RCMAIL->user->list_identities(nulltrue);

// Set From field value
if (!empty($_POST['_from'])) {
  
$MESSAGE->compose['from'] = get_input_value('_from'RCUBE_INPUT_POST);
}
else if (!empty(
$COMPOSE['param']['from'])) {
  
$MESSAGE->compose['from'] = $COMPOSE['param']['from'];
}
else if (
count($MESSAGE->identities)) {
  
$ident rcmail_identity_select($MESSAGE$MESSAGE->identities$compose_mode);

  
$MESSAGE->compose['from_email'] = $ident['email'];
  
$MESSAGE->compose['from']       = $ident['identity_id'];
}

// Set other headers
$a_recipients = array();
$parts        = array('to''cc''bcc''replyto''followupto');
$separator    trim($RCMAIL->config->get('recipients_separator'',')) . ' ';

foreach (
$parts as $header) {
  
$fvalue '';
  
$decode_header true;

  
// we have a set of recipients stored is session
  
if ($header == 'to' && ($mailto_id $COMPOSE['param']['mailto'])
      && 
$_SESSION['mailto'][$mailto_id]
  ) {
    
$fvalue urldecode($_SESSION['mailto'][$mailto_id]);
    
$decode_header false;

    
// make session to not grow up too much
    
unset($_SESSION['mailto'][$mailto_id]);
    
$COMPOSE['param']['to'] = $fvalue;
  }
  else if (!empty(
$_POST['_'.$header])) {
    
$fvalue get_input_value('_'.$headerRCUBE_INPUT_POSTTRUE);
  }
  else if (!empty(
$COMPOSE['param'][$header])) {
    
$fvalue $COMPOSE['param'][$header];
  }
  else if (
$compose_mode == RCUBE_COMPOSE_REPLY) {
    
// get recipent address(es) out of the message headers
    
if ($header == 'to') {
      
$mailfollowup $MESSAGE->headers->others['mail-followup-to'];
      
$mailreplyto  $MESSAGE->headers->others['mail-reply-to'];

      
// Reply to mailing list...
      
if ($MESSAGE->reply_all == 'list' && $mailfollowup)
        
$fvalue $mailfollowup;
      else if (
$MESSAGE->reply_all == 'list'
        
&& preg_match('/<mailto:([^>]+)>/i'$MESSAGE->headers->others['list-post'], $m))
        
$fvalue $m[1];
      
// Reply to...
      
else if ($MESSAGE->reply_all && $mailfollowup)
        
$fvalue $mailfollowup;
      else if (
$mailreplyto)
        
$fvalue $mailreplyto;
      else if (!empty(
$MESSAGE->headers->replyto))
        
$fvalue $MESSAGE->headers->replyto;
      else if (!empty(
$MESSAGE->headers->from))
        
$fvalue $MESSAGE->headers->from;

      
// Reply to message sent by yourself (#1487074)
      
if (!empty($ident) && $fvalue == $ident['ident']) {
        
$fvalue $MESSAGE->headers->to;
      }
    }
    
// add recipient of original message if reply to all
    
else if ($header == 'cc' && !empty($MESSAGE->reply_all) && $MESSAGE->reply_all != 'list') {
      if (
$v $MESSAGE->headers->to)
        
$fvalue .= $v;
      if (
$v $MESSAGE->headers->cc)
        
$fvalue .= (!empty($fvalue) ? $separator '') . $v;
      
// Use Sender header (#1489011)
      
if (($v $MESSAGE->headers->get('Sender'false)) && strpos($v'-bounces@') === false)
        
$fvalue .= (!empty($fvalue) ? $separator '') . $v;

      
// When To: and Reply-To: are the same we add From: address to the list (#1489037)
      
if ($v $MESSAGE->headers->from) {
        
$from    rcube_mime::decode_address_list($vnullfalse$MESSAGE->headers->charsettrue);
        
$to      rcube_mime::decode_address_list($MESSAGE->headers->tonullfalse$MESSAGE->headers->charsettrue);
        
$replyto rcube_mime::decode_address_list($MESSAGE->headers->replytonullfalse$MESSAGE->headers->charsettrue);

        if (
count($replyto) && !count(array_diff($to$replyto)) && count(array_diff($from$to))) {
          
$fvalue .= (!empty($fvalue) ? $separator '') . $v;
        }
      }
    }
  }
  else if (
in_array($compose_mode, array(RCUBE_COMPOSE_DRAFTRCUBE_COMPOSE_EDIT))) {
    
// get drafted headers
    
if ($header=='to' && !empty($MESSAGE->headers->to))
      
$fvalue $MESSAGE->get_header('to'true);
    else if (
$header=='cc' && !empty($MESSAGE->headers->cc))
      
$fvalue $MESSAGE->get_header('cc'true);
    else if (
$header=='bcc' && !empty($MESSAGE->headers->bcc))
      
$fvalue $MESSAGE->get_header('bcc'true);
    else if (
$header=='replyto' && !empty($MESSAGE->headers->others['mail-reply-to']))
      
$fvalue $MESSAGE->get_header('mail-reply-to');
    else if (
$header=='replyto' && !empty($MESSAGE->headers->replyto))
      
$fvalue $MESSAGE->get_header('reply-to');
    else if (
$header=='followupto' && !empty($MESSAGE->headers->others['mail-followup-to']))
      
$fvalue $MESSAGE->get_header('mail-followup-to');
  }

  
// split recipients and put them back together in a unique way
  
if (!empty($fvalue) && in_array($header, array('to''cc''bcc'))) {
    
$to_addresses rcube_mime::decode_address_list($fvaluenull$decode_header$MESSAGE->headers->charset);
    
$fvalue = array();

    foreach (
$to_addresses as $addr_part) {
      if (empty(
$addr_part['mailto']))
        continue;

      
$mailto format_email(rcube_idn_to_utf8($addr_part['mailto']));

      if (!
in_array($mailto$a_recipients)
        && (
          
$header == 'to'
          
|| $compose_mode != RCUBE_COMPOSE_REPLY
          
|| empty($MESSAGE->compose['from_email'])
          || 
$mailto != $MESSAGE->compose['from_email']
        )
      ) {
        if (
$addr_part['name'] && $addr_part['mailto'] != $addr_part['name'])
          
$string format_email_recipient($mailto$addr_part['name']);
        else
          
$string $mailto;

        
$fvalue[] = $string;
        
$a_recipients[] = $addr_part['mailto'];
      }
    }

    
$fvalue implode($separator$fvalue);
  }

  
$MESSAGE->compose[$header] = $fvalue;
}
unset(
$a_recipients);

// process $MESSAGE body/attachments, set $MESSAGE_BODY/$HTML_MODE vars and some session data
$MESSAGE_BODY rcmail_prepare_message_body();


/****** compose mode functions ********/

function rcmail_compose_headers($attrib)
{
  global 
$MESSAGE;

  list(
$form_start$form_end) = get_form_tags($attrib);

  
$out  '';
  
$part strtolower($attrib['part']);

  switch (
$part)
  {
    case 
'from':
      return 
$form_start rcmail_compose_header_from($attrib);

    case 
'to':
    case 
'cc':
    case 
'bcc':
      
$fname '_' $part;
      
$header $param $part;

      
$allow_attrib = array('id''class''style''cols''rows''tabindex');
      
$field_type 'html_textarea';
      break;

    case 
'replyto':
    case 
'reply-to':
      
$fname '_replyto';
      
$param 'replyto';
      
$header 'reply-to';

    case 
'followupto':
    case 
'followup-to':
      if (!
$fname) {
        
$fname '_followupto';
        
$param 'followupto';
        
$header 'mail-followup-to';
      }

      
$allow_attrib = array('id''class''style''size''tabindex');
      
$field_type 'html_inputfield';
      break;
  }

  if (
$fname && $field_type)
  {
    
// pass the following attributes to the form class
    
$field_attrib = array('name' => $fname'spellcheck' => 'false');
    foreach (
$attrib as $attr => $value)
      if (
in_array($attr$allow_attrib))
        
$field_attrib[$attr] = $value;

    
// create teaxtarea object
    
$input = new $field_type($field_attrib);
    
$out $input->show($MESSAGE->compose[$param]);
  }

  if (
$form_start)
    
$out $form_start.$out;

  
// configure autocompletion
  
rcube_autocomplete_init();

  return 
$out;
}


function 
rcmail_compose_header_from($attrib)
{
  global 
$MESSAGE$OUTPUT$RCMAIL$compose_mode;

  
// pass the following attributes to the form class
  
$field_attrib = array('name' => '_from');
  foreach (
$attrib as $attr => $value)
    if (
in_array($attr, array('id''class''style''size''tabindex')))
      
$field_attrib[$attr] = $value;

  if (
count($MESSAGE->identities))
  {
    
$a_signatures = array();
    
$separator    intval($RCMAIL->config->get('reply_mode')) > 0
      
&& ($compose_mode == RCUBE_COMPOSE_REPLY || $compose_mode == RCUBE_COMPOSE_FORWARD) ? '---' '-- ';

    
$field_attrib['onchange'] = JS_OBJECT_NAME.".change_identity(this)";
    
$select_from = new html_select($field_attrib);

    
// create SELECT element
    
foreach ($MESSAGE->identities as $sql_arr)
    {
      
$identity_id $sql_arr['identity_id'];
      
$select_from->add(format_email_recipient($sql_arr['email'], $sql_arr['name']), $identity_id);

      
// add signature to array
      
if (!empty($sql_arr['signature']) && empty($COMPOSE['param']['nosig']))
      {
        
$text $html $sql_arr['signature'];

        if (
$sql_arr['html_signature']) {
            
$h2t  = new rcube_html2text($sql_arr['signature'], falsefalse);
            
$text trim($h2t->get_text());
        }
        else {
            
$html htmlentities($htmlENT_NOQUOTESRCMAIL_CHARSET);
        }

        if (!
preg_match('/^--[ -]\r?\n/m'$text)) {
            
$text $separator "\n" $text;
            
$html $separator "<br>" $html;
        }

        if (!
$sql_arr['html_signature']) {
            
$html "<pre>" $html "</pre>";
        }

        
$a_signatures[$identity_id]['text'] = $text;
        
$a_signatures[$identity_id]['html'] = $html;
      }
    }

    
$out $select_from->show($MESSAGE->compose['from']);

    
// add signatures to client
    
$OUTPUT->set_env('signatures'$a_signatures);
  }
  
// no identities, display text input field
  
else {
    
$field_attrib['class'] = 'from_address';
    
$input_from = new html_inputfield($field_attrib);
    
$out $input_from->show($MESSAGE->compose['from']);
  }

  return 
$out;
}


function 
rcmail_compose_editor_mode()
{
  global 
$RCMAIL$compose_mode;
  static 
$useHtml;

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

  
$html_editor intval($RCMAIL->config->get('htmleditor'));

  if (isset(
$_POST['_is_html'])) {
    
$useHtml = !empty($_POST['_is_html']);
  }
  else if (
$compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT) {
    
$useHtml rcmail_message_is_html();
  }
  else if (
$compose_mode == RCUBE_COMPOSE_REPLY) {
    
$useHtml = ($html_editor == || ($html_editor >= && rcmail_message_is_html()));
  }
  else if (
$compose_mode == RCUBE_COMPOSE_FORWARD) {
    
$useHtml = ($html_editor == || ($html_editor == && rcmail_message_is_html()));
  }
  else {
    
$useHtml = ($html_editor == 1);
  }

  return 
$useHtml;
}

function 
rcmail_message_is_html()
{
    global 
$MESSAGE;
    return (
$MESSAGE instanceof rcube_message) && $MESSAGE->has_html_part(falsetrue);
}

function 
rcmail_prepare_message_body()
{
  global 
$RCMAIL$MESSAGE$COMPOSE$compose_mode$LINE_LENGTH$HTML_MODE;

  
// use posted message body
  
if (!empty($_POST['_message'])) {
    
$body get_input_value('_message'RCUBE_INPUT_POSTtrue);
    
$isHtml = (bool) get_input_value('_is_html'RCUBE_INPUT_POST);
  }
  else if (
$COMPOSE['param']['body']) {
    
$body $COMPOSE['param']['body'];
    
$isHtml false;
  }
  
// forward as attachment
  
else if ($compose_mode == RCUBE_COMPOSE_FORWARD && $COMPOSE['as_attachment']) {
    
$isHtml rcmail_compose_editor_mode();
    
$body '';
    
rcmail_write_forward_attachments();
  }
  
// reply/edit/draft/forward
  
else if ($compose_mode && ($compose_mode != RCUBE_COMPOSE_REPLY || intval($RCMAIL->config->get('reply_mode')) != -1)) {
    
$isHtml   rcmail_compose_editor_mode();
    
$messages = array();

    if (!empty(
$MESSAGE->parts)) {
      
// collect IDs of message/rfc822 parts
      
if ($compose_mode == RCUBE_COMPOSE_EDIT || $compose_mode == RCUBE_COMPOSE_DRAFT) {
        foreach (
$MESSAGE->attachments as $part) {
          if (
$part->mimetype == 'message/rfc822') {
            
$messages[] = $part->mime_id;
          }
        }
      }

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

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

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

    
// compose reply-body
    
if ($compose_mode == RCUBE_COMPOSE_REPLY)
      
$body rcmail_create_reply_body($body$isHtml);
    
// forward message body inline
    
else if ($compose_mode == RCUBE_COMPOSE_FORWARD)
      
$body rcmail_create_forward_body($body$isHtml);
    
// load draft message body
    
else if ($compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT)
      
$body rcmail_create_draft_body($body$isHtml);
  }
  else { 
// new message
    
$isHtml rcmail_compose_editor_mode();
  }

  
$plugin $RCMAIL->plugins->exec_hook('message_compose_body',
    array(
'body' => $body'html' => $isHtml'mode' => $compose_mode));
  
$body $plugin['body'];
  unset(
$plugin);

  
// add blocked.gif attachment (#1486516)
  
if ($isHtml && preg_match('#<img src="\./program/resources/blocked\.gif"#'$body)) {
    if (
$attachment rcmail_save_image('program/resources/blocked.gif''image/gif')) {
      
$COMPOSE['attachments'][$attachment['id']] = $attachment;
      
$url sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s',
        
$RCMAIL->comm_path$COMPOSE['id'], $attachment['id']);
      
$body preg_replace('#\./program/resources/blocked\.gif#'$url$body);
    }
  }

  
$HTML_MODE $isHtml;

  return 
$body;
}

function 
rcmail_compose_part_body($part$isHtml false)
{
    global 
$RCMAIL$MESSAGE$LINE_LENGTH$compose_mode;

    
// Check if we have enough memory to handle the message in it
    // #1487424: we need up to 10x more memory than the body
    
if (!rcmail_mem_check($part->size 10)) {
        return 
'';
    }

    if (empty(
$part->ctype_parameters) || empty($part->ctype_parameters['charset'])) {
        
$part->ctype_parameters['charset'] = $MESSAGE->headers->charset;
    }

    
// fetch part if not available
    
if (!isset($part->body)) {
        
$part->body $MESSAGE->get_part_content($part->mime_id);
    }

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

    
$body $part->body;

    if (
$isHtml) {
        if (
$part->ctype_secondary == 'html') {
        }
        else if (
$part->ctype_secondary == 'enriched') {
            
$body rcube_enriched::to_html($body);
        }
        else {
            
// try to remove the signature
            
if ($compose_mode != RCUBE_COMPOSE_DRAFT && $compose_mode != RCUBE_COMPOSE_EDIT) {
                if (
$RCMAIL->config->get('strip_existing_sig'true)) {
                    
$body rcmail_remove_signature($body);
                }
            }
            
// add HTML formatting
            
$body rcmail_plain_body($body);
            if (
$body) {
                
$body '<pre>' $body '</pre>';
            }
        }
    }
    else {
        if (
$part->ctype_secondary == 'enriched') {
            
$body rcube_enriched::to_html($body);
            
$part->ctype_secondary 'html';
        }

        if (
$part->ctype_secondary == 'html') {
            
// use html part if it has been used for message (pre)viewing
            // decrease line length for quoting
            
$len $compose_mode == RCUBE_COMPOSE_REPLY $LINE_LENGTH-$LINE_LENGTH;
            
$txt = new rcube_html2text($bodyfalsetrue$len);
            
$body $txt->get_text();
        }
        else if (
$part->ctype_secondary == 'enriched') {
            
$body rcube_enriched::to_html($body);
        }
        else {
            if (
$part->ctype_secondary == 'plain' && $part->ctype_parameters['format'] == 'flowed') {
                
$body rcube_mime::unfold_flowed($body);
            }

            
// try to remove the signature
            
if ($compose_mode != RCUBE_COMPOSE_DRAFT && $compose_mode != RCUBE_COMPOSE_EDIT) {
                if (
$RCMAIL->config->get('strip_existing_sig'true)) {
                    
$body rcmail_remove_signature($body);
                }
            }
        }
    }

    return 
$body;
}

function 
rcmail_compose_body($attrib)
{
  global 
$RCMAIL$CONFIG$OUTPUT$MESSAGE$compose_mode$LINE_LENGTH$HTML_MODE$MESSAGE_BODY;

  list(
$form_start$form_end) = get_form_tags($attrib);
  unset(
$attrib['form']);

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

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

  
$isHtml $HTML_MODE;

  
$out $form_start "$form_start\n" '';

  
$saveid = new html_hiddenfield(array('name' => '_draft_saveid''value' => $compose_mode==RCUBE_COMPOSE_DRAFT str_replace(array('<','>'), ""$MESSAGE->headers->messageID) : ''));
  
$out .= $saveid->show();

  
$drafttoggle = new html_hiddenfield(array('name' => '_draft''value' => 'yes'));
  
$out .= $drafttoggle->show();

  
$msgtype = new html_hiddenfield(array('name' => '_is_html''value' => ($isHtml?"1":"0")));
  
$out .= $msgtype->show();

  
// If desired, set this textarea to be editable by TinyMCE
  
if ($isHtml) {
    
$MESSAGE_BODY htmlentities($MESSAGE_BODYENT_NOQUOTESRCMAIL_CHARSET);
    
$attrib['class'] = 'mce_editor';
    
$attrib['is_escaped'] = true;
    
$textarea = new html_textarea($attrib);
    
$out .= $textarea->show($MESSAGE_BODY);
  }
  else {
    
$textarea = new html_textarea($attrib);
    
$out .= $textarea->show('');
    
// quote plain text, inject into textarea
    
$table get_html_translation_table(HTML_SPECIALCHARS);
    
$MESSAGE_BODY strtr($MESSAGE_BODY$table);
    
$out substr($out0, -11) . $MESSAGE_BODY '</textarea>';
  }

  
$out .= $form_end "\n$form_end'';

  
$OUTPUT->set_env('composebody'$attrib['id']);

  
// include HTML editor
  
rcube_html_editor();

  
// Set language list
  
if (!empty($CONFIG['enable_spellcheck'])) {
    
$engine           $RCMAIL->config->get('spellcheck_engine','googie');
    
$dictionary       = (bool) $RCMAIL->config->get('spellcheck_dictionary');
    
$spellcheck_langs = (array) $RCMAIL->config->get('spellcheck_languages',
      array(
'da'=>'Dansk''de'=>'Deutsch''en' => 'English''es'=>'Español',
            
'fr'=>'Français''it'=>'Italiano''nl'=>'Nederlands''pl'=>'Polski',
            
'pt'=>'Português''ru'=>'Русский''fi'=>'Suomi''sv'=>'Svenska'));

    
// googie works only with two-letter codes
    
if ($engine == 'googie') {
      
$lang strtolower(substr($_SESSION['language'], 02));

      
$spellcheck_langs_googie = array();
      foreach (
$spellcheck_langs as $key => $name)
        
$spellcheck_langs_googie[strtolower(substr($key,0,2))] = $name;
        
$spellcheck_langs $spellcheck_langs_googie;
    }
    else {
      
$lang $_SESSION['language'];

      
// if not found in the list, try with two-letter code
      
if (!$spellcheck_langs[$lang])
        
$lang strtolower(substr($lang02));
    }

    if (!
$spellcheck_langs[$lang])
      
$lang 'en';

    
$OUTPUT->set_env('spell_langs'$spellcheck_langs);
    
$OUTPUT->set_env('spell_lang'$lang);

    
$editor_lang_set = array();
    foreach (
$spellcheck_langs as $key => $name) {
      
$editor_lang_set[] = ($key == $lang '+' '') . JQ($name).'='.JQ($key);
    }

    
// include GoogieSpell
    
$OUTPUT->include_script('googiespell.js');
    
$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('%s');\n".
      
"%s.set_env('spellcheck', googie);",
      
$RCMAIL->output->get_skin_path(),
      
$RCMAIL->url(array('_task' => 'utils''_action' => 'spell''_remote' => 1)),
      !empty(
$dictionary) ? 'true' 'false',
      
JQ(Q(rcube_label('checkspelling'))),
      
JQ(Q(rcube_label('resumeediting'))),
      
JQ(Q(rcube_label('close'))),
      
JQ(Q(rcube_label('revertto'))),
      
JQ(Q(rcube_label('nospellerrors'))),
      
JQ(Q(rcube_label('addtodict'))),
      
json_serialize($spellcheck_langs),
      
$lang,
      
$attrib['id'],
      
JS_OBJECT_NAME), 'foot');

    
$OUTPUT->add_label('checking');
    
$OUTPUT->set_env('spellcheck_langs'join(','$editor_lang_set));
  }

  
$out .= "\n".'<iframe name="savetarget" src="program/resources/blank.gif" style="width:0;height:0;border:none;visibility:hidden;"></iframe>';

  return 
$out;
}


function 
rcmail_create_reply_body($body$bodyIsHtml)
{
  global 
$RCMAIL$MESSAGE$LINE_LENGTH;

  
// build reply prefix
  
$from array_pop(rcube_mime::decode_address_list($MESSAGE->get_header('from'), 1false$MESSAGE->headers->charset));
  
$prefix rcube_label(array(
    
'name' => 'mailreplyintro',
    
'vars' => array(
      
'date' => format_date($MESSAGE->headers->date$RCMAIL->config->get('date_long')),
      
'sender' => $from['name'] ? $from['name'] : rcube_idn_to_utf8($from['mailto']),
    )
  ));

  if (!
$bodyIsHtml) {
    
$body preg_replace('/\r?\n/'"\n"$body);
    
$body trim($body"\n");

    
// soft-wrap and quote message text
    
$body rcmail_wrap_and_quote($body$LINE_LENGTH);

    
$prefix .= "\n";
    
$suffix '';

    if (
intval($RCMAIL->config->get('reply_mode')) > 0) { // top-posting
      
$prefix "\n\n\n" $prefix;
    }
  }
  else {
    
// save inline images to files
    
$cid_map rcmail_write_inline_attachments($MESSAGE);
    
// set is_safe flag (we need this for html body washing)
    
rcmail_check_safe($MESSAGE);
    
// clean up html tags
    
$body rcmail_wash_html($body, array('safe' => $MESSAGE->is_safe), $cid_map);

    
// build reply (quote content)
    
$prefix '<p>' Q($prefix) . "</p>\n";
    
$prefix .= '<blockquote>';

    if (
intval($RCMAIL->config->get('reply_mode')) > 0) { // top-posting
      
$prefix '<br>' $prefix;
      
$suffix '</blockquote>';
    }
    else {
      
$suffix '</blockquote><p></p>';
    }
  }

  return 
$prefix.$body.$suffix;
}


function 
rcmail_create_forward_body($body$bodyIsHtml)
{
  global 
$RCMAIL$MESSAGE$COMPOSE;

  
// add attachments
  
if (!isset($COMPOSE['forward_attachments']) && is_array($MESSAGE->mime_parts))
    
$cid_map rcmail_write_compose_attachments($MESSAGE$bodyIsHtml);

  
$date    format_date($MESSAGE->headers->date$RCMAIL->config->get('date_long'));
  
$charset $RCMAIL->output->get_charset();

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

    if (
$cc $MESSAGE->headers->get('cc'))
      
$prefix .= rcube_label('cc') . ': ' $cc "\n";
    if ((
$replyto $MESSAGE->headers->get('reply-to')) && $replyto != $MESSAGE->get_header('from'))
      
$prefix .= rcube_label('replyto') . ': ' $replyto "\n";

    
$prefix .= "\n";
    
$body trim($body"\r\n");
  }
  else {
    
// set is_safe flag (we need this for html body washing)
    
rcmail_check_safe($MESSAGE);
    
// clean up html tags
    
$body rcmail_wash_html($body, array('safe' => $MESSAGE->is_safe), $cid_map);

    
$prefix sprintf(
      
"<br /><p>-------- " rcube_label('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>",
      
rcube_label('subject'), Q($MESSAGE->subject),
      
rcube_label('date'), Q($date),
      
rcube_label('from'), Q($MESSAGE->get_header('from'), 'replace'),
      
rcube_label('to'), Q($MESSAGE->get_header('to'), 'replace'));

    if (
$cc $MESSAGE->headers->get('cc'))
      
$prefix .= sprintf("<tr><th align=\"right\" nowrap=\"nowrap\" valign=\"baseline\">%s: </th><td>%s</td></tr>",
        
rcube_label('cc'), Q($cc'replace'));

    if ((
$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>",
        
rcube_label('replyto'), Q($replyto'replace'));

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

  return 
$prefix.$body;
}


function 
rcmail_create_draft_body($body$bodyIsHtml)
{
  global 
$MESSAGE$OUTPUT$COMPOSE;

  
/**
   * add attachments
   * sizeof($MESSAGE->mime_parts can be 1 - e.g. attachment, but no text!
   */
  
if (empty($COMPOSE['forward_attachments'])
      && 
is_array($MESSAGE->mime_parts)
      && 
count($MESSAGE->mime_parts) > 0)
  {
    
$cid_map rcmail_write_compose_attachments($MESSAGE$bodyIsHtml);
  }

  
// clean up HTML tags - XSS prevention (#1489251)
  
if ($bodyIsHtml) {
    
$body rcmail_wash_html($body, array('safe' => 1), $cid_map);

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

    
// replace cid with href in inline images links
    
if (!empty($cid_map)) {
      
$body str_replace(array_keys($cid_map), array_values($cid_map), $body);
    }
  }

  return 
$body;
}


function 
rcmail_remove_signature($body)
{
  global 
$RCMAIL;

  
$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"$sp ? -$len+$sp-0)) !== false) {
    if (
$sp == || $body[$sp-1] == "\n") {
      
// do not touch blocks with more that X lines
      
if (substr_count($body"\n"$sp) < $sig_max_lines) {
        
$body substr($body0max(0$sp-1));
      }
      break;
    }
  }

  return 
$body;
}


function 
rcmail_write_compose_attachments(&$message$bodyIsHtml)
{
  global 
$RCMAIL$COMPOSE$compose_mode;

  
$cid_map $messages = array();
  foreach ((array)
$message->mime_parts as $pid => $part)
  {
    if (
$part->disposition == 'attachment' || ($part->disposition == 'inline' && $bodyIsHtml) || $part->filename) {
      
// 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' && $compose_mode == RCUBE_COMPOSE_REPLY) {
        continue;
      }
      
// skip inline images when forwarding in text mode
      
if ($part->content_id && $part->disposition == 'inline' && !$bodyIsHtml && $compose_mode == RCUBE_COMPOSE_FORWARD) {
        continue;
      }

      
// skip message/rfc822 attachments on forwards (#1489214)
      // Thunderbird when forwarding in inline mode displays such attachments
      // and skips any attachments from inside of such part, this however
      // skipped e.g. images used in HTML body or other attachments. So,
      // better to skip .eml attachments but not their content (included files).
      
if ($part->mimetype == 'message/rfc822') {
        if (
$compose_mode == RCUBE_COMPOSE_FORWARD) {
          continue;
        }
        
$messages[] = $part->mime_id;
      }
      else if (
$compose_mode != RCUBE_COMPOSE_FORWARD) {
        
// skip attachments included in message/rfc822 attachment (#1486487)
        
foreach ($messages as $mimeid)
          if (
strpos($part->mime_id$mimeid '.') === 0) {
            continue 
2;
          }
      }

      if (
$attachment rcmail_save_attachment($message$pid)) {
        
$COMPOSE['attachments'][$attachment['id']] = $attachment;
        if (
$bodyIsHtml && ($part->content_id || $part->content_location)) {
          
$url sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s',
            
$RCMAIL->comm_path$COMPOSE['id'], $attachment['id']);
          if (
$part->content_id)
            
$cid_map['cid:'.$part->content_id] = $url;
          else
            
$cid_map[$part->content_location] = $url;
        }
      }
    }
  }

  
$COMPOSE['forward_attachments'] = true;

  return 
$cid_map;
}


function 
rcmail_write_inline_attachments(&$message)
{
  global 
$RCMAIL$COMPOSE;

  
$cid_map = array();
  foreach ((array)
$message->mime_parts as $pid => $part) {
    if ((
$part->content_id || $part->content_location) && $part->filename) {
      if (
$attachment rcmail_save_attachment($message$pid)) {
        
$COMPOSE['attachments'][$attachment['id']] = $attachment;
          
$url sprintf('%s&_id=%s&_action=display-attachment&_file=rcmfile%s',
            
$RCMAIL->comm_path$COMPOSE['id'], $attachment['id']);
        if (
$part->content_id)
          
$cid_map['cid:'.$part->content_id] = $url;
        else
          
$cid_map[$part->content_location] = $url;
      }
    }
  }

  return 
$cid_map;
}

// Creates attachment(s) from the forwarded message(s)
function rcmail_write_forward_attachments()
{
  global 
$RCMAIL$COMPOSE$MESSAGE;

  
$storage   $RCMAIL->get_storage();
  
$mem_limit parse_bytes(ini_get('memory_limit'));
  
$curr_mem  function_exists('memory_get_usage') ? memory_get_usage() : 16*1024*1024// safe value: 16MB
  
$names     = array();

  
$loaded_attachments = array();
  foreach ((array)
$COMPOSE['attachments'] as $id => $attachment) {
      
$loaded_attachments[$attachment['name'] . $attachment['mimetype']] = $attachment;
  }

  if (
$COMPOSE['forward_uid'] == '*') {
    
$index $storage->index(nullrcmail_sort_column(), rcmail_sort_order());
    
$COMPOSE['forward_uid'] = $index->get();
  }
  else {
    
$COMPOSE['forward_uid'] = explode(','$COMPOSE['forward_uid']);
  }

  foreach ((array)
$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(
$MESSAGE->subject)) {
      
$MESSAGE->subject $message->subject;
    }

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

    
$data $path null;

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

    
// don't load too big attachments into memory
    
if ($mem_limit && $message->size $mem_limit $curr_mem) {
      
$temp_dir unslashify($RCMAIL->config->get('temp_dir'));
      
$path tempnam($temp_dir'rcmAttmnt');
      if (
$fp fopen($path'w')) {
        
$storage->get_raw_body($message->uid$fp);
        
fclose($fp);
      }
      else {
        return 
false;
      }
    }
    else {
      
$data $storage->get_raw_body($message->uid);
      
$curr_mem += $message->size;
    }

    
$attachment = array(
      
'group' => $COMPOSE['id'],
      
'name' => $name,
      
'mimetype' => 'message/rfc822',
      
'data' => $data,
      
'path' => $path,
      
'size' => $path filesize($path) : strlen($data),
    );

    
$attachment $RCMAIL->plugins->exec_hook('attachment_save'$attachment);

    if (
$attachment['status']) {
      unset(
$attachment['data'], $attachment['status'], $attachment['content_id'], $attachment['abort']);
      
$COMPOSE['attachments'][$attachment['id']] = $attachment;
    }
    else if (
$path) {
      @
unlink($path);
    }
  }
}


function 
rcmail_save_attachment(&$message$pid)
{
  global 
$COMPOSE;

  
$rcmail rcmail::get_instance();
  
$part $message->mime_parts[$pid];
  
$mem_limit parse_bytes(ini_get('memory_limit'));
  
$curr_mem function_exists('memory_get_usage') ? memory_get_usage() : 16*1024*1024// safe value: 16MB
  
$data $path null;

  
// don't load too big attachments into memory
  
if ($mem_limit && $part->size $mem_limit $curr_mem) {
    
$temp_dir unslashify($rcmail->config->get('temp_dir'));
    
$path tempnam($temp_dir'rcmAttmnt');
    if (
$fp fopen($path'w')) {
      
$message->get_part_content($pid$fp);
      
fclose($fp);
    } else
      return 
false;
  } else {
    
$data $message->get_part_content($pid);
  }

  
$mimetype $part->ctype_primary '/' $part->ctype_secondary;
  
$filename rcmail_attachment_name($part);

  
$attachment = array(
    
'group' => $COMPOSE['id'],
    
'name' => $filename,
    
'mimetype' => $mimetype,
    
'content_id' => $part->content_id,
    
'data' => $data,
    
'path' => $path,
    
'size' => $path filesize($path) : strlen($data),
  );

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

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

  return 
false;
}

function 
rcmail_save_image($path$mimetype='')
{
  global 
$COMPOSE;

  
// handle attachments in memory
  
$data file_get_contents($path);
  
$name rcmail_basename($path);

  
$attachment = array(
    
'group' => $COMPOSE['id'],
    
'name' => $name,
    
'mimetype' => $mimetype $mimetype rc_mime_content_type($path$name),
    
'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;
}

function 
rcmail_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);
  }
}

function 
rcmail_compose_subject($attrib)
{
  global 
$MESSAGE$COMPOSE$compose_mode;

  list(
$form_start$form_end) = get_form_tags($attrib);
  unset(
$attrib['form']);

  
$attrib['name'] = '_subject';
  
$attrib['spellcheck'] = 'true';
  
$textfield = new html_inputfield($attrib);

  
$subject '';

  
// use subject from post
  
if (isset($_POST['_subject'])) {
    
$subject get_input_value('_subject'RCUBE_INPUT_POSTTRUE);
  }
  
// create a reply-subject
  
else if ($compose_mode == RCUBE_COMPOSE_REPLY) {
    if (
preg_match('/^re:/i'$MESSAGE->subject))
      
$subject $MESSAGE->subject;
    else
      
$subject 'Re: '.$MESSAGE->subject;
  }
  
// create a forward-subject
  
else if ($compose_mode == RCUBE_COMPOSE_FORWARD) {
    if (
preg_match('/^fwd:/i'$MESSAGE->subject))
      
$subject $MESSAGE->subject;
    else
      
$subject 'Fwd: '.$MESSAGE->subject;
  }
  
// creeate a draft-subject
  
else if ($compose_mode == RCUBE_COMPOSE_DRAFT || $compose_mode == RCUBE_COMPOSE_EDIT) {
    
$subject $MESSAGE->subject;
  }
  else if (!empty(
$COMPOSE['param']['subject'])) {
    
$subject $COMPOSE['param']['subject'];
  }

  
$out $form_start "$form_start\n" '';
  
$out .= $textfield->show($subject);
  
$out .= $form_end "\n$form_end'';

  return 
$out;
}


function 
rcmail_compose_attachment_list($attrib)
{
  global 
$OUTPUT$CONFIG$COMPOSE;

  
// add ID if not given
  
if (!$attrib['id'])
    
$attrib['id'] = 'rcmAttachmentList';

  
$out    "\n";
  
$jslist = array();
  
$button '';

  if (
is_array($COMPOSE['attachments'])) {
    if (
$attrib['deleteicon']) {
      
$button html::img(array(
        
'src' => $CONFIG['skin_path'] . $attrib['deleteicon'],
        
'alt' => rcube_label('delete')
      ));
    }
    else if (
rcube_utils::get_boolean($attrib['textbuttons'])) {
      
$button Q(rcube_label('delete'));
    }

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

      
$out .= html::tag('li',
        array(
          
'id'          => 'rcmfile'.$id,
          
'class'       => rcmail_filetype2classname($a_prop['mimetype'], $a_prop['name']),
          
'onmouseover' => "rcube_webmail.long_subject_title_ex(this, 0)",
        ),
        
html::a(array(
            
'href' => "#delete",
            
'title' => rcube_label('delete'),
            
'onclick' => sprintf("return %s.command('remove-attachment','rcmfile%s', this)"JS_OBJECT_NAME$id),
            
'class' => 'delete'
          
),
          
$button
        
) . Q($a_prop['name'])
      );

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

  if (
$attrib['deleteicon'])
    
$COMPOSE['deleteicon'] = $CONFIG['skin_path'] . $attrib['deleteicon'];
  else if (
rcube_utils::get_boolean($attrib['textbuttons']))
    
$COMPOSE['textbuttons'] = true;
  if (
$attrib['cancelicon'])
    
$OUTPUT->set_env('cancelicon'$CONFIG['skin_path'] . $attrib['cancelicon']);
  if (
$attrib['loadingicon'])
    
$OUTPUT->set_env('loadingicon'$CONFIG['skin_path'] . $attrib['loadingicon']);

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

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


function 
rcmail_compose_attachment_form($attrib)
{
  global 
$OUTPUT;

  
// set defaults
  
$attrib += array('id' => 'rcmUploadbox''buttons' => 'yes');

  
// Get filesize, enable upload progress bar
  
$max_filesize rcube_upload_init();

  
$button = new html_inputfield(array('type' => 'button'));

  
$out html::div($attrib,
    
$OUTPUT->form_tag(array('id' => $attrib['id'].'Frm''name' => 'uploadform''method' => 'post''enctype' => 'multipart/form-data'),
      
html::div(nullrcmail_compose_attachment_field(array('size' => $attrib['attachmentfieldsize']))) .
      
html::div('hint'rcube_label(array('name' => 'maxuploadsize''vars' => array('size' => $max_filesize)))) .
      (
get_boolean($attrib['buttons']) ? html::div('buttons',
        
$button->show(rcube_label('close'), array('class' => 'button''onclick' => "$('#$attrib[id]').hide()")) . ' ' .
        
$button->show(rcube_label('upload'), array('class' => 'button mainaction''onclick' => JS_OBJECT_NAME ".command('send-attachment', this.form)"))
      ) : 
'')
    )
  );

  
$OUTPUT->add_gui_object('uploadform'$attrib['id'].'Frm');
  return 
$out;
}


function 
rcmail_compose_attachment_field($attrib)
{
  
$attrib['type'] = 'file';
  
$attrib['name'] = '_attachments[]';
  
$attrib['multiple'] = 'multiple';

  
$field = new html_inputfield($attrib);
  return 
$field->show();
}


function 
rcmail_priority_selector($attrib)
{
  global 
$MESSAGE;

  list(
$form_start$form_end) = get_form_tags($attrib);
  unset(
$attrib['form']);

  
$attrib['name'] = '_priority';
  
$selector = new html_select($attrib);

  
$selector->add(array(rcube_label('lowest'),
                       
rcube_label('low'),
                       
rcube_label('normal'),
                       
rcube_label('high'),
                       
rcube_label('highest')),
                 array(
'5''4''0''2''1'));

  if (isset(
$_POST['_priority']))
    
$sel $_POST['_priority'];
  else if (isset(
$MESSAGE->headers->priority) && intval($MESSAGE->headers->priority) != 3)
    
$sel $MESSAGE->headers->priority;
  else
    
$sel 0;

  
$out $form_start "$form_start\n" '';
  
$out .= $selector->show(strval($sel));
  
$out .= $form_end "\n$form_end'';

  return 
$out;
}


function 
rcmail_receipt_checkbox($attrib)
{
  global 
$RCMAIL$MESSAGE$compose_mode;

  list(
$form_start$form_end) = get_form_tags($attrib);
  unset(
$attrib['form']);

  if (!isset(
$attrib['id']))
    
$attrib['id'] = 'receipt';

  
$attrib['name'] = '_receipt';
  
$attrib['value'] = '1';
  
$checkbox = new html_checkbox($attrib);

  if (isset(
$_POST['_receipt']))
    
$mdn_default $_POST['_receipt'];
  else if (
in_array($compose_mode, array(RCUBE_COMPOSE_DRAFTRCUBE_COMPOSE_EDIT)))
    
$mdn_default = (bool) $MESSAGE->headers->mdn_to;
  else
    
$mdn_default $RCMAIL->config->get('mdn_default');

  
$out $form_start "$form_start\n" '';
  
$out .= $checkbox->show($mdn_default);
  
$out .= $form_end "\n$form_end'';

  return 
$out;
}


function 
rcmail_dsn_checkbox($attrib)
{
  global 
$RCMAIL;

  list(
$form_start$form_end) = get_form_tags($attrib);
  unset(
$attrib['form']);

  if (!isset(
$attrib['id']))
    
$attrib['id'] = 'dsn';

  
$attrib['name'] = '_dsn';
  
$attrib['value'] = '1';
  
$checkbox = new html_checkbox($attrib);

  if (isset(
$_POST['_dsn']))
    
$dsn_value $_POST['_dsn'];
  else
    
$dsn_value $RCMAIL->config->get('dsn_default');

  
$out $form_start "$form_start\n" '';
  
$out .= $checkbox->show($dsn_value);
  
$out .= $form_end "\n$form_end'';

  return 
$out;
}


function 
rcmail_editor_selector($attrib)
{
  
// determine whether HTML or plain text should be checked
  
$useHtml rcmail_compose_editor_mode();

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

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

  
$attrib['onchange'] = "return rcmail_toggle_editor(this, '".$attrib['editorid']."', '_is_html')";

  
$select = new html_select($attrib);

  
$select->add(Q(rcube_label('htmltoggle')), 'html');
  
$select->add(Q(rcube_label('plaintoggle')), 'plain');

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

  foreach (
$choices as $value => $text) {
    
$attrib['id'] = '_' $value;
    
$attrib['value'] = $value;
    
$selector .= $radio->show($chosenvalue$attrib) . html::label($attrib['id'], Q(rcube_label($text)));
  }

  return 
$selector;
}


function 
rcmail_store_target_selection($attrib)
{
  global 
$COMPOSE;

  
$attrib['name'] = '_store_target';
  
$select rcmail_mailbox_select(array_merge($attrib, array(
    
'noselection' => '- '.rcube_label('dontsave').' -',
    
'folder_filter' => 'mail',
    
'folder_rights' => 'w',
  )));
  return 
$select->show(isset($_POST['_store_target']) ? $_POST['_store_target'] : $COMPOSE['param']['sent_mbox'], $attrib);
}


function 
rcmail_check_sent_folder($folder$create=false)
{
  global 
$RCMAIL;

  
// we'll not save the message, so it doesn't matter
  
if ($RCMAIL->config->get('no_save_sent_messages')) {
    return 
true;
  }

  if (
$RCMAIL->storage->folder_exists($foldertrue)) {
    return 
true;
  }

  
// folder may exist but isn't subscribed (#1485241)
  
if ($create) {
    if (!
$RCMAIL->storage->folder_exists($folder))
      return 
$RCMAIL->storage->create_folder($foldertrue);
    else
      return 
$RCMAIL->storage->subscribe($folder);
  }

  return 
false;
}


function 
get_form_tags($attrib)
{
  global 
$RCMAIL$MESSAGE_FORM$COMPOSE;

  
$form_start '';
  if (!
$MESSAGE_FORM)
  {
    
$hiddenfields = new html_hiddenfield(array('name' => '_task''value' => $RCMAIL->task));
    
$hiddenfields->add(array('name' => '_action''value' => 'send'));
    
$hiddenfields->add(array('name' => '_id''value' => $COMPOSE['id']));
    
$hiddenfields->add(array('name' => '_attachments'));

    
$form_start = empty($attrib['form']) ? $RCMAIL->output->form_tag(array('name' => "form"'method' => "post")) : '';
    
$form_start .= $hiddenfields->show();
  }

  
$form_end = ($MESSAGE_FORM && !strlen($attrib['form'])) ? '</form>' '';
  
$form_name = !empty($attrib['form']) ? $attrib['form'] : 'form';

  if (!
$MESSAGE_FORM)
    
$RCMAIL->output->add_gui_object('messageform'$form_name);

  
$MESSAGE_FORM $form_name;

  return array(
$form_start$form_end);
}


function 
rcmail_addressbook_list($attrib = array())
{
    global 
$RCMAIL$OUTPUT;

    
$attrib += array('id' => 'rcmdirectorylist');

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

    foreach (
$RCMAIL->get_address_sources(falsetrue) as $j => $source) {
        
$id strval(strlen($source['id']) ? $source['id'] : $j);
        
$js_id JQ($id);

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

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

    
$OUTPUT->add_gui_object('addressbookslist'$attrib['id']);

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

// return the contacts list as HTML table
function rcmail_contacts_list($attrib = array())
{
    global 
$OUTPUT;

    
$attrib += array('id' => 'rcmAddressList');

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

    return 
rcube_table_output($attrib, array(), array('name'), 'ID');
}


/**
 * Register a certain container as active area to drop files onto
 */
function compose_file_drop_area($attrib)
{
    global 
$OUTPUT;

    if (
$attrib['id']) {
        
$OUTPUT->add_gui_object('filedrop'$attrib['id']);
        
$OUTPUT->set_env('filedrop', array('action' => 'upload''fieldname' => '_attachments'));
    }
}


// register UI objects
$OUTPUT->add_handlers(array(
  
'composeheaders' => 'rcmail_compose_headers',
  
'composesubject' => 'rcmail_compose_subject',
  
'composebody' => 'rcmail_compose_body',
  
'composeattachmentlist' => 'rcmail_compose_attachment_list',
  
'composeattachmentform' => 'rcmail_compose_attachment_form',
  
'composeattachment' => 'rcmail_compose_attachment_field',
  
'filedroparea'    => 'compose_file_drop_area',
  
'priorityselector' => 'rcmail_priority_selector',
  
'editorselector' => 'rcmail_editor_selector',
  
'receiptcheckbox' => 'rcmail_receipt_checkbox',
  
'dsncheckbox' => 'rcmail_dsn_checkbox',
  
'storetarget' => 'rcmail_store_target_selection',
  
'addressbooks' => 'rcmail_addressbook_list',
  
'addresslist' => 'rcmail_contacts_list',
));

$OUTPUT->send('compose');

:: Command execute ::

Enter:
 
Select:
 

:: Search ::
  - regexp 

:: Upload ::
 
[ Read-Only ]

:: Make Dir ::
 
[ Read-Only ]
:: Make File ::
 
[ Read-Only ]

:: Go Dir ::
 
:: Go File ::
 

--[ c99shell v. 2.0 [PHP 7 Update] [25.02.2019] maintained by PinoyWH1Z | C99Shell Github | Generation time: 0.0439 ]--