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 }