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/tty/tty.h"
  45 #include "lib/tty/key.h"        /* For init_key() */
  46 #include "lib/tty/win.h"        /* xterm_flag */
  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/mc-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 "args.h"
  61 #include "subshell.h"
  62 #include "setup.h"              /* load_setup() */
  63
  64 #ifdef HAVE_CHARSET
  65 #include "lib/charsets.h"
  66 #include "selcodepage.h"
  67 #endif /* HAVE_CHARSET */
  68
  69 #include "consaver/cons.saver.h"        /* console_flag */
  70
  71 #include "main.h"
  72
  73 /*** global variables ****************************************************************************/
  74
  75 mc_fhl_t *mc_filehighlight;
  76
  77 /* Set when main loop should be terminated */
  78 int quit = 0;
  79
  80 #ifdef HAVE_CHARSET
  81 /* Numbers of (file I/O) and (input/display) codepages. -1 if not selected */
  82 int source_codepage = -1;
  83 int default_source_codepage = -1;
  84 int display_codepage = -1;
  85 char *autodetect_codeset = NULL;
  86 gboolean is_autodetect_codeset_enabled = FALSE;
  87 #else
  88 /* If true, allow characters in the range 160-255 */
  89 int eight_bit_clean = 1;
  90 /*
  91  * If true, also allow characters in the range 128-159.
  92  * This is reported to break on many terminals (xterm, qansi-m).
  93  */
  94 int full_eight_bits = 0;
  95 #endif /* !HAVE_CHARSET */
  96
  97 /*
  98  * If utf-8 terminal utf8_display = 1
  99  * Display bits set UTF-8
 100  */
 101 int utf8_display = 0;
 102
 103 /* If true use the internal viewer */
 104 int use_internal_view = 1;
 105 /* If set, use the builtin editor */
 106 int use_internal_edit = 1;
 107
 108 mc_run_mode_t mc_run_mode = MC_RUN_FULL;
 109 char *mc_run_param0 = NULL;
 110 char *mc_run_param1 = NULL;
 111
 112 /* Used so that widgets know if they are being destroyed or
 113    shut down */
 114 int midnight_shutdown = 0;
 115
 116 /* The user's shell */
 117 char *shell = NULL;
 118
 119 /* The prompt */
 120 const char *mc_prompt = NULL;
 121
 122 /* mc_sysconfig_dir: Area for default settings from maintainers of distributuves
 123   default is /etc/mc or may be defined by MC_DATADIR
 124   */
 125 char *mc_sysconfig_dir = NULL;
 126
 127 /* mc_share_data_dir: Area for default settings from developers */
 128 char *mc_share_data_dir = NULL;
 129
 130 /* Set to TRUE to suppress printing the last directory */
 131 int print_last_revert = FALSE;
 132
 133 /* If set, then print to the given file the last directory we were at */
 134 char *last_wd_string = NULL;
 135
 136 /* index to record_macro_buf[], -1 if not recording a macro */
 137 int macro_index = -1;
 138
 139 /*** file scope macro definitions ****************************************************************/
 140
 141 /*** file scope type declarations ****************************************************************/
 142
 143 /*** file scope variables ************************************************************************/
 144
 145 /*** file scope functions ************************************************************************/
 146 /* --------------------------------------------------------------------------------------------- */
 147
 148 static void
 149 check_codeset (void)
 150 {
 151     const char *current_system_codepage = NULL;
 152
 153     current_system_codepage = str_detect_termencoding ();
 154
 155 #ifdef HAVE_CHARSET
 156     {
 157         const char *_display_codepage;
 158
 159         _display_codepage = get_codepage_id (display_codepage);
 160
 161         if (strcmp (_display_codepage, current_system_codepage) != 0)
 162         {
 163             display_codepage = get_codepage_index (current_system_codepage);
 164             if (display_codepage == -1)
 165                 display_codepage = 0;
 166
 167             mc_config_set_string (mc_main_config, "Misc", "display_codepage", cp_display);
 168         }
 169     }
 170 #endif
 171
 172     utf8_display = str_isutf8 (current_system_codepage);
 173 }
 174
 175 /* --------------------------------------------------------------------------------------------- */
 176
 177 /** POSIX version.  The only version we support.  */
 178 static void
 179 OS_Setup (void)
 180 {
 181     const char *shell_env = getenv ("SHELL");
 182     const char *mc_libdir;
 183
 184     if ((shell_env == NULL) || (shell_env[0] == '\0'))
 185     {
 186         struct passwd *pwd;
 187         pwd = getpwuid (geteuid ());
 188         if (pwd != NULL)
 189             shell = g_strdup (pwd->pw_shell);
 190     }
 191     else
 192         shell = g_strdup (shell_env);
 193
 194     if ((shell == NULL) || (shell[0] == '\0'))
 195     {
 196         g_free (shell);
 197         shell = g_strdup ("/bin/sh");
 198     }
 199
 200     /* This is the directory, where MC was installed, on Unix this is DATADIR */
 201     /* and can be overriden by the MC_DATADIR environment variable */
 202     mc_libdir = getenv ("MC_DATADIR");
 203     if (mc_libdir != NULL)
 204     {
 205         mc_sysconfig_dir = g_strdup (mc_libdir);
 206         mc_share_data_dir = g_strdup (SYSCONFDIR);
 207     }
 208     else
 209     {
 210         mc_sysconfig_dir = g_strdup (SYSCONFDIR);
 211         mc_share_data_dir = g_strdup (DATADIR);
 212     }
 213
 214 }
 215
 216 /* --------------------------------------------------------------------------------------------- */
 217
 218 static void
 219 sigchld_handler_no_subshell (int sig)
 220 {
 221 #ifdef __linux__
 222     int pid, status;
 223
 224     if (!console_flag)
 225         return;
 226
 227     /* COMMENT: if it were true that after the call to handle_console(..INIT)
 228        the value of console_flag never changed, we could simply not install
 229        this handler at all if (!console_flag && !use_subshell). */
 230
 231     /* That comment is no longer true.  We need to wait() on a sigchld
 232        handler (that's at least what the tarfs code expects currently). */
 233
 234     pid = waitpid (cons_saver_pid, &status, WUNTRACED | WNOHANG);
 235
 236     if (pid == cons_saver_pid)
 237     {
 238
 239         if (WIFSTOPPED (status))
 240         {
 241             /* Someone has stopped cons.saver - restart it */
 242             kill (pid, SIGCONT);
 243         }
 244         else
 245         {
 246             /* cons.saver has died - disable console saving */
 247             handle_console (CONSOLE_DONE);
 248             console_flag = 0;
 249         }
 250     }
 251     /* If we got here, some other child exited; ignore it */
 252 #endif /* __linux__ */
 253
 254     (void) sig;
 255 }
 256
 257 /* --------------------------------------------------------------------------------------------- */
 258
 259 static void
 260 init_sigchld (void)
 261 {
 262     struct sigaction sigchld_action;
 263
 264     sigchld_action.sa_handler =
 265 #ifdef HAVE_SUBSHELL_SUPPORT
 266         use_subshell ? sigchld_handler :
 267 #endif /* HAVE_SUBSHELL_SUPPORT */
 268         sigchld_handler_no_subshell;
 269
 270     sigemptyset (&sigchld_action.sa_mask);
 271
 272 #ifdef SA_RESTART
 273     sigchld_action.sa_flags = SA_RESTART;
 274 #else
 275     sigchld_action.sa_flags = 0;
 276 #endif /* !SA_RESTART */
 277
 278     if (sigaction (SIGCHLD, &sigchld_action, NULL) == -1)
 279     {
 280 #ifdef HAVE_SUBSHELL_SUPPORT
 281         /*
 282          * This may happen on QNX Neutrino 6, where SA_RESTART
 283          * is defined but not implemented.  Fallback to no subshell.
 284          */
 285         use_subshell = 0;
 286 #endif /* HAVE_SUBSHELL_SUPPORT */
 287     }
 288 }
 289
 290 /* --------------------------------------------------------------------------------------------- */
 291 /*** public functions ****************************************************************************/
 292 /* --------------------------------------------------------------------------------------------- */
 293
 294 /** Define this function for glib-style error handling */
 295 GQuark
 296 mc_main_error_quark (void)
 297 {
 298     return g_quark_from_static_string (PACKAGE);
 299 }
 300
 301 /* --------------------------------------------------------------------------------------------- */
 302
 303 int
 304 do_cd (const char *new_dir, enum cd_enum exact)
 305 {
 306     gboolean res;
 307
 308     res = do_panel_cd (current_panel, new_dir, exact);
 309
 310 #if HAVE_CHARSET
 311     if (res)
 312     {
 313         const char *enc_name;
 314
 315         enc_name = vfs_get_encoding (current_panel->cwd);
 316         if (enc_name != NULL)
 317             current_panel->codepage = get_codepage_index (enc_name);
 318         else
 319             current_panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
 320     }
 321 #endif /* HAVE_CHARSET */
 322
 323     return res ? 1 : 0;
 324 }
 325
 326 /* --------------------------------------------------------------------------------------------- */
 327
 328 #ifdef HAVE_SUBSHELL_SUPPORT
 329 int
 330 load_prompt (int fd, void *unused)
 331 {
 332     (void) fd;
 333     (void) unused;
 334
 335     if (!read_subshell_prompt ())
 336         return 0;
 337
 338     /* Don't actually change the prompt if it's invisible */
 339     if (((Dlg_head *) top_dlg->data == midnight_dlg) && command_prompt)
 340     {
 341         char *tmp_prompt;
 342         int prompt_len;
 343
 344         tmp_prompt = strip_ctrl_codes (subshell_prompt);
 345         prompt_len = str_term_width1 (tmp_prompt);
 346
 347         /* Check for prompts too big */
 348         if (COLS > 8 && prompt_len > COLS - 8)
 349         {
 350             prompt_len = COLS - 8;
 351             tmp_prompt[prompt_len] = '\0';
 352         }
 353         mc_prompt = tmp_prompt;
 354         label_set_text (the_prompt, mc_prompt);
 355         input_set_origin ((WInput *) cmdline, prompt_len, COLS - prompt_len);
 356
 357         /* since the prompt has changed, and we are called from one of the
 358          * tty_get_event channels, the prompt updating does not take place
 359          * automatically: force a cursor update and a screen refresh
 360          */
 361         update_cursor (midnight_dlg);
 362         mc_refresh ();
 363     }
 364     update_subshell_prompt = TRUE;
 365     return 0;
 366 }
 367 #endif /* HAVE_SUBSHELL_SUPPORT */
 368
 369 /* --------------------------------------------------------------------------------------------- */
 370
 371 /** Show current directory in the xterm title */
 372 void
 373 update_xterm_title_path (void)
 374 {
 375     /* TODO: share code with midnight_get_title () */
 376
 377     const char *path;
 378     char host[BUF_TINY];
 379     char *p;
 380     struct passwd *pw = NULL;
 381     char *login = NULL;
 382     int res = 0;
 383
 384     if (xterm_flag && xterm_title)
 385     {
 386         path = strip_home_and_password (current_panel->cwd);
 387         res = gethostname (host, sizeof (host));
 388         if (res)
 389         {                       /* On success, res = 0 */
 390             host[0] = '\0';
 391         }
 392         else
 393         {
 394             host[sizeof (host) - 1] = '\0';
 395         }
 396         pw = getpwuid (getuid ());
 397         if (pw)
 398         {
 399             login = g_strdup_printf ("%s@%s", pw->pw_name, host);
 400         }
 401         else
 402         {
 403             login = g_strdup (host);
 404         }
 405         p = g_strdup_printf ("mc [%s]:%s", login, path);
 406         fprintf (stdout, "\33]0;%s\7", str_term_form (p));
 407         g_free (login);
 408         g_free (p);
 409         if (!alternate_plus_minus)
 410             numeric_keypad_mode ();
 411         fflush (stdout);
 412     }
 413 }
 414
 415 /* --------------------------------------------------------------------------------------------- */
 416
 417 int
 418 main (int argc, char *argv[])
 419 {
 420     GError *error = NULL;
 421     gboolean isInitialized;
 422
 423     /* We had LC_CTYPE before, LC_ALL includs LC_TYPE as well */
 424     setlocale (LC_ALL, "");
 425     bindtextdomain ("mc", LOCALEDIR);
 426     textdomain ("mc");
 427
 428
 429     /* Set up temporary directory */
 430     mc_tmpdir ();
 431
 432     OS_Setup ();
 433
 434     str_init_strings (NULL);
 435
 436     vfs_init ();
 437
 438     if (!mc_args_handle (argc, argv, "mc"))
 439         exit (EXIT_FAILURE);
 440
 441     /* NOTE: This has to be called before tty_init or whatever routine
 442        calls any define_sequence */
 443     init_key ();
 444
 445     /* Must be done before installing the SIGCHLD handler [[FIXME]] */
 446     handle_console (CONSOLE_INIT);
 447
 448 #ifdef HAVE_SUBSHELL_SUPPORT
 449     /* Don't use subshell when invoked as viewer or editor */
 450     if (mc_run_mode != MC_RUN_FULL)
 451         use_subshell = 0;
 452
 453     if (use_subshell)
 454         subshell_get_console_attributes ();
 455 #endif /* HAVE_SUBSHELL_SUPPORT */
 456
 457     /* Install the SIGCHLD handler; must be done before init_subshell() */
 458     init_sigchld ();
 459
 460     /* We need this, since ncurses endwin () doesn't restore the signals */
 461     save_stop_handler ();
 462
 463     /* Initialize and create home directories */
 464     /* do it after the screen library initialization to show the error message */
 465     mc_config_init_config_paths (&error);
 466     if (error == NULL)
 467     {
 468         if (mc_config_deprecated_dir_present ())
 469         {
 470             mc_config_migrate_from_old_place (&error);
 471         }
 472     }
 473
 474     /* Must be done before init_subshell, to set up the terminal size: */
 475     /* FIXME: Should be removed and LINES and COLS computed on subshell */
 476     tty_init ((gboolean) mc_args__slow_terminal, (gboolean) mc_args__ugly_line_drawing);
 477
 478     load_setup ();
 479
 480     /* start check display_codepage and source_codepage */
 481     check_codeset ();
 482
 483     /* Removing this from the X code let's us type C-c */
 484     load_key_defs ();
 485
 486     load_keymap_defs ();
 487
 488     macros_list = g_array_new (TRUE, FALSE, sizeof (macros_t));
 489
 490     tty_init_colors (mc_args__disable_colors, mc_args__force_colors);
 491
 492     {
 493         GError *error2 = NULL;
 494         isInitialized = mc_skin_init (&error2);
 495         mc_filehighlight = mc_fhl_new (TRUE);
 496         dlg_set_default_colors ();
 497
 498         if (!isInitialized)
 499         {
 500             message (D_ERROR, _("Warning"), "%s", error2->message);
 501             g_error_free (error2);
 502             error2 = NULL;
 503         }
 504     }
 505
 506     if (error != NULL)
 507     {
 508         message (D_ERROR, _("Warning"), "%s", error->message);
 509         g_error_free (error);
 510         error = NULL;
 511     }
 512
 513
 514 #ifdef HAVE_SUBSHELL_SUPPORT
 515     /* Done here to ensure that the subshell doesn't  */
 516     /* inherit the file descriptors opened below, etc */
 517     if (use_subshell)
 518         init_subshell ();
 519
 520 #endif /* HAVE_SUBSHELL_SUPPORT */
 521
 522     /* Also done after init_subshell, to save any shell init file messages */
 523     if (console_flag)
 524         handle_console (CONSOLE_SAVE);
 525
 526     if (alternate_plus_minus)
 527         application_keypad_mode ();
 528
 529 #ifdef HAVE_SUBSHELL_SUPPORT
 530     if (use_subshell)
 531     {
 532         mc_prompt = strip_ctrl_codes (subshell_prompt);
 533         if (mc_prompt == NULL)
 534             mc_prompt = (geteuid () == 0) ? "# " : "$ ";
 535     }
 536     else
 537 #endif /* HAVE_SUBSHELL_SUPPORT */
 538         mc_prompt = (geteuid () == 0) ? "# " : "$ ";
 539
 540     /* Program main loop */
 541     if (!midnight_shutdown)
 542         do_nc ();
 543
 544     /* Save the tree store */
 545     tree_store_save ();
 546
 547     free_keymap_defs ();
 548
 549     /* Virtual File System shutdown */
 550     vfs_shut ();
 551
 552     flush_extension_file ();    /* does only free memory */
 553
 554     mc_fhl_free (&mc_filehighlight);
 555     mc_skin_deinit ();
 556     tty_colors_done ();
 557
 558     tty_shutdown ();
 559
 560     done_setup ();
 561
 562     if (console_flag && (quit & SUBSHELL_EXIT) == 0)
 563         handle_console (CONSOLE_RESTORE);
 564     if (alternate_plus_minus)
 565         numeric_keypad_mode ();
 566
 567     signal (SIGCHLD, SIG_DFL);  /* Disable the SIGCHLD handler */
 568
 569     if (console_flag)
 570         handle_console (CONSOLE_DONE);
 571
 572     if (mc_run_mode == MC_RUN_FULL && mc_args__last_wd_file != NULL
 573         && last_wd_string != NULL && !print_last_revert)
 574     {
 575         int last_wd_fd;
 576
 577         last_wd_fd = open (mc_args__last_wd_file, O_WRONLY | O_CREAT | O_TRUNC | O_EXCL,
 578                            S_IRUSR | S_IWUSR);
 579         if (last_wd_fd != -1)
 580         {
 581             ssize_t ret1;
 582             int ret2;
 583             ret1 = write (last_wd_fd, last_wd_string, strlen (last_wd_string));
 584             ret2 = close (last_wd_fd);
 585         }
 586     }
 587     g_free (last_wd_string);
 588
 589     g_free (mc_share_data_dir);
 590     g_free (mc_sysconfig_dir);
 591     g_free (shell);
 592
 593     done_key ();
 594
 595     if (macros_list != NULL)
 596     {
 597         guint i;
 598         macros_t *macros;
 599         for (i = 0; i < macros_list->len; i++)
 600         {
 601             macros = &g_array_index (macros_list, struct macros_t, i);
 602             if (macros != NULL && macros->macro != NULL)
 603                 g_array_free (macros->macro, FALSE);
 604         }
 605         g_array_free (macros_list, TRUE);
 606     }
 607
 608     str_uninit_strings ();
 609
 610     g_free (mc_run_param0);
 611     g_free (mc_run_param1);
 612
 613     mc_config_deinit_config_paths ();
 614
 615     putchar ('\n');             /* Hack to make shell's prompt start at left of screen */
 616
 617     return 0;
 618 }
 619
 620 /* --------------------------------------------------------------------------------------------- */