src/execute.c

   1 /* Execution routines for GNU Midnight Commander
   2    Copyright (C) 2003, 2004, 2005, 2007 Free Software Foundation, Inc.
   3
   4    This program is free software; you can redistribute it and/or modify
   5    it under the terms of the GNU General Public License as published by
   6    the Free Software Foundation; either version 2 of the License, or
   7    (at your option) any later version.
   8
   9    This program is distributed in the hope that it will be useful,
  10    but WITHOUT ANY WARRANTY; without even the implied warranty of
  11    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12    GNU General Public License for more details.
  13
  14    You should have received a copy of the GNU General Public License
  15    along with this program; if not, write to the Free Software
  16    Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA 02110-1301, USA.  */
  17
  18 /** \file  execute.c
  19  *  \brief Source: execution routines
  20  */
  21
  22 #include <config.h>
  23
  24 #include <signal.h>
  25 #include <sys/stat.h>
  26 #include <sys/time.h>
  27
  28 #include "lib/global.h"
  29
  30 #include "lib/tty/tty.h"
  31 #include "lib/tty/key.h"
  32 #include "lib/tty/win.h"
  33 #include "lib/vfs/mc-vfs/vfs.h"
  34 #include "lib/util.h"
  35 #include "lib/widget.h"
  36
  37 #include "filemanager/midnight.h"
  38 #include "filemanager/layout.h" /* use_dash() */
  39 #include "consaver/cons.saver.h"
  40 #include "subshell.h"
  41 #include "setup.h"              /* clear_before_exec */
  42
  43 #include "execute.h"
  44
  45 /*** global variables ****************************************************************************/
  46
  47 int pause_after_run = pause_on_dumb_terminals;
  48
  49 /*** file scope macro definitions ****************************************************************/
  50
  51 /*** file scope type declarations ****************************************************************/
  52
  53 /*** file scope variables ************************************************************************/
  54
  55 /*** file scope functions ************************************************************************/
  56 /* --------------------------------------------------------------------------------------------- */
  57
  58 static void
  59 edition_post_exec (void)
  60 {
  61     do_enter_ca_mode ();
  62
  63     /* FIXME: Missing on slang endwin? */
  64     tty_reset_prog_mode ();
  65     tty_flush_input ();
  66
  67     tty_keypad (TRUE);
  68     tty_raw_mode ();
  69     channels_up ();
  70     enable_mouse ();
  71     if (alternate_plus_minus)
  72         application_keypad_mode ();
  73 }
  74
  75 /* --------------------------------------------------------------------------------------------- */
  76
  77 static void
  78 edition_pre_exec (void)
  79 {
  80     if (clear_before_exec)
  81         clr_scr ();
  82     else
  83     {
  84         if (!(console_flag || xterm_flag))
  85             printf ("\n\n");
  86     }
  87
  88     channels_down ();
  89     disable_mouse ();
  90
  91     tty_reset_shell_mode ();
  92     tty_keypad (FALSE);
  93     tty_reset_screen ();
  94
  95     numeric_keypad_mode ();
  96
  97     /* on xterms: maybe endwin did not leave the terminal on the shell
  98      * screen page: do it now.
  99      *
 100      * Do not move this before endwin: in some systems rmcup includes
 101      * a call to clear screen, so it will end up clearing the shell screen.
 102      */
 103     do_exit_ca_mode ();
 104 }
 105
 106 /* --------------------------------------------------------------------------------------------- */
 107
 108 #ifdef HAVE_SUBSHELL_SUPPORT
 109 static void
 110 do_possible_cd (const char *new_dir)
 111 {
 112     if (!do_cd (new_dir, cd_exact))
 113         message (D_ERROR, _("Warning"),
 114                  _("The Commander can't change to the directory that\n"
 115                    "the subshell claims you are in. Perhaps you have\n"
 116                    "deleted your working directory, or given yourself\n"
 117                    "extra access permissions with the \"su\" command?"));
 118 }
 119 #endif /* HAVE_SUBSHELL_SUPPORT */
 120
 121 /* --------------------------------------------------------------------------------------------- */
 122
 123 static void
 124 do_execute (const char *lc_shell, const char *command, int flags)
 125 {
 126 #ifdef HAVE_SUBSHELL_SUPPORT
 127     char *new_dir = NULL;
 128 #endif /* HAVE_SUBSHELL_SUPPORT */
 129
 130     char *old_vfs_dir = 0;
 131
 132     if (!vfs_current_is_local ())
 133         old_vfs_dir = g_strdup (vfs_get_current_dir ());
 134
 135     if (mc_run_mode == MC_RUN_FULL)
 136         save_cwds_stat ();
 137     pre_exec ();
 138     if (console_flag)
 139         handle_console (CONSOLE_RESTORE);
 140
 141     if (!use_subshell && command && !(flags & EXECUTE_INTERNAL))
 142     {
 143         printf ("%s%s\n", mc_prompt, command);
 144         fflush (stdout);
 145     }
 146 #ifdef HAVE_SUBSHELL_SUPPORT
 147     if (use_subshell && !(flags & EXECUTE_INTERNAL))
 148     {
 149         do_update_prompt ();
 150
 151         /* We don't care if it died, higher level takes care of this */
 152         invoke_subshell (command, VISIBLY, old_vfs_dir ? NULL : &new_dir);
 153     }
 154     else
 155 #endif /* HAVE_SUBSHELL_SUPPORT */
 156         my_system (flags, lc_shell, command);
 157
 158     if (!(flags & EXECUTE_INTERNAL))
 159     {
 160         if ((pause_after_run == pause_always
 161              || (pause_after_run == pause_on_dumb_terminals && !xterm_flag
 162                  && !console_flag)) && quit == 0
 163 #ifdef HAVE_SUBSHELL_SUPPORT
 164             && subshell_state != RUNNING_COMMAND
 165 #endif /* HAVE_SUBSHELL_SUPPORT */
 166             )
 167         {
 168             printf (_("Press any key to continue..."));
 169             fflush (stdout);
 170             tty_raw_mode ();
 171             get_key_code (0);
 172             printf ("\r\n");
 173             fflush (stdout);
 174         }
 175         if (console_flag)
 176         {
 177             if (output_lines && keybar_visible)
 178             {
 179                 putchar ('\n');
 180                 fflush (stdout);
 181             }
 182         }
 183     }
 184
 185     if (console_flag)
 186         handle_console (CONSOLE_SAVE);
 187     edition_post_exec ();
 188
 189 #ifdef HAVE_SUBSHELL_SUPPORT
 190     if (new_dir)
 191         do_possible_cd (new_dir);
 192
 193 #endif /* HAVE_SUBSHELL_SUPPORT */
 194
 195     if (old_vfs_dir)
 196     {
 197         mc_chdir (old_vfs_dir);
 198         g_free (old_vfs_dir);
 199     }
 200
 201     if (mc_run_mode == MC_RUN_FULL)
 202     {
 203         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 204         update_xterm_title_path ();
 205     }
 206
 207     do_refresh ();
 208     use_dash (TRUE);
 209 }
 210
 211 /* --------------------------------------------------------------------------------------------- */
 212
 213 static void
 214 do_suspend_cmd (void)
 215 {
 216     pre_exec ();
 217
 218     if (console_flag && !use_subshell)
 219         handle_console (CONSOLE_RESTORE);
 220
 221 #ifdef SIGTSTP
 222     {
 223         struct sigaction sigtstp_action;
 224
 225         /* Make sure that the SIGTSTP below will suspend us directly,
 226            without calling ncurses' SIGTSTP handler; we *don't* want
 227            ncurses to redraw the screen immediately after the SIGCONT */
 228         sigaction (SIGTSTP, &startup_handler, &sigtstp_action);
 229
 230         kill (getpid (), SIGTSTP);
 231
 232         /* Restore previous SIGTSTP action */
 233         sigaction (SIGTSTP, &sigtstp_action, NULL);
 234     }
 235 #endif /* SIGTSTP */
 236
 237     if (console_flag && !use_subshell)
 238         handle_console (CONSOLE_SAVE);
 239
 240     edition_post_exec ();
 241 }
 242
 243 /* --------------------------------------------------------------------------------------------- */
 244 /*** public functions ****************************************************************************/
 245 /* --------------------------------------------------------------------------------------------- */
 246
 247 /** Set up the terminal before executing a program */
 248
 249 void
 250 pre_exec (void)
 251 {
 252     use_dash (FALSE);
 253     edition_pre_exec ();
 254 }
 255
 256 /* --------------------------------------------------------------------------------------------- */
 257 /** Hide the terminal after executing a program */
 258 void
 259 post_exec (void)
 260 {
 261     edition_post_exec ();
 262     use_dash (TRUE);
 263 }
 264
 265 /* --------------------------------------------------------------------------------------------- */
 266 /* Executes a command */
 267
 268 void
 269 shell_execute (const char *command, int flags)
 270 {
 271     char *cmd = NULL;
 272
 273     if (flags & EXECUTE_HIDE)
 274     {
 275         cmd = g_strconcat (" ", command, (char *) NULL);
 276         flags ^= EXECUTE_HIDE;
 277     }
 278
 279 #ifdef HAVE_SUBSHELL_SUPPORT
 280     if (use_subshell)
 281         if (subshell_state == INACTIVE)
 282             do_execute (shell, cmd ? cmd : command, flags | EXECUTE_AS_SHELL);
 283         else
 284             message (D_ERROR, MSG_ERROR, _("The shell is already running a command"));
 285     else
 286 #endif /* HAVE_SUBSHELL_SUPPORT */
 287         do_execute (shell, cmd ? cmd : command, flags | EXECUTE_AS_SHELL);
 288
 289     g_free (cmd);
 290 }
 291
 292 /* --------------------------------------------------------------------------------------------- */
 293
 294 void
 295 exec_shell (void)
 296 {
 297     do_execute (shell, 0, 0);
 298 }
 299
 300 /* --------------------------------------------------------------------------------------------- */
 301
 302 void
 303 toggle_panels (void)
 304 {
 305 #ifdef HAVE_SUBSHELL_SUPPORT
 306     char *new_dir = NULL;
 307     char **new_dir_p;
 308 #endif /* HAVE_SUBSHELL_SUPPORT */
 309
 310     channels_down ();
 311     disable_mouse ();
 312     if (clear_before_exec)
 313         clr_scr ();
 314     if (alternate_plus_minus)
 315         numeric_keypad_mode ();
 316 #ifndef HAVE_SLANG
 317     /* With slang we don't want any of this, since there
 318      * is no raw_mode supported
 319      */
 320     tty_reset_shell_mode ();
 321 #endif /* !HAVE_SLANG */
 322     tty_noecho ();
 323     tty_keypad (FALSE);
 324     tty_reset_screen ();
 325     do_exit_ca_mode ();
 326     tty_raw_mode ();
 327     if (console_flag)
 328         handle_console (CONSOLE_RESTORE);
 329
 330 #ifdef HAVE_SUBSHELL_SUPPORT
 331     if (use_subshell)
 332     {
 333         new_dir_p = vfs_current_is_local ()? &new_dir : NULL;
 334         invoke_subshell (NULL, VISIBLY, new_dir_p);
 335     }
 336     else
 337 #endif /* HAVE_SUBSHELL_SUPPORT */
 338     {
 339         if (output_starts_shell)
 340         {
 341             fprintf (stderr, _("Type `exit' to return to the Midnight Commander"));
 342             fprintf (stderr, "\n\r\n\r");
 343
 344             my_system (EXECUTE_INTERNAL, shell, NULL);
 345         }
 346         else
 347             get_key_code (0);
 348     }
 349
 350     if (console_flag)
 351         handle_console (CONSOLE_SAVE);
 352
 353     do_enter_ca_mode ();
 354
 355     tty_reset_prog_mode ();
 356     tty_keypad (TRUE);
 357
 358     /* Prevent screen flash when user did 'exit' or 'logout' within
 359        subshell */
 360     if ((quit & SUBSHELL_EXIT) != 0)
 361     {
 362         /* User did `exit' or `logout': quit MC */
 363         if (quiet_quit_cmd ())
 364             return;
 365
 366         quit = 0;
 367 #ifdef HAVE_SUBSHELL_SUPPORT
 368         /* restart subshell */
 369         if (use_subshell)
 370             init_subshell ();
 371 #endif /* HAVE_SUBSHELL_SUPPORT */
 372     }
 373
 374     enable_mouse ();
 375     channels_up ();
 376     if (alternate_plus_minus)
 377         application_keypad_mode ();
 378
 379 #ifdef HAVE_SUBSHELL_SUPPORT
 380     if (use_subshell)
 381     {
 382         load_prompt (0, NULL);
 383         if (new_dir)
 384             do_possible_cd (new_dir);
 385         if (console_flag && output_lines)
 386             show_console_contents (output_start_y,
 387                                    LINES - keybar_visible - output_lines -
 388                                    1, LINES - keybar_visible - 1);
 389     }
 390 #endif /* HAVE_SUBSHELL_SUPPORT */
 391
 392     if (mc_run_mode == MC_RUN_FULL)
 393     {
 394         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 395         update_xterm_title_path ();
 396     }
 397     repaint_screen ();
 398 }
 399
 400 /* --------------------------------------------------------------------------------------------- */
 401
 402 void
 403 suspend_cmd (void)
 404 {
 405     if (mc_run_mode == MC_RUN_FULL)
 406         save_cwds_stat ();
 407     do_suspend_cmd ();
 408     if (mc_run_mode == MC_RUN_FULL)
 409         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 410     do_refresh ();
 411 }
 412
 413 /* --------------------------------------------------------------------------------------------- */
 414 /**
 415  * Execute command on a filename that can be on VFS.
 416  * Errors are reported to the user.
 417  */
 418
 419 void
 420 execute_with_vfs_arg (const char *command, const char *filename)
 421 {
 422     char *localcopy;
 423     char *fn;
 424     struct stat st;
 425     time_t mtime;
 426
 427     /* Simplest case, this file is local */
 428     if (!filename || vfs_file_is_local (filename))
 429     {
 430         fn = vfs_canon_and_translate (filename);
 431         do_execute (command, fn, EXECUTE_INTERNAL);
 432         g_free (fn);
 433         return;
 434     }
 435
 436     /* FIXME: Creation of new files on VFS is not supported */
 437     if (!*filename)
 438         return;
 439
 440     localcopy = mc_getlocalcopy (filename);
 441     if (localcopy == NULL)
 442     {
 443         message (D_ERROR, MSG_ERROR, _("Cannot fetch a local copy of %s"), filename);
 444         return;
 445     }
 446
 447     /*
 448      * filename can be an entry on panel, it can be changed by executing
 449      * the command, so make a copy.  Smarter VFS code would make the code
 450      * below unnecessary.
 451      */
 452     fn = g_strdup (filename);
 453     mc_stat (localcopy, &st);
 454     mtime = st.st_mtime;
 455     do_execute (command, localcopy, EXECUTE_INTERNAL);
 456     mc_stat (localcopy, &st);
 457     mc_ungetlocalcopy (fn, localcopy, mtime != st.st_mtime);
 458     g_free (localcopy);
 459     g_free (fn);
 460 }
 461
 462 /* --------------------------------------------------------------------------------------------- */