* src/gtk/pixmaps/internet-mail.svg:
[modest] / src / modest-tny-msg-actions.c
1 /* Copyright (c) 2006, Nokia Corporation
2  * All rights reserved.
3  *
4  * Redistribution and use in source and binary forms, with or without
5  * modification, are permitted provided that the following conditions are
6  * met:
7  *
8  * * Redistributions of source code must retain the above copyright
9  *   notice, this list of conditions and the following disclaimer.
10  * * Redistributions in binary form must reproduce the above copyright
11  *   notice, this list of conditions and the following disclaimer in the
12  *   documentation and/or other materials provided with the distribution.
13  * * Neither the name of the Nokia Corporation nor the names of its
14  *   contributors may be used to endorse or promote products derived from
15  *   this software without specific prior written permission.
16  *
17  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
18  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
19  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
20  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
21  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
22  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
23  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
24  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
25  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
26  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
27  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
28  */
29
30
31 #include <gtk/gtk.h>
32 #include <gtkhtml/gtkhtml.h>
33 #include <tny-gtk-text-buffer-stream.h>
34 #include <tny-simple-list.h>
35 #include <tny-folder.h>
36
37 #ifdef HAVE_CONFIG_H
38 #include <config.h>
39 #endif /*HAVE_CONFIG_H */
40
41 #include "modest-tny-msg-actions.h"
42 #include "modest-text-utils.h"
43
44 static void modest_tny_msg_actions_xfer (TnyHeader *header, TnyFolder *folder, 
45                                          gboolean delete_original);
46
47
48 static const gchar *
49 get_body_text (TnyMsg *msg, gboolean want_html)
50 {
51         TnyStream *stream;
52         TnyMimePart *body;
53         GtkTextBuffer *buf;
54         GtkTextIter start, end;
55         const gchar *to_quote;
56
57         body = modest_tny_msg_actions_find_body_part(msg, want_html);
58         if (!body)
59                 return NULL;
60
61         buf = gtk_text_buffer_new (NULL);
62         stream = TNY_STREAM (tny_gtk_text_buffer_stream_new (buf));
63         tny_stream_reset (stream);
64         tny_mime_part_decode_to_stream (body, stream);
65         tny_stream_reset (stream);
66
67         g_object_unref (G_OBJECT(stream));
68         g_object_unref (G_OBJECT(body));
69         
70         gtk_text_buffer_get_bounds (buf, &start, &end);
71         to_quote = gtk_text_buffer_get_text (buf, &start, &end, FALSE);
72         g_object_unref (buf);
73
74         return to_quote;
75 }
76
77 gchar*
78 modest_tny_msg_actions_quote (TnyMsg * self, const gchar * from,
79                               time_t sent_date, gint limit,
80                               const gchar * to_quote)
81 {
82         gchar *quoted_msg = NULL;
83         const gchar *body;
84
85         /* 2 cases: */
86
87         /* a) quote text from selection */
88         if (to_quote != NULL) 
89                 return modest_text_utils_quote (to_quote, from, sent_date,
90                                                 limit);
91         
92         /* b) try to find a text/plain part in the msg and quote it */
93         body = get_body_text (self, FALSE);
94         if (body)
95                 quoted_msg = modest_text_utils_quote (body, from, sent_date, limit);
96         
97         return quoted_msg;
98 }
99
100
101
102 TnyMimePart *
103 modest_tny_msg_actions_find_body_part (TnyMsg *msg, gboolean want_html)
104 {
105         const gchar *mime_type = want_html ? "text/html" : "text/plain";
106         TnyMimePart *part = NULL;
107         TnyList *parts;
108         TnyIterator *iter;
109
110         if (!msg)
111                 return NULL;
112
113         parts = TNY_LIST (tny_simple_list_new());
114         tny_mime_part_get_parts (TNY_MIME_PART (msg), parts);
115
116         iter  = tny_list_create_iterator(parts);
117
118         while (!tny_iterator_is_done(iter)) {
119
120                 part = TNY_MIME_PART(tny_iterator_get_current (iter));
121                 
122                 if (tny_mime_part_content_type_is (part, mime_type) &&
123                     !tny_mime_part_is_attachment (part)) {
124                         break;
125                 }
126                 part = NULL;
127                 tny_iterator_next (iter);
128         }
129
130         /* did we find a matching part? */
131         if (part)
132                 g_object_ref (G_OBJECT(part));
133
134         g_object_unref (G_OBJECT(iter));
135         g_object_unref (G_OBJECT(parts));
136
137         /* if were trying to find an HTML part and couldn't find it,
138          * try to find a text/plain part instead
139          */
140         if (!part && want_html) 
141                 return modest_tny_msg_actions_find_body_part (msg, FALSE);
142
143         return part ? part : NULL;
144 }
145
146
147
148 TnyMimePart *
149 modest_tny_msg_actions_find_nth_part (TnyMsg *msg, gint index)
150 {
151         TnyMimePart *part;
152         TnyList *parts;
153         TnyIterator *iter;
154
155         g_return_val_if_fail (msg, NULL);
156         g_return_val_if_fail (index > 0, NULL);
157                 
158         parts = TNY_LIST(tny_simple_list_new());
159         tny_mime_part_get_parts (TNY_MIME_PART(msg), parts);
160         iter  = tny_list_create_iterator (parts);
161
162         part = NULL;
163         
164         if (!tny_iterator_is_done(iter)) {
165                 tny_iterator_nth (iter, index);
166                 part = TNY_MIME_PART(tny_iterator_get_current (iter));
167         }
168
169         g_object_unref (G_OBJECT(iter));
170         g_object_unref (G_OBJECT(parts));
171
172         return part;
173 }
174
175 gchar * 
176 modest_tny_msg_actions_find_body (TnyMsg *msg, gboolean want_html)
177 {
178         const gchar *body;
179
180         body = get_body_text (msg, want_html);
181
182         if (body)
183                 return g_strdup (body);
184         else 
185                 return NULL;
186 }
187
188
189 static void
190 modest_tny_msg_actions_xfer (TnyHeader *header, TnyFolder *folder, 
191                              gboolean delete_original)
192 {
193         TnyFolder *src_folder;
194         TnyList *headers;
195
196         src_folder = tny_header_get_folder (header);
197         headers = tny_simple_list_new ();
198
199         /* Move */
200         tny_list_prepend (headers, G_OBJECT (header));
201         tny_folder_transfer_msgs (src_folder, headers, folder, delete_original);
202
203         /* Free */
204         g_object_unref (headers);
205         g_object_unref (folder);
206 }
207
208 void
209 modest_tny_msg_actions_copy (TnyHeader *header, TnyFolder *folder)
210 {
211         g_return_if_fail (TNY_IS_HEADER (header));
212         g_return_if_fail (TNY_IS_FOLDER (folder));
213
214         modest_tny_msg_actions_xfer (header, folder, FALSE);
215 }
216
217 void
218 modest_tny_msg_actions_move (TnyHeader *header, TnyFolder *folder)
219 {
220         g_return_if_fail (TNY_IS_HEADER (header));
221         g_return_if_fail (TNY_IS_FOLDER (folder));
222
223         modest_tny_msg_actions_xfer (header, folder, TRUE);
224 }
225
226 void
227 modest_tny_msg_actions_remove (TnyHeader *header)
228 {
229         TnyFolder *folder;
230
231         g_return_if_fail (TNY_IS_HEADER (header));
232
233         folder = tny_header_get_folder (header);
234
235         /* Remove */
236         tny_folder_remove_msg (folder, header);
237         tny_folder_expunge (folder);
238
239         /* Free */
240         g_object_unref (folder);
241 }