Add links mode to attachments view (for Fremantle)
[modest] / src / widgets / modest-attachments-view.c
1 /* Copyright (c) 2007, 2009, 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 #include <config.h>
31
32 #include <string.h>
33 #include <gtk/gtk.h>
34 #include <gdk/gdkkeysyms.h>
35 #include <tny-list.h>
36 #include <tny-simple-list.h>
37
38 #include <modest-platform.h>
39 #include <modest-runtime.h>
40 #include <modest-attachment-view.h>
41 #include <modest-attachments-view.h>
42 #include <modest-tny-mime-part.h>
43
44 static GObjectClass *parent_class = NULL;
45
46 /* signals */
47 enum {
48         ACTIVATE_SIGNAL,
49         DELETE_SIGNAL,
50         LAST_SIGNAL
51 };
52
53 typedef struct _ModestAttachmentsViewPrivate ModestAttachmentsViewPrivate;
54
55 struct _ModestAttachmentsViewPrivate
56 {
57         TnyMsg *msg;
58         GtkWidget *box;
59         GList *selected;
60         GtkWidget *rubber_start;
61         ModestAttachmentsViewStyle style;
62 };
63
64 #define MODEST_ATTACHMENTS_VIEW_GET_PRIVATE(o)  \
65         (G_TYPE_INSTANCE_GET_PRIVATE ((o), MODEST_TYPE_ATTACHMENTS_VIEW, ModestAttachmentsViewPrivate))
66
67 static gboolean button_press_event (GtkWidget *widget, GdkEventButton *event, ModestAttachmentsView *atts_view);
68 static gboolean motion_notify_event (GtkWidget *widget, GdkEventMotion *event, ModestAttachmentsView *atts_view);
69 static gboolean button_release_event (GtkWidget *widget, GdkEventButton *event, ModestAttachmentsView *atts_view);
70 static gboolean key_press_event (GtkWidget *widget, GdkEventKey *event, ModestAttachmentsView *atts_view);
71 static gboolean focus_out_event (GtkWidget *widget, GdkEventFocus *event, ModestAttachmentsView *atts_view);
72 static gboolean focus (GtkWidget *widget, GtkDirectionType direction, ModestAttachmentsView *atts_view);
73 static GtkWidget *get_att_view_at_coords (ModestAttachmentsView *atts_view,
74                                           gdouble x, gdouble y);
75 static void unselect_all (ModestAttachmentsView *atts_view);
76 static void set_selected (ModestAttachmentsView *atts_view, ModestAttachmentView *att_view);
77 static void select_range (ModestAttachmentsView *atts_view, ModestAttachmentView *att1, ModestAttachmentView *att2);
78 static void clipboard_get (GtkClipboard *clipboard, GtkSelectionData *selection_data,
79                            guint info, gpointer userdata);
80 static void own_clipboard (ModestAttachmentsView *atts_view);
81
82 static guint signals[LAST_SIGNAL] = {0};
83
84 /**
85  * modest_attachments_view_new:
86  * @msg: a #TnyMsg
87  *
88  * Constructor for attachments view widget.
89  *
90  * Return value: a new #ModestAttachmentsView instance implemented for Gtk+
91  **/
92 GtkWidget*
93 modest_attachments_view_new (TnyMsg *msg)
94 {
95         ModestAttachmentsView *self = g_object_new (MODEST_TYPE_ATTACHMENTS_VIEW, 
96                                                     "resize-mode", GTK_RESIZE_PARENT,
97                                                     NULL);
98
99         modest_attachments_view_set_message (self, msg);
100
101         return GTK_WIDGET (self);
102 }
103
104
105 void
106 modest_attachments_view_set_message (ModestAttachmentsView *attachments_view, TnyMsg *msg)
107 {
108         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (attachments_view);
109         TnyList *parts;
110         TnyIterator *iter;
111         gchar *msg_content_type = NULL;
112         
113         if (msg == priv->msg) return;
114
115         if (priv->msg)
116                 g_object_unref (priv->msg);
117         if (msg)
118                 g_object_ref (G_OBJECT(msg));
119         
120         priv->msg = msg;
121
122         g_list_free (priv->selected);
123         priv->selected = NULL;
124
125         gtk_container_foreach (GTK_CONTAINER (priv->box), (GtkCallback) gtk_widget_destroy, NULL);
126         
127         if (priv->msg == NULL) {
128                 return;
129         }
130
131         /* If the top mime part is a multipart/related, we don't show the attachments, as they're
132          * embedded images in body */
133         msg_content_type = modest_tny_mime_part_get_content_type (TNY_MIME_PART (priv->msg));
134         if ((msg_content_type != NULL) && !strcasecmp (msg_content_type, "multipart/related")) {
135                 gchar *header_content_type;
136                 gboolean application_multipart = FALSE;
137
138                 g_free (msg_content_type);
139
140                 header_content_type = modest_tny_mime_part_get_headers_content_type (TNY_MIME_PART (priv->msg));
141                 
142                 if ((header_content_type != NULL) && 
143                     !strstr (header_content_type, "application/")) {
144                         application_multipart = TRUE;
145                 }
146                 g_free (header_content_type);
147
148                 if (application_multipart) {
149                         gtk_widget_queue_draw (GTK_WIDGET (attachments_view));
150                         return;
151                 }
152         } else {
153                 gboolean direct_attach;
154
155                 direct_attach = (!g_str_has_prefix (msg_content_type, "message/rfc822") && 
156                                  !g_str_has_prefix (msg_content_type, "multipart") && 
157                                  !g_str_has_prefix (msg_content_type, "text/"));
158
159                 g_free (msg_content_type);
160
161                 if (direct_attach) {
162                         modest_attachments_view_add_attachment (attachments_view, TNY_MIME_PART (msg), TRUE, 0);
163                         gtk_widget_queue_draw (GTK_WIDGET (attachments_view));
164                         return;
165                 }
166         }
167
168         parts = TNY_LIST (tny_simple_list_new ());
169         tny_mime_part_get_parts (TNY_MIME_PART (priv->msg), parts);
170         iter = tny_list_create_iterator (parts);
171
172         while (!tny_iterator_is_done (iter)) {
173                 TnyMimePart *part;
174
175                 part = TNY_MIME_PART (tny_iterator_get_current (iter));
176
177                 if (part && (modest_tny_mime_part_is_attachment_for_modest (part))) 
178                         modest_attachments_view_add_attachment (attachments_view, part, TRUE, 0);
179
180                 if (part)
181                         g_object_unref (part);
182
183                 tny_iterator_next (iter);
184         }
185         g_object_unref (iter);
186         g_object_unref (parts);
187         
188
189         gtk_widget_queue_draw (GTK_WIDGET (attachments_view));
190
191 }
192
193 void
194 modest_attachments_view_add_attachment (ModestAttachmentsView *attachments_view, TnyMimePart *part,
195                                         gboolean detect_size, guint64 size)
196 {
197         GtkWidget *att_view = NULL;
198         ModestAttachmentsViewPrivate *priv = NULL;
199
200         g_return_if_fail (MODEST_IS_ATTACHMENTS_VIEW (attachments_view));
201         g_return_if_fail (TNY_IS_MIME_PART (part));
202
203         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (attachments_view);
204
205         att_view = modest_attachment_view_new (part, detect_size);
206         if (!detect_size)
207                 modest_attachment_view_set_size (MODEST_ATTACHMENT_VIEW (att_view), size);
208         gtk_box_pack_end (GTK_BOX (priv->box), att_view, FALSE, FALSE, 0);
209         gtk_widget_show_all (att_view);
210         gtk_widget_queue_resize (GTK_WIDGET (attachments_view));
211 }
212
213 void
214 modest_attachments_view_remove_attachment (ModestAttachmentsView *atts_view, TnyMimePart *mime_part)
215 {
216         ModestAttachmentsViewPrivate *priv = NULL;
217         GList *box_children = NULL, *node = NULL;
218         ModestAttachmentView *found_att_view = NULL;
219
220         g_return_if_fail (MODEST_IS_ATTACHMENTS_VIEW (atts_view));
221         g_return_if_fail (TNY_IS_MIME_PART (mime_part));
222
223         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
224         box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
225
226         for (node = box_children; node != NULL; node = g_list_next (node)) {
227                 ModestAttachmentView *att_view = (ModestAttachmentView *) node->data;
228                 TnyMimePart *cur_mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
229
230                 if (mime_part == cur_mime_part)
231                         found_att_view = att_view;
232
233                 g_object_unref (cur_mime_part);
234
235                 if (found_att_view != NULL)
236                         break;
237         }
238
239         if (found_att_view) {
240                 GList *node = NULL;
241                 GtkWidget *next_widget = NULL;
242                 GList *box_children = NULL;
243
244                 box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
245                 node = g_list_find (box_children, found_att_view);
246                 if (node->next)
247                         next_widget = node->next->data;
248
249                 g_list_free (box_children);
250
251                 node = g_list_find (priv->selected, found_att_view);
252                 if (node != NULL) {
253                         priv->selected = g_list_delete_link (priv->selected, node);
254                         gtk_widget_destroy (GTK_WIDGET (found_att_view));
255                         if ((priv->selected == NULL) && (next_widget != NULL))
256                                 set_selected (MODEST_ATTACHMENTS_VIEW (atts_view), 
257                                               MODEST_ATTACHMENT_VIEW (next_widget));
258                 }
259                 own_clipboard (atts_view);
260         }
261
262         gtk_widget_queue_resize (GTK_WIDGET (atts_view));
263 }
264
265 void
266 modest_attachments_view_remove_attachment_by_id (ModestAttachmentsView *atts_view, const gchar *att_id)
267 {
268         ModestAttachmentsViewPrivate *priv = NULL;
269         GList *box_children = NULL, *node = NULL;
270
271         g_return_if_fail (MODEST_IS_ATTACHMENTS_VIEW (atts_view));
272         g_return_if_fail (att_id != NULL);
273
274         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
275         box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
276
277         for (node = box_children; node != NULL; node = g_list_next (node)) {
278                 ModestAttachmentView *att_view = (ModestAttachmentView *) node->data;
279                 TnyMimePart *cur_mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
280                 const gchar *mime_part_id = NULL;
281
282                 mime_part_id = tny_mime_part_get_content_id (cur_mime_part);
283                 if ((mime_part_id != NULL) && (strcmp (mime_part_id, att_id) == 0)) {
284                         gtk_widget_destroy (GTK_WIDGET (att_view));
285                         priv->selected = g_list_remove (priv->selected, att_view);
286                 }
287
288                 g_object_unref (cur_mime_part);
289         }
290
291         own_clipboard (atts_view);
292
293         gtk_widget_queue_resize (GTK_WIDGET (atts_view));
294 }
295
296 static void
297 modest_attachments_view_instance_init (GTypeInstance *instance, gpointer g_class)
298 {
299         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (instance);
300
301         priv->msg = NULL;
302         priv->box = gtk_vbox_new (FALSE, 0);
303         priv->rubber_start = NULL;
304         priv->selected = NULL;
305         priv->style = MODEST_ATTACHMENTS_VIEW_STYLE_SELECTABLE;
306
307         gtk_container_add (GTK_CONTAINER (instance), priv->box);
308         gtk_event_box_set_above_child (GTK_EVENT_BOX (instance), TRUE);
309
310         g_signal_connect (G_OBJECT (instance), "button-press-event", G_CALLBACK (button_press_event), instance);
311         g_signal_connect (G_OBJECT (instance), "button-release-event", G_CALLBACK (button_release_event), instance);
312         g_signal_connect (G_OBJECT (instance), "motion-notify-event", G_CALLBACK (motion_notify_event), instance);
313         g_signal_connect (G_OBJECT (instance), "key-press-event", G_CALLBACK (key_press_event), instance);
314         g_signal_connect (G_OBJECT (instance), "focus-out-event", G_CALLBACK (focus_out_event), instance);
315         g_signal_connect (G_OBJECT (instance), "focus", G_CALLBACK (focus), instance);
316
317         GTK_WIDGET_SET_FLAGS (instance, GTK_CAN_FOCUS);
318
319         return;
320 }
321
322 static void
323 modest_attachments_view_finalize (GObject *object)
324 {
325         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (object);
326
327         if (priv->msg) {
328                 g_object_unref (priv->msg);
329                 priv->msg = NULL;
330         }
331
332         (*parent_class->finalize) (object);
333
334         return;
335 }
336
337 static void 
338 modest_attachments_view_class_init (ModestAttachmentsViewClass *klass)
339 {
340         GObjectClass *object_class;
341         GtkWidgetClass *widget_class;
342
343         parent_class = g_type_class_peek_parent (klass);
344         object_class = (GObjectClass*) klass;
345         widget_class = GTK_WIDGET_CLASS (klass);
346
347         object_class->finalize = modest_attachments_view_finalize;
348
349         klass->activate = NULL;
350
351         g_type_class_add_private (object_class, sizeof (ModestAttachmentsViewPrivate));
352
353         signals[ACTIVATE_SIGNAL] =
354                 g_signal_new ("activate",
355                               G_TYPE_FROM_CLASS (object_class),
356                               G_SIGNAL_RUN_FIRST | G_SIGNAL_ACTION,
357                               G_STRUCT_OFFSET(ModestAttachmentsViewClass, activate),
358                               NULL, NULL,
359                               g_cclosure_marshal_VOID__OBJECT,
360                               G_TYPE_NONE, 1, G_TYPE_OBJECT);
361         
362         signals[DELETE_SIGNAL] =
363                 g_signal_new ("delete",
364                               G_TYPE_FROM_CLASS (object_class),
365                               G_SIGNAL_RUN_FIRST | G_SIGNAL_ACTION,
366                               G_STRUCT_OFFSET(ModestAttachmentsViewClass, delete),
367                               NULL, NULL,
368                               g_cclosure_marshal_VOID__VOID,
369                               G_TYPE_NONE, 0);
370
371         return;
372 }
373
374 GType 
375 modest_attachments_view_get_type (void)
376 {
377         static GType type = 0;
378
379         if (G_UNLIKELY(type == 0))
380         {
381                 static const GTypeInfo info = 
382                 {
383                   sizeof (ModestAttachmentsViewClass),
384                   NULL,   /* base_init */
385                   NULL,   /* base_finalize */
386                   (GClassInitFunc) modest_attachments_view_class_init,   /* class_init */
387                   NULL,   /* class_finalize */
388                   NULL,   /* class_data */
389                   sizeof (ModestAttachmentsView),
390                   0,      /* n_preallocs */
391                   modest_attachments_view_instance_init    /* instance_init */
392                 };
393
394                 type = g_type_register_static (GTK_TYPE_EVENT_BOX,
395                         "ModestAttachmentsView",
396                         &info, 0);
397
398         }
399
400         return type;
401 }
402
403 /* buttons signal events */
404 static gboolean
405 button_press_event (GtkWidget *widget, 
406                     GdkEventButton *event,
407                     ModestAttachmentsView *atts_view)
408 {
409         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
410         if (priv->style == MODEST_ATTACHMENTS_VIEW_STYLE_SELECTABLE && 
411             !GTK_WIDGET_HAS_FOCUS (widget))
412                 gtk_widget_grab_focus (widget);
413
414         if (event->button == 1 && event->type == GDK_BUTTON_PRESS) {
415                 GtkWidget *att_view = NULL;
416
417                 att_view = get_att_view_at_coords (MODEST_ATTACHMENTS_VIEW (widget), 
418                                                    (gint) event->x_root, (gint) event->y_root);
419
420                 if (att_view != NULL) {
421                         if ((priv->style == MODEST_ATTACHMENTS_VIEW_STYLE_LINKS) ||
422                             (GTK_WIDGET_STATE (att_view) == GTK_STATE_SELECTED && (g_list_length (priv->selected) < 2))) {
423                                 TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
424                                 if (TNY_IS_MIME_PART (mime_part)) {
425                                         g_signal_emit (G_OBJECT (widget), signals[ACTIVATE_SIGNAL], 0, mime_part);
426                                         g_object_unref (mime_part);
427                                 }
428                         } else {
429                                 TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
430
431                                 /* Do not select purged attachments */
432                                 if (TNY_IS_MIME_PART (mime_part) && !tny_mime_part_is_purged (mime_part)) {
433                                         set_selected (MODEST_ATTACHMENTS_VIEW (widget), MODEST_ATTACHMENT_VIEW (att_view));
434                                         priv->rubber_start = att_view;
435                                         gtk_grab_add (widget);
436                                 }
437                                 g_object_unref (mime_part);
438                         }
439                 }
440         }
441         return TRUE;
442
443 }
444
445 static gboolean
446 button_release_event (GtkWidget *widget,
447                       GdkEventButton *event,
448                       ModestAttachmentsView *atts_view)
449 {
450         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
451         if (widget == gtk_grab_get_current ()) {
452                 GtkWidget *att_view = NULL;
453
454                 att_view = get_att_view_at_coords (MODEST_ATTACHMENTS_VIEW (widget), 
455                                                    (gint) event->x_root, (gint) event->y_root);
456
457                 if (att_view != NULL) {
458                         unselect_all (MODEST_ATTACHMENTS_VIEW (widget));
459                         select_range (MODEST_ATTACHMENTS_VIEW (widget), 
460                                       MODEST_ATTACHMENT_VIEW (priv->rubber_start), 
461                                       MODEST_ATTACHMENT_VIEW (att_view));
462                 }
463                 priv->rubber_start = NULL;
464                 gtk_grab_remove (widget);
465         }
466         return TRUE;
467 }
468
469 static gboolean
470 motion_notify_event (GtkWidget *widget,
471                      GdkEventMotion *event,
472                      ModestAttachmentsView *atts_view)
473 {
474         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
475         if (gtk_grab_get_current () == widget) {
476                 GtkWidget *att_view = NULL;
477
478                 att_view = get_att_view_at_coords (MODEST_ATTACHMENTS_VIEW (widget), 
479                                                    (gint) event->x_root, (gint) event->y_root);
480
481                 if (att_view != NULL) {
482                         unselect_all (MODEST_ATTACHMENTS_VIEW (widget));
483                         select_range (MODEST_ATTACHMENTS_VIEW (widget), 
484                                       MODEST_ATTACHMENT_VIEW (priv->rubber_start), 
485                                       MODEST_ATTACHMENT_VIEW (att_view));
486                 }
487         }
488         return TRUE;
489 }
490
491 static GList*
492 find_prev_or_next_not_purged (GList *list, gboolean prev, gboolean include_this)
493 {
494         GList *tmp = NULL;
495         gboolean is_valid;
496
497         if (!include_this) {
498                 if (prev) {
499                         tmp = g_list_previous (list);
500                 } else {
501                         tmp = g_list_next (list);
502                 }
503         } else {
504                 tmp = list;
505         }
506
507         if (!tmp)
508                 return NULL;
509
510         do {
511                 ModestAttachmentView *att_view = (ModestAttachmentView *) tmp->data;
512                 TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
513                 
514                 /* Do not select purged attachments */
515                 if (TNY_IS_MIME_PART (mime_part) && !tny_mime_part_is_purged (mime_part)) {
516                         is_valid = TRUE;
517                 } else {
518                         if (prev)
519                                 tmp = g_list_previous (tmp);
520                         else
521                                 tmp = g_list_next (tmp);
522                         is_valid = FALSE;
523                 }
524                 g_object_unref (mime_part);
525         } while (!is_valid && tmp);
526
527         return tmp;
528 }
529
530
531 static gboolean
532 key_press_event (GtkWidget *widget,
533                  GdkEventKey *event,
534                  ModestAttachmentsView *atts_view)
535 {
536         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
537
538         /* If grabbed (for example rubber banding), escape leaves the rubberbanding mode */
539         if (gtk_grab_get_current () == widget) {
540                 if (event->keyval == GDK_Escape) {
541                         set_selected (MODEST_ATTACHMENTS_VIEW (widget),
542                                       MODEST_ATTACHMENT_VIEW (priv->rubber_start));
543                         priv->rubber_start = NULL;
544                         gtk_grab_remove (widget);
545                         return TRUE;
546                 } 
547                 return FALSE;
548         }
549
550         if (event->keyval == GDK_Up) {
551                 ModestAttachmentView *current_sel = NULL;
552                 gboolean move_out = FALSE;
553                 GList * box_children, *new_sel, *first_child;
554
555                 box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
556                 if (box_children == NULL) {
557                         move_out = TRUE;
558                 } else { 
559                         first_child = box_children;
560                         first_child = find_prev_or_next_not_purged (box_children, FALSE, TRUE);
561                         if (priv->selected != NULL && first_child != NULL) {
562                                 if (priv->selected->data != first_child->data)
563                                         current_sel = (ModestAttachmentView *) priv->selected->data;
564                                 else
565                                         move_out = TRUE;
566                         } else {
567                                 move_out = TRUE;
568                         }
569                 }
570
571                 if (move_out) {
572                         GtkWidget *toplevel = NULL;
573                         /* move cursor outside */
574                         toplevel = gtk_widget_get_toplevel (widget);
575                         if (GTK_WIDGET_TOPLEVEL (toplevel) && GTK_IS_WINDOW (toplevel))
576                                 g_signal_emit_by_name (toplevel, "move-focus", GTK_DIR_UP);
577                         unselect_all (atts_view);
578                 } else {
579                         new_sel = g_list_find (box_children, (gpointer) current_sel);
580                         new_sel = find_prev_or_next_not_purged (new_sel, TRUE, FALSE);
581                         /* We assume that we detected properly that
582                            there is a not purge attachment so we don't
583                            need to check NULL */
584                         set_selected (MODEST_ATTACHMENTS_VIEW (atts_view), MODEST_ATTACHMENT_VIEW (new_sel->data));
585                 }
586                 g_list_free (box_children);
587                 return TRUE;
588         }
589
590         if (event->keyval == GDK_Down) {
591                 ModestAttachmentView *current_sel = NULL;
592                 gboolean move_out = FALSE;
593                 GList * box_children, *new_sel, *last_child = NULL;
594
595                 box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
596
597                 if (box_children == NULL) {
598                         move_out = TRUE;
599                 } else {
600                         last_child = g_list_last (box_children);
601                         last_child = find_prev_or_next_not_purged (last_child, TRUE, TRUE);
602                         if (priv->selected != NULL && last_child != NULL) {
603                                 GList *last_selected = g_list_last (priv->selected);
604                                 if (last_selected->data != last_child->data)
605                                         current_sel = (ModestAttachmentView *) last_selected->data;
606                                 else
607                                         move_out = TRUE;
608                         } else {
609                                 move_out = TRUE;
610                         }
611                 }
612
613                 if (move_out) {
614                         GtkWidget *toplevel = NULL;
615                         /* move cursor outside */
616                         toplevel = gtk_widget_get_toplevel (widget);
617                         if (GTK_WIDGET_TOPLEVEL (toplevel) && GTK_IS_WINDOW (toplevel))
618                                 g_signal_emit_by_name (toplevel, "move-focus", GTK_DIR_DOWN);
619                         unselect_all (atts_view);
620                 } else {
621                         new_sel = g_list_find (box_children, (gpointer) current_sel);
622                         new_sel = find_prev_or_next_not_purged (new_sel, FALSE, FALSE);
623                         set_selected (MODEST_ATTACHMENTS_VIEW (atts_view), MODEST_ATTACHMENT_VIEW (new_sel->data));
624                 }
625                 g_list_free (box_children);
626                 return TRUE;
627         }
628
629         if (event->keyval == GDK_BackSpace) {
630                 g_signal_emit (G_OBJECT (widget), signals[DELETE_SIGNAL], 0);
631                 return TRUE;
632         }
633
634         /* Activates selected item */
635         if (g_list_length (priv->selected) == 1) {
636                 ModestAttachmentView *att_view = (ModestAttachmentView *) priv->selected->data;
637                 if ((event->keyval == GDK_Return)) {
638                         TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
639                         if (TNY_IS_MIME_PART (mime_part)) {
640                                 g_signal_emit (G_OBJECT (widget), signals[ACTIVATE_SIGNAL], 0, mime_part);
641                                 g_object_unref (mime_part);
642                         }
643                         return TRUE;
644                 }
645         }
646
647         return FALSE;
648 }
649
650
651 static GtkWidget *
652 get_att_view_at_coords (ModestAttachmentsView *atts_view,
653                         gdouble x, gdouble y)
654 {
655         ModestAttachmentsViewPrivate *priv = NULL;
656         GList *att_view_list, *node;
657         GtkWidget *result = NULL;
658
659         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
660         att_view_list = gtk_container_get_children (GTK_CONTAINER (priv->box));
661         
662         for (node = att_view_list; node != NULL; node = g_list_next (node)) {
663                 GtkWidget *att_view = (GtkWidget *) node->data;
664                 gint pos_x, pos_y, w, h, int_x, int_y;
665                 gint widget_x, widget_y;
666
667                 gdk_window_get_origin (att_view->window, &widget_x, &widget_y);
668
669                 pos_x = widget_x;
670                 pos_y = widget_y;
671                 w = att_view->allocation.width;
672                 h = att_view->allocation.height;
673
674                 int_x = (gint) x - GTK_WIDGET (atts_view)->allocation.x;
675                 int_y = (gint) y - GTK_WIDGET (atts_view)->allocation.y;
676
677                 if ((x >= pos_x) && (x <= (pos_x + w)) && (y >= pos_y) && (y <= (pos_y + h))) {
678                         result = att_view;
679                         break;
680                 }
681         }
682
683         g_list_free (att_view_list);
684         return result;
685 }
686
687 static void
688 unselect_all (ModestAttachmentsView *atts_view)
689 {
690         ModestAttachmentsViewPrivate *priv = NULL;
691         GList *att_view_list, *node;
692
693         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
694         att_view_list = gtk_container_get_children (GTK_CONTAINER (priv->box));
695         
696         for (node = att_view_list; node != NULL; node = g_list_next (node)) {
697                 GtkWidget *att_view = (GtkWidget *) node->data;
698
699                 if (GTK_WIDGET_STATE (att_view) == GTK_STATE_SELECTED)
700                         gtk_widget_set_state (att_view, GTK_STATE_NORMAL);
701         }
702
703         g_list_free (priv->selected);
704         priv->selected = NULL;
705
706         g_list_free (att_view_list);
707 }
708
709 static void 
710 set_selected (ModestAttachmentsView *atts_view, ModestAttachmentView *att_view)
711 {
712         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
713         TnyMimePart *part;
714
715         unselect_all (atts_view);
716         part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
717         
718         g_list_free (priv->selected);
719         priv->selected = NULL;
720         if (TNY_IS_MIME_PART (part) && !tny_mime_part_is_purged (part)) {
721                 gtk_widget_set_state (GTK_WIDGET (att_view), GTK_STATE_SELECTED);
722                 priv->selected = g_list_append (priv->selected, att_view);
723         }
724         if (part)
725                 g_object_unref (part);
726         
727         own_clipboard (atts_view);
728 }
729
730 static void 
731 select_range (ModestAttachmentsView *atts_view, ModestAttachmentView *att1, ModestAttachmentView *att2)
732 {
733         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
734         GList *children = NULL;
735         GList *node = NULL;
736         gboolean selecting = FALSE;
737         TnyMimePart *part;
738
739         unselect_all (atts_view);
740
741         if (att1 == att2) {
742                 set_selected (atts_view, att1);
743                 return;
744         }
745
746         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
747         g_list_free (priv->selected);
748         priv->selected = NULL;
749
750
751         for (node = children; node != NULL; node = g_list_next (node)) {
752                 if ((node->data == att1) || (node->data == att2)) {
753                         part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (node->data));
754                         if (!tny_mime_part_is_purged (part)) {
755                                 gtk_widget_set_state (GTK_WIDGET (node->data), GTK_STATE_SELECTED);
756                                 priv->selected = g_list_append (priv->selected, node->data);
757                         }
758                         g_object_unref (part);
759                         selecting = !selecting;
760                 } else if (selecting) {
761                         part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (node->data));
762                         if (!tny_mime_part_is_purged (part)) {
763                                 gtk_widget_set_state (GTK_WIDGET (node->data), GTK_STATE_SELECTED);
764                                 priv->selected = g_list_append (priv->selected, node->data);
765                         }
766                         g_object_unref (part);
767                 }
768                         
769         }
770         g_list_free (children);
771         
772         own_clipboard (atts_view);
773 }
774
775 static void clipboard_get (GtkClipboard *clipboard, GtkSelectionData *selection_data,
776                            guint info, gpointer userdata)
777 {
778         ModestAttachmentsView *atts_view = (ModestAttachmentsView *) userdata;
779         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
780
781         if ((priv->selected != NULL)&&(priv->selected->next == NULL)) {
782                 if (info == MODEST_ATTACHMENTS_VIEW_CLIPBOARD_TYPE_INDEX) {
783                         /* MODEST_ATTACHMENT requested. As the content id is not filled in all the case, we'll
784                          * use an internal index. This index is simply the index of the attachment in the vbox */
785                         GList *box_children = NULL;
786                         gint index;
787                         box_children = gtk_container_get_children (GTK_CONTAINER (priv->box));
788                         index = g_list_index (box_children, priv->selected);
789                         if (index >= 0) {
790                                 gchar *index_str = g_strdup_printf("%d", index);
791                                 gtk_selection_data_set_text (selection_data, index_str, -1);
792                                 g_free (index_str);
793                         }
794                 }
795         }
796 }
797
798 TnyList *
799 modest_attachments_view_get_selection (ModestAttachmentsView *atts_view)
800 {
801         ModestAttachmentsViewPrivate *priv;
802         TnyList *selection;
803         GList *node;
804
805         g_return_val_if_fail (MODEST_IS_ATTACHMENTS_VIEW (atts_view), NULL);
806         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
807
808         selection = tny_simple_list_new ();
809         for (node = priv->selected; node != NULL; node = g_list_next (node)) {
810                 ModestAttachmentView *att_view = (ModestAttachmentView *) node->data;
811                 TnyMimePart *part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
812                 tny_list_append (selection, (GObject *) part);
813                 g_object_unref (part);
814         }
815         
816         return selection;
817 }
818
819 TnyList *
820 modest_attachments_view_get_attachments (ModestAttachmentsView *atts_view)
821 {
822         ModestAttachmentsViewPrivate *priv;
823         TnyList *att_list;
824         GList *children, *node= NULL;
825
826         g_return_val_if_fail (MODEST_IS_ATTACHMENTS_VIEW (atts_view), NULL);
827         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
828
829         att_list = TNY_LIST (tny_simple_list_new ());
830
831         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
832         for (node = children; node != NULL; node = g_list_next (node)) {
833                 GtkWidget *att_view = GTK_WIDGET (node->data);
834                 TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
835                 tny_list_append (att_list, (GObject *) mime_part);
836                 g_object_unref (mime_part);
837         }
838         g_list_free (children);
839         return att_list;
840
841 }
842
843 void
844 modest_attachments_view_select_all (ModestAttachmentsView *atts_view)
845 {
846         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
847         GList *children = NULL;
848         GList *node = NULL;
849
850         unselect_all (atts_view);
851
852         if (priv->style == MODEST_ATTACHMENTS_VIEW_STYLE_LINKS)
853                 return;
854
855         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
856         g_list_free (priv->selected);
857         priv->selected = NULL;
858
859         for (node = children; node != NULL; node = g_list_next (node)) {
860                 ModestAttachmentView *att_view = (ModestAttachmentView *) node->data;
861                 TnyMimePart *mime_part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
862
863                 /* Do not select purged attachments */
864                 if (TNY_IS_MIME_PART (mime_part) && !tny_mime_part_is_purged (mime_part)) {
865                         gtk_widget_set_state (GTK_WIDGET (node->data), GTK_STATE_SELECTED);
866                         priv->selected = g_list_append (priv->selected, node->data);
867                 }
868                 g_object_unref (mime_part);
869         }
870         g_list_free (children);
871
872         own_clipboard (atts_view);
873 }
874
875 gboolean
876 modest_attachments_view_has_attachments (ModestAttachmentsView *atts_view)
877 {
878         ModestAttachmentsViewPrivate *priv;
879         GList *children;
880         gboolean result;
881
882         g_return_val_if_fail (MODEST_IS_ATTACHMENTS_VIEW (atts_view), FALSE);
883         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
884
885         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
886         result = (children != NULL);
887         g_list_free (children);
888
889         return result;
890 }
891
892 void
893 modest_attachments_view_get_sizes (ModestAttachmentsView *attachments_view,
894                                    gint *attachments_count,
895                                    guint64 *attachments_size)
896 {
897         ModestAttachmentsViewPrivate *priv;
898         GList *children, *node;
899
900         g_return_if_fail (MODEST_IS_ATTACHMENTS_VIEW (attachments_view));
901         g_return_if_fail (attachments_count != NULL && attachments_size != NULL);
902
903         *attachments_count = 0;
904         *attachments_size = 0;
905
906         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (attachments_view);
907
908         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
909         for (node = children; node != NULL; node = g_list_next (node)) {
910                 GtkWidget *att_view = (GtkWidget *) node->data;
911                 TnyMimePart *part = tny_mime_part_view_get_part (TNY_MIME_PART_VIEW (att_view));
912
913                 if (!tny_mime_part_is_purged (part)) {
914                         guint64 size;
915                         (*attachments_count) ++;
916                         size = modest_attachment_view_get_size (MODEST_ATTACHMENT_VIEW (att_view));
917                         if (size == 0) {
918                                 /* we do a random estimation of the size of an attachment */
919                                 size = 32768;
920                         }
921                         *attachments_size += size;
922                         
923                 }
924                 g_object_unref (part);
925         }
926         g_list_free (children);
927 }
928
929 static void
930 own_clipboard (ModestAttachmentsView *atts_view)
931 {
932         GtkTargetEntry targets[] = {
933                 {MODEST_ATTACHMENTS_VIEW_CLIPBOARD_TYPE, 0, MODEST_ATTACHMENTS_VIEW_CLIPBOARD_TYPE_INDEX},
934         };
935
936         gtk_clipboard_set_with_owner (gtk_widget_get_clipboard (GTK_WIDGET (atts_view), GDK_SELECTION_PRIMARY),
937                                       targets, G_N_ELEMENTS (targets),
938                                       clipboard_get, NULL, G_OBJECT(atts_view));
939                               
940 }
941
942 static gboolean 
943 focus_out_event (GtkWidget *widget, GdkEventFocus *event, ModestAttachmentsView *atts_view)
944 {
945         if (!gtk_widget_is_focus (widget))
946                 unselect_all (atts_view);
947
948         return FALSE;
949 }
950
951 static gboolean 
952 focus (GtkWidget *widget, GtkDirectionType direction, ModestAttachmentsView *atts_view)
953 {
954         ModestAttachmentsViewPrivate *priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (atts_view);
955         GList *children = NULL;
956         GtkWidget *toplevel = NULL;
957
958         toplevel = gtk_widget_get_toplevel (widget);
959         if (!gtk_window_has_toplevel_focus (GTK_WINDOW (toplevel)))
960                 return FALSE;
961
962         children = gtk_container_get_children (GTK_CONTAINER (priv->box));
963         if (children != NULL) {
964                 set_selected (atts_view, MODEST_ATTACHMENT_VIEW (children->data));
965         }
966         g_list_free (children);
967
968         return FALSE;
969 }
970
971 void 
972 modest_attachments_view_set_style (ModestAttachmentsView *self,
973                                    ModestAttachmentsViewStyle style)
974 {
975         ModestAttachmentsViewPrivate *priv;
976
977         g_return_if_fail (MODEST_IS_ATTACHMENTS_VIEW (self));
978         priv = MODEST_ATTACHMENTS_VIEW_GET_PRIVATE (self);
979
980         if (priv->style != style) {
981                 priv->style = style;
982                 gtk_widget_queue_draw (GTK_WIDGET (self));
983                 if (priv->style == MODEST_ATTACHMENTS_VIEW_STYLE_LINKS) {
984                         GTK_WIDGET_UNSET_FLAGS (self, GTK_CAN_FOCUS);
985                 } else {
986                         GTK_WIDGET_SET_FLAGS (self, GTK_CAN_FOCUS);
987                 }
988
989         }
990 }