Fix modest_tny_msg_header_get_all_recipients_list (in case from is empty)
[modest] / src / modest-mail-operation-queue.c
index 6f46a4e..22bbd53 100644 (file)
 #include "modest-marshal.h"
 #include "modest-mail-operation-queue.h"
 #include "modest-runtime.h"
+#include "modest-debug.h"
 
 /* 'private'/'protected' functions */
 static void modest_mail_operation_queue_class_init (ModestMailOperationQueueClass *klass);
 static void modest_mail_operation_queue_init       (ModestMailOperationQueue *obj);
 static void modest_mail_operation_queue_finalize   (GObject *obj);
 
-static void modest_mail_operation_queue_cancel_no_block_wrapper (ModestMailOperation *mail_op,
-                                                                ModestMailOperationQueue *op_queue);
-
-static void modest_mail_operation_queue_cancel_no_block         (ModestMailOperationQueue *op_queue,
-                                                                ModestMailOperation *mail_op);
+static void
+on_operation_finished (ModestMailOperation *mail_op,
+                      gpointer user_data);
 
 /* list my signals  */
 enum {
        QUEUE_CHANGED_SIGNAL,
+       QUEUE_EMPTY_SIGNAL,
        NUM_SIGNALS
 };
 
@@ -53,6 +53,9 @@ typedef struct _ModestMailOperationQueuePrivate ModestMailOperationQueuePrivate;
 struct _ModestMailOperationQueuePrivate {
        GQueue *op_queue;
        GMutex *queue_lock;
+       guint   op_id;
+       guint   queue_empty_handler;
+       gboolean running_final_sync;
 };
 #define MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(o)      (G_TYPE_INSTANCE_GET_PRIVATE((o), \
                                                          MODEST_TYPE_MAIL_OPERATION_QUEUE, \
@@ -116,6 +119,23 @@ modest_mail_operation_queue_class_init (ModestMailOperationQueueClass *klass)
                              NULL, NULL,
                              modest_marshal_VOID__POINTER_INT,
                              G_TYPE_NONE, 2, G_TYPE_POINTER, G_TYPE_INT);
+
+       /**
+        * ModestMailOperationQueue::queue-empty
+        * @self: the #ModestMailOperationQueue that emits the signal
+        * @user_data: user data set when the signal handler was connected
+        *
+        * Issued whenever the queue is empty
+        */
+       signals[QUEUE_EMPTY_SIGNAL] =
+               g_signal_new ("queue-empty",
+                             G_TYPE_FROM_CLASS (gobject_class),
+                             G_SIGNAL_RUN_FIRST,
+                             G_STRUCT_OFFSET (ModestMailOperationQueueClass, queue_empty),
+                             NULL, NULL,
+                             g_cclosure_marshal_VOID__VOID,
+                             G_TYPE_NONE, 0);
+
 }
 
 static void
@@ -127,6 +147,43 @@ modest_mail_operation_queue_init (ModestMailOperationQueue *obj)
 
        priv->op_queue   = g_queue_new ();
        priv->queue_lock = g_mutex_new ();
+       priv->op_id = 0;
+       priv->queue_empty_handler = 0;
+       priv->running_final_sync = FALSE;
+}
+
+static void
+print_queue_item (ModestMailOperation *op, const gchar* prefix)
+{
+       gchar *op_str = modest_mail_operation_to_string (op);
+       g_debug ("%s: %s",
+                prefix ? prefix : "",
+                op_str);
+       g_free (op_str);
+}
+
+static void
+on_finalize_foreach(gpointer op,
+                    gpointer user_data)
+{
+       ModestMailOperationQueue *queue;
+       ModestMailOperationQueuePrivate *priv;
+       ModestMailOperation *mail_op;
+
+       queue = MODEST_MAIL_OPERATION_QUEUE (user_data);
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE (queue);
+       mail_op = MODEST_MAIL_OPERATION (op);
+
+       /* Simply remove from queue, but without emitting a
+        * QUEUE_CHANGED_SIGNAL because we are in finalize anyway and have
+        * the lock acquired. */
+       g_signal_handlers_disconnect_by_func (mail_op, G_CALLBACK (on_operation_finished), user_data);
+
+       MODEST_DEBUG_BLOCK (print_queue_item (mail_op, "cancel/remove"););
+
+       modest_mail_operation_cancel (mail_op);
+       g_queue_remove (priv->op_queue, mail_op);
+       g_object_unref (G_OBJECT (mail_op));
 }
 
 static void
@@ -138,10 +195,21 @@ modest_mail_operation_queue_finalize (GObject *obj)
 
        g_mutex_lock (priv->queue_lock);
 
