Do not abuse macro for debugging
[claws.git] / src / main.c
1 /*
2  * Claws Mail -- a GTK+ based, lightweight, and fast e-mail client
3  * Copyright (C) 1999-2016 Hiroyuki Yamamoto and the Claws Mail team
4  *
5  * This program is free software; you can redistribute it and/or modify
6  * it under the terms of the GNU General Public License as published by
7  * the Free Software Foundation; either version 3 of the License, or
8  * (at your option) any later version.
9  *
10  * This program is distributed in the hope that it will be useful,
11  * but WITHOUT ANY WARRANTY; without even the implied warranty of
12  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
13  * GNU General Public License for more details.
14  *
15  * You should have received a copy of the GNU General Public License
16  * along with this program. If not, see <http://www.gnu.org/licenses/>.
17  */
18
19 #ifdef HAVE_CONFIG_H
20 #  include "config.h"
21 #include "claws-features.h"
22 #endif
23
24 #include "defs.h"
25
26 #include <glib.h>
27 #include <glib/gi18n.h>
28 #include <gtk/gtk.h>
29
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <string.h>
33 #include <ctype.h>
34 #include <unistd.h>
35 #include <time.h>
36 #include <sys/stat.h>
37 #include <sys/types.h>
38 #ifdef G_OS_UNIX
39 #  include <signal.h>
40 #  include <errno.h>
41 #  include <fcntl.h>
42 #endif
43 #ifdef HAVE_LIBSM
44 #include <X11/SM/SMlib.h>
45 #endif
46
47 #if HAVE_FLOCK
48 #include <sys/file.h>
49 #endif
50
51 #include "file_checker.h"
52 #include "wizard.h"
53 #ifdef HAVE_STARTUP_NOTIFICATION
54 # define SN_API_NOT_YET_FROZEN
55 # include <libsn/sn-launchee.h>
56 # include <gdk/gdkx.h>
57 #endif
58
59 #ifdef HAVE_DBUS_GLIB
60 #include <dbus/dbus-glib.h>
61 #endif
62 #ifdef HAVE_NETWORKMANAGER_SUPPORT
63 #include <NetworkManager.h>
64 #endif
65 #ifdef HAVE_VALGRIND
66 #include <valgrind.h>
67 #endif
68
69 #include "claws.h"
70 #include "main.h"
71 #include "mainwindow.h"
72 #include "folderview.h"
73 #include "image_viewer.h"
74 #include "summaryview.h"
75 #include "prefs_common.h"
76 #include "prefs_account.h"
77 #include "prefs_actions.h"
78 #include "prefs_ext_prog.h"
79 #include "prefs_fonts.h"
80 #include "prefs_image_viewer.h"
81 #include "prefs_message.h"
82 #include "prefs_migration.h"
83 #include "prefs_receive.h"
84 #include "prefs_msg_colors.h"
85 #include "prefs_quote.h"
86 #include "prefs_spelling.h"
87 #include "prefs_summaries.h"
88 #include "prefs_themes.h"
89 #include "prefs_other.h"
90 #include "prefs_logging.h"
91 #include "prefs_send.h"
92 #include "prefs_wrapping.h"
93 #include "prefs_compose_writing.h"
94 #include "prefs_display_header.h"
95 #include "account.h"
96 #include "procmsg.h"
97 #include "inc.h"
98 #include "imap.h"
99 #include "send_message.h"
100 #include "md5.h"
101 #include "import.h"
102 #include "manage_window.h"
103 #include "alertpanel.h"
104 #include "statusbar.h"
105 #ifndef USE_ALT_ADDRBOOK
106         #include "addressbook.h"
107 #else
108         #include "addressbook-dbus.h"
109 #endif
110 #include "compose.h"
111 #include "folder.h"
112 #include "folder_item_prefs.h"
113 #include "setup.h"
114 #include "utils.h"
115 #include "gtkutils.h"
116 #include "socket.h"
117 #include "log.h"
118 #include "prefs_toolbar.h"
119 #include "plugin.h"
120 #include "mh_gtk.h"
121 #include "imap_gtk.h"
122 #include "news_gtk.h"
123 #include "matcher.h"
124 #include "tags.h"
125 #include "hooks.h"
126 #include "menu.h"
127 #include "quicksearch.h"
128 #include "advsearch.h"
129 #include "avatars.h"
130 #include "passwordstore.h"
131
132 #ifdef HAVE_LIBETPAN
133 #include "imap-thread.h"
134 #include "nntp-thread.h"
135 #endif
136 #include "stock_pixmap.h"
137 #ifdef USE_GNUTLS
138 #  include "ssl.h"
139 #endif
140
141 #include "version.h"
142
143 #include "crash.h"
144
145 #include "timing.h"
146
147 #ifdef HAVE_NETWORKMANAGER_SUPPORT
148 /* Went offline due to NetworkManager */
149 static gboolean went_offline_nm;
150 #endif
151
152 #if !defined(NM_CHECK_VERSION)
153 #define NM_CHECK_VERSION(x,y,z) 0
154 #endif
155
156 #ifdef HAVE_DBUS_GLIB
157 static DBusGProxy *awn_proxy = NULL;
158 #endif
159
160 gchar *prog_version;
161 gchar *argv0;
162
163 #ifdef HAVE_STARTUP_NOTIFICATION
164 static SnLauncheeContext *sn_context = NULL;
165 static SnDisplay *sn_display = NULL;
166 #endif
167
168 static gint lock_socket = -1;
169 static gint lock_socket_tag = 0;
170 static gchar *x_display = NULL;
171 typedef enum 
172 {
173         ONLINE_MODE_DONT_CHANGE,
174         ONLINE_MODE_ONLINE,
175         ONLINE_MODE_OFFLINE
176 } OnlineMode;
177
178 static struct RemoteCmd {
179         gboolean receive;
180         gboolean receive_all;
181         gboolean cancel_receiving;
182         gboolean cancel_sending;
183         gboolean compose;
184         const gchar *compose_mailto;
185         GList *attach_files;
186         gboolean search;
187         const gchar *search_folder;
188         const gchar *search_type;
189         const gchar *search_request;
190         gboolean search_recursive;
191         gboolean status;
192         gboolean status_full;
193         gboolean statistics;
194         gboolean reset_statistics;
195         GPtrArray *status_folders;
196         GPtrArray *status_full_folders;
197         gboolean send;
198         gboolean crash;
199         int online_mode;
200         gchar   *crash_params;
201         gboolean exit;
202         gboolean subscribe;
203         const gchar *subscribe_uri;
204         const gchar *target;
205         gboolean debug;
206         const gchar *geometry;
207 } cmd;
208
209 SessionStats session_stats;
210
211 static void reset_statistics(void);
212                 
213 static void parse_cmd_opt(int argc, char *argv[]);
214
215 static gint prohibit_duplicate_launch   (void);
216 static gchar * get_crashfile_name       (void);
217 static gint lock_socket_remove          (void);
218 static void lock_socket_input_cb        (gpointer          data,
219                                          gint              source,
220                                          GIOCondition      condition);
221
222 static void open_compose_new            (const gchar    *address,
223                                          GList          *attach_files);
224
225 static void send_queue                  (void);
226 static void initial_processing          (FolderItem *item, gpointer data);
227 static void quit_signal_handler         (int sig);
228 static void install_basic_sighandlers   (void);
229 #if (defined linux && defined SIGIO)
230 static void install_memory_sighandler   (void);
231 #endif
232 static void exit_claws                  (MainWindow *mainwin);
233
234 #ifdef HAVE_NETWORKMANAGER_SUPPORT
235 static void networkmanager_state_change_cb(DBusGProxy *proxy, gchar *dev,
236                                                                                                                                                                          gpointer data);
237 #endif
238
239 #define MAKE_DIR_IF_NOT_EXIST(dir) \
240 { \
241         if (!is_dir_exist(dir)) { \
242                 if (is_file_exist(dir)) { \
243                         alertpanel_warning \
244                                 (_("File '%s' already exists.\n" \
245                                    "Can't create folder."), \
246                                  dir); \
247                         return 1; \
248                 } \
249                 if (make_dir(dir) < 0) \
250                         return 1; \
251         } \
252 }
253
254 static MainWindow *static_mainwindow;
255
256 static gboolean emergency_exit = FALSE;
257
258 #ifdef HAVE_STARTUP_NOTIFICATION
259 static void sn_error_trap_push(SnDisplay *display, Display *xdisplay)
260 {
261         gdk_error_trap_push();
262 }
263
264 static void sn_error_trap_pop(SnDisplay *display, Display *xdisplay)
265 {
266         gdk_error_trap_pop();
267 }
268
269 static void startup_notification_complete(gboolean with_window)
270 {
271         Display *xdisplay;
272         GtkWidget *hack = NULL;
273
274         if (with_window) {
275                 /* this is needed to make the startup notification leave,
276                  * if we have been launched from a menu.
277                  * We have to display a window, so let it be very little */
278                 hack = gtk_window_new(GTK_WINDOW_POPUP);
279                 gtk_window_move(GTK_WINDOW(hack), 0, 0);
280                 gtk_widget_set_size_request(hack, 1, 1);
281                 gtk_widget_show(hack);
282         }
283
284         xdisplay = GDK_DISPLAY_XDISPLAY(gdk_display_get_default());
285         sn_display = sn_display_new(xdisplay,
286                                 sn_error_trap_push,
287                                 sn_error_trap_pop);
288         sn_context = sn_launchee_context_new_from_environment(sn_display,
289                                                  DefaultScreen(xdisplay));
290
291         if (sn_context != NULL) {
292                 sn_launchee_context_complete(sn_context);
293                 sn_launchee_context_unref(sn_context);
294                 sn_display_unref(sn_display);
295         }
296         if (with_window) {
297                 gtk_widget_destroy(hack);
298         }
299 }
300 #endif /* HAVE_STARTUP_NOTIFICATION */
301
302 static void claws_gtk_idle(void) 
303 {
304         while(gtk_events_pending()) {
305                 gtk_main_iteration();
306         }
307         g_usleep(50000);
308 }
309
310 static gboolean sc_starting = FALSE;
311
312 static gboolean defer_check_all(void *data)
313 {
314         gboolean autochk = GPOINTER_TO_INT(data);
315
316         inc_all_account_mail(static_mainwindow, autochk, 
317                         prefs_common.newmail_notify_manu);
318
319         if (sc_starting) {
320                 sc_starting = FALSE;
321                 main_window_set_menu_sensitive(static_mainwindow);
322                 toolbar_main_set_sensitive(static_mainwindow);
323         }
324         return FALSE;
325 }
326
327 static gboolean defer_check(void *data)
328 {
329         inc_mail(static_mainwindow, prefs_common.newmail_notify_manu);
330
331         if (sc_starting) {
332                 sc_starting = FALSE;
333                 main_window_set_menu_sensitive(static_mainwindow);
334                 toolbar_main_set_sensitive(static_mainwindow);
335         }
336         return FALSE;
337 }
338
339 static gboolean defer_jump(void *data)
340 {
341         if (cmd.receive_all) {
342                 defer_check_all(GINT_TO_POINTER(FALSE));
343         } else if (prefs_common.chk_on_startup) {
344                 defer_check_all(GINT_TO_POINTER(TRUE));
345         } else if (cmd.receive) {
346                 defer_check(NULL);
347         } 
348         mainwindow_jump_to(data, FALSE);
349         if (sc_starting) {
350                 sc_starting = FALSE;
351                 main_window_set_menu_sensitive(static_mainwindow);
352                 toolbar_main_set_sensitive(static_mainwindow);
353         }
354         return FALSE;
355 }
356
357 static void chk_update_val(GtkWidget *widget, gpointer data)
358 {
359         gboolean *val = (gboolean *)data;
360         *val = gtk_toggle_button_get_active(GTK_TOGGLE_BUTTON(widget));
361 }
362
363 static gboolean migrate_old_config(const gchar *old_cfg_dir, const gchar *new_cfg_dir, const gchar *oldversion)
364 {
365         gchar *message = g_strdup_printf(_("Configuration for %s found.\n"
366                          "Do you want to migrate this configuration?"), oldversion);
367         gchar *message2 = g_strdup_printf(_("\n\nYour Sylpheed filtering rules can be converted by a\n"
368                              "script available at %s."), TOOLS_URI);
369
370         if (!strcmp(oldversion, "Sylpheed"))
371                 message = g_strconcat(message, message2, NULL);
372         g_free(message2);
373
374         gint r = 0;
375         GtkWidget *window = NULL;
376         GtkWidget *keep_backup_chk;
377         gboolean backup = TRUE;
378
379         keep_backup_chk = gtk_check_button_new_with_label (_("Keep old configuration"));
380         gtk_toggle_button_set_active(GTK_TOGGLE_BUTTON(keep_backup_chk), TRUE);
381         CLAWS_SET_TIP(keep_backup_chk,
382                              _("Keeping a backup will allow you to go back to an "
383                                "older version, but may take a while if you have "
384                                "cached IMAP or News data, and will take some extra "
385                                "room on your disk."));
386
387         g_signal_connect(G_OBJECT(keep_backup_chk), "toggled", 
388                         G_CALLBACK(chk_update_val), &backup);
389
390         if (alertpanel_full(_("Migration of configuration"), message,
391                         GTK_STOCK_NO, "+" GTK_STOCK_YES, NULL, FALSE,
392                         keep_backup_chk, ALERT_QUESTION, G_ALERTDEFAULT) != G_ALERTALTERNATE) {
393                 return FALSE;
394         }
395         
396         /* we can either do a fast migration requiring not any extra disk
397          * space, or a slow one that copies the old configuration and leaves
398          * it in place. */
399         if (backup) {
400 backup_mode:
401                 window = label_window_create(_("Copying configuration... This may take a while..."));
402                 GTK_EVENTS_FLUSH();
403                 
404                 r = copy_dir(old_cfg_dir, new_cfg_dir);
405                 label_window_destroy(window);
406                 
407                 /* if copy failed, we'll remove the partially copied
408                  * new directory */
409                 if (r != 0) {
410                         alertpanel_error(_("Migration failed!"));
411                         remove_dir_recursive(new_cfg_dir);
412                 } else {
413                         if (!backup) {
414                                 /* fast mode failed, but we don't want backup */
415                                 remove_dir_recursive(old_cfg_dir);
416                         }
417                 }
418         } else {
419                 window = label_window_create(_("Migrating configuration..."));
420                 GTK_EVENTS_FLUSH();
421                 
422                 r = g_rename(old_cfg_dir, new_cfg_dir);
423                 label_window_destroy(window);
424                 
425                 /* if g_rename failed, we'll try to copy */
426                 if (r != 0) {
427                         FILE_OP_ERROR(new_cfg_dir, "g_rename");
428                         debug_print("rename failed, trying copy\n");
429                         goto backup_mode;
430                 }
431         }
432         return (r == 0);
433 }
434
435 static int migrate_common_rc(const gchar *old_rc, const gchar *new_rc)
436 {
437         FILE *oldfp, *newfp;
438         gchar *plugin_path, *old_plugin_path, *new_plugin_path;
439         gchar buf[BUFFSIZE];
440         gboolean err = FALSE;
441
442         oldfp = g_fopen(old_rc, "r");
443         if (!oldfp)
444                 return -1;
445         newfp = g_fopen(new_rc, "w");
446         if (!newfp) {
447                 fclose(oldfp);
448                 return -1;
449         }
450         
451         plugin_path = g_strdup(get_plugin_dir());
452         new_plugin_path = g_strdup(plugin_path);
453         
454         if (strstr(plugin_path, "/claws-mail/")) {
455                 gchar *end = g_strdup(strstr(plugin_path, "/claws-mail/")+strlen("/claws-mail/"));
456                 *(strstr(plugin_path, "/claws-mail/")) = '\0';
457                 old_plugin_path = g_strconcat(plugin_path, "/sylpheed-claws/", end, NULL);
458                 g_free(end);
459         } else {
460                 old_plugin_path = g_strdup(new_plugin_path);
461         }
462         debug_print("replacing %s with %s\n", old_plugin_path, new_plugin_path);
463         while (fgets(buf, sizeof(buf), oldfp)) {
464                 if (strncmp(buf, old_plugin_path, strlen(old_plugin_path))) {
465                         err |= (fputs(buf, newfp) == EOF);
466                 } else {
467                         debug_print("->replacing %s\n", buf);
468                         debug_print("  with %s%s\n", new_plugin_path, buf+strlen(old_plugin_path));
469                         err |= (fputs(new_plugin_path, newfp) == EOF);
470                         err |= (fputs(buf+strlen(old_plugin_path), newfp) == EOF);
471                 }
472         }
473         g_free(plugin_path);
474         g_free(new_plugin_path);
475         g_free(old_plugin_path);
476         fclose(oldfp);
477         if (fclose(newfp) == EOF)
478                 err = TRUE;
479         
480         return (err ? -1:0);
481 }
482
483 #ifdef HAVE_LIBSM
484 static void
485 sc_client_set_value (MainWindow *mainwin,
486                   gchar       *name,
487                   char        *type,
488                   int          num_vals,
489                   SmPropValue *vals)
490 {
491         SmProp *proplist[1];
492         SmProp prop;
493
494         prop.name = name;
495         prop.type = type;
496         prop.num_vals = num_vals;
497         prop.vals = vals;
498
499         proplist[0]= &prop;
500         if (mainwin->smc_conn)
501                 SmcSetProperties ((SmcConn) mainwin->smc_conn, 1, proplist);
502 }
503
504 static void sc_die_callback (SmcConn smc_conn, SmPointer client_data)
505 {
506         clean_quit(NULL);
507 }
508
509 static void sc_save_complete_callback(SmcConn smc_conn, SmPointer client_data)
510 {
511 }
512
513 static void sc_shutdown_cancelled_callback (SmcConn smc_conn, SmPointer client_data)
514 {
515         MainWindow *mainwin = (MainWindow *)client_data;
516         if (mainwin->smc_conn)
517                 SmcSaveYourselfDone ((SmcConn) mainwin->smc_conn, TRUE);
518 }
519
520 static void sc_save_yourself_callback (SmcConn   smc_conn,
521                                SmPointer client_data,
522                                int       save_style,
523                                gboolean  shutdown,
524                                int       interact_style,
525                                gboolean  fast) {
526
527         MainWindow *mainwin = (MainWindow *)client_data;
528         if (mainwin->smc_conn)
529                 SmcSaveYourselfDone ((SmcConn) mainwin->smc_conn, TRUE);
530 }
531
532 static IceIOErrorHandler sc_ice_installed_handler;
533
534 static void sc_ice_io_error_handler (IceConn connection)
535 {
536         if (sc_ice_installed_handler)
537                 (*sc_ice_installed_handler) (connection);
538 }
539 static gboolean sc_process_ice_messages (GIOChannel   *source,
540                                          GIOCondition  condition,
541                                          gpointer      data)
542 {
543         IceConn connection = (IceConn) data;
544         IceProcessMessagesStatus status;
545
546         status = IceProcessMessages (connection, NULL, NULL);
547
548         if (status == IceProcessMessagesIOError) {
549                 IcePointer context = IceGetConnectionContext (connection);
550
551                 if (context && G_IS_OBJECT(context)) {
552                 guint disconnect_id = g_signal_lookup ("disconnect", G_OBJECT_TYPE (context));
553
554                 if (disconnect_id > 0)
555                         g_signal_emit (context, disconnect_id, 0);
556                 } else {
557                         IceSetShutdownNegotiation (connection, False);
558                         IceCloseConnection (connection);
559                 }
560         }
561
562         return TRUE;
563 }
564
565 static void new_ice_connection (IceConn connection, IcePointer client_data, Bool opening,
566                     IcePointer *watch_data)
567 {
568         guint input_id;
569
570         if (opening) {
571                 GIOChannel *channel;
572                 /* Make sure we don't pass on these file descriptors to any
573                 exec'ed children */
574                 fcntl(IceConnectionNumber(connection),F_SETFD,
575                 fcntl(IceConnectionNumber(connection),F_GETFD,0) | FD_CLOEXEC);
576
577                 channel = g_io_channel_unix_new (IceConnectionNumber (connection));
578                 input_id = g_io_add_watch (channel,
579                 G_IO_IN | G_IO_HUP | G_IO_ERR | G_IO_PRI,
580                 sc_process_ice_messages,
581                 connection);
582                 g_io_channel_unref (channel);
583
584                 *watch_data = (IcePointer) GUINT_TO_POINTER (input_id);
585         } else {
586                 input_id = GPOINTER_TO_UINT ((gpointer) *watch_data);
587                 g_source_remove (input_id);
588         }
589 }
590
591 static void sc_session_manager_connect(MainWindow *mainwin)
592 {
593         static gboolean connected = FALSE;
594         SmcCallbacks      callbacks;
595         gchar            *client_id;
596         IceIOErrorHandler default_handler;
597
598         if (connected)
599                 return;
600         connected = TRUE;
601
602
603         sc_ice_installed_handler = IceSetIOErrorHandler (NULL);
604         default_handler = IceSetIOErrorHandler (sc_ice_io_error_handler);
605
606         if (sc_ice_installed_handler == default_handler)
607                 sc_ice_installed_handler = NULL;
608
609         IceAddConnectionWatch (new_ice_connection, NULL);
610       
611       
612         callbacks.save_yourself.callback      = sc_save_yourself_callback;
613         callbacks.die.callback                = sc_die_callback;
614         callbacks.save_complete.callback      = sc_save_complete_callback;
615         callbacks.shutdown_cancelled.callback = sc_shutdown_cancelled_callback;
616
617         callbacks.save_yourself.client_data =
618                 callbacks.die.client_data =
619                 callbacks.save_complete.client_data =
620                 callbacks.shutdown_cancelled.client_data = (SmPointer) mainwin;
621         if (g_getenv ("SESSION_MANAGER")) {
622                 gchar error_string_ret[256] = "";
623
624                 mainwin->smc_conn = (gpointer)
625                         SmcOpenConnection (NULL, mainwin,
626                                 SmProtoMajor, SmProtoMinor,
627                                 SmcSaveYourselfProcMask | SmcDieProcMask |
628                                 SmcSaveCompleteProcMask |
629                                 SmcShutdownCancelledProcMask,
630                                 &callbacks,
631                                 NULL, &client_id,
632                                 256, error_string_ret);
633
634                 if (error_string_ret[0] || mainwin->smc_conn == NULL)
635                         g_warning ("While connecting to session manager: %s.",
636                                 error_string_ret);
637                 else {
638                         SmPropValue *vals;
639                         vals = g_new (SmPropValue, 1);
640                         vals[0].length = strlen(argv0);
641                         vals[0].value = argv0;
642                         sc_client_set_value (mainwin, SmCloneCommand, SmLISTofARRAY8, 1, vals);
643                         sc_client_set_value (mainwin, SmRestartCommand, SmLISTofARRAY8, 1, vals);
644                         sc_client_set_value (mainwin, SmProgram, SmARRAY8, 1, vals);
645
646                         vals[0].length = strlen(g_get_user_name()?g_get_user_name():"");
647                         vals[0].value = g_strdup(g_get_user_name()?g_get_user_name():"");
648                         sc_client_set_value (mainwin, SmUserID, SmARRAY8, 1, vals);
649
650                         g_free(vals);
651                 }
652         }
653 }
654 #endif
655
656 static gboolean sc_exiting = FALSE;
657 static gboolean show_at_startup = TRUE;
658 static gboolean claws_crashed_bool = FALSE;
659
660 gboolean claws_crashed(void) {
661         return claws_crashed_bool;
662 }
663
664 void main_set_show_at_startup(gboolean show)
665 {
666         show_at_startup = show;
667 }
668
669 #ifdef G_OS_WIN32
670 static FILE* win32_debug_fp=NULL;
671 static guint win32_log_handler_app_id;
672 static guint win32_log_handler_glib_id;
673 static guint win32_log_handler_gtk_id;
674
675 static void win32_print_stdout(const gchar *string)
676 {
677         if (win32_debug_fp) {
678                 fprintf(win32_debug_fp, "%s", string);
679                 fflush(win32_debug_fp);
680         }
681 }
682
683 static void win32_print_stderr(const gchar *string)
684 {
685         if (win32_debug_fp) {
686                 fprintf(win32_debug_fp, "%s", string);
687                 fflush(win32_debug_fp);
688         }
689 }
690
691 static void win32_log(const gchar *log_domain, GLogLevelFlags log_level, const gchar* message, gpointer user_data)
692 {
693         if (win32_debug_fp) {
694                 const gchar* type;
695
696                 switch(log_level & G_LOG_LEVEL_MASK)
697                 {
698                         case G_LOG_LEVEL_ERROR:
699                                 type="error";
700                                 break;
701                         case G_LOG_LEVEL_CRITICAL:
702                                 type="critical";
703                                 break;
704                         case G_LOG_LEVEL_WARNING:
705                                 type="warning";
706                                 break;
707                         case G_LOG_LEVEL_MESSAGE:
708                                 type="message";
709                                 break;
710                         case G_LOG_LEVEL_INFO:
711                                 type="info";
712                                 break;
713                         case G_LOG_LEVEL_DEBUG:
714                                 type="debug";
715                                 break;
716                         default:
717                                 type="N/A";
718                 }
719                 if (log_domain)
720                         fprintf(win32_debug_fp, "%s: %s: %s", log_domain, type, message);
721                 else
722                         fprintf(win32_debug_fp, "%s: %s", type, message);
723                 fflush(win32_debug_fp);
724         }
725 }
726
727 static void win32_open_log(void)
728 {
729         gchar *logfile = g_strconcat(g_get_tmp_dir(), G_DIR_SEPARATOR_S, "claws-win32.log", NULL);
730         gchar *oldlogfile = g_strconcat(g_get_tmp_dir(), G_DIR_SEPARATOR_S, "claws-win32.log.bak", NULL);
731
732         if (is_file_exist(logfile)) {
733                 if (rename_force(logfile, oldlogfile) < 0)
734                         FILE_OP_ERROR(logfile, "rename");
735         }
736         win32_debug_fp = g_fopen(logfile, "w");
737         g_free(logfile);
738         g_free(oldlogfile);
739         if (win32_debug_fp)
740         {
741                 g_set_print_handler(win32_print_stdout);
742                 g_set_printerr_handler(win32_print_stdout);
743                 win32_log_handler_app_id = g_log_set_handler(NULL, G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL
744                      | G_LOG_FLAG_RECURSION, win32_log, NULL);
745                 win32_log_handler_glib_id = g_log_set_handler("GLib", G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL
746                      | G_LOG_FLAG_RECURSION, win32_log, NULL);
747                 win32_log_handler_gtk_id = g_log_set_handler("Gtk", G_LOG_LEVEL_MASK | G_LOG_FLAG_FATAL
748                      | G_LOG_FLAG_RECURSION, win32_log, NULL);
749         }
750 }
751
752 static void win32_close_log(void)
753 {
754         if (win32_debug_fp)
755         {
756                 g_log_remove_handler("", win32_log_handler_app_id);
757                 g_log_remove_handler("GLib", win32_log_handler_glib_id);
758                 g_log_remove_handler("Gtk", win32_log_handler_gtk_id);
759                 fclose(win32_debug_fp);
760                 win32_debug_fp=NULL;
761         }
762 }               
763 #endif
764
765 static void main_dump_features_list(gboolean show_debug_only)
766 /* display compiled-in features list */
767 {
768         if (show_debug_only && !debug_get_mode())
769                 return;
770
771         if (show_debug_only)
772                 debug_print("runtime GTK+ %d.%d.%d / GLib %d.%d.%d\n",
773                            gtk_major_version, gtk_minor_version, gtk_micro_version,
774                            glib_major_version, glib_minor_version, glib_micro_version);
775         else
776                 g_print("runtime GTK+ %d.%d.%d / GLib %d.%d.%d\n",
777                            gtk_major_version, gtk_minor_version, gtk_micro_version,
778                            glib_major_version, glib_minor_version, glib_micro_version);
779         if (show_debug_only)
780                 debug_print("buildtime GTK+ %d.%d.%d / GLib %d.%d.%d\n",
781                            GTK_MAJOR_VERSION, GTK_MINOR_VERSION, GTK_MICRO_VERSION,
782                            GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION);
783         else
784                 g_print("buildtime GTK+ %d.%d.%d / GLib %d.%d.%d\n",
785                            GTK_MAJOR_VERSION, GTK_MINOR_VERSION, GTK_MICRO_VERSION,
786                            GLIB_MAJOR_VERSION, GLIB_MINOR_VERSION, GLIB_MICRO_VERSION);
787         
788         if (show_debug_only)
789                 debug_print("Compiled-in features:\n");
790         else
791                 g_print("Compiled-in features:\n");
792 #if HAVE_LIBCOMPFACE
793         if (show_debug_only)
794                 debug_print(" compface\n");
795         else
796                 g_print(" compface\n");
797 #endif
798 #if USE_ENCHANT
799         if (show_debug_only)
800                 debug_print(" Enchant\n");
801         else
802                 g_print(" Enchant\n");
803 #endif
804 #if USE_GNUTLS
805         if (show_debug_only)
806                 debug_print(" GnuTLS\n");
807         else
808                 g_print(" GnuTLS\n");
809 #endif
810 #if INET6
811         if (show_debug_only)
812                 debug_print(" IPv6\n");
813         else
814                 g_print(" IPv6\n");
815 #endif
816 #if HAVE_ICONV
817         if (show_debug_only)
818                 debug_print(" iconv\n");
819         else
820                 g_print(" iconv\n");
821 #endif
822 #if USE_JPILOT
823         if (show_debug_only)
824                 debug_print(" JPilot\n");
825         else
826                 g_print(" JPilot\n");
827 #endif
828 #if USE_LDAP
829         if (show_debug_only)
830                 debug_print(" LDAP\n");
831         else
832                 g_print(" LDAP\n");
833 #endif
834 #if HAVE_LIBETPAN
835         if (show_debug_only)
836                 debug_print(" libetpan %d.%d\n", LIBETPAN_VERSION_MAJOR, LIBETPAN_VERSION_MINOR);
837         else
838                 g_print(" libetpan %d.%d\n", LIBETPAN_VERSION_MAJOR, LIBETPAN_VERSION_MINOR);
839 #endif
840 #if HAVE_LIBSM
841         if (show_debug_only)
842                 debug_print(" libSM\n");
843         else
844                 g_print(" libSM\n");
845 #endif
846 #if HAVE_NETWORKMANAGER_SUPPORT
847         if (show_debug_only)
848                 debug_print(" NetworkManager\n");
849         else
850                 g_print(" NetworkManager\n");
851 #endif
852 }
853
854 #ifdef HAVE_DBUS_GLIB
855 static guint dbus_item_hook_id = -1;
856 static guint dbus_folder_hook_id = -1;
857
858 static void uninstall_dbus_status_handler(void)
859 {
860         if(awn_proxy)
861                 g_object_unref(awn_proxy);
862         awn_proxy = NULL;
863         if (dbus_item_hook_id != -1)
864                 hooks_unregister_hook(FOLDER_ITEM_UPDATE_HOOKLIST, dbus_item_hook_id);
865         if (dbus_folder_hook_id != -1)
866                 hooks_unregister_hook(FOLDER_UPDATE_HOOKLIST, dbus_folder_hook_id);
867 }
868
869 static void dbus_update(FolderItem *removed_item)
870 {
871         guint new, unread, unreadmarked, marked, total;
872         guint replied, forwarded, locked, ignored, watched;
873         gchar *buf;
874         GError *error = NULL;
875
876         folder_count_total_msgs(&new, &unread, &unreadmarked, &marked, &total,
877                                 &replied, &forwarded, &locked, &ignored,
878                                 &watched);
879         if (removed_item) {
880                 total -= removed_item->total_msgs;
881                 new -= removed_item->new_msgs;
882                 unread -= removed_item->unread_msgs;
883         }
884
885         if (new > 0) {
886                 buf = g_strdup_printf("%d", new);
887                 dbus_g_proxy_call(awn_proxy, "SetInfoByName", &error,
888                         G_TYPE_STRING, "claws-mail",
889                         G_TYPE_STRING, buf,
890                         G_TYPE_INVALID, G_TYPE_INVALID);
891                 g_free(buf);
892                 
893         } else {
894                 dbus_g_proxy_call(awn_proxy, "UnsetInfoByName", &error, G_TYPE_STRING,
895                         "claws-mail", G_TYPE_INVALID, G_TYPE_INVALID);
896         }
897         if (error) {
898                 debug_print("%s\n", error->message);
899                 g_error_free(error);
900         }
901 }
902
903 static gboolean dbus_status_update_folder_hook(gpointer source, gpointer data)
904 {
905         FolderUpdateData *hookdata;
906         hookdata = source;
907         if (hookdata->update_flags & FOLDER_REMOVE_FOLDERITEM)
908                 dbus_update(hookdata->item);
909         else
910                 dbus_update(NULL);
911
912         return FALSE;
913 }
914
915 static gboolean dbus_status_update_item_hook(gpointer source, gpointer data)
916 {
917         dbus_update(NULL);
918
919         return FALSE;
920 }
921
922 static void install_dbus_status_handler(void)
923 {
924         GError *tmp_error = NULL;
925         DBusGConnection *connection = dbus_g_bus_get(DBUS_BUS_SESSION, &tmp_error);
926         
927         if(!connection) {
928                 /* If calling code doesn't do error checking, at least print some debug */
929                 debug_print("Failed to open connection to session bus: %s\n",
930                                  tmp_error->message);
931                 g_error_free(tmp_error);
932                 return;
933         }
934         awn_proxy = dbus_g_proxy_new_for_name(connection,
935                         "com.google.code.Awn",
936                         "/com/google/code/Awn",
937                         "com.google.code.Awn");
938         dbus_item_hook_id = hooks_register_hook (FOLDER_ITEM_UPDATE_HOOKLIST, dbus_status_update_item_hook, NULL);
939         if (dbus_item_hook_id == -1) {
940                 g_warning("Failed to register folder item update hook");
941                 uninstall_dbus_status_handler();
942                 return;
943         }
944
945         dbus_folder_hook_id = hooks_register_hook (FOLDER_UPDATE_HOOKLIST, dbus_status_update_folder_hook, NULL);
946         if (dbus_folder_hook_id == -1) {
947                 g_warning("Failed to register folder update hook");
948                 uninstall_dbus_status_handler();
949                 return;
950         }
951 }
952 #endif
953
954 static void reset_statistics(void)
955 {
956         /* (re-)initialize session statistics */
957         session_stats.received = 0;
958         session_stats.sent = 0;
959         session_stats.replied = 0;
960         session_stats.forwarded = 0;
961         session_stats.time_started = time(NULL);
962 }
963
964 int main(int argc, char *argv[])
965 {
966 #ifdef HAVE_DBUS_GLIB
967         DBusGConnection *connection;
968         GError *error;
969 #endif
970 #ifdef HAVE_NETWORKMANAGER_SUPPORT
971         DBusGProxy *nm_proxy;
972 #endif
973         gchar *userrc;
974         MainWindow *mainwin;
975         FolderView *folderview;
976         GdkPixbuf *icon;
977         gboolean crash_file_present = FALSE;
978         gint num_folder_class = 0;
979         gboolean asked_for_migration = FALSE;
980         gboolean start_done = TRUE;
981         GSList *plug_list = NULL;
982         gboolean never_ran = FALSE;
983         gboolean mainwin_shown = FALSE;
984
985         START_TIMING("startup");
986
987         sc_starting = TRUE;
988
989 #ifdef G_OS_WIN32
990         win32_open_log();
991 #endif
992         if (!claws_init(&argc, &argv)) {
993 #ifdef G_OS_WIN32
994                 win32_close_log();
995 #endif
996                 return 0;
997         }
998
999         prog_version = PROG_VERSION;
1000         argv0 = g_strdup(argv[0]);
1001
1002         parse_cmd_opt(argc, argv);
1003
1004         sock_init();
1005
1006         /* check and create unix domain socket for remote operation */
1007         lock_socket = prohibit_duplicate_launch();
1008         if (lock_socket < 0) {
1009 #ifdef HAVE_STARTUP_NOTIFICATION
1010                 if(gtk_init_check(&argc, &argv))
1011                         startup_notification_complete(TRUE);
1012 #endif
1013                 return 0;
1014         }
1015
1016         main_dump_features_list(TRUE);
1017         prefs_prepare_cache();
1018
1019 #ifdef CRASH_DIALOG
1020         if (cmd.crash) {
1021 #if !GTK_CHECK_VERSION(3, 0, 0)
1022                 gtk_set_locale();
1023 #endif
1024                 gtk_init(&argc, &argv);
1025                 crash_main(cmd.crash_params);
1026 #ifdef G_OS_WIN32
1027                 win32_close_log();
1028 #endif
1029                 return 0;
1030         }
1031         crash_install_handlers();
1032 #endif
1033         install_basic_sighandlers();
1034 #if (defined linux && defined SIGIO)
1035         install_memory_sighandler();
1036 #endif
1037
1038         if (cmd.status || cmd.status_full || cmd.search ||
1039                 cmd.statistics || cmd.reset_statistics || 
1040                 cmd.cancel_receiving || cmd.cancel_sending ||
1041                 cmd.debug) {
1042                 puts("0 Claws Mail not running.");
1043                 lock_socket_remove();
1044                 return 0;
1045         }
1046         
1047         if (cmd.exit)
1048                 return 0;
1049 #if !GLIB_CHECK_VERSION(2,32,0)
1050         if (!g_thread_supported())
1051                 g_thread_init(NULL);
1052 #endif
1053
1054         reset_statistics();
1055         
1056 #if !GTK_CHECK_VERSION(3, 0, 0)
1057         gtk_set_locale();
1058 #endif
1059         gtk_init(&argc, &argv);
1060
1061 #ifdef G_OS_WIN32
1062         gtk_settings_set_string_property(gtk_settings_get_default(),
1063                         "gtk-theme-name",
1064                         "MS-Windows",
1065                         "XProperty");
1066         gtk_settings_set_long_property(gtk_settings_get_default(),
1067                         "gtk-auto-mnemonics",
1068                         TRUE,
1069                         "XProperty");
1070 #endif
1071
1072 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1073         went_offline_nm = FALSE;
1074         nm_proxy = NULL;
1075 #endif
1076 #ifdef HAVE_DBUS_GLIB
1077         error = NULL;
1078         connection = dbus_g_bus_get(DBUS_BUS_SYSTEM, &error);
1079
1080         if(!connection) {
1081                 debug_print("Failed to open connection to system bus: %s\n", error->message);
1082                 g_error_free(error);
1083         }
1084         else {
1085 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1086                 nm_proxy = dbus_g_proxy_new_for_name(connection,
1087                         "org.freedesktop.NetworkManager",
1088                         "/org/freedesktop/NetworkManager",
1089                         "org.freedesktop.NetworkManager");
1090                 if (nm_proxy) {
1091 #if NM_CHECK_VERSION(0,8,992)
1092                         dbus_g_proxy_add_signal(nm_proxy, "StateChanged", G_TYPE_UINT, G_TYPE_INVALID);
1093                         dbus_g_proxy_connect_signal(nm_proxy, "StateChanged",
1094                                 G_CALLBACK(networkmanager_state_change_cb),
1095                                 NULL,NULL);
1096 #else
1097                         dbus_g_proxy_add_signal(nm_proxy, "StateChange", G_TYPE_UINT, G_TYPE_INVALID);
1098                         dbus_g_proxy_connect_signal(nm_proxy, "StateChange",
1099                                 G_CALLBACK(networkmanager_state_change_cb),
1100                                 NULL,NULL);
1101 #endif
1102                 }
1103 #endif
1104                 install_dbus_status_handler();
1105         }
1106 #endif
1107
1108 #if !GTK_CHECK_VERSION(3, 0, 0)
1109         gtk_widget_set_default_colormap(
1110                 gdk_screen_get_system_colormap(
1111                         gdk_screen_get_default()));
1112 #endif
1113
1114         gtkut_create_ui_manager();
1115
1116         /* Create container for all the menus we will be adding */
1117         MENUITEM_ADDUI("/", "Menus", NULL, GTK_UI_MANAGER_MENUBAR);
1118
1119         if (!g_thread_supported()) {
1120                 g_error(_("g_thread is not supported by glib.\n"));
1121         }
1122
1123 #ifdef G_OS_WIN32
1124         CHDIR_EXEC_CODE_RETURN_VAL_IF_FAIL(get_home_dir(), 1, win32_close_log(););
1125 #else
1126         CHDIR_RETURN_VAL_IF_FAIL(get_home_dir(), 1);
1127 #endif
1128         
1129         /* no config dir exists. See if we can migrate an old config. */
1130         if (!is_dir_exist(RC_DIR)) {
1131                 prefs_destroy_cache();
1132                 gboolean r = FALSE;
1133                 
1134                 /* if one of the old dirs exist, we'll ask if the user 
1135                  * want to migrates, and r will be TRUE if he said yes
1136                  * and migration succeeded, and FALSE otherwise.
1137                  */
1138                 if (is_dir_exist(OLD_GTK2_RC_DIR)) {
1139                         r = migrate_old_config(OLD_GTK2_RC_DIR, RC_DIR,
1140                                                g_strconcat("Sylpheed-Claws 2.6.0 ", _("(or older)"), NULL));
1141                         asked_for_migration = TRUE;
1142                 } else if (is_dir_exist(OLDER_GTK2_RC_DIR)) {
1143                         r = migrate_old_config(OLDER_GTK2_RC_DIR, RC_DIR,
1144                                                g_strconcat("Sylpheed-Claws 1.9.15 ",_("(or older)"), NULL));
1145                         asked_for_migration = TRUE;
1146                 } else if (is_dir_exist(OLD_GTK1_RC_DIR)) {
1147                         r = migrate_old_config(OLD_GTK1_RC_DIR, RC_DIR,
1148                                                g_strconcat("Sylpheed-Claws 1.0.5 ",_("(or older)"), NULL));
1149                         asked_for_migration = TRUE;
1150                 } else if (is_dir_exist(SYLPHEED_RC_DIR)) {
1151                         r = migrate_old_config(SYLPHEED_RC_DIR, RC_DIR, "Sylpheed");
1152                         asked_for_migration = TRUE;
1153                 }
1154                 
1155                 /* If migration failed or the user didn't want to do it,
1156                  * we create a new one (and we'll hit wizard later). 
1157                  */
1158                 if (r == FALSE && !is_dir_exist(RC_DIR)) {
1159 #ifdef G_OS_UNIX
1160                         if (copy_dir(SYSCONFDIR "/skel/.claws-mail", RC_DIR) < 0) {
1161 #endif
1162                                 if (!is_dir_exist(RC_DIR) && make_dir(RC_DIR) < 0) {
1163 #ifdef G_OS_WIN32
1164                                         win32_close_log();
1165 #endif
1166                                         exit(1);
1167                                 }
1168 #ifdef G_OS_UNIX
1169                         }
1170 #endif
1171                 }
1172         }
1173         
1174
1175         if (!is_file_exist(RC_DIR G_DIR_SEPARATOR_S COMMON_RC) &&
1176             is_file_exist(RC_DIR G_DIR_SEPARATOR_S OLD_COMMON_RC)) {
1177                 /* post 2.6 name change */
1178                 migrate_common_rc(RC_DIR G_DIR_SEPARATOR_S OLD_COMMON_RC,
1179                           RC_DIR G_DIR_SEPARATOR_S COMMON_RC);
1180         }
1181
1182         if (!cmd.exit)
1183                 plugin_load_all("Common");
1184
1185         userrc = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, "gtkrc-2.0", NULL);
1186         gtk_rc_parse(userrc);
1187         g_free(userrc);
1188
1189         userrc = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, MENU_RC, NULL);
1190         gtk_accel_map_load (userrc);
1191         g_free(userrc);
1192
1193 #ifdef G_OS_WIN32
1194         CHDIR_EXEC_CODE_RETURN_VAL_IF_FAIL(get_rc_dir(), 1, win32_close_log(););
1195 #else
1196         CHDIR_RETURN_VAL_IF_FAIL(get_rc_dir(), 1);
1197 #endif
1198
1199         MAKE_DIR_IF_NOT_EXIST(get_mail_base_dir());
1200         MAKE_DIR_IF_NOT_EXIST(get_imap_cache_dir());
1201         MAKE_DIR_IF_NOT_EXIST(get_news_cache_dir());
1202         MAKE_DIR_IF_NOT_EXIST(get_mime_tmp_dir());
1203         MAKE_DIR_IF_NOT_EXIST(get_tmp_dir());
1204         MAKE_DIR_IF_NOT_EXIST(UIDL_DIR);
1205
1206         crash_file_present = is_file_exist(get_crashfile_name());
1207         /* remove temporary files */
1208         remove_all_files(get_tmp_dir());
1209         remove_all_files(get_mime_tmp_dir());
1210
1211         if (!cmd.crash && crash_file_present)
1212                 claws_crashed_bool = TRUE;
1213
1214         if (is_file_exist("claws.log")) {
1215                 if (rename_force("claws.log", "claws.log.bak") < 0)
1216                         FILE_OP_ERROR("claws.log", "rename");
1217         }
1218         set_log_file(LOG_PROTOCOL, "claws.log");
1219
1220         if (is_file_exist("filtering.log")) {
1221                 if (rename_force("filtering.log", "filtering.log.bak") < 0)
1222                         FILE_OP_ERROR("filtering.log", "rename");
1223         }
1224         set_log_file(LOG_DEBUG_FILTERING, "filtering.log");
1225
1226 #ifdef G_OS_WIN32
1227         CHDIR_EXEC_CODE_RETURN_VAL_IF_FAIL(get_home_dir(), 1, win32_close_log(););
1228 #else
1229         CHDIR_RETURN_VAL_IF_FAIL(get_home_dir(), 1);
1230 #endif
1231
1232         folder_system_init();
1233         prefs_common_read_config();
1234
1235         prefs_themes_init();
1236         prefs_fonts_init();
1237         prefs_ext_prog_init();
1238         prefs_wrapping_init();
1239         prefs_compose_writing_init();
1240         prefs_msg_colors_init();
1241         image_viewer_init();
1242         prefs_image_viewer_init();
1243         prefs_quote_init();
1244         prefs_summaries_init();
1245         prefs_message_init();
1246         prefs_other_init();
1247         prefs_logging_init();
1248         prefs_receive_init();
1249         prefs_send_init();
1250         tags_read_tags();
1251         matcher_init();
1252 #ifdef USE_ENCHANT
1253         gtkaspell_checkers_init();
1254         prefs_spelling_init();
1255 #endif
1256
1257 #ifdef G_OS_WIN32
1258         if(prefs_common.gtk_theme && strcmp(prefs_common.gtk_theme, DEFAULT_W32_GTK_THEME))
1259                 gtk_settings_set_string_property(gtk_settings_get_default(),
1260                         "gtk-theme-name",
1261                         prefs_common.gtk_theme,
1262                         "XProperty");
1263 #endif
1264
1265
1266         sock_set_io_timeout(prefs_common.io_timeout_secs);
1267         prefs_actions_read_config();
1268         prefs_display_header_read_config();
1269         /* prefs_filtering_read_config(); */
1270 #ifndef USE_ALT_ADDRBOOK
1271         addressbook_read_file();
1272 #else
1273         g_clear_error(&error);
1274         if (! addressbook_start_service(&error)) {
1275                 g_warning("%s", error->message);
1276                 g_clear_error(&error);
1277         }
1278         else {
1279                 addressbook_install_hooks(&error);
1280         }
1281 #endif
1282         gtkut_widget_init();
1283         stock_pixbuf_gdk(STOCK_PIXMAP_CLAWS_MAIL_ICON, &icon);
1284         gtk_window_set_default_icon(icon);
1285
1286         folderview_initialize();
1287
1288         mh_gtk_init();
1289         imap_gtk_init();
1290         news_gtk_init();
1291
1292         mainwin = main_window_create();
1293
1294         if (!check_file_integrity())
1295                 exit(1);
1296
1297 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1298         networkmanager_state_change_cb(nm_proxy,NULL,mainwin);
1299 #endif
1300
1301         manage_window_focus_in(mainwin->window, NULL, NULL);
1302         folderview = mainwin->folderview;
1303
1304         folderview_freeze(mainwin->folderview);
1305         folder_item_update_freeze();
1306
1307         passwd_store_read_config();
1308         prefs_account_init();
1309         account_read_config_all();
1310
1311 #ifdef HAVE_LIBETPAN
1312         imap_main_init(prefs_common.skip_ssl_cert_check);
1313         imap_main_set_timeout(prefs_common.io_timeout_secs);
1314         nntp_main_init(prefs_common.skip_ssl_cert_check);
1315 #endif  
1316         /* If we can't read a folder list or don't have accounts,
1317          * it means the configuration's not done. Either this is
1318          * a brand new install, either a failed/refused migration.
1319          * So we'll start the wizard.
1320          */
1321         if (folder_read_list() < 0) {
1322                 prefs_destroy_cache();
1323                 
1324                 /* if run_wizard returns FALSE it's because it's
1325                  * been cancelled. We can't do much but exit.
1326                  * however, if the user was asked for a migration,
1327                  * we remove the newly created directory so that
1328                  * he's asked again for migration on next launch.*/
1329                 if (!run_wizard(mainwin, TRUE)) {
1330                         if (asked_for_migration)
1331                                 remove_dir_recursive(RC_DIR);
1332 #ifdef G_OS_WIN32
1333                         win32_close_log();
1334 #endif
1335                         exit(1);
1336                 }
1337                 main_window_reflect_prefs_all_now();
1338                 folder_write_list();
1339                 never_ran = TRUE;
1340         }
1341
1342         if (!account_get_list()) {
1343                 prefs_destroy_cache();
1344                 if (!run_wizard(mainwin, FALSE)) {
1345                         if (asked_for_migration)
1346                                 remove_dir_recursive(RC_DIR);
1347 #ifdef G_OS_WIN32
1348                         win32_close_log();
1349 #endif
1350                         exit(1);
1351                 }
1352                 if(!account_get_list()) {
1353                         exit_claws(mainwin);
1354 #ifdef G_OS_WIN32
1355                         win32_close_log();
1356 #endif
1357                         exit(1);
1358                 }
1359                 never_ran = TRUE;
1360         }
1361
1362         
1363         toolbar_main_set_sensitive(mainwin);
1364         main_window_set_menu_sensitive(mainwin);
1365
1366         /* if crashed, show window early so that the user
1367          * sees what's happening */
1368         if (claws_crashed()) {
1369                 main_window_popup(mainwin);
1370                 mainwin_shown = TRUE;
1371         }
1372
1373         account_set_missing_folder();
1374         folder_set_missing_folders();
1375         folderview_set(folderview);
1376
1377         prefs_matcher_read_config();
1378         quicksearch_set_search_strings(mainwin->summaryview->quicksearch);
1379
1380         /* make one all-folder processing before using claws */
1381         main_window_cursor_wait(mainwin);
1382         folder_func_to_all_folders(initial_processing, (gpointer *)mainwin);
1383
1384         /* if claws crashed, rebuild caches */
1385         if (claws_crashed()) {
1386                 GTK_EVENTS_FLUSH();
1387                 debug_print("Claws Mail crashed, checking for new messages in local folders\n");
1388                 folder_item_update_thaw();
1389                 folderview_check_new(NULL);
1390                 folder_clean_cache_memory_force();
1391                 folder_item_update_freeze();
1392         }
1393         /* make the crash-indicator file */
1394         str_write_to_file("foo", get_crashfile_name());
1395
1396         inc_autocheck_timer_init(mainwin);
1397
1398         /* ignore SIGPIPE signal for preventing sudden death of program */
1399 #ifdef G_OS_UNIX
1400         signal(SIGPIPE, SIG_IGN);
1401 #endif
1402         if (cmd.online_mode == ONLINE_MODE_OFFLINE) {
1403                 main_window_toggle_work_offline(mainwin, TRUE, FALSE);
1404         }
1405         if (cmd.online_mode == ONLINE_MODE_ONLINE) {
1406                 main_window_toggle_work_offline(mainwin, FALSE, FALSE);
1407         }
1408
1409         if (cmd.status_folders) {
1410                 g_ptr_array_free(cmd.status_folders, TRUE);
1411                 cmd.status_folders = NULL;
1412         }
1413         if (cmd.status_full_folders) {
1414                 g_ptr_array_free(cmd.status_full_folders, TRUE);
1415                 cmd.status_full_folders = NULL;
1416         }
1417
1418         claws_register_idle_function(claws_gtk_idle);
1419
1420         avatars_init();
1421         prefs_toolbar_init();
1422
1423         num_folder_class = g_list_length(folder_get_list());
1424
1425         plugin_load_all("GTK2");
1426
1427         if (g_list_length(folder_get_list()) != num_folder_class) {
1428                 debug_print("new folders loaded, reloading processing rules\n");
1429                 prefs_matcher_read_config();
1430         }
1431         
1432         if ((plug_list = plugin_get_unloaded_list()) != NULL) {
1433                 GSList *cur;
1434                 gchar *list = NULL;
1435                 gint num_plugins = 0;
1436                 for (cur = plug_list; cur; cur = cur->next) {
1437                         Plugin *plugin = (Plugin *)cur->data;
1438                         gchar *tmp = g_strdup_printf("%s\n%s",
1439                                 list? list:"",
1440                                 plugin_get_name(plugin));
1441                         g_free(list);
1442                         list = tmp;
1443                         num_plugins++;
1444                 }
1445                 main_window_cursor_normal(mainwin);
1446                 main_window_popup(mainwin);
1447                 mainwin_shown = TRUE;
1448                 alertpanel_warning(ngettext(
1449                                      "The following plugin failed to load. "
1450                                      "Check the Plugins configuration "
1451                                      "for more information:\n%s",
1452                                      "The following plugins failed to load. "
1453                                      "Check the Plugins configuration "
1454                                      "for more information:\n%s", 
1455                                      num_plugins), 
1456                                      list);
1457                 main_window_cursor_wait(mainwin);
1458                 g_free(list);
1459                 g_slist_free(plug_list);
1460         }
1461
1462         if (never_ran) {
1463                 prefs_common_get_prefs()->config_version = CLAWS_CONFIG_VERSION;
1464                 prefs_common_write_config();
1465                 plugin_load_standard_plugins ();
1466         } else {
1467                 if (prefs_update_config_version() < 0) {
1468                         exit_claws(mainwin);
1469 #ifdef G_OS_WIN32
1470                         win32_close_log();
1471 #endif
1472                         exit(0);
1473                 }
1474         }
1475
1476         /* if not crashed, show window now */
1477         if (!mainwin_shown) {
1478                 /* apart if something told not to show */
1479                 if (show_at_startup)
1480                         main_window_popup(mainwin);
1481         }
1482
1483         if (cmd.geometry != NULL) {
1484                 if (!gtk_window_parse_geometry(GTK_WINDOW(mainwin->window), cmd.geometry))
1485                         g_warning("failed to parse geometry '%s'", cmd.geometry);
1486                 else {
1487                         int width, height;
1488
1489                         if (sscanf(cmd.geometry, "%ux%u+", &width, &height) == 2)
1490                                 gtk_window_resize(GTK_WINDOW(mainwin->window), width, height);
1491                         else
1492                                 g_warning("failed to parse geometry's width/height");
1493                 }
1494         }
1495
1496         if (!folder_have_mailbox()) {
1497                 prefs_destroy_cache();
1498                 main_window_cursor_normal(mainwin);
1499                 if (folder_get_list() != NULL) {
1500                         alertpanel_error(_("Claws Mail has detected a configured "
1501                                    "mailbox, but it is incomplete. It is "
1502                                    "possibly due to a failing IMAP account. Use "
1503                                    "\"Rebuild folder tree\" on the mailbox parent "
1504                                    "folder's context menu to try to fix it."));
1505                 } else {
1506                         alertpanel_error(_("Claws Mail has detected a configured "
1507                                    "mailbox, but could not load it. It is "
1508                                    "probably provided by an out-of-date "
1509                                    "external plugin. Please reinstall the "
1510                                    "plugin and try again."));
1511                         exit_claws(mainwin);
1512 #ifdef G_OS_WIN32
1513                         win32_close_log();
1514 #endif
1515                         exit(1);
1516                 }
1517         }
1518         
1519         static_mainwindow = mainwin;
1520
1521 #ifdef HAVE_STARTUP_NOTIFICATION
1522         startup_notification_complete(FALSE);
1523 #endif
1524 #ifdef HAVE_LIBSM
1525         sc_session_manager_connect(mainwin);
1526 #endif
1527
1528         folder_item_update_thaw();
1529         folderview_thaw(mainwin->folderview);
1530         main_window_cursor_normal(mainwin);
1531
1532         if (!cmd.target && prefs_common.goto_last_folder_on_startup &&
1533             folder_find_item_from_identifier(prefs_common.last_opened_folder) != NULL &&
1534             !claws_crashed()) {
1535                 cmd.target = prefs_common.last_opened_folder;
1536         }
1537
1538         if (cmd.receive_all && !cmd.target) {
1539                 start_done = FALSE;
1540                 g_timeout_add(1000, defer_check_all, GINT_TO_POINTER(FALSE));
1541         } else if (prefs_common.chk_on_startup && !cmd.target) {
1542                 start_done = FALSE;
1543                 g_timeout_add(1000, defer_check_all, GINT_TO_POINTER(TRUE));
1544         } else if (cmd.receive && !cmd.target) {
1545                 start_done = FALSE;
1546                 g_timeout_add(1000, defer_check, NULL);
1547         }
1548         folderview_grab_focus(folderview);
1549
1550         if (cmd.compose) {
1551                 open_compose_new(cmd.compose_mailto, cmd.attach_files);
1552         }
1553         if (cmd.attach_files) {
1554                 list_free_strings(cmd.attach_files);
1555                 g_list_free(cmd.attach_files);
1556                 cmd.attach_files = NULL;
1557         }
1558         if (cmd.subscribe) {
1559                 folder_subscribe(cmd.subscribe_uri);
1560         }
1561
1562         if (cmd.send) {
1563                 send_queue();
1564         }
1565         
1566         if (cmd.target) {
1567                 start_done = FALSE;
1568                 g_timeout_add(500, defer_jump, (gpointer)cmd.target);
1569         }
1570
1571         prefs_destroy_cache();
1572         
1573         compose_reopen_exit_drafts();
1574
1575         if (start_done) {
1576                 sc_starting = FALSE;
1577                 main_window_set_menu_sensitive(mainwin);
1578                 toolbar_main_set_sensitive(mainwin);
1579         }
1580
1581         /* register the callback of unix domain socket input */
1582         lock_socket_tag = claws_input_add(lock_socket,
1583                                         G_IO_IN | G_IO_HUP | G_IO_ERR | G_IO_PRI,
1584                                         lock_socket_input_cb,
1585                                         mainwin, TRUE);
1586
1587         END_TIMING();
1588
1589         gtk_main();
1590
1591 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1592         if(nm_proxy)
1593                 g_object_unref(nm_proxy);
1594 #endif
1595 #ifdef HAVE_DBUS_GLIB
1596         uninstall_dbus_status_handler();
1597         if(connection)
1598                 dbus_g_connection_unref(connection);
1599 #endif
1600 #ifdef G_OS_WIN32
1601         win32_close_log();
1602 #endif
1603         utils_free_regex();
1604         exit_claws(mainwin);
1605
1606         return 0;
1607 }
1608
1609 static void save_all_caches(FolderItem *item, gpointer data)
1610 {
1611         if (!item->cache) {
1612                 return;
1613         }
1614
1615         if (item->opened) {
1616                 folder_item_close(item);
1617         }
1618
1619         folder_item_free_cache(item, TRUE);
1620 }
1621
1622 static void exit_claws(MainWindow *mainwin)
1623 {
1624         gchar *filename;
1625         gboolean have_connectivity;
1626         FolderItem *item;
1627
1628         sc_exiting = TRUE;
1629
1630         debug_print("shutting down\n");
1631         inc_autocheck_timer_remove();
1632
1633 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1634         if (prefs_common.work_offline && went_offline_nm)
1635                 prefs_common.work_offline = FALSE;
1636 #endif
1637
1638         /* save prefs for opened folder */
1639         if((item = folderview_get_opened_item(mainwin->folderview)) != NULL) {
1640                 summary_save_prefs_to_folderitem(
1641                         mainwin->summaryview, item);
1642                 prefs_common.last_opened_folder =
1643                         folder_item_get_identifier(item);
1644         }
1645
1646         /* save all state before exiting */
1647         folder_func_to_all_folders(save_all_caches, NULL);
1648         folder_write_list();
1649
1650         main_window_get_size(mainwin);
1651         main_window_get_position(mainwin);
1652
1653         prefs_common_write_config();
1654         account_write_config_all();
1655         passwd_store_write_config();
1656 #ifndef USE_ALT_ADDRBOOK
1657         addressbook_export_to_file();
1658 #endif
1659         filename = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, MENU_RC, NULL);
1660         gtk_accel_map_save(filename);
1661         g_free(filename);
1662
1663         /* delete temporary files */
1664         remove_all_files(get_tmp_dir());
1665         remove_all_files(get_mime_tmp_dir());
1666
1667         close_log_file(LOG_PROTOCOL);
1668         close_log_file(LOG_DEBUG_FILTERING);
1669
1670 #ifdef HAVE_NETWORKMANAGER_SUPPORT
1671         have_connectivity = networkmanager_is_online(NULL); 
1672 #else
1673         have_connectivity = TRUE;
1674 #endif
1675 #ifdef HAVE_LIBETPAN
1676         imap_main_done(have_connectivity);
1677         nntp_main_done(have_connectivity);
1678 #endif
1679         /* delete crashfile */
1680         if (!cmd.crash)
1681                 claws_unlink(get_crashfile_name());
1682
1683         lock_socket_remove();
1684
1685 #ifdef HAVE_LIBSM
1686         if (mainwin->smc_conn)
1687                 SmcCloseConnection ((SmcConn)mainwin->smc_conn, 0, NULL);
1688         mainwin->smc_conn = NULL;
1689 #endif
1690
1691         main_window_destroy_all();
1692         
1693         plugin_unload_all("GTK2");
1694
1695         matcher_done();
1696         prefs_toolbar_done();
1697         avatars_done();
1698
1699 #ifndef USE_ALT_ADDRBOOK
1700         addressbook_destroy();
1701 #endif
1702         prefs_themes_done();
1703         prefs_fonts_done();
1704         prefs_ext_prog_done();
1705         prefs_wrapping_done();
1706         prefs_compose_writing_done();
1707         prefs_msg_colors_done();
1708         prefs_image_viewer_done();
1709         image_viewer_done();
1710         prefs_quote_done();
1711         prefs_summaries_done();
1712         prefs_message_done();
1713         prefs_other_done();
1714         prefs_receive_done();
1715         prefs_logging_done();
1716         prefs_send_done();
1717         tags_write_tags();
1718 #ifdef USE_ENCHANT       
1719         prefs_spelling_done();
1720         gtkaspell_checkers_quit();
1721 #endif
1722         plugin_unload_all("Common");
1723         claws_done();
1724 }
1725
1726 #define G_STRING_APPEND_ENCODED_URI(gstring,source)     \
1727         {                                               \
1728                 gchar tmpbuf[BUFFSIZE];                 \
1729                 encode_uri(tmpbuf, BUFFSIZE, (source)); \
1730                 g_string_append((gstring), tmpbuf);     \
1731         }
1732
1733 #define G_PRINT_EXIT(msg)       \
1734         {                       \
1735                 g_print(msg);   \
1736                 exit(1);        \
1737         }
1738
1739 static GString * parse_cmd_compose_from_file(const gchar *fn)
1740 {
1741         GString *headers = g_string_new(NULL);
1742         GString *body = g_string_new(NULL);
1743         gchar *to = NULL;
1744         gchar *h;
1745         gchar *v;
1746         gchar fb[BUFFSIZE];
1747         FILE *fp;
1748         gboolean isstdin;
1749
1750         if (fn == NULL || *fn == '\0')
1751                 G_PRINT_EXIT(_("Missing filename\n"));
1752         isstdin = (*fn == '-' && *(fn + 1) == '\0');
1753         if (isstdin)
1754                 fp = stdin;
1755         else {
1756                 fp = g_fopen(fn, "r");
1757                 if (!fp)
1758                         G_PRINT_EXIT(_("Cannot open filename for reading\n"));
1759         }
1760
1761         while (fgets(fb, sizeof(fb), fp)) {
1762                 gchar *tmp;     
1763                 strretchomp(fb);
1764                 if (*fb == '\0')
1765                         break;
1766                 h = fb;
1767                 while (*h && *h != ':') { ++h; } /* search colon */
1768                 if (*h == '\0')
1769                         G_PRINT_EXIT(_("Malformed header\n"));
1770                 v = h + 1;
1771                 while (*v && *v == ' ') { ++v; } /* trim value start */
1772                 *h = '\0';
1773                 tmp = g_ascii_strdown(fb, -1); /* get header name */
1774                 if (!strcmp(tmp, "to")) {
1775                         if (to != NULL)
1776                                 G_PRINT_EXIT(_("Duplicated 'To:' header\n"));
1777                         to = g_strdup(v);
1778                 } else {
1779                         g_string_append_c(headers, '&');
1780                         g_string_append(headers, tmp);
1781                         g_string_append_c(headers, '=');
1782                         g_string_append_uri_escaped(headers, v, NULL, TRUE);
1783                 }
1784                 g_free(tmp);
1785         }
1786         if (to == NULL)
1787                 G_PRINT_EXIT(_("Missing required 'To:' header\n"));
1788         g_string_append(body, to);
1789         g_free(to);
1790         g_string_append(body, "?body=");
1791         while (fgets(fb, sizeof(fb), fp)) {
1792                 g_string_append_uri_escaped(body, fb, NULL, TRUE);
1793         }
1794         if (!isstdin)
1795                 fclose(fp);
1796         /* append the remaining headers */
1797         g_string_append(body, headers->str);
1798         g_string_free(headers, TRUE);
1799
1800         return body;
1801 }
1802
1803 #undef G_STRING_APPEND_ENCODED_URI
1804 #undef G_PRINT_EXIT
1805
1806 static void parse_cmd_opt(int argc, char *argv[])
1807 {
1808         AttachInfo *ainfo;
1809         gint i;
1810
1811         for (i = 1; i < argc; i++) {
1812                 if (!strncmp(argv[i], "--receive-all", 13)) {
1813                         cmd.receive_all = TRUE;
1814                 } else if (!strncmp(argv[i], "--receive", 9)) {
1815                         cmd.receive = TRUE;
1816                 } else if (!strncmp(argv[i], "--cancel-receiving", 18)) {
1817                         cmd.cancel_receiving = TRUE;
1818                 } else if (!strncmp(argv[i], "--cancel-sending", 16)) {
1819                         cmd.cancel_sending = TRUE;
1820                 } else if (!strncmp(argv[i], "--compose-from-file", 19)) {
1821                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1822
1823                         GString *mailto = parse_cmd_compose_from_file(p);
1824                         cmd.compose = TRUE;
1825                         cmd.compose_mailto = mailto->str;
1826                         i++;
1827                 } else if (!strncmp(argv[i], "--compose", 9)) {
1828                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1829
1830                         cmd.compose = TRUE;
1831                         cmd.compose_mailto = NULL;
1832                         if (p && *p != '\0' && *p != '-') {
1833                                 if (!strncmp(p, "mailto:", 7)) {
1834                                         cmd.compose_mailto = p + 7;
1835                                 } else {
1836                                         cmd.compose_mailto = p;
1837                                 }
1838                                 i++;
1839                         }
1840                 } else if (!strncmp(argv[i], "--subscribe", 11)) {
1841                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1842                         if (p && *p != '\0' && *p != '-') {
1843                                 cmd.subscribe = TRUE;
1844                                 cmd.subscribe_uri = p;
1845                         }
1846                 } else if (!strncmp(argv[i], "--attach", 8)) {
1847                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1848                         gchar *file = NULL;
1849
1850                         while (p && *p != '\0' && *p != '-') {
1851                                 if ((file = g_filename_from_uri(p, NULL, NULL)) != NULL) {
1852                                         if (!is_file_exist(file)) {
1853                                                 g_free(file);
1854                                                 file = NULL;
1855                                         }
1856                                 }
1857                                 if (file == NULL && *p != G_DIR_SEPARATOR) {
1858                                         file = g_strconcat(claws_get_startup_dir(),
1859                                                            G_DIR_SEPARATOR_S,
1860                                                            p, NULL);
1861                                 } else if (file == NULL) {
1862                                         file = g_strdup(p);
1863                                 }
1864                                 ainfo = g_new0(AttachInfo, 1);
1865                                 ainfo->file = file;
1866                                 cmd.attach_files = g_list_append(cmd.attach_files, ainfo);
1867                                 i++;
1868                                 p = (i+1 < argc)?argv[i+1]:NULL;
1869                         }
1870                 } else if (!strncmp(argv[i], "--send", 6)) {
1871                         cmd.send = TRUE;
1872                 } else if (!strncmp(argv[i], "--version-full", 14) ||
1873                            !strncmp(argv[i], "-V", 2)) {
1874                         g_print("Claws Mail version " VERSION "\n");
1875                         main_dump_features_list(FALSE);
1876                         exit(0);
1877                 } else if (!strncmp(argv[i], "--version", 9) ||
1878                            !strncmp(argv[i], "-v", 2)) {
1879                         g_print("Claws Mail version " VERSION "\n");
1880                         exit(0);
1881                 } else if (!strncmp(argv[i], "--status-full", 13)) {
1882                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1883  
1884                         cmd.status_full = TRUE;
1885                         while (p && *p != '\0' && *p != '-') {
1886                                 if (!cmd.status_full_folders) {
1887                                         cmd.status_full_folders =
1888                                                 g_ptr_array_new();
1889                                 }
1890                                 g_ptr_array_add(cmd.status_full_folders,
1891                                                 g_strdup(p));
1892                                 i++;
1893                                 p = (i+1 < argc)?argv[i+1]:NULL;
1894                         }
1895                 } else if (!strncmp(argv[i], "--status", 8)) {
1896                         const gchar *p = (i+1 < argc)?argv[i+1]:NULL;
1897  
1898                         cmd.status = TRUE;
1899                         while (p && *p != '\0' && *p != '-') {
1900                                 if (!cmd.status_folders)
1901                                         cmd.status_folders = g_ptr_array_new();
1902                                 g_ptr_array_add(cmd.status_folders,
1903                                                 g_strdup(p));
1904                                 i++;
1905                                 p = (i+1 < argc)?argv[i+1]:NULL;
1906                         }
1907                 } else if (!strncmp(argv[i], "--search", 8)) {
1908                         cmd.search_folder    = (i+1 < argc)?argv[i+1]:NULL;
1909                         cmd.search_type      = (i+2 < argc)?argv[i+2]:NULL;
1910                         cmd.search_request   = (i+3 < argc)?argv[i+3]:NULL;
1911                         const char* rec      = (i+4 < argc)?argv[i+4]:NULL;
1912                         cmd.search_recursive = TRUE;
1913                         if (rec && (tolower(*rec)=='n' || tolower(*rec)=='f' || *rec=='0'))
1914                                 cmd.search_recursive = FALSE;
1915                         if (cmd.search_folder && cmd.search_type && cmd.search_request)
1916                                 cmd.search = TRUE;
1917                 } else if (!strncmp(argv[i], "--online", 8)) {
1918                         cmd.online_mode = ONLINE_MODE_ONLINE;
1919                 } else if (!strncmp(argv[i], "--offline", 9)) {
1920                         cmd.online_mode = ONLINE_MODE_OFFLINE;
1921                 } else if (!strncmp(argv[i], "--toggle-debug", 14)) {
1922                         cmd.debug = TRUE;
1923                 } else if (!strncmp(argv[i], "--statistics", 12)) {
1924                         cmd.statistics = TRUE;
1925                 } else if (!strncmp(argv[i], "--reset-statistics", 18)) {
1926                         cmd.reset_statistics = TRUE;
1927                 } else if (!strncmp(argv[i], "--help", 6) ||
1928                            !strncmp(argv[i], "-h", 2)) {
1929                         gchar *base = g_path_get_basename(argv[0]);
1930                         g_print(_("Usage: %s [OPTION]...\n"), base);
1931
1932                         g_print("%s\n", _("  --compose [address]    open composition window"));
1933                         g_print("%s\n", _("  --compose-from-file file\n"
1934                                           "                         open composition window with data from given file;\n"
1935                                           "                         use - as file name for reading from standard input;\n"
1936                                           "                         content format: headers first (To: required) until an\n"
1937                                           "                         empty line, then mail body until end of file."));
1938                         g_print("%s\n", _("  --subscribe [uri]      subscribe to the given URI if possible"));
1939                         g_print("%s\n", _("  --attach file1 [file2]...\n"
1940                                           "                         open composition window with specified files\n"
1941                                           "                         attached"));
1942                         g_print("%s\n", _("  --receive              receive new messages"));
1943                         g_print("%s\n", _("  --receive-all          receive new messages of all accounts"));
1944                         g_print("%s\n", _("  --cancel-receiving     cancel receiving of messages"));
1945                         g_print("%s\n", _("  --cancel-sending       cancel sending of messages"));
1946                         g_print("%s\n", _("  --search folder type request [recursive]\n"
1947                                           "                         searches mail\n"
1948                                           "                         folder ex.: \"#mh/Mailbox/inbox\" or \"Mail\"\n"
1949                                           "                         type: s[ubject],f[rom],t[o],e[xtended],m[ixed] or g: tag\n"
1950                                           "                         request: search string\n"
1951                                           "                         recursive: false if arg. starts with 0, n, N, f or F"));
1952
1953                         g_print("%s\n", _("  --send                 send all queued messages"));
1954                         g_print("%s\n", _("  --status [folder]...   show the total number of messages"));
1955                         g_print("%s\n", _("  --status-full [folder]...\n"
1956                                           "                         show the status of each folder"));
1957                         g_print("%s\n", _("  --statistics           show session statistics"));
1958                         g_print("%s\n", _("  --reset-statistics     reset session statistics"));
1959                         g_print("%s\n", _("  --select folder[/msg]  jumps to the specified folder/message\n" 
1960                                           "                         folder is a folder id like 'folder/sub_folder'"));
1961                         g_print("%s\n", _("  --online               switch to online mode"));
1962                         g_print("%s\n", _("  --offline              switch to offline mode"));
1963                         g_print("%s\n", _("  --exit --quit -q       exit Claws Mail"));
1964                         g_print("%s\n", _("  --debug                debug mode"));
1965                         g_print("%s\n", _("  --toggle-debug         toggle debug mode"));
1966                         g_print("%s\n", _("  --help -h              display this help and exit"));
1967                         g_print("%s\n", _("  --version -v           output version information and exit"));
1968                         g_print("%s\n", _("  --version-full -V      output version and built-in features information and exit"));
1969                         g_print("%s\n", _("  --config-dir           output configuration directory"));
1970                         g_print("%s\n", _("  --alternate-config-dir [dir]\n"
1971                                           "                         use specified configuration directory"));
1972                         g_print("%s\n", _("  --geometry -geometry WxH+X+Y\n"
1973                                           "                         set geometry for main window"));
1974
1975                         g_free(base);
1976                         exit(1);
1977                 } else if (!strncmp(argv[i], "--crash", 7)) {
1978                         cmd.crash = TRUE;
1979                         cmd.crash_params = g_strdup((i+1 < argc)?argv[i+1]:NULL);
1980                         i++;
1981                 } else if (!strncmp(argv[i], "--config-dir", sizeof "--config-dir" - 1)) {
1982                         g_print(RC_DIR "\n");
1983                         exit(0);
1984                 } else if (!strncmp(argv[i], "--alternate-config-dir", sizeof "--alternate-config-dir" - 1) && i+1 < argc) {
1985                         set_rc_dir(argv[i+1]);
1986                 } else if (!strncmp(argv[i], "--geometry", sizeof "--geometry" - 1)
1987                           || !strncmp(argv[i], "-geometry", sizeof "-geometry" - 1)) {
1988                         cmd.geometry = (i+1 < argc)? argv[i+1]: NULL;
1989                 } else if (!strncmp(argv[i], "--exit", 6) ||
1990                            !strncmp(argv[i], "--quit", 6) ||
1991                            !strncmp(argv[i], "-q", 2)) {
1992                         cmd.exit = TRUE;
1993                 } else if (!strncmp(argv[i], "--select", 8) && i+1 < argc) {
1994                         cmd.target = argv[i+1];
1995                 } else if (i == 1 && argc == 2) {
1996                         /* only one parameter. Do something intelligent about it */
1997                         if ((strstr(argv[i], "@")||!strncmp(argv[i], "mailto:", 7)) && !strstr(argv[i], "://")) {
1998                                 const gchar *p = argv[i];
1999
2000                                 cmd.compose = TRUE;
2001                                 cmd.compose_mailto = NULL;
2002                                 if (p && *p != '\0' && *p != '-') {
2003                                         if (!strncmp(p, "mailto:", 7)) {
2004                                                 cmd.compose_mailto = p + 7;
2005                                         } else {
2006                                                 cmd.compose_mailto = p;
2007                                         }
2008                                 }
2009                         } else if (!strncmp(argv[i], "file://", 7)) {
2010                                 cmd.target = argv[i];
2011                         } else if (!strncmp(argv[i], "?attach=file://", strlen("?attach=file://"))) {
2012                                 cmd.compose = TRUE;
2013                                 cmd.compose_mailto = argv[i];
2014                         } else if (strstr(argv[i], "://")) {
2015                                 const gchar *p = argv[i];
2016                                 if (p && *p != '\0' && *p != '-') {
2017                                         cmd.subscribe = TRUE;
2018                                         cmd.subscribe_uri = p;
2019                                 }
2020                         } else if (!strcmp(argv[i], "--sync")) {
2021                                 /* gtk debug */
2022                         } else if (is_dir_exist(argv[i]) || is_file_exist(argv[i])) {
2023                                 cmd.target = argv[i];
2024                         } else {
2025                                 g_print(_("Unknown option\n"));
2026                                 exit(1);
2027                         }
2028                 }
2029         }
2030
2031         if (cmd.attach_files && cmd.compose == FALSE) {
2032                 cmd.compose = TRUE;
2033                 cmd.compose_mailto = NULL;
2034         }
2035 }
2036
2037 static void initial_processing(FolderItem *item, gpointer data)
2038 {
2039         MainWindow *mainwin = (MainWindow *)data;
2040         gchar *buf;
2041
2042         cm_return_if_fail(item);
2043         buf = g_strdup_printf(_("Processing (%s)..."), 
2044                               item->path 
2045                               ? item->path 
2046                               : _("top level folder"));
2047         g_free(buf);
2048
2049         
2050         if (item->prefs->enable_processing) {
2051                 item->processing_pending = TRUE;
2052                 folder_item_apply_processing(item);
2053                 item->processing_pending = FALSE;
2054         }
2055
2056         STATUSBAR_POP(mainwin);
2057 }
2058
2059 static gboolean draft_all_messages(void)
2060 {
2061         const GList *compose_list = NULL;
2062         
2063         compose_clear_exit_drafts();
2064         compose_list = compose_get_compose_list();
2065         while (compose_list != NULL) {
2066                 Compose *c = (Compose*)compose_list->data;
2067                 if (!compose_draft(c, COMPOSE_DRAFT_FOR_EXIT))
2068                         return FALSE;
2069                 compose_list = compose_get_compose_list();
2070         }
2071         return TRUE;
2072 }
2073 gboolean clean_quit(gpointer data)
2074 {
2075         static gboolean firstrun = TRUE;
2076
2077         if (!firstrun) {
2078                 return FALSE;
2079         }
2080         firstrun = FALSE;
2081
2082         /*!< Good idea to have the main window stored in a 
2083          *   static variable so we can check that variable
2084          *   to see if we're really allowed to do things
2085          *   that actually the spawner is supposed to 
2086          *   do (like: sending mail, composing messages).
2087          *   Because, really, if we're the spawnee, and
2088          *   we touch GTK stuff, we're hosed. See the 
2089          *   next fixme. */
2090
2091         /* FIXME: Use something else to signal that we're
2092          * in the original spawner, and not in a spawned
2093          * child. */
2094         if (!static_mainwindow) {
2095                 return FALSE;
2096         }
2097                 
2098         draft_all_messages();
2099         emergency_exit = TRUE;
2100         exit_claws(static_mainwindow);
2101         exit(0);
2102
2103         return FALSE;
2104 }
2105
2106 void app_will_exit(GtkWidget *widget, gpointer data)
2107 {
2108         MainWindow *mainwin = data;
2109         
2110         if (gtk_main_level() == 0) {
2111                 debug_print("not even started\n");
2112                 return;
2113         }
2114         if (sc_exiting == TRUE) {
2115                 debug_print("exit pending\n");
2116                 return;
2117         }
2118         sc_exiting = TRUE;
2119         debug_print("exiting\n");
2120         if (compose_get_compose_list()) {
2121                 if (!draft_all_messages()) {
2122                         main_window_popup(mainwin);
2123                         sc_exiting = FALSE;
2124                         return;
2125                 }
2126         }
2127
2128         if (prefs_common.warn_queued_on_exit && procmsg_have_queued_mails_fast()) {
2129                 if (alertpanel(_("Queued messages"),
2130                                _("Some unsent messages are queued. Exit now?"),
2131                                GTK_STOCK_CANCEL, GTK_STOCK_OK, NULL)
2132                     != G_ALERTALTERNATE) {
2133                         main_window_popup(mainwin);
2134                         sc_exiting = FALSE;
2135                         return;
2136                 }
2137                 manage_window_focus_in(mainwin->window, NULL, NULL);
2138         }
2139
2140         sock_cleanup();
2141 #ifdef HAVE_VALGRIND
2142         if (RUNNING_ON_VALGRIND) {
2143                 summary_clear_list(mainwin->summaryview);
2144         }
2145 #endif
2146         if (folderview_get_selected_item(mainwin->folderview))
2147                 folder_item_close(folderview_get_selected_item(mainwin->folderview));
2148         gtk_main_quit();
2149 }
2150
2151 gboolean claws_is_exiting(void)
2152 {
2153         return sc_exiting;
2154 }
2155
2156 gboolean claws_is_starting(void)
2157 {
2158         return sc_starting;
2159 }
2160
2161 #ifdef G_OS_UNIX
2162 /*
2163  * CLAWS: want this public so crash dialog can delete the
2164  * lock file too
2165  */
2166 gchar *claws_get_socket_name(void)
2167 {
2168         static gchar *filename = NULL;
2169         gchar *socket_dir = NULL;
2170         gchar md5sum[33];
2171
2172         if (filename == NULL) {
2173                 GStatBuf st;
2174                 gint stat_ok;
2175
2176                 socket_dir = g_strdup_printf("%s%cclaws-mail-%d",
2177                                            g_get_tmp_dir(), G_DIR_SEPARATOR,
2178 #if HAVE_GETUID
2179                                            getuid());
2180 #else
2181                                            0);
2182 #endif
2183                 stat_ok = g_stat(socket_dir, &st);
2184                 if (stat_ok < 0 && errno != ENOENT) {
2185                         g_print("Error stat'ing socket_dir %s: %s\n",
2186                                 socket_dir, g_strerror(errno));
2187                 } else if (stat_ok == 0 && S_ISSOCK(st.st_mode)) {
2188                         /* old versions used a sock in $TMPDIR/claws-mail-$UID */
2189                         debug_print("Using legacy socket %s\n", socket_dir);
2190                         filename = g_strdup(socket_dir);
2191                         return filename;
2192                 }
2193
2194                 if (!is_dir_exist(socket_dir) && make_dir(socket_dir) < 0) {
2195                         g_print("Error creating socket_dir %s: %s\n",
2196                                 socket_dir, g_strerror(errno));
2197                 }
2198
2199                 md5_hex_digest(md5sum, get_rc_dir());
2200
2201                 filename = g_strdup_printf("%s%c%s", socket_dir, G_DIR_SEPARATOR,
2202                                            md5sum);
2203                 g_free(socket_dir);
2204                 debug_print("Using control socket %s\n", filename);
2205         }
2206
2207         return filename;
2208 }
2209 #endif
2210
2211 static gchar *get_crashfile_name(void)
2212 {
2213         static gchar *filename = NULL;
2214
2215         if (filename == NULL) {
2216                 filename = g_strdup_printf("%s%cclaws-crashed",
2217                                            get_tmp_dir(), G_DIR_SEPARATOR);
2218         }
2219
2220         return filename;
2221 }
2222
2223 static gint prohibit_duplicate_launch(void)
2224 {
2225         gint uxsock;
2226         GList *curr;
2227 #ifdef G_OS_UNIX
2228         gchar *path;
2229
2230         path = claws_get_socket_name();
2231         /* Try to connect to the control socket */
2232         uxsock = fd_connect_unix(path);
2233         
2234         if (x_display == NULL)
2235                 x_display = g_strdup(g_getenv("DISPLAY"));
2236
2237         if (uxsock < 0) {
2238                 gint ret;
2239 #if HAVE_FLOCK
2240                 gchar *socket_lock;
2241                 gint lock_fd;
2242                 /* If connect failed, no other process is running.
2243                  * Unlink the potentially existing socket, then
2244                  * open it. This has to be done locking a temporary
2245                  * file to avoid the race condition where another
2246                  * process could have created the socket just in
2247                  * between.
2248                  */
2249                 socket_lock = g_strconcat(path, ".lock",
2250                                           NULL);
2251                 lock_fd = g_open(socket_lock, O_RDWR|O_CREAT, 0);
2252                 if (lock_fd < 0) {
2253                         debug_print("Couldn't open %s: %s (%d)\n", socket_lock,
2254                                 g_strerror(errno), errno);
2255                         g_free(socket_lock);
2256                         return -1;
2257                 }
2258                 if (flock(lock_fd, LOCK_EX) < 0) {
2259                         debug_print("Couldn't lock %s: %s (%d)\n", socket_lock,
2260                                 g_strerror(errno), errno);
2261                         close(lock_fd);
2262                         g_free(socket_lock);
2263                         return -1;
2264                 }
2265 #endif
2266
2267                 claws_unlink(path);
2268                 debug_print("Opening socket %s\n", path);
2269                 ret = fd_open_unix(path);
2270 #if HAVE_FLOCK
2271                 flock(lock_fd, LOCK_UN);
2272                 close(lock_fd);
2273                 claws_unlink(socket_lock);
2274                 g_free(socket_lock);
2275 #endif
2276                 return ret;
2277         }
2278 #else
2279         HANDLE hmutex;
2280
2281         hmutex = CreateMutexA(NULL, FALSE, "ClawsMail");
2282         if (!hmutex) {
2283                 debug_print("cannot create Mutex\n");
2284                 return -1;
2285         }
2286         if (GetLastError() != ERROR_ALREADY_EXISTS) {
2287                 uxsock = fd_open_inet(50216);
2288                 if (uxsock < 0)
2289                         return 0;
2290                 return uxsock;
2291         }
2292
2293         uxsock = fd_connect_inet(50216);
2294         if (uxsock < 0)
2295                 return -1;
2296 #endif
2297         /* remote command mode */
2298
2299         debug_print("another Claws Mail instance is already running.\n");
2300
2301         if (cmd.receive_all) {
2302                 fd_write_all(uxsock, "receive_all\n", 12);
2303         } else if (cmd.receive) {
2304                 fd_write_all(uxsock, "receive\n", 8);
2305         } else if (cmd.cancel_receiving) {
2306                 fd_write_all(uxsock, "cancel_receiving\n", 17);
2307         } else if (cmd.cancel_sending) {
2308                 fd_write_all(uxsock, "cancel_sending\n", 15);
2309         } else if (cmd.compose && cmd.attach_files) {
2310                 gchar *str, *compose_str;
2311
2312                 if (cmd.compose_mailto) {
2313                         compose_str = g_strdup_printf("compose_attach %s\n",
2314                                                       cmd.compose_mailto);
2315                 } else {
2316                         compose_str = g_strdup("compose_attach\n");
2317                 }
2318
2319                 fd_write_all(uxsock, compose_str, strlen(compose_str));
2320                 g_free(compose_str);
2321
2322                 for (curr = cmd.attach_files; curr != NULL ; curr = curr->next) {
2323                         str = (gchar *) ((AttachInfo *)curr->data)->file;
2324                         fd_write_all(uxsock, str, strlen(str));
2325                         fd_write_all(uxsock, "\n", 1);
2326                 }
2327
2328                 fd_write_all(uxsock, ".\n", 2);
2329         } else if (cmd.compose) {
2330                 gchar *compose_str;
2331
2332                 if (cmd.compose_mailto) {
2333                         compose_str = g_strdup_printf
2334                                 ("compose %s\n", cmd.compose_mailto);
2335                 } else {
2336                         compose_str = g_strdup("compose\n");
2337                 }
2338
2339                 fd_write_all(uxsock, compose_str, strlen(compose_str));
2340                 g_free(compose_str);
2341         } else if (cmd.subscribe) {
2342                 gchar *str = g_strdup_printf("subscribe %s\n", cmd.subscribe_uri);
2343                 fd_write_all(uxsock, str, strlen(str));
2344                 g_free(str);
2345         } else if (cmd.send) {
2346                 fd_write_all(uxsock, "send\n", 5);
2347         } else if (cmd.online_mode == ONLINE_MODE_ONLINE) {
2348                 fd_write(uxsock, "online\n", 6);
2349         } else if (cmd.online_mode == ONLINE_MODE_OFFLINE) {
2350                 fd_write(uxsock, "offline\n", 7);
2351         } else if (cmd.debug) {
2352                 fd_write(uxsock, "debug\n", 7);
2353         } else if (cmd.status || cmd.status_full) {
2354                 gchar buf[BUFFSIZE];
2355                 gint i;
2356                 const gchar *command;
2357                 GPtrArray *folders;
2358                 gchar *folder;
2359  
2360                 command = cmd.status_full ? "status-full\n" : "status\n";
2361                 folders = cmd.status_full ? cmd.status_full_folders :
2362                         cmd.status_folders;
2363  
2364                 fd_write_all(uxsock, command, strlen(command));
2365                 for (i = 0; folders && i < folders->len; ++i) {
2366                         folder = g_ptr_array_index(folders, i);
2367                         fd_write_all(uxsock, folder, strlen(folder));
2368                         fd_write_all(uxsock, "\n", 1);
2369                 }
2370                 fd_write_all(uxsock, ".\n", 2);
2371                 for (;;) {
2372                         fd_gets(uxsock, buf, sizeof(buf) - 1);
2373                         buf[sizeof(buf) - 1] = '\0';
2374                         if (!strncmp(buf, ".\n", 2)) break;
2375                         fputs(buf, stdout);
2376                 }
2377         } else if (cmd.exit) {
2378                 fd_write_all(uxsock, "exit\n", 5);
2379         } else if (cmd.statistics) {
2380                 gchar buf[BUFSIZ];
2381                 fd_write(uxsock, "statistics\n", 11);
2382                 for (;;) {
2383                         fd_gets(uxsock, buf, sizeof(buf) - 1);
2384                         buf[sizeof(buf) - 1] = '\0';
2385                         if (!strncmp(buf, ".\n", 2)) break;
2386                         fputs(buf, stdout);
2387                 }
2388         } else if (cmd.reset_statistics) {
2389                 fd_write(uxsock, "reset_statistics\n", 17);
2390         } else if (cmd.target) {
2391                 gchar *str = g_strdup_printf("select %s\n", cmd.target);
2392                 fd_write_all(uxsock, str, strlen(str));
2393                 g_free(str);
2394         } else if (cmd.search) {
2395                 gchar buf[BUFFSIZE];
2396                 gchar *str =
2397                         g_strdup_printf("search %s\n%s\n%s\n%c\n",
2398                                                         cmd.search_folder, cmd.search_type, cmd.search_request,
2399                                                         (cmd.search_recursive==TRUE)?'1':'0');
2400                 fd_write_all(uxsock, str, strlen(str));
2401                 g_free(str);
2402                 for (;;) {
2403                         fd_gets(uxsock, buf, sizeof(buf) - 1);
2404                         buf[sizeof(buf) - 1] = '\0';
2405                         if (!strncmp(buf, ".\n", 2)) break;
2406                         fputs(buf, stdout);
2407                 }
2408         } else {
2409 #ifndef G_OS_WIN32
2410                 gchar buf[BUFSIZ];
2411                 fd_write_all(uxsock, "get_display\n", 12);
2412                 memset(buf, 0, sizeof(buf));
2413                 fd_gets(uxsock, buf, sizeof(buf) - 1);
2414                 buf[sizeof(buf) - 1] = '\0';
2415                 if (strcmp2(buf, x_display)) {
2416                         g_print("Claws Mail is already running on display %s.\n",
2417                                 buf);
2418                 } else {
2419                         fd_close(uxsock);
2420                         uxsock = fd_connect_unix(path);
2421                         fd_write_all(uxsock, "popup\n", 6);
2422                 }
2423 #else
2424                 fd_write_all(uxsock, "popup\n", 6);
2425 #endif
2426         }
2427
2428         fd_close(uxsock);
2429         return -1;
2430 }
2431
2432 static gint lock_socket_remove(void)
2433 {
2434 #ifdef G_OS_UNIX
2435         gchar *filename, *dirname;
2436 #endif
2437         if (lock_socket < 0) {
2438                 return -1;
2439         }
2440
2441         if (lock_socket_tag > 0) {
2442                 g_source_remove(lock_socket_tag);
2443         }
2444         fd_close(lock_socket);
2445
2446 #ifdef G_OS_UNIX
2447         filename = claws_get_socket_name();
2448         dirname = g_path_get_dirname(filename);
2449         claws_unlink(filename);
2450         g_rmdir(dirname);
2451         g_free(dirname);
2452 #endif
2453
2454         return 0;
2455 }
2456
2457 static GPtrArray *get_folder_item_list(gint sock)
2458 {
2459         gchar buf[BUFFSIZE];
2460         FolderItem *item;
2461         GPtrArray *folders = NULL;
2462
2463         for (;;) {
2464                 fd_gets(sock, buf, sizeof(buf) - 1);
2465                 buf[sizeof(buf) - 1] = '\0';
2466                 if (!strncmp(buf, ".\n", 2)) {
2467                         break;
2468                 }
2469                 strretchomp(buf);
2470                 if (!folders) {
2471                         folders = g_ptr_array_new();
2472                 }
2473                 item = folder_find_item_from_identifier(buf);
2474                 if (item) {
2475                         g_ptr_array_add(folders, item);
2476                 } else {
2477                         g_warning("no such folder: %s", buf);
2478                 }
2479         }
2480
2481         return folders;
2482 }
2483
2484 static void lock_socket_input_cb(gpointer data,
2485                                  gint source,
2486                                  GIOCondition condition)
2487 {
2488         MainWindow *mainwin = (MainWindow *)data;
2489         gint sock;
2490         gchar buf[BUFFSIZE];
2491
2492         sock = fd_accept(source);
2493         if (sock < 0)
2494                 return;
2495
2496         fd_gets(sock, buf, sizeof(buf) - 1);
2497         buf[sizeof(buf) - 1] = '\0';
2498
2499         if (!strncmp(buf, "popup", 5)) {
2500                 main_window_popup(mainwin);
2501         } else if (!strncmp(buf, "get_display", 11)) {
2502                 fd_write_all(sock, x_display, strlen(x_display));
2503         } else if (!strncmp(buf, "receive_all", 11)) {
2504                 inc_all_account_mail(mainwin, FALSE,
2505                                      prefs_common.newmail_notify_manu);
2506         } else if (!strncmp(buf, "receive", 7)) {
2507                 inc_mail(mainwin, prefs_common.newmail_notify_manu);
2508         } else if (!strncmp(buf, "cancel_receiving", 16)) {
2509                 inc_cancel_all();
2510                 imap_cancel_all();
2511         } else if (!strncmp(buf, "cancel_sending", 14)) {
2512                 send_cancel();
2513         } else if (!strncmp(buf, "compose_attach", 14)) {
2514                 GList *files = NULL, *curr;
2515                 AttachInfo *ainfo;
2516                 gchar *mailto;
2517
2518                 mailto = g_strdup(buf + strlen("compose_attach") + 1);
2519                 while (fd_gets(sock, buf, sizeof(buf) - 1) > 0) {
2520                         buf[sizeof(buf) - 1] = '\0';
2521                         strretchomp(buf);
2522                         if (!strcmp2(buf, "."))
2523                                 break;
2524                                 
2525                         ainfo = g_new0(AttachInfo, 1);
2526                         ainfo->file = g_strdup(buf);
2527                         files = g_list_append(files, ainfo);
2528                 }
2529                 open_compose_new(mailto, files);
2530                 
2531                 curr = g_list_first(files);
2532                 while (curr != NULL) {
2533                         ainfo = (AttachInfo *)curr->data;
2534                         g_free(ainfo->file);
2535                         g_free(ainfo);
2536                         curr = curr->next;
2537                 }
2538                 g_list_free(files);
2539                 g_free(mailto);
2540         } else if (!strncmp(buf, "compose", 7)) {
2541                 open_compose_new(buf + strlen("compose") + 1, NULL);
2542         } else if (!strncmp(buf, "subscribe", 9)) {
2543                 main_window_popup(mainwin);
2544                 folder_subscribe(buf + strlen("subscribe") + 1);
2545         } else if (!strncmp(buf, "send", 4)) {
2546                 send_queue();
2547         } else if (!strncmp(buf, "online", 6)) {
2548                 main_window_toggle_work_offline(mainwin, FALSE, FALSE);
2549         } else if (!strncmp(buf, "offline", 7)) {
2550                 main_window_toggle_work_offline(mainwin, TRUE, FALSE);
2551         } else if (!strncmp(buf, "debug", 5)) {
2552                 debug_set_mode(debug_get_mode() ? FALSE : TRUE);
2553         } else if (!strncmp(buf, "status-full", 11) ||
2554                    !strncmp(buf, "status", 6)) {
2555                 gchar *status;
2556                 GPtrArray *folders;
2557  
2558                 folders = get_folder_item_list(sock);
2559                 status = folder_get_status
2560                         (folders, !strncmp(buf, "status-full", 11));
2561                 fd_write_all(sock, status, strlen(status));
2562                 fd_write_all(sock, ".\n", 2);
2563                 g_free(status);
2564                 if (folders) g_ptr_array_free(folders, TRUE);
2565         } else if (!strncmp(buf, "statistics", 10)) {
2566                 gchar tmp[BUFSIZ];
2567
2568                 g_snprintf(tmp, sizeof(tmp), _("Session statistics\n"));
2569                 fd_write_all(sock, tmp, strlen(tmp));
2570
2571                 if (prefs_common.date_format) {
2572                         struct tm *lt;
2573                         gint len = 100;
2574                         gchar date[len];
2575
2576                         lt = localtime(&session_stats.time_started);
2577                         fast_strftime(date, len, prefs_common.date_format, lt);
2578                         g_snprintf(tmp, sizeof(tmp), _("Started: %s\n"),
2579                                         lt ? date : ctime(&session_stats.time_started));
2580                 } else
2581                         g_snprintf(tmp, sizeof(tmp), _("Started: %s\n"),
2582                                         ctime(&session_stats.time_started));
2583                 fd_write_all(sock, tmp, strlen(tmp));
2584
2585                 fd_write_all(sock, "\n", 1);
2586
2587                 g_snprintf(tmp, sizeof(tmp), _("Incoming traffic\n"));
2588                 fd_write_all(sock, tmp, strlen(tmp));
2589
2590                 g_snprintf(tmp, sizeof(tmp), _("Received messages: %d\n"),
2591                                 session_stats.received);
2592                 fd_write_all(sock, tmp, strlen(tmp));
2593
2594                 fd_write_all(sock, "\n", 1);
2595
2596                 g_snprintf(tmp, sizeof(tmp), _("Outgoing traffic\n"));
2597                 fd_write_all(sock, tmp, strlen(tmp));
2598
2599                 g_snprintf(tmp, sizeof(tmp), _("New/redirected messages: %d\n"),
2600                                 session_stats.sent);
2601                 fd_write_all(sock, tmp, strlen(tmp));
2602
2603                 g_snprintf(tmp, sizeof(tmp), _("Replied messages: %d\n"),
2604                                 session_stats.replied);
2605                 fd_write_all(sock, tmp, strlen(tmp));
2606
2607                 g_snprintf(tmp, sizeof(tmp), _("Forwarded messages: %d\n"),
2608                                 session_stats.forwarded);
2609                 fd_write_all(sock, tmp, strlen(tmp));
2610
2611                 g_snprintf(tmp, sizeof(tmp), _("Total outgoing messages: %d\n"),
2612                                 (session_stats.sent + session_stats.replied +
2613                                  session_stats.forwarded));
2614                 fd_write_all(sock, tmp, strlen(tmp));
2615
2616                 fd_write_all(sock, ".\n", 2);
2617         } else if (!strncmp(buf, "reset_statistics", 16)) {
2618                 reset_statistics();
2619         } else if (!strncmp(buf, "select ", 7)) {
2620                 const gchar *target = buf+7;
2621                 mainwindow_jump_to(target, TRUE);
2622         } else if (!strncmp(buf, "search ", 7)) {
2623                 FolderItem* folderItem = NULL;
2624                 GSList *messages = NULL;
2625                 gchar *folder_name = NULL;
2626                 gchar *request = NULL;
2627                 AdvancedSearch *search;
2628                 gboolean recursive;
2629                 AdvancedSearchType searchType = ADVANCED_SEARCH_EXTENDED;
2630                 
2631                 search = advsearch_new();
2632
2633                 folder_name = g_strdup(buf+7);
2634                 strretchomp(folder_name);
2635
2636                 if (fd_gets(sock, buf, sizeof(buf) - 1) <= 0) 
2637                         goto search_exit;
2638                 buf[sizeof(buf) - 1] = '\0';
2639
2640                 switch (toupper(buf[0])) {
2641                 case 'S': searchType = ADVANCED_SEARCH_SUBJECT; break;
2642                 case 'F': searchType = ADVANCED_SEARCH_FROM; break;
2643                 case 'T': searchType = ADVANCED_SEARCH_TO; break;
2644                 case 'M': searchType = ADVANCED_SEARCH_MIXED; break;
2645                 case 'G': searchType = ADVANCED_SEARCH_TAG; break;
2646                 case 'E': searchType = ADVANCED_SEARCH_EXTENDED; break;
2647                 }
2648
2649                 if (fd_gets(sock, buf, sizeof(buf) - 1) <= 0) 
2650                         goto search_exit;
2651
2652                 buf[sizeof(buf) - 1] = '\0';
2653                 request = g_strdup(buf);
2654                 strretchomp(request);
2655
2656                 recursive = TRUE;
2657                 if (fd_gets(sock, buf, sizeof(buf) - 1) > 0)
2658                         recursive = buf[0] != '0';
2659
2660                 buf[sizeof(buf) - 1] = '\0';
2661
2662                 debug_print("search: %s %i %s %i\n", folder_name, searchType, request, recursive);
2663
2664                 folderItem = folder_find_item_from_identifier(folder_name);
2665
2666                 if (folderItem == NULL) {
2667                         debug_print("Unknown folder item : '%s', searching folder\n",folder_name);
2668                         Folder* folder = folder_find_from_path(folder_name);
2669                         if (folder != NULL)
2670                                 folderItem = FOLDER_ITEM(folder->node->data);
2671                         else
2672                                 debug_print("Unknown folder: '%s'\n",folder_name);
2673                 } else {
2674                         debug_print("%s %s\n",folderItem->name, folderItem->path);
2675                 }
2676
2677                 if (folderItem != NULL) {
2678                         advsearch_set(search, searchType, request);
2679                         advsearch_search_msgs_in_folders(search, &messages, folderItem, recursive);
2680                 } else {
2681                         g_print("Folder '%s' not found.\n'", folder_name);
2682                 }
2683
2684                 GSList *cur;
2685                 for (cur = messages; cur != NULL; cur = cur->next) {
2686                         MsgInfo* msg = (MsgInfo *)cur->data;
2687                         gchar *file = procmsg_get_message_file_path(msg);
2688                         fd_write_all(sock, file, strlen(file));
2689                         fd_write_all(sock, "\n", 1);
2690                         g_free(file);
2691                 }
2692                 fd_write_all(sock, ".\n", 2);
2693
2694 search_exit:
2695                 g_free(folder_name);
2696                 g_free(request);
2697                 advsearch_free(search);
2698                 if (messages != NULL)
2699                         procmsg_msg_list_free(messages);
2700         } else if (!strncmp(buf, "exit", 4)) {
2701                 if (prefs_common.clean_on_exit && !prefs_common.ask_on_clean) {
2702                         procmsg_empty_all_trash();
2703                 }
2704                 app_will_exit(NULL, mainwin);
2705         }
2706         fd_close(sock);
2707
2708 }
2709
2710 static void open_compose_new(const gchar *address, GList *attach_files)
2711 {
2712         gchar *addr = NULL;
2713
2714         if (address) {
2715                 Xstrdup_a(addr, address, return);
2716                 g_strstrip(addr);
2717         }
2718
2719         compose_new(NULL, addr, attach_files);
2720 }
2721
2722 static void send_queue(void)
2723 {
2724         GList *list;
2725         gchar *errstr = NULL;
2726         gboolean error = FALSE;
2727         for (list = folder_get_list(); list != NULL; list = list->next) {
2728                 Folder *folder = list->data;
2729
2730                 if (folder->queue) {
2731                         gint res = procmsg_send_queue
2732                                 (folder->queue, prefs_common.savemsg,
2733                                 &errstr);
2734
2735                         if (res) {
2736                                 folder_item_scan(folder->queue);
2737                         }
2738                         
2739                         if (res < 0)
2740                                 error = TRUE;
2741                 }
2742         }
2743         if (errstr) {
2744                 alertpanel_error_log(_("Some errors occurred "
2745                                 "while sending queued messages:\n%s"), errstr);
2746                 g_free(errstr);
2747         } else if (error) {
2748                 alertpanel_error_log("Some errors occurred "
2749                                 "while sending queued messages.");
2750         }
2751 }
2752
2753 static void quit_signal_handler(int sig)
2754 {
2755         debug_print("Quitting on signal %d\n", sig);
2756
2757         g_timeout_add(0, clean_quit, NULL);
2758 }
2759
2760 static void install_basic_sighandlers()
2761 {
2762 #ifndef G_OS_WIN32
2763         sigset_t    mask;
2764         struct sigaction act;
2765
2766         sigemptyset(&mask);
2767
2768 #ifdef SIGTERM
2769         sigaddset(&mask, SIGTERM);
2770 #endif
2771 #ifdef SIGINT
2772         sigaddset(&mask, SIGINT);
2773 #endif
2774 #ifdef SIGHUP
2775         sigaddset(&mask, SIGHUP);
2776 #endif
2777
2778         act.sa_handler = quit_signal_handler;
2779         act.sa_mask    = mask;
2780         act.sa_flags   = 0;
2781
2782 #ifdef SIGTERM
2783         sigaction(SIGTERM, &act, 0);
2784 #endif
2785 #ifdef SIGINT
2786         sigaction(SIGINT, &act, 0);
2787 #endif  
2788 #ifdef SIGHUP
2789         sigaction(SIGHUP, &act, 0);
2790 #endif  
2791
2792         sigprocmask(SIG_UNBLOCK, &mask, 0);
2793 #endif /* !G_OS_WIN32 */
2794 }
2795
2796 #if (defined linux && defined SIGIO)
2797 static int mem_notify_fd = 0;
2798
2799 static gboolean clean_caches(gpointer unused)
2800 {
2801         if (static_mainwindow && static_mainwindow->lock_count > 0)
2802                 return TRUE;
2803         debug_print("/dev/mem_notify: callback: Freeing some memory now!\n");
2804         folder_clean_cache_memory_force();
2805         return FALSE;
2806 }
2807
2808 static void memory_signal_handler(int sig)
2809 {
2810         debug_print("/dev/mem_notify: Kernel says we should free up some memory!\n");
2811         g_timeout_add(10, clean_caches, NULL); 
2812 }
2813
2814 static void install_memory_sighandler()
2815 {
2816         sigset_t    mask;
2817         struct sigaction act;
2818         int flags;
2819
2820         mem_notify_fd = g_open("/dev/mem_notify", O_RDONLY|O_NONBLOCK, 0);
2821         if (mem_notify_fd == -1) {
2822                 debug_print("/dev/mem_notify not available (%s)\n", 
2823                         g_strerror(errno));
2824                 return;
2825         }
2826         
2827         fcntl(mem_notify_fd, F_SETOWN, getpid());
2828         flags = fcntl(mem_notify_fd, F_GETFL);
2829         fcntl(mem_notify_fd, flags|FASYNC);
2830
2831         sigemptyset(&mask);
2832
2833         sigaddset(&mask, SIGIO);
2834
2835         act.sa_handler = memory_signal_handler;
2836         act.sa_mask    = mask;
2837         act.sa_flags   = 0;
2838
2839         sigaction(SIGIO, &act, 0);
2840
2841         sigprocmask(SIG_UNBLOCK, &mask, 0);
2842
2843         debug_print("/dev/mem_notify: installed handler\n");
2844 }
2845 #endif /* linux && SIGIO */
2846
2847 #ifdef HAVE_NETWORKMANAGER_SUPPORT
2848 static void networkmanager_state_change_cb(DBusGProxy *proxy, gchar *dev,
2849                                          gpointer data)
2850 {
2851         MainWindow *mainWin;
2852
2853         mainWin = NULL;
2854         if (static_mainwindow)
2855                 mainWin = static_mainwindow;
2856         else if (data)
2857                 mainWin = (MainWindow*)data;
2858         
2859         if (!prefs_common.use_networkmanager)
2860                 return;
2861
2862         if (mainWin) {
2863                 GError *error = NULL;
2864                 gboolean online;
2865
2866                 online = networkmanager_is_online(&error);
2867                 if(!error) {
2868                         if(online && went_offline_nm) {
2869                                 went_offline_nm = FALSE;
2870                                 main_window_toggle_work_offline(mainWin, FALSE, FALSE);
2871                                 debug_print("NetworkManager: Went online\n");
2872                                 log_message(LOG_PROTOCOL, _("NetworkManager: network is online.\n"));
2873                         }
2874                         else if(!online) {
2875                                 went_offline_nm = TRUE;
2876                                 main_window_toggle_work_offline(mainWin, TRUE, FALSE);
2877                                 debug_print("NetworkManager: Went offline\n");
2878                                 log_message(LOG_PROTOCOL, _("NetworkManager: network is offline.\n"));
2879                         }
2880                 }
2881                 else {
2882                         debug_print("Failed to get online information from NetworkManager: %s\n",
2883                                                          error->message);
2884                         g_error_free(error);
2885                 }
2886         }
2887         else
2888                 debug_print("NetworkManager: Cannot change connection state because "
2889                                                  "main window does not exist\n");
2890 }
2891
2892 /* Returns true (and sets error appropriately, if given) in case of error */
2893 gboolean networkmanager_is_online(GError **error)
2894 {
2895         DBusGConnection *connection;
2896         DBusGProxy *proxy;
2897         GError *tmp_error = NULL;
2898         gboolean retVal;
2899         guint32 state;
2900
2901         if (!prefs_common.use_networkmanager)
2902                 return TRUE;
2903
2904         tmp_error = NULL;
2905         proxy = NULL;
2906         connection = dbus_g_bus_get(DBUS_BUS_SYSTEM, &tmp_error);
2907
2908         if(!connection) {
2909                 /* If calling code doesn't do error checking, at least print some debug */
2910                 if((error == NULL) || (*error == NULL))
2911                         debug_print("Failed to open connection to system bus: %s\n",
2912                                                          tmp_error->message);
2913                 g_propagate_error(error, tmp_error);
2914                 return TRUE;
2915         }
2916
2917         proxy = dbus_g_proxy_new_for_name(connection,
2918                         "org.freedesktop.NetworkManager",
2919                         "/org/freedesktop/NetworkManager",
2920                         "org.freedesktop.NetworkManager");
2921
2922         retVal = dbus_g_proxy_call(proxy,"state",&tmp_error, G_TYPE_INVALID,
2923                         G_TYPE_UINT, &state, G_TYPE_INVALID);
2924
2925         if(proxy)
2926                 g_object_unref(proxy);
2927         if(connection)
2928                 dbus_g_connection_unref(connection);
2929
2930         if(!retVal) {
2931                 /* If calling code doesn't do error checking, at least print some debug */
2932                 if((error == NULL) || (*error == NULL))
2933                         debug_print("Failed to get state info from NetworkManager: %s\n",
2934                                                          tmp_error->message);
2935                 g_propagate_error(error, tmp_error);
2936                 return TRUE;
2937         }
2938 #if NM_CHECK_VERSION(0,8,992)
2939         return (state == NM_STATE_CONNECTED_LOCAL ||
2940                 state == NM_STATE_CONNECTED_SITE ||
2941                 state == NM_STATE_CONNECTED_GLOBAL ||
2942                 state == NM_STATE_UNKNOWN);
2943 #else
2944         return (state == NM_STATE_CONNECTED ||
2945                 state == NM_STATE_UNKNOWN);
2946 #endif
2947 }
2948 #endif