src/main.c

   1 /*
   2    Main program for the Midnight Commander
   3
   4    Copyright (C) 1994, 1995, 1996, 1997, 1998, 1999, 2000, 2001, 2002,
   5    2003, 2004, 2005, 2006, 2007, 2009, 2011
   6    The Free Software Foundation, Inc.
   7
   8    Written by:
   9    Miguel de Icaza, 1994, 1995, 1996, 1997
  10    Janne Kukonlehto, 1994, 1995
  11    Norbert Warmuth, 1997
  12
  13    This file is part of the Midnight Commander.
  14
  15    The Midnight Commander is free software: you can redistribute it
  16    and/or modify it under the terms of the GNU General Public License as
  17    published by the Free Software Foundation, either version 3 of the License,
  18    or (at your option) any later version.
  19
  20    The Midnight Commander is distributed in the hope that it will be useful,
  21    but WITHOUT ANY WARRANTY; without even the implied warranty of
  22    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23    GNU General Public License for more details.
  24
  25    You should have received a copy of the GNU General Public License
  26    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  27  */
  28
  29 /** \file main.c
  30  *  \brief Source: this is a main module
  31  */
  32
  33 #include <config.h>
  34
  35 #include <ctype.h>
  36 #include <errno.h>
  37 #include <locale.h>
  38 #include <stdio.h>
  39 #include <stdlib.h>
  40 #include <string.h>
  41 #include <sys/wait.h>
  42 #include <pwd.h>                /* for username in xterm title */
  43 #include <signal.h>
  44
  45 #include "lib/global.h"
  46
  47 #include "lib/event.h"
  48 #include "lib/tty/tty.h"
  49 #include "lib/tty/key.h"        /* For init_key() */
  50 #include "lib/skin.h"
  51 #include "lib/filehighlight.h"
  52 #include "lib/fileloc.h"
  53 #include "lib/strutil.h"
  54 #include "lib/util.h"
  55 #include "lib/vfs/vfs.h"        /* vfs_init(), vfs_shut() */
  56
  57 #include "filemanager/midnight.h"       /* current_panel */
  58 #include "filemanager/treestore.h"      /* tree_store_save */
  59 #include "filemanager/layout.h" /* command_prompt */
  60 #include "filemanager/ext.h"    /* flush_extension_file() */
  61 #include "filemanager/command.h"        /* cmdline */
  62 #include "filemanager/panel.h"          /* panalized_panel */
  63
  64 #include "vfs/plugins_init.h"
  65
  66 #include "events_init.h"
  67 #include "args.h"
  68 #include "subshell.h"
  69 #include "setup.h"              /* load_setup() */
  70
  71 #ifdef HAVE_CHARSET
  72 #include "lib/charsets.h"
  73 #include "selcodepage.h"
  74 #endif /* HAVE_CHARSET */
  75
  76 #include "consaver/cons.saver.h"        /* cons_saver_pid */
  77
  78 #include "main.h"
  79
  80 /*** global variables ****************************************************************************/
  81
  82 mc_fhl_t *mc_filehighlight;
  83
  84 /* Set when main loop should be terminated */
  85 int quit = 0;
  86
  87 #ifdef HAVE_CHARSET
  88 /* Numbers of (file I/O) and (input/display) codepages. -1 if not selected */
  89 int default_source_codepage = -1;
  90 char *autodetect_codeset = NULL;
  91 gboolean is_autodetect_codeset_enabled = FALSE;
  92 #endif /* !HAVE_CHARSET */
  93
  94 /* If true use the internal viewer */
  95 int use_internal_view = 1;
  96 /* If set, use the builtin editor */
  97 int use_internal_edit = 1;
  98
  99 char *mc_run_param0 = NULL;
 100 char *mc_run_param1 = NULL;
 101
 102 /* The user's shell */
 103 char *shell = NULL;
 104
 105 /* The prompt */
 106 const char *mc_prompt = NULL;
 107
 108 /* Set to TRUE to suppress printing the last directory */
 109 int print_last_revert = FALSE;
 110
 111 /* If set, then print to the given file the last directory we were at */
 112 char *last_wd_string = NULL;
 113
 114 /* index to record_macro_buf[], -1 if not recording a macro */
 115 int macro_index = -1;
 116
 117 /* macro stuff */
 118 struct macro_action_t record_macro_buf[MAX_MACRO_LENGTH];
 119
 120 GArray *macros_list;
 121
 122 /*** file scope macro definitions ****************************************************************/
 123
 124 /*** file scope type declarations ****************************************************************/
 125
 126 /*** file scope variables ************************************************************************/
 127
 128 /*** file scope functions ************************************************************************/
 129 /* --------------------------------------------------------------------------------------------- */
 130
 131 static void
 132 check_codeset (void)
 133 {
 134     const char *current_system_codepage = NULL;
 135
 136     current_system_codepage = str_detect_termencoding ();
 137
 138 #ifdef HAVE_CHARSET
 139     {
 140         const char *_display_codepage;
 141
 142         _display_codepage = get_codepage_id (mc_global.display_codepage);
 143
 144         if (strcmp (_display_codepage, current_system_codepage) != 0)
 145         {
 146             mc_global.display_codepage = get_codepage_index (current_system_codepage);
 147             if (mc_global.display_codepage == -1)
 148                 mc_global.display_codepage = 0;
 149
 150             mc_config_set_string (mc_main_config, "Misc", "display_codepage", cp_display);
 151         }
 152     }
 153 #endif
 154
 155     mc_global.utf8_display = str_isutf8 (current_system_codepage);
 156 }
 157
 158 /* --------------------------------------------------------------------------------------------- */
 159
 160 /** POSIX version.  The only version we support.  */
 161 static void
 162 OS_Setup (void)
 163 {
 164     const char *shell_env = getenv ("SHELL");
 165
 166     if ((shell_env == NULL) || (shell_env[0] == '\0'))
 167     {
 168         struct passwd *pwd;
 169         pwd = getpwuid (geteuid ());
 170         if (pwd != NULL)
 171             shell = g_strdup (pwd->pw_shell);
 172     }
 173     else
 174         shell = g_strdup (shell_env);
 175
 176     if ((shell == NULL) || (shell[0] == '\0'))
 177     {
 178         g_free (shell);
 179         shell = g_strdup ("/bin/sh");
 180     }
 181 }
 182
 183 /* --------------------------------------------------------------------------------------------- */
 184
 185 static void
 186 sigchld_handler_no_subshell (int sig)
 187 {
 188 #ifdef __linux__
 189     int pid, status;
 190
 191     if (!mc_global.tty.console_flag != '\0')
 192         return;
 193
 194     /* COMMENT: if it were true that after the call to handle_console(..INIT)
 195        the value of mc_global.tty.console_flag never changed, we could simply not install
 196        this handler at all if (!mc_global.tty.console_flag && !mc_global.tty.use_subshell). */
 197
 198     /* That comment is no longer true.  We need to wait() on a sigchld
 199        handler (that's at least what the tarfs code expects currently). */
 200
 201     pid = waitpid (cons_saver_pid, &status, WUNTRACED | WNOHANG);
 202
 203     if (pid == cons_saver_pid)
 204     {
 205
 206         if (WIFSTOPPED (status))
 207         {
 208             /* Someone has stopped cons.saver - restart it */
 209             kill (pid, SIGCONT);
 210         }
 211         else
 212         {
 213             /* cons.saver has died - disable console saving */
 214             handle_console (CONSOLE_DONE);
 215             mc_global.tty.console_flag = '\0';
 216         }
 217     }
 218     /* If we got here, some other child exited; ignore it */
 219 #endif /* __linux__ */
 220
 221     (void) sig;
 222 }
 223
 224 /* --------------------------------------------------------------------------------------------- */
 225
 226 static void
 227 init_sigchld (void)
 228 {
 229     struct sigaction sigchld_action;
 230
 231     sigchld_action.sa_handler =
 232 #ifdef HAVE_SUBSHELL_SUPPORT
 233         mc_global.tty.use_subshell ? sigchld_handler :
 234 #endif /* HAVE_SUBSHELL_SUPPORT */
 235         sigchld_handler_no_subshell;
 236
 237     sigemptyset (&sigchld_action.sa_mask);
 238
 239 #ifdef SA_RESTART
 240     sigchld_action.sa_flags = SA_RESTART;
 241 #else
 242     sigchld_action.sa_flags = 0;
 243 #endif /* !SA_RESTART */
 244
 245     if (sigaction (SIGCHLD, &sigchld_action, NULL) == -1)
 246     {
 247 #ifdef HAVE_SUBSHELL_SUPPORT
 248         /*
 249          * This may happen on QNX Neutrino 6, where SA_RESTART
 250          * is defined but not implemented.  Fallback to no subshell.
 251          */
 252         mc_global.tty.use_subshell = FALSE;
 253 #endif /* HAVE_SUBSHELL_SUPPORT */
 254     }
 255 }
 256
 257 /* --------------------------------------------------------------------------------------------- */
 258 /*** public functions ****************************************************************************/
 259 /* --------------------------------------------------------------------------------------------- */
 260
 261 gboolean
 262 do_cd (const char *new_dir, enum cd_enum exact)
 263 {
 264     gboolean res;
 265     const char *_new_dir = new_dir;
 266
 267     if (current_panel->is_panelized && _new_dir[0] == '.' && _new_dir[1] == '.' && _new_dir[2] == 0)
 268         _new_dir = panelized_panel.root;
 269
 270     res = do_panel_cd (current_panel, _new_dir, exact);
 271
 272 #if HAVE_CHARSET
 273     if (res)
 274     {
 275         vfs_path_t *vpath = vfs_path_from_str (current_panel->cwd);
 276         vfs_path_element_t *path_element = vfs_path_get_by_index (vpath, -1);
 277
 278         if (path_element->encoding != NULL)
 279             current_panel->codepage = get_codepage_index (path_element->encoding);
 280         else
 281             current_panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
 282
 283         vfs_path_free (vpath);
 284     }
 285 #endif /* HAVE_CHARSET */
 286
 287     return res;
 288 }
 289
 290 /* --------------------------------------------------------------------------------------------- */
 291
 292 #ifdef HAVE_SUBSHELL_SUPPORT
 293 gboolean
 294 do_load_prompt (void)
 295 {
 296     gboolean ret = FALSE;
 297
 298     if (!read_subshell_prompt ())
 299         return ret;
 300
 301     /* Don't actually change the prompt if it's invisible */
 302     if (((Dlg_head *) top_dlg->data == midnight_dlg) && command_prompt)
 303     {
 304         setup_cmdline ();
 305
 306         /* since the prompt has changed, and we are called from one of the
 307          * tty_get_event channels, the prompt updating does not take place
 308          * automatically: force a cursor update and a screen refresh
 309          */
 310         update_cursor (midnight_dlg);
 311         mc_refresh ();
 312         ret = TRUE;
 313     }
 314     update_subshell_prompt = TRUE;
 315     return ret;
 316 }
 317
 318 /* --------------------------------------------------------------------------------------------- */
 319
 320 int
 321 load_prompt (int fd, void *unused)
 322 {
 323     (void) fd;
 324     (void) unused;
 325
 326     do_load_prompt ();
 327     return 0;
 328 }
 329 #endif /* HAVE_SUBSHELL_SUPPORT */
 330
 331 /* --------------------------------------------------------------------------------------------- */
 332
 333 /** Show current directory in the xterm title */
 334 void
 335 update_xterm_title_path (void)
 336 {
 337     /* TODO: share code with midnight_get_title () */
 338
 339     const char *path;
 340     char host[BUF_TINY];
 341     char *p;
 342     struct passwd *pw = NULL;
 343     char *login = NULL;
 344     int res = 0;
 345
 346     if (mc_global.tty.xterm_flag && xterm_title)
 347     {
 348         path = strip_home_and_password (current_panel->cwd);
 349         res = gethostname (host, sizeof (host));
 350         if (res)
 351         {                       /* On success, res = 0 */
 352             host[0] = '\0';
 353         }
 354         else
 355         {
 356             host[sizeof (host) - 1] = '\0';
 357         }
 358         pw = getpwuid (getuid ());
 359         if (pw)
 360         {
 361             login = g_strdup_printf ("%s@%s", pw->pw_name, host);
 362         }
 363         else
 364         {
 365             login = g_strdup (host);
 366         }
 367         p = g_strdup_printf ("mc [%s]:%s", login, path);
 368         fprintf (stdout, "\33]0;%s\7", str_term_form (p));
 369         g_free (login);
 370         g_free (p);
 371         if (!mc_global.tty.alternate_plus_minus)
 372             numeric_keypad_mode ();
 373         (void) fflush (stdout);
 374     }
 375 }
 376
 377 /* --------------------------------------------------------------------------------------------- */
 378
 379 int
 380 main (int argc, char *argv[])
 381 {
 382     GError *error = NULL;
 383     int exit_code = EXIT_FAILURE;
 384     gboolean isInitialized;
 385
 386     /* We had LC_CTYPE before, LC_ALL includs LC_TYPE as well */
 387     (void) setlocale (LC_ALL, "");
 388     (void) bindtextdomain ("mc", LOCALEDIR);
 389     (void) textdomain ("mc");
 390
 391     if (!events_init (&error))
 392     {
 393   startup_exit_falure:
 394         fprintf (stderr, _("Failed to run:\n%s\n"), error->message);
 395         g_error_free (error);
 396   startup_exit_ok:
 397         (void) mc_event_deinit (NULL);
 398         str_uninit_strings ();
 399         return exit_code;
 400     }
 401
 402     str_init_strings (NULL);
 403
 404     /* Set up temporary directory */
 405     (void) mc_tmpdir ();
 406     OS_Setup ();
 407     /* Initialize and create home directories */
 408     /* do it after the screen library initialization to show the error message */
 409     mc_config_init_config_paths (&error);
 410     if (error == NULL && mc_config_deprecated_dir_present ())
 411         mc_config_migrate_from_old_place (&error);
 412     if (error != NULL)
 413     {
 414         g_free (shell);
 415         goto startup_exit_falure;
 416     }
 417
 418     vfs_init ();
 419     vfs_plugins_init ();
 420     vfs_setup_work_dir ();
 421
 422     /* do this after vfs initialization due to mc_setctl() call in mc_args_handle() */
 423     if (!mc_args_handle (argc, argv, "mc", &error))
 424     {
 425         if (error != NULL)
 426         {
 427             vfs_shut ();
 428             goto startup_exit_falure;
 429         }
 430
 431         /* for help messages */
 432         exit_code = EXIT_SUCCESS;
 433         goto startup_exit_ok;
 434     }
 435
 436     /* check terminal type
 437      * $TEMR must be set and not empty
 438      * mc_global.tty.xterm_flag is used in init_key() and tty_init()
 439      * Do this after mc_args_handle() where mc_args__force_xterm is set up.
 440      */
 441     mc_global.tty.xterm_flag = tty_check_term (mc_args__force_xterm);
 442
 443     /* NOTE: This has to be called before tty_init or whatever routine
 444        calls any define_sequence */
 445     init_key ();
 446
 447     /* Must be done before installing the SIGCHLD handler [[FIXME]] */
 448     handle_console (CONSOLE_INIT);
 449
 450 #ifdef HAVE_SUBSHELL_SUPPORT
 451     /* Don't use subshell when invoked as viewer or editor */
 452     if (mc_global.mc_run_mode != MC_RUN_FULL)
 453         mc_global.tty.use_subshell = FALSE;
 454
 455     if (mc_global.tty.use_subshell)
 456         subshell_get_console_attributes ();
 457 #endif /* HAVE_SUBSHELL_SUPPORT */
 458
 459     /* Install the SIGCHLD handler; must be done before init_subshell() */
 460     init_sigchld ();
 461
 462     /* We need this, since ncurses endwin () doesn't restore the signals */
 463     save_stop_handler ();
 464
 465     /* Must be done before init_subshell, to set up the terminal size: */
 466     /* FIXME: Should be removed and LINES and COLS computed on subshell */
 467     tty_init (!mc_args__nomouse, mc_global.tty.xterm_flag);
 468
 469     load_setup ();
 470
 471     /* start check mc_global.display_codepage and mc_global.source_codepage */
 472     check_codeset ();
 473
 474     /* Removing this from the X code let's us type C-c */
 475     load_key_defs ();
 476
 477     load_keymap_defs (!mc_args__nokeymap);
 478
 479     macros_list = g_array_new (TRUE, FALSE, sizeof (macros_t));
 480
 481     tty_init_colors (mc_global.tty.disable_colors, mc_args__force_colors);
 482
 483     isInitialized = mc_skin_init (&error);
 484     if (error != NULL)
 485     {
 486         message (D_ERROR, _("Warning"), "%s", error->message);
 487         g_error_free (error);
 488         error = NULL;
 489     }
 490
 491     mc_filehighlight = mc_fhl_new (TRUE);
 492     dlg_set_default_colors ();
 493
 494 #ifdef HAVE_SUBSHELL_SUPPORT
 495     /* Done here to ensure that the subshell doesn't  */
 496     /* inherit the file descriptors opened below, etc */
 497     if (mc_global.tty.use_subshell)
 498         init_subshell ();
 499
 500 #endif /* HAVE_SUBSHELL_SUPPORT */
 501
 502     /* Also done after init_subshell, to save any shell init file messages */
 503     if (mc_global.tty.console_flag != '\0')
 504         handle_console (CONSOLE_SAVE);
 505
 506     if (mc_global.tty.alternate_plus_minus)
 507         application_keypad_mode ();
 508
 509 #ifdef HAVE_SUBSHELL_SUPPORT
 510     if (mc_global.tty.use_subshell)
 511     {
 512         mc_prompt = strip_ctrl_codes (subshell_prompt);
 513         if (mc_prompt == NULL)
 514             mc_prompt = (geteuid () == 0) ? "# " : "$ ";
 515     }
 516     else
 517 #endif /* HAVE_SUBSHELL_SUPPORT */
 518         mc_prompt = (geteuid () == 0) ? "# " : "$ ";
 519
 520     /* Program main loop */
 521     if (!mc_global.widget.midnight_shutdown)
 522         do_nc ();
 523
 524     /* Save the tree store */
 525     (void) tree_store_save ();
 526
 527     free_keymap_defs ();
 528
 529     /* Virtual File System shutdown */
 530     vfs_shut ();
 531
 532     flush_extension_file ();    /* does only free memory */
 533
 534     mc_fhl_free (&mc_filehighlight);
 535     mc_skin_deinit ();
 536     tty_colors_done ();
 537
 538     tty_shutdown ();
 539
 540     done_setup ();
 541
 542     if (mc_global.tty.console_flag != '\0' && (quit & SUBSHELL_EXIT) == 0)
 543         handle_console (CONSOLE_RESTORE);
 544     if (mc_global.tty.alternate_plus_minus)
 545         numeric_keypad_mode ();
 546
 547     (void) signal (SIGCHLD, SIG_DFL);   /* Disable the SIGCHLD handler */
 548
 549     if (mc_global.tty.console_flag != '\0')
 550         handle_console (CONSOLE_DONE);
 551
 552     if (mc_global.mc_run_mode == MC_RUN_FULL && mc_args__last_wd_file != NULL
 553         && last_wd_string != NULL && !print_last_revert)
 554     {
 555         int last_wd_fd;
 556
 557         last_wd_fd = open (mc_args__last_wd_file, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL,
 558                            S_IRUSR | S_IWUSR);
 559         if (last_wd_fd != -1)
 560         {
 561             ssize_t ret1;
 562             int ret2;
 563             ret1 = write (last_wd_fd, last_wd_string, strlen (last_wd_string));
 564             ret2 = close (last_wd_fd);
 565         }
 566     }
 567     g_free (last_wd_string);
 568
 569     g_free (shell);
 570
 571     done_key ();
 572
 573     if (macros_list != NULL)
 574     {
 575         guint i;
 576         macros_t *macros;
 577         for (i = 0; i < macros_list->len; i++)
 578         {
 579             macros = &g_array_index (macros_list, struct macros_t, i);
 580             if (macros != NULL && macros->macro != NULL)
 581                 (void) g_array_free (macros->macro, FALSE);
 582         }
 583         (void) g_array_free (macros_list, TRUE);
 584     }
 585
 586     str_uninit_strings ();
 587
 588     g_free (mc_run_param0);
 589     g_free (mc_run_param1);
 590
 591     mc_config_deinit_config_paths ();
 592
 593     (void) mc_event_deinit (&error);
 594
 595     if (error != NULL)
 596     {
 597         fprintf (stderr, _("\nFailed while close:\n%s\n"), error->message);
 598         g_error_free (error);
 599         exit (EXIT_FAILURE);
 600     }
 601
 602     (void) putchar ('\n');      /* Hack to make shell's prompt start at left of screen */
 603
 604     return 0;
 605 }
 606
 607 /* --------------------------------------------------------------------------------------------- */