src/filemanager/cmd.c

   1 /*
   2    Routines invoked by a function key
   3    They normally operate on the current panel.
   4
   5    Copyright (C) 1994, 1995, 1998, 1999, 2000, 2001, 2002, 2003, 2004,
   6    2005, 2006, 2007, 2009, 2011
   7    The Free Software Foundation, Inc.
   8
   9    This file is part of the Midnight Commander.
  10
  11    The Midnight Commander is free software: you can redistribute it
  12    and/or modify it under the terms of the GNU General Public License as
  13    published by the Free Software Foundation, either version 3 of the License,
  14    or (at your option) any later version.
  15
  16    The Midnight Commander is distributed in the hope that it will be useful,
  17    but WITHOUT ANY WARRANTY; without even the implied warranty of
  18    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  19    GNU General Public License for more details.
  20
  21    You should have received a copy of the GNU General Public License
  22    along with this program.  If not, see <http://www.gnu.org/licenses/>.
  23  */
  24
  25 /** \file cmd.c
  26  *  \brief Source: routines invoked by a function key
  27  *
  28  *  They normally operate on the current panel.
  29  */
  30
  31 #include <config.h>
  32
  33 #include <errno.h>
  34 #include <stdio.h>
  35 #include <string.h>
  36
  37 #include <sys/types.h>
  38 #include <sys/stat.h>
  39 #ifdef HAVE_MMAP
  40 #include <sys/mman.h>
  41 #endif
  42 #ifdef ENABLE_VFS_NET
  43 #include <netdb.h>
  44 #endif
  45 #include <unistd.h>
  46 #include <stdlib.h>
  47 #include <fcntl.h>
  48 #include <pwd.h>
  49 #include <grp.h>
  50 #include <sys/time.h>
  51
  52 #include "lib/global.h"
  53
  54 #include "lib/tty/tty.h"        /* LINES, tty_touch_screen() */
  55 #include "lib/tty/key.h"        /* ALT() macro */
  56 #include "lib/tty/win.h"        /* do_enter_ca_mode() */
  57 #include "lib/mcconfig.h"
  58 #include "lib/search.h"
  59 #include "lib/filehighlight.h"  /* MC_FHL_INI_FILE */
  60 #include "lib/vfs/vfs.h"
  61 #include "lib/fileloc.h"
  62 #include "lib/strutil.h"
  63 #include "lib/util.h"
  64 #include "lib/widget.h"
  65 #include "lib/keybind.h"        /* CK_Down, CK_History */
  66 #include "lib/event.h"          /* mc_event_raise() */
  67
  68 #include "src/viewer/mcviewer.h"
  69 #include "src/setup.h"
  70 #include "src/execute.h"        /* toggle_panels() */
  71 #include "src/history.h"
  72 #include "src/util.h"           /* check_for_default() */
  73
  74 #ifdef USE_INTERNAL_EDIT
  75 #include "src/editor/edit.h"
  76 #endif
  77
  78 #ifdef USE_DIFF_VIEW
  79 #include "src/diffviewer/ydiff.h"
  80 #endif
  81
  82 #include "fileopctx.h"
  83 #include "file.h"               /* file operation routines */
  84 #include "find.h"               /* find_file() */
  85 #include "hotlist.h"            /* hotlist_show() */
  86 #include "panel.h"              /* WPanel */
  87 #include "tree.h"               /* tree_chdir() */
  88 #include "midnight.h"           /* change_panel() */
  89 #include "usermenu.h"           /* MC_GLOBAL_MENU */
  90 #include "command.h"            /* cmdline */
  91 #include "layout.h"             /* get_current_type() */
  92 #include "ext.h"                /* regex_command() */
  93 #include "boxes.h"              /* cd_dialog() */
  94 #include "dir.h"
  95
  96 #include "cmd.h"                /* Our definitions */
  97
  98 /*** global variables ****************************************************************************/
  99
 100 int select_flags = SELECT_MATCH_CASE | SELECT_SHELL_PATTERNS;
 101
 102 /*** file scope macro definitions ****************************************************************/
 103
 104 #ifndef MAP_FILE
 105 #define MAP_FILE 0
 106 #endif
 107
 108 /*** file scope type declarations ****************************************************************/
 109
 110 enum CompareMode
 111 {
 112     compare_quick, compare_size_only, compare_thourough
 113 };
 114
 115 /*** file scope variables ************************************************************************/
 116
 117 #ifdef ENABLE_VFS_NET
 118 static const char *machine_str = N_("Enter machine name (F1 for details):");
 119 #endif /* ENABLE_VFS_NET */
 120
 121 /*** file scope functions ************************************************************************/
 122 /* --------------------------------------------------------------------------------------------- */
 123
 124 /** scan_for_file (panel, idx, direction)
 125  *
 126  * Inputs:
 127  *   panel:     pointer to the panel on which we operate
 128  *   idx:       starting file.
 129  *   direction: 1, or -1
 130  */
 131
 132 static int
 133 scan_for_file (WPanel * panel, int idx, int direction)
 134 {
 135     int i = idx + direction;
 136
 137     while (i != idx)
 138     {
 139         if (i < 0)
 140             i = panel->count - 1;
 141         if (i == panel->count)
 142             i = 0;
 143         if (!S_ISDIR (panel->dir.list[i].st.st_mode))
 144             return i;
 145         i += direction;
 146     }
 147     return i;
 148 }
 149
 150 /* --------------------------------------------------------------------------------------------- */
 151 /**
 152  * Run viewer (internal or external) on the currently selected file.
 153  * If normal is TRUE, force internal viewer and raw mode (used for F13).
 154  */
 155 static void
 156 do_view_cmd (gboolean normal)
 157 {
 158     /* Directories are viewed by changing to them */
 159     if (S_ISDIR (selection (current_panel)->st.st_mode) || link_isdir (selection (current_panel)))
 160     {
 161         if (confirm_view_dir && (current_panel->marked || current_panel->dirs_marked))
 162         {
 163             if (query_dialog
 164                 (_("Confirmation"), _("Files tagged, want to cd?"), D_NORMAL, 2,
 165                  _("&Yes"), _("&No")) != 0)
 166             {
 167                 return;
 168             }
 169         }
 170         if (!do_cd (selection (current_panel)->fname, cd_exact))
 171             message (D_ERROR, MSG_ERROR, _("Cannot change directory"));
 172     }
 173     else
 174     {
 175         int file_idx;
 176
 177         file_idx = current_panel->selected;
 178
 179         while (TRUE)
 180         {
 181             char *filename;
 182             int dir;
 183
 184             filename = current_panel->dir.list[file_idx].fname;
 185             dir = view_file (filename, normal, use_internal_view);
 186             if (dir == 0)
 187                 break;
 188             file_idx = scan_for_file (current_panel, file_idx, dir);
 189         }
 190     }
 191
 192     repaint_screen ();
 193 }
 194
 195 /* --------------------------------------------------------------------------------------------- */
 196
 197 static inline void
 198 do_edit (const char *what)
 199 {
 200     do_edit_at_line (what, use_internal_edit, 0);
 201 }
 202
 203 /* --------------------------------------------------------------------------------------------- */
 204
 205 static void
 206 set_panel_filter_to (WPanel * p, char *allocated_filter_string)
 207 {
 208     g_free (p->filter);
 209     p->filter = 0;
 210
 211     if (!(allocated_filter_string[0] == '*' && allocated_filter_string[1] == 0))
 212         p->filter = allocated_filter_string;
 213     else
 214         g_free (allocated_filter_string);
 215     reread_cmd ();
 216 }
 217
 218 /* --------------------------------------------------------------------------------------------- */
 219 /** Set a given panel filter expression */
 220
 221 static void
 222 set_panel_filter (WPanel * p)
 223 {
 224     char *reg_exp;
 225     const char *x;
 226
 227     x = p->filter ? p->filter : easy_patterns ? "*" : ".";
 228
 229     reg_exp = input_dialog_help (_("Filter"),
 230                                  _("Set expression for filtering filenames"),
 231                                  "[Filter...]", MC_HISTORY_FM_PANEL_FILTER, x);
 232     if (!reg_exp)
 233         return;
 234     set_panel_filter_to (p, reg_exp);
 235 }
 236
 237 /* --------------------------------------------------------------------------------------------- */
 238
 239 static void
 240 select_unselect_cmd (const char *title, const char *history_name, gboolean do_select)
 241 {
 242     /* dialog sizes */
 243     const int DX = 50;
 244     const int DY = 7;
 245
 246     int files_only = (select_flags & SELECT_FILES_ONLY) != 0;
 247     int case_sens = (select_flags & SELECT_MATCH_CASE) != 0;
 248     int shell_patterns = (select_flags & SELECT_SHELL_PATTERNS) != 0;
 249
 250     char *reg_exp;
 251     mc_search_t *search;
 252     int i;
 253
 254     QuickWidget quick_widgets[] = {
 255         QUICK_CHECKBOX (3, DX, DY - 3, DY, N_("&Using shell patterns"), &shell_patterns),
 256         QUICK_CHECKBOX (DX / 2 + 1, DX, DY - 4, DY, N_("&Case sensitive"), &case_sens),
 257         QUICK_CHECKBOX (3, DX, DY - 4, DY, N_("&Files only"), &files_only),
 258         QUICK_INPUT (3, DX, DY - 5, DY, INPUT_LAST_TEXT, DX - 6, 0, history_name, &reg_exp),
 259         QUICK_END
 260     };
 261
 262     QuickDialog quick_dlg = {
 263         DX, DY, -1, -1, title,
 264         "[Select/Unselect Files]", quick_widgets, NULL, FALSE
 265     };
 266
 267     if (quick_dialog (&quick_dlg) == B_CANCEL)
 268         return;
 269
 270     if (!reg_exp)
 271         return;
 272     if (!*reg_exp)
 273     {
 274         g_free (reg_exp);
 275         return;
 276     }
 277     search = mc_search_new (reg_exp, -1);
 278     search->search_type = (shell_patterns != 0) ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
 279     search->is_entire_line = TRUE;
 280     search->is_case_sensitive = case_sens != 0;
 281
 282     for (i = 0; i < current_panel->count; i++)
 283     {
 284         if (strcmp (current_panel->dir.list[i].fname, "..") == 0)
 285             continue;
 286         if (S_ISDIR (current_panel->dir.list[i].st.st_mode) && files_only != 0)
 287             continue;
 288
 289         if (mc_search_run (search, current_panel->dir.list[i].fname,
 290                            0, current_panel->dir.list[i].fnamelen, NULL))
 291             do_file_mark (current_panel, i, do_select);
 292     }
 293
 294     mc_search_free (search);
 295     g_free (reg_exp);
 296
 297     /* result flags */
 298     select_flags = 0;
 299     if (case_sens != 0)
 300         select_flags |= SELECT_MATCH_CASE;
 301     if (files_only != 0)
 302         select_flags |= SELECT_FILES_ONLY;
 303     if (shell_patterns != 0)
 304         select_flags |= SELECT_SHELL_PATTERNS;
 305 }
 306
 307 /* --------------------------------------------------------------------------------------------- */
 308
 309 static int
 310 compare_files (char *name1, char *name2, off_t size)
 311 {
 312     int file1, file2;
 313     int result = -1;            /* Different by default */
 314
 315     if (size == 0)
 316         return 0;
 317
 318     file1 = open (name1, O_RDONLY);
 319     if (file1 >= 0)
 320     {
 321         file2 = open (name2, O_RDONLY);
 322         if (file2 >= 0)
 323         {
 324 #ifdef HAVE_MMAP
 325             char *data1, *data2;
 326             /* Ugly if jungle */
 327             data1 = mmap (0, size, PROT_READ, MAP_FILE | MAP_PRIVATE, file1, 0);
 328             if (data1 != (char *) -1)
 329             {
 330                 data2 = mmap (0, size, PROT_READ, MAP_FILE | MAP_PRIVATE, file2, 0);
 331                 if (data2 != (char *) -1)
 332                 {
 333                     rotate_dash ();
 334                     result = memcmp (data1, data2, size);
 335                     munmap (data2, size);
 336                 }
 337                 munmap (data1, size);
 338             }
 339 #else
 340             /* Don't have mmap() :( Even more ugly :) */
 341             char buf1[BUFSIZ], buf2[BUFSIZ];
 342             int n1, n2;
 343             rotate_dash ();
 344             do
 345             {
 346                 while ((n1 = read (file1, buf1, BUFSIZ)) == -1 && errno == EINTR);
 347                 while ((n2 = read (file2, buf2, BUFSIZ)) == -1 && errno == EINTR);
 348             }
 349             while (n1 == n2 && n1 == BUFSIZ && !memcmp (buf1, buf2, BUFSIZ));
 350             result = (n1 != n2) || memcmp (buf1, buf2, n1);
 351 #endif /* !HAVE_MMAP */
 352             close (file2);
 353         }
 354         close (file1);
 355     }
 356     return result;
 357 }
 358
 359 /* --------------------------------------------------------------------------------------------- */
 360
 361 static void
 362 compare_dir (WPanel * panel, WPanel * other, enum CompareMode mode)
 363 {
 364     int i, j;
 365     char *src_name, *dst_name;
 366
 367     /* No marks by default */
 368     panel->marked = 0;
 369     panel->total = 0;
 370     panel->dirs_marked = 0;
 371
 372     /* Handle all files in the panel */
 373     for (i = 0; i < panel->count; i++)
 374     {
 375         file_entry *source = &panel->dir.list[i];
 376
 377         /* Default: unmarked */
 378         file_mark (panel, i, 0);
 379
 380         /* Skip directories */
 381         if (S_ISDIR (source->st.st_mode))
 382             continue;
 383
 384         /* Search the corresponding entry from the other panel */
 385         for (j = 0; j < other->count; j++)
 386         {
 387             if (strcmp (source->fname, other->dir.list[j].fname) == 0)
 388                 break;
 389         }
 390         if (j >= other->count)
 391             /* Not found -> mark */
 392             do_file_mark (panel, i, 1);
 393         else
 394         {
 395             /* Found */
 396             file_entry *target = &other->dir.list[j];
 397
 398             if (mode != compare_size_only)
 399             {
 400                 /* Older version is not marked */
 401                 if (source->st.st_mtime < target->st.st_mtime)
 402                     continue;
 403             }
 404
 405             /* Newer version with different size is marked */
 406             if (source->st.st_size != target->st.st_size)
 407             {
 408                 do_file_mark (panel, i, 1);
 409                 continue;
 410
 411             }
 412             if (mode == compare_size_only)
 413                 continue;
 414
 415             if (mode == compare_quick)
 416             {
 417                 /* Thorough compare off, compare only time stamps */
 418                 /* Mark newer version, don't mark version with the same date */
 419                 if (source->st.st_mtime > target->st.st_mtime)
 420                 {
 421                     do_file_mark (panel, i, 1);
 422                 }
 423                 continue;
 424             }
 425
 426             /* Thorough compare on, do byte-by-byte comparison */
 427             src_name = concat_dir_and_file (panel->cwd, source->fname);
 428             dst_name = concat_dir_and_file (other->cwd, target->fname);
 429             if (compare_files (src_name, dst_name, source->st.st_size))
 430                 do_file_mark (panel, i, 1);
 431             g_free (src_name);
 432             g_free (dst_name);
 433         }
 434     }                           /* for (i ...) */
 435 }
 436
 437 /* --------------------------------------------------------------------------------------------- */
 438
 439 static void
 440 do_link (link_type_t link_type, const char *fname)
 441 {
 442     char *dest = NULL, *src = NULL;
 443     vfs_path_t *fname_vpath, *dest_vpath = NULL;
 444
 445     fname_vpath = vfs_path_from_str (fname);
 446     if (link_type == LINK_HARDLINK)
 447     {
 448         src = g_strdup_printf (_("Link %s to:"), str_trunc (fname, 46));
 449         dest = input_expand_dialog (_("Link"), src, MC_HISTORY_FM_LINK, "");
 450         if (!dest || !*dest)
 451             goto cleanup;
 452         save_cwds_stat ();
 453         dest_vpath = vfs_path_from_str (dest);
 454         if (-1 == mc_link (fname_vpath, dest_vpath))
 455             message (D_ERROR, MSG_ERROR, _("link: %s"), unix_error_string (errno));
 456     }
 457     else
 458     {
 459         char *s;
 460         char *d;
 461         vfs_path_t *src_vpath;
 462
 463         /* suggest the full path for symlink, and either the full or
 464            relative path to the file it points to  */
 465         s = concat_dir_and_file (current_panel->cwd, fname);
 466
 467         if (get_other_type () == view_listing)
 468             d = concat_dir_and_file (other_panel->cwd, fname);
 469         else
 470             d = g_strdup (fname);
 471
 472         if (link_type == LINK_SYMLINK_RELATIVE)
 473             s = diff_two_paths (other_panel->cwd, s);
 474
 475         symlink_dialog (s, d, &dest, &src);
 476         g_free (d);
 477         g_free (s);
 478
 479         if (!dest || !*dest || !src || !*src)
 480             goto cleanup;
 481         save_cwds_stat ();
 482
 483         dest_vpath = vfs_path_from_str_flags (dest, VPF_NO_CANON);
 484         src_vpath = vfs_path_from_str (src);
 485         if (mc_symlink (dest_vpath, src_vpath) == -1)
 486             message (D_ERROR, MSG_ERROR, _("symlink: %s"), unix_error_string (errno));
 487         vfs_path_free (src_vpath);
 488     }
 489
 490     update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 491     repaint_screen ();
 492
 493   cleanup:
 494     vfs_path_free (fname_vpath);
 495     vfs_path_free (dest_vpath);
 496     g_free (src);
 497     g_free (dest);
 498 }
 499
 500 /* --------------------------------------------------------------------------------------------- */
 501
 502 #if defined(ENABLE_VFS_UNDELFS) || defined(ENABLE_VFS_NET)
 503
 504 static const char *
 505 transform_prefix (const char *prefix)
 506 {
 507     static char buffer[BUF_TINY];
 508     size_t prefix_len = strlen (prefix);
 509
 510     if (prefix_len < 3)
 511         return prefix;
 512
 513     strcpy (buffer, prefix + 2);
 514     strcpy (buffer + prefix_len - 3, VFS_PATH_URL_DELIMITER);
 515     return buffer;
 516 }
 517
 518 /* --------------------------------------------------------------------------------------------- */
 519
 520 static void
 521 nice_cd (const char *text, const char *xtext, const char *help,
 522          const char *history_name, const char *prefix, int to_home)
 523 {
 524     char *machine;
 525     char *cd_path;
 526
 527     if (!SELECTED_IS_PANEL)
 528         return;
 529
 530     machine = input_dialog_help (text, xtext, help, history_name, "");
 531     if (!machine)
 532         return;
 533
 534     to_home = 0;                /* FIXME: how to solve going to home nicely? /~/ is
 535                                    ugly as hell and leads to problems in vfs layer */
 536
 537     /* default prefix in old-style format. */
 538     if (strncmp (prefix, machine, strlen (prefix)) != 0)
 539         prefix = transform_prefix (prefix);     /* Convert prefix to URL-style format */
 540
 541     if (strncmp (prefix, machine, strlen (prefix)) == 0)
 542         cd_path = g_strconcat (machine, to_home ? "/~/" : (char *) NULL, (char *) NULL);
 543     else
 544         cd_path = g_strconcat (prefix, machine, to_home ? "/~/" : (char *) NULL, (char *) NULL);
 545
 546     if (*cd_path != PATH_SEP)
 547     {
 548         char *tmp = cd_path;
 549         cd_path = g_strconcat (PATH_SEP_STR, tmp, (char *) NULL);
 550         g_free (tmp);
 551     }
 552
 553     if (!do_panel_cd (MENU_PANEL, cd_path, cd_parse_command))
 554         message (D_ERROR, MSG_ERROR, _("Cannot chdir to \"%s\""), cd_path);
 555     g_free (cd_path);
 556     g_free (machine);
 557 }
 558 #endif /* ENABLE_VFS_UNDELFS || ENABLE_VFS_NET */
 559
 560 /* --------------------------------------------------------------------------------------------- */
 561
 562 static void
 563 configure_panel_listing (WPanel * p, int list_type, int use_msformat, char *user, char *status)
 564 {
 565     p->user_mini_status = use_msformat;
 566     p->list_type = list_type;
 567
 568     if (list_type == list_user || use_msformat)
 569     {
 570         g_free (p->user_format);
 571         p->user_format = user;
 572
 573         g_free (p->user_status_format[list_type]);
 574         p->user_status_format[list_type] = status;
 575
 576         set_panel_formats (p);
 577     }
 578     else
 579     {
 580         g_free (user);
 581         g_free (status);
 582     }
 583
 584     set_panel_formats (p);
 585     do_refresh ();
 586 }
 587
 588 /* --------------------------------------------------------------------------------------------- */
 589
 590 static void
 591 switch_to_listing (int panel_index)
 592 {
 593     if (get_display_type (panel_index) != view_listing)
 594         set_display_type (panel_index, view_listing);
 595     else
 596     {
 597         WPanel *p;
 598
 599         p = (WPanel *) get_panel_widget (panel_index);
 600         if (p->is_panelized)
 601         {
 602             p->is_panelized = FALSE;
 603             panel_reload (p);
 604         }
 605     }
 606 }
 607
 608 /* --------------------------------------------------------------------------------------------- */
 609 /** Handle the tree internal listing modes switching */
 610
 611 static gboolean
 612 set_basic_panel_listing_to (int panel_index, int listing_mode)
 613 {
 614     WPanel *p = (WPanel *) get_panel_widget (panel_index);
 615     gboolean ok;
 616
 617     switch_to_listing (panel_index);
 618     p->list_type = listing_mode;
 619
 620     ok = set_panel_formats (p) == 0;
 621
 622     if (ok)
 623         do_refresh ();
 624
 625     return ok;
 626 }
 627
 628 /* --------------------------------------------------------------------------------------------- */
 629 /*** public functions ****************************************************************************/
 630 /* --------------------------------------------------------------------------------------------- */
 631
 632 int
 633 view_file_at_line (const char *filename, int plain_view, int internal, int start_line)
 634 {
 635     static const char *viewer = NULL;
 636     int move_dir = 0;
 637
 638     if (plain_view)
 639     {
 640         int changed_hex_mode = 0;
 641         int changed_nroff_flag = 0;
 642         int changed_magic_flag = 0;
 643
 644         mcview_altered_hex_mode = 0;
 645         mcview_altered_nroff_flag = 0;
 646         mcview_altered_magic_flag = 0;
 647         if (mcview_default_hex_mode)
 648             changed_hex_mode = 1;
 649         if (mcview_default_nroff_flag)
 650             changed_nroff_flag = 1;
 651         if (mcview_default_magic_flag)
 652             changed_magic_flag = 1;
 653         mcview_default_hex_mode = 0;
 654         mcview_default_nroff_flag = 0;
 655         mcview_default_magic_flag = 0;
 656
 657         switch (mcview_viewer (NULL, filename, start_line))
 658         {
 659         case MCVIEW_WANT_NEXT:
 660             move_dir = 1;
 661             break;
 662         case MCVIEW_WANT_PREV:
 663             move_dir = -1;
 664             break;
 665         default:
 666             move_dir = 0;
 667         }
 668
 669         if (changed_hex_mode && !mcview_altered_hex_mode)
 670             mcview_default_hex_mode = 1;
 671         if (changed_nroff_flag && !mcview_altered_nroff_flag)
 672             mcview_default_nroff_flag = 1;
 673         if (changed_magic_flag && !mcview_altered_magic_flag)
 674             mcview_default_magic_flag = 1;
 675
 676         dialog_switch_process_pending ();
 677     }
 678     else if (internal)
 679     {
 680         char view_entry[BUF_TINY];
 681
 682         if (start_line != 0)
 683             g_snprintf (view_entry, sizeof (view_entry), "View:%d", start_line);
 684         else
 685             strcpy (view_entry, "View");
 686
 687         if (regex_command (filename, view_entry, &move_dir) == 0)
 688         {
 689             switch (mcview_viewer (NULL, filename, start_line))
 690             {
 691             case MCVIEW_WANT_NEXT:
 692                 move_dir = 1;
 693                 break;
 694             case MCVIEW_WANT_PREV:
 695                 move_dir = -1;
 696                 break;
 697             default:
 698                 move_dir = 0;
 699             }
 700
 701             dialog_switch_process_pending ();
 702         }
 703     }
 704     else
 705     {
 706         if (viewer == NULL)
 707         {
 708             viewer = getenv ("VIEWER");
 709             if (viewer == NULL)
 710                 viewer = getenv ("PAGER");
 711             if (viewer == NULL)
 712                 viewer = "view";
 713         }
 714
 715         execute_with_vfs_arg (viewer, filename);
 716     }
 717
 718     return move_dir;
 719 }
 720
 721 /* --------------------------------------------------------------------------------------------- */
 722 /** view_file (filename, plain_view, internal)
 723  *
 724  * Inputs:
 725  *   filename:   The file name to view
 726  *   plain_view: If set does not do any fancy pre-processing (no filtering) and
 727  *               always invokes the internal viewer.
 728  *   internal:   If set uses the internal viewer, otherwise an external viewer.
 729  */
 730
 731 int
 732 view_file (const char *filename, int plain_view, int internal)
 733 {
 734     return view_file_at_line (filename, plain_view, internal, 0);
 735 }
 736
 737
 738 /* --------------------------------------------------------------------------------------------- */
 739 /** Run user's preferred viewer on the currently selected file */
 740
 741 void
 742 view_cmd (void)
 743 {
 744     do_view_cmd (FALSE);
 745 }
 746
 747 /* --------------------------------------------------------------------------------------------- */
 748 /** Ask for file and run user's preferred viewer on it */
 749
 750 void
 751 view_file_cmd (void)
 752 {
 753     char *filename;
 754
 755     filename =
 756         input_expand_dialog (_("View file"), _("Filename:"),
 757                              MC_HISTORY_FM_VIEW_FILE, selection (current_panel)->fname);
 758     if (!filename)
 759         return;
 760
 761     view_file (filename, 0, use_internal_view);
 762     g_free (filename);
 763 }
 764
 765 /* --------------------------------------------------------------------------------------------- */
 766 /** Run plain internal viewer on the currently selected file */
 767 void
 768 view_raw_cmd (void)
 769 {
 770     do_view_cmd (TRUE);
 771 }
 772
 773 /* --------------------------------------------------------------------------------------------- */
 774
 775 void
 776 view_filtered_cmd (void)
 777 {
 778     char *command;
 779     const char *initial_command;
 780
 781     if (cmdline->buffer[0] == '\0')
 782         initial_command = selection (current_panel)->fname;
 783     else
 784         initial_command = cmdline->buffer;
 785
 786     command =
 787         input_dialog (_("Filtered view"),
 788                       _("Filter command and arguments:"),
 789                       MC_HISTORY_FM_FILTERED_VIEW, initial_command);
 790
 791     if (command != NULL)
 792     {
 793         mcview_viewer (command, "", 0);
 794         g_free (command);
 795         dialog_switch_process_pending ();
 796     }
 797 }
 798
 799 /* --------------------------------------------------------------------------------------------- */
 800
 801 void
 802 do_edit_at_line (const char *what, gboolean internal, int start_line)
 803 {
 804     static const char *editor = NULL;
 805
 806 #ifdef USE_INTERNAL_EDIT
 807     if (internal)
 808         edit_file (what, start_line);
 809     else
 810 #else
 811     (void) start_line;
 812 #endif /* USE_INTERNAL_EDIT */
 813     {
 814         if (editor == NULL)
 815         {
 816             editor = getenv ("EDITOR");
 817             if (editor == NULL)
 818                 editor = get_default_editor ();
 819         }
 820         execute_with_vfs_arg (editor, what);
 821     }
 822
 823     if (mc_global.mc_run_mode == MC_RUN_FULL)
 824         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 825
 826 #ifdef USE_INTERNAL_EDIT
 827     if (use_internal_edit)
 828         dialog_switch_process_pending ();
 829     else
 830 #endif /* USE_INTERNAL_EDIT */
 831         repaint_screen ();
 832 }
 833
 834 /* --------------------------------------------------------------------------------------------- */
 835
 836 void
 837 edit_cmd (void)
 838 {
 839     if (regex_command (selection (current_panel)->fname, "Edit", NULL) == 0)
 840         do_edit (selection (current_panel)->fname);
 841 }
 842
 843 /* --------------------------------------------------------------------------------------------- */
 844
 845 #ifdef USE_INTERNAL_EDIT
 846 void
 847 edit_cmd_force_internal (void)
 848 {
 849     if (regex_command (selection (current_panel)->fname, "Edit", NULL) == 0)
 850         do_edit_at_line (selection (current_panel)->fname, TRUE, 0);
 851 }
 852 #endif
 853
 854 /* --------------------------------------------------------------------------------------------- */
 855
 856 void
 857 edit_cmd_new (void)
 858 {
 859 #ifdef HAVE_CHARSET
 860     mc_global.source_codepage = default_source_codepage;
 861 #endif
 862     do_edit (NULL);
 863 }
 864
 865 /* --------------------------------------------------------------------------------------------- */
 866 /** Invoked by F5.  Copy, default to the other panel.  */
 867
 868 void
 869 copy_cmd (void)
 870 {
 871     save_cwds_stat ();
 872     if (panel_operate (current_panel, OP_COPY, FALSE))
 873     {
 874         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 875         repaint_screen ();
 876     }
 877 }
 878
 879 /* --------------------------------------------------------------------------------------------- */
 880 /** Invoked by F6.  Move/rename, default to the other panel, ignore marks.  */
 881
 882 void
 883 rename_cmd (void)
 884 {
 885     save_cwds_stat ();
 886     if (panel_operate (current_panel, OP_MOVE, FALSE))
 887     {
 888         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 889         repaint_screen ();
 890     }
 891 }
 892
 893 /* --------------------------------------------------------------------------------------------- */
 894 /** Invoked by F15.  Copy, default to the same panel, ignore marks.  */
 895
 896 void
 897 copy_cmd_local (void)
 898 {
 899     save_cwds_stat ();
 900     if (panel_operate (current_panel, OP_COPY, TRUE))
 901     {
 902         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 903         repaint_screen ();
 904     }
 905 }
 906
 907 /* --------------------------------------------------------------------------------------------- */
 908 /** Invoked by F16.  Move/rename, default to the same panel.  */
 909
 910 void
 911 rename_cmd_local (void)
 912 {
 913     save_cwds_stat ();
 914     if (panel_operate (current_panel, OP_MOVE, TRUE))
 915     {
 916         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 917         repaint_screen ();
 918     }
 919 }
 920
 921 /* --------------------------------------------------------------------------------------------- */
 922
 923 void
 924 mkdir_cmd (void)
 925 {
 926     char *dir, *absdir;
 927     const char *name = "";
 928
 929     /* If 'on' then automatically fills name with current selected item name */
 930     if (auto_fill_mkdir_name && strcmp (selection (current_panel)->fname, "..") != 0)
 931         name = selection (current_panel)->fname;
 932
 933     dir =
 934         input_expand_dialog (_("Create a new Directory"),
 935                              _("Enter directory name:"), MC_HISTORY_FM_MKDIR, name);
 936
 937     if (!dir)
 938         return;
 939
 940     if (*dir)
 941     {
 942         if (dir[0] == '/' || dir[0] == '~')
 943             absdir = g_strdup (dir);
 944         else
 945             absdir = concat_dir_and_file (current_panel->cwd, dir);
 946
 947         save_cwds_stat ();
 948         if (my_mkdir (absdir, 0777) == 0)
 949         {
 950             update_panels (UP_OPTIMIZE, dir);
 951             repaint_screen ();
 952             select_item (current_panel);
 953         }
 954         else
 955         {
 956             message (D_ERROR, MSG_ERROR, "%s", unix_error_string (errno));
 957         }
 958         g_free (absdir);
 959     }
 960     g_free (dir);
 961 }
 962
 963 /* --------------------------------------------------------------------------------------------- */
 964
 965 void
 966 delete_cmd (void)
 967 {
 968     save_cwds_stat ();
 969
 970     if (panel_operate (current_panel, OP_DELETE, FALSE))
 971     {
 972         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 973         repaint_screen ();
 974     }
 975 }
 976
 977 /* --------------------------------------------------------------------------------------------- */
 978 /** Invoked by F18.  Remove selected file, regardless of marked files.  */
 979
 980 void
 981 delete_cmd_local (void)
 982 {
 983     save_cwds_stat ();
 984
 985     if (panel_operate (current_panel, OP_DELETE, TRUE))
 986     {
 987         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
 988         repaint_screen ();
 989     }
 990 }
 991
 992 /* --------------------------------------------------------------------------------------------- */
 993
 994 void
 995 find_cmd (void)
 996 {
 997     find_file ();
 998 }
 999
