+static TnyMimePart * add_body_part (TnyMsg *msg, const gchar *body,
+ const gchar *content_type);
+static TnyMimePart * add_html_body_part (TnyMsg *msg, const gchar *body);
+static void add_attachments (TnyMsg *msg, GList *attachments_list);
+static char * get_content_type(const gchar *s);
+static gboolean is_ascii(const gchar *s);
+
+
+TnyMsg*
+modest_tny_msg_new (const gchar* mailto, const gchar* from, const gchar *cc,
+ const gchar *bcc, const gchar* subject, const gchar *body,
+ GList *attachments)
+{
+ TnyMsg *new_msg;
+ TnyHeader *header;
+ gchar *content_type;
+
+ /* Create new msg */
+ new_msg = modest_formatter_create_message (NULL, TRUE, (attachments != NULL));
+ header = tny_msg_get_header (new_msg);
+
+ if ((from != NULL) && (strlen(from) > 0)) {
+ tny_header_set_from (TNY_HEADER (header), from);
+ tny_header_set_replyto (TNY_HEADER (header), from);
+ }
+ if ((mailto != NULL) && (strlen(mailto) > 0))
+ tny_header_set_to (TNY_HEADER (header), mailto);
+ if ((cc != NULL) && (strlen(cc) > 0))
+ tny_header_set_cc (TNY_HEADER (header), cc);
+ if ((bcc != NULL) && (strlen(bcc) > 0))
+ tny_header_set_bcc (TNY_HEADER (header), bcc);
+
+ if ((subject != NULL) && (strlen(subject) > 0))
+ tny_header_set_subject (TNY_HEADER (header), subject);
+
+ content_type = get_content_type(body);
+
+ /* Add the body of the new mail */
+ /* This is needed even if body is NULL or empty. */
+ add_body_part (new_msg, body, content_type);
+ g_free (content_type);
+
+ /* Add attachments */
+ if (attachments)
+ add_attachments (new_msg, attachments);
+
+ return new_msg;
+}
+
+TnyMsg*
+modest_tny_msg_new_html_plain (const gchar* mailto, const gchar* from, const gchar *cc,
+ const gchar *bcc, const gchar* subject,
+ const gchar *html_body, const gchar *plain_body,
+ GList *attachments)
+{
+ TnyMsg *new_msg;
+ TnyHeader *header;
+ gchar *content_type;
+
+ /* Create new msg */
+ new_msg = modest_formatter_create_message (NULL, FALSE, (attachments != NULL));
+ header = tny_msg_get_header (new_msg);
+
+ if ((from != NULL) && (strlen(from) > 0)) {
+ tny_header_set_from (TNY_HEADER (header), from);
+ tny_header_set_replyto (TNY_HEADER (header), from);
+ }
+ if ((mailto != NULL) && (strlen(mailto) > 0))
+ tny_header_set_to (TNY_HEADER (header), mailto);
+ if ((cc != NULL) && (strlen(cc) > 0))
+ tny_header_set_cc (TNY_HEADER (header), cc);
+ if ((bcc != NULL) && (strlen(bcc) > 0))
+ tny_header_set_bcc (TNY_HEADER (header), bcc);
+
+ if ((subject != NULL) && (strlen(subject) > 0))
+ tny_header_set_subject (TNY_HEADER (header), subject);
+
+ content_type = get_content_type(plain_body);
+
+ /* Add the body of the new mail */
+ add_body_part (new_msg, plain_body, content_type);
+ add_html_body_part (new_msg, html_body);
+ g_free (content_type);
+
+ /* Add attachments */
+ add_attachments (new_msg, attachments);
+
+ return new_msg;
+}
+
+
+/* FIXME: this func copy from modest-mail-operation: refactor */
+static TnyMimePart *
+add_body_part (TnyMsg *msg,
+ const gchar *body,
+ const gchar *content_type)
+{
+ TnyMimePart *text_body_part = NULL;
+ TnyStream *text_body_stream;
+
+ /* Create the stream */
+ text_body_stream = TNY_STREAM (tny_camel_stream_new
+ (camel_stream_mem_new_with_buffer
+ (body, (body ? strlen(body) : 0))));
+
+ text_body_part = modest_formatter_create_body_part (NULL, msg);
+
+ /* Construct MIME part */
+ tny_stream_reset (text_body_stream);
+ tny_mime_part_construct_from_stream (text_body_part,
+ text_body_stream,
+ content_type);
+ tny_stream_reset (text_body_stream);
+
+ g_object_unref (G_OBJECT(text_body_part));
+
+ /* Clean */
+ g_object_unref (text_body_stream);
+
+ return text_body_part;
+}
+
+static TnyMimePart *
+add_html_body_part (TnyMsg *msg,
+ const gchar *body)
+{
+ TnyMimePart *html_body_part = NULL;
+ TnyStream *html_body_stream;
+
+ /* Create the stream */
+ html_body_stream = TNY_STREAM (tny_camel_stream_new
+ (camel_stream_mem_new_with_buffer
+ (body, strlen(body))));
+
+ /* Create body part if needed */
+ html_body_part = modest_formatter_create_body_part (NULL, msg);
+
+ /* Construct MIME part */
+ tny_stream_reset (html_body_stream);
+ tny_mime_part_construct_from_stream (html_body_part,
+ html_body_stream,
+ "text/html; charset=utf-8");
+ tny_stream_reset (html_body_stream);
+
+ g_object_unref (G_OBJECT(html_body_part));
+
+ /* Clean */
+ g_object_unref (html_body_stream);
+
+ return html_body_part;
+}
+
+static TnyMimePart *
+copy_mime_part (TnyMimePart *part)
+{
+ TnyMimePart *result = NULL;
+ const gchar *attachment_content_type;
+ const gchar *attachment_filename;
+ const gchar *attachment_cid;
+ TnyList *parts;
+ TnyIterator *iterator;
+ TnyStream *attachment_stream;
+
+ if (TNY_IS_MSG (part)) {
+ g_object_ref (part);
+ return part;
+ }
+
+ result = tny_platform_factory_new_mime_part (
+ modest_runtime_get_platform_factory());
+
+ attachment_content_type = tny_mime_part_get_content_type (part);
+
+ /* get mime part headers */
+ attachment_filename = tny_mime_part_get_filename (part);
+ attachment_cid = tny_mime_part_get_content_id (part);
+
+ /* fill the stream */
+ attachment_stream = tny_mime_part_get_stream (part);
+ tny_stream_reset (attachment_stream);
+ tny_mime_part_construct_from_stream (result,
+ attachment_stream,
+ attachment_content_type);
+ tny_stream_reset (attachment_stream);
+
+ /* set other mime part fields */
+ tny_mime_part_set_filename (result, attachment_filename);
+ tny_mime_part_set_content_id (result, attachment_cid);
+
+ /* copy subparts */
+ parts = tny_simple_list_new ();
+ tny_mime_part_get_parts (part, parts);
+ iterator = tny_list_create_iterator (parts);
+ while (!tny_iterator_is_done (iterator)) {
+ TnyMimePart *subpart = TNY_MIME_PART (tny_iterator_get_current (iterator));
+ if (subpart) {
+ TnyMimePart *subpart_copy = copy_mime_part (subpart);
+ tny_mime_part_add_part (result, subpart_copy);
+ g_object_unref (subpart);
+ }
+
+ tny_iterator_next (iterator);
+ }
+ g_object_unref (iterator);
+ g_object_unref (parts);
+ g_object_unref (attachment_stream);
+
+ return result;
+}
+
+static void
+add_attachments (TnyMsg *msg, GList *attachments_list)
+{
+ GList *pos;
+ TnyMimePart *attachment_part, *old_attachment;
+
+ for (pos = (GList *)attachments_list; pos; pos = pos->next) {
+
+ old_attachment = pos->data;
+ attachment_part = copy_mime_part (old_attachment);
+ tny_mime_part_add_part (TNY_MIME_PART (msg), attachment_part);
+ g_object_unref (attachment_part);
+ }
+}
+