Addl fix #397: GPU acceleration
[geeqie.git] / src / main.c
1 /*
2  * Copyright (C) 2006 John Ellis
3  * Copyright (C) 2008 - 2016 The Geeqie Team
4  *
5  * Author: John Ellis
6  *
7  * This program is free software; you can redistribute it and/or modify
8  * it under the terms of the GNU General Public License as published by
9  * the Free Software Foundation; either version 2 of the License, or
10  * (at your option) any later version.
11  *
12  * This program is distributed in the hope that it will be useful,
13  * but WITHOUT ANY WARRANTY; without even the implied warranty of
14  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
15  * GNU General Public License for more details.
16  *
17  * You should have received a copy of the GNU General Public License along
18  * with this program; if not, write to the Free Software Foundation, Inc.,
19  * 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA.
20  */
21
22 #include <gdk/gdkkeysyms.h> /* for keyboard values */
23
24 #include <signal.h>
25 #include <sys/mman.h>
26
27 #include <math.h>
28 #ifdef G_OS_UNIX
29 #include <pwd.h>
30 #endif
31 #include <locale.h>
32
33 #include "main.h"
34
35 #include "cache.h"
36 #include "collect.h"
37 #include "collect-io.h"
38 #include "filedata.h"
39 #include "filefilter.h"
40 #include "history_list.h"
41 #include "image-overlay.h"
42 #include "layout.h"
43 #include "layout_image.h"
44 #include "layout_util.h"
45 #include "options.h"
46 #include "remote.h"
47 #include "secure_save.h"
48 #include "similar.h"
49 #include "ui_fileops.h"
50 #include "ui_utildlg.h"
51 #include "cache_maint.h"
52 #include "thumb.h"
53 #include "metadata.h"
54 #include "editors.h"
55 #include "exif.h"
56 #include "histogram.h"
57 #include "pixbuf_util.h"
58 #include "glua.h"
59
60 #ifdef HAVE_CLUTTER
61 #include <clutter-gtk/clutter-gtk.h>
62 #endif
63
64 #ifdef HAVE_GTHREAD
65 /* FIXME: see below */
66 #include <X11/Xlib.h>
67 #endif
68
69 gboolean thumb_format_changed = FALSE;
70 static RemoteConnection *remote_connection = NULL;
71
72 /*
73  *-----------------------------------------------------------------------------
74  * keyboard functions
75  *-----------------------------------------------------------------------------
76  */
77
78 void keyboard_scroll_calc(gint *x, gint *y, GdkEventKey *event)
79 {
80         static gint delta = 0;
81         static guint32 time_old = 0;
82         static guint keyval_old = 0;
83
84         if (event->state & GDK_CONTROL_MASK)
85                 {
86                 if (*x < 0) *x = G_MININT / 2;
87                 if (*x > 0) *x = G_MAXINT / 2;
88                 if (*y < 0) *y = G_MININT / 2;
89                 if (*y > 0) *y = G_MAXINT / 2;
90
91                 return;
92                 }
93
94         if (options->progressive_key_scrolling)
95                 {
96                 guint32 time_diff;
97
98                 time_diff = event->time - time_old;
99
100                 /* key pressed within 125ms ? (1/8 second) */
101                 if (time_diff > 125 || event->keyval != keyval_old) delta = 0;
102
103                 time_old = event->time;
104                 keyval_old = event->keyval;
105
106                 delta += 2;
107                 }
108         else
109                 {
110                 delta = 8;
111                 }
112
113         *x = *x * delta * options->keyboard_scroll_step;
114         *y = *y * delta * options->keyboard_scroll_step;
115 }
116
117
118
119 /*
120  *-----------------------------------------------------------------------------
121  * command line parser (private) hehe, who needs popt anyway?
122  *-----------------------------------------------------------------------------
123  */
124
125 static void parse_command_line_add_file(const gchar *file_path, gchar **path, gchar **file,
126                                         GList **list, GList **collection_list)
127 {
128         gchar *path_parsed;
129
130         path_parsed = g_strdup(file_path);
131         parse_out_relatives(path_parsed);
132
133         if (file_extension_match(path_parsed, GQ_COLLECTION_EXT))
134                 {
135                 *collection_list = g_list_append(*collection_list, path_parsed);
136                 }
137         else
138                 {
139                 if (!*path) *path = remove_level_from_path(path_parsed);
140                 if (!*file) *file = g_strdup(path_parsed);
141                 *list = g_list_prepend(*list, file_data_new_group(path_parsed));
142                 }
143 }
144
145 static void parse_command_line_add_dir(const gchar *dir, gchar **path, gchar **file,
146                                        GList **list)
147 {
148 #if 0
149         /* This is broken because file filter is not initialized yet.
150         */
151         GList *files;
152         gchar *path_parsed;
153         FileData *dir_fd;
154
155         path_parsed = g_strdup(dir);
156         parse_out_relatives(path_parsed);
157         dir_fd = file_data_new_dir(path_parsed);
158
159
160         if (filelist_read(dir_fd, &files, NULL))
161                 {
162                 GList *work;
163
164                 files = filelist_filter(files, FALSE);
165                 files = filelist_sort_path(files);
166
167                 work = files;
168                 while (work)
169                         {
170                         FileData *fd = work->data;
171                         if (!*path) *path = remove_level_from_path(fd->path);
172                         if (!*file) *file = g_strdup(fd->path);
173                         *list = g_list_prepend(*list, fd);
174
175                         work = work->next;
176                         }
177
178                 g_list_free(files);
179                 }
180
181         g_free(path_parsed);
182         file_data_unref(dir_fd);
183 #else
184         DEBUG_1("multiple directories specified, ignoring: %s", dir);
185 #endif
186 }
187
188 static void parse_command_line_process_dir(const gchar *dir, gchar **path, gchar **file,
189                                            GList **list, gchar **first_dir)
190 {
191
192         if (!*list && !*first_dir)
193                 {
194                 *first_dir = g_strdup(dir);
195                 }
196         else
197                 {
198                 if (*first_dir)
199                         {
200                         parse_command_line_add_dir(*first_dir, path, file, list);
201                         g_free(*first_dir);
202                         *first_dir = NULL;
203                         }
204                 parse_command_line_add_dir(dir, path, file, list);
205                 }
206 }
207
208 static void parse_command_line_process_file(const gchar *file_path, gchar **path, gchar **file,
209                                             GList **list, GList **collection_list, gchar **first_dir)
210 {
211
212         if (*first_dir)
213                 {
214                 parse_command_line_add_dir(*first_dir, path, file, list);
215                 g_free(*first_dir);
216                 *first_dir = NULL;
217                 }
218         parse_command_line_add_file(file_path, path, file, list, collection_list);
219 }
220
221 static void parse_command_line(gint argc, gchar *argv[])
222 {
223         GList *list = NULL;
224         GList *remote_list = NULL;
225         GList *remote_errors = NULL;
226         gboolean remote_do = FALSE;
227         gchar *first_dir = NULL;
228         gchar *app_lock;
229         gchar *pwd;
230         gchar *current_dir;
231         gchar *geometry = NULL;
232
233         command_line = g_new0(CommandLine, 1);
234
235         command_line->argc = argc;
236         command_line->argv = argv;
237         command_line->regexp = NULL;
238
239         if (argc > 1)
240                 {
241                 gint i;
242                 gchar *base_dir = get_current_dir();
243                 i = 1;
244                 while (i < argc)
245                         {
246                         gchar *cmd_line = path_to_utf8(argv[i]);
247                         gchar *cmd_all = g_build_filename(base_dir, cmd_line, NULL);
248
249                         if (cmd_line[0] == G_DIR_SEPARATOR && isdir(cmd_line))
250                                 {
251                                 parse_command_line_process_dir(cmd_line, &command_line->path, &command_line->file, &list, &first_dir);
252                                 }
253                         else if (isdir(cmd_all))
254                                 {
255                                 parse_command_line_process_dir(cmd_all, &command_line->path, &command_line->file, &list, &first_dir);
256                                 }
257                         else if (cmd_line[0] == G_DIR_SEPARATOR && isfile(cmd_line))
258                                 {
259                                 parse_command_line_process_file(cmd_line, &command_line->path, &command_line->file,
260                                                                 &list, &command_line->collection_list, &first_dir);
261                                 }
262                         else if (isfile(cmd_all))
263                                 {
264                                 parse_command_line_process_file(cmd_all, &command_line->path, &command_line->file,
265                                                                 &list, &command_line->collection_list, &first_dir);
266                                 }
267                         else if (download_web_file(cmd_line, FALSE, NULL))
268                                 {
269                                 }
270                         else if (is_collection(cmd_line))
271                                 {
272                                 gchar *path = NULL;
273
274                                 path = collection_path(cmd_line);
275                                 parse_command_line_process_file(path, &command_line->path, &command_line->file,
276                                                                 &list, &command_line->collection_list, &first_dir);
277                                 g_free(path);
278                                 }
279                         else if (strncmp(cmd_line, "--debug", 7) == 0 && (cmd_line[7] == '\0' || cmd_line[7] == '='))
280                                 {
281                                 /* do nothing but do not produce warnings */
282                                 }
283                         else if (strcmp(cmd_line, "+t") == 0 ||
284                                  strcmp(cmd_line, "--with-tools") == 0)
285                                 {
286                                 command_line->tools_show = TRUE;
287
288                                 remote_list = g_list_append(remote_list, "+t");
289                                 }
290                         else if (strcmp(cmd_line, "-t") == 0 ||
291                                  strcmp(cmd_line, "--without-tools") == 0)
292                                 {
293                                 command_line->tools_hide = TRUE;
294
295                                 remote_list = g_list_append(remote_list, "-t");
296                                 }
297                         else if (strcmp(cmd_line, "-f") == 0 ||
298                                  strcmp(cmd_line, "--fullscreen") == 0)
299                                 {
300                                 command_line->startup_full_screen = TRUE;
301                                 }
302                         else if (strcmp(cmd_line, "-s") == 0 ||
303                                  strcmp(cmd_line, "--slideshow") == 0)
304                                 {
305                                 command_line->startup_in_slideshow = TRUE;
306                                 }
307                         else if (strcmp(cmd_line, "-l") == 0 ||
308                                  strcmp(cmd_line, "--list") == 0)
309                                 {
310                                 command_line->startup_command_line_collection = TRUE;
311                                 }
312                         else if (strncmp(cmd_line, "--geometry=", 11) == 0)
313                                 {
314                                 if (!command_line->geometry) command_line->geometry = g_strdup(cmd_line + 11);
315                                 }
316                         else if (strcmp(cmd_line, "-r") == 0 ||
317                                  strcmp(cmd_line, "--remote") == 0)
318                                 {
319                                 if (!remote_do)
320                                         {
321                                         remote_do = TRUE;
322                                         remote_list = remote_build_list(remote_list, argc - i, &argv[i], &remote_errors);
323                                         }
324                                 }
325                         else if ((strcmp(cmd_line, "+w") == 0) ||
326                                                 strcmp(cmd_line, "--show-log-window") == 0)
327                                 {
328                                 command_line->log_window_show = TRUE;
329                                 }
330                         else if (strncmp(cmd_line, "-o:", 3) == 0)
331                                 {
332                                 command_line->log_file = g_strdup(cmd_line + 3);
333                                 }
334                         else if (strncmp(cmd_line, "--log-file:", 11) == 0)
335                                 {
336                                 command_line->log_file = g_strdup(cmd_line + 11);
337                                 }
338                         else if (strncmp(cmd_line, "-g:", 3) == 0)
339                                 {
340                                 set_regexp(g_strdup(cmd_line+3));
341                                 }
342                         else if (strncmp(cmd_line, "-grep:", 6) == 0)
343                                 {
344                                 set_regexp(g_strdup(cmd_line+3));
345                                 }
346                         else if (strncmp(cmd_line, "-n", 2) == 0)
347                                 {
348                                 command_line->new_instance = TRUE;
349                                 }
350                         else if (strncmp(cmd_line, "--new-instance", 14) == 0)
351                                 {
352                                 command_line->new_instance = TRUE;
353                                 }
354                         else if (strcmp(cmd_line, "-rh") == 0 ||
355                                  strcmp(cmd_line, "--remote-help") == 0)
356                                 {
357                                 remote_help();
358                                 exit(0);
359                                 }
360                         else if (strcmp(cmd_line, "--blank") == 0)
361                                 {
362                                 command_line->startup_blank = TRUE;
363                                 }
364                         else if (strcmp(cmd_line, "-v") == 0 ||
365                                  strcmp(cmd_line, "--version") == 0)
366                                 {
367                                 printf_term(FALSE, "%s %s\n", GQ_APPNAME, VERSION);
368                                 exit(0);
369                                 }
370                         else if (strcmp(cmd_line, "--alternate") == 0)
371                                 {
372                                 /* enable faster experimental algorithm */
373                                 log_printf("Alternate similarity algorithm enabled\n");
374                                 image_sim_alternate_set(TRUE);
375                                 }
376                         else if (strcmp(cmd_line, "-h") == 0 ||
377                                  strcmp(cmd_line, "--help") == 0)
378                                 {
379                                 printf_term(FALSE, "%s %s\n", GQ_APPNAME, VERSION);
380                                 printf_term(FALSE, _("Usage: %s [options] [path]\n\n"), GQ_APPNAME_LC);
381                                 print_term(FALSE, _("valid options are:\n"));
382                                 print_term(FALSE, _("  +t, --with-tools                 force show of tools\n"));
383                                 print_term(FALSE, _("  -t, --without-tools              force hide of tools\n"));
384                                 print_term(FALSE, _("  -f, --fullscreen                 start in full screen mode\n"));
385                                 print_term(FALSE, _("  -s, --slideshow                  start in slideshow mode\n"));
386                                 print_term(FALSE, _("  -l, --list [files] [collections] open collection window for command line\n"));
387                                 print_term(FALSE, _("      --blank                      start with blank file list\n"));
388                                 print_term(FALSE, _("      --geometry=XxY+XOFF+YOFF     set main window location\n"));
389                                 print_term(FALSE, _("  -n, --new-instance               open a new instance of Geeqie\n"));
390                                 print_term(FALSE, _("  -r, --remote                     send following commands to open window\n"));
391                                 print_term(FALSE, _("  -rh,--remote-help                print remote command list\n"));
392 #ifdef DEBUG
393                                 print_term(FALSE, _("      --debug[=level]              turn on debug output\n"));
394                                 print_term(FALSE, _("  -g:<regexp>, --grep:<regexp>     filter debug output\n"));
395 #endif
396                                 print_term(FALSE, _("  +w, --show-log-window            show log window\n"));
397                                 print_term(FALSE, _("  -o:<file>, --log-file:<file>     save log data to file\n"));
398                                 print_term(FALSE, _("  -v, --version                    print version info\n"));
399                                 print_term(FALSE, _("  -h, --help                       show this message\n\n"));
400
401 #if 0
402                                 /* these options are not officially supported!
403                                  * only for testing new features, no need to translate them */
404                                 print_term(FALSE, "  --alternate                use alternate similarity algorithm\n");
405 #endif
406
407
408                                 exit(0);
409                                 }
410                         else if (!remote_do)
411                                 {
412                                 printf_term(TRUE, _("invalid or ignored: %s\nUse --help for options\n"), cmd_line);
413                                 }
414
415                         g_free(cmd_all);
416                         g_free(cmd_line);
417                         i++;
418                         }
419                 g_free(base_dir);
420                 parse_out_relatives(command_line->path);
421                 parse_out_relatives(command_line->file);
422                 }
423
424         list = g_list_reverse(list);
425
426         if (!command_line->path && first_dir)
427                 {
428                 command_line->path = first_dir;
429                 first_dir = NULL;
430
431                 parse_out_relatives(command_line->path);
432                 }
433         g_free(first_dir);
434
435         if (!command_line->new_instance)
436                 {
437                 /* If Geeqie is already running, prevent a second instance
438                  * from being started. Open a new window instead.
439                  */
440                 app_lock = g_build_filename(get_rc_dir(), ".command", NULL);
441                 if (remote_server_exists(app_lock) && !remote_do)
442                         {
443                         remote_do = TRUE;
444                         if (command_line->geometry)
445                                 {
446                                 geometry = g_strdup_printf("--geometry=%s", command_line->geometry);
447                                 remote_list = g_list_prepend(remote_list, geometry);
448                                 }
449                         remote_list = g_list_prepend(remote_list, "--new-window");
450                 }
451                 g_free(app_lock);
452                 }
453
454         if (remote_do)
455                 {
456                 if (remote_errors)
457                         {
458                         GList *work = remote_errors;
459
460                         printf_term(TRUE,_("Invalid or ignored remote options: "));
461                         while (work)
462                                 {
463                                 gchar *opt = work->data;
464
465                                 printf_term(TRUE, "%s%s", (work == remote_errors) ? "" : ", ", opt);
466                                 work = work->next;
467                                 }
468
469                         printf_term(TRUE, _("\nUse --remote-help for valid remote options.\n"));
470                         }
471
472                 /* prepend the current dir the remote command was made from,
473                  * for use by any remote command that needs it
474                  */
475                 current_dir = g_get_current_dir();
476                 pwd = g_strconcat("--PWD:", current_dir, NULL);
477                 remote_list = g_list_prepend(remote_list, pwd);
478
479                 remote_control(argv[0], remote_list, command_line->path, list, command_line->collection_list);
480                 g_free(pwd);
481                 g_free(current_dir);
482                 }
483         g_free(geometry);
484         g_list_free(remote_list);
485
486         if (list && list->next)
487                 {
488                 command_line->cmd_list = list;
489                 }
490         else
491                 {
492                 filelist_free(list);
493                 command_line->cmd_list = NULL;
494                 }
495
496         if (command_line->startup_blank)
497                 {
498                 g_free(command_line->path);
499                 command_line->path = NULL;
500                 g_free(command_line->file);
501                 command_line->file = NULL;
502                 filelist_free(command_line->cmd_list);
503                 command_line->cmd_list = NULL;
504                 string_list_free(command_line->collection_list);
505                 command_line->collection_list = NULL;
506                 }
507 }
508
509 static void parse_command_line_for_debug_option(gint argc, gchar *argv[])
510 {
511 #ifdef DEBUG
512         const gchar *debug_option = "--debug";
513         gint len = strlen(debug_option);
514
515         if (argc > 1)
516                 {
517                 gint i;
518
519                 for (i = 1; i < argc; i++)
520                         {
521                         const gchar *cmd_line = argv[i];
522                         if (strncmp(cmd_line, debug_option, len) == 0)
523                                 {
524                                 gint cmd_line_len = strlen(cmd_line);
525
526                                 /* we now increment the debug state for verbosity */
527                                 if (cmd_line_len == len)
528                                         debug_level_add(1);
529                                 else if (cmd_line[len] == '=' && g_ascii_isdigit(cmd_line[len+1]))
530                                         {
531                                         gint n = atoi(cmd_line + len + 1);
532                                         if (n < 0) n = 1;
533                                         debug_level_add(n);
534                                         }
535                                 }
536                         }
537                 }
538
539         DEBUG_1("debugging output enabled (level %d)", get_debug_level());
540 #endif
541 }
542
543 /*
544  *-----------------------------------------------------------------------------
545  * startup, init, and exit
546  *-----------------------------------------------------------------------------
547  */
548
549 #define RC_HISTORY_NAME "history"
550 #define RC_MARKS_NAME "marks"
551
552 static void setup_env_path(void)
553 {
554         const gchar *old_path = g_getenv("PATH");
555         gchar *path = g_strconcat(GQ_BIN_DIR, ":", old_path, NULL);
556         g_setenv("PATH", path, TRUE);
557         g_free(path);
558 }
559
560 static void keys_load(void)
561 {
562         gchar *path;
563
564         path = g_build_filename(get_rc_dir(), RC_HISTORY_NAME, NULL);
565         history_list_load(path);
566         g_free(path);
567 }
568
569 static void keys_save(void)
570 {
571         gchar *path;
572
573         path = g_build_filename(get_rc_dir(), RC_HISTORY_NAME, NULL);
574         history_list_save(path);
575         g_free(path);
576 }
577
578 static void marks_load(void)
579 {
580         gchar *path;
581
582         path = g_build_filename(get_rc_dir(), RC_MARKS_NAME, NULL);
583         marks_list_load(path);
584         g_free(path);
585 }
586
587 static void marks_save(gboolean save)
588 {
589         gchar *path;
590
591         path = g_build_filename(get_rc_dir(), RC_MARKS_NAME, NULL);
592         marks_list_save(path, save);
593         g_free(path);
594 }
595
596 static void mkdir_if_not_exists(const gchar *path)
597 {
598         if (isdir(path)) return;
599
600         log_printf(_("Creating %s dir:%s\n"), GQ_APPNAME, path);
601
602         if (!recursive_mkdir_if_not_exists(path, 0755))
603                 {
604                 log_printf(_("Could not create dir:%s\n"), path);
605                 }
606 }
607
608
609 /* We add to duplicate and modify  gtk_accel_map_print() and gtk_accel_map_save()
610  * to improve the reliability in special cases (especially when disk is full)
611  * These functions are now using secure saving stuff.
612  */
613 static void gq_accel_map_print(
614                     gpointer    data,
615                     const gchar *accel_path,
616                     guint       accel_key,
617                     GdkModifierType accel_mods,
618                     gboolean    changed)
619 {
620         GString *gstring = g_string_new(changed ? NULL : "; ");
621         SecureSaveInfo *ssi = data;
622         gchar *tmp, *name;
623
624         g_string_append(gstring, "(gtk_accel_path \"");
625
626         tmp = g_strescape(accel_path, NULL);
627         g_string_append(gstring, tmp);
628         g_free(tmp);
629
630         g_string_append(gstring, "\" \"");
631
632         name = gtk_accelerator_name(accel_key, accel_mods);
633         tmp = g_strescape(name, NULL);
634         g_free(name);
635         g_string_append(gstring, tmp);
636         g_free(tmp);
637
638         g_string_append(gstring, "\")\n");
639
640         secure_fwrite(gstring->str, sizeof(*gstring->str), gstring->len, ssi);
641
642         g_string_free(gstring, TRUE);
643 }
644
645 static gboolean gq_accel_map_save(const gchar *path)
646 {
647         gchar *pathl;
648         SecureSaveInfo *ssi;
649         GString *gstring;
650
651         pathl = path_from_utf8(path);
652         ssi = secure_open(pathl);
653         g_free(pathl);
654         if (!ssi)
655                 {
656                 log_printf(_("error saving file: %s\n"), path);
657                 return FALSE;
658                 }
659
660         gstring = g_string_new("; ");
661         if (g_get_prgname())
662                 g_string_append(gstring, g_get_prgname());
663         g_string_append(gstring, " GtkAccelMap rc-file         -*- scheme -*-\n");
664         g_string_append(gstring, "; this file is an automated accelerator map dump\n");
665         g_string_append(gstring, ";\n");
666
667         secure_fwrite(gstring->str, sizeof(*gstring->str), gstring->len, ssi);
668
669         g_string_free(gstring, TRUE);
670
671         gtk_accel_map_foreach((gpointer) ssi, gq_accel_map_print);
672
673         if (secure_close(ssi))
674                 {
675                 log_printf(_("error saving file: %s\nerror: %s\n"), path,
676                            secsave_strerror(secsave_errno));
677                 return FALSE;
678                 }
679
680         return TRUE;
681 }
682
683 static gchar *accep_map_filename(void)
684 {
685         return g_build_filename(get_rc_dir(), "accels", NULL);
686 }
687
688 static void accel_map_save(void)
689 {
690         gchar *path;
691
692         path = accep_map_filename();
693         gq_accel_map_save(path);
694         g_free(path);
695 }
696
697 static void accel_map_load(void)
698 {
699         gchar *path;
700         gchar *pathl;
701
702         path = accep_map_filename();
703         pathl = path_from_utf8(path);
704         gtk_accel_map_load(pathl);
705         g_free(pathl);
706         g_free(path);
707 }
708
709 static void gtkrc_load(void)
710 {
711         gchar *path;
712         gchar *pathl;
713
714         /* If a gtkrc file exists in the rc directory, add it to the
715          * list of files to be parsed at the end of gtk_init() */
716         path = g_build_filename(get_rc_dir(), "gtkrc", NULL);
717         pathl = path_from_utf8(path);
718         if (access(pathl, R_OK) == 0)
719                 gtk_rc_add_default_file(pathl);
720         g_free(pathl);
721         g_free(path);
722 }
723
724 static void exit_program_final(void)
725 {
726         LayoutWindow *lw = NULL;
727
728          /* make sure that external editors are loaded, we would save incomplete configuration otherwise */
729         layout_editors_reload_finish();
730
731         remote_close(remote_connection);
732
733         collect_manager_flush();
734
735         save_options(options);
736         keys_save();
737         accel_map_save();
738
739         if (layout_valid(&lw))
740                 {
741                 layout_free(lw);
742                 }
743
744         secure_close(command_line->ssi);
745
746         gtk_main_quit();
747 }
748
749 static GenericDialog *exit_dialog = NULL;
750
751 static void exit_confirm_cancel_cb(GenericDialog *gd, gpointer data)
752 {
753         exit_dialog = NULL;
754         generic_dialog_close(gd);
755 }
756
757 static void exit_confirm_exit_cb(GenericDialog *gd, gpointer data)
758 {
759         exit_dialog = NULL;
760         generic_dialog_close(gd);
761         exit_program_final();
762 }
763
764 static gint exit_confirm_dlg(void)
765 {
766         GtkWidget *parent;
767         LayoutWindow *lw;
768         gchar *msg;
769
770         if (exit_dialog)
771                 {
772                 gtk_window_present(GTK_WINDOW(exit_dialog->dialog));
773                 return TRUE;
774                 }
775
776         if (!collection_window_modified_exists()) return FALSE;
777
778         parent = NULL;
779         lw = NULL;
780         if (layout_valid(&lw))
781                 {
782                 parent = lw->window;
783                 }
784
785         msg = g_strdup_printf("%s - %s", GQ_APPNAME, _("exit"));
786         exit_dialog = generic_dialog_new(msg,
787                                 "exit", parent, FALSE,
788                                 exit_confirm_cancel_cb, NULL);
789         g_free(msg);
790         msg = g_strdup_printf(_("Quit %s"), GQ_APPNAME);
791         generic_dialog_add_message(exit_dialog, GTK_STOCK_DIALOG_QUESTION,
792                                    msg, _("Collections have been modified. Quit anyway?"), TRUE);
793         g_free(msg);
794         generic_dialog_add_button(exit_dialog, GTK_STOCK_QUIT, NULL, exit_confirm_exit_cb, TRUE);
795
796         gtk_widget_show(exit_dialog->dialog);
797
798         return TRUE;
799 }
800
801 static void exit_program_write_metadata_cb(gint success, const gchar *dest_path, gpointer data)
802 {
803         if (success) exit_program();
804 }
805
806 void exit_program(void)
807 {
808         layout_image_full_screen_stop(NULL);
809
810         if (metadata_write_queue_confirm(FALSE, exit_program_write_metadata_cb, NULL)) return;
811
812         options->marks_save ? marks_save(TRUE) : marks_save(FALSE);
813
814         if (exit_confirm_dlg()) return;
815
816         exit_program_final();
817 }
818
819 /* This code is supposed to handle situation when a file mmaped by image_loader
820  * or by exif loader is truncated by some other process.
821  * This is probably not completely correct according to posix, because
822  * mmap is not in the list of calls that can be used safely in signal handler,
823  * but anyway, the handler is called in situation when the application would
824  * crash otherwise.
825  * Ideas for improvement are welcome ;)
826  */
827 /* FIXME: this probably needs some better ifdefs. Please report any compilation problems */
828
829 #if defined(SIGBUS) && defined(SA_SIGINFO)
830 static void sigbus_handler_cb(int signum, siginfo_t *info, void *context)
831 {
832         unsigned long pagesize = sysconf(_SC_PAGE_SIZE);
833         DEBUG_1("SIGBUS %p", info->si_addr);
834         mmap((void *)(((unsigned long)info->si_addr / pagesize) * pagesize), pagesize, PROT_READ | PROT_WRITE, MAP_FIXED | MAP_PRIVATE | MAP_ANONYMOUS, -1, 0);
835 }
836 #endif
837
838 static void setup_sigbus_handler(void)
839 {
840 #if defined(SIGBUS) && defined(SA_SIGINFO)
841         struct sigaction sigbus_action;
842         sigfillset(&sigbus_action.sa_mask);
843         sigbus_action.sa_sigaction = sigbus_handler_cb;
844         sigbus_action.sa_flags = SA_SIGINFO;
845
846         sigaction(SIGBUS, &sigbus_action, NULL);
847 #endif
848 }
849
850 gint main(gint argc, gchar *argv[])
851 {
852         CollectionData *first_collection = NULL;
853         gchar *buf;
854         CollectionData *cd = NULL;
855
856 #ifdef HAVE_GTHREAD
857 #if !GLIB_CHECK_VERSION(2,32,0)
858         g_thread_init(NULL);
859 #endif
860 #ifdef HAVE_CLUTTER
861 /* FIXME: see below */
862         putenv("LIBGL_ALWAYS_INDIRECT=1");
863         XInitThreads();
864 #endif
865         gdk_threads_init();
866         gdk_threads_enter();
867
868 #endif
869
870         /* init execution time counter (debug only) */
871         init_exec_time();
872
873         /* setup locale, i18n */
874         setlocale(LC_ALL, "");
875
876 #ifdef ENABLE_NLS
877         bindtextdomain(PACKAGE, GQ_LOCALEDIR);
878         bind_textdomain_codeset(PACKAGE, "UTF-8");
879         textdomain(PACKAGE);
880 #endif
881
882         exif_init();
883
884 #ifdef HAVE_LUA
885         lua_init();
886 #endif
887
888         /* setup random seed for random slideshow */
889         srand(time(NULL));
890
891         setup_sigbus_handler();
892
893         /* register global notify functions */
894         file_data_register_notify_func(cache_notify_cb, NULL, NOTIFY_PRIORITY_HIGH);
895         file_data_register_notify_func(thumb_notify_cb, NULL, NOTIFY_PRIORITY_HIGH);
896         file_data_register_notify_func(histogram_notify_cb, NULL, NOTIFY_PRIORITY_HIGH);
897         file_data_register_notify_func(collect_manager_notify_cb, NULL, NOTIFY_PRIORITY_LOW);
898         file_data_register_notify_func(metadata_notify_cb, NULL, NOTIFY_PRIORITY_LOW);
899
900
901         gtkrc_load();
902
903         parse_command_line_for_debug_option(argc, argv);
904         DEBUG_1("%s main: gtk_init", get_exec_time());
905 #ifdef HAVE_CLUTTER
906         if (gtk_clutter_init(&argc, &argv) != CLUTTER_INIT_SUCCESS)
907                 {
908                 log_printf("Can't initialize clutter-gtk.\n");
909                 exit(1);
910                 }
911 #else
912         gtk_init(&argc, &argv);
913 #endif
914
915         if (gtk_major_version < GTK_MAJOR_VERSION ||
916             (gtk_major_version == GTK_MAJOR_VERSION && gtk_minor_version < GTK_MINOR_VERSION) )
917                 {
918                 log_printf("!!! This is a friendly warning.\n");
919                 log_printf("!!! The version of GTK+ in use now is older than when %s was compiled.\n", GQ_APPNAME);
920                 log_printf("!!!  compiled with GTK+-%d.%d\n", GTK_MAJOR_VERSION, GTK_MINOR_VERSION);
921                 log_printf("!!!   running with GTK+-%d.%d\n", gtk_major_version, gtk_minor_version);
922                 log_printf("!!! %s may quit unexpectedly with a relocation error.\n", GQ_APPNAME);
923                 }
924
925         DEBUG_1("%s main: pixbuf_inline_register_stock_icons", get_exec_time());
926         pixbuf_inline_register_stock_icons();
927
928         DEBUG_1("%s main: setting default options before commandline handling", get_exec_time());
929         options = init_options(NULL);
930         setup_default_options(options);
931
932         DEBUG_1("%s main: parse_command_line", get_exec_time());
933         parse_command_line(argc, argv);
934
935         DEBUG_1("%s main: mkdir_if_not_exists", get_exec_time());
936         /* these functions don't depend on config file */
937         mkdir_if_not_exists(get_rc_dir());
938         mkdir_if_not_exists(get_collections_dir());
939         mkdir_if_not_exists(get_thumbnails_cache_dir());
940         mkdir_if_not_exists(get_metadata_cache_dir());
941         mkdir_if_not_exists(get_window_layouts_dir());
942
943         setup_env_path();
944
945         keys_load();
946         accel_map_load();
947
948         /* restore session from the config file */
949
950
951         DEBUG_1("%s main: load_options", get_exec_time());
952         if (!load_options(options))
953                 {
954                 /* load_options calls these functions after it parses global options, we have to call it here if it fails */
955                 filter_add_defaults();
956                 filter_rebuild();
957                 }
958
959 #ifdef HAVE_CLUTTER
960 /* FIXME: For the background of this see:
961  * https://github.com/BestImageViewer/geeqie/issues/397
962  * The feature CLUTTER_FEATURE_SWAP_EVENTS indictates if the
963  * system is liable to exhibit this problem.
964  * The user is provided with an override in Preferences/Behavior
965  */
966         if (!options->override_disable_gpu)
967                 {
968                 DEBUG_1("CLUTTER_FEATURE_SWAP_EVENTS %d",clutter_feature_available(CLUTTER_FEATURE_SWAP_EVENTS));
969                 if (clutter_feature_available(CLUTTER_FEATURE_SWAP_EVENTS) != 0)
970                         {
971                         options->disable_gpu = TRUE;
972                         }
973                 }
974 #endif
975
976         /* handle missing config file and commandline additions*/
977         if (!layout_window_list)
978                 {
979                 /* broken or no config file */
980                 layout_new_from_config(NULL, NULL, TRUE);
981                 }
982
983         layout_editors_reload_start();
984
985         if (command_line->collection_list && !command_line->startup_command_line_collection)
986                 {
987                 GList *work;
988
989                 work = command_line->collection_list;
990                 while (work)
991                         {
992                         CollectWindow *cw;
993                         const gchar *path;
994
995                         path = work->data;
996                         work = work->next;
997
998                         cw = collection_window_new(path);
999                         if (!first_collection && cw) first_collection = cw->cd;
1000                         }
1001                 }
1002
1003         if (command_line->log_file)
1004                 {
1005                 gchar *pathl;
1006                 gchar *path = g_strdup(command_line->log_file);
1007
1008                 pathl = path_from_utf8(path);
1009                 command_line->ssi = secure_open(pathl);
1010                 }
1011
1012         if (command_line->cmd_list ||
1013             (command_line->startup_command_line_collection && command_line->collection_list))
1014                 {
1015                 GList *work;
1016
1017                 if (command_line->startup_command_line_collection)
1018                         {
1019                         CollectWindow *cw;
1020
1021                         cw = collection_window_new("");
1022                         cd = cw->cd;
1023                         }
1024                 else
1025                         {
1026                         cd = collection_new("");        /* if we pass NULL, untitled counter is falsely increm. */
1027                         }
1028
1029                 g_free(cd->path);
1030                 cd->path = NULL;
1031                 g_free(cd->name);
1032                 cd->name = g_strdup(_("Command line"));
1033
1034                 collection_path_changed(cd);
1035
1036                 work = command_line->cmd_list;
1037                 while (work)
1038                         {
1039                         collection_add(cd, (FileData *)work->data, FALSE);
1040                         work = work->next;
1041                         }
1042
1043                 work = command_line->collection_list;
1044                 while (work)
1045                         {
1046                         collection_load(cd, (gchar *)work->data, COLLECTION_LOAD_APPEND);
1047                         work = work->next;
1048                         }
1049
1050                 if (cd->list) layout_image_set_collection(NULL, cd, cd->list->data);
1051
1052                 /* mem leak, we never unref this collection when !startup_command_line_collection
1053                  * (the image view of the main window does not hold a ref to the collection)
1054                  * this is sort of unavoidable, for if it did hold a ref, next/back
1055                  * may not work as expected when closing collection windows.
1056                  *
1057                  * collection_unref(cd);
1058                  */
1059
1060                 }
1061         else if (first_collection)
1062                 {
1063                 layout_image_set_collection(NULL, first_collection,
1064                                             collection_get_first(first_collection));
1065                 }
1066
1067         buf = g_build_filename(get_rc_dir(), ".command", NULL);
1068         remote_connection = remote_server_init(buf, cd);
1069         g_free(buf);
1070
1071         marks_load();
1072
1073         DEBUG_1("%s main: gtk_main", get_exec_time());
1074         gtk_main();
1075 #ifdef HAVE_GTHREAD
1076         gdk_threads_leave();
1077 #endif
1078         return 0;
1079 }
1080 /* vim: set shiftwidth=8 softtabstop=0 cindent cinoptions={1s: */