+       MODEST_DEBUG_BLOCK (
+               g_debug ("%s; items in queue: %d",
+                        __FUNCTION__, g_queue_get_length (priv->op_queue));
+               g_queue_foreach (priv->op_queue, (GFunc)print_queue_item, "in queue");
+       );
+
+       
        if (priv->op_queue) {
                /* Cancel all */
-               if (!g_queue_is_empty (priv->op_queue))
-                       modest_mail_operation_queue_cancel_all (MODEST_MAIL_OPERATION_QUEUE (obj));
+               if (!g_queue_is_empty (priv->op_queue)) {
+                       g_queue_foreach (priv->op_queue,
+                                        (GFunc)on_finalize_foreach,
+                                        MODEST_MAIL_OPERATION_QUEUE (obj));
+               }
+
                g_queue_free (priv->op_queue);
        }
 
@@ -159,6 +227,16 @@ modest_mail_operation_queue_new (void)
        return MODEST_MAIL_OPERATION_QUEUE (self);
 }
 
+static void
+on_operation_finished (ModestMailOperation *mail_op,
+                      gpointer user_data)
+{
+       ModestMailOperationQueue *queue = MODEST_MAIL_OPERATION_QUEUE (user_data);
+
+       /* Remove operation from queue when finished */
+       modest_mail_operation_queue_remove (queue, mail_op);
+}
+
 void 
 modest_mail_operation_queue_add (ModestMailOperationQueue *self, 
                                 ModestMailOperation *mail_op)
@@ -167,23 +245,70 @@ modest_mail_operation_queue_add (ModestMailOperationQueue *self,
 
        g_return_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self));
        g_return_if_fail (MODEST_IS_MAIL_OPERATION (mail_op));
-       
+
        priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
 
+       priv->running_final_sync = (modest_mail_operation_get_type_operation (mail_op) == MODEST_MAIL_OPERATION_TYPE_SHUTDOWN);
+
        g_mutex_lock (priv->queue_lock);
        g_queue_push_tail (priv->op_queue, g_object_ref (mail_op));
        g_mutex_unlock (priv->queue_lock);
 
+       MODEST_DEBUG_BLOCK (print_queue_item (mail_op, "add"););
+
+       /* Get notified when the operation ends to remove it from the
+          queue. We connect it using the *after* because we want to
+          let the other handlers for the finish function happen
+          before this */
+       g_signal_connect_after (G_OBJECT (mail_op), 
+                               "operation-finished",
+                               G_CALLBACK (on_operation_finished), 
+                               self);
+
        /* Notify observers */
        g_signal_emit (self, signals[QUEUE_CHANGED_SIGNAL], 0,
                       mail_op, MODEST_MAIL_OPERATION_QUEUE_OPERATION_ADDED);
 }
 
-void 
-modest_mail_operation_queue_remove (ModestMailOperationQueue *self, 
+static gboolean
+notify_queue_empty (gpointer user_data)
+{
+       ModestMailOperationQueue *self = (ModestMailOperationQueue *) user_data;
+       ModestMailOperationQueuePrivate *priv;
+       guint num_elements;
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+
+       g_mutex_lock (priv->queue_lock);
+       num_elements = priv->op_queue->length;
+       g_mutex_unlock (priv->queue_lock);
+
+       /* We re-check again that the queue is empty. It could happen
+          that we had issued a tny_send_queue_flush before the send
+          queue could add a mail operation to the queue as a response
+          to the "start-queue" signal, because that signal is issued
+          by tinymail in the main loop. Therefor it could happen that
+          we emit the queue-empty signal while a send-queue is still
+          waiting for the "start-queue" signal from tinymail, so the
+          send queue will never try to send the items because modest
+          is finalized before */
+       if (num_elements == 0) {
+               gdk_threads_enter ();
+               g_signal_emit (self, signals[QUEUE_EMPTY_SIGNAL], 0);
+               gdk_threads_leave ();
+       }
+
+       return FALSE;
+}
+
+
+void
+modest_mail_operation_queue_remove (ModestMailOperationQueue *self,
                                    ModestMailOperation *mail_op)
 {
        ModestMailOperationQueuePrivate *priv;
+       ModestMailOperationStatus status;
+       guint num_elements;
 
        g_return_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self));
        g_return_if_fail (MODEST_IS_MAIL_OPERATION (mail_op));
