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
  34 #include "main.h"
  35 #include "consaver/cons.saver.h"
  36 #include "subshell.h"
  37 #include "layout.h"
  38 #include "dialog.h"
  39 #include "wtools.h"
  40 #include "panel.h"              /* update_panels() */
  41 #include "execute.h"
  42 #include "lib/vfs/mc-vfs/vfs.h"
  43
  44
  45 static void
  46 edition_post_exec (void)
  47 {
  48     do_enter_ca_mode ();
  49
  50     /* FIXME: Missing on slang endwin? */
  51     tty_reset_prog_mode ();
  52     tty_flush_input ();
  53
  54     tty_keypad (TRUE);
  55     tty_raw_mode ();
  56     channels_up ();
  57     enable_mouse ();
  58     if (alternate_plus_minus)
  59         application_keypad_mode ();
  60 }
  61
  62
  63 static void
  64 edition_pre_exec (void)
  65 {
  66     if (clear_before_exec)
  67         clr_scr ();
  68     else
  69     {
  70         if (!(console_flag || xterm_flag))
  71             printf ("\n\n");
  72     }
  73
  74     channels_down ();
  75     disable_mouse ();
  76
  77     tty_reset_shell_mode ();
  78     tty_keypad (FALSE);
  79     tty_reset_screen ();
  80
  81     numeric_keypad_mode ();
  82
  83     /* on xterms: maybe endwin did not leave the terminal on the shell
  84      * screen page: do it now.
  85      *
  86      * Do not move this before endwin: in some systems rmcup includes
  87      * a call to clear screen, so it will end up clearing the shell screen.
  88      */
  89     do_exit_ca_mode ();
  90 }
  91
  92
  93 /* Set up the terminal before executing a program */
  94 static void
  95 pre_exec (void)
  96 {
  97     use_dash (0);
  98     edition_pre_exec ();
  99 }
 100
 101
 102 #ifdef HAVE_SUBSHELL_SUPPORT
 103 static void
 104 do_possible_cd (const char *new_dir)
 105 {
 106     if (!do_cd (new_dir, cd_exact))
 107         message (D_ERROR, _("Warning"),
 108                  _("The Commander can't change to the directory that\n"
 109                    "the subshell claims you are in. Perhaps you have\n"
 110                    "deleted your working directory, or given yourself\n"
 111                    "extra access permissions with the \"su\" command?"));
 112 }
 113 #endif /* HAVE_SUBSHELL_SUPPORT */
 114
 115 static void
 116 do_execute (const char *lc_shell, const char *command, int flags)
 117 {
 118 #ifdef HAVE_SUBSHELL_SUPPORT
 119     char *new_dir = NULL;
 120 #endif /* HAVE_SUBSHELL_SUPPORT */
 121
 122 #ifdef ENABLE_VFS
 123     char *old_vfs_dir = 0;
 124
 125     if (!vfs_current_is_local ())
 126         old_vfs_dir = g_strdup (vfs_get_current_dir ());
 127 #endif /* ENABLE_VFS */
 128
 129     if (mc_run_mode == MC_RUN_FULL)
 130         save_cwds_stat ();
 131     pre_exec ();
 132     if (console_flag)
 133         handle_console (CONSOLE_RESTORE);
 134
 135     if (!use_subshell && command && !(flags & EXECUTE_INTERNAL))
 136     {
 137         printf ("%s%s\n", mc_prompt, command);
 138         fflush (stdout);
 139     }
 140 #ifdef HAVE_SUBSHELL_SUPPORT
 141     if (use_subshell && !(flags & EXECUTE_INTERNAL))
 142     {
 143         do_update_prompt ();
 144
 145         /* We don't care if it died, higher level takes care of this */
 146 #ifdef ENABLE_VFS
 147         invoke_subshell (command, VISIBLY, old_vfs_dir ? NULL : &new_dir);
 148 #else
 149         invoke_subshell (command, VISIBLY, &new_dir);
 150 #endif /* !ENABLE_VFS */
 151     }
 152     else
 153 #endif /* HAVE_SUBSHELL_SUPPORT */
 154         my_system (flags, lc_shell, command);
 155
 156     if (!(flags & EXECUTE_INTERNAL))
 157     {
 158         if ((pause_after_run == pause_always
 159              || (pause_after_run == pause_on_dumb_terminals && !xterm_flag
 160                  && !console_flag)) && !quit
 161 #ifdef HAVE_SUBSHELL_SUPPORT
 162             && subshell_state != RUNNING_COMMAND
 163 #endif /* HAVE_SUBSHELL_SUPPORT */
 164             )
 165         {
 166             printf (_("Press any key to continue..."));
 167             fflush (stdout);
 168             tty_raw_mode ();
 169             get_key_code (0);
 170             printf ("\r\n");
 171             fflush (stdout);
 172         }
 173         if (console_flag)
 174         {
 175             if (output_lines && keybar_visible)
 176             {
 177                 putchar ('\n');
 178                 fflush (stdout);
 179             }
 180         }
 181     }
 182
 183     if (console_flag)
 184         handle_console (CONSOLE_SAVE);
 185     edition_post_exec ();
 186
 187 #ifdef HAVE_SUBSHELL_SUPPORT
 188     if (new_dir)
 189         do_possible_cd (new_dir);
 190
 191 #endif /* HAVE_SUBSHELL_SUPPORT */
 192
 193 #ifdef ENABLE_VFS
 194     if (old_vfs_dir)
 195     {
 196         mc_chdir (old_vfs_dir);
 197         g_free (old_vfs_dir);
 198     }
 199 #endif /* ENABLE_VFS */
 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 /* Executes a command */
 213 void
 214 shell_execute (const char *command, int flags)
 215 {
 216     char *cmd = NULL;
 217
 218     if (flags & EXECUTE_HIDE)
 219     {
 220         cmd = g_strconcat (" ", command, (char *) NULL);
 221         flags ^= EXECUTE_HIDE;
 222     }
 223
 224 #ifdef HAVE_SUBSHELL_SUPPORT
 225     if (use_subshell)
 226         if (subshell_state == INACTIVE)
 227             do_execute (shell, cmd ? cmd : command, flags | EXECUTE_AS_SHELL);
 228         else
 229             message (D_ERROR, MSG_ERROR, _("The shell is already running a command"));
 230     else
 231 #endif /* HAVE_SUBSHELL_SUPPORT */
 232         do_execute (shell, cmd ? cmd : command, flags | EXECUTE_AS_SHELL);
 233
 234     g_free (cmd);
 235 }
 236
 237
 238 void
 239 exec_shell (void)
 240 {
 241     do_execute (shell, 0, 0);
 242 }
 243
 244
 245 void
 246 toggle_panels (void)
 247 {
 248 #ifdef HAVE_SUBSHELL_SUPPORT
 249     char *new_dir = NULL;
 250     char **new_dir_p;
 251 #endif /* HAVE_SUBSHELL_SUPPORT */
 252
 253     channels_down ();
 254     disable_mouse ();
 255     if (clear_before_exec)
 256         clr_scr ();
 257     if (alternate_plus_minus)
 258         numeric_keypad_mode ();
 259 #ifndef HAVE_SLANG
 260     /* With slang we don't want any of this, since there
 261      * is no raw_mode supported
 262      */
 263     tty_reset_shell_mode ();
 264 #endif /* !HAVE_SLANG */
 265     tty_noecho ();
 266     tty_keypad (FALSE);
 267     tty_reset_screen ();
 268     do_exit_ca_mode ();
 269     tty_raw_mode ();
 270     if (console_flag)
 271         handle_console (CONSOLE_RESTORE);
 272
 273 #ifdef HAVE_SUBSHELL_SUPPORT
 274     if (use_subshell)
 275     {
 276         new_dir_p = vfs_current_is_local ()? &new_dir : NULL;
 277         if (invoke_subshell (NULL, VISIBLY, new_dir_p))
 278             quiet_quit_cmd ();  /* User did `exit' or `logout': quit MC quietly */
 279     }
 280     else
 281 #endif /* HAVE_SUBSHELL_SUPPORT */
 282     {
 283         if (output_starts_shell)
 284         {
 285             fprintf (stderr, _("Type `exit' to return to the Midnight Commander"));
 286             fprintf (stderr, "\n\r\n\r");
 287
 288             my_system (EXECUTE_INTERNAL, shell, NULL);
 289         }
 290         else
 291             get_key_code (0);
 292     }
 293     if (console_flag)
 294         handle_console (CONSOLE_SAVE);
 295
 296     do_enter_ca_mode ();
 297
 298     tty_reset_prog_mode ();
 299     tty_keypad (TRUE);
 300
 301     /* Prevent screen flash when user did 'exit' or 'logout' within
 302        subshell */
 303     if (quit)
 304         return;
 305
 306     enable_mouse ();
 307     channels_up ();
 308     if (alternate_plus_minus)
 309         application_keypad_mode ();
 310
 311 #ifdef HAVE_SUBSHELL_SUPPORT
 312     if (use_subshell)
 313     {
 314         load_prompt (0, 0);
 315         if (new_dir)
 316             do_possible_cd (new_dir);
 317         if (console_flag && output_lines)
 318             show_console_contents (output_start_y,
 319                                    LINES - keybar_visible - output_lines -
 320                                    1, LINES - keybar_visible - 1);
 321     }
 322 #endif /* HAVE_SUBSHELL_SUPPORT */
 323
 324     if (mc_run_mode == MC_RUN_FULL)
 325     {
 326         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 327         update_xterm_title_path ();
 328     }
 329     repaint_screen ();
 330 }
 331
 332
 333 static void
 334 do_suspend_cmd (void)
 335 {
 336     pre_exec ();
 337
 338     if (console_flag && !use_subshell)
 339         handle_console (CONSOLE_RESTORE);
 340
 341 #ifdef SIGTSTP
 342     {
 343         struct sigaction sigtstp_action;
 344
 345         /* Make sure that the SIGTSTP below will suspend us directly,
 346            without calling ncurses' SIGTSTP handler; we *don't* want
 347            ncurses to redraw the screen immediately after the SIGCONT */
 348         sigaction (SIGTSTP, &startup_handler, &sigtstp_action);
 349
 350         kill (getpid (), SIGTSTP);
 351
 352         /* Restore previous SIGTSTP action */
 353         sigaction (SIGTSTP, &sigtstp_action, NULL);
 354     }
 355 #endif /* SIGTSTP */
 356
 357     if (console_flag && !use_subshell)
 358         handle_console (CONSOLE_SAVE);
 359
 360     edition_post_exec ();
 361 }
 362
 363
 364 void
 365 suspend_cmd (void)
 366 {
 367     if (mc_run_mode == MC_RUN_FULL)
 368         save_cwds_stat ();
 369     do_suspend_cmd ();
 370     if (mc_run_mode == MC_RUN_FULL)
 371         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 372     do_refresh ();
 373 }
 374
 375
 376 /*
 377  * Execute command on a filename that can be on VFS.
 378  * Errors are reported to the user.
 379  */
 380 void
 381 execute_with_vfs_arg (const char *command, const char *filename)
 382 {
 383     char *localcopy;
 384     char *fn;
 385     struct stat st;
 386     time_t mtime;
 387
 388     /* Simplest case, this file is local */
 389     if (!filename || vfs_file_is_local (filename))
 390     {
 391         fn = vfs_canon_and_translate (filename);
 392         do_execute (command, fn, EXECUTE_INTERNAL);
 393         g_free (fn);
 394         return;
 395     }
 396
 397     /* FIXME: Creation of new files on VFS is not supported */
 398     if (!*filename)
 399         return;
 400
 401     localcopy = mc_getlocalcopy (filename);
 402     if (localcopy == NULL)
 403     {
 404         message (D_ERROR, MSG_ERROR, _("Cannot fetch a local copy of %s"), filename);
 405         return;
 406     }
 407
 408     /*
 409      * filename can be an entry on panel, it can be changed by executing
 410      * the command, so make a copy.  Smarter VFS code would make the code
 411      * below unnecessary.
 412      */
 413     fn = g_strdup (filename);
 414     mc_stat (localcopy, &st);
 415     mtime = st.st_mtime;
 416     do_execute (command, localcopy, EXECUTE_INTERNAL);
 417     mc_stat (localcopy, &st);
 418     mc_ungetlocalcopy (fn, localcopy, mtime != st.st_mtime);
 419     g_free (localcopy);
 420     g_free (fn);
 421 }