Manual pages: mcmcdiffmceditmcview

root/src/filemanager/panel.c

/* [previous][next][first][last][top][bottom][index][help]  */

DEFINITIONS

This source file includes following definitions.
  1. panelized_descr_new
  2. panelized_descr_free
  3. set_colors
  4. format_item_free
  5. panel_lines
  6. add_permission_string
  7. string_file_name
  8. ilog10
  9. format_device_number
  10. string_file_size
  11. string_file_size_brief
  12. string_file_type
  13. string_file_mtime
  14. string_file_atime
  15. string_file_ctime
  16. string_file_permission
  17. string_file_perm_octal
  18. string_file_nlinks
  19. string_inode
  20. string_file_nuid
  21. string_file_ngid
  22. string_file_owner
  23. string_file_group
  24. string_marked
  25. string_space
  26. string_dot
  27. file_compute_color
  28. panel_items
  29. format_file
  30. repaint_file
  31. repaint_status
  32. display_mini_info
  33. paint_dir
  34. display_total_marked_size
  35. mini_info_separator
  36. show_free_space
  37. panel_correct_path_to_show
  38. panel_get_encoding_info_str
  39. show_vertical_separator_tee
  40. show_dir
  41. adjust_top_file
  42. panel_save_name
  43. directory_history_add
  44. panel_load_history
  45. panel_save_history
  46. panel_destroy
  47. panel_paint_sort_info
  48. panel_get_title_without_hotkey
  49. panel_print_header
  50. parse_panel_size
  51. parse_display_format
  52. use_display_format
  53. panel_format
  54. mini_status_format
  55. cd_up_dir
  56. maybe_cd
  57. force_maybe_cd
  58. unselect_item
  59. panel_select_ext_cmd
  60. panel_set_current
  61. panel_current_at_half
  62. move_down
  63. move_up
  64. panel_move_current
  65. move_left
  66. move_right
  67. prev_page
  68. goto_parent_dir
  69. next_page
  70. goto_child_dir
  71. goto_top_file
  72. goto_middle_file
  73. goto_bottom_file
  74. move_home
  75. move_end
  76. do_mark_file
  77. mark_file
  78. mark_file_up
  79. mark_file_down
  80. mark_file_right
  81. mark_file_left
  82. panel_select_unselect_files_dialog
  83. panel_select_unselect_files
  84. panel_select_files
  85. panel_unselect_files
  86. panel_select_invert_files
  87. panel_do_set_filter
  88. do_search
  89. start_search
  90. stop_search
  91. do_enter_on_file_entry
  92. do_enter
  93. panel_cycle_listing_format
  94. chdir_other_panel
  95. panel_sync_other
  96. chdir_to_readlink
  97. panel_get_format_field_index_by_name
  98. panel_get_sortable_field_by_format
  99. panel_toggle_sort_order_prev
  100. panel_toggle_sort_order_next
  101. panel_select_sort_order
  102. panel_content_scroll_left
  103. panel_content_scroll_right
  104. panel_content_scroll_home
  105. panel_content_scroll_end
  106. panel_set_sort_type_by_id
  107. get_parent_dir_name
  108. panel_do_cd_int
  109. directory_history_next
  110. directory_history_prev
  111. directory_history_list
  112. panel_execute_cmd
  113. panel_key
  114. panel_callback
  115. mouse_toggle_mark
  116. mouse_set_mark
  117. mark_if_marking
  118. mouse_sort_col
  119. panel_mouse_is_on_item
  120. panel_mouse_callback
  121. reload_panelized
  122. update_one_panel_widget
  123. update_one_panel
  124. event_update_panels
  125. panel_save_current_file_to_clip_file
  126. panel_recursive_cd_to_parent
  127. panel_dir_list_callback
  128. panel_current_entry
  129. panel_set_current_by_name
  130. panel_clean_dir
  131. panel_set_cwd
  132. panel_set_lwd
  133. panel_sized_empty_new
  134. panel_sized_with_dir_new
  135. panel_reload
  136. set_panel_formats
  137. panel_set_filter
  138. select_item
  139. unmark_files
  140. recalculate_panel_summary
  141. do_file_mark
  142. panel_do_cd
  143. file_mark
  144. panel_find_marked_file
  145. panel_get_marked_file
  146. panel_re_sort
  147. panel_set_sort_order
  148. panel_change_encoding
  149. remove_encoding_from_path
  150. update_panels
  151. panel_get_num_of_sortable_fields
  152. panel_get_sortable_fields
  153. panel_get_field_by_id
  154. panel_get_field_by_title_hotkey
  155. panel_get_field_by_title
  156. panel_get_num_of_user_possible_fields
  157. panel_get_user_possible_fields
  158. panel_panelize_restore
  159. panel_panelize_change_root
  160. panel_panelize_absolutize_if_needed
  161. panel_panelize_save
  162. panel_init
  163. panel_deinit
  164. panel_cd

   1 /*
   2    Panel managing.
   3 
   4    Copyright (C) 1994-2025
   5    Free Software Foundation, Inc.
   6 
   7    Written by:
   8    Miguel de Icaza, 1995
   9    Timur Bakeyev, 1997, 1999
  10    Slava Zanko <slavazanko@gmail.com>, 2013
  11    Andrew Borodin <aborodin@vmail.ru>, 2013-2023
  12 
  13    This file is part of the Midnight Commander.
  14 
  15    The Midnight Commander is free software: you can redistribute it
  16    and/or modify it under the terms of the GNU General Public License as
  17    published by the Free Software Foundation, either version 3 of the License,
  18    or (at your option) any later version.
  19 
  20    The Midnight Commander is distributed in the hope that it will be useful,
  21    but WITHOUT ANY WARRANTY; without even the implied warranty of
  22    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  23    GNU General Public License for more details.
  24 
  25    You should have received a copy of the GNU General Public License
  26    along with this program.  If not, see <https://www.gnu.org/licenses/>.
  27  */
  28 
  29 /** \file panel.c
  30  *  \brief Source: panel managin module
  31  */
  32 
  33 #include <config.h>
  34 
  35 #include <limits.h>  // UINT_MAX
  36 #include <stdio.h>
  37 #include <stdlib.h>
  38 #include <string.h>
  39 
  40 #include "lib/global.h"
  41 
  42 #include "lib/tty/tty.h"
  43 #include "lib/tty/key.h"  // XCTRL and ALT macros
  44 #include "lib/skin.h"
  45 #include "lib/strutil.h"
  46 #include "lib/mcconfig.h"
  47 #include "lib/vfs/vfs.h"
  48 #include "lib/unixcompat.h"
  49 #include "lib/search.h"
  50 #include "lib/timefmt.h"  // file_date()
  51 #include "lib/util.h"
  52 #include "lib/widget.h"
  53 #include "lib/charsets.h"  // get_codepage_id ()
  54 #include "lib/event.h"
  55 
  56 #include "src/setup.h"  // For loading/saving panel options
  57 #include "src/execute.h"
  58 #include "src/selcodepage.h"  // select_charset (), SELECT_CHARSET_NO_TRANSLATE
  59 #include "src/keymap.h"       // global_keymap_t
  60 #include "src/history.h"
  61 #ifdef ENABLE_SUBSHELL
  62 #include "src/subshell/subshell.h"  // subshell_chdir()
  63 #endif
  64 
  65 #include "src/usermenu.h"
  66 
  67 #include "dir.h"
  68 #include "boxes.h"
  69 #include "tree.h"
  70 #include "ext.h"     // regexp_command
  71 #include "layout.h"  // Most layout variables are here
  72 #include "cmd.h"
  73 #include "command.h"  // cmdline
  74 #include "filemanager.h"
  75 #include "mountlist.h"  // my_statfs
  76 #include "cd.h"         // cd_error_message()
  77 
  78 #include "panel.h"
  79 
  80 /*** global variables ****************************************************************************/
  81 
  82 /* The hook list for the select file function */
  83 hook_t *select_file_hook = NULL;
  84 
  85 mc_fhl_t *mc_filehighlight = NULL;
  86 
  87 /*** file scope macro definitions ****************************************************************/
  88 
  89 typedef enum
  90 {
  91     FATTR_NORMAL = 0,
  92     FATTR_CURRENT,
  93     FATTR_MARKED,
  94     FATTR_MARKED_CURRENT,
  95     FATTR_STATUS
  96 } file_attr_t;
  97 
  98 #define DEFAULT_USER_FORMAT "half type name | size | perm"
  99 
 100 /* select/unselect dialog results */
 101 #define SELECT_RESET ((mc_search_t *) (-1))
 102 #define SELECT_ERROR ((mc_search_t *) (-2))
 103 
 104 /* mouse position relative to file list */
 105 #define MOUSE_UPPER_FILE_LIST (-1)
 106 #define MOUSE_BELOW_FILE_LIST (-2)
 107 #define MOUSE_AFTER_LAST_FILE (-3)
 108 
 109 /*** file scope type declarations ****************************************************************/
 110 
 111 typedef enum
 112 {
 113     MARK_DONT_MOVE = 0,
 114     MARK_DOWN = 1,
 115     MARK_FORCE_DOWN = 2,
 116     MARK_FORCE_UP = 3
 117 } mark_act_t;
 118 
 119 /*
 120  * This describes a format item.  The parse_display_format routine parses
 121  * the user specified format and creates a linked list of format_item_t structures.
 122  */
 123 typedef struct format_item_t
 124 {
 125     int requested_field_len;
 126     int field_len;
 127     align_crt_t just_mode;
 128     gboolean expand;
 129     const char *(*string_fn) (const file_entry_t *fe, int len);
 130     char *title;
 131     const char *id;
 132 } format_item_t;
 133 
 134 /* File name scroll states */
 135 typedef enum
 136 {
 137     FILENAME_NOSCROLL = 1,
 138     FILENAME_SCROLL_LEFT = 2,
 139     FILENAME_SCROLL_RIGHT = 4
 140 } filename_scroll_flag_t;
 141 
 142 /*** forward declarations (file scope functions) *************************************************/
 143 
 144 static const char *string_file_name (const file_entry_t *fe, int len);
 145 static const char *string_file_size (const file_entry_t *fe, int len);
 146 static const char *string_file_size_brief (const file_entry_t *fe, int len);
 147 static const char *string_file_type (const file_entry_t *fe, int len);
 148 static const char *string_file_mtime (const file_entry_t *fe, int len);
 149 static const char *string_file_atime (const file_entry_t *fe, int len);
 150 static const char *string_file_ctime (const file_entry_t *fe, int len);
 151 static const char *string_file_permission (const file_entry_t *fe, int len);
 152 static const char *string_file_perm_octal (const file_entry_t *fe, int len);
 153 static const char *string_file_nlinks (const file_entry_t *fe, int len);
 154 static const char *string_inode (const file_entry_t *fe, int len);
 155 static const char *string_file_nuid (const file_entry_t *fe, int len);
 156 static const char *string_file_ngid (const file_entry_t *fe, int len);
 157 static const char *string_file_owner (const file_entry_t *fe, int len);
 158 static const char *string_file_group (const file_entry_t *fe, int len);
 159 static const char *string_marked (const file_entry_t *fe, int len);
 160 static const char *string_space (const file_entry_t *fe, int len);
 161 static const char *string_dot (const file_entry_t *fe, int len);
 162 
 163 /*** file scope variables ************************************************************************/
 164 
 165 static panel_field_t panel_fields[] = {
 166     { "unsorted", 12, TRUE, J_LEFT_FIT,
 167       // TRANSLATORS: one single character to represent 'unsorted' sort mode
 168       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 169       N_ ("sort|u"), N_ ("&Unsorted"), TRUE, FALSE, string_file_name, (GCompareFunc) unsorted },
 170     { "name", 12, TRUE, J_LEFT_FIT,
 171       // TRANSLATORS: one single character to represent 'name' sort mode
 172       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 173       N_ ("sort|n"), N_ ("&Name"), TRUE, TRUE, string_file_name, (GCompareFunc) sort_name },
 174     { "version", 12, TRUE, J_LEFT_FIT,
 175       // TRANSLATORS: one single character to represent 'version' sort mode
 176       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 177       N_ ("sort|v"), N_ ("&Version"), TRUE, FALSE, string_file_name, (GCompareFunc) sort_vers },
 178     { "extension", 12, TRUE, J_LEFT_FIT,
 179       // TRANSLATORS: one single character to represent 'extension' sort mode
 180       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 181       N_ ("sort|e"), N_ ("E&xtension"), TRUE, FALSE,
 182       string_file_name,  // TODO: string_file_ext
 183       (GCompareFunc) sort_ext },
 184     { "size", 7, FALSE, J_RIGHT,
 185       // TRANSLATORS: one single character to represent 'size' sort mode
 186       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 187       N_ ("sort|s"), N_ ("&Size"), TRUE, TRUE, string_file_size, (GCompareFunc) sort_size },
 188     { "bsize", 7, FALSE, J_RIGHT, "", N_ ("Block Size"), FALSE, FALSE, string_file_size_brief,
 189       (GCompareFunc) sort_size },
 190     { "type", 1, FALSE, J_LEFT, "", "", FALSE, TRUE, string_file_type, NULL },
 191     { "mtime", 12, FALSE, J_RIGHT,
 192       // TRANSLATORS: one single character to represent 'Modify time' sort mode
 193       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 194       N_ ("sort|m"), N_ ("&Modify time"), TRUE, TRUE, string_file_mtime, (GCompareFunc) sort_time },
 195     { "atime", 12, FALSE, J_RIGHT,
 196       // TRANSLATORS: one single character to represent 'Access time' sort mode
 197       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 198       N_ ("sort|a"), N_ ("&Access time"), TRUE, TRUE, string_file_atime,
 199       (GCompareFunc) sort_atime },
 200     { "ctime", 12, FALSE, J_RIGHT,
 201       // TRANSLATORS: one single character to represent 'Change time' sort mode
 202       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 203       N_ ("sort|h"), N_ ("C&hange time"), TRUE, TRUE, string_file_ctime,
 204       (GCompareFunc) sort_ctime },
 205     { "perm", 10, FALSE, J_LEFT, "", N_ ("Permission"), FALSE, TRUE, string_file_permission, NULL },
 206     { "mode", 6, FALSE, J_RIGHT, "", N_ ("Perm"), FALSE, TRUE, string_file_perm_octal, NULL },
 207     { "nlink", 2, FALSE, J_RIGHT, "", N_ ("Nl"), FALSE, TRUE, string_file_nlinks, NULL },
 208     { "inode", 5, FALSE, J_RIGHT,
 209       // TRANSLATORS: one single character to represent 'inode' sort mode
 210       // TRANSLATORS: no need to translate 'sort', it's just a context prefix
 211       N_ ("sort|i"), N_ ("&Inode"), TRUE, TRUE, string_inode, (GCompareFunc) sort_inode },
 212     { "nuid", 5, FALSE, J_RIGHT, "", N_ ("UID"), FALSE, FALSE, string_file_nuid, NULL },
 213     { "ngid", 5, FALSE, J_RIGHT, "", N_ ("GID"), FALSE, FALSE, string_file_ngid, NULL },
 214     { "owner", 8, FALSE, J_LEFT_FIT, "", N_ ("Owner"), FALSE, TRUE, string_file_owner, NULL },
 215     { "group", 8, FALSE, J_LEFT_FIT, "", N_ ("Group"), FALSE, TRUE, string_file_group, NULL },
 216     { "mark", 1, FALSE, J_RIGHT, "", " ", FALSE, TRUE, string_marked, NULL },
 217     { "|", 1, FALSE, J_RIGHT, "", " ", FALSE, TRUE, NULL, NULL },
 218     { "space", 1, FALSE, J_RIGHT, "", " ", FALSE, TRUE, string_space, NULL },
 219     { "dot", 1, FALSE, J_RIGHT, "", " ", FALSE, FALSE, string_dot, NULL },
 220     { NULL, 0, FALSE, J_RIGHT, NULL, NULL, FALSE, FALSE, NULL, NULL },
 221 };
 222 
 223 static char *panel_sort_up_char = NULL;
 224 static char *panel_sort_down_char = NULL;
 225 static int panel_sort_up_indicator_width = 0;
 226 static int panel_sort_down_indicator_width = 0;
 227 
 228 static char *panel_hiddenfiles_show_char = NULL;
 229 static char *panel_hiddenfiles_hide_char = NULL;
 230 static char *panel_history_prev_item_char = NULL;
 231 static char *panel_history_next_item_char = NULL;
 232 static char *panel_history_show_list_char = NULL;
 233 static char *panel_filename_scroll_left_char = NULL;
 234 static char *panel_filename_scroll_right_char = NULL;
 235 
 236 /* Panel that selection started */
 237 static WPanel *mouse_mark_panel = NULL;
 238 
 239 static gboolean mouse_marking = FALSE;
 240 static int state_mark = 0;
 241 
 242 static GString *string_file_name_buffer;
 243 
 244 /* --------------------------------------------------------------------------------------------- */
 245 /*** file scope functions ************************************************************************/
 246 /* --------------------------------------------------------------------------------------------- */
 247 
 248 static panelized_descr_t *
 249 panelized_descr_new (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
 250 {
 251     panelized_descr_t *p;
 252 
 253     p = g_new0 (panelized_descr_t, 1);
 254     p->list.len = -1;
 255 
 256     return p;
 257 }
 258 
 259 /* --------------------------------------------------------------------------------------------- */
 260 
 261 static void
 262 panelized_descr_free (panelized_descr_t *p)
     /* [previous][next][first][last][top][bottom][index][help]  */
 263 {
 264     if (p != NULL)
 265     {
 266         dir_list_free_list (&p->list);
 267         vfs_path_free (p->root_vpath, TRUE);
 268         g_free (p);
 269     }
 270 }
 271 
 272 /* --------------------------------------------------------------------------------------------- */
 273 
 274 static void
 275 set_colors (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
 276 {
 277     (void) panel;
 278 
 279     tty_set_normal_attrs ();
 280     tty_setcolor (CORE_NORMAL_COLOR);
 281 }
 282 
 283 /* --------------------------------------------------------------------------------------------- */
 284 /** Delete format_item_t object */
 285 
 286 static void
 287 format_item_free (format_item_t *format)
     /* [previous][next][first][last][top][bottom][index][help]  */
 288 {
 289     g_free (format->title);
 290     g_free (format);
 291 }
 292 
 293 /* --------------------------------------------------------------------------------------------- */
 294 /** Extract the number of available lines in a panel */
 295 
 296 static int
 297 panel_lines (const WPanel *p)
     /* [previous][next][first][last][top][bottom][index][help]  */
 298 {
 299     // 3 lines are: top frame, column header, bottom frame
 300     return (CONST_WIDGET (p)->rect.lines - 3 - (panels_options.show_mini_info ? 2 : 0));
 301 }
 302 
 303 /* --------------------------------------------------------------------------------------------- */
 304 /** This code relies on the default justification!!! */
 305 
 306 static void
 307 add_permission_string (const char *dest, int width, file_entry_t *fe, file_attr_t attr, int color,
     /* [previous][next][first][last][top][bottom][index][help]  */
 308                        gboolean is_octal)
 309 {
 310     int i, r, l;
 311 
 312     l = get_user_permissions (&fe->st);
 313 
 314     if (is_octal)
 315     {
 316         // Place of the access bit in octal mode
 317         l = width + l - 3;
 318         r = l + 1;
 319     }
 320     else
 321     {
 322         // The same to the triplet in string mode
 323         l = l * 3 + 1;
 324         r = l + 3;
 325     }
 326 
 327     for (i = 0; i < width; i++)
 328     {
 329         if (i >= l && i < r)
 330         {
 331             if (attr == FATTR_CURRENT || attr == FATTR_MARKED_CURRENT)
 332                 tty_setcolor (CORE_MARKED_SELECTED_COLOR);
 333             else
 334                 tty_setcolor (CORE_MARKED_COLOR);
 335         }
 336         else
 337             tty_setcolor (color);
 338 
 339         tty_print_char (dest[i]);
 340     }
 341 }
 342 
 343 /* --------------------------------------------------------------------------------------------- */
 344 /** String representations of various file attributes name */
 345 
 346 static const char *
 347 string_file_name (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 348 {
 349     (void) len;
 350 
 351     mc_g_string_copy (string_file_name_buffer, fe->fname);
 352 
 353     return string_file_name_buffer->str;
 354 }
 355 
 356 /* --------------------------------------------------------------------------------------------- */
 357 
 358 static unsigned int
 359 ilog10 (dev_t n)
     /* [previous][next][first][last][top][bottom][index][help]  */
 360 {
 361     unsigned int digits = 0;
 362 
 363     do
 364     {
 365         digits++;
 366         n /= 10;
 367     }
 368     while (n != 0);
 369 
 370     return digits;
 371 }
 372 
 373 /* --------------------------------------------------------------------------------------------- */
 374 
 375 static void
 376 format_device_number (char *buf, size_t bufsize, dev_t dev)
     /* [previous][next][first][last][top][bottom][index][help]  */
 377 {
 378     dev_t major_dev, minor_dev;
 379     unsigned int major_digits, minor_digits;
 380 
 381     major_dev = major (dev);
 382     major_digits = ilog10 (major_dev);
 383 
 384     minor_dev = minor (dev);
 385     minor_digits = ilog10 (minor_dev);
 386 
 387     g_assert (bufsize >= 1);
 388 
 389     if (major_digits + 1 + minor_digits + 1 <= bufsize)
 390         g_snprintf (buf, bufsize, "%lu,%lu", (unsigned long) major_dev, (unsigned long) minor_dev);
 391     else
 392         g_strlcpy (buf, _ ("[dev]"), bufsize);
 393 }
 394 
 395 /* --------------------------------------------------------------------------------------------- */
 396 /** size */
 397 
 398 static const char *
 399 string_file_size (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 400 {
 401     static char buffer[BUF_TINY];
 402 
 403     // Don't ever show size of ".." since we don't calculate it
 404     if (DIR_IS_DOTDOT (fe->fname->str))
 405         return _ ("UP--DIR");
 406 
 407 #ifdef HAVE_STRUCT_STAT_ST_RDEV
 408     if (S_ISBLK (fe->st.st_mode) || S_ISCHR (fe->st.st_mode))
 409         format_device_number (buffer, len + 1, fe->st.st_rdev);
 410     else
 411 #endif
 412         size_trunc_len (buffer, (unsigned int) len, fe->st.st_size, 0, panels_options.kilobyte_si);
 413 
 414     return buffer;
 415 }
 416 
 417 /* --------------------------------------------------------------------------------------------- */
 418 /** bsize */
 419 
 420 static const char *
 421 string_file_size_brief (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 422 {
 423     if (S_ISLNK (fe->st.st_mode) && !link_isdir (fe))
 424         return _ ("SYMLINK");
 425 
 426     if ((S_ISDIR (fe->st.st_mode) || link_isdir (fe)) && !fe->f.dir_size_computed
 427         && !DIR_IS_DOTDOT (fe->fname->str))
 428         return _ ("SUB-DIR");
 429 
 430     return string_file_size (fe, len);
 431 }
 432 
 433 /* --------------------------------------------------------------------------------------------- */
 434 /** This functions return a string representation of a file entry type */
 435 
 436 static const char *
 437 string_file_type (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 438 {
 439     static char buffer[2];
 440 
 441     (void) len;
 442 
 443     if (S_ISDIR (fe->st.st_mode))
 444         buffer[0] = PATH_SEP;
 445     else if (S_ISLNK (fe->st.st_mode))
 446     {
 447         if (link_isdir (fe))
 448             buffer[0] = '~';
 449         else if (fe->f.stale_link != 0)
 450             buffer[0] = '!';
 451         else
 452             buffer[0] = '@';
 453     }
 454     else if (S_ISCHR (fe->st.st_mode))
 455         buffer[0] = '-';
 456     else if (S_ISSOCK (fe->st.st_mode))
 457         buffer[0] = '=';
 458     else if (S_ISDOOR (fe->st.st_mode))
 459         buffer[0] = '>';
 460     else if (S_ISBLK (fe->st.st_mode))
 461         buffer[0] = '+';
 462     else if (S_ISFIFO (fe->st.st_mode))
 463         buffer[0] = '|';
 464     else if (S_ISNAM (fe->st.st_mode))
 465         buffer[0] = '#';
 466     else if (!S_ISREG (fe->st.st_mode))
 467         buffer[0] = '?';  // non-regular of unknown kind
 468     else if (is_exe (fe->st.st_mode))
 469         buffer[0] = '*';
 470     else
 471         buffer[0] = ' ';
 472     buffer[1] = '\0';
 473     return buffer;
 474 }
 475 
 476 /* --------------------------------------------------------------------------------------------- */
 477 /** mtime */
 478 
 479 static const char *
 480 string_file_mtime (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 481 {
 482     (void) len;
 483 
 484     return file_date (fe->st.st_mtime);
 485 }
 486 
 487 /* --------------------------------------------------------------------------------------------- */
 488 /** atime */
 489 
 490 static const char *
 491 string_file_atime (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 492 {
 493     (void) len;
 494 
 495     return file_date (fe->st.st_atime);
 496 }
 497 
 498 /* --------------------------------------------------------------------------------------------- */
 499 /** ctime */
 500 
 501 static const char *
 502 string_file_ctime (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 503 {
 504     (void) len;
 505 
 506     return file_date (fe->st.st_ctime);
 507 }
 508 
 509 /* --------------------------------------------------------------------------------------------- */
 510 /** perm */
 511 
 512 static const char *
 513 string_file_permission (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 514 {
 515     (void) len;
 516 
 517     return string_perm (fe->st.st_mode);
 518 }
 519 
 520 /* --------------------------------------------------------------------------------------------- */
 521 /** mode */
 522 
 523 static const char *
 524 string_file_perm_octal (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 525 {
 526     static char buffer[10];
 527 
 528     (void) len;
 529 
 530     g_snprintf (buffer, sizeof (buffer), "0%06lo", (unsigned long) fe->st.st_mode);
 531     return buffer;
 532 }
 533 
 534 /* --------------------------------------------------------------------------------------------- */
 535 /** nlink */
 536 
 537 static const char *
 538 string_file_nlinks (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 539 {
 540     static char buffer[BUF_TINY];
 541 
 542     (void) len;
 543 
 544     g_snprintf (buffer, sizeof (buffer), "%16d", (int) fe->st.st_nlink);
 545     return buffer;
 546 }
 547 
 548 /* --------------------------------------------------------------------------------------------- */
 549 /** inode */
 550 
 551 static const char *
 552 string_inode (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 553 {
 554     static char buffer[10];
 555 
 556     (void) len;
 557 
 558     g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_ino);
 559     return buffer;
 560 }
 561 
 562 /* --------------------------------------------------------------------------------------------- */
 563 /** nuid */
 564 
 565 static const char *
 566 string_file_nuid (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 567 {
 568     static char buffer[10];
 569 
 570     (void) len;
 571 
 572     g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_uid);
 573     return buffer;
 574 }
 575 
 576 /* --------------------------------------------------------------------------------------------- */
 577 /** ngid */
 578 
 579 static const char *
 580 string_file_ngid (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 581 {
 582     static char buffer[10];
 583 
 584     (void) len;
 585 
 586     g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_gid);
 587     return buffer;
 588 }
 589 
 590 /* --------------------------------------------------------------------------------------------- */
 591 /** owner */
 592 
 593 static const char *
 594 string_file_owner (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 595 {
 596     (void) len;
 597 
 598     return get_owner (fe->st.st_uid);
 599 }
 600 
 601 /* --------------------------------------------------------------------------------------------- */
 602 /** group */
 603 
 604 static const char *
 605 string_file_group (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 606 {
 607     (void) len;
 608 
 609     return get_group (fe->st.st_gid);
 610 }
 611 
 612 /* --------------------------------------------------------------------------------------------- */
 613 /** mark */
 614 
 615 static const char *
 616 string_marked (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 617 {
 618     (void) len;
 619 
 620     return fe->f.marked != 0 ? "*" : " ";
 621 }
 622 
 623 /* --------------------------------------------------------------------------------------------- */
 624 /** space */
 625 
 626 static const char *
 627 string_space (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 628 {
 629     (void) fe;
 630     (void) len;
 631 
 632     return " ";
 633 }
 634 
 635 /* --------------------------------------------------------------------------------------------- */
 636 /** dot */
 637 
 638 static const char *
 639 string_dot (const file_entry_t *fe, int len)
     /* [previous][next][first][last][top][bottom][index][help]  */
 640 {
 641     (void) fe;
 642     (void) len;
 643 
 644     return ".";
 645 }
 646 
 647 /* --------------------------------------------------------------------------------------------- */
 648 
 649 static int
 650 file_compute_color (const file_attr_t attr, file_entry_t *fe)
     /* [previous][next][first][last][top][bottom][index][help]  */
 651 {
 652     switch (attr)
 653     {
 654     case FATTR_CURRENT:
 655         return CORE_SELECTED_COLOR;
 656     case FATTR_MARKED:
 657         return CORE_MARKED_COLOR;
 658     case FATTR_MARKED_CURRENT:
 659         return CORE_MARKED_SELECTED_COLOR;
 660     case FATTR_STATUS:
 661         return CORE_NORMAL_COLOR;
 662     case FATTR_NORMAL:
 663     default:
 664         if (!panels_options.filetype_mode)
 665             return CORE_NORMAL_COLOR;
 666     }
 667 
 668     return mc_fhl_get_color (mc_filehighlight, fe);
 669 }
 670 
 671 /* --------------------------------------------------------------------------------------------- */
 672 /** Returns the number of items in the given panel */
 673 
 674 static int
 675 panel_items (const WPanel *p)
     /* [previous][next][first][last][top][bottom][index][help]  */
 676 {
 677     return panel_lines (p) * p->list_cols;
 678 }
 679 
 680 /* --------------------------------------------------------------------------------------------- */
 681 /** Formats the file number file_index of panel in the buffer dest */
 682 
 683 static filename_scroll_flag_t
 684 format_file (WPanel *panel, int file_index, int width, file_attr_t attr, gboolean isstatus,
     /* [previous][next][first][last][top][bottom][index][help]  */
 685              int *field_length)
 686 {
 687     int color = CORE_NORMAL_COLOR;
 688     int length = 0;
 689     GSList *format, *home;
 690     file_entry_t *fe = NULL;
 691     filename_scroll_flag_t res = FILENAME_NOSCROLL;
 692 
 693     *field_length = 0;
 694 
 695     if (panel->dir.len != 0 && file_index < panel->dir.len)
 696     {
 697         fe = &panel->dir.list[file_index];
 698         color = file_compute_color (attr, fe);
 699     }
 700 
 701     home = isstatus ? panel->status_format : panel->format;
 702 
 703     for (format = home; format != NULL && length != width; format = g_slist_next (format))
 704     {
 705         format_item_t *fi = (format_item_t *) format->data;
 706 
 707         if (fi->string_fn != NULL)
 708         {
 709             const char *txt = " ";
 710             int len, perm = 0;
 711             const char *prepared_text;
 712             int name_offset = 0;
 713 
 714             if (fe != NULL)
 715                 txt = fi->string_fn (fe, fi->field_len);
 716 
 717             len = fi->field_len;
 718             if (len + length > width)
 719                 len = width - length;
 720             if (len <= 0)
 721                 break;
 722 
 723             if (!isstatus && strcmp (fi->id, "name") == 0)
 724             {
 725                 const int str_len = str_length (txt);
 726                 const unsigned int len_diff = (unsigned int) DOZ (str_len, len);
 727 
 728                 *field_length = len + 1;
 729 
 730                 panel->max_shift = MAX (panel->max_shift, len_diff);
 731 
 732                 if (len_diff != 0)
 733                 {
 734                     const unsigned int shift = MIN (panel->content_shift, len_diff);
 735 
 736                     if (shift != 0)
 737                         res |= FILENAME_SCROLL_LEFT;
 738 
 739                     name_offset = str_offset_to_pos (txt, shift);
 740                     if (str_length (txt + name_offset) > len)
 741                         res |= FILENAME_SCROLL_RIGHT;
 742                 }
 743             }
 744 
 745             if (panels_options.permission_mode)
 746             {
 747                 if (strcmp (fi->id, "perm") == 0)
 748                     perm = 1;
 749                 else if (strcmp (fi->id, "mode") == 0)
 750                     perm = 2;
 751             }
 752 
 753             tty_setcolor (color);
 754 
 755             if (!isstatus)
 756                 prepared_text = str_fit_to_term (txt + name_offset, len, HIDE_FIT (fi->just_mode));
 757             else
 758                 prepared_text = str_fit_to_term (txt, len, fi->just_mode);
 759 
 760             if (perm != 0 && fe != NULL)
 761                 add_permission_string (prepared_text, fi->field_len, fe, attr, color, perm != 1);
 762             else
 763                 tty_print_string (prepared_text);
 764 
 765             length += len;
 766         }
 767         else
 768         {
 769             if (attr == FATTR_CURRENT || attr == FATTR_MARKED_CURRENT)
 770                 tty_setcolor (CORE_SELECTED_COLOR);
 771             else
 772                 tty_setcolor (CORE_FRAME_COLOR);
 773             tty_print_one_vline (TRUE);
 774             length++;
 775         }
 776     }
 777 
 778     if (length < width)
 779     {
 780         int y, x;
 781 
 782         tty_getyx (&y, &x);
 783         tty_draw_hline (y, x, ' ', width - length);
 784     }
 785 
 786     return res;
 787 }
 788 
 789 /* --------------------------------------------------------------------------------------------- */
 790 
 791 static void
 792 repaint_file (WPanel *panel, int file_index, file_attr_t attr)
     /* [previous][next][first][last][top][bottom][index][help]  */
 793 {
 794     Widget *w = WIDGET (panel);
 795 
 796     int nth_column = 0;
 797     int width;
 798     int offset = 0;
 799     filename_scroll_flag_t ret_frm;
 800     int ypos = 0;
 801     int fln = 0;
 802 
 803     // Divide into panel->list_cols equally wide columns, plus maybe some leftover space: #4906
 804     width = w->rect.cols - 1;
 805 
 806     nth_column = (file_index - panel->top) / panel_lines (panel);
 807     width /= panel->list_cols;
 808 
 809     offset = width * nth_column;
 810 
 811     if (nth_column + 1 >= panel->list_cols)
 812         width = w->rect.cols - offset - 1;
 813 
 814     width--;
 815 
 816     // Nothing to paint
 817     if (width <= 0)
 818         return;
 819 
 820     ypos = file_index - panel->top;
 821     ypos %= panel_lines (panel);
 822 
 823     ypos += 2;  // top frame and header
 824     widget_gotoyx (w, ypos, offset + 1);
 825 
 826     ret_frm = format_file (panel, file_index, width, attr, FALSE, &fln);
 827 
 828     if (nth_column + 1 < panel->list_cols)
 829     {
 830         tty_setcolor (CORE_FRAME_COLOR);
 831         tty_print_one_vline (TRUE);
 832     }
 833 
 834     if (ret_frm != FILENAME_NOSCROLL)
 835     {
 836         if (panel->list_cols == 1 && fln > 0)
 837         {
 838             if (panel->list_format != list_long)
 839                 width = fln;
 840             else
 841             {
 842                 offset = width - fln + 1;
 843                 width = fln - 1;
 844             }
 845         }
 846 
 847         const int file_color = attr == FATTR_CURRENT || attr == FATTR_MARKED_CURRENT
 848             ? CORE_SELECTED_COLOR
 849             : CORE_NORMAL_COLOR;
 850 
 851         if ((ret_frm & FILENAME_SCROLL_LEFT) != 0)
 852         {
 853             const int scroll_left_char_color =
 854                 panel->list_format == list_long ? file_color : CORE_NORMAL_COLOR;
 855 
 856             widget_gotoyx (w, ypos, offset);
 857             tty_setcolor (scroll_left_char_color);
 858             tty_print_string (panel_filename_scroll_left_char);
 859         }
 860 
 861         if ((ret_frm & FILENAME_SCROLL_RIGHT) != 0)
 862         {
 863             offset += width + 1;
 864 
 865             const int scroll_right_char_color =
 866                 panel->list_format != list_long && g_slist_length (panel->format) > 2
 867                 ? file_color
 868                 : CORE_NORMAL_COLOR;
 869 
 870             widget_gotoyx (w, ypos, offset);
 871             tty_setcolor (scroll_right_char_color);
 872             tty_print_string (panel_filename_scroll_right_char);
 873         }
 874     }
 875 }
 876 
 877 /* --------------------------------------------------------------------------------------------- */
 878 
 879 static void
 880 repaint_status (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
 881 {
 882     int width;
 883 
 884     width = WIDGET (panel)->rect.cols - 2;
 885     if (width > 0)
 886     {
 887         int fln = 0;
 888 
 889         (void) format_file (panel, panel->current, width, FATTR_STATUS, TRUE, &fln);
 890     }
 891 }
 892 
 893 /* --------------------------------------------------------------------------------------------- */
 894 
 895 static void
 896 display_mini_info (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
 897 {
 898     Widget *w = WIDGET (panel);
 899     const file_entry_t *fe;
 900 
 901     if (!panels_options.show_mini_info)
 902         return;
 903 
 904     widget_gotoyx (w, panel_lines (panel) + 3, 1);
 905 
 906     if (panel->quick_search.active)
 907     {
 908         tty_setcolor (CORE_INPUT_COLOR);
 909         tty_print_char ('/');
 910         tty_print_string (
 911             str_fit_to_term (panel->quick_search.buffer->str, w->rect.cols - 3, J_LEFT));
 912         return;
 913     }
 914 
 915     // Status resolves links and show them
 916     set_colors (panel);
 917 
 918     fe = panel_current_entry (panel);
 919 
 920     if (fe == NULL)
 921         // NULL is in case of filter that doesn't match anything
 922         repaint_status (panel);
 923     else if (S_ISLNK (fe->st.st_mode))
 924     {
 925         char link_target[MC_MAXPATHLEN];
 926         vfs_path_t *lc_link_vpath;
 927         int len;
 928 
 929         lc_link_vpath = vfs_path_append_new (panel->cwd_vpath, fe->fname->str, (char *) NULL);
 930         len = mc_readlink (lc_link_vpath, link_target, MC_MAXPATHLEN - 1);
 931         vfs_path_free (lc_link_vpath, TRUE);
 932         if (len > 0)
 933         {
 934             link_target[len] = 0;
 935             tty_print_string ("-> ");
 936             tty_print_string (str_fit_to_term (link_target, w->rect.cols - 5, J_LEFT_FIT));
 937         }
 938         else
 939             tty_print_string (str_fit_to_term (_ ("<readlink failed>"), w->rect.cols - 2, J_LEFT));
 940     }
 941     else if (DIR_IS_DOTDOT (fe->fname->str))
 942     {
 943         /* FIXME:
 944          * while loading directory (dir_list_load() and dir_list_reload()),
 945          * the actual stat info about ".." directory isn't got;
 946          * so just don't display incorrect info about ".." directory */
 947         tty_print_string (str_fit_to_term (_ ("UP--DIR"), w->rect.cols - 2, J_LEFT));
 948     }
 949     else
 950         // Default behavior
 951         repaint_status (panel);
 952 }
 953 
 954 /* --------------------------------------------------------------------------------------------- */
 955 
 956 static void
 957 paint_dir (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
 958 {
 959     int i;
 960     int items;  // Number of items
 961 
 962     items = panel_items (panel);
 963     // reset max len of filename because we have the new max length for the new file list
 964     panel->max_shift = 0;
 965 
 966     for (i = 0; i < items; i++)
 967     {
 968         file_attr_t attr = FATTR_NORMAL;  // Color value of the line
 969         int n;
 970         gboolean marked;
 971 
 972         n = i + panel->top;
 973         marked = (panel->dir.list[n].f.marked != 0);
 974 
 975         if (n < panel->dir.len)
 976         {
 977             if (panel->current == n && panel->active)
 978                 attr = marked ? FATTR_MARKED_CURRENT : FATTR_CURRENT;
 979             else if (marked)
 980                 attr = FATTR_MARKED;
 981         }
 982 
 983         repaint_file (panel, n, attr);
 984     }
 985 
 986     tty_set_normal_attrs ();
 987 }
 988 
 989 /* --------------------------------------------------------------------------------------------- */
 990 
 991 static void
 992 display_total_marked_size (const WPanel *panel, int y, int x, gboolean size_only)
     /* [previous][next][first][last][top][bottom][index][help]  */
 993 {
 994     const Widget *w = CONST_WIDGET (panel);
 995 
 996     char buffer[BUF_SMALL], b_bytes[BUF_SMALL];
 997     const char *buf;
 998     int cols;
 999 
1000     if (panel->marked <= 0)
1001         return;
1002 
1003     buf = size_only ? b_bytes : buffer;
1004     cols = w->rect.cols - 2;
1005 
1006     g_strlcpy (b_bytes, size_trunc_sep (panel->total, panels_options.kilobyte_si),
1007                sizeof (b_bytes));
1008 
1009     if (!size_only)
1010         g_snprintf (buffer, sizeof (buffer),
1011                     ngettext ("%s in %d file", "%s in %d files", panel->marked), b_bytes,
1012                     panel->marked);
1013 
1014     // don't forget spaces around buffer content
1015     buf = str_trunc (buf, cols - 4);
1016 
1017     if (x < 0)
1018         // center in panel
1019         x = (w->rect.cols - str_term_width1 (buf)) / 2 - 1;
1020 
1021     /*
1022      * y == panel_lines (panel) + 2  for mini_info_separator
1023      * y == w->lines - 1             for panel bottom frame
1024      */
1025     widget_gotoyx (w, y, x);
1026     tty_setcolor (CORE_MARKED_COLOR);
1027     tty_printf (" %s ", buf);
1028 }
1029 
1030 /* --------------------------------------------------------------------------------------------- */
1031 
1032 static void
1033 mini_info_separator (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1034 {
1035     if (panels_options.show_mini_info)
1036     {
1037         int y;
1038 
1039         y = panel_lines (panel) + 2;
1040 
1041         tty_setcolor (CORE_NORMAL_COLOR);
1042         /* Status displays total marked size.
1043          * Centered in panel, full format. */
1044         display_total_marked_size (panel, y, -1, FALSE);
1045     }
1046 }
1047 
1048 /* --------------------------------------------------------------------------------------------- */
1049 
1050 static void
1051 show_free_space (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1052 {
1053     // Used to figure out how many free space we have
1054     static struct my_statfs myfs_stats;
1055     // Old current working directory for displaying free space
1056     static char *old_cwd = NULL;
1057 
1058     // Don't try to stat non-local fs
1059     if (!vfs_file_is_local (panel->cwd_vpath) || !free_space)
1060         return;
1061 
1062     if (old_cwd == NULL || strcmp (old_cwd, vfs_path_as_str (panel->cwd_vpath)) != 0)
1063     {
1064         char rpath[PATH_MAX];
1065 
1066         init_my_statfs ();
1067         g_free (old_cwd);
1068         old_cwd = g_strdup (vfs_path_as_str (panel->cwd_vpath));
1069 
1070         if (mc_realpath (old_cwd, rpath) == NULL)
1071             return;
1072 
1073         my_statfs (&myfs_stats, rpath);
1074     }
1075 
1076     if (myfs_stats.avail != 0 || myfs_stats.total != 0)
1077     {
1078         const Widget *w = CONST_WIDGET (panel);
1079         char buffer1[6], buffer2[6], tmp[BUF_SMALL];
1080 
1081         size_trunc_len (buffer1, sizeof (buffer1) - 1, myfs_stats.avail, 1,
1082                         panels_options.kilobyte_si);
1083         size_trunc_len (buffer2, sizeof (buffer2) - 1, myfs_stats.total, 1,
1084                         panels_options.kilobyte_si);
1085         g_snprintf (tmp, sizeof (tmp), " %s / %s (%d%%) ", buffer1, buffer2,
1086                     myfs_stats.total == 0
1087                         ? 0
1088                         : (int) (100 * (long double) myfs_stats.avail / myfs_stats.total));
1089         widget_gotoyx (w, w->rect.lines - 1, w->rect.cols - 2 - (int) strlen (tmp));
1090         tty_setcolor (CORE_NORMAL_COLOR);
1091         tty_print_string (tmp);
1092     }
1093 }
1094 
1095 /* --------------------------------------------------------------------------------------------- */
1096 /**
1097  * Prepare path string for showing in panel's header.
1098  * Passwords will removed, also home dir will replaced by ~
1099  *
1100  * @param panel WPanel object
1101  *
1102  * @return newly allocated string.
1103  */
1104 
1105 static char *
1106 panel_correct_path_to_show (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1107 {
1108     vfs_path_t *last_vpath;
1109     const vfs_path_element_t *path_element;
1110     char *return_path;
1111     int elements_count;
1112 
1113     elements_count = vfs_path_elements_count (panel->cwd_vpath);
1114 
1115     // get last path element
1116     path_element = vfs_path_element_clone (vfs_path_get_by_index (panel->cwd_vpath, -1));
1117 
1118     if (elements_count > 1
1119         && (strcmp (path_element->class->name, "cpiofs") == 0
1120             || strcmp (path_element->class->name, "extfs") == 0
1121             || strcmp (path_element->class->name, "tarfs") == 0))
1122     {
1123         const char *archive_name;
1124         const vfs_path_element_t *prev_path_element;
1125 
1126         // get previous path element for catching archive name
1127         prev_path_element = vfs_path_get_by_index (panel->cwd_vpath, -2);
1128         archive_name = strrchr (prev_path_element->path, PATH_SEP);
1129         if (archive_name != NULL)
1130             last_vpath = vfs_path_from_str_flags (archive_name + 1, VPF_NO_CANON);
1131         else
1132         {
1133             last_vpath = vfs_path_from_str_flags (prev_path_element->path, VPF_NO_CANON);
1134             last_vpath->relative = TRUE;
1135         }
1136     }
1137     else
1138         last_vpath = vfs_path_new (TRUE);
1139 
1140     vfs_path_add_element (last_vpath, path_element);
1141     return_path = vfs_path_to_str_flags (last_vpath, 0,
1142                                          VPF_STRIP_HOME | VPF_STRIP_PASSWORD | VPF_HIDE_CHARSET);
1143     vfs_path_free (last_vpath, TRUE);
1144 
1145     return return_path;
1146 }
1147 
1148 /* --------------------------------------------------------------------------------------------- */
1149 /**
1150  * Get Current path element encoding
1151  *
1152  * @param panel WPanel object
1153  *
1154  * @return newly allocated string or NULL if path charset is same as system charset
1155  */
1156 
1157 static char *
1158 panel_get_encoding_info_str (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1159 {
1160     char *ret_str = NULL;
1161     const vfs_path_element_t *path_element;
1162 
1163     path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
1164     if (path_element->encoding != NULL)
1165         ret_str = g_strdup_printf ("[%s]", path_element->encoding);
1166 
1167     return ret_str;
1168 }
1169 
1170 /* --------------------------------------------------------------------------------------------- */
1171 
1172 static void
1173 show_vertical_separator_tee (const WPanel *panel, int col)
     /* [previous][next][first][last][top][bottom][index][help]  */
1174 {
1175     const Widget *w = CONST_WIDGET (panel);
1176 
1177     widget_gotoyx (w, 0, col);
1178     tty_print_char (mc_tty_frm[MC_TTY_FRM_DTOPMIDDLE]);
1179 
1180     if (panels_options.show_mini_info)
1181     {
1182         widget_gotoyx (w, w->rect.lines - 3, col);
1183         tty_print_char (mc_tty_frm[MC_TTY_FRM_BOTTOMMIDDLE]);
1184     }
1185     else
1186     {
1187         widget_gotoyx (w, w->rect.lines - 1, col);
1188         tty_print_char (mc_tty_frm[MC_TTY_FRM_DBOTTOMMIDDLE]);
1189     }
1190 }
1191 
1192 /* --------------------------------------------------------------------------------------------- */
1193 
1194 static void
1195 show_dir (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1196 {
1197     const Widget *w = CONST_WIDGET (panel);
1198     gchar *tmp;
1199     int col, i;
1200 
1201     // paint the basic frame
1202     tty_set_normal_attrs ();
1203     tty_setcolor (CORE_FRAME_COLOR);
1204     tty_draw_box (w->rect.y, w->rect.x, w->rect.lines, w->rect.cols, FALSE);
1205 
1206     // paint the mini info's separator line
1207     if (panels_options.show_mini_info)
1208     {
1209         int y;
1210 
1211         y = panel_lines (panel) + 2;
1212 
1213         widget_gotoyx (w, y, 0);
1214         tty_print_char (mc_tty_frm[MC_TTY_FRM_DLEFTMIDDLE]);
1215         tty_draw_hline (w->rect.y + y, w->rect.x + 1, mc_tty_frm[MC_TTY_FRM_HORIZ],
1216                         w->rect.cols - 2);
1217         widget_gotoyx (w, y, w->rect.cols - 1);
1218         tty_print_char (mc_tty_frm[MC_TTY_FRM_DRIGHTMIDDLE]);
1219     }
1220 
1221     // paint the tee characters at the top and bottom of inner vertical lines
1222     col = 0;
1223     for (i = 0; i < panel->list_cols; i++)
1224     {
1225         GSList *format;
1226 
1227         for (format = panel->format; format != NULL; format = g_slist_next (format))
1228         {
1229             format_item_t *fi = (format_item_t *) format->data;
1230 
1231             if (fi->string_fn != NULL)
1232                 col += fi->field_len;
1233             else
1234                 show_vertical_separator_tee (panel, ++col);
1235         }
1236 
1237         if (i < panel->list_cols - 1)
1238             show_vertical_separator_tee (panel, ++col);
1239     }
1240 
1241     widget_gotoyx (w, 0, 1);
1242     tty_print_string (panel_history_prev_item_char);
1243 
1244     tmp = panels_options.show_dot_files ? panel_hiddenfiles_show_char : panel_hiddenfiles_hide_char;
1245     tmp = g_strdup_printf ("%s[%s]%s", tmp, panel_history_show_list_char,
1246                            panel_history_next_item_char);
1247 
1248     widget_gotoyx (w, 0, w->rect.cols - 6);
1249     tty_print_string (tmp);
1250 
1251     g_free (tmp);
1252 
1253     tty_setcolor (CORE_NORMAL_COLOR);
1254     widget_gotoyx (w, 0, 3);
1255 
1256     if (panel->is_panelized)
1257         tty_printf (" %s ", _ ("Panelize"));
1258     else
1259     {
1260         tmp = panel_get_encoding_info_str (panel);
1261         if (tmp != NULL)
1262         {
1263             tty_printf ("%s", tmp);
1264             widget_gotoyx (w, 0, 3 + strlen (tmp));
1265             g_free (tmp);
1266         }
1267     }
1268 
1269     if (panel->active)
1270         tty_setcolor (CORE_REVERSE_COLOR);
1271 
1272     tmp = panel_correct_path_to_show (panel);
1273     tty_printf (" %s ", str_term_trim (tmp, MIN (MAX (w->rect.cols - 12, 0), w->rect.cols)));
1274     g_free (tmp);
1275 
1276     if (!panels_options.show_mini_info)
1277     {
1278         if (panel->marked == 0)
1279         {
1280             const file_entry_t *fe;
1281 
1282             fe = panel_current_entry (panel);
1283 
1284             // Show size of current file in the bottom of panel
1285             if (fe != NULL && S_ISREG (fe->st.st_mode))
1286             {
1287                 char buffer[BUF_SMALL];
1288 
1289                 g_snprintf (buffer, sizeof (buffer), " %s ",
1290                             size_trunc_sep (fe->st.st_size, panels_options.kilobyte_si));
1291                 tty_setcolor (CORE_NORMAL_COLOR);
1292                 widget_gotoyx (w, w->rect.lines - 1, 4);
1293                 tty_print_string (buffer);
1294             }
1295         }
1296         else
1297         {
1298             /* Show total size of marked files
1299              * In the bottom of panel, display size only. */
1300             display_total_marked_size (panel, w->rect.lines - 1, 2, TRUE);
1301         }
1302     }
1303 
1304     show_free_space (panel);
1305 
1306     if (panel->active)
1307         tty_set_normal_attrs ();
1308 }
1309 
1310 /* --------------------------------------------------------------------------------------------- */
1311 
1312 static void
1313 adjust_top_file (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1314 {
1315     int items;
1316 
1317     items = panel_items (panel);
1318 
1319     if (panel->dir.len <= items || panel->current < 0)
1320     {
1321         // If all files fit, show them all.
1322         // panel->current < 0 is in case of filter that doesn't match anything, keep it.
1323         panel->top = 0;
1324     }
1325     else
1326     {
1327         int i;
1328 
1329         // Update panel->current to avoid out of range in panel->dir.list[panel->current].
1330         panel->current = CLAMP (panel->current, 0, panel->dir.len - 1);
1331 
1332         /* top_file has to be in the range [current-items+1, current] so that
1333            the current file is visible.
1334            top_file should be in the range [0, count-items] so that there's
1335            no empty space wasted.
1336            Within these ranges, adjust it by as little as possible. */
1337 
1338         if (panel->top < 0)
1339             panel->top = 0;
1340 
1341         i = panel->current - items + 1;
1342         if (panel->top < i)
1343             panel->top = i;
1344 
1345         i = panel->dir.len - items;
1346         if (panel->top > i)
1347             panel->top = i;
1348 
1349         if (panel->top > panel->current)
1350             panel->top = panel->current;
1351     }
1352 }
1353 
1354 /* --------------------------------------------------------------------------------------------- */
1355 /** add "#enc:encoding" to end of path */
1356 /* if path ends width a previous #enc:, only encoding is changed no additional
1357  * #enc: is appended
1358  * return new string
1359  */
1360 
1361 static char *
1362 panel_save_name (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1363 {
1364     // If the program is shutting down
1365     if ((mc_global.midnight_shutdown && auto_save_setup) || saving_setup)
1366         return g_strdup (panel->name);
1367 
1368     return g_strconcat ("Temporal:", panel->name, (char *) NULL);
1369 }
1370 
1371 /* --------------------------------------------------------------------------------------------- */
1372 
1373 static void
1374 directory_history_add (WPanel *panel, const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
1375 {
1376     char *tmp;
1377 
1378     tmp = vfs_path_to_str_flags (vpath, 0, VPF_STRIP_PASSWORD);
1379     panel->dir_history.list = list_append_unique (panel->dir_history.list, tmp);
1380     panel->dir_history.current = panel->dir_history.list;
1381 }
1382 
1383 /* --------------------------------------------------------------------------------------------- */
1384 
1385 /* "history_load" event handler */
1386 static gboolean
1387 panel_load_history (const gchar *event_group_name, const gchar *event_name, gpointer init_data,
     /* [previous][next][first][last][top][bottom][index][help]  */
1388                     gpointer data)
1389 {
1390     WPanel *p = PANEL (init_data);
1391     ev_history_load_save_t *ev = (ev_history_load_save_t *) data;
1392 
1393     (void) event_group_name;
1394     (void) event_name;
1395 
1396     if (ev->receiver == NULL || ev->receiver == WIDGET (p))
1397     {
1398         if (ev->cfg != NULL)
1399             p->dir_history.list = mc_config_history_load (ev->cfg, p->dir_history.name);
1400         else
1401             p->dir_history.list = mc_config_history_get (p->dir_history.name);
1402 
1403         directory_history_add (p, p->cwd_vpath);
1404     }
1405 
1406     return TRUE;
1407 }
1408 
1409 /* --------------------------------------------------------------------------------------------- */
1410 
1411 /* "history_save" event handler */
1412 static gboolean
1413 panel_save_history (const gchar *event_group_name, const gchar *event_name, gpointer init_data,
     /* [previous][next][first][last][top][bottom][index][help]  */
1414                     gpointer data)
1415 {
1416     WPanel *p = PANEL (init_data);
1417     ev_history_load_save_t *ev = (ev_history_load_save_t *) data;
1418 
1419     (void) event_group_name;
1420     (void) event_name;
1421 
1422     mc_config_history_save (ev->cfg, p->dir_history.name, p->dir_history.list);
1423 
1424     return TRUE;
1425 }
1426 
1427 /* --------------------------------------------------------------------------------------------- */
1428 
1429 static void
1430 panel_destroy (WPanel *p)
     /* [previous][next][first][last][top][bottom][index][help]  */
1431 {
1432     size_t i;
1433 
1434     if (panels_options.auto_save_setup)
1435     {
1436         char *name;
1437 
1438         name = panel_save_name (p);
1439         panel_save_setup (p, name);
1440         g_free (name);
1441     }
1442 
1443     panel_clean_dir (p);
1444 
1445     // clean history
1446     if (p->dir_history.list != NULL)
1447     {
1448         // directory history is already saved before this moment
1449         p->dir_history.list = g_list_first (p->dir_history.list);
1450         g_list_free_full (p->dir_history.list, g_free);
1451     }
1452     g_free (p->dir_history.name);
1453 
1454     file_filter_clear (&p->filter);
1455 
1456     g_slist_free_full (p->format, (GDestroyNotify) format_item_free);
1457     g_slist_free_full (p->status_format, (GDestroyNotify) format_item_free);
1458 
1459     g_free (p->user_format);
1460     for (i = 0; i < LIST_FORMATS; i++)
1461         g_free (p->user_status_format[i]);
1462 
1463     g_free (p->name);
1464 
1465     panelized_descr_free (p->panelized_descr);
1466 
1467     g_string_free (p->quick_search.buffer, TRUE);
1468     g_string_free (p->quick_search.prev_buffer, TRUE);
1469 
1470     vfs_path_free (p->lwd_vpath, TRUE);
1471     vfs_path_free (p->cwd_vpath, TRUE);
1472 }
1473 
1474 /* --------------------------------------------------------------------------------------------- */
1475 
1476 static void
1477 panel_paint_sort_info (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1478 {
1479     if (*panel->sort_field->hotkey != '\0')
1480     {
1481         char str[BUF_TINY];
1482 
1483         if (panel->sort_info.reverse)
1484         {
1485             g_snprintf (str, sizeof (str), "%s%s", panel_sort_up_char,
1486                         Q_ (panel->sort_field->hotkey));
1487             panel_sort_up_indicator_width = str_term_width1 (str);
1488         }
1489         else
1490         {
1491             g_snprintf (str, sizeof (str), "%s%s", panel_sort_down_char,
1492                         Q_ (panel->sort_field->hotkey));
1493             panel_sort_down_indicator_width = str_term_width1 (str);
1494         }
1495         widget_gotoyx (panel, 1, 1);
1496         tty_print_string (str);
1497     }
1498 }
1499 
1500 /* --------------------------------------------------------------------------------------------- */
1501 
1502 static const char *
1503 panel_get_title_without_hotkey (const char *title)
     /* [previous][next][first][last][top][bottom][index][help]  */
1504 {
1505     static char translated_title[BUF_TINY];
1506 
1507     if (title == NULL || title[0] == '\0')
1508         translated_title[0] = '\0';
1509     else
1510     {
1511         char *hkey;
1512 
1513         g_snprintf (translated_title, sizeof (translated_title), "%s", _ (title));
1514 
1515         hkey = strchr (translated_title, '&');
1516         if (hkey != NULL && hkey[1] != '\0')
1517             memmove (hkey, hkey + 1, strlen (hkey));
1518     }
1519 
1520     return translated_title;
1521 }
1522 
1523 /* --------------------------------------------------------------------------------------------- */
1524 
1525 static void
1526 panel_print_header (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1527 {
1528     const Widget *w = CONST_WIDGET (panel);
1529 
1530     int y, x;
1531     int i;
1532     GString *format_txt;
1533 
1534     widget_gotoyx (w, 1, 1);
1535     tty_getyx (&y, &x);
1536     tty_setcolor (CORE_NORMAL_COLOR);
1537     tty_draw_hline (y, x, ' ', w->rect.cols - 2);
1538 
1539     format_txt = g_string_new ("");
1540 
1541     for (i = 0; i < panel->list_cols; i++)
1542     {
1543         GSList *format;
1544 
1545         for (format = panel->format; format != NULL; format = g_slist_next (format))
1546         {
1547             format_item_t *fi = (format_item_t *) format->data;
1548 
1549             if (fi->string_fn != NULL)
1550             {
1551                 g_string_set_size (format_txt, 0);
1552 
1553                 if (panel->list_format == list_long && strcmp (fi->id, panel->sort_field->id) == 0)
1554                     g_string_append (format_txt,
1555                                      panel->sort_info.reverse ? panel_sort_up_char
1556                                                               : panel_sort_down_char);
1557 
1558                 g_string_append (format_txt, fi->title);
1559 
1560                 if (panel->filter.handler != NULL && strcmp (fi->id, "name") == 0)
1561                 {
1562                     g_string_append (format_txt, " [");
1563                     g_string_append (format_txt, panel->filter.value);
1564                     g_string_append (format_txt, "]");
1565                 }
1566 
1567                 tty_setcolor (CORE_HEADER_COLOR);
1568                 tty_print_string (str_fit_to_term (format_txt->str, fi->field_len, J_CENTER_LEFT));
1569             }
1570             else
1571             {
1572                 tty_setcolor (CORE_FRAME_COLOR);
1573                 tty_print_one_vline (TRUE);
1574             }
1575         }
1576 
1577         if (i < panel->list_cols - 1)
1578         {
1579             tty_setcolor (CORE_FRAME_COLOR);
1580             tty_print_one_vline (TRUE);
1581         }
1582     }
1583 
1584     g_string_free (format_txt, TRUE);
1585 
1586     if (panel->list_format != list_long)
1587         panel_paint_sort_info (panel);
1588 }
1589 
1590 /* --------------------------------------------------------------------------------------------- */
1591 
1592 static const char *
1593 parse_panel_size (WPanel *panel, const char *format, gboolean isstatus)
     /* [previous][next][first][last][top][bottom][index][help]  */
1594 {
1595     panel_display_t frame = frame_half;
1596 
1597     format = skip_separators (format);
1598 
1599     if (strncmp (format, "full", 4) == 0)
1600     {
1601         frame = frame_full;
1602         format += 4;
1603     }
1604     else if (strncmp (format, "half", 4) == 0)
1605     {
1606         frame = frame_half;
1607         format += 4;
1608     }
1609 
1610     if (!isstatus)
1611     {
1612         panel->frame_size = frame;
1613         panel->list_cols = 1;
1614     }
1615 
1616     // Now, the optional column specifier
1617     format = skip_separators (format);
1618 
1619     if (g_ascii_isdigit (*format))
1620     {
1621         if (!isstatus)
1622         {
1623             panel->list_cols = g_ascii_digit_value (*format);
1624             if (panel->list_cols < 1)
1625                 panel->list_cols = 1;
1626         }
1627 
1628         format++;
1629     }
1630 
1631     if (!isstatus)
1632         panel_update_cols (WIDGET (panel), panel->frame_size);
1633 
1634     return skip_separators (format);
1635 }
1636 
1637 /* --------------------------------------------------------------------------------------------- */
1638 
1639 /* Format is:
1640 
1641    all              := panel_format? format
1642    panel_format     := [full|half] [1-9]
1643    format           := one_format_item_t
1644                      | format , one_format_item_t
1645 
1646    one_format_item_t := just format.id [opt_size]
1647    just              := [<=>]
1648    opt_size          := : size [opt_expand]
1649    size              := [0-9]+
1650    opt_expand        := +
1651 
1652  */
1653 
1654 static GSList *
1655 parse_display_format (WPanel *panel, const char *format, char **error, gboolean isstatus,
     /* [previous][next][first][last][top][bottom][index][help]  */
1656                       int *res_total_cols)
1657 {
1658     GSList *home = NULL;  // The formats we return
1659     int total_cols = 0;   // Used columns by the format
1660     size_t i;
1661 
1662     static size_t i18n_timelength = 0;  // flag: check ?Time length at startup
1663 
1664     *error = NULL;
1665 
1666     if (i18n_timelength == 0)
1667     {
1668         i18n_timelength = i18n_checktimelength ();  // Mustn't be 0
1669 
1670         for (i = 0; panel_fields[i].id != NULL; i++)
1671             if (strcmp ("time", panel_fields[i].id + 1) == 0)
1672                 panel_fields[i].min_size = i18n_timelength;
1673     }
1674 
1675     /*
1676      * This makes sure that the panel and mini status full/half mode
1677      * setting is equal
1678      */
1679     format = parse_panel_size (panel, format, isstatus);
1680 
1681     while (*format != '\0')
1682     {  // format can be an empty string
1683         format_item_t *darr;
1684         align_crt_t justify;          // Which mode.
1685         gboolean set_justify = TRUE;  // flag: set justification mode?
1686         gboolean found = FALSE;
1687         size_t klen = 0;
1688 
1689         darr = g_new0 (format_item_t, 1);
1690         home = g_slist_append (home, darr);
1691 
1692         format = skip_separators (format);
1693 
1694         switch (*format)
1695         {
1696         case '<':
1697             justify = J_LEFT;
1698             format = skip_separators (format + 1);
1699             break;
1700         case '=':
1701             justify = J_CENTER;
1702             format = skip_separators (format + 1);
1703             break;
1704         case '>':
1705             justify = J_RIGHT;
1706             format = skip_separators (format + 1);
1707             break;
1708         default:
1709             justify = J_LEFT;
1710             set_justify = FALSE;
1711             break;
1712         }
1713 
1714         for (i = 0; !found && panel_fields[i].id != NULL; i++)
1715         {
1716             klen = strlen (panel_fields[i].id);
1717             found = strncmp (format, panel_fields[i].id, klen) == 0;
1718         }
1719 
1720         if (found)
1721         {
1722             i--;
1723             format += klen;
1724 
1725             darr->requested_field_len = panel_fields[i].min_size;
1726             darr->string_fn = panel_fields[i].string_fn;
1727             darr->title = g_strdup (panel_get_title_without_hotkey (panel_fields[i].title_hotkey));
1728             darr->id = panel_fields[i].id;
1729             darr->expand = panel_fields[i].expands;
1730             darr->just_mode = panel_fields[i].default_just;
1731 
1732             if (set_justify)
1733             {
1734                 if (IS_FIT (darr->just_mode))
1735                     darr->just_mode = MAKE_FIT (justify);
1736                 else
1737                     darr->just_mode = justify;
1738             }
1739 
1740             format = skip_separators (format);
1741 
1742             // If we have a size specifier
1743             if (*format == ':')
1744             {
1745                 int req_length;
1746 
1747                 /* If the size was specified, we don't want
1748                  * auto-expansion by default
1749                  */
1750                 darr->expand = FALSE;
1751                 format++;
1752                 req_length = atoi (format);
1753                 darr->requested_field_len = req_length;
1754 
1755                 format = skip_numbers (format);
1756 
1757                 // Now, if they insist on expansion
1758                 if (*format == '+')
1759                 {
1760                     darr->expand = TRUE;
1761                     format++;
1762                 }
1763             }
1764         }
1765         else
1766         {
1767             size_t pos;
1768             char *tmp_format;
1769 
1770             pos = strlen (format);
1771             if (pos > 8)
1772                 pos = 8;
1773 
1774             tmp_format = g_strndup (format, pos);
1775             g_slist_free_full (home, (GDestroyNotify) format_item_free);
1776             *error =
1777                 g_strconcat (_ ("Unknown tag on display format:"), " ", tmp_format, (char *) NULL);
1778             g_free (tmp_format);
1779 
1780             return NULL;
1781         }
1782 
1783         total_cols += darr->requested_field_len;
1784     }
1785 
1786     *res_total_cols = total_cols;
1787     return home;
1788 }
1789 
1790 /* --------------------------------------------------------------------------------------------- */
1791 
1792 static GSList *
1793 use_display_format (WPanel *panel, const char *format, char **error, gboolean isstatus)
     /* [previous][next][first][last][top][bottom][index][help]  */
1794 {
1795 #define MAX_EXPAND 4
1796     int expand_top = 0;  // Max used element in expand
1797     int usable_columns;  // Usable columns in the panel
1798     int total_cols = 0;
1799     GSList *darr, *home;
1800 
1801     if (format == NULL)
1802         format = DEFAULT_USER_FORMAT;
1803 
1804     home = parse_display_format (panel, format, error, isstatus, &total_cols);
1805 
1806     if (*error != NULL)
1807         return NULL;
1808 
1809     panel->dirty = TRUE;
1810 
1811     // Divide into panel->list_cols equally wide columns, plus maybe some leftover space: #4906
1812     usable_columns = WIDGET (panel)->rect.cols - 1;
1813     // Status needn't to be split
1814     if (!isstatus)
1815         usable_columns /= panel->list_cols;
1816     usable_columns--;
1817 
1818     // Look for the expandable fields and set field_len based on the requested field len
1819     for (darr = home; darr != NULL && expand_top < MAX_EXPAND; darr = g_slist_next (darr))
1820     {
1821         format_item_t *fi = (format_item_t *) darr->data;
1822 
1823         fi->field_len = fi->requested_field_len;
1824         if (fi->expand)
1825             expand_top++;
1826     }
1827 
1828     // If we used more columns than the available columns, adjust that
1829     if (total_cols > usable_columns)
1830     {
1831         int dif;
1832         int pdif = 0;
1833 
1834         dif = total_cols - usable_columns;
1835 
1836         while (dif != 0 && pdif != dif)
1837         {
1838             pdif = dif;
1839 
1840             for (darr = home; darr != NULL; darr = g_slist_next (darr))
1841             {
1842                 format_item_t *fi = (format_item_t *) darr->data;
1843 
1844                 if (dif != 0 && fi->field_len != 1)
1845                 {
1846                     fi->field_len--;
1847                     dif--;
1848                 }
1849             }
1850         }
1851 
1852         total_cols = usable_columns;  // give up, the rest should be truncated
1853     }
1854 
1855     // Expand the available space
1856     if (usable_columns > total_cols && expand_top != 0)
1857     {
1858         int i;
1859         int spaces;
1860 
1861         spaces = (usable_columns - total_cols) / expand_top;
1862 
1863         for (i = 0, darr = home; darr != NULL && i < expand_top; darr = g_slist_next (darr))
1864         {
1865             format_item_t *fi = (format_item_t *) darr->data;
1866 
1867             if (fi->expand)
1868             {
1869                 fi->field_len += spaces;
1870                 if (i == 0)
1871                     fi->field_len += (usable_columns - total_cols) % expand_top;
1872                 i++;
1873             }
1874         }
1875     }
1876 
1877     return home;
1878 }
1879 
1880 /* --------------------------------------------------------------------------------------------- */
1881 /** Given the panel->view_type returns the format string to be parsed */
1882 
1883 static const char *
1884 panel_format (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1885 {
1886     switch (panel->list_format)
1887     {
1888     case list_long:
1889         return "full perm space nlink space owner space group space size space mtime space name";
1890 
1891     case list_brief:
1892     {
1893         static char format[BUF_TINY];
1894         int brief_cols = panel->brief_cols;
1895 
1896         if (brief_cols < 1)
1897             brief_cols = 2;
1898 
1899         if (brief_cols > 9)
1900             brief_cols = 9;
1901 
1902         g_snprintf (format, sizeof (format), "half %d type name", brief_cols);
1903         return format;
1904     }
1905 
1906     case list_user:
1907         return panel->user_format;
1908 
1909     default:
1910     case list_full:
1911         return "half type name | size | mtime";
1912     }
1913 }
1914 
1915 /* --------------------------------------------------------------------------------------------- */
1916 
1917 static const char *
1918 mini_status_format (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1919 {
1920     if (panel->user_mini_status)
1921         return panel->user_status_format[panel->list_format];
1922 
1923     switch (panel->list_format)
1924     {
1925     case list_long:
1926         return "full perm space nlink space owner space group space size space mtime space name";
1927 
1928     case list_brief:
1929         return "half type name space bsize space perm space";
1930 
1931     case list_full:
1932         return "half type name";
1933 
1934     default:
1935     case list_user:
1936         return panel->user_format;
1937     }
1938 }
1939 
1940 /*                          */
1941 /* Panel operation commands */
1942 /*                          */
1943 
1944 /* --------------------------------------------------------------------------------------------- */
1945 
1946 static void
1947 cd_up_dir (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1948 {
1949     vfs_path_t *up_dir;
1950 
1951     up_dir = vfs_path_from_str ("..");
1952     panel_cd (panel, up_dir, cd_exact);
1953     vfs_path_free (up_dir, TRUE);
1954 }
1955 
1956 /* --------------------------------------------------------------------------------------------- */
1957 /** Used to emulate Lynx's entering leaving a directory with the arrow keys */
1958 
1959 static cb_ret_t
1960 maybe_cd (WPanel *panel, gboolean move_up_dir)
     /* [previous][next][first][last][top][bottom][index][help]  */
1961 {
1962     if (panels_options.navigate_with_arrows && input_is_empty (cmdline))
1963     {
1964         const file_entry_t *fe;
1965 
1966         if (move_up_dir)
1967         {
1968             cd_up_dir (panel);
1969             return MSG_HANDLED;
1970         }
1971 
1972         fe = panel_current_entry (panel);
1973 
1974         if (fe != NULL)
1975         {
1976             if (S_ISDIR (fe->st.st_mode) || link_isdir (fe))
1977             {
1978                 vfs_path_t *vpath;
1979 
1980                 vpath = vfs_path_from_str (fe->fname->str);
1981                 panel_cd (panel, vpath, cd_exact);
1982                 vfs_path_free (vpath, TRUE);
1983             }
1984 
1985             return MSG_HANDLED;
1986         }
1987     }
1988 
1989     return MSG_NOT_HANDLED;
1990 }
1991 
1992 /* --------------------------------------------------------------------------------------------- */
1993 
1994 /* if command line is empty then do 'cd ..' */
1995 static cb_ret_t
1996 force_maybe_cd (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
1997 {
1998     if (input_is_empty (cmdline))
1999     {
2000         cd_up_dir (panel);
2001         return MSG_HANDLED;
2002     }
2003 
2004     return MSG_NOT_HANDLED;
2005 }
2006 
2007 /* --------------------------------------------------------------------------------------------- */
2008 
2009 static void
2010 unselect_item (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2011 {
2012     const file_entry_t *fe;
2013 
2014     fe = panel_current_entry (panel);
2015     repaint_file (panel, panel->current,
2016                   fe != NULL && fe->f.marked != 0 ? FATTR_MARKED : FATTR_NORMAL);
2017 }
2018 
2019 /* --------------------------------------------------------------------------------------------- */
2020 /** Select/unselect all the files like a current file by extension */
2021 
2022 static void
2023 panel_select_ext_cmd (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2024 {
2025     const file_entry_t *fe;
2026     gboolean do_select;
2027     char *reg_exp, *cur_file_ext;
2028     mc_search_t *search;
2029     int i;
2030 
2031     fe = panel_current_entry (panel);
2032     if (fe == NULL)
2033         return;
2034 
2035     do_select = (fe->f.marked == 0);
2036 
2037     cur_file_ext = str_regex_escape (extension (fe->fname->str));
2038     if (cur_file_ext[0] != '\0')
2039         reg_exp = g_strconcat ("^.*\\.", cur_file_ext, "$", (char *) NULL);
2040     else
2041         reg_exp = g_strdup ("^[^\\.]+$");
2042 
2043     g_free (cur_file_ext);
2044 
2045     search = mc_search_new (reg_exp, NULL);
2046     search->search_type = MC_SEARCH_T_REGEX;
2047     search->is_case_sensitive = FALSE;
2048 
2049     for (i = 0; i < panel->dir.len; i++)
2050     {
2051         fe = &panel->dir.list[i];
2052 
2053         if (DIR_IS_DOTDOT (fe->fname->str) || S_ISDIR (fe->st.st_mode))
2054             continue;
2055 
2056         if (!mc_search_run (search, fe->fname->str, 0, fe->fname->len, NULL))
2057             continue;
2058 
2059         do_file_mark (panel, i, do_select ? 1 : 0);
2060     }
2061 
2062     mc_search_free (search);
2063     g_free (reg_exp);
2064 }
2065 
2066 /* --------------------------------------------------------------------------------------------- */
2067 
2068 static void
2069 panel_set_current (WPanel *panel, int i)
     /* [previous][next][first][last][top][bottom][index][help]  */
2070 {
2071     if (i != panel->current)
2072     {
2073         panel->dirty = TRUE;
2074         panel->current = i;
2075         panel->top = panel->current - (WIDGET (panel)->rect.lines - 2) / 2;
2076         if (panel->top < 0)
2077             panel->top = 0;
2078     }
2079 }
2080 
2081 /* --------------------------------------------------------------------------------------------- */
2082 
2083 static int
2084 panel_current_at_half (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2085 {
2086     int lines, top;
2087 
2088     lines = panel_lines (panel);
2089 
2090     // define top file of column
2091     top = panel->top;
2092     if (panel->list_cols > 1)
2093         top += lines * ((panel->current - top) / lines);
2094 
2095     return (panel->current - top - lines / 2);
2096 }
2097 
2098 /* --------------------------------------------------------------------------------------------- */
2099 
2100 static void
2101 move_down (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2102 {
2103     int items;
2104 
2105     if (panel->dir.len == 0)
2106         return;
2107 
2108     if (panel->current >= panel->dir.len - 1)
2109     {
2110         panel->current = panel->dir.len - 1;
2111         return;
2112     }
2113 
2114     unselect_item (panel);
2115     panel->current++;
2116 
2117     items = panel_items (panel);
2118 
2119     if (panels_options.scroll_pages && panel->current - panel->top == items)
2120     {
2121         // Scroll window half screen
2122         panel->top += items / 2;
2123         if (panel->top > panel->dir.len - items)
2124             panel->top = panel->dir.len - items;
2125         paint_dir (panel);
2126     }
2127     else if (panels_options.scroll_center && panel_current_at_half (panel) > 0)
2128     {
2129         // Scroll window when cursor is halfway down
2130         panel->top++;
2131         if (panel->top > panel->dir.len - items)
2132             panel->top = panel->dir.len - items;
2133     }
2134     select_item (panel);
2135 }
2136 
2137 /* --------------------------------------------------------------------------------------------- */
2138 
2139 static void
2140 move_up (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2141 {
2142     if (panel->dir.len == 0 || panel->current <= 0)
2143         return;
2144 
2145     unselect_item (panel);
2146     panel->current--;
2147 
2148     if (panels_options.scroll_pages && panel->current < panel->top)
2149     {
2150         // Scroll window half screen
2151         panel->top -= panel_items (panel) / 2;
2152         if (panel->top < 0)
2153             panel->top = 0;
2154         paint_dir (panel);
2155     }
2156     else if (panels_options.scroll_center && panel_current_at_half (panel) < 0)
2157     {
2158         // Scroll window when cursor is halfway up
2159         panel->top--;
2160         if (panel->top < 0)
2161             panel->top = 0;
2162     }
2163     select_item (panel);
2164 }
2165 
2166 /* --------------------------------------------------------------------------------------------- */
2167 /** Changes the current by lines (may be negative) */
2168 
2169 static void
2170 panel_move_current (WPanel *panel, int lines)
     /* [previous][next][first][last][top][bottom][index][help]  */
2171 {
2172     int new_pos;
2173     gboolean adjust = FALSE;
2174 
2175     if (panel->dir.len == 0 || panel->current < 0)
2176         return;
2177 
2178     new_pos = panel->current + lines;
2179     if (new_pos >= panel->dir.len)
2180         new_pos = panel->dir.len - 1;
2181 
2182     if (new_pos < 0)
2183         new_pos = 0;
2184 
2185     unselect_item (panel);
2186     panel->current = new_pos;
2187 
2188     if (panel->current - panel->top >= panel_items (panel))
2189     {
2190         panel->top += lines;
2191         adjust = TRUE;
2192     }
2193 
2194     if (panel->current - panel->top < 0)
2195     {
2196         panel->top += lines;
2197         adjust = TRUE;
2198     }
2199 
2200     if (adjust)
2201     {
2202         if (panel->top > panel->current)
2203             panel->top = panel->current;
2204         if (panel->top < 0)
2205             panel->top = 0;
2206         paint_dir (panel);
2207     }
2208     select_item (panel);
2209 }
2210 
2211 /* --------------------------------------------------------------------------------------------- */
2212 
2213 static cb_ret_t
2214 move_left (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2215 {
2216     if (panel->list_cols > 1)
2217     {
2218         panel_move_current (panel, -panel_lines (panel));
2219         return MSG_HANDLED;
2220     }
2221 
2222     return maybe_cd (panel, TRUE);  // cd ..
2223 }
2224 
2225 /* --------------------------------------------------------------------------------------------- */
2226 
2227 static cb_ret_t
2228 move_right (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2229 {
2230     if (panel->list_cols > 1)
2231     {
2232         panel_move_current (panel, panel_lines (panel));
2233         return MSG_HANDLED;
2234     }
2235 
2236     return maybe_cd (panel, FALSE);  // cd (current)
2237 }
2238 
2239 /* --------------------------------------------------------------------------------------------- */
2240 
2241 static void
2242 prev_page (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2243 {
2244     int items;
2245 
2246     if (panel->dir.len == 0 || panel->current < 0 || (panel->current == 0 && panel->top == 0))
2247         return;
2248 
2249     unselect_item (panel);
2250     items = panel_items (panel);
2251     if (panel->top < items)
2252         items = panel->top;
2253     if (items == 0)
2254         panel->current = 0;
2255     else
2256         panel->current -= items;
2257     panel->top -= items;
2258 
2259     select_item (panel);
2260     paint_dir (panel);
2261 }
2262 
2263 /* --------------------------------------------------------------------------------------------- */
2264 
2265 static void
2266 goto_parent_dir (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2267 {
2268     if (!panel->is_panelized)
2269         cd_up_dir (panel);
2270     else
2271     {
2272         const file_entry_t *fe;
2273         GString *fname;
2274         const char *bname;
2275         vfs_path_t *dname_vpath;
2276 
2277         fe = panel_current_entry (panel);
2278         if (fe == NULL)
2279             return;
2280 
2281         fname = fe->fname;
2282 
2283         if (g_path_is_absolute (fname->str))
2284             fname = mc_g_string_dup (fname);
2285         else
2286         {
2287             char *fname2;
2288 
2289             fname2 = mc_build_filename (vfs_path_as_str (panel->panelized_descr->root_vpath),
2290                                         fname->str, (char *) NULL);
2291 
2292             fname = g_string_new_take (fname2);
2293         }
2294 
2295         bname = x_basename (fname->str);
2296 
2297         if (bname == fname->str)
2298             dname_vpath = vfs_path_from_str (".");
2299         else
2300         {
2301             g_string_truncate (fname, bname - fname->str);
2302             dname_vpath = vfs_path_from_str (fname->str);
2303         }
2304 
2305         panel_cd (panel, dname_vpath, cd_exact);
2306         panel_set_current_by_name (panel, bname);
2307 
2308         vfs_path_free (dname_vpath, TRUE);
2309         g_string_free (fname, TRUE);
2310     }
2311 }
2312 
2313 /* --------------------------------------------------------------------------------------------- */
2314 
2315 static void
2316 next_page (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2317 {
2318     int items;
2319 
2320     if (panel->dir.len == 0 || panel->current < 0 || panel->current == panel->dir.len - 1)
2321         return;
2322 
2323     unselect_item (panel);
2324     items = panel_items (panel);
2325     if (panel->top > panel->dir.len - 2 * items)
2326         items = panel->dir.len - items - panel->top;
2327     if (panel->top + items < 0)
2328         items = -panel->top;
2329     if (items == 0)
2330         panel->current = panel->dir.len - 1;
2331     else
2332         panel->current += items;
2333     panel->top += items;
2334 
2335     select_item (panel);
2336     paint_dir (panel);
2337 }
2338 
2339 /* --------------------------------------------------------------------------------------------- */
2340 
2341 static void
2342 goto_child_dir (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2343 {
2344     const file_entry_t *fe;
2345 
2346     fe = panel_current_entry (panel);
2347 
2348     if (fe != NULL && (S_ISDIR (fe->st.st_mode) || link_isdir (fe)))
2349     {
2350         vfs_path_t *vpath;
2351 
2352         vpath = vfs_path_from_str (fe->fname->str);
2353         panel_cd (panel, vpath, cd_exact);
2354         vfs_path_free (vpath, TRUE);
2355     }
2356 }
2357 
2358 /* --------------------------------------------------------------------------------------------- */
2359 
2360 static void
2361 goto_top_file (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2362 {
2363     if (panel->dir.len == 0 || panel->current < 0)
2364         return;
2365 
2366     unselect_item (panel);
2367     panel->current = panel->top;
2368     select_item (panel);
2369 }
2370 
2371 /* --------------------------------------------------------------------------------------------- */
2372 
2373 static void
2374 goto_middle_file (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2375 {
2376     if (panel->dir.len == 0 || panel->current < 0)
2377         return;
2378 
2379     unselect_item (panel);
2380     panel->current = panel->top + panel_items (panel) / 2;
2381     panel->current = MIN (panel->current, panel->dir.len - 1);
2382     select_item (panel);
2383 }
2384 
2385 /* --------------------------------------------------------------------------------------------- */
2386 
2387 static void
2388 goto_bottom_file (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2389 {
2390     if (panel->dir.len == 0 || panel->current < 0)
2391         return;
2392 
2393     unselect_item (panel);
2394     panel->current = panel->top + panel_items (panel) - 1;
2395     panel->current = MIN (panel->current, panel->dir.len - 1);
2396     select_item (panel);
2397 }
2398 
2399 /* --------------------------------------------------------------------------------------------- */
2400 
2401 static void
2402 move_home (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2403 {
2404     if (panel->dir.len == 0 || panel->current <= 0)
2405         return;
2406 
2407     unselect_item (panel);
2408 
2409     panel->top = 0;
2410     panel->current = 0;
2411 
2412     paint_dir (panel);
2413     select_item (panel);
2414 }
2415 
2416 /* --------------------------------------------------------------------------------------------- */
2417 
2418 static void
2419 move_end (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2420 {
2421     if (panel->dir.len == 0 || panel->current < 0 || panel->current == panel->dir.len - 1)
2422         return;
2423 
2424     unselect_item (panel);
2425 
2426     panel->current = panel->dir.len - 1;
2427     paint_dir (panel);
2428     select_item (panel);
2429 }
2430 
2431 /* --------------------------------------------------------------------------------------------- */
2432 
2433 static void
2434 do_mark_file (WPanel *panel, mark_act_t do_move)
     /* [previous][next][first][last][top][bottom][index][help]  */
2435 {
2436     const file_entry_t *fe;
2437 
2438     fe = panel_current_entry (panel);
2439     if (fe == NULL)
2440         return;
2441 
2442     do_file_mark (panel, panel->current, fe->f.marked ? 0 : 1);
2443 
2444     if ((panels_options.mark_moves_down && do_move == MARK_DOWN) || do_move == MARK_FORCE_DOWN)
2445         move_down (panel);
2446     else if (do_move == MARK_FORCE_UP)
2447         move_up (panel);
2448 }
2449 
2450 /* --------------------------------------------------------------------------------------------- */
2451 
2452 static inline void
2453 mark_file (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2454 {
2455     do_mark_file (panel, MARK_DOWN);
2456 }
2457 
2458 /* --------------------------------------------------------------------------------------------- */
2459 
2460 static inline void
2461 mark_file_up (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2462 {
2463     do_mark_file (panel, MARK_FORCE_UP);
2464 }
2465 
2466 /* --------------------------------------------------------------------------------------------- */
2467 
2468 static inline void
2469 mark_file_down (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2470 {
2471     do_mark_file (panel, MARK_FORCE_DOWN);
2472 }
2473 
2474 /* --------------------------------------------------------------------------------------------- */
2475 
2476 static void
2477 mark_file_right (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2478 {
2479     int lines;
2480 
2481     if (state_mark < 0)
2482     {
2483         const file_entry_t *fe;
2484 
2485         fe = panel_current_entry (panel);
2486         if (fe == NULL)
2487             return;
2488 
2489         state_mark = fe->f.marked ? 0 : 1;
2490     }
2491 
2492     lines = panel_lines (panel);
2493     lines = MIN (lines, panel->dir.len - panel->current - 1);
2494     for (; lines != 0; lines--)
2495     {
2496         do_file_mark (panel, panel->current, state_mark);
2497         move_down (panel);
2498     }
2499     do_file_mark (panel, panel->current, state_mark);
2500 }
2501 
2502 /* --------------------------------------------------------------------------------------------- */
2503 
2504 static void
2505 mark_file_left (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2506 {
2507     int lines;
2508 
2509     if (state_mark < 0)
2510     {
2511         const file_entry_t *fe;
2512 
2513         fe = panel_current_entry (panel);
2514         if (fe == NULL)
2515             return;
2516 
2517         state_mark = fe->f.marked ? 0 : 1;
2518     }
2519 
2520     lines = panel_lines (panel);
2521     lines = MIN (lines, panel->current + 1);
2522     for (; lines != 0; lines--)
2523     {
2524         do_file_mark (panel, panel->current, state_mark);
2525         move_up (panel);
2526     }
2527     do_file_mark (panel, panel->current, state_mark);
2528 }
2529 
2530 /* --------------------------------------------------------------------------------------------- */
2531 
2532 static mc_search_t *
2533 panel_select_unselect_files_dialog (select_flags_t *flags, const char *title,
     /* [previous][next][first][last][top][bottom][index][help]  */
2534                                     const char *history_name, const char *help_section, char **str)
2535 {
2536     gboolean files_only = (*flags & SELECT_FILES_ONLY) != 0;
2537     gboolean case_sens = (*flags & SELECT_MATCH_CASE) != 0;
2538     gboolean shell_patterns = (*flags & SELECT_SHELL_PATTERNS) != 0;
2539 
2540     char *reg_exp;
2541     mc_search_t *search;
2542 
2543     quick_widget_t quick_widgets[] = {
2544         // clang-format off
2545         QUICK_INPUT (INPUT_LAST_TEXT, history_name, &reg_exp, NULL,
2546                      FALSE, FALSE, INPUT_COMPLETE_FILENAMES),
2547         QUICK_START_COLUMNS,
2548             QUICK_CHECKBOX (_ ("&Files only"), &files_only, NULL),
2549             QUICK_CHECKBOX (_ ("&Using shell patterns"), &shell_patterns, NULL),
2550         QUICK_NEXT_COLUMN,
2551             QUICK_CHECKBOX (_ ("&Case sensitive"), &case_sens, NULL),
2552         QUICK_STOP_COLUMNS,
2553         QUICK_END,
2554         // clang-format on
2555     };
2556 
2557     WRect r = { -1, -1, 0, 50 };
2558 
2559     quick_dialog_t qdlg = {
2560         .rect = r,
2561         .title = title,
2562         .help = help_section,
2563         .widgets = quick_widgets,
2564         .callback = NULL,
2565         .mouse_callback = NULL,
2566     };
2567 
2568     if (quick_dialog (&qdlg) == B_CANCEL)
2569         return NULL;
2570 
2571     if (*reg_exp == '\0')
2572     {
2573         g_free (reg_exp);
2574         if (str != NULL)
2575             *str = NULL;
2576         return SELECT_RESET;
2577     }
2578 
2579     search = mc_search_new (reg_exp, NULL);
2580     search->search_type = shell_patterns ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
2581     search->is_entire_line = TRUE;
2582     search->is_case_sensitive = case_sens;
2583 
2584     if (str != NULL)
2585         *str = reg_exp;
2586     else
2587         g_free (reg_exp);
2588 
2589     if (!mc_search_prepare (search))
2590     {
2591         message (D_ERROR, MSG_ERROR, _ ("Malformed regular expression"));
2592         mc_search_free (search);
2593         return SELECT_ERROR;
2594     }
2595 
2596     // result flags
2597     *flags = 0;
2598     if (case_sens)
2599         *flags |= SELECT_MATCH_CASE;
2600     if (files_only)
2601         *flags |= SELECT_FILES_ONLY;
2602     if (shell_patterns)
2603         *flags |= SELECT_SHELL_PATTERNS;
2604 
2605     return search;
2606 }
2607 
2608 /* --------------------------------------------------------------------------------------------- */
2609 
2610 static void
2611 panel_select_unselect_files (WPanel *panel, const char *title, const char *history_name,
     /* [previous][next][first][last][top][bottom][index][help]  */
2612                              const char *help_section, gboolean do_select)
2613 {
2614     mc_search_t *search;
2615     gboolean files_only;
2616     int i;
2617 
2618     search = panel_select_unselect_files_dialog (&panels_options.select_flags, title, history_name,
2619                                                  help_section, NULL);
2620     if (search == NULL || search == SELECT_RESET || search == SELECT_ERROR)
2621         return;
2622 
2623     files_only = (panels_options.select_flags & SELECT_FILES_ONLY) != 0;
2624 
2625     for (i = 0; i < panel->dir.len; i++)
2626     {
2627         if (DIR_IS_DOTDOT (panel->dir.list[i].fname->str))
2628             continue;
2629         if (S_ISDIR (panel->dir.list[i].st.st_mode) && files_only)
2630             continue;
2631 
2632         if (mc_search_run (search, panel->dir.list[i].fname->str, 0, panel->dir.list[i].fname->len,
2633                            NULL))
2634             do_file_mark (panel, i, do_select ? 1 : 0);
2635     }
2636 
2637     mc_search_free (search);
2638 }
2639 
2640 /* --------------------------------------------------------------------------------------------- */
2641 
2642 static void
2643 panel_select_files (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2644 {
2645     panel_select_unselect_files (panel, _ ("Select"), MC_HISTORY_FM_PANEL_SELECT,
2646                                  "[Select/Unselect Files]", TRUE);
2647 }
2648 
2649 /* --------------------------------------------------------------------------------------------- */
2650 
2651 static void
2652 panel_unselect_files (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2653 {
2654     panel_select_unselect_files (panel, _ ("Unselect"), MC_HISTORY_FM_PANEL_UNSELECT,
2655                                  "[Select/Unselect Files]", FALSE);
2656 }
2657 
2658 /* --------------------------------------------------------------------------------------------- */
2659 
2660 static void
2661 panel_select_invert_files (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2662 {
2663     int i;
2664 
2665     for (i = 0; i < panel->dir.len; i++)
2666     {
2667         file_entry_t *file = &panel->dir.list[i];
2668 
2669         if (!panels_options.reverse_files_only || !S_ISDIR (file->st.st_mode))
2670             do_file_mark (panel, i, file->f.marked ? 0 : 1);
2671     }
2672 }
2673 
2674 /* --------------------------------------------------------------------------------------------- */
2675 
2676 static void
2677 panel_do_set_filter (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2678 {
2679     file_filter_t ff = {
2680         .value = NULL,
2681         .handler = NULL,
2682         .flags = panel->filter.flags,
2683     };
2684 
2685     ff.handler = panel_select_unselect_files_dialog (
2686         &ff.flags, _ ("Filter"), MC_HISTORY_FM_PANEL_FILTER, "[Filter...]", &ff.value);
2687 
2688     if (ff.handler == NULL || ff.handler == SELECT_ERROR)
2689         return;
2690 
2691     if (ff.handler == SELECT_RESET)
2692         ff.handler = NULL;
2693 
2694     panel_set_filter (panel, &ff);
2695 }
2696 
2697 /* --------------------------------------------------------------------------------------------- */
2698 /** Incremental search of a file name in the panel.
2699  * @param panel instance of WPanel structure
2700  * @param c_code key code
2701  */
2702 
2703 static void
2704 do_search (WPanel *panel, int c_code)
     /* [previous][next][first][last][top][bottom][index][help]  */
2705 {
2706     int curr;
2707     int i;
2708     gboolean wrapped = FALSE;
2709     char *act;
2710     mc_search_t *search;
2711     char *reg_exp, *esc_str;
2712     gboolean is_found = FALSE;
2713 
2714     if (c_code == KEY_BACKSPACE)
2715     {
2716         if (panel->quick_search.buffer->len != 0)
2717         {
2718             act = panel->quick_search.buffer->str + panel->quick_search.buffer->len;
2719             str_prev_noncomb_char (&act, panel->quick_search.buffer->str);
2720             g_string_set_size (panel->quick_search.buffer, act - panel->quick_search.buffer->str);
2721         }
2722         panel->quick_search.chpoint = 0;
2723     }
2724     else
2725     {
2726         if (c_code != 0 && (gsize) panel->quick_search.chpoint < sizeof (panel->quick_search.ch))
2727         {
2728             panel->quick_search.ch[panel->quick_search.chpoint] = c_code;
2729             panel->quick_search.chpoint++;
2730         }
2731 
2732         if (panel->quick_search.chpoint > 0)
2733         {
2734             switch (str_is_valid_char (panel->quick_search.ch, panel->quick_search.chpoint))
2735             {
2736             case -2:
2737                 return;
2738             case -1:
2739                 panel->quick_search.chpoint = 0;
2740                 return;
2741             default:
2742                 g_string_append_len (panel->quick_search.buffer, panel->quick_search.ch,
2743                                      panel->quick_search.chpoint);
2744                 panel->quick_search.chpoint = 0;
2745             }
2746         }
2747     }
2748 
2749     reg_exp = g_strdup_printf ("%s*", panel->quick_search.buffer->str);
2750     esc_str = str_escape (reg_exp, -1, ",|\\{}[]", TRUE);
2751     search = mc_search_new (esc_str, NULL);
2752     search->search_type = MC_SEARCH_T_GLOB;
2753     search->is_entire_line = TRUE;
2754 
2755     switch (panels_options.qsearch_mode)
2756     {
2757     case QSEARCH_CASE_SENSITIVE:
2758         search->is_case_sensitive = TRUE;
2759         break;
2760     case QSEARCH_CASE_INSENSITIVE:
2761         search->is_case_sensitive = FALSE;
2762         break;
2763     default:
2764         search->is_case_sensitive = panel->sort_info.case_sensitive;
2765         break;
2766     }
2767 
2768     curr = panel->current;
2769 
2770     for (i = panel->current; !wrapped || i != panel->current; i++)
2771     {
2772         if (i >= panel->dir.len)
2773         {
2774             i = 0;
2775             if (wrapped)
2776                 break;
2777             wrapped = TRUE;
2778         }
2779         if (mc_search_run (search, panel->dir.list[i].fname->str, 0, panel->dir.list[i].fname->len,
2780                            NULL))
2781         {
2782             curr = i;
2783             is_found = TRUE;
2784             break;
2785         }
2786     }
2787     if (is_found)
2788     {
2789         unselect_item (panel);
2790         panel->current = curr;
2791         select_item (panel);
2792         widget_draw (WIDGET (panel));
2793     }
2794     else if (c_code != KEY_BACKSPACE)
2795     {
2796         act = panel->quick_search.buffer->str + panel->quick_search.buffer->len;
2797         str_prev_noncomb_char (&act, panel->quick_search.buffer->str);
2798         g_string_set_size (panel->quick_search.buffer, act - panel->quick_search.buffer->str);
2799     }
2800     mc_search_free (search);
2801     g_free (reg_exp);
2802     g_free (esc_str);
2803 }
2804 
2805 /* --------------------------------------------------------------------------------------------- */
2806 /** Start new search.
2807  * @param panel instance of WPanel structure
2808  */
2809 
2810 static void
2811 start_search (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2812 {
2813     if (panel->quick_search.active)
2814     {
2815         if (panel->current == panel->dir.len - 1)
2816             panel->current = 0;
2817         else
2818             move_down (panel);
2819 
2820         /* in case if there was no search string we need to recall
2821            previous string, with which we ended previous searching */
2822         if (panel->quick_search.buffer->len == 0)
2823             mc_g_string_copy (panel->quick_search.buffer, panel->quick_search.prev_buffer);
2824 
2825         do_search (panel, 0);
2826     }
2827     else if (panel->dir.len != 0)
2828     {
2829         panel->quick_search.active = TRUE;
2830         g_string_set_size (panel->quick_search.buffer, 0);
2831         panel->quick_search.ch[0] = '\0';
2832         panel->quick_search.chpoint = 0;
2833         display_mini_info (panel);
2834     }
2835 }
2836 
2837 /* --------------------------------------------------------------------------------------------- */
2838 
2839 static void
2840 stop_search (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2841 {
2842     if (!panel->quick_search.active)
2843         return;
2844 
2845     panel->quick_search.active = FALSE;
2846 
2847     /* if user overrdied search string, we need to store it
2848        to the quick_search.prev_buffer */
2849     if (panel->quick_search.buffer->len != 0)
2850         mc_g_string_copy (panel->quick_search.prev_buffer, panel->quick_search.buffer);
2851 
2852     display_mini_info (panel);
2853 }
2854 
2855 /* --------------------------------------------------------------------------------------------- */
2856 /** Return TRUE if the Enter key has been processed, FALSE otherwise */
2857 
2858 static gboolean
2859 do_enter_on_file_entry (WPanel *panel, const file_entry_t *fe)
     /* [previous][next][first][last][top][bottom][index][help]  */
2860 {
2861     const char *fname = fe->fname->str;
2862     char *fname_quoted;
2863     vfs_path_t *full_name_vpath;
2864     gboolean ok;
2865 
2866     /*
2867      * Directory or link to directory - change directory.
2868      * Try the same for the entries on which mc_lstat() has failed.
2869      */
2870     if (S_ISDIR (fe->st.st_mode) || link_isdir (fe) || (fe->st.st_mode == 0))
2871     {
2872         vfs_path_t *fname_vpath;
2873 
2874         fname_vpath = vfs_path_from_str (fname);
2875         if (!panel_cd (panel, fname_vpath, cd_exact))
2876             cd_error_message (fname);
2877         vfs_path_free (fname_vpath, TRUE);
2878         return TRUE;
2879     }
2880 
2881     full_name_vpath = vfs_path_append_new (panel->cwd_vpath, fname, (char *) NULL);
2882 
2883     // Try associated command
2884     ok = regex_command (full_name_vpath, "Open") != 0;
2885     vfs_path_free (full_name_vpath, TRUE);
2886     if (ok)
2887         return TRUE;
2888 
2889     // Check if the file is executable
2890     full_name_vpath = vfs_path_append_new (panel->cwd_vpath, fname, (char *) NULL);
2891     ok = (is_exe (fe->st.st_mode) && if_link_is_exe (full_name_vpath, fe));
2892     vfs_path_free (full_name_vpath, TRUE);
2893     if (!ok)
2894         return FALSE;
2895 
2896     if (confirm_execute
2897         && query_dialog (PACKAGE_NAME, _ ("Do you really want to execute?"), D_NORMAL, 2,
2898                          _ ("&Yes"), _ ("&No"))
2899             != 0)
2900         return TRUE;
2901 
2902     if (!vfs_current_is_local ())
2903     {
2904         int ret;
2905         vfs_path_t *tmp_vpath;
2906 
2907         tmp_vpath = vfs_path_append_new (vfs_get_raw_current_dir (), fname, (char *) NULL);
2908         ret = mc_setctl (tmp_vpath, VFS_SETCTL_RUN, NULL);
2909         vfs_path_free (tmp_vpath, TRUE);
2910         // We took action only if the dialog was shown or the execution was successful
2911         return confirm_execute || (ret == 0);
2912     }
2913 
2914     fname_quoted = name_quote (fname, FALSE);
2915     if (fname_quoted != NULL)
2916     {
2917         char *cmd;
2918 
2919         cmd = g_strconcat ("." PATH_SEP_STR, fname_quoted, (char *) NULL);
2920         g_free (fname_quoted);
2921 
2922         shell_execute (cmd, 0);
2923         g_free (cmd);
2924     }
2925 
2926     mc_global.source_codepage = default_source_codepage;
2927 
2928     return TRUE;
2929 }
2930 
2931 /* --------------------------------------------------------------------------------------------- */
2932 
2933 static inline gboolean
2934 do_enter (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2935 {
2936     const file_entry_t *fe;
2937 
2938     fe = panel_current_entry (panel);
2939 
2940     return (fe == NULL ? FALSE : do_enter_on_file_entry (panel, fe));
2941 }
2942 
2943 /* --------------------------------------------------------------------------------------------- */
2944 
2945 static void
2946 panel_cycle_listing_format (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2947 {
2948     panel->list_format = (panel->list_format + 1) % LIST_FORMATS;
2949 
2950     if (set_panel_formats (panel) == 0)
2951         do_refresh ();
2952 }
2953 
2954 /* --------------------------------------------------------------------------------------------- */
2955 
2956 static void
2957 chdir_other_panel (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
2958 {
2959     const file_entry_t *entry;
2960     vfs_path_t *new_dir_vpath;
2961     char *curr_entry = NULL;
2962     WPanel *p;
2963 
2964     entry = panel_current_entry (panel);
2965     if (entry == NULL)
2966         return;
2967 
2968     if (get_other_type () != view_listing)
2969         create_panel (get_other_index (), view_listing);
2970 
2971     if (S_ISDIR (entry->st.st_mode) || link_isdir (entry))
2972         new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, entry->fname->str, (char *) NULL);
2973     else
2974     {
2975         new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, "..", (char *) NULL);
2976         curr_entry = strrchr (vfs_path_get_last_path_str (panel->cwd_vpath), PATH_SEP);
2977     }
2978 
2979     p = change_panel ();
2980     panel_cd (p, new_dir_vpath, cd_exact);
2981     vfs_path_free (new_dir_vpath, TRUE);
2982 
2983     if (curr_entry != NULL)
2984         panel_set_current_by_name (p, curr_entry);
2985     (void) change_panel ();
2986 
2987     move_down (panel);
2988 }
2989 
2990 /* --------------------------------------------------------------------------------------------- */
2991 /**
2992  * Make the current directory of the current panel also the current
2993  * directory of the other panel.  Put the other panel to the listing
2994  * mode if needed.  If the current panel is panelized, the other panel
2995  * doesn't become panelized.
2996  */
2997 
2998 static void
2999 panel_sync_other (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3000 {
3001     if (get_other_type () != view_listing)
3002         create_panel (get_other_index (), view_listing);
3003 
3004     panel_do_cd (other_panel, panel->cwd_vpath, cd_exact);
3005 
3006     // try to set current filename on the other panel
3007     if (!panel->is_panelized)
3008     {
3009         const file_entry_t *fe;
3010 
3011         fe = panel_current_entry (panel);
3012         if (fe != NULL)
3013             panel_set_current_by_name (other_panel, fe->fname->str);
3014     }
3015 }
3016 
3017 /* --------------------------------------------------------------------------------------------- */
3018 
3019 static void
3020 chdir_to_readlink (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3021 {
3022     const file_entry_t *fe;
3023     vfs_path_t *new_dir_vpath;
3024     char buffer[MC_MAXPATHLEN];
3025     int i;
3026     struct stat st;
3027     vfs_path_t *panel_fname_vpath;
3028     gboolean ok;
3029     WPanel *cpanel;
3030 
3031     if (get_other_type () != view_listing)
3032         return;
3033 
3034     fe = panel_current_entry (panel);
3035 
3036     if (fe == NULL || !S_ISLNK (fe->st.st_mode))
3037         return;
3038 
3039     i = readlink (fe->fname->str, buffer, MC_MAXPATHLEN - 1);
3040     if (i < 0)
3041         return;
3042 
3043     panel_fname_vpath = vfs_path_from_str (fe->fname->str);
3044     ok = (mc_stat (panel_fname_vpath, &st) >= 0);
3045     vfs_path_free (panel_fname_vpath, TRUE);
3046     if (!ok)
3047         return;
3048 
3049     buffer[i] = '\0';
3050     if (!S_ISDIR (st.st_mode))
3051     {
3052         char *p;
3053 
3054         p = strrchr (buffer, PATH_SEP);
3055         if (p != NULL && p[1] == '\0')
3056         {
3057             *p = '\0';
3058             p = strrchr (buffer, PATH_SEP);
3059         }
3060         if (p == NULL)
3061             return;
3062 
3063         p[1] = '\0';
3064     }
3065     if (IS_PATH_SEP (*buffer))
3066         new_dir_vpath = vfs_path_from_str (buffer);
3067     else
3068         new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, buffer, (char *) NULL);
3069 
3070     cpanel = change_panel ();
3071     panel_cd (cpanel, new_dir_vpath, cd_exact);
3072     vfs_path_free (new_dir_vpath, TRUE);
3073     (void) change_panel ();
3074 
3075     move_down (panel);
3076 }
3077 
3078 /* --------------------------------------------------------------------------------------------- */
3079 /**
3080    function return 0 if not found and REAL_INDEX+1 if found
3081  */
3082 
3083 static gsize
3084 panel_get_format_field_index_by_name (const WPanel *panel, const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
3085 {
3086     GSList *format;
3087     gsize lc_index;
3088 
3089     for (lc_index = 1, format = panel->format;
3090          format != NULL && strcmp (((format_item_t *) format->data)->title, name) != 0;
3091          format = g_slist_next (format), lc_index++)
3092         ;
3093 
3094     if (format == NULL)
3095         lc_index = 0;
3096 
3097     return lc_index;
3098 }
3099 
3100 /* --------------------------------------------------------------------------------------------- */
3101 
3102 static const panel_field_t *
3103 panel_get_sortable_field_by_format (const WPanel *panel, gsize lc_index)
     /* [previous][next][first][last][top][bottom][index][help]  */
3104 {
3105     const panel_field_t *pfield;
3106     const format_item_t *format;
3107 
3108     format = (const format_item_t *) g_slist_nth_data (panel->format, lc_index);
3109     if (format == NULL)
3110         return NULL;
3111 
3112     pfield = panel_get_field_by_title (format->title);
3113     if (pfield == NULL)
3114         return NULL;
3115     if (pfield->sort_routine == NULL)
3116         return NULL;
3117     return pfield;
3118 }
3119 
3120 /* --------------------------------------------------------------------------------------------- */
3121 
3122 static void
3123 panel_toggle_sort_order_prev (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3124 {
3125     gsize lc_index, i;
3126     const char *title;
3127     const panel_field_t *pfield = NULL;
3128 
3129     title = panel_get_title_without_hotkey (panel->sort_field->title_hotkey);
3130     lc_index = panel_get_format_field_index_by_name (panel, title);
3131 
3132     if (lc_index > 1)
3133     {
3134         // search for prev sortable column in panel format
3135         for (i = lc_index - 1;
3136              i != 0 && (pfield = panel_get_sortable_field_by_format (panel, i - 1)) == NULL; i--)
3137             ;
3138     }
3139 
3140     if (pfield == NULL)
3141     {
3142         // Sortable field not found. Try to search in each array
3143         for (i = g_slist_length (panel->format);
3144              i != 0 && (pfield = panel_get_sortable_field_by_format (panel, i - 1)) == NULL; i--)
3145             ;
3146     }
3147 
3148     if (pfield != NULL)
3149     {
3150         panel->sort_field = pfield;
3151         panel_set_sort_order (panel, pfield);
3152     }
3153 }
3154 
3155 /* --------------------------------------------------------------------------------------------- */
3156 
3157 static void
3158 panel_toggle_sort_order_next (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3159 {
3160     gsize lc_index, i;
3161     const panel_field_t *pfield = NULL;
3162     gsize format_field_count;
3163     const char *title;
3164 
3165     format_field_count = g_slist_length (panel->format);
3166     title = panel_get_title_without_hotkey (panel->sort_field->title_hotkey);
3167     lc_index = panel_get_format_field_index_by_name (panel, title);
3168 
3169     if (lc_index != 0 && lc_index != format_field_count)
3170     {
3171         // search for prev sortable column in panel format
3172         for (i = lc_index; i != format_field_count
3173              && (pfield = panel_get_sortable_field_by_format (panel, i)) == NULL;
3174              i++)
3175             ;
3176     }
3177 
3178     if (pfield == NULL)
3179     {
3180         // Sortable field not found. Try to search in each array
3181         for (i = 0; i != format_field_count
3182              && (pfield = panel_get_sortable_field_by_format (panel, i)) == NULL;
3183              i++)
3184             ;
3185     }
3186 
3187     if (pfield != NULL)
3188     {
3189         panel->sort_field = pfield;
3190         panel_set_sort_order (panel, pfield);
3191     }
3192 }
3193 
3194 /* --------------------------------------------------------------------------------------------- */
3195 
3196 static void
3197 panel_select_sort_order (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3198 {
3199     const panel_field_t *sort_order;
3200 
3201     sort_order = sort_box (&panel->sort_info, panel->sort_field);
3202     if (sort_order != NULL)
3203     {
3204         panel->sort_field = sort_order;
3205         panel_set_sort_order (panel, sort_order);
3206     }
3207 }
3208 
3209 /* --------------------------------------------------------------------------------------------- */
3210 /**
3211  * Scroll long filename to left
3212  *
3213  * @param panel object
3214  */
3215 
3216 static void
3217 panel_content_scroll_left (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3218 {
3219     if (panel->content_shift != 0)
3220     {
3221         if (panel->content_shift > panel->max_shift)
3222             panel->content_shift = panel->max_shift;
3223 
3224         panel->content_shift--;
3225         show_dir (panel);
3226         paint_dir (panel);
3227     }
3228 }
3229 
3230 /* --------------------------------------------------------------------------------------------- */
3231 /**
3232  * Scroll long filename to right
3233  *
3234  * @param panel object
3235  */
3236 
3237 static void
3238 panel_content_scroll_right (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3239 {
3240     if (panel->content_shift == 0 || panel->content_shift < panel->max_shift)
3241     {
3242         panel->content_shift++;
3243         show_dir (panel);
3244         paint_dir (panel);
3245     }
3246 }
3247 
3248 /* --------------------------------------------------------------------------------------------- */
3249 /**
3250  * Scroll long filename to home
3251  *
3252  * @param panel the pointer to the panel on which we operate
3253  */
3254 
3255 static void
3256 panel_content_scroll_home (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3257 {
3258     panel->content_shift = 0;
3259     show_dir (panel);
3260     paint_dir (panel);
3261 }
3262 
3263 /* --------------------------------------------------------------------------------------------- */
3264 /**
3265  * Scroll long filename to end
3266  *
3267  * @param panel the pointer to the panel on which we operate
3268  */
3269 
3270 static void
3271 panel_content_scroll_end (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3272 {
3273     // set content_shift to the maximum possible value
3274     panel->content_shift = UINT_MAX;
3275 
3276     show_dir (panel);
3277     paint_dir (panel);
3278 
3279     // correct content shift after UINT_MAX
3280     if (panel->content_shift > panel->max_shift)
3281         panel->content_shift = panel->max_shift;
3282 }
3283 
3284 /* --------------------------------------------------------------------------------------------- */
3285 
3286 static void
3287 panel_set_sort_type_by_id (WPanel *panel, const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
3288 {
3289     if (strcmp (panel->sort_field->id, name) == 0)
3290         panel->sort_info.reverse = !panel->sort_info.reverse;
3291     else
3292     {
3293         const panel_field_t *sort_order;
3294 
3295         sort_order = panel_get_field_by_id (name);
3296         if (sort_order == NULL)
3297             return;
3298 
3299         panel->sort_field = sort_order;
3300     }
3301 
3302     panel_set_sort_order (panel, panel->sort_field);
3303 }
3304 
3305 /* --------------------------------------------------------------------------------------------- */
3306 /**
3307  *  If we moved to the parent directory move the 'current' pointer to
3308  *  the old directory name; If we leave VFS dir, remove FS specificator.
3309  *
3310  *  You do _NOT_ want to add any vfs aware code here. <pavel@ucw.cz>
3311  */
3312 
3313 static const char *
3314 get_parent_dir_name (const vfs_path_t *cwd_vpath, const vfs_path_t *lwd_vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
3315 {
3316     size_t llen, clen;
3317     const char *p, *lwd;
3318 
3319     llen = vfs_path_len (lwd_vpath);
3320     clen = vfs_path_len (cwd_vpath);
3321 
3322     if (llen <= clen)
3323         return NULL;
3324 
3325     lwd = vfs_path_as_str (lwd_vpath);
3326 
3327     p = g_strrstr (lwd, VFS_PATH_URL_DELIMITER);
3328 
3329     if (p == NULL)
3330     {
3331         const char *cwd;
3332 
3333         cwd = vfs_path_as_str (cwd_vpath);
3334 
3335         p = strrchr (lwd, PATH_SEP);
3336 
3337         if (p != NULL && strncmp (cwd, lwd, (size_t) (p - lwd)) == 0
3338             && (clen == (size_t) (p - lwd) || (p == lwd && IS_PATH_SEP (cwd[0]) && cwd[1] == '\0')))
3339             return (p + 1);
3340 
3341         return NULL;
3342     }
3343 
3344     // skip VFS prefix
3345     while (--p > lwd && !IS_PATH_SEP (*p))
3346         ;
3347     // get last component
3348     while (--p > lwd && !IS_PATH_SEP (*p))
3349         ;
3350 
3351     // return last component
3352     return (p != lwd || IS_PATH_SEP (*p)) ? p + 1 : p;
3353 }
3354 
3355 /* --------------------------------------------------------------------------------------------- */
3356 /**
3357  * Changes the current directory of the panel.
3358  * Don't record change in the directory history.
3359  */
3360 
3361 static gboolean
3362 panel_do_cd_int (WPanel *panel, const vfs_path_t *new_dir_vpath, enum cd_enum cd_type)
     /* [previous][next][first][last][top][bottom][index][help]  */
3363 {
3364     vfs_path_t *olddir_vpath;
3365 
3366     // Convert *new_path to a suitable pathname, handle ~user
3367     if (cd_type == cd_parse_command)
3368     {
3369         const vfs_path_element_t *element;
3370 
3371         element = vfs_path_get_by_index (new_dir_vpath, 0);
3372         if (strcmp (element->path, "-") == 0)
3373             new_dir_vpath = panel->lwd_vpath;
3374     }
3375 
3376     if (mc_chdir (new_dir_vpath) == -1)
3377         return FALSE;
3378 
3379     // Success: save previous directory, shutdown status of previous dir
3380     olddir_vpath = vfs_path_clone (panel->cwd_vpath);
3381     panel_set_lwd (panel, panel->cwd_vpath);
3382     input_complete_free (cmdline);
3383 
3384     vfs_path_free (panel->cwd_vpath, TRUE);
3385     vfs_setup_cwd ();
3386     panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
3387 
3388     vfs_release_path (olddir_vpath);
3389 
3390 #ifdef ENABLE_SUBSHELL
3391     subshell_chdir (panel->cwd_vpath);
3392 #endif
3393 
3394     // Reload current panel
3395     panel_clean_dir (panel);
3396 
3397     if (!dir_list_load (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
3398                         &panel->sort_info, &panel->filter))
3399         message (D_ERROR, MSG_ERROR, _ ("Cannot read directory contents"));
3400 
3401     if (panel->dir.len == 0)
3402         panel_set_current (panel, -1);
3403 
3404     panel_set_current_by_name (panel, get_parent_dir_name (panel->cwd_vpath, olddir_vpath));
3405 
3406     load_hint (FALSE);
3407     panel->dirty = TRUE;
3408     update_xterm_title_path ();
3409     update_terminal_cwd ();
3410 
3411     vfs_path_free (olddir_vpath, TRUE);
3412 
3413     return TRUE;
3414 }
3415 
3416 /* --------------------------------------------------------------------------------------------- */
3417 
3418 static void
3419 directory_history_next (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3420 {
3421     gboolean ok;
3422 
3423     do
3424     {
3425         GList *next;
3426 
3427         ok = TRUE;
3428         next = g_list_next (panel->dir_history.current);
3429         if (next != NULL)
3430         {
3431             vfs_path_t *data_vpath;
3432 
3433             data_vpath = vfs_path_from_str ((char *) next->data);
3434             ok = panel_do_cd_int (panel, data_vpath, cd_exact);
3435             vfs_path_free (data_vpath, TRUE);
3436             panel->dir_history.current = next;
3437         }
3438         // skip directories that present in history but absent in file system
3439     }
3440     while (!ok);
3441 }
3442 
3443 /* --------------------------------------------------------------------------------------------- */
3444 
3445 static void
3446 directory_history_prev (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3447 {
3448     gboolean ok;
3449 
3450     do
3451     {
3452         GList *prev;
3453 
3454         ok = TRUE;
3455         prev = g_list_previous (panel->dir_history.current);
3456         if (prev != NULL)
3457         {
3458             vfs_path_t *data_vpath;
3459 
3460             data_vpath = vfs_path_from_str ((char *) prev->data);
3461             ok = panel_do_cd_int (panel, data_vpath, cd_exact);
3462             vfs_path_free (data_vpath, TRUE);
3463             panel->dir_history.current = prev;
3464         }
3465         // skip directories that present in history but absent in file system
3466     }
3467     while (!ok);
3468 }
3469 
3470 /* --------------------------------------------------------------------------------------------- */
3471 
3472 static void
3473 directory_history_list (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3474 {
3475     history_descriptor_t hd;
3476     gboolean ok = FALSE;
3477     size_t pos;
3478 
3479     pos = g_list_position (panel->dir_history.current, panel->dir_history.list);
3480 
3481     history_descriptor_init (&hd, WIDGET (panel)->rect.y, WIDGET (panel)->rect.x,
3482                              panel->dir_history.list, (int) pos);
3483     history_show (&hd);
3484 
3485     panel->dir_history.list = hd.list;
3486     if (hd.text != NULL)
3487     {
3488         vfs_path_t *s_vpath;
3489 
3490         s_vpath = vfs_path_from_str (hd.text);
3491         ok = panel_do_cd (panel, s_vpath, cd_exact);
3492         if (ok)
3493         {
3494             // in case of history of other panel, restore current path of VFS
3495             if (panel != current_panel)
3496                 panel_do_cd_int (current_panel, current_panel->cwd_vpath, cd_exact);
3497         }
3498         else
3499             cd_error_message (hd.text);
3500         vfs_path_free (s_vpath, TRUE);
3501         g_free (hd.text);
3502     }
3503 
3504     if (!ok)
3505     {
3506         /* Since history is fully modified in history_show(), panel->dir_history actually
3507          * points to the invalid place. Try restore current position here. */
3508 
3509         size_t i;
3510 
3511         panel->dir_history.current = panel->dir_history.list;
3512 
3513         for (i = 0; i < pos; i++)
3514         {
3515             GList *prev;
3516 
3517             prev = g_list_previous (panel->dir_history.current);
3518             if (prev == NULL)
3519                 break;
3520 
3521             panel->dir_history.current = prev;
3522         }
3523     }
3524 }
3525 
3526 /* --------------------------------------------------------------------------------------------- */
3527 
3528 static cb_ret_t
3529 panel_execute_cmd (WPanel *panel, long command)
     /* [previous][next][first][last][top][bottom][index][help]  */
3530 {
3531     int res = MSG_HANDLED;
3532 
3533     if (command != CK_Search)
3534         stop_search (panel);
3535 
3536     switch (command)
3537     {
3538     case CK_Up:
3539     case CK_Down:
3540     case CK_Left:
3541     case CK_Right:
3542     case CK_Bottom:
3543     case CK_Top:
3544     case CK_PageDown:
3545     case CK_PageUp:
3546         // reset state of marks flag
3547         state_mark = -1;
3548         break;
3549     default:
3550         break;
3551     }
3552 
3553     switch (command)
3554     {
3555     case CK_CycleListingFormat:
3556         panel_cycle_listing_format (panel);
3557         break;
3558     case CK_PanelOtherCd:
3559         chdir_other_panel (panel);
3560         break;
3561     case CK_PanelOtherCdLink:
3562         chdir_to_readlink (panel);
3563         break;
3564     case CK_CopySingle:
3565         copy_cmd_local (panel);
3566         break;
3567     case CK_DeleteSingle:
3568         delete_cmd_local (panel);
3569         break;
3570     case CK_Enter:
3571         do_enter (panel);
3572         break;
3573     case CK_ViewRaw:
3574         view_raw_cmd (panel);
3575         break;
3576     case CK_EditNew:
3577         edit_cmd_new ();
3578         break;
3579     case CK_MoveSingle:
3580         rename_cmd_local (panel);
3581         break;
3582     case CK_SelectInvert:
3583         panel_select_invert_files (panel);
3584         break;
3585     case CK_Select:
3586         panel_select_files (panel);
3587         break;
3588     case CK_SelectExt:
3589         panel_select_ext_cmd (panel);
3590         break;
3591     case CK_Unselect:
3592         panel_unselect_files (panel);
3593         break;
3594     case CK_Filter:
3595         panel_do_set_filter (panel);
3596         break;
3597     case CK_PageDown:
3598         next_page (panel);
3599         break;
3600     case CK_PageUp:
3601         prev_page (panel);
3602         break;
3603     case CK_CdChild:
3604         goto_child_dir (panel);
3605         break;
3606     case CK_CdParent:
3607         goto_parent_dir (panel);
3608         break;
3609     case CK_History:
3610         directory_history_list (panel);
3611         break;
3612     case CK_HistoryNext:
3613         directory_history_next (panel);
3614         break;
3615     case CK_HistoryPrev:
3616         directory_history_prev (panel);
3617         break;
3618     case CK_BottomOnScreen:
3619         goto_bottom_file (panel);
3620         break;
3621     case CK_MiddleOnScreen:
3622         goto_middle_file (panel);
3623         break;
3624     case CK_TopOnScreen:
3625         goto_top_file (panel);
3626         break;
3627     case CK_Mark:
3628         mark_file (panel);
3629         break;
3630     case CK_MarkUp:
3631         mark_file_up (panel);
3632         break;
3633     case CK_MarkDown:
3634         mark_file_down (panel);
3635         break;
3636     case CK_MarkLeft:
3637         mark_file_left (panel);
3638         break;
3639     case CK_MarkRight:
3640         mark_file_right (panel);
3641         break;
3642     case CK_CdParentSmart:
3643         res = force_maybe_cd (panel);
3644         break;
3645     case CK_Up:
3646         move_up (panel);
3647         break;
3648     case CK_Down:
3649         move_down (panel);
3650         break;
3651     case CK_Left:
3652         res = move_left (panel);
3653         break;
3654     case CK_Right:
3655         res = move_right (panel);
3656         break;
3657     case CK_Bottom:
3658         move_end (panel);
3659         break;
3660     case CK_Top:
3661         move_home (panel);
3662         break;
3663     case CK_SelectCodepage:
3664         panel_change_encoding (panel);
3665         break;
3666     case CK_ScrollLeft:
3667         panel_content_scroll_left (panel);
3668         break;
3669     case CK_ScrollRight:
3670         panel_content_scroll_right (panel);
3671         break;
3672     case CK_ScrollHome:
3673         panel_content_scroll_home (panel);
3674         break;
3675     case CK_ScrollEnd:
3676         panel_content_scroll_end (panel);
3677         break;
3678     case CK_Search:
3679         start_search (panel);
3680         break;
3681     case CK_SearchStop:
3682         break;
3683     case CK_PanelOtherSync:
3684         panel_sync_other (panel);
3685         break;
3686     case CK_Sort:
3687         panel_select_sort_order (panel);
3688         break;
3689     case CK_SortPrev:
3690         panel_toggle_sort_order_prev (panel);
3691         break;
3692     case CK_SortNext:
3693         panel_toggle_sort_order_next (panel);
3694         break;
3695     case CK_SortReverse:
3696         panel->sort_info.reverse = !panel->sort_info.reverse;
3697         panel_set_sort_order (panel, panel->sort_field);
3698         break;
3699     case CK_SortByName:
3700         panel_set_sort_type_by_id (panel, "name");
3701         break;
3702     case CK_SortByVersion:
3703         panel_set_sort_type_by_id (panel, "version");
3704         break;
3705     case CK_SortByExt:
3706         panel_set_sort_type_by_id (panel, "extension");
3707         break;
3708     case CK_SortBySize:
3709         panel_set_sort_type_by_id (panel, "size");
3710         break;
3711     case CK_SortByMTime:
3712         panel_set_sort_type_by_id (panel, "mtime");
3713         break;
3714     default:
3715         res = MSG_NOT_HANDLED;
3716         break;
3717     }
3718 
3719     return res;
3720 }
3721 
3722 /* --------------------------------------------------------------------------------------------- */
3723 
3724 static cb_ret_t
3725 panel_key (WPanel *panel, int key)
     /* [previous][next][first][last][top][bottom][index][help]  */
3726 {
3727     long command;
3728 
3729     if (is_abort_char (key))
3730     {
3731         stop_search (panel);
3732         return MSG_HANDLED;
3733     }
3734 
3735     if (panel->quick_search.active && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
3736     {
3737         do_search (panel, key);
3738         return MSG_HANDLED;
3739     }
3740 
3741     command = widget_lookup_key (WIDGET (panel), key);
3742     if (command != CK_IgnoreKey)
3743         return panel_execute_cmd (panel, command);
3744 
3745     if (!command_prompt && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
3746     {
3747         start_search (panel);
3748         do_search (panel, key);
3749         return MSG_HANDLED;
3750     }
3751 
3752     return MSG_NOT_HANDLED;
3753 }
3754 
3755 /* --------------------------------------------------------------------------------------------- */
3756 
3757 static cb_ret_t
3758 panel_callback (Widget *w, Widget *sender, widget_msg_t msg, int parm, void *data)
     /* [previous][next][first][last][top][bottom][index][help]  */
3759 {
3760     WPanel *panel = PANEL (w);
3761     WDialog *h = DIALOG (w->owner);
3762     WButtonBar *bb;
3763 
3764     switch (msg)
3765     {
3766     case MSG_INIT:
3767         // subscribe to "history_load" event
3768         mc_event_add (h->event_group, MCEVENT_HISTORY_LOAD, panel_load_history, w, NULL);
3769         // subscribe to "history_save" event
3770         mc_event_add (h->event_group, MCEVENT_HISTORY_SAVE, panel_save_history, w, NULL);
3771         return MSG_HANDLED;
3772 
3773     case MSG_DRAW:
3774         // Repaint everything, including frame and separator
3775         widget_erase (w);
3776         show_dir (panel);
3777         panel_print_header (panel);
3778         adjust_top_file (panel);
3779         paint_dir (panel);
3780         mini_info_separator (panel);
3781         display_mini_info (panel);
3782         panel->dirty = FALSE;
3783         return MSG_HANDLED;
3784 
3785     case MSG_FOCUS:
3786         state_mark = -1;
3787         current_panel = panel;
3788         panel->active = TRUE;
3789 
3790         if (mc_chdir (panel->cwd_vpath) != 0)
3791         {
3792             char *cwd;
3793 
3794             cwd = vfs_path_to_str_flags (panel->cwd_vpath, 0, VPF_STRIP_PASSWORD);
3795             cd_error_message (cwd);
3796             g_free (cwd);
3797         }
3798 #ifdef ENABLE_SUBSHELL
3799         else
3800             subshell_chdir (panel->cwd_vpath);
3801 #endif
3802 
3803         update_xterm_title_path ();
3804         update_terminal_cwd ();
3805         select_item (panel);
3806 
3807         bb = buttonbar_find (h);
3808         midnight_set_buttonbar (bb);
3809         // Force buttonbar redraw. Required if other panel is not in the list mode.
3810         widget_draw (WIDGET (bb));
3811         return MSG_HANDLED;
3812 
3813     case MSG_UNFOCUS:
3814         // Janne: look at this for the multiple panel options
3815         stop_search (panel);
3816         panel->active = FALSE;
3817         unselect_item (panel);
3818         return MSG_HANDLED;
3819 
3820     case MSG_KEY:
3821         return panel_key (panel, parm);
3822 
3823     case MSG_ACTION:
3824         return panel_execute_cmd (panel, parm);
3825 
3826     case MSG_DESTROY:
3827         vfs_stamp_path (panel->cwd_vpath);
3828         // unsubscribe from "history_load" event
3829         mc_event_del (h->event_group, MCEVENT_HISTORY_LOAD, panel_load_history, w);
3830         // unsubscribe from "history_save" event
3831         mc_event_del (h->event_group, MCEVENT_HISTORY_SAVE, panel_save_history, w);
3832         panel_destroy (panel);
3833         free_my_statfs ();
3834         return MSG_HANDLED;
3835 
3836     default:
3837         return widget_default_callback (w, sender, msg, parm, data);
3838     }
3839 }
3840 
3841 /* --------------------------------------------------------------------------------------------- */
3842 /*                                     */
3843 /* Panel mouse events support routines */
3844 /*                                     */
3845 
3846 static void
3847 mouse_toggle_mark (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3848 {
3849     const file_entry_t *fe;
3850 
3851     fe = panel_current_entry (panel);
3852     if (fe != NULL)
3853     {
3854         do_mark_file (panel, MARK_DONT_MOVE);
3855         mouse_marking = fe->f.marked != 0;
3856         mouse_mark_panel = current_panel;
3857     }
3858 }
3859 
3860 /* --------------------------------------------------------------------------------------------- */
3861 
3862 static void
3863 mouse_set_mark (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
3864 {
3865     if (mouse_mark_panel == panel)
3866     {
3867         const file_entry_t *fe;
3868 
3869         fe = panel_current_entry (panel);
3870         if (fe != NULL)
3871         {
3872             if (mouse_marking && fe->f.marked == 0)
3873                 do_mark_file (panel, MARK_DONT_MOVE);
3874             else if (!mouse_marking && fe->f.marked != 0)
3875                 do_mark_file (panel, MARK_DONT_MOVE);
3876         }
3877     }
3878 }
3879 
3880 /* --------------------------------------------------------------------------------------------- */
3881 
3882 static void
3883 mark_if_marking (WPanel *panel, const mouse_event_t *event, int previous_current)
     /* [previous][next][first][last][top][bottom][index][help]  */
3884 {
3885     if ((event->buttons & GPM_B_RIGHT) == 0)
3886         return;
3887 
3888     if (event->msg == MSG_MOUSE_DOWN)
3889         mouse_toggle_mark (panel);
3890     else
3891     {
3892         int pcurr, curr1, curr2;
3893 
3894         pcurr = panel->current;
3895         curr1 = MIN (previous_current, panel->current);
3896         curr2 = MAX (previous_current, panel->current);
3897 
3898         for (; curr1 <= curr2; curr1++)
3899         {
3900             panel->current = curr1;
3901             mouse_set_mark (panel);
3902         }
3903 
3904         panel->current = pcurr;
3905     }
3906 }
3907 
3908 /* --------------------------------------------------------------------------------------------- */
3909 /** Determine which column was clicked, and sort the panel on
3910  * that column, or reverse sort on that column if already
3911  * sorted on that column.
3912  */
3913 
3914 static void
3915 mouse_sort_col (WPanel *panel, int x)
     /* [previous][next][first][last][top][bottom][index][help]  */
3916 {
3917     int i = 0;
3918     GSList *format;
3919     const char *lc_sort_name = NULL;
3920     panel_field_t *col_sort_format = NULL;
3921 
3922     const int sort_indicator_width =
3923         panel->sort_info.reverse ? panel_sort_up_indicator_width : panel_sort_down_indicator_width;
3924 
3925     // Clicking the sort order indicator itself should reverse the current sort order
3926     if (x >= 2 && x < 2 + sort_indicator_width)
3927     {
3928         panel->sort_info.reverse = !panel->sort_info.reverse;
3929         panel_set_sort_order (panel, panel->sort_field);
3930         return;
3931     }
3932 
3933     for (format = panel->format; format != NULL; format = g_slist_next (format))
3934     {
3935         format_item_t *fi = (format_item_t *) format->data;
3936 
3937         i += fi->field_len;
3938         if (x < i + 1)
3939         {
3940             // found column
3941             lc_sort_name = fi->title;
3942             break;
3943         }
3944     }
3945 
3946     if (lc_sort_name == NULL)
3947         return;
3948 
3949     for (i = 0; panel_fields[i].id != NULL; i++)
3950     {
3951         const char *title;
3952 
3953         title = panel_get_title_without_hotkey (panel_fields[i].title_hotkey);
3954         if (panel_fields[i].sort_routine != NULL && strcmp (title, lc_sort_name) == 0)
3955         {
3956             col_sort_format = &panel_fields[i];
3957             break;
3958         }
3959     }
3960 
3961     if (col_sort_format != NULL)
3962     {
3963         if (panel->sort_field == col_sort_format)
3964             // reverse the sort if clicked column is already the sorted column
3965             panel->sort_info.reverse = !panel->sort_info.reverse;
3966         else
3967             // new sort is forced to be ascending
3968             panel->sort_info.reverse = FALSE;
3969 
3970         panel_set_sort_order (panel, col_sort_format);
3971     }
3972 }
3973 
3974 /* --------------------------------------------------------------------------------------------- */
3975 
3976 static int
3977 panel_mouse_is_on_item (const WPanel *panel, int y, int x)
     /* [previous][next][first][last][top][bottom][index][help]  */
3978 {
3979     int lines, col_width, col;
3980 
3981     if (y < 0)
3982         return MOUSE_UPPER_FILE_LIST;
3983 
3984     lines = panel_lines (panel);
3985     if (y >= lines)
3986         return MOUSE_BELOW_FILE_LIST;
3987 
3988     col_width = (CONST_WIDGET (panel)->rect.cols - 2) / panel->list_cols;
3989     // column where mouse is
3990     col = x / col_width;
3991 
3992     y += panel->top + lines * col;
3993 
3994     // are we below or in the next column of last file?
3995     if (y >= panel->dir.len)
3996         return MOUSE_AFTER_LAST_FILE;
3997 
3998     // we are on item of the file file; return an index to select a file
3999     return y;
4000 }
4001 
4002 /* --------------------------------------------------------------------------------------------- */
4003 
4004 static void
4005 panel_mouse_callback (Widget *w, mouse_msg_t msg, mouse_event_t *event)
     /* [previous][next][first][last][top][bottom][index][help]  */
4006 {
4007     WPanel *panel = PANEL (w);
4008     gboolean is_active;
4009 
4010     is_active = widget_is_active (w);
4011 
4012     switch (msg)
4013     {
4014     case MSG_MOUSE_DOWN:
4015         if (event->y == 0)
4016         {
4017             // top frame
4018             if (event->x == 1)
4019                 // "<" button
4020                 directory_history_prev (panel);
4021             else if (event->x == w->rect.cols - 2)
4022                 // ">" button
4023                 directory_history_next (panel);
4024             else if (event->x >= w->rect.cols - 5 && event->x <= w->rect.cols - 3)
4025                 // "^" button
4026                 directory_history_list (panel);
4027             else if (event->x == w->rect.cols - 6)
4028                 // "." button show/hide hidden files
4029                 send_message (filemanager, NULL, MSG_ACTION, CK_ShowHidden, NULL);
4030             else
4031             {
4032                 // no other events on 1st line, return MOU_UNHANDLED
4033                 event->result.abort = TRUE;
4034                 // avoid extra panel redraw
4035                 panel->dirty = FALSE;
4036             }
4037             break;
4038         }
4039 
4040         if (event->y == 1)
4041         {
4042             // sort on clicked column
4043             mouse_sort_col (panel, event->x + 1);
4044             break;
4045         }
4046 
4047         if (!is_active)
4048             (void) change_panel ();
4049         MC_FALLTHROUGH;
4050 
4051     case MSG_MOUSE_DRAG:
4052     {
4053         int my_index;
4054         int previous_current;
4055 
4056         my_index = panel_mouse_is_on_item (panel, event->y - 2, event->x);
4057         previous_current = panel->current;
4058 
4059         switch (my_index)
4060         {
4061         case MOUSE_UPPER_FILE_LIST:
4062             move_up (panel);
4063             mark_if_marking (panel, event, previous_current);
4064             break;
4065 
4066         case MOUSE_BELOW_FILE_LIST:
4067             move_down (panel);
4068             mark_if_marking (panel, event, previous_current);
4069             break;
4070 
4071         case MOUSE_AFTER_LAST_FILE:
4072             break;  // do nothing
4073 
4074         default:
4075             if (my_index != panel->current)
4076             {
4077                 unselect_item (panel);
4078                 panel->current = my_index;
4079                 select_item (panel);
4080             }
4081 
4082             mark_if_marking (panel, event, previous_current);
4083             break;
4084         }
4085     }
4086     break;
4087 
4088     case MSG_MOUSE_UP:
4089         break;
4090 
4091     case MSG_MOUSE_CLICK:
4092         if ((event->count & GPM_DOUBLE) != 0 && (event->buttons & GPM_B_LEFT) != 0
4093             && panel_mouse_is_on_item (panel, event->y - 2, event->x) >= 0)
4094             do_enter (panel);
4095         break;
4096 
4097     case MSG_MOUSE_MOVE:
4098         break;
4099 
4100     case MSG_MOUSE_SCROLL_UP:
4101         if (is_active)
4102         {
4103             if (panels_options.mouse_move_pages && panel->top > 0)
4104                 prev_page (panel);
4105             else  // We are in first page
4106                 move_up (panel);
4107         }
4108         break;
4109 
4110     case MSG_MOUSE_SCROLL_DOWN:
4111         if (is_active)
4112         {
4113             if (panels_options.mouse_move_pages
4114                 && panel->top + panel_items (panel) < panel->dir.len)
4115                 next_page (panel);
4116             else  // We are in last page
4117                 move_down (panel);
4118         }
4119         break;
4120 
4121     default:
4122         break;
4123     }
4124 
4125     if (panel->dirty)
4126         widget_draw (w);
4127 }
4128 
4129 /* --------------------------------------------------------------------------------------------- */
4130 
4131 static void
4132 reload_panelized (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4133 {
4134     int i, j;
4135     dir_list *list = &panel->dir;
4136 
4137     // refresh current VFS directory required for vfs_path_from_str()
4138     (void) mc_chdir (panel->cwd_vpath);
4139 
4140     for (i = 0, j = 0; i < list->len; i++)
4141     {
4142         vfs_path_t *vpath;
4143 
4144         vpath = vfs_path_from_str (list->list[i].fname->str);
4145         if (mc_lstat (vpath, &list->list[i].st) != 0)
4146             g_string_free (list->list[i].fname, TRUE);
4147         else
4148         {
4149             if (j != i)
4150                 list->list[j] = list->list[i];
4151             j++;
4152         }
4153         vfs_path_free (vpath, TRUE);
4154     }
4155     if (j == 0)
4156         dir_list_init (list);
4157     else
4158         list->len = j;
4159 
4160     recalculate_panel_summary (panel);
4161 
4162     if (panel != current_panel)
4163         (void) mc_chdir (current_panel->cwd_vpath);
4164 }
4165 
4166 /* --------------------------------------------------------------------------------------------- */
4167 
4168 static void
4169 update_one_panel_widget (WPanel *panel, panel_update_flags_t flags, const char *current_file)
     /* [previous][next][first][last][top][bottom][index][help]  */
4170 {
4171     gboolean free_pointer;
4172     char *my_current_file = NULL;
4173 
4174     if ((flags & UP_RELOAD) != 0)
4175     {
4176         panel->is_panelized = FALSE;
4177         mc_setctl (panel->cwd_vpath, VFS_SETCTL_FLUSH, NULL);
4178         memset (&(panel->dir_stat), 0, sizeof (panel->dir_stat));
4179     }
4180 
4181     // If current_file == -1 (an invalid pointer) then preserve current
4182     free_pointer = current_file == UP_KEEPSEL;
4183 
4184     if (free_pointer)
4185     {
4186         const file_entry_t *fe;
4187 
4188         fe = panel_current_entry (panel);
4189         if (fe != NULL)
4190             my_current_file = g_strndup (fe->fname->str, fe->fname->len);
4191         current_file = my_current_file;
4192     }
4193 
4194     if (panel->is_panelized)
4195         reload_panelized (panel);
4196     else
4197         panel_reload (panel);
4198 
4199     panel_set_current_by_name (panel, current_file);
4200     panel->dirty = TRUE;
4201 
4202     if (free_pointer)
4203         g_free (my_current_file);
4204 }
4205 
4206 /* --------------------------------------------------------------------------------------------- */
4207 
4208 static void
4209 update_one_panel (int which, panel_update_flags_t flags, const char *current_file)
     /* [previous][next][first][last][top][bottom][index][help]  */
4210 {
4211     if (get_panel_type (which) == view_listing)
4212     {
4213         WPanel *panel;
4214 
4215         panel = PANEL (get_panel_widget (which));
4216         if (panel->is_panelized)
4217             flags &= ~UP_RELOAD;
4218         update_one_panel_widget (panel, flags, current_file);
4219     }
4220 }
4221 
4222 /* --------------------------------------------------------------------------------------------- */
4223 
4224 /* event callback */
4225 static gboolean
4226 event_update_panels (const gchar *event_group_name, const gchar *event_name, gpointer init_data,
     /* [previous][next][first][last][top][bottom][index][help]  */
4227                      gpointer data)
4228 {
4229     (void) event_group_name;
4230     (void) event_name;
4231     (void) init_data;
4232     (void) data;
4233 
4234     update_panels (UP_RELOAD, UP_KEEPSEL);
4235 
4236     return TRUE;
4237 }
4238 
4239 /* --------------------------------------------------------------------------------------------- */
4240 
4241 /* event callback */
4242 static gboolean
4243 panel_save_current_file_to_clip_file (const gchar *event_group_name, const gchar *event_name,
     /* [previous][next][first][last][top][bottom][index][help]  */
4244                                       gpointer init_data, gpointer data)
4245 {
4246     (void) event_group_name;
4247     (void) event_name;
4248     (void) init_data;
4249     (void) data;
4250 
4251     if (current_panel->marked == 0)
4252     {
4253         const file_entry_t *fe;
4254 
4255         fe = panel_current_entry (current_panel);
4256         if (fe != NULL)
4257             mc_event_raise (MCEVENT_GROUP_CORE, "clipboard_text_to_file",
4258                             (gpointer) fe->fname->str);
4259     }
4260     else
4261     {
4262         int i;
4263         gboolean first = TRUE;
4264         char *flist = NULL;
4265 
4266         for (i = 0; i < current_panel->dir.len; i++)
4267         {
4268             const file_entry_t *fe = &current_panel->dir.list[i];
4269 
4270             if (fe->f.marked != 0)
4271             {  // Skip the unmarked ones
4272                 if (first)
4273                 {
4274                     flist = g_strndup (fe->fname->str, fe->fname->len);
4275                     first = FALSE;
4276                 }
4277                 else
4278                 {
4279                     // Add empty lines after the file
4280                     char *tmp;
4281 
4282                     tmp = g_strconcat (flist, "\n", fe->fname->str, (char *) NULL);
4283                     g_free (flist);
4284                     flist = tmp;
4285                 }
4286             }
4287         }
4288 
4289         mc_event_raise (MCEVENT_GROUP_CORE, "clipboard_text_to_file", (gpointer) flist);
4290         g_free (flist);
4291     }
4292     return TRUE;
4293 }
4294 
4295 /* --------------------------------------------------------------------------------------------- */
4296 
4297 static vfs_path_t *
4298 panel_recursive_cd_to_parent (const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
4299 {
4300     vfs_path_t *cwd_vpath;
4301 
4302     cwd_vpath = vfs_path_clone (vpath);
4303 
4304     while (mc_chdir (cwd_vpath) < 0)
4305     {
4306         const char *panel_cwd_path;
4307         vfs_path_t *tmp_vpath;
4308 
4309         // check if path contains only '/'
4310         panel_cwd_path = vfs_path_as_str (cwd_vpath);
4311         if (panel_cwd_path != NULL && IS_PATH_SEP (panel_cwd_path[0]) && panel_cwd_path[1] == '\0')
4312         {
4313             vfs_path_free (cwd_vpath, TRUE);
4314             return NULL;
4315         }
4316 
4317         tmp_vpath = vfs_path_vtokens_get (cwd_vpath, 0, -1);
4318         vfs_path_free (cwd_vpath, TRUE);
4319         cwd_vpath =
4320             vfs_path_build_filename (PATH_SEP_STR, vfs_path_as_str (tmp_vpath), (char *) NULL);
4321         vfs_path_free (tmp_vpath, TRUE);
4322     }
4323 
4324     return cwd_vpath;
4325 }
4326 
4327 /* --------------------------------------------------------------------------------------------- */
4328 
4329 static void
4330 panel_dir_list_callback (dir_list_cb_state_t state, void *data)
     /* [previous][next][first][last][top][bottom][index][help]  */
4331 {
4332     static int count = 0;
4333 
4334     (void) data;
4335 
4336     switch (state)
4337     {
4338     case DIR_OPEN:
4339         count = 0;
4340         break;
4341 
4342     case DIR_READ:
4343         count++;
4344         if ((count & 15) == 0)
4345             rotate_dash (TRUE);
4346         break;
4347 
4348     case DIR_CLOSE:
4349         rotate_dash (FALSE);
4350         break;
4351 
4352     default:
4353         g_assert_not_reached ();
4354     }
4355 }
4356 
4357 /* --------------------------------------------------------------------------------------------- */
4358 /*** public functions ****************************************************************************/
4359 /* --------------------------------------------------------------------------------------------- */
4360 
4361 file_entry_t *
4362 panel_current_entry (const WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4363 {
4364     file_entry_t *fe;
4365 
4366     if (panel->dir.len == 0 || panel->current < 0 || panel->current >= panel->dir.len)
4367         return NULL;
4368 
4369     fe = &(panel->dir.list[panel->current]);
4370 
4371     return fe->fname == NULL ? NULL : fe;
4372 }
4373 
4374 /* --------------------------------------------------------------------------------------------- */
4375 
4376 void
4377 panel_set_current_by_name (WPanel *panel, const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
4378 {
4379     int i;
4380     char *subdir;
4381 
4382     if (panel->dir.len == 0)
4383     {
4384         panel_set_current (panel, -1);
4385         return;
4386     }
4387 
4388     if (name == NULL)
4389     {
4390         panel_set_current (panel, 0);
4391         return;
4392     }
4393 
4394     /* We only want the last component of the directory,
4395      * and from this only the name without suffix.
4396      * Cut prefix if the panel is not panelized */
4397     if (panel->is_panelized)
4398         subdir = vfs_strip_suffix_from_filename (name);
4399     else
4400         subdir = vfs_strip_suffix_from_filename (x_basename (name));
4401 
4402     /* Search that subdir or filename without prefix (if not panelized panel),
4403        make it current if found */
4404     for (i = 0; i < panel->dir.len; i++)
4405         if (strcmp (subdir, panel->dir.list[i].fname->str) == 0)
4406         {
4407             panel_set_current (panel, i);
4408             g_free (subdir);
4409             return;
4410         }
4411 
4412     // Make current near the filee that is missing
4413     if (panel->current >= panel->dir.len)
4414         panel_set_current (panel, panel->dir.len - 1);
4415     g_free (subdir);
4416 
4417     select_item (panel);
4418 }
4419 
4420 /* --------------------------------------------------------------------------------------------- */
4421 
4422 void
4423 panel_clean_dir (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4424 {
4425     panel->top = 0;
4426     panel->current = 0;
4427     panel->marked = 0;
4428     panel->dirs_marked = 0;
4429     panel->total = 0;
4430     panel->quick_search.active = FALSE;
4431     panel->is_panelized = FALSE;
4432     panel->dirty = TRUE;
4433     panel->content_shift = 0;
4434     panel->max_shift = 0;
4435 
4436     dir_list_free_list (&panel->dir);
4437 }
4438 
4439 /* --------------------------------------------------------------------------------------------- */
4440 /**
4441  * Set Up panel's current dir object
4442  *
4443  * @param panel panel object
4444  * @param path_str string contain path
4445  */
4446 
4447 void
4448 panel_set_cwd (WPanel *panel, const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
4449 {
4450     if (vpath != panel->cwd_vpath)  // check if new vpath is not the panel->cwd_vpath object
4451     {
4452         vfs_path_free (panel->cwd_vpath, TRUE);
4453         panel->cwd_vpath = vfs_path_clone (vpath);
4454     }
4455 }
4456 
4457 /* --------------------------------------------------------------------------------------------- */
4458 /**
4459  * Set Up panel's last working dir object
4460  *
4461  * @param panel panel object
4462  * @param path_str string contain path
4463  */
4464 
4465 void
4466 panel_set_lwd (WPanel *panel, const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
4467 {
4468     if (vpath != panel->lwd_vpath)  // check if new vpath is not the panel->lwd_vpath object
4469     {
4470         vfs_path_free (panel->lwd_vpath, TRUE);
4471         panel->lwd_vpath = vfs_path_clone (vpath);
4472     }
4473 }
4474 
4475 /* --------------------------------------------------------------------------------------------- */
4476 /**
4477  * Creatie an empty panel with specified size.
4478  *
4479  * @param panel_name name of panel for setup receiving
4480  * @param r panel areaa
4481  *
4482  * @return new instance of WPanel
4483  */
4484 
4485 WPanel *
4486 panel_sized_empty_new (const char *panel_name, const WRect *r)
     /* [previous][next][first][last][top][bottom][index][help]  */
4487 {
4488     WPanel *panel;
4489     Widget *w;
4490     char *section;
4491     int i, err;
4492 
4493     panel = g_new0 (WPanel, 1);
4494     w = WIDGET (panel);
4495     widget_init (w, r, panel_callback, panel_mouse_callback);
4496     w->options |= WOP_SELECTABLE | WOP_TOP_SELECT;
4497     w->keymap = panel_map;
4498 
4499     panel->dir.size = DIR_LIST_MIN_SIZE;
4500     panel->dir.list = g_new (file_entry_t, panel->dir.size);
4501     panel->dir.len = 0;
4502     panel->dir.callback = panel_dir_list_callback;
4503 
4504     panel->list_cols = 1;
4505     panel->brief_cols = 2;
4506     panel->dirty = TRUE;
4507     panel->content_shift = 0;
4508     panel->max_shift = 0;
4509 
4510     panel->list_format = list_full;
4511     panel->user_format = g_strdup (DEFAULT_USER_FORMAT);
4512 
4513     panel->filter.flags = FILE_FILTER_DEFAULT_FLAGS;
4514 
4515     for (i = 0; i < LIST_FORMATS; i++)
4516         panel->user_status_format[i] = g_strdup (DEFAULT_USER_FORMAT);
4517 
4518     panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
4519 
4520     panel->frame_size = frame_half;
4521 
4522     panel->quick_search.buffer = g_string_sized_new (MC_MAXFILENAMELEN);
4523     panel->quick_search.prev_buffer = g_string_sized_new (MC_MAXFILENAMELEN);
4524 
4525     panel->name = g_strdup (panel_name);
4526     panel->dir_history.name = g_strconcat ("Dir Hist ", panel->name, (char *) NULL);
4527     // directories history will be get later
4528 
4529     section = g_strconcat ("Temporal:", panel->name, (char *) NULL);
4530     if (!mc_config_has_group (mc_global.main_config, section))
4531     {
4532         g_free (section);
4533         section = g_strdup (panel->name);
4534     }
4535     panel_load_setup (panel, section);
4536     g_free (section);
4537 
4538     if (panel->filter.value != NULL)
4539     {
4540         gboolean case_sens = (panel->filter.flags & SELECT_MATCH_CASE) != 0;
4541         gboolean shell_patterns = (panel->filter.flags & SELECT_SHELL_PATTERNS) != 0;
4542 
4543         panel->filter.handler = mc_search_new (panel->filter.value, NULL);
4544         panel->filter.handler->search_type = shell_patterns ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
4545         panel->filter.handler->is_entire_line = TRUE;
4546         panel->filter.handler->is_case_sensitive = case_sens;
4547 
4548         // FIXME: silent check -- do not display an error message
4549         if (!mc_search_prepare (panel->filter.handler))
4550             file_filter_clear (&panel->filter);
4551     }
4552 
4553     // Load format strings
4554     err = set_panel_formats (panel);
4555     if (err != 0)
4556         set_panel_formats (panel);
4557 
4558     return panel;
4559 }
4560 
4561 /* --------------------------------------------------------------------------------------------- */
4562 /**
4563  * Panel creation for specified size and directory.
4564  *
4565  * @param panel_name name of panel for setup retrieving
4566  * @param r panel areaa
4567  * @param vpath working panel directory. If NULL then current directory is used
4568  *
4569  * @return new instance of WPanel
4570  */
4571 
4572 WPanel *
4573 panel_sized_with_dir_new (const char *panel_name, const WRect *r, const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
4574 {
4575     WPanel *panel;
4576     char *curdir = NULL;
4577     const vfs_path_element_t *path_element;
4578 
4579     panel = panel_sized_empty_new (panel_name, r);
4580 
4581     if (vpath != NULL)
4582     {
4583         curdir = vfs_get_cwd ();
4584         panel_set_cwd (panel, vpath);
4585     }
4586     else
4587     {
4588         vfs_setup_cwd ();
4589         panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
4590     }
4591 
4592     panel_set_lwd (panel, vfs_get_raw_current_dir ());
4593 
4594     path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
4595     if (path_element->encoding != NULL)
4596         panel->codepage = get_codepage_index (path_element->encoding);
4597 
4598     if (mc_chdir (panel->cwd_vpath) != 0)
4599     {
4600         panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
4601         vfs_setup_cwd ();
4602         vfs_path_free (panel->cwd_vpath, TRUE);
4603         panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
4604     }
4605 
4606     // Load the default format
4607     if (!dir_list_load (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
4608                         &panel->sort_info, &panel->filter))
4609         message (D_ERROR, MSG_ERROR, _ ("Cannot read directory contents"));
4610 
4611     if (panel->dir.len == 0)
4612         panel_set_current (panel, -1);
4613 
4614     // Restore old right path
4615     if (curdir != NULL)
4616     {
4617         vfs_path_t *tmp_vpath;
4618         int err;
4619 
4620         tmp_vpath = vfs_path_from_str (curdir);
4621         mc_chdir (tmp_vpath);
4622         vfs_path_free (tmp_vpath, TRUE);
4623         (void) err;
4624     }
4625     g_free (curdir);
4626 
4627     return panel;
4628 }
4629 
4630 /* --------------------------------------------------------------------------------------------- */
4631 
4632 void
4633 panel_reload (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4634 {
4635     struct stat current_stat;
4636     vfs_path_t *cwd_vpath;
4637 
4638     if (panels_options.fast_reload && stat (vfs_path_as_str (panel->cwd_vpath), &current_stat) == 0
4639         && current_stat.st_ctime == panel->dir_stat.st_ctime
4640         && current_stat.st_mtime == panel->dir_stat.st_mtime)
4641         return;
4642 
4643     cwd_vpath = panel_recursive_cd_to_parent (panel->cwd_vpath);
4644     vfs_path_free (panel->cwd_vpath, TRUE);
4645 
4646     if (cwd_vpath == NULL)
4647     {
4648         panel->cwd_vpath = vfs_path_from_str (PATH_SEP_STR);
4649         panel_clean_dir (panel);
4650         dir_list_init (&panel->dir);
4651         return;
4652     }
4653 
4654     panel->cwd_vpath = cwd_vpath;
4655     memset (&(panel->dir_stat), 0, sizeof (panel->dir_stat));
4656     show_dir (panel);
4657 
4658     if (!dir_list_reload (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
4659                           &panel->sort_info, &panel->filter))
4660         message (D_ERROR, MSG_ERROR, _ ("Cannot read directory contents"));
4661 
4662     panel->dirty = TRUE;
4663 
4664     if (panel->dir.len == 0)
4665         panel_set_current (panel, -1);
4666     else if (panel->current >= panel->dir.len)
4667         panel_set_current (panel, panel->dir.len - 1);
4668 
4669     recalculate_panel_summary (panel);
4670 }
4671 
4672 /* --------------------------------------------------------------------------------------------- */
4673 /* Switches the panel to the mode specified in the format           */
4674 /* Setting up both format and status string. Return: 0 - on success; */
4675 /* 1 - format error; 2 - status error; 3 - errors in both formats.  */
4676 
4677 int
4678 set_panel_formats (WPanel *p)
     /* [previous][next][first][last][top][bottom][index][help]  */
4679 {
4680     GSList *form;
4681     char *err = NULL;
4682     int retcode = 0;
4683 
4684     form = use_display_format (p, panel_format (p), &err, FALSE);
4685 
4686     if (err != NULL)
4687     {
4688         g_free (err);
4689         retcode = 1;
4690     }
4691     else
4692     {
4693         g_slist_free_full (p->format, (GDestroyNotify) format_item_free);
4694         p->format = form;
4695     }
4696 
4697     if (panels_options.show_mini_info)
4698     {
4699         form = use_display_format (p, mini_status_format (p), &err, TRUE);
4700 
4701         if (err != NULL)
4702         {
4703             g_free (err);
4704             retcode += 2;
4705         }
4706         else
4707         {
4708             g_slist_free_full (p->status_format, (GDestroyNotify) format_item_free);
4709             p->status_format = form;
4710         }
4711     }
4712 
4713     panel_update_cols (WIDGET (p), p->frame_size);
4714 
4715     if (retcode != 0)
4716         message (D_ERROR, _ ("Warning"),
4717                  _ ("User supplied format looks invalid, reverting to default."));
4718     if ((retcode & 0x01) != 0)
4719     {
4720         g_free (p->user_format);
4721         p->user_format = g_strdup (DEFAULT_USER_FORMAT);
4722     }
4723     if ((retcode & 0x02) != 0)
4724     {
4725         g_free (p->user_status_format[p->list_format]);
4726         p->user_status_format[p->list_format] = g_strdup (DEFAULT_USER_FORMAT);
4727     }
4728 
4729     return retcode;
4730 }
4731 
4732 /* --------------------------------------------------------------------------------------------- */
4733 
4734 void
4735 panel_set_filter (WPanel *panel, const file_filter_t *filter)
     /* [previous][next][first][last][top][bottom][index][help]  */
4736 {
4737     MC_PTR_FREE (panel->filter.value);
4738     mc_search_free (panel->filter.handler);
4739     panel->filter.handler = NULL;
4740 
4741     // NULL to clear filter
4742     if (filter != NULL)
4743         panel->filter = *filter;
4744 
4745     reread_cmd ();
4746 }
4747 
4748 /* --------------------------------------------------------------------------------------------- */
4749 
4750 /* Select current item and readjust the panel */
4751 void
4752 select_item (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4753 {
4754     adjust_top_file (panel);
4755 
4756     panel->dirty = TRUE;
4757 
4758     execute_hooks (select_file_hook);
4759 }
4760 
4761 /* --------------------------------------------------------------------------------------------- */
4762 /** Clears all files in the panel, used only when one file was marked */
4763 void
4764 unmark_files (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4765 {
4766     if (panel->marked != 0)
4767     {
4768         int i;
4769 
4770         for (i = 0; i < panel->dir.len; i++)
4771             file_mark (panel, i, 0);
4772 
4773         panel->dirs_marked = 0;
4774         panel->marked = 0;
4775         panel->total = 0;
4776     }
4777 }
4778 
4779 /* --------------------------------------------------------------------------------------------- */
4780 /** Recalculate the panels summary information, used e.g. when marked
4781    files might have been removed by an external command */
4782 
4783 void
4784 recalculate_panel_summary (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4785 {
4786     int i;
4787 
4788     panel->marked = 0;
4789     panel->dirs_marked = 0;
4790     panel->total = 0;
4791 
4792     for (i = 0; i < panel->dir.len; i++)
4793         if (panel->dir.list[i].f.marked != 0)
4794         {
4795             /* do_file_mark will return immediately if newmark == oldmark.
4796                So we have to first unmark it to get panel's summary information
4797                updated. (Norbert) */
4798             panel->dir.list[i].f.marked = 0;
4799             do_file_mark (panel, i, 1);
4800         }
4801 }
4802 
4803 /* --------------------------------------------------------------------------------------------- */
4804 /** This routine marks a file or a directory */
4805 
4806 void
4807 do_file_mark (WPanel *panel, int idx, int mark)
     /* [previous][next][first][last][top][bottom][index][help]  */
4808 {
4809     if (panel->dir.list[idx].f.marked == mark)
4810         return;
4811 
4812     // Only '..' can't be marked, '.' isn't visible
4813     if (DIR_IS_DOTDOT (panel->dir.list[idx].fname->str))
4814         return;
4815 
4816     file_mark (panel, idx, mark);
4817     if (panel->dir.list[idx].f.marked != 0)
4818     {
4819         panel->marked++;
4820 
4821         if (S_ISDIR (panel->dir.list[idx].st.st_mode))
4822         {
4823             if (panel->dir.list[idx].f.dir_size_computed != 0)
4824                 panel->total += (uintmax_t) panel->dir.list[idx].st.st_size;
4825             panel->dirs_marked++;
4826         }
4827         else
4828             panel->total += (uintmax_t) panel->dir.list[idx].st.st_size;
4829 
4830         set_colors (panel);
4831     }
4832     else
4833     {
4834         if (S_ISDIR (panel->dir.list[idx].st.st_mode))
4835         {
4836             if (panel->dir.list[idx].f.dir_size_computed != 0)
4837                 panel->total -= (uintmax_t) panel->dir.list[idx].st.st_size;
4838             panel->dirs_marked--;
4839         }
4840         else
4841             panel->total -= (uintmax_t) panel->dir.list[idx].st.st_size;
4842 
4843         panel->marked--;
4844     }
4845 }
4846 
4847 /* --------------------------------------------------------------------------------------------- */
4848 /**
4849  * Changes the current directory of the panel.
4850  * Record change in the directory history.
4851  */
4852 gboolean
4853 panel_do_cd (WPanel *panel, const vfs_path_t *new_dir_vpath, enum cd_enum cd_type)
     /* [previous][next][first][last][top][bottom][index][help]  */
4854 {
4855     gboolean r;
4856 
4857     r = panel_do_cd_int (panel, new_dir_vpath, cd_type);
4858     if (r)
4859         directory_history_add (panel, panel->cwd_vpath);
4860     return r;
4861 }
4862 
4863 /* --------------------------------------------------------------------------------------------- */
4864 
4865 void
4866 file_mark (WPanel *panel, int lc_index, int val)
     /* [previous][next][first][last][top][bottom][index][help]  */
4867 {
4868     if (panel->dir.list[lc_index].f.marked != val)
4869     {
4870         panel->dir.list[lc_index].f.marked = val;
4871         panel->dirty = TRUE;
4872     }
4873 }
4874 
4875 /* --------------------------------------------------------------------------------------------- */
4876 /**
4877  * Find marked file starting from the given position.
4878  *
4879  * @param panel WPanel object
4880  * @param curent_file a staring position to get current or search next marked file
4881  *
4882  * @return pointer to the name of find file or NULL if no file found or @current_file is out of
4883  * range
4884  */
4885 
4886 const GString *
4887 panel_find_marked_file (const WPanel *panel, int *current_file)
     /* [previous][next][first][last][top][bottom][index][help]  */
4888 {
4889     while (panel->dir.list[*current_file].f.marked == 0 && *current_file < panel->dir.len)
4890         (*current_file)++;
4891 
4892     return (*current_file >= panel->dir.len ? NULL : panel->dir.list[*current_file].fname);
4893 }
4894 
4895 /* --------------------------------------------------------------------------------------------- */
4896 /**
4897  * Get marked file clsest to the given position.
4898  *
4899  * @param panel WPanel object
4900  * @param curent_file a staring position to get current or closest next marked file. If there are
4901  *                    no marked files in @panel, @panel->current is used.
4902  *
4903  * @return pointer to the name of find file or NULL if no file found or @current_file is out of
4904  * range.
4905  */
4906 
4907 const GString *
4908 panel_get_marked_file (const WPanel *panel, int *current_file)
     /* [previous][next][first][last][top][bottom][index][help]  */
4909 {
4910     const file_entry_t *fe;
4911 
4912     if (panel->marked != 0)
4913         return panel_find_marked_file (panel, current_file);
4914 
4915     fe = panel_current_entry (panel);
4916 
4917     return (fe == NULL ? NULL : fe->fname);
4918 }
4919 
4920 /* --------------------------------------------------------------------------------------------- */
4921 
4922 void
4923 panel_re_sort (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4924 {
4925     char *filename;
4926     const file_entry_t *fe;
4927     int i;
4928 
4929     if (panel == NULL)
4930         return;
4931 
4932     fe = panel_current_entry (panel);
4933     if (fe == NULL)
4934         return;
4935 
4936     filename = g_strndup (fe->fname->str, fe->fname->len);
4937     unselect_item (panel);
4938     dir_list_sort (&panel->dir, panel->sort_field->sort_routine, &panel->sort_info);
4939     panel->current = -1;
4940 
4941     for (i = panel->dir.len; i != 0; i--)
4942         if (strcmp (panel->dir.list[i - 1].fname->str, filename) == 0)
4943         {
4944             panel->current = i - 1;
4945             break;
4946         }
4947 
4948     g_free (filename);
4949     panel->top = panel->current - panel_items (panel) / 2;
4950     select_item (panel);
4951     panel->dirty = TRUE;
4952 }
4953 
4954 /* --------------------------------------------------------------------------------------------- */
4955 
4956 void
4957 panel_set_sort_order (WPanel *panel, const panel_field_t *sort_order)
     /* [previous][next][first][last][top][bottom][index][help]  */
4958 {
4959     if (sort_order == NULL)
4960         return;
4961 
4962     panel->sort_field = sort_order;
4963 
4964     // The directory is already sorted, we have to load the unsorted stuff
4965     if (sort_order->sort_routine == (GCompareFunc) unsorted)
4966     {
4967         const file_entry_t *fe;
4968         char *current_file = NULL;
4969 
4970         fe = panel_current_entry (panel);
4971         if (fe != NULL)
4972             current_file = g_strndup (fe->fname->str, fe->fname->len);
4973         panel_reload (panel);
4974         panel_set_current_by_name (panel, current_file);
4975         g_free (current_file);
4976     }
4977     panel_re_sort (panel);
4978 }
4979 
4980 /* --------------------------------------------------------------------------------------------- */
4981 /**
4982  * Change panel encoding.
4983  * @param panel WPanel object
4984  */
4985 
4986 void
4987 panel_change_encoding (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
4988 {
4989     const char *encoding = NULL;
4990     char *errmsg;
4991 
4992     const int r = select_charset (-1, -1, panel->codepage);
4993 
4994     if (r == SELECT_CHARSET_CANCEL)
4995         return;  // Cancel
4996 
4997     panel->codepage = r;
4998 
4999     if (panel->codepage == SELECT_CHARSET_NO_TRANSLATE)
5000     {
5001         // No translation
5002         vfs_path_t *cd_path_vpath;
5003 
5004         g_free (init_translation_table (mc_global.display_codepage, mc_global.display_codepage));
5005         cd_path_vpath = remove_encoding_from_path (panel->cwd_vpath);
5006         panel_do_cd (panel, cd_path_vpath, cd_parse_command);
5007         show_dir (panel);
5008         vfs_path_free (cd_path_vpath, TRUE);
5009         return;
5010     }
5011 
5012     errmsg = init_translation_table (panel->codepage, mc_global.display_codepage);
5013     if (errmsg != NULL)
5014     {
5015         message (D_ERROR, MSG_ERROR, "%s", errmsg);
5016         g_free (errmsg);
5017         return;
5018     }
5019 
5020     encoding = get_codepage_id (panel->codepage);
5021     if (encoding != NULL)
5022     {
5023         vfs_path_change_encoding (panel->cwd_vpath, encoding);
5024 
5025         if (!panel_do_cd (panel, panel->cwd_vpath, cd_parse_command))
5026             cd_error_message (vfs_path_as_str (panel->cwd_vpath));
5027     }
5028 }
5029 
5030 /* --------------------------------------------------------------------------------------------- */
5031 
5032 /**
5033  * Remove encode info from last path element.
5034  *
5035  */
5036 vfs_path_t *
5037 remove_encoding_from_path (const vfs_path_t *vpath)
     /* [previous][next][first][last][top][bottom][index][help]  */
5038 {
5039     vfs_path_t *ret_vpath;
5040     GString *tmp_conv;
5041     int indx;
5042 
5043     ret_vpath = vfs_path_new (FALSE);
5044 
5045     tmp_conv = g_string_new ("");
5046 
5047     for (indx = 0; indx < vfs_path_elements_count (vpath); indx++)
5048     {
5049         GIConv converter;
5050         vfs_path_element_t *path_element;
5051 
5052         path_element = vfs_path_element_clone (vfs_path_get_by_index (vpath, indx));
5053 
5054         if (path_element->encoding == NULL)
5055         {
5056             vfs_path_add_element (ret_vpath, path_element);
5057             continue;
5058         }
5059 
5060         converter = str_crt_conv_to (path_element->encoding);
5061         if (converter == INVALID_CONV)
5062         {
5063             vfs_path_add_element (ret_vpath, path_element);
5064             continue;
5065         }
5066 
5067         MC_PTR_FREE (path_element->encoding);
5068 
5069         str_vfs_convert_from (converter, path_element->path, tmp_conv);
5070 
5071         g_free (path_element->path);
5072         path_element->path = g_strndup (tmp_conv->str, tmp_conv->len);
5073 
5074         g_string_set_size (tmp_conv, 0);
5075 
5076         str_close_conv (converter);
5077         str_close_conv (path_element->dir.converter);
5078         path_element->dir.converter = INVALID_CONV;
5079         vfs_path_add_element (ret_vpath, path_element);
5080     }
5081     g_string_free (tmp_conv, TRUE);
5082     return ret_vpath;
5083 }
5084 
5085 /* --------------------------------------------------------------------------------------------- */
5086 
5087 /**
5088  * This routine reloads the directory in both panels. It tries to
5089  * select current_file in current_panel and other_file in other_panel.
5090  * If current_file == -1 then it automatically sets current_file and
5091  * other_file to the current files in the panels.
5092  *
5093  * If flags has the UP_ONLY_CURRENT bit toggled on, then it
5094  * will not reload the other panel.
5095  *
5096  * @param flags for reload panel
5097  * @param current_file name of the current file
5098  */
5099 
5100 void
5101 update_panels (panel_update_flags_t flags, const char *current_file)
     /* [previous][next][first][last][top][bottom][index][help]  */
5102 {
5103     WPanel *panel;
5104 
5105     // first, update other panel...
5106     if ((flags & UP_ONLY_CURRENT) == 0)
5107         update_one_panel (get_other_index (), flags, UP_KEEPSEL);
5108     // ...then current one
5109     update_one_panel (get_current_index (), flags, current_file);
5110 
5111     if (get_current_type () == view_listing)
5112         panel = PANEL (get_panel_widget (get_current_index ()));
5113     else
5114         panel = PANEL (get_panel_widget (get_other_index ()));
5115 
5116     if (!panel->is_panelized)
5117         (void) mc_chdir (panel->cwd_vpath);
5118 }
5119 
5120 /* --------------------------------------------------------------------------------------------- */
5121 
5122 gsize
5123 panel_get_num_of_sortable_fields (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
5124 {
5125     gsize ret = 0, lc_index;
5126 
5127     for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
5128         if (panel_fields[lc_index].is_user_choice)
5129             ret++;
5130     return ret;
5131 }
5132 
5133 /* --------------------------------------------------------------------------------------------- */
5134 
5135 char **
5136 panel_get_sortable_fields (gsize *array_size)
     /* [previous][next][first][last][top][bottom][index][help]  */
5137 {
5138     char **ret;
5139     gsize lc_index, i;
5140 
5141     lc_index = panel_get_num_of_sortable_fields ();
5142 
5143     ret = g_try_new0 (char *, lc_index + 1);
5144     if (ret == NULL)
5145         return NULL;
5146 
5147     if (array_size != NULL)
5148         *array_size = lc_index;
5149 
5150     lc_index = 0;
5151 
5152     for (i = 0; panel_fields[i].id != NULL; i++)
5153         if (panel_fields[i].is_user_choice)
5154             ret[lc_index++] = g_strdup (_ (panel_fields[i].title_hotkey));
5155 
5156     return ret;
5157 }
5158 
5159 /* --------------------------------------------------------------------------------------------- */
5160 
5161 const panel_field_t *
5162 panel_get_field_by_id (const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
5163 {
5164     gsize lc_index;
5165 
5166     for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
5167         if (panel_fields[lc_index].id != NULL && strcmp (name, panel_fields[lc_index].id) == 0)
5168             return &panel_fields[lc_index];
5169 
5170     return NULL;
5171 }
5172 
5173 /* --------------------------------------------------------------------------------------------- */
5174 
5175 const panel_field_t *
5176 panel_get_field_by_title_hotkey (const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
5177 {
5178     gsize lc_index;
5179 
5180     for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
5181         if (panel_fields[lc_index].title_hotkey != NULL
5182             && strcmp (name, _ (panel_fields[lc_index].title_hotkey)) == 0)
5183             return &panel_fields[lc_index];
5184 
5185     return NULL;
5186 }
5187 
5188 /* --------------------------------------------------------------------------------------------- */
5189 
5190 const panel_field_t *
5191 panel_get_field_by_title (const char *name)
     /* [previous][next][first][last][top][bottom][index][help]  */
5192 {
5193     gsize lc_index;
5194 
5195     for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
5196     {
5197         const char *title;
5198 
5199         title = panel_get_title_without_hotkey (panel_fields[lc_index].title_hotkey);
5200         if (strcmp (title, name) == 0)
5201             return &panel_fields[lc_index];
5202     }
5203 
5204     return NULL;
5205 }
5206 
5207 /* --------------------------------------------------------------------------------------------- */
5208 
5209 gsize
5210 panel_get_num_of_user_possible_fields (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
5211 {
5212     gsize ret = 0, lc_index;
5213 
5214     for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
5215         if (panel_fields[lc_index].use_in_user_format)
5216             ret++;
5217 
5218     return ret;
5219 }
5220 
5221 /* --------------------------------------------------------------------------------------------- */
5222 
5223 char **
5224 panel_get_user_possible_fields (gsize *array_size)
     /* [previous][next][first][last][top][bottom][index][help]  */
5225 {
5226     char **ret;
5227     gsize lc_index, i;
5228 
5229     lc_index = panel_get_num_of_user_possible_fields ();
5230 
5231     ret = g_try_new0 (char *, lc_index + 1);
5232     if (ret == NULL)
5233         return NULL;
5234 
5235     if (array_size != NULL)
5236         *array_size = lc_index;
5237 
5238     lc_index = 0;
5239 
5240     for (i = 0; panel_fields[i].id != NULL; i++)
5241         if (panel_fields[i].use_in_user_format)
5242             ret[lc_index++] = g_strdup (_ (panel_fields[i].title_hotkey));
5243 
5244     return ret;
5245 }
5246 
5247 /* --------------------------------------------------------------------------------------------- */
5248 
5249 /**
5250  * Restores the contents of the panel from a snapshot previously saved by
5251  * panel_panelize_save()
5252  */
5253 void
5254 panel_panelize_restore (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
5255 {
5256     WPanel *panel;
5257     int i;
5258     dir_list *list;
5259     panelized_descr_t *pdescr;
5260     dir_list *plist;
5261     gboolean panelized_same;
5262 
5263     if (!SELECTED_IS_PANEL)
5264         create_panel (MENU_PANEL_IDX, view_listing);
5265 
5266     panel = PANEL (get_panel_widget (MENU_PANEL_IDX));
5267 
5268     dir_list_clean (&panel->dir);
5269 
5270     if (panel->panelized_descr == NULL)
5271         panel->panelized_descr = panelized_descr_new ();
5272 
5273     pdescr = panel->panelized_descr;
5274     plist = &pdescr->list;
5275 
5276     if (pdescr->root_vpath == NULL)
5277         panel_panelize_change_root (panel, panel->cwd_vpath);
5278 
5279     if (plist->len < 1)
5280         dir_list_init (plist);
5281     else if (plist->len > panel->dir.size)
5282         dir_list_grow (&panel->dir, plist->len - panel->dir.size);
5283 
5284     list = &panel->dir;
5285     list->len = plist->len;
5286 
5287     panelized_same = vfs_path_equal (pdescr->root_vpath, panel->cwd_vpath);
5288 
5289     for (i = 0; i < plist->len; i++)
5290     {
5291         if (panelized_same || DIR_IS_DOTDOT (plist->list[i].fname->str))
5292             list->list[i].fname = mc_g_string_dup (plist->list[i].fname);
5293         else
5294         {
5295             vfs_path_t *tmp_vpath;
5296 
5297             tmp_vpath =
5298                 vfs_path_append_new (pdescr->root_vpath, plist->list[i].fname->str, (char *) NULL);
5299             list->list[i].fname = g_string_new_take (vfs_path_free (tmp_vpath, FALSE));
5300         }
5301         list->list[i].f.link_to_dir = plist->list[i].f.link_to_dir;
5302         list->list[i].f.stale_link = plist->list[i].f.stale_link;
5303         list->list[i].f.dir_size_computed = plist->list[i].f.dir_size_computed;
5304         list->list[i].f.marked = plist->list[i].f.marked;
5305         list->list[i].st = plist->list[i].st;
5306         list->list[i].name_sort_key = plist->list[i].name_sort_key;
5307         list->list[i].extension_sort_key = plist->list[i].extension_sort_key;
5308     }
5309 
5310     panel->is_panelized = TRUE;
5311     panel_panelize_absolutize_if_needed (panel);
5312 
5313     panel_set_current_by_name (panel, NULL);
5314 }
5315 
5316 /* --------------------------------------------------------------------------------------------- */
5317 
5318 /**
5319  * Change root directory of panelized content.
5320  * @param panel file panel
5321  * @param new_root new path
5322  */
5323 void
5324 panel_panelize_change_root (WPanel *panel, const vfs_path_t *new_root)
     /* [previous][next][first][last][top][bottom][index][help]  */
5325 {
5326     if (panel->panelized_descr == NULL)
5327         panel->panelized_descr = panelized_descr_new ();
5328     else
5329         vfs_path_free (panel->panelized_descr->root_vpath, TRUE);
5330 
5331     panel->panelized_descr->root_vpath = vfs_path_clone (new_root);
5332 }
5333 
5334 /* --------------------------------------------------------------------------------------------- */
5335 
5336 /**
5337  * Conditionally switches a panel's directory to "/" (root).
5338  *
5339  * If a panelized panel's listing contain absolute paths, this function
5340  * sets the panel's directory to "/". Otherwise it does nothing.
5341  *
5342  * Rationale:
5343  *
5344  * This makes tokenized strings like "%d/%p" work. This also makes other
5345  * places work where such naive concatenation is done in code (e.g., when
5346  * pressing ctrl+shift+enter, for CK_PutCurrentFullSelected).
5347  *
5348  * When to call:
5349  *
5350  * You should always call this function after you populate the listing
5351  * of a panelized panel.
5352  */
5353 void
5354 panel_panelize_absolutize_if_needed (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
5355 {
5356     const dir_list *const list = &panel->dir;
5357 
5358     /* Note: We don't support mixing of absolute and relative paths, which is
5359      * why it's ok for us to check only the 1st entry. */
5360     if (list->len > 1 && g_path_is_absolute (list->list[1].fname->str))
5361     {
5362         vfs_path_t *root;
5363 
5364         root = vfs_path_from_str (PATH_SEP_STR);
5365         panel_set_cwd (panel, root);
5366         if (panel == current_panel)
5367             mc_chdir (root);
5368         vfs_path_free (root, TRUE);
5369     }
5370 }
5371 
5372 /* --------------------------------------------------------------------------------------------- */
5373 
5374 /**
5375  * Saves the contents of the panel into a snapshot, so it may be restored later
5376  * by panel_panelize_restore().
5377  */
5378 void
5379 panel_panelize_save (WPanel *panel)
     /* [previous][next][first][last][top][bottom][index][help]  */
5380 {
5381     int i;
5382     dir_list *list = &panel->dir;
5383     dir_list *plist;
5384 
5385     panel_panelize_change_root (panel, panel->cwd_vpath);
5386 
5387     plist = &panel->panelized_descr->list;
5388 
5389     if (plist->len > 0)
5390         dir_list_clean (plist);
5391     if (panel->dir.len == 0)
5392         return;
5393 
5394     if (panel->dir.len > plist->size)
5395         dir_list_grow (plist, panel->dir.len - plist->size);
5396     plist->len = panel->dir.len;
5397 
5398     for (i = 0; i < panel->dir.len; i++)
5399     {
5400         plist->list[i].fname = mc_g_string_dup (list->list[i].fname);
5401         plist->list[i].f.link_to_dir = list->list[i].f.link_to_dir;
5402         plist->list[i].f.stale_link = list->list[i].f.stale_link;
5403         plist->list[i].f.dir_size_computed = list->list[i].f.dir_size_computed;
5404         plist->list[i].f.marked = list->list[i].f.marked;
5405         plist->list[i].st = list->list[i].st;
5406         plist->list[i].name_sort_key = list->list[i].name_sort_key;
5407         plist->list[i].extension_sort_key = list->list[i].extension_sort_key;
5408     }
5409 }
5410 
5411 /* --------------------------------------------------------------------------------------------- */
5412 
5413 void
5414 panel_init (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
5415 {
5416     panel_sort_up_char = mc_skin_get ("widget-panel", "sort-up-char", "'");
5417     panel_sort_down_char = mc_skin_get ("widget-panel", "sort-down-char", ".");
5418     panel_hiddenfiles_show_char = mc_skin_get ("widget-panel", "hiddenfiles-show-char", ".");
5419     panel_hiddenfiles_hide_char = mc_skin_get ("widget-panel", "hiddenfiles-hide-char", ".");
5420     panel_history_prev_item_char = mc_skin_get ("widget-panel", "history-prev-item-char", "<");
5421     panel_history_next_item_char = mc_skin_get ("widget-panel", "history-next-item-char", ">");
5422     panel_history_show_list_char = mc_skin_get ("widget-panel", "history-show-list-char", "^");
5423     panel_filename_scroll_left_char =
5424         mc_skin_get ("widget-panel", "filename-scroll-left-char", "{");
5425     panel_filename_scroll_right_char =
5426         mc_skin_get ("widget-panel", "filename-scroll-right-char", "}");
5427 
5428     string_file_name_buffer = g_string_sized_new (MC_MAXFILENAMELEN);
5429 
5430     mc_event_add (MCEVENT_GROUP_FILEMANAGER, "update_panels", event_update_panels, NULL, NULL);
5431     mc_event_add (MCEVENT_GROUP_FILEMANAGER, "panel_save_current_file_to_clip_file",
5432                   panel_save_current_file_to_clip_file, NULL, NULL);
5433 }
5434 
5435 /* --------------------------------------------------------------------------------------------- */
5436 
5437 void
5438 panel_deinit (void)
     /* [previous][next][first][last][top][bottom][index][help]  */
5439 {
5440     g_free (panel_sort_up_char);
5441     g_free (panel_sort_down_char);
5442     g_free (panel_hiddenfiles_show_char);
5443     g_free (panel_hiddenfiles_hide_char);
5444     g_free (panel_history_prev_item_char);
5445     g_free (panel_history_next_item_char);
5446     g_free (panel_history_show_list_char);
5447     g_free (panel_filename_scroll_left_char);
5448     g_free (panel_filename_scroll_right_char);
5449     g_string_free (string_file_name_buffer, TRUE);
5450 }
5451 
5452 /* --------------------------------------------------------------------------------------------- */
5453 
5454 gboolean
5455 panel_cd (WPanel *panel, const vfs_path_t *new_dir_vpath, enum cd_enum exact)
     /* [previous][next][first][last][top][bottom][index][help]  */
5456 {
5457     gboolean res;
5458     const vfs_path_t *_new_dir_vpath = new_dir_vpath;
5459 
5460     if (panel->is_panelized)
5461     {
5462         size_t new_vpath_len;
5463 
5464         new_vpath_len = vfs_path_len (new_dir_vpath);
5465         if (vfs_path_equal_len (new_dir_vpath, panel->panelized_descr->root_vpath, new_vpath_len))
5466             _new_dir_vpath = panel->panelized_descr->root_vpath;
5467     }
5468 
5469     res = panel_do_cd (panel, _new_dir_vpath, exact);
5470 
5471     if (res)
5472     {
5473         const vfs_path_element_t *path_element;
5474 
5475         path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
5476         if (path_element->encoding != NULL)
5477             panel->codepage = get_codepage_index (path_element->encoding);
5478         else
5479             panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
5480     }
5481 
5482     return res;
5483 }
5484 
5485 /* --------------------------------------------------------------------------------------------- */

/* [previous][next][first][last][top][bottom][index][help]  */