@@ -192,49 +317,71 @@ modest_mail_operation_queue_remove (ModestMailOperationQueue *self,
 
        g_mutex_lock (priv->queue_lock);
        g_queue_remove (priv->op_queue, mail_op);
+       num_elements = priv->op_queue->length;
        g_mutex_unlock (priv->queue_lock);
 
-       /* HACK see the documentation of the function. Remove this
-          call when tinymail provides accurate progress values */
-       _modest_mail_operation_notify_end (mail_op);
+       MODEST_DEBUG_BLOCK (print_queue_item (mail_op, "remove"););
+
+       g_signal_handlers_disconnect_by_func (G_OBJECT (mail_op),
+                                             G_CALLBACK (on_operation_finished),
+                                             self);
 
        /* Notify observers */
        g_signal_emit (self, signals[QUEUE_CHANGED_SIGNAL], 0,
                       mail_op, MODEST_MAIL_OPERATION_QUEUE_OPERATION_REMOVED);
 
-       /* TODO: errors? */
-       {
-               const GError *err = modest_mail_operation_get_error (mail_op);
-               if (err)
-                       g_warning (err->message);
+       /* Check errors */
+       status = modest_mail_operation_get_status (mail_op);
+       if (status != MODEST_MAIL_OPERATION_STATUS_SUCCESS &&
+           status != MODEST_MAIL_OPERATION_STATUS_INVALID) {
+               /* This is a sanity check. Shouldn't be needed, but
+                  prevent possible application crashes. It's useful
+                  also for detecting mail operations with invalid
+                  status and error handling */
+               if (modest_mail_operation_get_error (mail_op) != NULL) {
+                       modest_mail_operation_execute_error_handler (mail_op);
+               } else {
+                       if (status == MODEST_MAIL_OPERATION_STATUS_CANCELED) 
+                               g_debug ("%s: operation canceled \n", __FUNCTION__);
+                       else
+                               g_warning ("%s: possible error in a mail operation " \
+                                          "implementation. The status is not successful " \
+                                          "but the mail operation does not have any " \
+                                          "error set\n", __FUNCTION__);
+               }
        }
 
        /* Free object */
        g_object_unref (G_OBJECT (mail_op));
-       modest_runtime_verify_object_death (mail_op, "");
-}
-
 
-/* Utility function intended to be used with g_queue_foreach */
-static void
-modest_mail_operation_queue_cancel_no_block_wrapper (ModestMailOperation *self,
-                                                    ModestMailOperationQueue *op_queue)
-{
-       modest_mail_operation_queue_cancel_no_block (op_queue, self);
+       /* Emit the queue empty-signal. See the function to know why
+          we emit it in an idle */
+       if (num_elements == 0) {
+               if (priv->queue_empty_handler) {
+                       g_source_remove (priv->queue_empty_handler);
+                       priv->queue_empty_handler = 0;
+               }
+               priv->queue_empty_handler = g_idle_add_full (G_PRIORITY_LOW, 
+                                                            notify_queue_empty, 
+                                                            self, NULL);
+       }
 }
 
-static void 
-modest_mail_operation_queue_cancel_no_block (ModestMailOperationQueue *self,
-                                            ModestMailOperation *mail_op)
+guint
+modest_mail_operation_queue_num_elements (ModestMailOperationQueue *self)
 {
-       if (modest_mail_operation_is_finished (mail_op))
-               return;
+       ModestMailOperationQueuePrivate *priv;
+       guint length = 0;
 
-       /* TODO: the implementation is still empty */
-       modest_mail_operation_cancel (mail_op);
+       g_return_val_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self), 0);
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+
+       g_mutex_lock (priv->queue_lock);
+       length = g_queue_get_length (priv->op_queue);
+       g_mutex_unlock (priv->queue_lock);
 
-       /* Remove from the queue */
-       modest_mail_operation_queue_remove (self, mail_op);
+       return length;
 }
 
 void 
@@ -248,23 +395,155 @@ modest_mail_operation_queue_cancel (ModestMailOperationQueue *self,
 
        priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
 
-       g_mutex_lock (priv->queue_lock);
-       modest_mail_operation_queue_cancel_no_block (self, mail_op);
-       g_mutex_unlock (priv->queue_lock);
+       MODEST_DEBUG_BLOCK (print_queue_item (mail_op, "cancel"););
+       
+       /* This triggers a progess_changed signal in which we remove
+        * the operation from the queue. */
+       modest_mail_operation_cancel (mail_op);
+}
+
+static void
+on_cancel_all_foreach (gpointer op, gpointer list)
+{
+       GSList **new_list;
+
+       new_list = (GSList**) list;
+       *new_list = g_slist_prepend (*new_list, MODEST_MAIL_OPERATION (op));
 }
 
 void 
 modest_mail_operation_queue_cancel_all (ModestMailOperationQueue *self)
 {
        ModestMailOperationQueuePrivate *priv;
+       GSList* operations_to_cancel = NULL;
+       GSList* cur = NULL;
 
        g_return_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self));
 
        priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
 
