src/filemanager/cmd.c

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