src/main.c

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