+       /* Remember which operations to cancel. This is the only thing that
+        * is done while holding the lock, so we do not need to call
+        * functions from other files while holding the lock, which could
+        * lead to a deadlock if such a call re-enters into this queue and
+        * tries to acquire another lock. */
+       g_mutex_lock (priv->queue_lock);
+       g_queue_foreach (priv->op_queue, (GFunc) on_cancel_all_foreach, &operations_to_cancel);
+       g_mutex_unlock (priv->queue_lock);
+       
+       operations_to_cancel = g_slist_reverse (operations_to_cancel);
+
+       for(cur = operations_to_cancel; cur != NULL; cur = cur->next) {
+               if (!MODEST_IS_MAIL_OPERATION(cur->data))
+                       g_printerr ("modest: cur->data is not a valid mail operation\n");
+               else
+                       modest_mail_operation_cancel (MODEST_MAIL_OPERATION (cur->data));
+       }
+
+       g_slist_free(operations_to_cancel);
+}
+
+typedef struct
+{
+       GSList **new_list;
+       GObject *source;
+} FindBySourceInfo;
+
+static void
+on_find_by_source_foreach (gpointer op, gpointer data)
+{
+       FindBySourceInfo *info = (FindBySourceInfo*) data;
+       GObject *source = NULL;
+
+       source = modest_mail_operation_get_source (MODEST_MAIL_OPERATION (op));
+       if (info->source == source) {
+               g_object_ref (G_OBJECT (op));
+               *(info->new_list) = g_slist_prepend (*(info->new_list), MODEST_MAIL_OPERATION (op));
+       }
+       if (source)
+               g_object_unref (source);
+}
+
+GSList*
+modest_mail_operation_queue_get_by_source (ModestMailOperationQueue *self,
+                                          GObject *source)
+{
+       ModestMailOperationQueuePrivate *priv;
+       GSList* found_operations= NULL;
+       FindBySourceInfo *info;
+
+       g_return_val_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self), NULL);
+       g_return_val_if_fail (source != NULL, NULL);
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+
+       info = g_new0 (FindBySourceInfo, 1);
+       info->new_list = &found_operations;
+       info->source = source;
+
        g_mutex_lock (priv->queue_lock);
-       g_queue_foreach (priv->op_queue, 
-                        (GFunc) modest_mail_operation_queue_cancel_no_block_wrapper, 
-                        self);
+       g_queue_foreach (priv->op_queue, (GFunc) on_find_by_source_foreach, info);
        g_mutex_unlock (priv->queue_lock);
+
+       g_free (info);
+
+       return found_operations;
+}
+
+static void
+accumulate_mail_op_strings (ModestMailOperation *op, gchar **str)
+{
+       gchar *mail_op_to_str = modest_mail_operation_to_string (op);
+       *str = g_strdup_printf ("%s\n%s", *str, mail_op_to_str);
+       g_free (mail_op_to_str);
+}
+
+
+gchar*
+modest_mail_operation_queue_to_string (ModestMailOperationQueue *self)
+{
+       gchar *str = NULL;
+       guint len;
+       ModestMailOperationQueuePrivate *priv;
+
+       g_return_val_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self), NULL);
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+
+       len = g_queue_get_length (priv->op_queue);
+       str = g_strdup_printf ("mail operation queue (%02d)\n-------------------------", len);
+       if (len == 0) {
+               gchar *copy;
+               copy = str;
+               str = g_strdup_printf ("%s\n%s", copy, "<empty>");
+               g_free (copy);
+       } else {
+               g_mutex_lock (priv->queue_lock);
+               g_queue_foreach (priv->op_queue, (GFunc)accumulate_mail_op_strings, &str);
+               g_mutex_unlock (priv->queue_lock);
+       }
+
+       return str;
+}
+
+gboolean
+modest_mail_operation_queue_running_shutdown (ModestMailOperationQueue *self)
+{
+       ModestMailOperationQueuePrivate *priv;
+
+       g_return_val_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self), FALSE);
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+       return priv->running_final_sync;
+}
+
+void
+modest_mail_operation_queue_set_running_shutdown (ModestMailOperationQueue *self)
+{
+       ModestMailOperationQueuePrivate *priv;
+
+       g_return_if_fail (MODEST_IS_MAIL_OPERATION_QUEUE (self));
+
+       priv = MODEST_MAIL_OPERATION_QUEUE_GET_PRIVATE(self);
+       priv->running_final_sync = TRUE;
 }