Fix more compile warnings for Windows in socket.c.
[claws.git] / src / action.c
index 163652a6c9fc7f4f1d3e94b8e661217a9620181a..a60a6b7e436bc6cf861e0f9b9e5c728da201d8a7 100644 (file)
@@ -1,6 +1,6 @@
 /*
- * Sylpheed -- a GTK+ based, lightweight, and fast e-mail client
- * Copyright (C) 1999-2012 Hiroyuki Yamamoto & The Claws Mail Team
+ * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
+ * Copyright (C) 1999-2016 Hiroyuki Yamamoto & The Claws Mail Team
  *
  * This program is free software; you can redistribute it and/or modify
  * it under the terms of the GNU General Public License as published by
@@ -14,7 +14,6 @@
  *
  * You should have received a copy of the GNU General Public License
  * along with this program. If not, see <http://www.gnu.org/licenses/>.
- * 
  */
 
 #ifdef HAVE_CONFIG_H
 #include "filtering.h"
 #include "procheader.h"
 
+#ifdef G_OS_WIN32
+#include <windows.h>
+#endif
+
 typedef struct _Children               Children;
 typedef struct _ChildInfo              ChildInfo;
 typedef struct _UserStringDialog       UserStringDialog;
@@ -90,12 +93,11 @@ struct _ChildInfo
 {
        Children        *children;
        gchar           *cmd;
-       pid_t            pid;
+       GPid             pid;
        gint             next_sig;
        gint             chld_in;
        gint             chld_out;
        gint             chld_err;
-       gint             chld_status;
        gint             tag_in;
        gint             tag_out;
        gint             tag_err;
@@ -186,9 +188,7 @@ static void catch_output            (gpointer                data,
 static void catch_input                        (gpointer                data, 
                                         gint                    source,
                                         GIOCondition            cond);
-static void catch_status               (gpointer                data,
-                                        gint                    source,
-                                        GIOCondition            cond);
+static void catch_status               (GPid pid, gint status, gpointer data);
 
 static gchar *get_user_string          (const gchar    *action,
                                         ActionType      type);
@@ -371,8 +371,6 @@ static gchar *parse_action_cmd(gchar *action, MsgInfo *msginfo,
 static gboolean parse_append_filename(GString *cmd, MsgInfo *msginfo)
 {
        gchar *filename;
-       gchar *p, *q;
-       gchar escape_ch[] = "\\ ";
 
        cm_return_val_if_fail(msginfo, FALSE);
 
@@ -384,16 +382,23 @@ static gboolean parse_append_filename(GString *cmd, MsgInfo *msginfo)
                return FALSE;
        }
 
-       p = filename;
-       while ((q = strpbrk(p, "$\"`'\\ \t*?[]&|;<>()!#~")) != NULL) {
+       g_string_append(cmd, "\"");
+#ifdef G_OS_UNIX
+       gchar *p = filename, *q;
+       gchar escape_ch[] = "\\ ";
+       while ((q = strpbrk(p, "$\"`\\~")) != NULL) {
                escape_ch[1] = *q;
                *q = '\0';
                g_string_append(cmd, p);
                g_string_append(cmd, escape_ch);
                p = q + 1;
        }
-       g_string_append(cmd, p);
 
+       g_string_append(cmd, p);
+#else
+       g_string_append(cmd, filename);
+#endif
+       g_string_append(cmd, "\"");
        g_free(filename);
 
        return TRUE;
@@ -423,11 +428,11 @@ static gboolean parse_append_msgpart(GString *cmd, MsgInfo *msginfo,
        ret = procmime_get_part(part_filename, partinfo);
 
        if (single_part)
-               procmime_mimeinfo_free_all(partinfo);
+               procmime_mimeinfo_free_all(&partinfo);
        g_free(filename);
 
        if (ret < 0) {
-               alertpanel_error(_("Can't get part of multipart message: %s"), strerror(-ret));
+               alertpanel_error(_("Can't get part of multipart message: %s"), g_strerror(-ret));
                g_free(part_filename);
                return FALSE;
        }
@@ -752,7 +757,7 @@ static gboolean execute_actions(gchar *action, GSList *msg_list,
                                gint body_pos, MimeInfo *partinfo,
                                void (*callback)(void *data), void *data)
 {
-       GSList *children_list = NULL;
+       GSList *children_list = NULL, *cur = NULL;
        gint is_ok  = TRUE;
        gint msg_list_len;
        Children *children;
@@ -843,9 +848,19 @@ static gboolean execute_actions(gchar *action, GSList *msg_list,
            ((action_type & ACTION_SINGLE) == 0 || msg_list_len == 1))
                children->open_in = 1;
 
-       if (action_type & ACTION_SINGLE) {
-               GSList *cur;
+       /* Pre-fetch bodies, makes it easier on IMAP (see bug #3011) */
+       for (cur = msg_list; cur; cur = cur->next) {
+               gchar *dummy;
+               msginfo = (MsgInfo *)cur->data;
 
+               dummy = procmsg_get_message_file((MsgInfo *)cur->data);
+               if (dummy)
+                       g_free(dummy);
+               else
+                       is_ok = FALSE;
+       }
+
+       if (is_ok && (action_type & ACTION_SINGLE)) {
                for (cur = msg_list; cur && is_ok == TRUE; cur = cur->next) {
                        msginfo = (MsgInfo *)cur->data;
                        if (!msginfo) {
@@ -870,7 +885,7 @@ static gboolean execute_actions(gchar *action, GSList *msg_list,
                        }
                        g_free(cmd);
                }
-       } else {
+       } else if (is_ok) {
                cmd = parse_action_cmd(action, NULL, msg_list, partinfo,
                                       user_str, user_hidden_str, sel_str);
                if (cmd) {
@@ -906,10 +921,7 @@ static gboolean execute_actions(gchar *action, GSList *msg_list,
                        child_info->callback = callback;
                        child_info->data = data;
                        child_info->tag_status = 
-                               claws_input_add(child_info->chld_status,
-                                             G_IO_IN | G_IO_HUP | G_IO_ERR,
-                                             catch_status, child_info,
-                                             FALSE);
+                               g_child_watch_add(child_info->pid, catch_status, child_info);
                }
 
                create_io_dialog(children);
@@ -920,160 +932,95 @@ static gboolean execute_actions(gchar *action, GSList *msg_list,
 static ChildInfo *fork_child(gchar *cmd, const gchar *msg_str,
                             Children *children)
 {
-#ifdef G_OS_UNIX
-       gint chld_in[2], chld_out[2], chld_err[2], chld_status[2];
-       gchar *cmdline[4], *ret_str;
-       pid_t pid, gch_pid;
+       gint chld_in, chld_out, chld_err;
+       gchar **argv, *ret_str, *trim_cmd;
+       GPid pid;
        ChildInfo *child_info;
-       gint sync;
+       gint follow_child;
        gssize by_written = 0, by_read = 0;
+       gboolean result = FALSE;
+       GError *error = NULL;
 
-       sync = !(children->action_type & ACTION_ASYNC);
-
-       chld_in[0] = chld_in[1] = chld_out[0] = chld_out[1] = chld_err[0]
-               = chld_err[1] = chld_status[0] = chld_status[1] = -1;
-
-       if (sync) {
-               if (pipe(chld_status) || pipe(chld_in) || pipe(chld_out) ||
-                   pipe(chld_err)) {
-                       alertpanel_error(_("Command could not be started. "
-                                          "Pipe creation failed.\n%s"),
-                                       g_strerror(errno));
-                       /* Closing fd = -1 fails silently */
-                       (void)close(chld_in[0]);
-                       (void)close(chld_in[1]);
-                       (void)close(chld_out[0]);
-                       (void)close(chld_out[1]);
-                       (void)close(chld_err[0]);
-                       (void)close(chld_err[1]);
-                       (void)close(chld_status[0]);
-                       (void)close(chld_status[1]);
-                       return NULL; /* Pipe error */
-               }
-       }
+       follow_child = !(children->action_type & ACTION_ASYNC);
 
-       debug_print("Forking child and grandchild.\n");
-       debug_print("Executing: /bin/sh -c %s\n", cmd);
+       chld_in = chld_out = chld_err = -1;
 
-       pid = fork();
-       if (pid == 0) { /* Child */
-               int r = 0;
-               if (setpgid(0, 0))
-                       perror("setpgid");
+       ret_str = g_locale_from_utf8(cmd, strlen(cmd),
+                                    &by_read, &by_written,
+                                    NULL);
+       if (!ret_str || !by_written)
+               ret_str = g_strdup(cmd);
 
-               gch_pid = fork();
+       trim_cmd = ret_str;
 
-               if (gch_pid == 0) {
-                       if (setpgid(0, getppid()))
-                               perror("setpgid");
+       while (g_ascii_isspace(trim_cmd[0]))
+               trim_cmd++;
 
-                       if (sync) {
-                               if (children->action_type &
-                                   (ACTION_PIPE_IN |
-                                    ACTION_USER_IN |
-                                    ACTION_USER_HIDDEN_IN)) {
-                                       r |= close(fileno(stdin));
-                               }
-                               r |= close(chld_in[0]);
-                               r |= close(chld_in[1]);
+#ifdef G_OS_UNIX
+       argv = g_new0(gchar *, 4);
+       argv[0] = g_strdup("/bin/sh");
+       argv[1] = g_strdup("-c");
+       argv[2] = g_strdup(trim_cmd);
+       argv[3] = 0;
+#else
+       argv = strsplit_with_quote(trim_cmd, " ", 0);
+#endif
+       g_free(ret_str);
 
-                               r |= close(fileno(stdout));
-                               r |= close(chld_out[0]);
-                               r |= close(chld_out[1]);
+       if (follow_child) {
+               result = g_spawn_async_with_pipes(NULL, argv, NULL,
+                         G_SPAWN_DO_NOT_REAP_CHILD | G_SPAWN_SEARCH_PATH,
+                         NULL, NULL, &pid, &chld_in, &chld_out,
+                         &chld_err, &error);
+       } else {
+               result = g_spawn_async(NULL, argv, NULL, 
+                         G_SPAWN_DO_NOT_REAP_CHILD | G_SPAWN_SEARCH_PATH, NULL, NULL,
+                         &pid, &error);
+       }
 
-                               r |= close(fileno(stderr));
-                               r |= close(chld_err[0]);
-                               r |= close(chld_err[1]);
+       debug_print("spawning %s: %d\n", cmd, result);
 
-                               if (r != 0)
-                                       debug_print("%s(%d)", strerror(errno), errno);
-                       }
+       g_strfreev(argv);
 
-                       cmdline[0] = "sh";
-                       cmdline[1] = "-c";
-                       ret_str = g_locale_from_utf8(cmd, strlen(cmd),
-                                                    &by_read, &by_written,
-                                                    NULL);
-                       if (ret_str && by_written)
-                               cmdline[2] = ret_str;
-                       else
-                               cmdline[2] = cmd;
-                       cmdline[3] = NULL;
-                       execvp("/bin/sh", cmdline);
-
-                       perror("execvp");
-                       g_free(ret_str);
-                       _exit(1);
-               } else if (gch_pid < (pid_t) 0) { /* Fork error */
-                       if (sync)
-                               r = write(chld_status[1], "1\n", 2);
-                       if (r != 0)
-                               debug_print("%s(%d)", strerror(errno), errno);
-                       perror("fork");
-                       _exit(1);
-               } else { /* Child */
-                       if (sync) {
-                               r |= close(chld_in[0]);
-                               r |= close(chld_in[1]);
-                               r |= close(chld_out[0]);
-                               r |= close(chld_out[1]);
-                               r |= close(chld_err[0]);
-                               r |= close(chld_err[1]);
-                               r |= close(chld_status[0]);
-
-                               debug_print("Child: waiting for grandchild\n");
-                               r |= waitpid(gch_pid, NULL, 0);
-                               debug_print("Child: grandchild ended\n");
-                               r |= write(chld_status[1], "0\n", 2);
-                               r |= close(chld_status[1]);
-
-                               if (r != 0)
-                                       debug_print("%s(%d)", strerror(errno), errno);
-                       }
-                       _exit(0);
-               }
-       } else if (pid < 0) { /* Fork error */
+       if (!result) {
                alertpanel_error(_("Could not fork to execute the following "
-                                  "command:\n%s\n%s"),
-                                cmd, g_strerror(errno));
-               return NULL; 
-       }
-
-       /* Parent */
-
-       if (!sync) {
-               waitpid(pid, NULL, 0);
+                               "command:\n%s\n%s"),
+                                cmd, error ? error->message : _("Unknown error"));
+               if (error)
+                       g_error_free(error);
                return NULL;
        }
 
-       (void)close(chld_in[0]);
        if (!(children->action_type &
              (ACTION_PIPE_IN | ACTION_USER_IN | ACTION_USER_HIDDEN_IN)))
-               (void)close(chld_in[1]);
-       (void)close(chld_out[1]);
-       (void)close(chld_err[1]);
-       (void)close(chld_status[1]);
+               (void)close(chld_in);
 
+       if (!follow_child) {
+               g_spawn_close_pid(pid);
+               return NULL;
+       }
        child_info = g_new0(ChildInfo, 1);
 
        child_info->children    = children;
 
        child_info->pid         = pid;
+#ifdef G_OS_UNIX
        child_info->next_sig    = SIGTERM;
+#endif
        child_info->cmd         = g_strdup(cmd);
        child_info->new_out     = FALSE;
        child_info->output      = g_string_new(NULL);
        child_info->chld_in     =
                (children->action_type &
                 (ACTION_PIPE_IN | ACTION_USER_IN | ACTION_USER_HIDDEN_IN))
-                       ? chld_in [1] : -1;
-       child_info->chld_out    = chld_out[0];
-       child_info->chld_err    = chld_err[0];
-       child_info->chld_status = chld_status[0];
+                       ? chld_in : -1;
+       child_info->chld_out    = chld_out;
+       child_info->chld_err    = chld_err;
+       child_info->tag_status  = -1;
        child_info->tag_in      = -1;
-       child_info->tag_out     = claws_input_add(chld_out[0], G_IO_IN | G_IO_HUP | G_IO_ERR,
+       child_info->tag_out     = claws_input_add(chld_out, G_IO_IN | G_IO_HUP | G_IO_ERR,
                                                catch_output, child_info, FALSE);
-       child_info->tag_err     = claws_input_add(chld_err[0], G_IO_IN | G_IO_HUP | G_IO_ERR,
+       child_info->tag_err     = claws_input_add(chld_err, G_IO_IN | G_IO_HUP | G_IO_ERR,
                                                catch_output, child_info, FALSE);
 
        if (!(children->action_type &
@@ -1085,27 +1032,23 @@ static ChildInfo *fork_child(gchar *cmd, const gchar *msg_str,
                ret_str = g_locale_from_utf8(msg_str, strlen(msg_str),
                                             &by_read, &by_written, NULL);
                if (ret_str && by_written) {
-                       r = write(chld_in[1], ret_str, strlen(ret_str));
+                       r = write(chld_in, ret_str, strlen(ret_str));
                        g_free(ret_str);
                } else
-                       r = write(chld_in[1], msg_str, strlen(msg_str));
+                       r = write(chld_in, msg_str, strlen(msg_str));
                if (!(children->action_type &
                      (ACTION_USER_IN | ACTION_USER_HIDDEN_IN)))
-                       r = close(chld_in[1]);
+                       r = close(chld_in);
                child_info->chld_in = -1; /* No more input */
                if (r != 0)
-                       debug_print("%s(%d)", strerror(errno), errno);
+                       debug_print("piping to child process: %s (%d)\n", g_strerror(errno), errno);
        }
 
        return child_info;
-#else
-       return NULL;
-#endif /* G_OS_UNIX */
 }
 
 static void kill_children_cb(GtkWidget *widget, gpointer data)
 {
-#ifdef G_OS_UNIX
        GSList *cur;
        Children *children = (Children *) data;
        ChildInfo *child_info;
@@ -1113,11 +1056,14 @@ static void kill_children_cb(GtkWidget *widget, gpointer data)
        for (cur = children->list; cur; cur = cur->next) {
                child_info = (ChildInfo *)(cur->data);
                debug_print("Killing child group id %d\n", child_info->pid);
-               if (child_info->pid && kill(-child_info->pid, child_info->next_sig) < 0)
+#ifdef G_OS_UNIX
+               if (child_info->pid && kill(child_info->pid, child_info->next_sig) < 0)
                        perror("kill");
                child_info->next_sig = SIGKILL;
+#else
+               TerminateProcess(child_info->pid, 0);
+#endif
        }
-#endif /* G_OS_UNIX */
 }
 
 static gint wait_for_children(Children *children)
@@ -1211,8 +1157,6 @@ static void childinfo_close_pipes(ChildInfo *child_info)
                (void)close(child_info->chld_out);
        if (child_info->chld_err >= 0)
                (void)close(child_info->chld_err);
-
-       (void)close(child_info->chld_status);
 }
 
 static void free_children(Children *children)
@@ -1391,11 +1335,6 @@ static void create_io_dialog(Children *children)
                gtk_box_pack_start(GTK_BOX(input_hbox), entry, TRUE, TRUE, 0);
                if (children->action_type & ACTION_USER_HIDDEN_IN) {
                        gtk_entry_set_visibility(GTK_ENTRY(entry), FALSE);
-#ifdef MAEMO
-                       hildon_gtk_entry_set_input_mode(GTK_ENTRY(entry), 
-                               HILDON_GTK_INPUT_MODE_FULL | 
-                               HILDON_GTK_INPUT_MODE_INVISIBLE);
-#endif
                }
                gtk_widget_show(entry);
 
@@ -1424,7 +1363,7 @@ static void create_io_dialog(Children *children)
                gtk_progress_bar_set_orientation(GTK_PROGRESS_BAR(progress_bar),
                                GTK_PROGRESS_LEFT_TO_RIGHT);
 #else
-               gtk_orientable_set_orientation(GTK_PROGRESS_BAR(progress_bar),
+               gtk_orientable_set_orientation(GTK_ORIENTABLE(progress_bar),
                                GTK_ORIENTATION_HORIZONTAL);
                gtk_progress_bar_set_inverted(GTK_PROGRESS_BAR(progress_bar),
                                FALSE);
@@ -1464,24 +1403,14 @@ static void create_io_dialog(Children *children)
        gtk_widget_show(dialog);
 }
 
-static void catch_status(gpointer data, gint source, GIOCondition cond)
+static void catch_status(GPid pid, gint status, gpointer data)
 {
        ChildInfo *child_info = (ChildInfo *)data;
-       gchar buf;
-       gint c;
 
-       g_source_remove(child_info->tag_status);
+       debug_print("Child returned %d\n", status);
 
-       c = read(source, &buf, 1);
-       if (c != 1) {
-               g_message("error reading child return status\n");
-       }
-       debug_print("Child returned %c\n", buf);
-
-#ifdef G_OS_UNIX
-       waitpid(-child_info->pid, NULL, 0);
-#endif
        childinfo_close_pipes(child_info);
+       g_spawn_close_pid(child_info->pid);
        child_info->pid = 0;
 
        if (child_info->children->action_type & (ACTION_SINGLE | ACTION_MULTIPLE)
@@ -1514,7 +1443,7 @@ static void catch_status(gpointer data, gint source, GIOCondition cond)
                                modified_something = TRUE;
                                last_item = nmi->folder;
                        }
-                       procmsg_msginfo_free (nmi);
+                       procmsg_msginfo_free (&nmi);
                        if (summaryview && summaryview->displayed &&
                            summaryview->folder_item == msginfo->folder &&
                            summary_get_msgnum(summaryview, summaryview->displayed) == msginfo->msgnum)
@@ -1577,8 +1506,9 @@ static void catch_input(gpointer data, gint source, GIOCondition cond)
        g_free(input);
 
        r = close(child_info->chld_in);
+       child_info->chld_in = -1;
        if (r != 0)
-               debug_print("%s(%d)", strerror(errno), errno);
+               debug_print("closing child input fd: %s (%d)\n", g_strerror(errno), errno);
        child_info->chld_in = -1;
        debug_print("Input to grand child sent.\n");
 }
@@ -1613,14 +1543,14 @@ static void catch_output(gpointer data, gint source, GIOCondition cond)
                                break;
 
                        ret_str = g_locale_to_utf8
-                               (buf, c, &bytes_read, &bytes_written, NULL);
+                               (buf, c - 1, &bytes_read, &bytes_written, NULL);
                        if (ret_str && bytes_written > 0) {
                                gtk_text_buffer_insert
                                        (textbuf, &iter, ret_str,
                                         -1);
                                g_free(ret_str);
                        } else
-                               gtk_text_buffer_insert(textbuf, &iter, buf, c);
+                               gtk_text_buffer_insert(textbuf, &iter, buf, c - 1);
                }
 
                if (child_info->children->is_selection) {