fix CID 1596595: Resource leaks, and CID 1596594: (CHECKED_RETURN)
[claws.git] / src / crash.c
1 /*
2  * Claws Mail -- a GTK based, lightweight, and fast e-mail client
3  * Copyright (C) 2002-2019 by 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 #endif
22
23 #ifdef CRASH_DIALOG
24
25 #include "defs.h"
26
27 #include <glib.h>
28 #include <glib/gi18n.h>
29 #include <gtk/gtk.h>
30 #include <stdio.h>
31 #include <stdlib.h>
32 #include <signal.h>
33 #include <time.h>
34 #include <sys/types.h>
35 #include <sys/wait.h>
36
37 #include <errno.h>
38 #include <fcntl.h>
39
40 #if HAVE_SYS_UTSNAME_H
41 #       include <sys/utsname.h>
42 #endif
43
44 #if defined(__GNU_LIBRARY__) && !defined(__UCLIBC__)
45 #       include <gnu/libc-version.h>
46 #endif
47
48 #include "main.h"
49 #include "claws.h"
50 #include "crash.h"
51 #include "file-utils.h"
52 #include "filesel.h"
53 #include "version.h"
54 #include "prefs_common.h"
55 #include "manage_window.h"
56
57 /*
58  * NOTE: the crash dialog is called when claws is not 
59  * initialized, so do not assume settings are available.
60  * for example, loading / creating pixmaps seems not 
61  * to be possible.
62  */
63
64 /***/
65
66 static GtkWidget        *crash_dialog_show              (const gchar *text, 
67                                                          const gchar *debug_output);
68 static void              crash_create_debugger_file     (void);
69 static void              crash_save_crash_log           (GtkButton *, const gchar *);
70 static void              crash_create_bug_report        (GtkButton *, const gchar *);
71 static void              crash_debug                    (unsigned long crash_pid, 
72                                                          gchar   *exe_image,
73                                                          GString *debug_output);
74 static gchar            *get_compiled_in_features   (void);
75 static gchar            *get_lib_version        (void);
76 static gchar            *get_operating_system       (void);
77 static gboolean          is_crash_dialog_allowed        (void);
78 static void              crash_handler                  (int sig);
79 static void              crash_cleanup_exit             (void);
80
81 /***/
82
83 static const gchar *DEBUG_SCRIPT = "thread all apply\nbt full\nkill\nq";
84
85 /***/
86
87 /*!
88  *\brief        install crash handlers
89  */
90 void crash_install_handlers(void)
91 {
92 #if CRASH_DIALOG 
93         sigset_t mask;
94
95         if (!is_crash_dialog_allowed()) return;
96
97         sigemptyset(&mask);
98
99 #ifdef SIGSEGV
100         signal(SIGSEGV, crash_handler);
101         sigaddset(&mask, SIGSEGV);
102 #endif
103         
104 #ifdef SIGFPE
105         signal(SIGFPE, crash_handler);
106         sigaddset(&mask, SIGFPE);
107 #endif
108
109 #ifdef SIGILL
110         signal(SIGILL, crash_handler);
111         sigaddset(&mask, SIGILL);
112 #endif
113
114 #ifdef SIGABRT
115         signal(SIGABRT, crash_handler);
116         sigaddset(&mask, SIGABRT);
117 #endif
118
119         sigprocmask(SIG_UNBLOCK, &mask, 0);
120 #endif /* CRASH_DIALOG */       
121 }
122
123 /***/
124
125 /*!
126  *\brief        crash dialog entry point 
127  */
128 void crash_main(const char *arg) 
129 {
130 #if CRASH_DIALOG 
131         gchar *text;
132         gchar **tokens;
133         unsigned long pid;
134         GString *output;
135
136         crash_create_debugger_file();
137         tokens = g_strsplit(arg, ",", 0);
138
139         pid = atol(tokens[0]);
140         text = g_strdup_printf(_("Claws Mail process (%ld) received signal %ld"),
141                                pid, atol(tokens[1]));
142
143         output = g_string_new("");     
144         crash_debug(pid, tokens[2], output);
145
146         /*
147          * try to get the settings
148          */
149         prefs_common_read_config();
150
151         crash_dialog_show(text, output->str);
152         g_string_free(output, TRUE);
153         g_free(text);
154         g_strfreev(tokens);
155 #endif /* CRASH_DIALOG */       
156 }
157
158 /*!
159  *\brief        show crash dialog
160  *
161  *\param        text Description
162  *\param        debug_output Output text by gdb
163  *
164  *\return       GtkWidget * Dialog widget
165  */
166 static GtkWidget *crash_dialog_show(const gchar *text, const gchar *debug_output)
167 {
168         GtkWidget *window1;
169         GtkWidget *vbox1;
170         GtkWidget *hbox1;
171         GtkWidget *label1;
172         GtkWidget *frame1;
173         GtkWidget *scrolledwindow1;
174         GtkWidget *text1;
175         GtkWidget *hbuttonbox3;
176         GtkWidget *hbuttonbox4;
177         GtkWidget *button3;
178         GtkWidget *button4;
179         GtkWidget *button5;
180         gchar     *crash_report;
181         GtkTextBuffer *buffer;
182         GtkTextIter iter;
183         gchar *features = get_compiled_in_features();
184         gchar *os = get_operating_system();
185         gchar *lversion = get_lib_version();    
186
187         window1 = gtkut_window_new(GTK_WINDOW_TOPLEVEL, "crash");
188         gtk_container_set_border_width(GTK_CONTAINER(window1), 5);
189         gtk_window_set_title(GTK_WINDOW(window1), _("Claws Mail has crashed"));
190         gtk_window_set_position(GTK_WINDOW(window1), GTK_WIN_POS_CENTER);
191         gtk_window_set_type_hint(GTK_WINDOW(window1), GDK_WINDOW_TYPE_HINT_DIALOG);
192         gtk_window_set_modal(GTK_WINDOW(window1), TRUE);
193         gtk_window_set_default_size(GTK_WINDOW(window1), 460, 272);
194
195
196         vbox1 = gtk_box_new(GTK_ORIENTATION_VERTICAL, 2);
197         gtk_widget_show(vbox1);
198         gtk_container_add(GTK_CONTAINER(window1), vbox1);
199
200         hbox1 = gtk_box_new(GTK_ORIENTATION_HORIZONTAL, 4);
201         gtk_widget_show(hbox1);
202         gtk_box_pack_start(GTK_BOX(vbox1), hbox1, FALSE, TRUE, 0);
203         gtk_container_set_border_width(GTK_CONTAINER(hbox1), 4);
204
205         label1 = gtk_label_new
206             (g_strdup_printf(_("%s.\nPlease file a bug report and include the information below."), text));
207         gtk_widget_show(label1);
208         gtk_box_pack_start(GTK_BOX(hbox1), label1, TRUE, TRUE, 0);
209         gtk_label_set_xalign(GTK_LABEL(label1), 0.0);
210
211         frame1 = gtk_frame_new(_("Debug log"));
212         gtk_widget_show(frame1);
213         gtk_box_pack_start(GTK_BOX(vbox1), frame1, TRUE, TRUE, 0);
214
215         scrolledwindow1 = gtk_scrolled_window_new(NULL, NULL);
216         gtk_widget_show(scrolledwindow1);
217         gtk_container_add(GTK_CONTAINER(frame1), scrolledwindow1);
218         gtk_container_set_border_width(GTK_CONTAINER(scrolledwindow1), 3);
219         gtk_scrolled_window_set_policy(GTK_SCROLLED_WINDOW(scrolledwindow1),
220                                        GTK_POLICY_NEVER, GTK_POLICY_AUTOMATIC);
221
222         text1 = gtk_text_view_new();
223         gtk_text_view_set_editable(GTK_TEXT_VIEW(text1), FALSE);
224         gtk_widget_show(text1);
225         gtk_container_add(GTK_CONTAINER(scrolledwindow1), text1);
226
227         crash_report = g_strdup_printf(
228                 "Claws Mail version %s\n"
229                 "GTK version %d.%d.%d / GLib %d.%d.%d\n"
230                 "Locale: %s (charset: %s)\n"
231                 "Features:%s\n"
232                 "Operating system: %s\n"
233                 "C Library: %s\n--\n%s",
234                 VERSION,
235                 gtk_major_version, gtk_minor_version, gtk_micro_version,
236                 glib_major_version, glib_minor_version, glib_micro_version,
237                 conv_get_current_locale(), conv_get_locale_charset_str(),
238                 features, os, lversion, debug_output);
239         g_free(features);
240         g_free(os);
241         g_free(lversion);
242
243         buffer = gtk_text_view_get_buffer(GTK_TEXT_VIEW(text1));
244         gtk_text_buffer_get_start_iter(buffer, &iter);
245         gtk_text_buffer_insert(buffer, &iter, crash_report, -1);
246
247         hbuttonbox3 = gtk_button_box_new(GTK_ORIENTATION_HORIZONTAL);
248         gtk_widget_show(hbuttonbox3);
249         gtk_box_pack_start(GTK_BOX(vbox1), hbuttonbox3, FALSE, FALSE, 0);
250
251         hbuttonbox4 = gtk_button_box_new(GTK_ORIENTATION_HORIZONTAL);
252         gtk_widget_show(hbuttonbox4);
253         gtk_box_pack_start(GTK_BOX(vbox1), hbuttonbox4, FALSE, FALSE, 0);
254
255         button3 = gtk_button_new_with_label(_("Close"));
256         gtk_widget_show(button3);
257         gtk_container_add(GTK_CONTAINER(hbuttonbox4), button3);
258         gtk_widget_set_can_default(button3, TRUE);
259
260         button4 = gtk_button_new_with_label(_("Save..."));
261         gtk_widget_show(button4);
262         gtk_container_add(GTK_CONTAINER(hbuttonbox4), button4);
263         gtk_widget_set_can_default(button4, TRUE);
264
265         button5 = gtk_button_new_with_label(_("Create bug report"));
266         gtk_widget_show(button5);
267         gtk_container_add(GTK_CONTAINER(hbuttonbox4), button5);
268         gtk_widget_set_can_default(button5, TRUE);
269         
270         g_signal_connect(G_OBJECT(window1), "delete_event",
271                          G_CALLBACK(gtk_main_quit), NULL);
272         g_signal_connect(G_OBJECT(button3),   "clicked",
273                          G_CALLBACK(gtk_main_quit), NULL);
274         g_signal_connect(G_OBJECT(button4), "clicked",
275                          G_CALLBACK(crash_save_crash_log), crash_report);
276         g_signal_connect(G_OBJECT(button5), "clicked",
277                          G_CALLBACK(crash_create_bug_report), NULL);
278
279         MANAGE_WINDOW_SIGNALS_CONNECT(window1);
280
281         gtk_widget_show(window1);
282
283         gtk_main();
284         return window1;
285 }
286
287
288 /*!
289  *\brief        create debugger script file in claws directory.
290  *              all the other options (creating temp files) looked too 
291  *              convoluted.
292  */
293 static void crash_create_debugger_file(void)
294 {
295         gchar *filespec = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, DEBUGGERRC, NULL);
296         
297         str_write_to_file(DEBUG_SCRIPT, filespec, TRUE);
298         g_free(filespec);
299 }
300
301 /*!
302  *\brief        saves crash log to a file
303  */
304 static void crash_save_crash_log(GtkButton *button, const gchar *text)
305 {
306         time_t timer;
307         struct tm *lt;
308         char buf[100];
309         struct tm buft;
310         gchar *filename;
311
312         timer = time(NULL);
313         lt = localtime_r(&timer, &buft);
314         strftime(buf, sizeof buf, "claws-crash-log-%Y-%m-%d-%H-%M-%S.txt", lt);
315         if (NULL != (filename = filesel_select_file_save(_("Save crash information"), buf))
316         &&  *filename)
317                 str_write_to_file(text, filename, TRUE);
318         g_free(filename);       
319 }
320
321 /*!
322  *\brief        create bug report (goes to Claws Mail bug tracker)      
323  */
324 static void crash_create_bug_report(GtkButton *button, const gchar *data)
325 {
326         open_uri(BUGZILLA_URI, prefs_common_get_uri_cmd());
327 }
328
329 /*!
330  *\brief        launches debugger and attaches it to crashed claws
331  */
332 static void crash_debug(unsigned long crash_pid, 
333                         gchar *exe_image,
334                         GString *debug_output)
335 {
336         int choutput[2];
337         pid_t pid;
338
339         if (pipe(choutput) == -1) {
340                 g_print("can't pipe - error %s", g_strerror(errno));
341                 return;
342         }
343
344         if (0 == (pid = fork())) {
345                 char *argp[10];
346                 char **argptr = argp;
347                 gchar *filespec = g_strconcat(get_rc_dir(), G_DIR_SEPARATOR_S, DEBUGGERRC, NULL);
348
349                 if (setgid(getgid()) != 0)
350                         perror("setgid");
351                 if (setuid(getuid()) != 0)
352                         perror("setuid");
353
354                 /*
355                  * setup debugger to attach to crashed claws
356                  */
357                 *argptr++ = "gdb"; 
358                 *argptr++ = "--nw";
359                 *argptr++ = "--nx";
360                 *argptr++ = "--quiet";
361                 *argptr++ = "--batch";
362                 *argptr++ = "-x";
363                 *argptr++ = filespec;
364                 *argptr++ = exe_image;
365                 *argptr++ = g_strdup_printf("%ld", crash_pid);
366                 *argptr   = NULL;
367
368                 /*
369                  * redirect output to write end of pipe
370                  */
371                 close(1);
372                 if (dup(choutput[1]) < 0)
373                         perror("dup");
374                 close(choutput[0]);
375                 if (-1 == execvp("gdb", argp)) 
376                         perror("execvp");
377         } else {
378                 char buf[100];
379                 int r;
380         
381                 waitpid(pid, NULL, 0);
382
383                 /*
384                  * make it non blocking
385                  */
386                 if (-1 == fcntl(choutput[0], F_SETFL, O_NONBLOCK))
387                         g_print("set to non blocking failed\n");
388
389                 /*
390                  * get the output
391                  */
392                 do {
393                         r = read(choutput[0], buf, sizeof buf - 1);
394                         if (r > 0) {
395                                 buf[r] = 0;
396                                 g_string_append(debug_output, buf);
397                         }
398                 } while (r > 0);
399                 
400                 close(choutput[0]);
401                 close(choutput[1]);
402                 
403                 /*
404                  * kill the process we attached to
405                  */
406                 kill(crash_pid, SIGCONT); 
407         }
408 }
409
410 /***/
411
412 /*!
413  *\brief        features
414  */
415 static gchar *get_compiled_in_features(void)
416 {
417         return g_strdup_printf("%s",
418 #if INET6
419                    " IPv6"
420 #endif
421 #if HAVE_ICONV
422                    " iconv"
423 #endif
424 #if HAVE_LIBCOMPFACE
425                    " compface"
426 #endif
427 #if USE_GNUTLS
428                    " GnuTLS"
429 #endif
430 #if USE_LDAP
431                    " LDAP"
432 #endif
433 #if USE_JPILOT
434                    " JPilot"
435 #endif
436 #if USE_ENCHANT
437                    " GNU/aspell"
438 #endif
439 #if HAVE_LIBETPAN
440                    " libetpan"
441 #endif
442 #if HAVE_LIBSM
443                    " libSM"
444 #endif
445         "");
446 }
447
448 /***/
449
450 /*!
451  *\brief        library version
452  */
453 static gchar *get_lib_version(void)
454 {
455 #if defined(__UCLIBC__)
456         return g_strdup_printf("uClibc %i.%i.%i", __UCLIBC_MAJOR__, __UCLIBC_MINOR__, __UCLIBC_SUBLEVEL__);
457 #elif defined(__GNU_LIBRARY__)
458         return g_strdup_printf("GNU libc %s", gnu_get_libc_version());
459 #else
460         return g_strdup(_("Unknown"));
461 #endif
462 }
463
464 /***/
465
466 /*!
467  *\brief        operating system
468  */
469 static gchar *get_operating_system(void)
470 {
471 #if HAVE_SYS_UTSNAME_H
472         struct utsname utsbuf;
473         uname(&utsbuf);
474         return g_strdup_printf("%s %s (%s)",
475                                utsbuf.sysname,
476                                utsbuf.release,
477                                utsbuf.machine);
478 #else
479         return g_strdup(_("Unknown"));
480         
481 #endif
482 }
483
484 /***/
485
486 /*!
487  *\brief        see if the crash dialog is allowed (because some
488  *              developers may prefer to run Claws Mail under gdb...)
489  */
490 static gboolean is_crash_dialog_allowed(void)
491 {
492         return !g_getenv("CLAWS_NO_CRASH");
493 }
494
495 /*!
496  *\brief        this handler will probably evolve into 
497  *              something better.
498  */
499 static void crash_handler(int sig)
500 {
501         pid_t pid;
502         static volatile unsigned long crashed_ = 0;
503
504         /*
505          * let's hope argv0 aren't trashed.
506          * both are defined in main.c.
507          */
508         extern gchar *argv0;
509
510
511         /*
512          * besides guarding entrancy it's probably also better 
513          * to mask off signals
514          */
515         if (crashed_) return;
516
517         crashed_++;
518
519 #ifdef SIGTERM
520         if (sig == SIGTERM) 
521                 clean_quit(NULL);
522 #endif
523
524         /*
525          * gnome ungrabs focus, and flushes gdk. mmmh, good idea.
526          */
527         gdk_pointer_ungrab(GDK_CURRENT_TIME);
528         gdk_keyboard_ungrab(GDK_CURRENT_TIME);
529         gdk_flush();
530
531         if (0 == (pid = fork())) {
532                 char buf[50];
533                 char *args[5];
534         
535                 /*
536                  * probably also some other parameters (like GTK ones).
537                  * also we pass the full startup dir and the real command
538                  * line typed in (argv0)
539                  */
540                 args[0] = argv0; 
541                 args[1] = "--debug";
542                 args[2] = "--crash";
543                 sprintf(buf, "%d,%d,%s", getppid(), sig, argv0);
544                 args[3] = buf;
545                 args[4] = NULL;
546
547                 if (chdir(claws_get_startup_dir()) != 0)
548                         FILE_OP_ERROR(claws_get_startup_dir(), "chdir");
549                 if (setgid(getgid()) != 0)
550                         perror("setgid");
551                 if (setuid(getuid()) != 0 )
552                         perror("setuid");
553                 execvp(argv0, args);
554                 perror("execvp");
555         } else {
556                 waitpid(pid, NULL, 0);
557                 crash_cleanup_exit();
558                 _exit(253);
559         }
560
561         _exit(253);
562 }
563
564 /*!
565  *\brief        put all the things here we can do before
566  *              letting the program die
567  */
568 static void crash_cleanup_exit(void)
569 {
570         const char *filename = claws_get_socket_name();
571         claws_unlink(filename);
572 }
573
574 #endif