1000 /* --------------------------------------------------------------------------------------------- */
1001 /** Invoked from the left/right menus */
1002
1003 void
1004 filter_cmd (void)
1005 {
1006     WPanel *p;
1007
1008     if (!SELECTED_IS_PANEL)
1009         return;
1010
1011     p = MENU_PANEL;
1012     set_panel_filter (p);
1013 }
1014
1015 /* --------------------------------------------------------------------------------------------- */
1016
1017 void
1018 reread_cmd (void)
1019 {
1020     panel_update_flags_t flag = UP_ONLY_CURRENT;
1021
1022     if (get_current_type () == view_listing && get_other_type () == view_listing
1023         && strcmp (current_panel->cwd, other_panel->cwd) == 0)
1024         flag = UP_OPTIMIZE;
1025
1026     update_panels (UP_RELOAD | flag, UP_KEEPSEL);
1027     repaint_screen ();
1028 }
1029
1030 /* --------------------------------------------------------------------------------------------- */
1031
1032 void
1033 select_invert_cmd (void)
1034 {
1035     int i;
1036     file_entry *file;
1037
1038     for (i = 0; i < current_panel->count; i++)
1039     {
1040         file = &current_panel->dir.list[i];
1041         if (!panels_options.reverse_files_only || !S_ISDIR (file->st.st_mode))
1042             do_file_mark (current_panel, i, !file->f.marked);
1043     }
1044 }
1045
1046 /* --------------------------------------------------------------------------------------------- */
1047
1048 void
1049 select_cmd (void)
1050 {
1051     select_unselect_cmd (_("Select"), ":select_cmd: Select ", TRUE);
1052 }
1053
1054 /* --------------------------------------------------------------------------------------------- */
1055
1056 void
1057 unselect_cmd (void)
1058 {
1059     select_unselect_cmd (_("Unselect"), ":unselect_cmd: Unselect ", FALSE);
1060 }
1061
1062 /* --------------------------------------------------------------------------------------------- */
1063
1064 void
1065 ext_cmd (void)
1066 {
1067     char *buffer;
1068     char *extdir;
1069     int dir;
1070
1071     dir = 0;
1072     if (geteuid () == 0)
1073     {
1074         dir = query_dialog (_("Extension file edit"),
1075                             _("Which extension file you want to edit?"), D_NORMAL, 2,
1076                             _("&User"), _("&System Wide"));
1077     }
1078     extdir = concat_dir_and_file (mc_global.sysconfig_dir, MC_LIB_EXT);
1079
1080     if (dir == 0)
1081     {
1082         buffer = mc_config_get_full_path (MC_FILEBIND_FILE);
1083         check_for_default (extdir, buffer);
1084         do_edit (buffer);
1085         g_free (buffer);
1086     }
1087     else if (dir == 1)
1088     {
1089         if (!exist_file (extdir))
1090         {
1091             g_free (extdir);
1092             extdir = concat_dir_and_file (mc_global.share_data_dir, MC_LIB_EXT);
1093         }
1094         do_edit (extdir);
1095     }
1096     g_free (extdir);
1097     flush_extension_file ();
1098 }
1099
1100 /* --------------------------------------------------------------------------------------------- */
1101 /** edit file menu for mc */
1102
1103 void
1104 edit_mc_menu_cmd (void)
1105 {
1106     char *buffer;
1107     char *menufile;
1108     int dir = 0;
1109
1110     dir = query_dialog (_("Menu edit"),
1111                         _("Which menu file do you want to edit?"),
1112                         D_NORMAL, geteuid ()? 2 : 3, _("&Local"), _("&User"), _("&System Wide"));
1113
1114     menufile = concat_dir_and_file (mc_global.sysconfig_dir, MC_GLOBAL_MENU);
1115
1116     if (!exist_file (menufile))
1117     {
1118         g_free (menufile);
1119         menufile = concat_dir_and_file (mc_global.share_data_dir, MC_GLOBAL_MENU);
1120     }
1121
1122     switch (dir)
1123     {
1124     case 0:
1125         buffer = g_strdup (MC_LOCAL_MENU);
1126         check_for_default (menufile, buffer);
1127         chmod (buffer, 0600);
1128         break;
1129
1130     case 1:
1131         buffer = mc_config_get_full_path (MC_USERMENU_FILE);
1132         check_for_default (menufile, buffer);
1133         break;
1134
1135     case 2:
1136         buffer = concat_dir_and_file (mc_global.sysconfig_dir, MC_GLOBAL_MENU);
1137         if (!exist_file (buffer))
1138         {
1139             g_free (buffer);
1140             buffer = concat_dir_and_file (mc_global.share_data_dir, MC_GLOBAL_MENU);
1141         }
1142         break;
1143
1144     default:
1145         g_free (menufile);
1146         return;
1147     }
1148
1149     do_edit (buffer);
1150
1151     g_free (buffer);
1152     g_free (menufile);
1153 }
1154
1155 /* --------------------------------------------------------------------------------------------- */
1156
1157 void
1158 edit_fhl_cmd (void)
1159 {
1160     char *buffer = NULL;
1161     char *fhlfile = NULL;
1162
1163     int dir;
1164
1165     dir = 0;
1166     if (geteuid () == 0)
1167     {
1168         dir = query_dialog (_("Highlighting groups file edit"),
1169                             _("Which highlighting file you want to edit?"), D_NORMAL, 2,
1170                             _("&User"), _("&System Wide"));
1171     }
1172     fhlfile = concat_dir_and_file (mc_global.sysconfig_dir, MC_FHL_INI_FILE);
1173
1174     if (dir == 0)
1175     {
1176         buffer = mc_config_get_full_path (MC_FHL_INI_FILE);
1177         check_for_default (fhlfile, buffer);
1178         do_edit (buffer);
1179         g_free (buffer);
1180     }
1181     else if (dir == 1)
1182     {
1183         if (!exist_file (fhlfile))
1184         {
1185             g_free (fhlfile);
1186             fhlfile = concat_dir_and_file (mc_global.sysconfig_dir, MC_FHL_INI_FILE);
1187         }
1188         do_edit (fhlfile);
1189     }
1190     g_free (fhlfile);
1191
1192     /* refresh highlighting rules */
1193     mc_fhl_free (&mc_filehighlight);
1194     mc_filehighlight = mc_fhl_new (TRUE);
1195 }
1196
1197 /* --------------------------------------------------------------------------------------------- */
1198
1199 void
1200 hotlist_cmd (void)
1201 {
1202     char *target;
1203
1204     target = hotlist_show (LIST_HOTLIST);
1205     if (!target)
1206         return;
1207
1208     if (get_current_type () == view_tree)
1209         tree_chdir (the_tree, target);
1210     else
1211     {
1212         char *cmd = g_strconcat ("cd ", target, (char *) NULL);
1213         do_cd_command (cmd);
1214         g_free (cmd);
1215     }
1216     g_free (target);
1217 }
1218
1219 #ifdef ENABLE_VFS
1220 void
1221 vfs_list (void)
1222 {
1223     char *target;
1224
1225     target = hotlist_show (LIST_VFSLIST);
1226     if (!target)
1227         return;
1228
1229     if (!do_cd (target, cd_exact))
1230         message (D_ERROR, MSG_ERROR, _("Cannot change directory"));
1231     g_free (target);
1232 }
1233 #endif /* ENABLE_VFS */
1234
1235 /* --------------------------------------------------------------------------------------------- */
1236
1237 void
1238 compare_dirs_cmd (void)
1239 {
1240     int choice;
1241     enum CompareMode thorough_flag;
1242
1243     choice =
1244         query_dialog (_("Compare directories"),
1245                       _("Select compare method:"), D_NORMAL, 4,
1246                       _("&Quick"), _("&Size only"), _("&Thorough"), _("&Cancel"));
1247
1248     if (choice < 0 || choice > 2)
1249         return;
1250
1251     thorough_flag = choice;
1252
1253     if (get_current_type () == view_listing && get_other_type () == view_listing)
1254     {
1255         compare_dir (current_panel, other_panel, thorough_flag);
1256         compare_dir (other_panel, current_panel, thorough_flag);
1257     }
1258     else
1259     {
1260         message (D_ERROR, MSG_ERROR,
1261                  _("Both panels should be in the listing mode\nto use this command"));
1262     }
1263 }
1264
1265 /* --------------------------------------------------------------------------------------------- */
1266
1267 #ifdef USE_DIFF_VIEW
1268 void
1269 diff_view_cmd (void)
1270 {
1271     /* both panels must be in the list mode */
1272     if (get_current_type () != view_listing || get_other_type () != view_listing)
1273         return;
1274
1275     dview_diff_cmd ();
1276
1277     if (mc_global.mc_run_mode == MC_RUN_FULL)
1278         update_panels (UP_OPTIMIZE, UP_KEEPSEL);
1279
1280     dialog_switch_process_pending ();
1281 }
1282 #endif
1283
1284 /* --------------------------------------------------------------------------------------------- */
1285
1286 void
1287 swap_cmd (void)
1288 {
1289     swap_panels ();
1290     tty_touch_screen ();
1291     repaint_screen ();
1292 }
1293
1294 /* --------------------------------------------------------------------------------------------- */
1295
1296 void
1297 view_other_cmd (void)
1298 {
1299     static int message_flag = TRUE;
1300
1301     if (!mc_global.tty.xterm_flag && mc_global.tty.console_flag == '\0'
1302         && !mc_global.tty.use_subshell && !output_starts_shell)
1303     {
1304         if (message_flag)
1305             message (D_ERROR, MSG_ERROR,
1306                      _("Not an xterm or Linux console;\nthe panels cannot be toggled."));
1307         message_flag = FALSE;
1308     }
1309     else
1310     {
1311         toggle_panels ();
1312     }
1313 }
1314
1315 /* --------------------------------------------------------------------------------------------- */
1316
1317 void
1318 link_cmd (link_type_t link_type)
1319 {
1320     char *filename = selection (current_panel)->fname;
1321
1322     if (filename != NULL)
1323         do_link (link_type, filename);
1324 }
1325
1326 /* --------------------------------------------------------------------------------------------- */
1327
1328 void
1329 edit_symlink_cmd (void)
1330 {
1331     if (S_ISLNK (selection (current_panel)->st.st_mode))
1332     {
1333         char buffer[MC_MAXPATHLEN];
1334         char *p = NULL;
1335         int i;
1336         char *dest, *q;
1337         vfs_path_t *p_vpath;
1338
1339         p = selection (current_panel)->fname;
1340         p_vpath = vfs_path_from_str (p);
1341
1342         q = g_strdup_printf (_("Symlink `%s\' points to:"), str_trunc (p, 32));
1343
1344         i = readlink (p, buffer, MC_MAXPATHLEN - 1);
1345         if (i > 0)
1346         {
1347             buffer[i] = 0;
1348             dest = input_expand_dialog (_("Edit symlink"), q, MC_HISTORY_FM_EDIT_LINK, buffer);
1349             if (dest)
1350             {
1351                 if (*dest && strcmp (buffer, dest))
1352                 {
1353                     save_cwds_stat ();
1354                     if (mc_unlink (p_vpath) == -1)
1355                     {
1356                         message (D_ERROR, MSG_ERROR, _("edit symlink, unable to remove %s: %s"),
1357                                  p, unix_error_string (errno));
1358                     }
1359                     else
1360                     {
1361                         vfs_path_t *dest_vpath;
1362
1363                         dest_vpath = vfs_path_from_str_flags (dest, VPF_NO_CANON);
1364                         if (mc_symlink (dest_vpath, p_vpath) == -1)
1365                             message (D_ERROR, MSG_ERROR, _("edit symlink: %s"),
1366                                      unix_error_string (errno));
1367                         vfs_path_free(dest_vpath);
1368                     }
1369                     update_panels (UP_OPTIMIZE, UP_KEEPSEL);
1370                     repaint_screen ();
1371                 }
1372                 g_free (dest);
1373             }
1374         }
1375         g_free (q);
1376         vfs_path_free (p_vpath);
1377     }
1378     else
1379     {
1380         message (D_ERROR, MSG_ERROR, _("`%s' is not a symbolic link"),
1381                  selection (current_panel)->fname);
1382     }
1383 }
1384
1385 /* --------------------------------------------------------------------------------------------- */
1386
1387 void
1388 help_cmd (void)
1389 {
1390     ev_help_t event_data = { NULL, NULL };
1391
1392     if (current_panel->searching)
1393         event_data.node = "[Quick search]";
1394     else
1395         event_data.node = "[main]";
1396
1397     mc_event_raise (MCEVENT_GROUP_CORE, "help", &event_data);
1398 }
1399
1400 /* --------------------------------------------------------------------------------------------- */
1401
1402 void
1403 user_file_menu_cmd (void)
1404 {
1405     (void) user_menu_cmd (NULL, NULL, -1);
1406 }
1407
1408 /* --------------------------------------------------------------------------------------------- */
1409 /**
1410  * Return a random hint.  If force is not 0, ignore the timeout.
1411  */
1412
1413 char *
1414 get_random_hint (int force)
1415 {
1416     char *data, *result = NULL, *eol;
1417     int len;
1418     int start;
1419     static int last_sec;
1420     static struct timeval tv;
1421     GIConv conv;
1422
1423     /* Do not change hints more often than one minute */
1424     gettimeofday (&tv, NULL);
1425     if (!force && !(tv.tv_sec > last_sec + 60))
1426         return g_strdup ("");
1427     last_sec = tv.tv_sec;
1428
1429     data = load_mc_home_file (mc_global.share_data_dir, MC_HINT, NULL);
1430     if (data == NULL)
1431         return NULL;
1432
1433     /* get a random entry */
1434     srand (tv.tv_sec);
1435     len = strlen (data);
1436     start = rand () % len;
1437
1438     for (; start != 0; start--)
1439         if (data[start] == '\n')
1440         {
1441             start++;
1442             break;
1443         }
1444
1445     eol = strchr (data + start, '\n');
1446     if (eol != NULL)
1447         *eol = '\0';
1448
1449     /* hint files are stored in utf-8 */
1450     /* try convert hint file from utf-8 to terminal encoding */
1451     conv = str_crt_conv_from ("UTF-8");
1452     if (conv != INVALID_CONV)
1453     {
1454         GString *buffer;
1455
1456         buffer = g_string_new ("");
1457         if (str_convert (conv, &data[start], buffer) != ESTR_FAILURE)
1458             result = g_string_free (buffer, FALSE);
1459         else
1460             g_string_free (buffer, TRUE);
1461         str_close_conv (conv);
1462     }
1463
1464     g_free (data);
1465     return result;
1466 }
1467
1468 /* --------------------------------------------------------------------------------------------- */
1469
1470 #ifdef ENABLE_VFS_NET
1471 #ifdef ENABLE_VFS_FTP
1472 void
1473 ftplink_cmd (void)
1474 {
1475     nice_cd (_("FTP to machine"), _(machine_str),
1476              "[FTP File System]", ":ftplink_cmd: FTP to machine ", "/#ftp:", 1);
1477 }
1478 #endif /* ENABLE_VFS_FTP */
1479
1480 /* --------------------------------------------------------------------------------------------- */
1481
1482 #ifdef ENABLE_VFS_FISH
1483 void
1484 fishlink_cmd (void)
1485 {
1486     nice_cd (_("Shell link to machine"), _(machine_str),
1487              "[FIle transfer over SHell filesystem]", ":fishlink_cmd: Shell link to machine ",
1488              "/#sh:", 1);
1489 }
1490 #endif /* ENABLE_VFS_FISH */
1491
1492 /* --------------------------------------------------------------------------------------------- */
1493
1494 #ifdef ENABLE_VFS_SMB
1495 void
1496 smblink_cmd (void)
1497 {
1498     nice_cd (_("SMB link to machine"), _(machine_str),
1499              "[SMB File System]", ":smblink_cmd: SMB link to machine ", "/#smb:", 0);
1500 }
1501 #endif /* ENABLE_VFS_SMB */
1502 #endif /* ENABLE_VFS_NET */
1503
1504 /* --------------------------------------------------------------------------------------------- */
1505
1506 #ifdef ENABLE_VFS_UNDELFS
1507 void
1508 undelete_cmd (void)
1509 {
1510     nice_cd (_("Undelete files on an ext2 file system"),
1511              _("Enter device (without /dev/) to undelete\nfiles on: (F1 for details)"),
1512              "[Undelete File System]", ":undelete_cmd: Undel on ext2 fs ", "/#undel:", 0);
1513 }
1514 #endif /* ENABLE_VFS_UNDELFS */
1515
1516 /* --------------------------------------------------------------------------------------------- */
1517
1518 void
1519 quick_cd_cmd (void)
1520 {
1521     char *p = cd_dialog ();
1522
1523     if (p && *p)
1524     {
1525         char *q = g_strconcat ("cd ", p, (char *) NULL);
1526
1527         do_cd_command (q);
1528         g_free (q);
1529     }
1530     g_free (p);
1531 }
1532
1533 /* --------------------------------------------------------------------------------------------- */
1534 /*!
1535    \brief calculate dirs sizes
1536
1537    calculate dirs sizes and resort panel:
1538    dirs_selected = show size for selected dirs,
1539    otherwise = show size for dir under cursor:
1540    dir under cursor ".." = show size for all dirs,
1541    otherwise = show size for dir under cursor
1542  */
1543
1544 void
1545 smart_dirsize_cmd (void)
1546 {
1547     WPanel *panel = current_panel;
1548     file_entry *entry;
1549
1550     entry = &(panel->dir.list[panel->selected]);
1551     if ((S_ISDIR (entry->st.st_mode) && (strcmp (entry->fname, "..") == 0)) || panel->dirs_marked)
1552         dirsizes_cmd ();
1553     else
1554         single_dirsize_cmd ();
1555 }
1556
1557 /* --------------------------------------------------------------------------------------------- */
1558
1559 void
1560 single_dirsize_cmd (void)
1561 {
1562     WPanel *panel = current_panel;
1563     file_entry *entry;
1564
1565     entry = &(panel->dir.list[panel->selected]);
1566     if (S_ISDIR (entry->st.st_mode) && strcmp (entry->fname, "..") != 0)
1567     {
1568         size_t marked = 0;
1569         uintmax_t total = 0;
1570         ComputeDirSizeUI *ui;
1571
1572         ui = compute_dir_size_create_ui ();
1573
1574         if (compute_dir_size (entry->fname, ui, compute_dir_size_update_ui,
1575                               &marked, &total, TRUE) == FILE_CONT)
1576         {
1577             entry->st.st_size = (off_t) total;
1578             entry->f.dir_size_computed = 1;
1579         }
1580
1581         compute_dir_size_destroy_ui (ui);
1582     }
1583
1584     if (panels_options.mark_moves_down)
1585         send_message ((Widget *) panel, WIDGET_COMMAND, CK_Down);
1586
1587     recalculate_panel_summary (panel);
1588
1589     if (current_panel->sort_info.sort_field->sort_routine == (sortfn *) sort_size)
1590         panel_re_sort (panel);
1591
1592     panel->dirty = 1;
1593 }
1594
1595 /* --------------------------------------------------------------------------------------------- */
1596
1597 void
1598 dirsizes_cmd (void)
1599 {
1600     WPanel *panel = current_panel;
1601     int i;
1602     ComputeDirSizeUI *ui;
1603
1604     ui = compute_dir_size_create_ui ();
1605
1606     for (i = 0; i < panel->count; i++)
1607         if (S_ISDIR (panel->dir.list[i].st.st_mode)
1608             && ((panel->dirs_marked && panel->dir.list[i].f.marked)
1609                 || !panel->dirs_marked) && strcmp (panel->dir.list[i].fname, "..") != 0)
1610         {
1611             size_t marked = 0;
1612             uintmax_t total = 0;
1613
1614             if (compute_dir_size (panel->dir.list[i].fname,
1615                                   ui, compute_dir_size_update_ui, &marked, &total,
1616                                   TRUE) != FILE_CONT)
1617                 break;
1618
1619             panel->dir.list[i].st.st_size = (off_t) total;
1620             panel->dir.list[i].f.dir_size_computed = 1;
1621         }
1622
1623     compute_dir_size_destroy_ui (ui);
1624
1625     recalculate_panel_summary (panel);
1626
1627     if (current_panel->sort_info.sort_field->sort_routine == (sortfn *) sort_size)
1628         panel_re_sort (panel);
1629
1630     panel->dirty = 1;
1631 }
1632
1633 /* --------------------------------------------------------------------------------------------- */
1634
1635 void
1636 save_setup_cmd (void)
1637 {
1638     char *d1;
1639     const char *d2;
1640
1641     d1 = mc_config_get_full_path (MC_CONFIG_FILE);
1642     d2 = strip_home_and_password (d1);
1643     g_free (d1);
1644
1645     if (save_setup (TRUE, TRUE))
1646         message (D_NORMAL, _("Setup"), _("Setup saved to %s"), d2);
1647     else
1648         message (D_ERROR, _("Setup"), _("Unable to save setup to %s"), d2);
1649 }
1650
1651 /* --------------------------------------------------------------------------------------------- */
1652
1653 void
1654 info_cmd_no_menu (void)
1655 {
1656     if (get_display_type (0) == view_info)
1657         set_display_type (0, view_listing);
1658     else if (get_display_type (1) == view_info)
1659         set_display_type (1, view_listing);
1660     else
1661         set_display_type (current_panel == left_panel ? 1 : 0, view_info);
1662 }
1663
1664 /* --------------------------------------------------------------------------------------------- */
1665
1666 void
1667 quick_cmd_no_menu (void)
1668 {
1669     if (get_display_type (0) == view_quick)
1670         set_display_type (0, view_listing);
1671     else if (get_display_type (1) == view_quick)
1672         set_display_type (1, view_listing);
1673     else
1674         set_display_type (current_panel == left_panel ? 1 : 0, view_quick);
1675 }
1676
1677 /* --------------------------------------------------------------------------------------------- */
1678
1679 void
1680 listing_cmd (void)
1681 {
1682     switch_to_listing (MENU_PANEL_IDX);
1683 }
1684
1685 /* --------------------------------------------------------------------------------------------- */
1686
1687 void
1688 change_listing_cmd (void)
1689 {
1690     int list_type;
1691     int use_msformat;
1692     char *user, *status;
1693     WPanel *p = NULL;
1694
1695     if (get_display_type (MENU_PANEL_IDX) == view_listing)
1696         p = MENU_PANEL_IDX == 0 ? left_panel : right_panel;
1697
1698     list_type = display_box (p, &user, &status, &use_msformat, MENU_PANEL_IDX);
1699
1700     if (list_type != -1)
1701     {
1702         switch_to_listing (MENU_PANEL_IDX);
1703         p = MENU_PANEL_IDX == 0 ? left_panel : right_panel;
1704         configure_panel_listing (p, list_type, use_msformat, user, status);
1705     }
1706 }
1707
1708 /* --------------------------------------------------------------------------------------------- */
1709
1710 void
1711 panel_tree_cmd (void)
1712 {
1713     set_display_type (MENU_PANEL_IDX, view_tree);
1714 }
1715
1716 /* --------------------------------------------------------------------------------------------- */
1717
1718 void
1719 info_cmd (void)
1720 {
1721     set_display_type (MENU_PANEL_IDX, view_info);
1722 }
1723
1724 /* --------------------------------------------------------------------------------------------- */
1725
1726 void
1727 quick_view_cmd (void)
1728 {
1729     if ((WPanel *) get_panel_widget (MENU_PANEL_IDX) == current_panel)
1730         change_panel ();
1731     set_display_type (MENU_PANEL_IDX, view_quick);
1732 }
1733
1734 /* --------------------------------------------------------------------------------------------- */
1735
1736 void
1737 toggle_listing_cmd (void)
1738 {
1739     int current = get_current_index ();
1740     WPanel *p = (WPanel *) get_panel_widget (current);
1741
1742     set_basic_panel_listing_to (current, (p->list_type + 1) % LIST_TYPES);
1743 }
1744
1745 /* --------------------------------------------------------------------------------------------- */
1746
1747 void
1748 encoding_cmd (void)
1749 {
1750     if (SELECTED_IS_PANEL)
1751         panel_change_encoding (MENU_PANEL);
1752 }
1753
1754 /* --------------------------------------------------------------------------------------------- */