| | |
| | | | program/steps/mail/sendmail.inc | |
| | | | | |
| | | | This file is part of the RoundCube Webmail client | |
| | | | Copyright (C) 2005-2007, RoundCube Dev. - Switzerland | |
| | | | Copyright (C) 2005-2008, RoundCube Dev. - Switzerland | |
| | | | Licensed under the GNU GPL | |
| | | | | |
| | | | PURPOSE: | |
| | |
| | | $Id$ |
| | | |
| | | */ |
| | | |
| | | |
| | | //require_once('lib/smtp.inc'); |
| | | require_once('lib/html2text.inc'); |
| | | require_once('lib/rc_mail_mime.inc'); |
| | | |
| | | |
| | | if (!isset($_SESSION['compose']['id'])) |
| | |
| | | */ |
| | | function rcmail_attach_emoticons(&$mime_message) |
| | | { |
| | | global $CONFIG, $INSTALL_PATH; |
| | | global $CONFIG; |
| | | |
| | | $htmlContents = $mime_message->getHtmlBody(); |
| | | |
| | |
| | | |
| | | $last_img_pos = 0; |
| | | |
| | | $searchstr = 'program/js/tiny_mce/plugins/emotions/images/'; |
| | | $searchstr = 'program/js/tiny_mce/plugins/emotions/img/'; |
| | | |
| | | // keep track of added images, so they're only added once |
| | | $included_images = array(); |
| | |
| | | if (! in_array($image_name, $included_images)) |
| | | { |
| | | // add the image to the MIME message |
| | | $img_file = $INSTALL_PATH . '/' . $searchstr . $image_name; |
| | | if(! $mime_message->addHTMLImage($img_file, 'image/gif', '', true, '_' . $image_name)) |
| | | $img_file = INSTALL_PATH . '/' . $searchstr . $image_name; |
| | | if(! $mime_message->addHTMLImage($img_file, 'image/gif', '', true, $image_name)) |
| | | $OUTPUT->show_message("emoticonerror", 'error'); |
| | | |
| | | array_push($included_images, $image_name); |
| | | } |
| | | |
| | | $body = $body_pre . 'cid:_' . $image_name . $body_post; |
| | | $body = $body_pre . $img_file . $body_post; |
| | | |
| | | $last_img_pos = $pos2; |
| | | } |
| | |
| | | if (strlen($_POST['_draft_saveid']) > 3) |
| | | $olddraftmessageid = get_input_value('_draft_saveid', RCUBE_INPUT_POST); |
| | | |
| | | $message_id = sprintf('<%s@%s>', md5(uniqid('rcmail'.rand(),true)), rcmail_mail_domain($_SESSION['imap_host'])); |
| | | $message_id = sprintf('<%s@%s>', md5(uniqid('rcmail'.rand(),true)), $RCMAIL->config->mail_domain($_SESSION['imap_host'])); |
| | | $savedraft = !empty($_POST['_draft']) ? TRUE : FALSE; |
| | | |
| | | // remove all scripts and act as called in frame |
| | |
| | | } |
| | | |
| | | // additional headers |
| | | $headers['Message-ID'] = $message_id; |
| | | $headers['X-Sender'] = $from; |
| | | |
| | | if ($CONFIG['http_received_header']) |
| | | { |
| | | $nldlm = rcmail_header_delm() . "\t"; |
| | | $nldlm = $RCMAIL->config->header_delimiter() . "\t"; |
| | | $headers['Received'] = wordwrap('from ' . (isset($_SERVER['HTTP_X_FORWARDED_FOR']) ? |
| | | gethostbyaddr($_SERVER['HTTP_X_FORWARDED_FOR']).' ['.$_SERVER['HTTP_X_FORWARDED_FOR'].']'.$nldlm.' via ' : '') . |
| | | gethostbyaddr($_SERVER['REMOTE_ADDR']).' ['.$_SERVER['REMOTE_ADDR'].']'.$nldlm.'with ' . |
| | | $_SERVER['SERVER_PROTOCOL'].' ('.$_SERVER['REQUEST_METHOD'].'); ' . date('r'), |
| | | 69, $nldlm); |
| | | } |
| | | |
| | | $headers['Message-ID'] = $message_id; |
| | | $headers['X-Sender'] = $from; |
| | | |
| | | if (!empty($CONFIG['useragent'])) |
| | | $headers['User-Agent'] = $CONFIG['useragent']; |
| | |
| | | $isHtml = ($isHtmlVal == "1"); |
| | | |
| | | // create extended PEAR::Mail_mime instance |
| | | $MAIL_MIME = new rc_mail_mime(rcmail_header_delm()); |
| | | $MAIL_MIME = new rcube_mail_mime($RCMAIL->config->header_delimiter()); |
| | | |
| | | // For HTML-formatted messages, construct the MIME message with both |
| | | // the HTML part and the plain-text part |
| | |
| | | $MAIL_MIME->setTXTBody($message_body, FALSE, TRUE); |
| | | } |
| | | |
| | | // chose transfer encoding |
| | | $charset_7bit = array('ASCII', 'ISO-2022-JP', 'ISO-8859-1', 'ISO-8859-2', 'ISO-8859-15'); |
| | | $transfer_encoding = in_array(strtoupper($message_charset), $charset_7bit) ? '7bit' : '8bit'; |
| | | |
| | | // add stored attachments, if any |
| | | if (is_array($_SESSION['compose']['attachments'])) |
| | |
| | | } |
| | | else |
| | | { |
| | | /* |
| | | We need to replace mime_content_type in a later release because the function |
| | | is deprecated in favour of File_Info |
| | | */ |
| | | $ctype = str_replace('image/pjpeg', 'image/jpeg', $attachment['mimetype']); // #1484914 |
| | | |
| | | // .eml attachments send inline |
| | | $MAIL_MIME->addAttachment($attachment['path'], |
| | | rc_mime_content_type($attachment['path'], $attachment['mimetype']), |
| | | $attachment['name'], true, 'base64', |
| | | 'attachment', $message_charset); |
| | | $ctype, |
| | | $attachment['name'], true, |
| | | ($ctype == 'message/rfc822' ? $transfer_encoding : 'base64'), |
| | | ($ctype == 'message/rfc822' ? 'inline' : 'attachment'), |
| | | $message_charset); |
| | | } |
| | | } |
| | | |
| | | // add submitted attachments |
| | | if (is_array($_FILES['_attachments']['tmp_name'])) |
| | | foreach ($_FILES['_attachments']['tmp_name'] as $i => $filepath) |
| | | $MAIL_MIME->addAttachment($filepath, $files['type'][$i], $files['name'][$i], true, 'base64', 'attachment', $message_charset); |
| | | { |
| | | $ctype = $files['type'][$i]; |
| | | $ctype = str_replace('image/pjpeg', 'image/jpeg', $ctype); // #1484914 |
| | | |
| | | $MAIL_MIME->addAttachment($filepath, $ctype, $files['name'][$i], true, |
| | | ($ctype == 'message/rfc822' ? $transfer_encoding : 'base64'), |
| | | 'attachment', $message_charset); |
| | | } |
| | | |
| | | |
| | | // chose transfer encoding |
| | | $charset_7bit = array('ASCII', 'ISO-2022-JP', 'ISO-8859-1', 'ISO-8859-2', 'ISO-8859-15'); |
| | | $transfer_encoding = in_array(strtoupper($message_charset), $charset_7bit) ? '7bit' : '8bit'; |
| | | |
| | | // encoding settings for mail composing |
| | | $MAIL_MIME->setParam(array( |
| | |
| | | )); |
| | | |
| | | // encoding subject header with mb_encode provides better results with asian characters |
| | | if ($MBSTRING && function_exists("mb_encode_mimeheader")) |
| | | if (function_exists("mb_encode_mimeheader")) |
| | | { |
| | | mb_internal_encoding($message_charset); |
| | | $headers['Subject'] = mb_encode_mimeheader($headers['Subject'], $message_charset, 'Q'); |
| | |
| | | return; |
| | | } |
| | | |
| | | // set repliead flag |
| | | // set replied/forwarded flag |
| | | if ($_SESSION['compose']['reply_uid']) |
| | | $IMAP->set_flag($_SESSION['compose']['reply_uid'], 'ANSWERED'); |
| | | else if ($_SESSION['compose']['forward_uid']) |
| | | $IMAP->set_flag($_SESSION['compose']['forward_uid'], 'FORWARDED'); |
| | | |
| | | } // End of SMTP Delivery Block |
| | | } // End of SMTP Delivery Block |
| | | |
| | | |
| | | |
| | |
| | | if ($olddraftmessageid) |
| | | { |
| | | // delete previous saved draft |
| | | $a_deleteid = $IMAP->search($CONFIG['drafts_mbox'],'HEADER Message-ID',$olddraftmessageid); |
| | | $deleted = $IMAP->delete_message($IMAP->get_uid($a_deleteid[0],$CONFIG['drafts_mbox']),$CONFIG['drafts_mbox']); |
| | | $a_deleteid = $IMAP->search($CONFIG['drafts_mbox'], 'HEADER Message-ID', $olddraftmessageid); |
| | | $deleted = $IMAP->delete_message($IMAP->get_uid($a_deleteid[0], $CONFIG['drafts_mbox']), $CONFIG['drafts_mbox']); |
| | | |
| | | // raise error if deletion of old draft failed |
| | | if (!$deleted) |
| | |
| | | |
| | | if ($savedraft) |
| | | { |
| | | $msgid = strtr($message_id, array('>' => '', '<' => '')); |
| | | |
| | | // remember new draft-uid |
| | | $draftids = $IMAP->search($CONFIG['drafts_mbox'], 'HEADER Message-ID', $msgid); |
| | | $_SESSION['compose']['param']['_draft_uid'] = $IMAP->get_uid($draftids[0], $CONFIG['drafts_mbox']); |
| | | |
| | | // display success |
| | | $OUTPUT->show_message('messagesaved', 'confirmation'); |
| | | |
| | | // update "_draft_saveid" and the "cmp_hash" to prevent "Unsaved changes" warning |
| | | $OUTPUT->command('set_draft_id', str_replace(array('<','>'), "", $message_id)); |
| | | $OUTPUT->command('set_draft_id', $msgid); |
| | | $OUTPUT->command('compose_field_hash', true); |
| | | |
| | | // start the auto-save timer again |