Ticket #3804: syntax: update Ada 95 keywords (ALT Linux #33330)
[midnight-commander.git] / src / main.c
blobbdc40bae1e998a22fef111bd044203327e27b812
1 /*
2 Main program for the Midnight Commander
4 Copyright (C) 1994-2017
5 Free Software Foundation, Inc.
7 Written by:
8 Miguel de Icaza, 1994, 1995, 1996, 1997
9 Janne Kukonlehto, 1994, 1995
10 Norbert Warmuth, 1997
12 This file is part of the Midnight Commander.
14 The Midnight Commander is free software: you can redistribute it
15 and/or modify it under the terms of the GNU General Public License as
16 published by the Free Software Foundation, either version 3 of the License,
17 or (at your option) any later version.
19 The Midnight Commander is distributed in the hope that it will be useful,
20 but WITHOUT ANY WARRANTY; without even the implied warranty of
21 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
22 GNU General Public License for more details.
24 You should have received a copy of the GNU General Public License
25 along with this program. If not, see <http://www.gnu.org/licenses/>.
28 /** \file main.c
29 * \brief Source: this is a main module
32 #include <config.h>
34 #include <ctype.h>
35 #include <errno.h>
36 #include <locale.h>
37 #include <pwd.h> /* for username in xterm title */
38 #include <stdio.h>
39 #include <stdlib.h>
40 #include <string.h>
41 #include <sys/wait.h>
42 #include <signal.h>
44 #include "lib/global.h"
46 #include "lib/event.h"
47 #include "lib/tty/tty.h"
48 #include "lib/tty/key.h" /* For init_key() */
49 #include "lib/tty/mouse.h" /* init_mouse() */
50 #include "lib/timer.h"
51 #include "lib/skin.h"
52 #include "lib/filehighlight.h"
53 #include "lib/fileloc.h"
54 #include "lib/strutil.h"
55 #include "lib/util.h"
56 #include "lib/vfs/vfs.h" /* vfs_init(), vfs_shut() */
58 #include "filemanager/midnight.h" /* current_panel */
59 #include "filemanager/treestore.h" /* tree_store_save */
60 #include "filemanager/layout.h" /* command_prompt */
61 #include "filemanager/ext.h" /* flush_extension_file() */
62 #include "filemanager/command.h" /* cmdline */
63 #include "filemanager/panel.h" /* panalized_panel */
65 #include "vfs/plugins_init.h"
67 #include "events_init.h"
68 #include "args.h"
69 #ifdef ENABLE_SUBSHELL
70 #include "subshell/subshell.h"
71 #endif
72 #include "setup.h" /* load_setup() */
74 #ifdef HAVE_CHARSET
75 #include "lib/charsets.h"
76 #include "selcodepage.h"
77 #endif /* HAVE_CHARSET */
79 #include "consaver/cons.saver.h" /* cons_saver_pid */
81 /*** global variables ****************************************************************************/
83 /*** file scope macro definitions ****************************************************************/
85 /*** file scope type declarations ****************************************************************/
87 /*** file scope variables ************************************************************************/
89 /*** file scope functions ************************************************************************/
90 /* --------------------------------------------------------------------------------------------- */
92 static void
93 check_codeset (void)
95 const char *current_system_codepage = NULL;
97 current_system_codepage = str_detect_termencoding ();
99 #ifdef HAVE_CHARSET
101 const char *_display_codepage;
103 _display_codepage = get_codepage_id (mc_global.display_codepage);
105 if (strcmp (_display_codepage, current_system_codepage) != 0)
107 mc_global.display_codepage = get_codepage_index (current_system_codepage);
108 if (mc_global.display_codepage == -1)
109 mc_global.display_codepage = 0;
111 mc_config_set_string (mc_global.main_config, CONFIG_MISC_SECTION, "display_codepage",
112 cp_display);
115 #endif
117 mc_global.utf8_display = str_isutf8 (current_system_codepage);
120 /* --------------------------------------------------------------------------------------------- */
121 /** POSIX version. The only version we support. */
123 static void
124 OS_Setup (void)
126 const char *datadir_env;
128 mc_shell_init ();
130 /* This is the directory, where MC was installed, on Unix this is DATADIR */
131 /* and can be overriden by the MC_DATADIR environment variable */
132 datadir_env = g_getenv ("MC_DATADIR");
133 if (datadir_env != NULL)
134 mc_global.sysconfig_dir = g_strdup (datadir_env);
135 else
136 mc_global.sysconfig_dir = g_strdup (SYSCONFDIR);
138 mc_global.share_data_dir = g_strdup (DATADIR);
141 /* --------------------------------------------------------------------------------------------- */
143 static void
144 sigchld_handler_no_subshell (int sig)
146 #ifdef __linux__
147 int pid, status;
149 if (mc_global.tty.console_flag == '\0')
150 return;
152 /* COMMENT: if it were true that after the call to handle_console(..INIT)
153 the value of mc_global.tty.console_flag never changed, we could simply not install
154 this handler at all if (!mc_global.tty.console_flag && !mc_global.tty.use_subshell). */
156 /* That comment is no longer true. We need to wait() on a sigchld
157 handler (that's at least what the tarfs code expects currently). */
159 pid = waitpid (cons_saver_pid, &status, WUNTRACED | WNOHANG);
161 if (pid == cons_saver_pid)
163 if (WIFSTOPPED (status))
165 /* Someone has stopped cons.saver - restart it */
166 kill (pid, SIGCONT);
168 else
170 /* cons.saver has died - disable console saving */
171 handle_console (CONSOLE_DONE);
172 mc_global.tty.console_flag = '\0';
175 /* If we got here, some other child exited; ignore it */
176 #endif /* __linux__ */
178 (void) sig;
181 /* --------------------------------------------------------------------------------------------- */
183 static void
184 init_sigchld (void)
186 struct sigaction sigchld_action;
188 memset (&sigchld_action, 0, sizeof (sigchld_action));
189 sigchld_action.sa_handler =
190 #ifdef ENABLE_SUBSHELL
191 mc_global.tty.use_subshell ? sigchld_handler :
192 #endif /* ENABLE_SUBSHELL */
193 sigchld_handler_no_subshell;
195 sigemptyset (&sigchld_action.sa_mask);
197 #ifdef SA_RESTART
198 sigchld_action.sa_flags = SA_RESTART;
199 #endif /* !SA_RESTART */
201 if (sigaction (SIGCHLD, &sigchld_action, NULL) == -1)
203 #ifdef ENABLE_SUBSHELL
205 * This may happen on QNX Neutrino 6, where SA_RESTART
206 * is defined but not implemented. Fallback to no subshell.
208 mc_global.tty.use_subshell = FALSE;
209 #endif /* ENABLE_SUBSHELL */
213 /* --------------------------------------------------------------------------------------------- */
214 /*** public functions ****************************************************************************/
215 /* --------------------------------------------------------------------------------------------- */
218 main (int argc, char *argv[])
220 GError *mcerror = NULL;
221 gboolean config_migrated = FALSE;
222 char *config_migrate_msg = NULL;
223 int exit_code = EXIT_FAILURE;
225 mc_global.timer = mc_timer_new ();
227 /* We had LC_CTYPE before, LC_ALL includs LC_TYPE as well */
228 #ifdef HAVE_SETLOCALE
229 (void) setlocale (LC_ALL, "");
230 #endif
231 (void) bindtextdomain (PACKAGE, LOCALEDIR);
232 (void) textdomain (PACKAGE);
234 /* do this before args parsing */
235 str_init_strings (NULL);
237 if (!mc_args_parse (&argc, &argv, "mc", &mcerror))
239 startup_exit_falure:
240 fprintf (stderr, _("Failed to run:\n%s\n"), mcerror->message);
241 g_error_free (mcerror);
242 startup_exit_ok:
243 mc_shell_deinit ();
244 str_uninit_strings ();
245 mc_timer_destroy (mc_global.timer);
246 return exit_code;
249 /* do this before mc_args_show_info () to view paths in the --datadir-info output */
250 OS_Setup ();
252 if (!g_path_is_absolute (mc_config_get_home_dir ()))
254 mc_propagate_error (&mcerror, 0, "%s: %s", _("Home directory path is not absolute"),
255 mc_config_get_home_dir ());
256 mc_event_deinit (NULL);
257 goto startup_exit_falure;
260 if (!mc_args_show_info ())
262 exit_code = EXIT_SUCCESS;
263 goto startup_exit_ok;
266 if (!events_init (&mcerror))
267 goto startup_exit_falure;
269 mc_config_init_config_paths (&mcerror);
270 config_migrated = mc_config_migrate_from_old_place (&mcerror, &config_migrate_msg);
271 if (mcerror != NULL)
273 mc_event_deinit (NULL);
274 goto startup_exit_falure;
277 vfs_init ();
278 vfs_plugins_init ();
280 load_setup ();
282 /* Must be done after load_setup because depends on mc_global.vfs.cd_symlinks */
283 vfs_setup_work_dir ();
285 /* Set up temporary directory after VFS initialization */
286 mc_tmpdir ();
288 /* do this after vfs initialization and vfs working directory setup
289 due to mc_setctl() and mcedit_arg_vpath_new() calls in mc_setup_by_args() */
290 if (!mc_setup_by_args (argc, argv, &mcerror))
292 vfs_shut ();
293 done_setup ();
294 g_free (saved_other_dir);
295 mc_event_deinit (NULL);
296 goto startup_exit_falure;
299 /* Resolve the other_dir panel option.
300 * 1. Must be done after vfs_setup_work_dir().
301 * 2. Must be done after mc_setup_by_args() because of mc_run_mode.
303 if (mc_global.mc_run_mode == MC_RUN_FULL)
305 char *buffer;
306 vfs_path_t *vpath;
308 buffer = mc_config_get_string (mc_global.panels_config, "Dirs", "other_dir", ".");
309 vpath = vfs_path_from_str (buffer);
310 if (vfs_file_is_local (vpath))
311 saved_other_dir = buffer;
312 else
313 g_free (buffer);
314 vfs_path_free (vpath);
317 /* check terminal type
318 * $TERM must be set and not empty
319 * mc_global.tty.xterm_flag is used in init_key() and tty_init()
320 * Do this after mc_args_handle() where mc_args__force_xterm is set up.
322 mc_global.tty.xterm_flag = tty_check_term (mc_args__force_xterm);
324 /* NOTE: This has to be called before tty_init or whatever routine
325 calls any define_sequence */
326 init_key ();
328 /* Must be done before installing the SIGCHLD handler [[FIXME]] */
329 handle_console (CONSOLE_INIT);
331 #ifdef ENABLE_SUBSHELL
332 /* Don't use subshell when invoked as viewer or editor */
333 if (mc_global.mc_run_mode != MC_RUN_FULL)
334 mc_global.tty.use_subshell = FALSE;
336 if (mc_global.tty.use_subshell)
337 subshell_get_console_attributes ();
338 #endif /* ENABLE_SUBSHELL */
340 /* Install the SIGCHLD handler; must be done before init_subshell() */
341 init_sigchld ();
343 /* We need this, since ncurses endwin () doesn't restore the signals */
344 save_stop_handler ();
346 /* Must be done before init_subshell, to set up the terminal size: */
347 /* FIXME: Should be removed and LINES and COLS computed on subshell */
348 tty_init (!mc_args__nomouse, mc_global.tty.xterm_flag);
350 /* start check mc_global.display_codepage and mc_global.source_codepage */
351 check_codeset ();
353 /* Removing this from the X code let's us type C-c */
354 load_key_defs ();
356 load_keymap_defs (!mc_args__nokeymap);
358 #ifdef USE_INTERNAL_EDIT
359 macros_list = g_array_new (TRUE, FALSE, sizeof (macros_t));
360 #endif /* USE_INTERNAL_EDIT */
362 tty_init_colors (mc_global.tty.disable_colors, mc_args__force_colors);
364 mc_skin_init (NULL, &mcerror);
365 dlg_set_default_colors ();
366 input_set_default_colors ();
367 if (mc_global.mc_run_mode == MC_RUN_FULL)
368 command_set_default_colors ();
370 mc_error_message (&mcerror, NULL);
372 #ifdef ENABLE_SUBSHELL
373 /* Done here to ensure that the subshell doesn't */
374 /* inherit the file descriptors opened below, etc */
375 if (mc_global.tty.use_subshell)
376 init_subshell ();
377 #endif /* ENABLE_SUBSHELL */
379 /* Also done after init_subshell, to save any shell init file messages */
380 if (mc_global.tty.console_flag != '\0')
381 handle_console (CONSOLE_SAVE);
383 if (mc_global.tty.alternate_plus_minus)
384 application_keypad_mode ();
386 /* Done after subshell initialization to allow select and paste text by mouse
387 w/o Shift button in subshell in the native console */
388 init_mouse ();
390 /* Done after tty_enter_ca_mode (tty_init) because in VTE bracketed mode is
391 separate for the normal and alternate screens */
392 enable_bracketed_paste ();
394 /* subshell_prompt is NULL here */
395 mc_prompt = (geteuid () == 0) ? "# " : "$ ";
397 if (config_migrated)
399 message (D_ERROR, _("Warning"), "%s", config_migrate_msg);
400 g_free (config_migrate_msg);
403 /* Program main loop */
404 if (mc_global.midnight_shutdown)
405 exit_code = EXIT_SUCCESS;
406 else
407 exit_code = do_nc ()? EXIT_SUCCESS : EXIT_FAILURE;
409 disable_bracketed_paste ();
411 disable_mouse ();
413 /* Save the tree store */
414 (void) tree_store_save ();
416 free_keymap_defs ();
418 /* Virtual File System shutdown */
419 vfs_shut ();
421 flush_extension_file (); /* does only free memory */
423 mc_skin_deinit ();
424 tty_colors_done ();
426 tty_shutdown ();
428 done_setup ();
430 if (mc_global.tty.console_flag != '\0' && (quit & SUBSHELL_EXIT) == 0)
431 handle_console (CONSOLE_RESTORE);
432 if (mc_global.tty.alternate_plus_minus)
433 numeric_keypad_mode ();
435 (void) signal (SIGCHLD, SIG_DFL); /* Disable the SIGCHLD handler */
437 if (mc_global.tty.console_flag != '\0')
438 handle_console (CONSOLE_DONE);
440 if (mc_global.mc_run_mode == MC_RUN_FULL && mc_args__last_wd_file != NULL
441 && last_wd_string != NULL && !print_last_revert)
443 int last_wd_fd;
445 last_wd_fd = open (mc_args__last_wd_file, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL,
446 S_IRUSR | S_IWUSR);
447 if (last_wd_fd != -1)
449 ssize_t ret1;
450 int ret2;
451 ret1 = write (last_wd_fd, last_wd_string, strlen (last_wd_string));
452 ret2 = close (last_wd_fd);
453 (void) ret1;
454 (void) ret2;
457 g_free (last_wd_string);
459 mc_shell_deinit ();
461 done_key ();
463 #ifdef USE_INTERNAL_EDIT
464 if (macros_list != NULL)
466 guint i;
468 for (i = 0; i < macros_list->len; i++)
470 macros_t *macros;
472 macros = &g_array_index (macros_list, struct macros_t, i);
473 if (macros != NULL && macros->macro != NULL)
474 (void) g_array_free (macros->macro, TRUE);
476 (void) g_array_free (macros_list, TRUE);
478 #endif /* USE_INTERNAL_EDIT */
480 str_uninit_strings ();
482 if (mc_global.mc_run_mode != MC_RUN_EDITOR)
483 g_free (mc_run_param0);
484 else
485 g_list_free_full ((GList *) mc_run_param0, (GDestroyNotify) mcedit_arg_free);
487 g_free (mc_run_param1);
488 g_free (saved_other_dir);
490 mc_config_deinit_config_paths ();
492 (void) mc_event_deinit (&mcerror);
493 if (mcerror != NULL)
495 fprintf (stderr, _("\nFailed while close:\n%s\n"), mcerror->message);
496 g_error_free (mcerror);
497 exit_code = EXIT_FAILURE;
500 mc_timer_destroy (mc_global.timer);
502 (void) putchar ('\n'); /* Hack to make shell's prompt start at left of screen */
504 return exit_code;
507 /* --------------------------------------------------------------------------------------------- */