Adding upstream version 3:4.8.30.upstream/3%4.8.30

Signed-off-by: Daniel Baumann <daniel.baumann@progress-linux.org>

46 files changed, 34065 insertions, 0 deletions

diff --git a/src/filemanager/Makefile.am b/src/filemanager/Makefile.am
new file mode 100644
index 0000000..534d8dc
--- /dev/null
+++ b/src/filemanager/Makefile.am
@@ -0,0 +1,40 @@
+
+noinst_LTLIBRARIES = libmcfilemanager.la
+
+libmcfilemanager_la_SOURCES = \
+	achown.c \
+	boxes.c boxes.h \
+	cd.c cd.h \
+	chmod.c \
+	chown.c \
+	cmd.c cmd.h \
+	command.c command.h \
+	dir.c dir.h \
+	ext.c ext.h \
+	file.c file.h \
+	filegui.c filegui.h \
+	filemanager.h filemanager.c \
+	filenot.c filenot.h \
+	fileopctx.c fileopctx.h \
+	find.c \
+	hotlist.c hotlist.h \
+	info.c info.h \
+	ioblksize.h \
+	layout.c layout.h \
+	mountlist.c mountlist.h \
+	panelize.c panelize.h \
+	panel.c panel.h \
+	tree.c tree.h \
+	treestore.c treestore.h
+
+# Unmaintained, unsupported, etc
+#	listmode.c listmode.h
+
+AM_CPPFLAGS = -I$(top_srcdir) $(GLIB_CFLAGS)
+
+if ENABLE_EXT2FS_ATTR
+libmcfilemanager_la_SOURCES += \
+	chattr.c
+
+AM_CPPFLAGS += @EXT2FS_CFLAGS@ @E2P_CFLAGS@
+endif
diff --git a/src/filemanager/Makefile.in b/src/filemanager/Makefile.in
new file mode 100644
index 0000000..2e1300b
--- /dev/null
+++ b/src/filemanager/Makefile.in
@@ -0,0 +1,839 @@
+# Makefile.in generated by automake 1.16.5 from Makefile.am.
+# @configure_input@
+
+# Copyright (C) 1994-2021 Free Software Foundation, Inc.
+
+# This Makefile.in is free software; the Free Software Foundation
+# gives unlimited permission to copy and/or distribute it,
+# with or without modifications, as long as this notice is preserved.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY, to the extent permitted by law; without
+# even the implied warranty of MERCHANTABILITY or FITNESS FOR A
+# PARTICULAR PURPOSE.
+
+@SET_MAKE@
+
+VPATH = @srcdir@
+am__is_gnu_make = { \
+  if test -z '$(MAKELEVEL)'; then \
+    false; \
+  elif test -n '$(MAKE_HOST)'; then \
+    true; \
+  elif test -n '$(MAKE_VERSION)' && test -n '$(CURDIR)'; then \
+    true; \
+  else \
+    false; \
+  fi; \
+}
+am__make_running_with_option = \
+  case $${target_option-} in \
+      ?) ;; \
+      *) echo "am__make_running_with_option: internal error: invalid" \
+              "target option '$${target_option-}' specified" >&2; \
+         exit 1;; \
+  esac; \
+  has_opt=no; \
+  sane_makeflags=$$MAKEFLAGS; \
+  if $(am__is_gnu_make); then \
+    sane_makeflags=$$MFLAGS; \
+  else \
+    case $$MAKEFLAGS in \
+      *\\[\ \	]*) \
+        bs=\\; \
+        sane_makeflags=`printf '%s\n' "$$MAKEFLAGS" \
+          | sed "s/$$bs$$bs[$$bs $$bs	]*//g"`;; \
+    esac; \
+  fi; \
+  skip_next=no; \
+  strip_trailopt () \
+  { \
+    flg=`printf '%s\n' "$$flg" | sed "s/$$1.*$$//"`; \
+  }; \
+  for flg in $$sane_makeflags; do \
+    test $$skip_next = yes && { skip_next=no; continue; }; \
+    case $$flg in \
+      *=*|--*) continue;; \
+        -*I) strip_trailopt 'I'; skip_next=yes;; \
+      -*I?*) strip_trailopt 'I';; \
+        -*O) strip_trailopt 'O'; skip_next=yes;; \
+      -*O?*) strip_trailopt 'O';; \
+        -*l) strip_trailopt 'l'; skip_next=yes;; \
+      -*l?*) strip_trailopt 'l';; \
+      -[dEDm]) skip_next=yes;; \
+      -[JT]) skip_next=yes;; \
+    esac; \
+    case $$flg in \
+      *$$target_option*) has_opt=yes; break;; \
+    esac; \
+  done; \
+  test $$has_opt = yes
+am__make_dryrun = (target_option=n; $(am__make_running_with_option))
+am__make_keepgoing = (target_option=k; $(am__make_running_with_option))
+pkgdatadir = $(datadir)/@PACKAGE@
+pkgincludedir = $(includedir)/@PACKAGE@
+pkglibdir = $(libdir)/@PACKAGE@
+pkglibexecdir = $(libexecdir)/@PACKAGE@
+am__cd = CDPATH="$${ZSH_VERSION+.}$(PATH_SEPARATOR)" && cd
+install_sh_DATA = $(install_sh) -c -m 644
+install_sh_PROGRAM = $(install_sh) -c
+install_sh_SCRIPT = $(install_sh) -c
+INSTALL_HEADER = $(INSTALL_DATA)
+transform = $(program_transform_name)
+NORMAL_INSTALL = :
+PRE_INSTALL = :
+POST_INSTALL = :
+NORMAL_UNINSTALL = :
+PRE_UNINSTALL = :
+POST_UNINSTALL = :
+build_triplet = @build@
+host_triplet = @host@
+@ENABLE_EXT2FS_ATTR_TRUE@am__append_1 = \
+@ENABLE_EXT2FS_ATTR_TRUE@	chattr.c
+
+@ENABLE_EXT2FS_ATTR_TRUE@am__append_2 = @EXT2FS_CFLAGS@ @E2P_CFLAGS@
+subdir = src/filemanager
+ACLOCAL_M4 = $(top_srcdir)/aclocal.m4
+am__aclocal_m4_deps = $(top_srcdir)/m4/gettext.m4 \
+	$(top_srcdir)/m4/iconv.m4 $(top_srcdir)/m4/intlmacosx.m4 \
+	$(top_srcdir)/m4/lib-ld.m4 $(top_srcdir)/m4/lib-link.m4 \
+	$(top_srcdir)/m4/lib-prefix.m4 $(top_srcdir)/m4/libtool.m4 \
+	$(top_srcdir)/m4/longlong.m4 $(top_srcdir)/m4/ltoptions.m4 \
+	$(top_srcdir)/m4/ltsugar.m4 $(top_srcdir)/m4/ltversion.m4 \
+	$(top_srcdir)/m4/lt~obsolete.m4 $(top_srcdir)/m4/nls.m4 \
+	$(top_srcdir)/m4/po.m4 $(top_srcdir)/m4/progtest.m4 \
+	$(top_srcdir)/acinclude.m4 \
+	$(top_srcdir)/m4.include/gnulib/mode_t.m4 \
+	$(top_srcdir)/m4.include/gnulib/stat-size.m4 \
+	$(top_srcdir)/m4.include/gnulib/fstypename.m4 \
+	$(top_srcdir)/m4.include/gnulib/fsusage.m4 \
+	$(top_srcdir)/m4.include/gnulib/mountlist.m4 \
+	$(top_srcdir)/m4.include/gnulib/windows-stat-inodes.m4 \
+	$(top_srcdir)/m4.include/gnulib/sys_types_h.m4 \
+	$(top_srcdir)/m4.include/ax_path_lib_pcre.m4 \
+	$(top_srcdir)/m4.include/ax_check_pcre2.m4 \
+	$(top_srcdir)/m4.include/dx_doxygen.m4 \
+	$(top_srcdir)/m4.include/ax_require_defined.m4 \
+	$(top_srcdir)/m4.include/ax_check_compile_flag.m4 \
+	$(top_srcdir)/m4.include/ax_append_flag.m4 \
+	$(top_srcdir)/m4.include/ax_append_compile_flags.m4 \
+	$(top_srcdir)/m4.include/mc-cflags.m4 \
+	$(top_srcdir)/m4.include/ax_gcc_func_attribute.m4 \
+	$(top_srcdir)/m4.include/mc-check-search-type.m4 \
+	$(top_srcdir)/m4.include/mc-get-fs-info.m4 \
+	$(top_srcdir)/m4.include/mc-with-x.m4 \
+	$(top_srcdir)/m4.include/mc-use-termcap.m4 \
+	$(top_srcdir)/m4.include/mc-with-screen.m4 \
+	$(top_srcdir)/m4.include/mc-with-screen-ncurses.m4 \
+	$(top_srcdir)/m4.include/mc-with-screen-slang.m4 \
+	$(top_srcdir)/m4.include/mc-with-internal-edit.m4 \
+	$(top_srcdir)/m4.include/mc-subshell.m4 \
+	$(top_srcdir)/m4.include/mc-background.m4 \
+	$(top_srcdir)/m4.include/mc-ext2fs-attr.m4 \
+	$(top_srcdir)/m4.include/mc-glib.m4 \
+	$(top_srcdir)/m4.include/mc-vfs.m4 \
+	$(top_srcdir)/m4.include/vfs/rpc.m4 \
+	$(top_srcdir)/m4.include/vfs/socket.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-extfs.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-sfs.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-ftp.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-sftp.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-fish.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-undelfs.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-tarfs.m4 \
+	$(top_srcdir)/m4.include/vfs/mc-vfs-cpiofs.m4 \
+	$(top_srcdir)/m4.include/mc-version.m4 \
+	$(top_srcdir)/m4.include/mc-tests.m4 \
+	$(top_srcdir)/m4.include/mc-i18n.m4 \
+	$(top_srcdir)/m4.include/mc-assert.m4 \
+	$(top_srcdir)/configure.ac
+am__configure_deps = $(am__aclocal_m4_deps) $(CONFIGURE_DEPENDENCIES) \
+	$(ACLOCAL_M4)
+DIST_COMMON = $(srcdir)/Makefile.am $(am__DIST_COMMON)
+mkinstalldirs = $(install_sh) -d
+CONFIG_HEADER = $(top_builddir)/config.h
+CONFIG_CLEAN_FILES =
+CONFIG_CLEAN_VPATH_FILES =
+LTLIBRARIES = $(noinst_LTLIBRARIES)
+libmcfilemanager_la_LIBADD =
+am__libmcfilemanager_la_SOURCES_DIST = achown.c boxes.c boxes.h cd.c \
+	cd.h chmod.c chown.c cmd.c cmd.h command.c command.h dir.c \
+	dir.h ext.c ext.h file.c file.h filegui.c filegui.h \
+	filemanager.h filemanager.c filenot.c filenot.h fileopctx.c \
+	fileopctx.h find.c hotlist.c hotlist.h info.c info.h \
+	ioblksize.h layout.c layout.h mountlist.c mountlist.h \
+	panelize.c panelize.h panel.c panel.h tree.c tree.h \
+	treestore.c treestore.h chattr.c
+@ENABLE_EXT2FS_ATTR_TRUE@am__objects_1 = chattr.lo
+am_libmcfilemanager_la_OBJECTS = achown.lo boxes.lo cd.lo chmod.lo \
+	chown.lo cmd.lo command.lo dir.lo ext.lo file.lo filegui.lo \
+	filemanager.lo filenot.lo fileopctx.lo find.lo hotlist.lo \
+	info.lo layout.lo mountlist.lo panelize.lo panel.lo tree.lo \
+	treestore.lo $(am__objects_1)
+libmcfilemanager_la_OBJECTS = $(am_libmcfilemanager_la_OBJECTS)
+AM_V_lt = $(am__v_lt_@AM_V@)
+am__v_lt_ = $(am__v_lt_@AM_DEFAULT_V@)
+am__v_lt_0 = --silent
+am__v_lt_1 = 
+AM_V_P = $(am__v_P_@AM_V@)
+am__v_P_ = $(am__v_P_@AM_DEFAULT_V@)
+am__v_P_0 = false
+am__v_P_1 = :
+AM_V_GEN = $(am__v_GEN_@AM_V@)
+am__v_GEN_ = $(am__v_GEN_@AM_DEFAULT_V@)
+am__v_GEN_0 = @echo "  GEN     " $@;
+am__v_GEN_1 = 
+AM_V_at = $(am__v_at_@AM_V@)
+am__v_at_ = $(am__v_at_@AM_DEFAULT_V@)
+am__v_at_0 = @
+am__v_at_1 = 
+DEFAULT_INCLUDES = -I.@am__isrc@ -I$(top_builddir)
+depcomp = $(SHELL) $(top_srcdir)/config/depcomp
+am__maybe_remake_depfiles = depfiles
+am__depfiles_remade = ./$(DEPDIR)/achown.Plo ./$(DEPDIR)/boxes.Plo \
+	./$(DEPDIR)/cd.Plo ./$(DEPDIR)/chattr.Plo \
+	./$(DEPDIR)/chmod.Plo ./$(DEPDIR)/chown.Plo \
+	./$(DEPDIR)/cmd.Plo ./$(DEPDIR)/command.Plo \
+	./$(DEPDIR)/dir.Plo ./$(DEPDIR)/ext.Plo ./$(DEPDIR)/file.Plo \
+	./$(DEPDIR)/filegui.Plo ./$(DEPDIR)/filemanager.Plo \
+	./$(DEPDIR)/filenot.Plo ./$(DEPDIR)/fileopctx.Plo \
+	./$(DEPDIR)/find.Plo ./$(DEPDIR)/hotlist.Plo \
+	./$(DEPDIR)/info.Plo ./$(DEPDIR)/layout.Plo \
+	./$(DEPDIR)/mountlist.Plo ./$(DEPDIR)/panel.Plo \
+	./$(DEPDIR)/panelize.Plo ./$(DEPDIR)/tree.Plo \
+	./$(DEPDIR)/treestore.Plo
+am__mv = mv -f
+COMPILE = $(CC) $(DEFS) $(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) \
+	$(CPPFLAGS) $(AM_CFLAGS) $(CFLAGS)
+LTCOMPILE = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
+	$(LIBTOOLFLAGS) --mode=compile $(CC) $(DEFS) \
+	$(DEFAULT_INCLUDES) $(INCLUDES) $(AM_CPPFLAGS) $(CPPFLAGS) \
+	$(AM_CFLAGS) $(CFLAGS)
+AM_V_CC = $(am__v_CC_@AM_V@)
+am__v_CC_ = $(am__v_CC_@AM_DEFAULT_V@)
+am__v_CC_0 = @echo "  CC      " $@;
+am__v_CC_1 = 
+CCLD = $(CC)
+LINK = $(LIBTOOL) $(AM_V_lt) --tag=CC $(AM_LIBTOOLFLAGS) \
+	$(LIBTOOLFLAGS) --mode=link $(CCLD) $(AM_CFLAGS) $(CFLAGS) \
+	$(AM_LDFLAGS) $(LDFLAGS) -o $@
+AM_V_CCLD = $(am__v_CCLD_@AM_V@)
+am__v_CCLD_ = $(am__v_CCLD_@AM_DEFAULT_V@)
+am__v_CCLD_0 = @echo "  CCLD    " $@;
+am__v_CCLD_1 = 
+SOURCES = $(libmcfilemanager_la_SOURCES)
+DIST_SOURCES = $(am__libmcfilemanager_la_SOURCES_DIST)
+am__can_run_installinfo = \
+  case $$AM_UPDATE_INFO_DIR in \
+    n|no|NO) false;; \
+    *) (install-info --version) >/dev/null 2>&1;; \
+  esac
+am__tagged_files = $(HEADERS) $(SOURCES) $(TAGS_FILES) $(LISP)
+# Read a list of newline-separated strings from the standard input,
+# and print each of them once, without duplicates.  Input order is
+# *not* preserved.
+am__uniquify_input = $(AWK) '\
+  BEGIN { nonempty = 0; } \
+  { items[$$0] = 1; nonempty = 1; } \
+  END { if (nonempty) { for (i in items) print i; }; } \
+'
+# Make sure the list of sources is unique.  This is necessary because,
+# e.g., the same source file might be shared among _SOURCES variables
+# for different programs/libraries.
+am__define_uniq_tagged_files = \
+  list='$(am__tagged_files)'; \
+  unique=`for i in $$list; do \
+    if test -f "$$i"; then echo $$i; else echo $(srcdir)/$$i; fi; \
+  done | $(am__uniquify_input)`
+am__DIST_COMMON = $(srcdir)/Makefile.in $(top_srcdir)/config/depcomp
+DISTFILES = $(DIST_COMMON) $(DIST_SOURCES) $(TEXINFOS) $(EXTRA_DIST)
+ACLOCAL = @ACLOCAL@
+AMTAR = @AMTAR@
+AM_DEFAULT_VERBOSITY = @AM_DEFAULT_VERBOSITY@
+AR = @AR@
+AUTOCONF = @AUTOCONF@
+AUTOHEADER = @AUTOHEADER@
+AUTOMAKE = @AUTOMAKE@
+AWK = @AWK@
+CC = @CC@
+CCDEPMODE = @CCDEPMODE@
+CFLAGS = @CFLAGS@
+CHECK_CFLAGS = @CHECK_CFLAGS@
+CHECK_LIBS = @CHECK_LIBS@
+COM_ERR_CFLAGS = @COM_ERR_CFLAGS@
+COM_ERR_LIBS = @COM_ERR_LIBS@
+CP1251 = @CP1251@
+CPP = @CPP@
+CPPFLAGS = @CPPFLAGS@
+CSCOPE = @CSCOPE@
+CTAGS = @CTAGS@
+CYGPATH_W = @CYGPATH_W@
+DEFS = @DEFS@
+DEPDIR = @DEPDIR@
+DLLTOOL = @DLLTOOL@
+DOC_LINGUAS = @DOC_LINGUAS@
+DOXYGEN_PAPER_SIZE = @DOXYGEN_PAPER_SIZE@
+DSYMUTIL = @DSYMUTIL@
+DUMPBIN = @DUMPBIN@
+DX_CONFIG = @DX_CONFIG@
+DX_DOCDIR = @DX_DOCDIR@
+DX_DOT = @DX_DOT@
+DX_DOXYGEN = @DX_DOXYGEN@
+DX_DVIPS = @DX_DVIPS@
+DX_EGREP = @DX_EGREP@
+DX_ENV = @DX_ENV@
+DX_FLAG_chi = @DX_FLAG_chi@
+DX_FLAG_chm = @DX_FLAG_chm@
+DX_FLAG_doc = @DX_FLAG_doc@
+DX_FLAG_dot = @DX_FLAG_dot@
+DX_FLAG_html = @DX_FLAG_html@
+DX_FLAG_man = @DX_FLAG_man@
+DX_FLAG_pdf = @DX_FLAG_pdf@
+DX_FLAG_ps = @DX_FLAG_ps@
+DX_FLAG_rtf = @DX_FLAG_rtf@
+DX_FLAG_xml = @DX_FLAG_xml@
+DX_HHC = @DX_HHC@
+DX_LATEX = @DX_LATEX@
+DX_MAKEINDEX = @DX_MAKEINDEX@
+DX_PDFLATEX = @DX_PDFLATEX@
+DX_PERL = @DX_PERL@
+DX_PROJECT = @DX_PROJECT@
+E2P_CFLAGS = @E2P_CFLAGS@
+E2P_LIBS = @E2P_LIBS@
+ECHO_C = @ECHO_C@
+ECHO_N = @ECHO_N@
+ECHO_T = @ECHO_T@
+EGREP = @EGREP@
+ETAGS = @ETAGS@
+EXEEXT = @EXEEXT@
+EXT2FS_CFLAGS = @EXT2FS_CFLAGS@
+EXT2FS_LIBS = @EXT2FS_LIBS@
+EXTHELPERSDIR = @EXTHELPERSDIR@
+FGREP = @FGREP@
+FILECMD = @FILECMD@
+GETTEXT_MACRO_VERSION = @GETTEXT_MACRO_VERSION@
+GLIB_CFLAGS = @GLIB_CFLAGS@
+GLIB_LIBS = @GLIB_LIBS@
+GMODULE_CFLAGS = @GMODULE_CFLAGS@
+GMODULE_LIBS = @GMODULE_LIBS@
+GMSGFMT = @GMSGFMT@
+GMSGFMT_015 = @GMSGFMT_015@
+GREP = @GREP@
+HAVE_FILECMD = @HAVE_FILECMD@
+HAVE_ZIPINFO = @HAVE_ZIPINFO@
+HAVE_nroff = @HAVE_nroff@
+INSTALL = @INSTALL@
+INSTALL_DATA = @INSTALL_DATA@
+INSTALL_PROGRAM = @INSTALL_PROGRAM@
+INSTALL_SCRIPT = @INSTALL_SCRIPT@
+INSTALL_STRIP_PROGRAM = @INSTALL_STRIP_PROGRAM@
+INTLLIBS = @INTLLIBS@
+INTL_MACOSX_LIBS = @INTL_MACOSX_LIBS@
+LD = @LD@
+LDFLAGS = @LDFLAGS@
+LIBICONV = @LIBICONV@
+LIBINTL = @LIBINTL@
+LIBMC_RELEASE = @LIBMC_RELEASE@
+LIBMC_VERSION = @LIBMC_VERSION@
+LIBOBJS = @LIBOBJS@
+LIBS = @LIBS@
+LIBSSH_CFLAGS = @LIBSSH_CFLAGS@
+LIBSSH_LIBS = @LIBSSH_LIBS@
+LIBTOOL = @LIBTOOL@
+LIPO = @LIPO@
+LN_S = @LN_S@
+LTLIBICONV = @LTLIBICONV@
+LTLIBINTL = @LTLIBINTL@
+LTLIBOBJS = @LTLIBOBJS@
+LT_SYS_LIBRARY_PATH = @LT_SYS_LIBRARY_PATH@
+MAINT = @MAINT@
+MAKEINFO = @MAKEINFO@
+MANDOC = @MANDOC@
+MANIFEST_TOOL = @MANIFEST_TOOL@
+MAN_DATE = @MAN_DATE@
+MAN_FLAGS = @MAN_FLAGS@
+MAN_VERSION = @MAN_VERSION@
+MCLIBS = @MCLIBS@
+MKDIR_P = @MKDIR_P@
+MSGFMT = @MSGFMT@
+MSGFMT_015 = @MSGFMT_015@
+MSGMERGE = @MSGMERGE@
+NM = @NM@
+NMEDIT = @NMEDIT@
+OBJDUMP = @OBJDUMP@
+OBJEXT = @OBJEXT@
+OTOOL = @OTOOL@
+OTOOL64 = @OTOOL64@
+PACKAGE = @PACKAGE@
+PACKAGE_BUGREPORT = @PACKAGE_BUGREPORT@
+PACKAGE_NAME = @PACKAGE_NAME@
+PACKAGE_STRING = @PACKAGE_STRING@
+PACKAGE_TARNAME = @PACKAGE_TARNAME@
+PACKAGE_URL = @PACKAGE_URL@
+PACKAGE_VERSION = @PACKAGE_VERSION@
+PATH_SEPARATOR = @PATH_SEPARATOR@
+PCRE_CFLAGS = @PCRE_CFLAGS@
+PCRE_LIBS = @PCRE_LIBS@
+PERL = @PERL@
+PERL_FOR_BUILD = @PERL_FOR_BUILD@
+PKG_CONFIG = @PKG_CONFIG@
+PKG_CONFIG_LIBDIR = @PKG_CONFIG_LIBDIR@
+PKG_CONFIG_PATH = @PKG_CONFIG_PATH@
+POSUB = @POSUB@
+PYTHON = @PYTHON@
+RANLIB = @RANLIB@
+RUBY = @RUBY@
+SED = @SED@
+SET_MAKE = @SET_MAKE@
+SHELL = @SHELL@
+SLANG_CFLAGS = @SLANG_CFLAGS@
+SLANG_LIBS = @SLANG_LIBS@
+STRIP = @STRIP@
+TESTS_LDFLAGS = @TESTS_LDFLAGS@
+UNZIP = @UNZIP@
+USE_NLS = @USE_NLS@
+VERSION = @VERSION@
+X11_WWW = @X11_WWW@
+XGETTEXT = @XGETTEXT@
+XGETTEXT_015 = @XGETTEXT_015@
+XGETTEXT_EXTRA_OPTIONS = @XGETTEXT_EXTRA_OPTIONS@
+XMKMF = @XMKMF@
+X_CFLAGS = @X_CFLAGS@
+X_EXTRA_LIBS = @X_EXTRA_LIBS@
+X_LIBS = @X_LIBS@
+X_PRE_LIBS = @X_PRE_LIBS@
+ZIP = @ZIP@
+abs_builddir = @abs_builddir@
+abs_srcdir = @abs_srcdir@
+abs_top_builddir = @abs_top_builddir@
+abs_top_srcdir = @abs_top_srcdir@
+ac_ct_AR = @ac_ct_AR@
+ac_ct_CC = @ac_ct_CC@
+ac_ct_DUMPBIN = @ac_ct_DUMPBIN@
+am__include = @am__include@
+am__leading_dot = @am__leading_dot@
+am__quote = @am__quote@
+am__tar = @am__tar@
+am__untar = @am__untar@
+bindir = @bindir@
+build = @build@
+build_alias = @build_alias@
+build_cpu = @build_cpu@
+build_os = @build_os@
+build_vendor = @build_vendor@
+builddir = @builddir@
+datadir = @datadir@
+datarootdir = @datarootdir@
+docdir = @docdir@
+dvidir = @dvidir@
+exec_prefix = @exec_prefix@
+host = @host@
+host_alias = @host_alias@
+host_cpu = @host_cpu@
+host_os = @host_os@
+host_vendor = @host_vendor@
+htmldir = @htmldir@
+includedir = @includedir@
+infodir = @infodir@
+install_sh = @install_sh@
+libdir = @libdir@
+libexecdir = @libexecdir@
+localedir = @localedir@
+localstatedir = @localstatedir@
+mandir = @mandir@
+mkdir_p = @mkdir_p@
+oldincludedir = @oldincludedir@
+pdfdir = @pdfdir@
+prefix = @prefix@
+program_transform_name = @program_transform_name@
+psdir = @psdir@
+runstatedir = @runstatedir@
+sbindir = @sbindir@
+sharedstatedir = @sharedstatedir@
+srcdir = @srcdir@
+sysconfdir = @sysconfdir@
+target_alias = @target_alias@
+top_build_prefix = @top_build_prefix@
+top_builddir = @top_builddir@
+top_srcdir = @top_srcdir@
+noinst_LTLIBRARIES = libmcfilemanager.la
+libmcfilemanager_la_SOURCES = achown.c boxes.c boxes.h cd.c cd.h \
+	chmod.c chown.c cmd.c cmd.h command.c command.h dir.c dir.h \
+	ext.c ext.h file.c file.h filegui.c filegui.h filemanager.h \
+	filemanager.c filenot.c filenot.h fileopctx.c fileopctx.h \
+	find.c hotlist.c hotlist.h info.c info.h ioblksize.h layout.c \
+	layout.h mountlist.c mountlist.h panelize.c panelize.h panel.c \
+	panel.h tree.c tree.h treestore.c treestore.h $(am__append_1)
+
+# Unmaintained, unsupported, etc
+#	listmode.c listmode.h
+AM_CPPFLAGS = -I$(top_srcdir) $(GLIB_CFLAGS) $(am__append_2)
+all: all-am
+
+.SUFFIXES:
+.SUFFIXES: .c .lo .o .obj
+$(srcdir)/Makefile.in: @MAINTAINER_MODE_TRUE@ $(srcdir)/Makefile.am  $(am__configure_deps)
+	@for dep in $?; do \
+	  case '$(am__configure_deps)' in \
+	    *$$dep*) \
+	      ( cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh ) \
+	        && { if test -f $@; then exit 0; else break; fi; }; \
+	      exit 1;; \
+	  esac; \
+	done; \
+	echo ' cd $(top_srcdir) && $(AUTOMAKE) --gnu src/filemanager/Makefile'; \
+	$(am__cd) $(top_srcdir) && \
+	  $(AUTOMAKE) --gnu src/filemanager/Makefile
+Makefile: $(srcdir)/Makefile.in $(top_builddir)/config.status
+	@case '$?' in \
+	  *config.status*) \
+	    cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh;; \
+	  *) \
+	    echo ' cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles)'; \
+	    cd $(top_builddir) && $(SHELL) ./config.status $(subdir)/$@ $(am__maybe_remake_depfiles);; \
+	esac;
+
+$(top_builddir)/config.status: $(top_srcdir)/configure $(CONFIG_STATUS_DEPENDENCIES)
+	cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+
+$(top_srcdir)/configure: @MAINTAINER_MODE_TRUE@ $(am__configure_deps)
+	cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(ACLOCAL_M4): @MAINTAINER_MODE_TRUE@ $(am__aclocal_m4_deps)
+	cd $(top_builddir) && $(MAKE) $(AM_MAKEFLAGS) am--refresh
+$(am__aclocal_m4_deps):
+
+clean-noinstLTLIBRARIES:
+	-test -z "$(noinst_LTLIBRARIES)" || rm -f $(noinst_LTLIBRARIES)
+	@list='$(noinst_LTLIBRARIES)'; \
+	locs=`for p in $$list; do echo $$p; done | \
+	      sed 's|^[^/]*$$|.|; s|/[^/]*$$||; s|$$|/so_locations|' | \
+	      sort -u`; \
+	test -z "$$locs" || { \
+	  echo rm -f $${locs}; \
+	  rm -f $${locs}; \
+	}
+
+libmcfilemanager.la: $(libmcfilemanager_la_OBJECTS) $(libmcfilemanager_la_DEPENDENCIES) $(EXTRA_libmcfilemanager_la_DEPENDENCIES) 
+	$(AM_V_CCLD)$(LINK)  $(libmcfilemanager_la_OBJECTS) $(libmcfilemanager_la_LIBADD) $(LIBS)
+
+mostlyclean-compile:
+	-rm -f *.$(OBJEXT)
+
+distclean-compile:
+	-rm -f *.tab.c
+
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/achown.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/boxes.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cd.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/chattr.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/chmod.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/chown.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/cmd.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/command.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/dir.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/ext.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/file.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/filegui.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/filemanager.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/filenot.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/fileopctx.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/find.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/hotlist.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/info.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/layout.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/mountlist.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/panel.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/panelize.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/tree.Plo@am__quote@ # am--include-marker
+@AMDEP_TRUE@@am__include@ @am__quote@./$(DEPDIR)/treestore.Plo@am__quote@ # am--include-marker
+
+$(am__depfiles_remade):
+	@$(MKDIR_P) $(@D)
+	@echo '# dummy' >$@-t && $(am__mv) $@-t $@
+
+am--depfiles: $(am__depfiles_remade)
+
+.c.o:
+@am__fastdepCC_TRUE@	$(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
+@am__fastdepCC_TRUE@	$(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	$(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@	$(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ $<
+
+.c.obj:
+@am__fastdepCC_TRUE@	$(AM_V_CC)$(COMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ `$(CYGPATH_W) '$<'`
+@am__fastdepCC_TRUE@	$(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Po
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	$(AM_V_CC)source='$<' object='$@' libtool=no @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@	$(AM_V_CC@am__nodep@)$(COMPILE) -c -o $@ `$(CYGPATH_W) '$<'`
+
+.c.lo:
+@am__fastdepCC_TRUE@	$(AM_V_CC)$(LTCOMPILE) -MT $@ -MD -MP -MF $(DEPDIR)/$*.Tpo -c -o $@ $<
+@am__fastdepCC_TRUE@	$(AM_V_at)$(am__mv) $(DEPDIR)/$*.Tpo $(DEPDIR)/$*.Plo
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	$(AM_V_CC)source='$<' object='$@' libtool=yes @AMDEPBACKSLASH@
+@AMDEP_TRUE@@am__fastdepCC_FALSE@	DEPDIR=$(DEPDIR) $(CCDEPMODE) $(depcomp) @AMDEPBACKSLASH@
+@am__fastdepCC_FALSE@	$(AM_V_CC@am__nodep@)$(LTCOMPILE) -c -o $@ $<
+
+mostlyclean-libtool:
+	-rm -f *.lo
+
+clean-libtool:
+	-rm -rf .libs _libs
+
+ID: $(am__tagged_files)
+	$(am__define_uniq_tagged_files); mkid -fID $$unique
+tags: tags-am
+TAGS: tags
+
+tags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
+	set x; \
+	here=`pwd`; \
+	$(am__define_uniq_tagged_files); \
+	shift; \
+	if test -z "$(ETAGS_ARGS)$$*$$unique"; then :; else \
+	  test -n "$$unique" || unique=$$empty_fix; \
+	  if test $$# -gt 0; then \
+	    $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
+	      "$$@" $$unique; \
+	  else \
+	    $(ETAGS) $(ETAGSFLAGS) $(AM_ETAGSFLAGS) $(ETAGS_ARGS) \
+	      $$unique; \
+	  fi; \
+	fi
+ctags: ctags-am
+
+CTAGS: ctags
+ctags-am: $(TAGS_DEPENDENCIES) $(am__tagged_files)
+	$(am__define_uniq_tagged_files); \
+	test -z "$(CTAGS_ARGS)$$unique" \
+	  || $(CTAGS) $(CTAGSFLAGS) $(AM_CTAGSFLAGS) $(CTAGS_ARGS) \
+	     $$unique
+
+GTAGS:
+	here=`$(am__cd) $(top_builddir) && pwd` \
+	  && $(am__cd) $(top_srcdir) \
+	  && gtags -i $(GTAGS_ARGS) "$$here"
+cscopelist: cscopelist-am
+
+cscopelist-am: $(am__tagged_files)
+	list='$(am__tagged_files)'; \
+	case "$(srcdir)" in \
+	  [\\/]* | ?:[\\/]*) sdir="$(srcdir)" ;; \
+	  *) sdir=$(subdir)/$(srcdir) ;; \
+	esac; \
+	for i in $$list; do \
+	  if test -f "$$i"; then \
+	    echo "$(subdir)/$$i"; \
+	  else \
+	    echo "$$sdir/$$i"; \
+	  fi; \
+	done >> $(top_builddir)/cscope.files
+
+distclean-tags:
+	-rm -f TAGS ID GTAGS GRTAGS GSYMS GPATH tags
+distdir: $(BUILT_SOURCES)
+	$(MAKE) $(AM_MAKEFLAGS) distdir-am
+
+distdir-am: $(DISTFILES)
+	@srcdirstrip=`echo "$(srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+	topsrcdirstrip=`echo "$(top_srcdir)" | sed 's/[].[^$$\\*]/\\\\&/g'`; \
+	list='$(DISTFILES)'; \
+	  dist_files=`for file in $$list; do echo $$file; done | \
+	  sed -e "s|^$$srcdirstrip/||;t" \
+	      -e "s|^$$topsrcdirstrip/|$(top_builddir)/|;t"`; \
+	case $$dist_files in \
+	  */*) $(MKDIR_P) `echo "$$dist_files" | \
+			   sed '/\//!d;s|^|$(distdir)/|;s,/[^/]*$$,,' | \
+			   sort -u` ;; \
+	esac; \
+	for file in $$dist_files; do \
+	  if test -f $$file || test -d $$file; then d=.; else d=$(srcdir); fi; \
+	  if test -d $$d/$$file; then \
+	    dir=`echo "/$$file" | sed -e 's,/[^/]*$$,,'`; \
+	    if test -d "$(distdir)/$$file"; then \
+	      find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+	    fi; \
+	    if test -d $(srcdir)/$$file && test $$d != $(srcdir); then \
+	      cp -fpR $(srcdir)/$$file "$(distdir)$$dir" || exit 1; \
+	      find "$(distdir)/$$file" -type d ! -perm -700 -exec chmod u+rwx {} \;; \
+	    fi; \
+	    cp -fpR $$d/$$file "$(distdir)$$dir" || exit 1; \
+	  else \
+	    test -f "$(distdir)/$$file" \
+	    || cp -p $$d/$$file "$(distdir)/$$file" \
+	    || exit 1; \
+	  fi; \
+	done
+check-am: all-am
+check: check-am
+all-am: Makefile $(LTLIBRARIES)
+installdirs:
+install: install-am
+install-exec: install-exec-am
+install-data: install-data-am
+uninstall: uninstall-am
+
+install-am: all-am
+	@$(MAKE) $(AM_MAKEFLAGS) install-exec-am install-data-am
+
+installcheck: installcheck-am
+install-strip:
+	if test -z '$(STRIP)'; then \
+	  $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+	    install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+	      install; \
+	else \
+	  $(MAKE) $(AM_MAKEFLAGS) INSTALL_PROGRAM="$(INSTALL_STRIP_PROGRAM)" \
+	    install_sh_PROGRAM="$(INSTALL_STRIP_PROGRAM)" INSTALL_STRIP_FLAG=-s \
+	    "INSTALL_PROGRAM_ENV=STRIPPROG='$(STRIP)'" install; \
+	fi
+mostlyclean-generic:
+
+clean-generic:
+
+distclean-generic:
+	-test -z "$(CONFIG_CLEAN_FILES)" || rm -f $(CONFIG_CLEAN_FILES)
+	-test . = "$(srcdir)" || test -z "$(CONFIG_CLEAN_VPATH_FILES)" || rm -f $(CONFIG_CLEAN_VPATH_FILES)
+
+maintainer-clean-generic:
+	@echo "This command is intended for maintainers to use"
+	@echo "it deletes files that may require special tools to rebuild."
+clean: clean-am
+
+clean-am: clean-generic clean-libtool clean-noinstLTLIBRARIES \
+	mostlyclean-am
+
+distclean: distclean-am
+		-rm -f ./$(DEPDIR)/achown.Plo
+	-rm -f ./$(DEPDIR)/boxes.Plo
+	-rm -f ./$(DEPDIR)/cd.Plo
+	-rm -f ./$(DEPDIR)/chattr.Plo
+	-rm -f ./$(DEPDIR)/chmod.Plo
+	-rm -f ./$(DEPDIR)/chown.Plo
+	-rm -f ./$(DEPDIR)/cmd.Plo
+	-rm -f ./$(DEPDIR)/command.Plo
+	-rm -f ./$(DEPDIR)/dir.Plo
+	-rm -f ./$(DEPDIR)/ext.Plo
+	-rm -f ./$(DEPDIR)/file.Plo
+	-rm -f ./$(DEPDIR)/filegui.Plo
+	-rm -f ./$(DEPDIR)/filemanager.Plo
+	-rm -f ./$(DEPDIR)/filenot.Plo
+	-rm -f ./$(DEPDIR)/fileopctx.Plo
+	-rm -f ./$(DEPDIR)/find.Plo
+	-rm -f ./$(DEPDIR)/hotlist.Plo
+	-rm -f ./$(DEPDIR)/info.Plo
+	-rm -f ./$(DEPDIR)/layout.Plo
+	-rm -f ./$(DEPDIR)/mountlist.Plo
+	-rm -f ./$(DEPDIR)/panel.Plo
+	-rm -f ./$(DEPDIR)/panelize.Plo
+	-rm -f ./$(DEPDIR)/tree.Plo
+	-rm -f ./$(DEPDIR)/treestore.Plo
+	-rm -f Makefile
+distclean-am: clean-am distclean-compile distclean-generic \
+	distclean-tags
+
+dvi: dvi-am
+
+dvi-am:
+
+html: html-am
+
+html-am:
+
+info: info-am
+
+info-am:
+
+install-data-am:
+
+install-dvi: install-dvi-am
+
+install-dvi-am:
+
+install-exec-am:
+
+install-html: install-html-am
+
+install-html-am:
+
+install-info: install-info-am
+
+install-info-am:
+
+install-man:
+
+install-pdf: install-pdf-am
+
+install-pdf-am:
+
+install-ps: install-ps-am
+
+install-ps-am:
+
+installcheck-am:
+
+maintainer-clean: maintainer-clean-am
+		-rm -f ./$(DEPDIR)/achown.Plo
+	-rm -f ./$(DEPDIR)/boxes.Plo
+	-rm -f ./$(DEPDIR)/cd.Plo
+	-rm -f ./$(DEPDIR)/chattr.Plo
+	-rm -f ./$(DEPDIR)/chmod.Plo
+	-rm -f ./$(DEPDIR)/chown.Plo
+	-rm -f ./$(DEPDIR)/cmd.Plo
+	-rm -f ./$(DEPDIR)/command.Plo
+	-rm -f ./$(DEPDIR)/dir.Plo
+	-rm -f ./$(DEPDIR)/ext.Plo
+	-rm -f ./$(DEPDIR)/file.Plo
+	-rm -f ./$(DEPDIR)/filegui.Plo
+	-rm -f ./$(DEPDIR)/filemanager.Plo
+	-rm -f ./$(DEPDIR)/filenot.Plo
+	-rm -f ./$(DEPDIR)/fileopctx.Plo
+	-rm -f ./$(DEPDIR)/find.Plo
+	-rm -f ./$(DEPDIR)/hotlist.Plo
+	-rm -f ./$(DEPDIR)/info.Plo
+	-rm -f ./$(DEPDIR)/layout.Plo
+	-rm -f ./$(DEPDIR)/mountlist.Plo
+	-rm -f ./$(DEPDIR)/panel.Plo
+	-rm -f ./$(DEPDIR)/panelize.Plo
+	-rm -f ./$(DEPDIR)/tree.Plo
+	-rm -f ./$(DEPDIR)/treestore.Plo
+	-rm -f Makefile
+maintainer-clean-am: distclean-am maintainer-clean-generic
+
+mostlyclean: mostlyclean-am
+
+mostlyclean-am: mostlyclean-compile mostlyclean-generic \
+	mostlyclean-libtool
+
+pdf: pdf-am
+
+pdf-am:
+
+ps: ps-am
+
+ps-am:
+
+uninstall-am:
+
+.MAKE: install-am install-strip
+
+.PHONY: CTAGS GTAGS TAGS all all-am am--depfiles check check-am clean \
+	clean-generic clean-libtool clean-noinstLTLIBRARIES \
+	cscopelist-am ctags ctags-am distclean distclean-compile \
+	distclean-generic distclean-libtool distclean-tags distdir dvi \
+	dvi-am html html-am info info-am install install-am \
+	install-data install-data-am install-dvi install-dvi-am \
+	install-exec install-exec-am install-html install-html-am \
+	install-info install-info-am install-man install-pdf \
+	install-pdf-am install-ps install-ps-am install-strip \
+	installcheck installcheck-am installdirs maintainer-clean \
+	maintainer-clean-generic mostlyclean mostlyclean-compile \
+	mostlyclean-generic mostlyclean-libtool pdf pdf-am ps ps-am \
+	tags tags-am uninstall uninstall-am
+
+.PRECIOUS: Makefile
+
+
+# Tell versions [3.59,3.63) of GNU make to not export all variables.
+# Otherwise a system limit (for SysV at least) may be exceeded.
+.NOEXPORT:
diff --git a/src/filemanager/achown.c b/src/filemanager/achown.c
new file mode 100644
index 0000000..dca3eca
--- /dev/null
+++ b/src/filemanager/achown.c
@@ -0,0 +1,1107 @@
+/*
+   Chown-advanced command -- for the Midnight Commander
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file achown.c
+ *  \brief Source: Contains functions for advanced chowning
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+#include <pwd.h>
+#include <grp.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"        /* XCTRL and ALT macros */
+#include "lib/skin.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "cmd.h"                /* advanced_chown_cmd() */
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define BX 5
+#define BY 5
+
+#define BUTTONS      9
+#define BUTTONS_PERM 5
+
+#define B_SETALL B_USER
+#define B_SKIP   (B_USER + 1)
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct
+{
+    unsigned long id;
+    int ret_cmd;
+    button_flags_t flags;
+    int x;
+    int len;
+    const char *text;
+} advanced_chown_but[BUTTONS] =
+{
+    /* *INDENT-OFF* */
+    { 0, B_ENTER,   NARROW_BUTTON,  3, 0, "   " },
+    { 0, B_ENTER,   NARROW_BUTTON, 11, 0, "   " },
+    { 0, B_ENTER,   NARROW_BUTTON, 19, 0, "   " },
+    { 0, B_ENTER,   NARROW_BUTTON, 29, 0, ""    },
+    { 0, B_ENTER,   NARROW_BUTTON, 47, 0, ""    },
+
+    { 0, B_SETALL,  NORMAL_BUTTON,  0, 0, N_("Set &all") },
+    { 0, B_SKIP,    NORMAL_BUTTON,  0, 0, N_("S&kip")    },
+    { 0, B_ENTER,  DEFPUSH_BUTTON,  0, 0, N_("&Set")     },
+    { 0, B_CANCEL,  NORMAL_BUTTON,  0, 0, N_("&Cancel")  }
+    /* *INDENT-ON* */
+};
+
+static int current_file;
+static gboolean ignore_all;
+
+static WButton *b_att[3];       /* permission */
+static WButton *b_user, *b_group;       /* owner */
+static WLabel *l_filename;
+static WLabel *l_mode;
+
+static int flag_pos;
+static int x_toggle;
+static char ch_flags[11];
+static const char ch_perm[] = "rwx";
+static mode_t ch_cmode;
+static struct stat sf_stat;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+advanced_chown_init (void)
+{
+    static gboolean i18n = FALSE;
+    int i;
+
+    if (i18n)
+        return;
+
+    i18n = TRUE;
+
+    for (i = BUTTONS_PERM; i < BUTTONS; i++)
+    {
+#ifdef ENABLE_NLS
+        advanced_chown_but[i].text = _(advanced_chown_but[i].text);
+#endif /* ENABLE_NLS */
+
+        advanced_chown_but[i].len = str_term_width1 (advanced_chown_but[i].text) + 3;
+        if (advanced_chown_but[i].flags == DEFPUSH_BUTTON)
+            advanced_chown_but[i].len += 2;     /* "<>" */
+    }
+
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+inc_flag_pos (void)
+{
+    if (flag_pos == 10)
+    {
+        flag_pos = 0;
+        return MSG_NOT_HANDLED;
+    }
+
+    flag_pos++;
+
+    return flag_pos % 3 == 0 ? MSG_NOT_HANDLED : MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+dec_flag_pos (void)
+{
+    if (flag_pos == 0)
+    {
+        flag_pos = 10;
+        return MSG_NOT_HANDLED;
+    }
+
+    flag_pos--;
+
+    return (flag_pos + 1) % 3 == 0 ? MSG_NOT_HANDLED : MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+set_perm_by_flags (char *s, int f_p)
+{
+    int i;
+
+    for (i = 0; i < 3; i++)
+    {
+        if (ch_flags[f_p + i] == '+')
+            s[i] = ch_perm[i];
+        else if (ch_flags[f_p + i] == '-')
+            s[i] = '-';
+        else
+            s[i] = (ch_cmode & (1 << (8 - f_p - i))) != 0 ? ch_perm[i] : '-';
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static mode_t
+get_perm (char *s, int base)
+{
+    mode_t m = 0;
+
+    m |= (s[0] == '-') ? 0 :
+        ((s[0] == '+') ? (mode_t) (1 << (base + 2)) : (1 << (base + 2)) & ch_cmode);
+
+    m |= (s[1] == '-') ? 0 :
+        ((s[1] == '+') ? (mode_t) (1 << (base + 1)) : (1 << (base + 1)) & ch_cmode);
+
+    m |= (s[2] == '-') ? 0 : ((s[2] == '+') ? (mode_t) (1 << base) : (1 << base) & ch_cmode);
+
+    return m;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static mode_t
+get_mode (void)
+{
+    mode_t m;
+
+    m = ch_cmode ^ (ch_cmode & 0777);
+    m |= get_perm (ch_flags, 6);
+    m |= get_perm (ch_flags + 3, 3);
+    m |= get_perm (ch_flags + 6, 0);
+
+    return m;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_permissions (void)
+{
+    set_perm_by_flags (b_att[0]->text.start, 0);
+    set_perm_by_flags (b_att[1]->text.start, 3);
+    set_perm_by_flags (b_att[2]->text.start, 6);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_ownership (void)
+{
+    button_set_text (b_user, get_owner (sf_stat.st_uid));
+    button_set_text (b_group, get_group (sf_stat.st_gid));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+print_flags (const WDialog * h)
+{
+    int i;
+
+    tty_setcolor (COLOR_NORMAL);
+
+    for (i = 0; i < 3; i++)
+    {
+        widget_gotoyx (h, BY + 1, advanced_chown_but[0].x + 6 + i);
+        tty_print_char (ch_flags[i]);
+    }
+
+    for (i = 0; i < 3; i++)
+    {
+        widget_gotoyx (h, BY + 1, advanced_chown_but[1].x + 6 + i);
+        tty_print_char (ch_flags[i + 3]);
+    }
+
+    for (i = 0; i < 3; i++)
+    {
+        widget_gotoyx (h, BY + 1, advanced_chown_but[2].x + 6 + i);
+        tty_print_char (ch_flags[i + 6]);
+    }
+
+    update_permissions ();
+
+    for (i = 0; i < 15; i++)
+    {
+        widget_gotoyx (h, BY + 1, advanced_chown_but[3].x + 6 + i);
+        tty_print_char (ch_flags[9]);
+    }
+    for (i = 0; i < 15; i++)
+    {
+        widget_gotoyx (h, BY + 1, advanced_chown_but[4].x + 6 + i);
+        tty_print_char (ch_flags[10]);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+advanced_chown_refresh (const WDialog * h)
+{
+    tty_setcolor (COLOR_NORMAL);
+
+    widget_gotoyx (h, BY - 1, advanced_chown_but[0].x + 5);
+    tty_print_string (_("owner"));
+    widget_gotoyx (h, BY - 1, advanced_chown_but[1].x + 5);
+    tty_print_string (_("group"));
+    widget_gotoyx (h, BY - 1, advanced_chown_but[2].x + 5);
+    tty_print_string (_("other"));
+
+    widget_gotoyx (h, BY - 1, advanced_chown_but[3].x + 5);
+    tty_print_string (_("owner"));
+    widget_gotoyx (h, BY - 1, advanced_chown_but[4].x + 5);
+    tty_print_string (_("group"));
+
+    widget_gotoyx (h, BY + 1, 3);
+    tty_print_string (_("Flag"));
+    print_flags (h);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+advanced_chown_info_update (void)
+{
+    /* mode */
+    label_set_textv (l_mode, _("Permissions (octal): %o"), get_mode ());
+
+    /* permissions */
+    update_permissions ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_mode (WGroup * g)
+{
+    print_flags (DIALOG (g));
+    advanced_chown_info_update ();
+    widget_set_state (WIDGET (g->current->data), WST_FOCUSED, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+perm_button_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WButton *b = BUTTON (w);
+    WGroup *g = w->owner;
+    int i = 0;
+    int f_pos;
+
+    /* one of permission buttons */
+    if (b == b_att[0])
+        f_pos = 0;
+    else if (b == b_att[1])
+        f_pos = 1;
+    else                        /* if (w == b_att [1] */
+        f_pos = 2;
+
+    switch (msg)
+    {
+    case MSG_FOCUS:
+        if (b->hotpos == -1)
+            b->hotpos = 0;
+
+        flag_pos = f_pos * 3 + b->hotpos;
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        switch (parm)
+        {
+        case '*':
+            parm = '=';
+            MC_FALLTHROUGH;
+
+        case '-':
+        case '=':
+        case '+':
+            flag_pos = f_pos * 3 + b->hotpos;
+            ch_flags[flag_pos] = parm;
+            update_mode (g);
+            send_message (w, NULL, MSG_KEY, KEY_RIGHT, NULL);
+            if (b->hotpos == 2)
+                group_select_next_widget (g);
+            break;
+
+        case XCTRL ('f'):
+        case KEY_RIGHT:
+            {
+                cb_ret_t ret;
+
+                ret = inc_flag_pos ();
+                b->hotpos = flag_pos % 3;
+                return ret;
+            }
+
+        case XCTRL ('b'):
+        case KEY_LEFT:
+            {
+                cb_ret_t ret;
+
+                ret = dec_flag_pos ();
+                b->hotpos = flag_pos % 3;
+                return ret;
+            }
+
+        case 'x':
+            i++;
+            MC_FALLTHROUGH;
+
+        case 'w':
+            i++;
+            MC_FALLTHROUGH;
+
+        case 'r':
+            b->hotpos = i;
+            MC_FALLTHROUGH;
+
+        case ' ':
+            i = b->hotpos;
+
+            flag_pos = f_pos * 3 + i;
+            if (b->text.start[flag_pos % 3] == '-')
+                ch_flags[flag_pos] = '+';
+            else
+                ch_flags[flag_pos] = '-';
+            update_mode (w->owner);
+            break;
+
+        case '4':
+            i++;
+            MC_FALLTHROUGH;
+
+        case '2':
+            i++;
+            MC_FALLTHROUGH;
+
+        case '1':
+            b->hotpos = i;
+            flag_pos = f_pos * 3 + i;
+            ch_flags[flag_pos] = '=';
+            update_mode (g);
+            break;
+
+        default:
+            break;
+        }
+        /* continue key handling in the dialog level */
+        return MSG_NOT_HANDLED;
+
+    default:
+        return button_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+perm_button_mouse_callback (Widget * w, mouse_msg_t msg, mouse_event_t * event)
+{
+    switch (msg)
+    {
+    case MSG_MOUSE_DOWN:
+        /* place cursor on flag that is being modified */
+        BUTTON (w)->hotpos = CLAMP (event->x - 1, 0, 2);
+        MC_FALLTHROUGH;
+
+    default:
+        button_mouse_default_callback (w, msg, event);
+        break;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WButton *
+perm_button_new (int y, int x, int action, button_flags_t flags, const char *text,
+                 bcback_fn callback)
+{
+    WButton *b;
+    Widget *w;
+
+    /* create base button using native API */
+    b = button_new (y, x, action, flags, text, callback);
+    w = WIDGET (b);
+
+    /* we don't want HOTKEY */
+    widget_want_hotkey (w, FALSE);
+
+    w->callback = perm_button_callback;
+    w->mouse_callback = perm_button_mouse_callback;
+
+    return b;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chl_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_KEY:
+        switch (parm)
+        {
+        case KEY_LEFT:
+        case KEY_RIGHT:
+            {
+                WDialog *h = DIALOG (w);
+
+                h->ret_value = parm;
+                dlg_close (h);
+            }
+            break;
+        default:
+            break;
+        }
+        MC_FALLTHROUGH;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+user_group_button_cb (WButton * button, int action)
+{
+    Widget *w = WIDGET (button);
+    int f_pos;
+    gboolean chl_end;
+
+    (void) action;
+
+    if (button == b_user)
+        f_pos = BUTTONS_PERM - 2;
+    else if (button == b_group)
+        f_pos = BUTTONS_PERM - 1;
+    else
+        return 0;               /* do nothing */
+
+    do
+    {
+        WGroup *g = w->owner;
+        WDialog *h = DIALOG (g);
+        Widget *wh = WIDGET (h);
+
+        gboolean is_owner = (f_pos == BUTTONS_PERM - 2);
+        const char *title;
+        int lxx, b_current;
+        WDialog *chl_dlg;
+        WListbox *chl_list;
+        int result;
+        int fe;
+        struct passwd *chl_pass;
+        struct group *chl_grp;
+
+        chl_end = FALSE;
+
+        if (is_owner)
+        {
+            title = _("owner");
+            lxx = WIDGET (b_user)->rect.x + 1;
+        }
+        else
+        {
+            title = _("group");
+            lxx = WIDGET (b_group)->rect.x + 1;
+        }
+
+        chl_dlg =
+            dlg_create (TRUE, wh->rect.y - 1, lxx, wh->rect.lines + 2, 17, WPOS_KEEP_DEFAULT, TRUE,
+                        dialog_colors, chl_callback, NULL, "[Advanced Chown]", title);
+
+        /* get new listboxes */
+        chl_list =
+            listbox_new (1, 1, WIDGET (chl_dlg)->rect.lines - 2, WIDGET (chl_dlg)->rect.cols - 2,
+                         FALSE, NULL);
+        listbox_add_item (chl_list, LISTBOX_APPEND_AT_END, 0, "<Unknown>", NULL, FALSE);
+        if (is_owner)
+        {
+            /* get and put user names in the listbox */
+            setpwent ();
+            while ((chl_pass = getpwent ()) != NULL)
+                listbox_add_item (chl_list, LISTBOX_APPEND_SORTED, 0, chl_pass->pw_name, NULL,
+                                  FALSE);
+            endpwent ();
+            fe = listbox_search_text (chl_list, get_owner (sf_stat.st_uid));
+        }
+        else
+        {
+            /* get and put group names in the listbox */
+            setgrent ();
+            while ((chl_grp = getgrent ()) != NULL)
+                listbox_add_item (chl_list, LISTBOX_APPEND_SORTED, 0, chl_grp->gr_name, NULL,
+                                  FALSE);
+            endgrent ();
+            fe = listbox_search_text (chl_list, get_group (sf_stat.st_gid));
+        }
+
+        listbox_set_current (chl_list, fe);
+
+        b_current = chl_list->current;
+        group_add_widget (GROUP (chl_dlg), chl_list);
+
+        result = dlg_run (chl_dlg);
+
+        if (result != B_CANCEL)
+        {
+            if (b_current != chl_list->current)
+            {
+                gboolean ok = FALSE;
+                char *text;
+
+                listbox_get_current (chl_list, &text, NULL);
+                if (is_owner)
+                {
+                    chl_pass = getpwnam (text);
+                    if (chl_pass != NULL)
+                    {
+                        sf_stat.st_uid = chl_pass->pw_uid;
+                        ok = TRUE;
+                    }
+                }
+                else
+                {
+                    chl_grp = getgrnam (text);
+                    if (chl_grp != NULL)
+                    {
+                        sf_stat.st_gid = chl_grp->gr_gid;
+                        ok = TRUE;
+                    }
+                }
+
+                if (!ok)
+                    group_select_current_widget (g);
+                else
+                {
+                    ch_flags[f_pos + 6] = '+';
+                    update_ownership ();
+                    group_select_current_widget (g);
+                    print_flags (h);
+                }
+            }
+
+            if (result == KEY_LEFT)
+            {
+                if (!is_owner)
+                    chl_end = TRUE;
+                group_select_prev_widget (g);
+                f_pos--;
+            }
+            else if (result == KEY_RIGHT)
+            {
+                if (is_owner)
+                    chl_end = TRUE;
+                group_select_next_widget (g);
+                f_pos++;
+            }
+        }
+
+        /* Here we used to redraw the window */
+        widget_destroy (WIDGET (chl_dlg));
+    }
+    while (chl_end);
+
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+advanced_chown_bg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_DRAW:
+        frame_callback (w, NULL, MSG_DRAW, 0, NULL);
+        advanced_chown_refresh (DIALOG (w->owner));
+        advanced_chown_info_update ();
+        return MSG_HANDLED;
+
+    default:
+        return frame_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+advanced_chown_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WGroup *g = GROUP (w);
+    int i = 0;
+
+    switch (msg)
+    {
+    case MSG_KEY:
+        switch (parm)
+        {
+        case ALT ('x'):
+            i++;
+            MC_FALLTHROUGH;
+
+        case ALT ('w'):
+            i++;
+            MC_FALLTHROUGH;
+
+        case ALT ('r'):
+            parm = i + 3;
+            for (i = 0; i < 3; i++)
+                ch_flags[i * 3 + parm - 3] = (x_toggle & (1 << parm)) ? '-' : '+';
+            x_toggle ^= (1 << parm);
+            update_mode (g);
+            widget_draw (w);
+            break;
+
+        case XCTRL ('x'):
+            i++;
+            MC_FALLTHROUGH;
+
+        case XCTRL ('w'):
+            i++;
+            MC_FALLTHROUGH;
+
+        case XCTRL ('r'):
+            parm = i;
+            for (i = 0; i < 3; i++)
+                ch_flags[i * 3 + parm] = (x_toggle & (1 << parm)) ? '-' : '+';
+            x_toggle ^= (1 << parm);
+            update_mode (g);
+            widget_draw (w);
+            break;
+
+        default:
+            break;
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WDialog *
+advanced_chown_dlg_create (WPanel * panel)
+{
+    gboolean single_set;
+    WDialog *ch_dlg;
+    WGroup *ch_grp;
+    int lines = 12;
+    int cols = 74;
+    int i;
+    int y;
+
+    memset (ch_flags, '=', 11);
+    flag_pos = 0;
+    x_toggle = 070;
+
+    single_set = (panel->marked < 2);
+    if (!single_set)
+        lines += 2;
+
+    ch_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors,
+                    advanced_chown_callback, NULL, "[Advanced Chown]", _("Chown advanced command"));
+    ch_grp = GROUP (ch_dlg);
+
+    /* draw background */
+    ch_dlg->bg->callback = advanced_chown_bg_callback;
+
+    l_filename = label_new (2, 3, NULL);
+    group_add_widget (ch_grp, l_filename);
+
+    group_add_widget (ch_grp, hline_new (3, -1, -1));
+
+#define XTRACT(i,y,cb) y, BX+advanced_chown_but[i].x, \
+        advanced_chown_but[i].ret_cmd, advanced_chown_but[i].flags, \
+        (advanced_chown_but[i].text), cb
+    b_att[0] = perm_button_new (XTRACT (0, BY, NULL));
+    advanced_chown_but[0].id = group_add_widget (ch_grp, b_att[0]);
+    b_att[1] = perm_button_new (XTRACT (1, BY, NULL));
+    advanced_chown_but[1].id = group_add_widget (ch_grp, b_att[1]);
+    b_att[2] = perm_button_new (XTRACT (2, BY, NULL));
+    advanced_chown_but[2].id = group_add_widget (ch_grp, b_att[2]);
+    b_user = button_new (XTRACT (3, BY, user_group_button_cb));
+    advanced_chown_but[3].id = group_add_widget (ch_grp, b_user);
+    b_group = button_new (XTRACT (4, BY, user_group_button_cb));
+    advanced_chown_but[4].id = group_add_widget (ch_grp, b_group);
+
+    l_mode = label_new (BY + 2, 3, NULL);
+    group_add_widget (ch_grp, l_mode);
+
+    y = BY + 3;
+    if (!single_set)
+    {
+        i = BUTTONS_PERM;
+        group_add_widget (ch_grp, hline_new (y++, -1, -1));
+        advanced_chown_but[i].id = group_add_widget (ch_grp,
+                                                     button_new (y,
+                                                                 WIDGET (ch_dlg)->rect.cols / 2 -
+                                                                 advanced_chown_but[i].len,
+                                                                 advanced_chown_but[i].ret_cmd,
+                                                                 advanced_chown_but[i].flags,
+                                                                 advanced_chown_but[i].text, NULL));
+        i++;
+        advanced_chown_but[i].id = group_add_widget (ch_grp,
+                                                     button_new (y,
+                                                                 WIDGET (ch_dlg)->rect.cols / 2 + 1,
+                                                                 advanced_chown_but[i].ret_cmd,
+                                                                 advanced_chown_but[i].flags,
+                                                                 advanced_chown_but[i].text, NULL));
+        y++;
+    }
+
+    i = BUTTONS_PERM + 2;
+    group_add_widget (ch_grp, hline_new (y++, -1, -1));
+    advanced_chown_but[i].id = group_add_widget (ch_grp,
+                                                 button_new (y,
+                                                             WIDGET (ch_dlg)->rect.cols / 2 -
+                                                             advanced_chown_but[i].len,
+                                                             advanced_chown_but[i].ret_cmd,
+                                                             advanced_chown_but[i].flags,
+                                                             advanced_chown_but[i].text, NULL));
+    i++;
+    advanced_chown_but[i].id = group_add_widget (ch_grp,
+                                                 button_new (y, WIDGET (ch_dlg)->rect.cols / 2 + 1,
+                                                             advanced_chown_but[i].ret_cmd,
+                                                             advanced_chown_but[i].flags,
+                                                             advanced_chown_but[i].text, NULL));
+
+    widget_select (WIDGET (b_att[0]));
+
+    return ch_dlg;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+advanced_chown_done (gboolean need_update)
+{
+    if (need_update)
+        update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const GString *
+next_file (const WPanel * panel)
+{
+    while (panel->dir.list[current_file].f.marked == 0)
+        current_file++;
+
+    return panel->dir.list[current_file].fname;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+try_advanced_chown (const vfs_path_t * p, mode_t m, uid_t u, gid_t g)
+{
+    int chmod_result;
+    const char *fname = NULL;
+
+    while ((chmod_result = mc_chmod (p, m)) == -1 && !ignore_all)
+    {
+        int my_errno = errno;
+        int result;
+        char *msg;
+
+        if (fname == NULL)
+            fname = x_basename (vfs_path_as_str (p));
+        msg = g_strdup_printf (_("Cannot chmod \"%s\"\n%s"), fname, unix_error_string (my_errno));
+        result =
+            query_dialog (MSG_ERROR, msg, D_ERROR, 4, _("&Ignore"), _("Ignore &all"), _("&Retry"),
+                          _("&Cancel"));
+        g_free (msg);
+
+        switch (result)
+        {
+        case 0:
+            /* call mc_chown() only, if mc_chmod() didn't fail */
+            return TRUE;
+
+        case 1:
+            ignore_all = TRUE;
+            /* call mc_chown() only, if mc_chmod() didn't fail */
+            return TRUE;
+
+        case 2:
+            /* retry chmod of this file */
+            break;
+
+        case 3:
+        default:
+            /* stop remain files processing */
+            return FALSE;
+        }
+    }
+
+    /* call mc_chown() only, if mc_chmod didn't fail */
+    while (chmod_result != -1 && mc_chown (p, u, g) == -1 && !ignore_all)
+    {
+        int my_errno = errno;
+        int result;
+        char *msg;
+
+        if (fname == NULL)
+            fname = x_basename (vfs_path_as_str (p));
+        msg = g_strdup_printf (_("Cannot chown \"%s\"\n%s"), fname, unix_error_string (my_errno));
+        result =
+            query_dialog (MSG_ERROR, msg, D_ERROR, 4, _("&Ignore"), _("Ignore &all"), _("&Retry"),
+                          _("&Cancel"));
+        g_free (msg);
+
+        switch (result)
+        {
+        case 0:
+            /* try next file */
+            return TRUE;
+
+        case 1:
+            ignore_all = TRUE;
+            /* try next file */
+            return TRUE;
+
+        case 2:
+            /* retry chown of this file */
+            break;
+
+        case 3:
+        default:
+            /* stop remain files processing */
+            return FALSE;
+        }
+    }
+
+    return TRUE;
+
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+do_advanced_chown (WPanel * panel, const vfs_path_t * p, mode_t m, uid_t u, gid_t g)
+{
+    gboolean ret;
+
+    ret = try_advanced_chown (p, m, u, g);
+
+    do_file_mark (panel, current_file, 0);
+
+    return ret;
+}
+
+ /* --------------------------------------------------------------------------------------------- */
+
+static void
+apply_advanced_chowns (WPanel * panel, vfs_path_t * vpath, struct stat *sf)
+{
+    gid_t a_gid = sf->st_gid;
+    uid_t a_uid = sf->st_uid;
+    gboolean ok;
+
+    if (!do_advanced_chown (panel, vpath, get_mode (),
+                            (ch_flags[9] == '+') ? a_uid : (uid_t) (-1),
+                            (ch_flags[10] == '+') ? a_gid : (gid_t) (-1)))
+        return;
+
+    do
+    {
+        const GString *fname;
+
+        fname = next_file (panel);
+        vpath = vfs_path_from_str (fname->str);
+        ok = (mc_stat (vpath, sf) == 0);
+
+        if (!ok)
+        {
+            /* if current file was deleted outside mc -- try next file */
+            /* decrease panel->marked */
+            do_file_mark (panel, current_file, 0);
+
+            /* try next file */
+            ok = TRUE;
+        }
+        else
+        {
+            ch_cmode = sf->st_mode;
+
+            ok = do_advanced_chown (panel, vpath, get_mode (),
+                                    (ch_flags[9] == '+') ? a_uid : (uid_t) (-1),
+                                    (ch_flags[10] == '+') ? a_gid : (gid_t) (-1));
+        }
+
+        vfs_path_free (vpath, TRUE);
+    }
+    while (ok && panel->marked != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+advanced_chown_cmd (WPanel * panel)
+{
+    gboolean need_update;
+    gboolean end_chown;
+
+    /* Number of files at startup */
+    int files_on_begin;
+
+    files_on_begin = MAX (1, panel->marked);
+
+    advanced_chown_init ();
+
+    current_file = 0;
+    ignore_all = FALSE;
+
+    do
+    {                           /* do while any files remaining */
+        vfs_path_t *vpath;
+        WDialog *ch_dlg;
+        const GString *fname;
+        int result;
+        int file_idx;
+
+        do_refresh ();
+
+        need_update = FALSE;
+        end_chown = FALSE;
+
+        if (panel->marked != 0)
+            fname = next_file (panel);  /* next marked file */
+        else
+            fname = panel_current_entry (panel)->fname; /* single file */
+
+        vpath = vfs_path_from_str (fname->str);
+
+        if (mc_stat (vpath, &sf_stat) != 0)
+        {
+            vfs_path_free (vpath, TRUE);
+            break;
+        }
+
+        ch_cmode = sf_stat.st_mode;
+
+        ch_dlg = advanced_chown_dlg_create (panel);
+
+        file_idx = files_on_begin == 1 ? 1 : (files_on_begin - panel->marked + 1);
+        label_set_textv (l_filename, "%s (%d/%d)",
+                         str_fit_to_term (fname->str, WIDGET (ch_dlg)->rect.cols - 20, J_LEFT_FIT),
+                         file_idx, files_on_begin);
+        update_ownership ();
+
+        result = dlg_run (ch_dlg);
+
+        switch (result)
+        {
+        case B_CANCEL:
+            end_chown = TRUE;
+            break;
+
+        case B_ENTER:
+            {
+                uid_t uid = ch_flags[9] == '+' ? sf_stat.st_uid : (uid_t) (-1);
+                gid_t gid = ch_flags[10] == '+' ? sf_stat.st_gid : (gid_t) (-1);
+
+                if (panel->marked <= 1)
+                {
+                    /* single or last file */
+                    if (mc_chmod (vpath, get_mode ()) == -1)
+                        message (D_ERROR, MSG_ERROR, _("Cannot chmod \"%s\"\n%s"),
+                                 fname->str, unix_error_string (errno));
+                    /* call mc_chown only, if mc_chmod didn't fail */
+                    else if (mc_chown (vpath, uid, gid) == -1)
+                        message (D_ERROR, MSG_ERROR, _("Cannot chown \"%s\"\n%s"), fname->str,
+                                 unix_error_string (errno));
+
+                    end_chown = TRUE;
+                }
+                else if (!try_advanced_chown (vpath, get_mode (), uid, gid))
+                {
+                    /* stop multiple files processing */
+                    result = B_CANCEL;
+                    end_chown = TRUE;
+                }
+
+                need_update = TRUE;
+                break;
+            }
+
+        case B_SETALL:
+            apply_advanced_chowns (panel, vpath, &sf_stat);
+            need_update = TRUE;
+            end_chown = TRUE;
+            break;
+
+        case B_SKIP:
+        default:
+            break;
+        }
+
+        if (panel->marked != 0 && result != B_CANCEL)
+        {
+            do_file_mark (panel, current_file, 0);
+            need_update = TRUE;
+        }
+
+        vfs_path_free (vpath, TRUE);
+
+        widget_destroy (WIDGET (ch_dlg));
+    }
+    while (panel->marked != 0 && !end_chown);
+
+    advanced_chown_done (need_update);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/boxes.c b/src/filemanager/boxes.c
new file mode 100644
index 0000000..e091c95
--- /dev/null
+++ b/src/filemanager/boxes.c
@@ -0,0 +1,1343 @@
+/*
+   Some misc dialog boxes for the program.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Miguel de Icaza, 1994, 1995
+   Jakub Jelinek, 1995
+   Andrew Borodin <aborodin@vmail.ru>, 2009-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file boxes.c
+ *  \brief Source: Some misc dialog boxes for the program
+ */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <signal.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/tty/color.h"      /* tty_use_colors() */
+#include "lib/tty/key.h"        /* XCTRL and ALT macros  */
+#include "lib/skin.h"           /* INPUT_COLOR */
+#include "lib/mcconfig.h"       /* Load/save user formats */
+#include "lib/strutil.h"
+
+#include "lib/vfs/vfs.h"
+#ifdef ENABLE_VFS_FTP
+#include "src/vfs/ftpfs/ftpfs.h"
+#endif /* ENABLE_VFS_FTP */
+
+#include "lib/util.h"           /* Q_() */
+#include "lib/widget.h"
+
+#include "src/setup.h"
+#include "src/history.h"        /* MC_HISTORY_ESC_TIMEOUT */
+#include "src/execute.h"        /* pause_after_run */
+#ifdef ENABLE_BACKGROUND
+#include "src/background.h"     /* task_list */
+#endif
+
+#ifdef HAVE_CHARSET
+#include "lib/charsets.h"
+#include "src/selcodepage.h"
+#endif
+
+#include "command.h"            /* For cmdline */
+#include "dir.h"
+#include "tree.h"
+#include "layout.h"             /* for get_nth_panel_name proto */
+#include "filemanager.h"
+
+#include "boxes.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#ifdef ENABLE_BACKGROUND
+#define B_STOP   (B_USER+1)
+#define B_RESUME (B_USER+2)
+#define B_KILL   (B_USER+3)
+#endif /* ENABLE_BACKGROUND */
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static unsigned long configure_old_esc_mode_id, configure_time_out_id;
+
+/* Index in list_formats[] for "brief" */
+static const int panel_list_brief_idx = 1;
+/* Index in list_formats[] for "user defined" */
+static const int panel_list_user_idx = 3;
+
+static char **status_format;
+static unsigned long panel_list_formats_id, panel_user_format_id, panel_brief_cols_id;
+static unsigned long user_mini_status_id, mini_user_format_id;
+
+#ifdef HAVE_CHARSET
+static int new_display_codepage;
+#endif /* HAVE_CHARSET */
+
+#if defined(ENABLE_VFS) && defined(ENABLE_VFS_FTP)
+static unsigned long ftpfs_always_use_proxy_id, ftpfs_proxy_host_id;
+#endif /* ENABLE_VFS && ENABLE_VFS_FTP */
+
+static GPtrArray *skin_names;
+static gchar *current_skin_name;
+
+#ifdef ENABLE_BACKGROUND
+static WListbox *bg_list = NULL;
+#endif /* ENABLE_BACKGROUND */
+
+static unsigned long shadows_id;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+configure_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_NOTIFY:
+        /* message from "Single press" checkbutton */
+        if (sender != NULL && sender->id == configure_old_esc_mode_id)
+        {
+            const gboolean not_single = !CHECK (sender)->state;
+            Widget *ww;
+
+            /* input line */
+            ww = widget_find_by_id (w, configure_time_out_id);
+            widget_disable (ww, not_single);
+
+            return MSG_HANDLED;
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+skin_apply (const gchar * skin_override)
+{
+    GError *mcerror = NULL;
+
+    mc_skin_deinit ();
+    mc_skin_init (skin_override, &mcerror);
+    mc_fhl_free (&mc_filehighlight);
+    mc_filehighlight = mc_fhl_new (TRUE);
+    dlg_set_default_colors ();
+    input_set_default_colors ();
+    if (mc_global.mc_run_mode == MC_RUN_FULL)
+        command_set_default_colors ();
+    panel_deinit ();
+    panel_init ();
+    repaint_screen ();
+
+    mc_error_message (&mcerror, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const gchar *
+skin_name_to_label (const gchar * name)
+{
+    if (strcmp (name, "default") == 0)
+        return _("< Default >");
+    return name;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+skin_dlg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_RESIZE:
+        {
+            WDialog *d = DIALOG (w);
+            const WRect *wd = &WIDGET (d->data.p)->rect;
+            WRect r = w->rect;
+
+            r.y = wd->y + (wd->lines - r.lines) / 2;
+            r.x = wd->x + wd->cols / 2;
+
+            return dlg_default_callback (w, NULL, MSG_RESIZE, 0, &r);
+        }
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+sel_skin_button (WButton * button, int action)
+{
+    int result;
+    WListbox *skin_list;
+    WDialog *skin_dlg;
+    const gchar *skin_name;
+    unsigned int i;
+    unsigned int pos = 1;
+
+    (void) action;
+
+    skin_dlg =
+        dlg_create (TRUE, 0, 0, 13, 24, WPOS_KEEP_DEFAULT, TRUE, dialog_colors, skin_dlg_callback,
+                    NULL, "[Appearance]", _("Skins"));
+    /* use Appearance dialog for positioning */
+    skin_dlg->data.p = WIDGET (button)->owner;
+
+    /* set dialog location before all */
+    send_message (skin_dlg, NULL, MSG_RESIZE, 0, NULL);
+
+    skin_list = listbox_new (1, 1, 11, 22, FALSE, NULL);
+    skin_name = "default";
+    listbox_add_item (skin_list, LISTBOX_APPEND_AT_END, 0, skin_name_to_label (skin_name),
+                      (void *) skin_name, FALSE);
+
+    if (strcmp (skin_name, current_skin_name) == 0)
+        listbox_set_current (skin_list, 0);
+
+    for (i = 0; i < skin_names->len; i++)
+    {
+        skin_name = g_ptr_array_index (skin_names, i);
+        if (strcmp (skin_name, "default") != 0)
+        {
+            listbox_add_item (skin_list, LISTBOX_APPEND_AT_END, 0, skin_name_to_label (skin_name),
+                              (void *) skin_name, FALSE);
+            if (strcmp (skin_name, current_skin_name) == 0)
+                listbox_set_current (skin_list, pos);
+            pos++;
+        }
+    }
+
+    /* make list stick to all sides of dialog, effectively make it be resized with dialog */
+    group_add_widget_autopos (GROUP (skin_dlg), skin_list, WPOS_KEEP_ALL, NULL);
+
+    result = dlg_run (skin_dlg);
+    if (result == B_ENTER)
+    {
+        gchar *skin_label;
+
+        listbox_get_current (skin_list, &skin_label, (void **) &skin_name);
+        g_free (current_skin_name);
+        current_skin_name = g_strdup (skin_name);
+        skin_apply (skin_name);
+
+        button_set_text (button, str_fit_to_term (skin_label, 20, J_LEFT_FIT));
+    }
+    widget_destroy (WIDGET (skin_dlg));
+
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+appearance_box_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_INIT:
+#ifdef ENABLE_SHADOWS
+        if (!tty_use_colors ())
+#endif
+        {
+            Widget *shadow;
+
+            shadow = widget_find_by_id (w, shadows_id);
+            CHECK (shadow)->state = FALSE;
+            widget_disable (shadow, TRUE);
+        }
+        return MSG_HANDLED;
+
+    case MSG_NOTIFY:
+        if (sender != NULL && sender->id == shadows_id)
+        {
+            mc_global.tty.shadows = CHECK (sender)->state;
+            repaint_screen ();
+            return MSG_HANDLED;
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+panel_listing_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_NOTIFY:
+        if (sender != NULL && sender->id == panel_list_formats_id)
+        {
+            WCheck *ch;
+            WInput *in1, *in2, *in3;
+
+            in1 = INPUT (widget_find_by_id (w, panel_user_format_id));
+            in2 = INPUT (widget_find_by_id (w, panel_brief_cols_id));
+            ch = CHECK (widget_find_by_id (w, user_mini_status_id));
+            in3 = INPUT (widget_find_by_id (w, mini_user_format_id));
+
+            if (!ch->state)
+                input_assign_text (in3, status_format[RADIO (sender)->sel]);
+            input_update (in1, FALSE);
+            input_update (in2, FALSE);
+            input_update (in3, FALSE);
+            widget_disable (WIDGET (in1), RADIO (sender)->sel != panel_list_user_idx);
+            widget_disable (WIDGET (in2), RADIO (sender)->sel != panel_list_brief_idx);
+            return MSG_HANDLED;
+        }
+
+        if (sender != NULL && sender->id == user_mini_status_id)
+        {
+            WInput *in;
+
+            in = INPUT (widget_find_by_id (w, mini_user_format_id));
+
+            if (CHECK (sender)->state)
+            {
+                widget_disable (WIDGET (in), FALSE);
+                input_assign_text (in, status_format[3]);
+            }
+            else
+            {
+                WRadio *r;
+
+                r = RADIO (widget_find_by_id (w, panel_list_formats_id));
+                widget_disable (WIDGET (in), TRUE);
+                input_assign_text (in, status_format[r->sel]);
+            }
+            /* input_update (in, FALSE); */
+            return MSG_HANDLED;
+        }
+
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_CHARSET
+static int
+sel_charset_button (WButton * button, int action)
+{
+    int new_dcp;
+
+    (void) action;
+
+    new_dcp = select_charset (-1, -1, new_display_codepage, TRUE);
+
+    if (new_dcp != SELECT_CHARSET_CANCEL)
+    {
+        const char *cpname;
+
+        new_display_codepage = new_dcp;
+        cpname = (new_display_codepage == SELECT_CHARSET_OTHER_8BIT) ?
+            _("Other 8 bit") :
+            ((codepage_desc *) g_ptr_array_index (codepages, new_display_codepage))->name;
+        if (cpname != NULL)
+            mc_global.utf8_display = str_isutf8 (cpname);
+        else
+            cpname = _("7-bit ASCII");  /* FIXME */
+
+        button_set_text (button, cpname);
+        widget_draw (WIDGET (WIDGET (button)->owner));
+    }
+
+    return 0;
+}
+#endif /* HAVE_CHARSET */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+tree_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_RESIZE:
+        {
+            WRect r = w->rect;
+            Widget *bar;
+
+            r.lines = LINES - 9;
+            r.cols = COLS - 20;
+            dlg_default_callback (w, NULL, MSG_RESIZE, 0, &r);
+
+            bar = WIDGET (buttonbar_find (h));
+            bar->rect.x = 0;
+            bar->rect.y = LINES - 1;
+            return MSG_HANDLED;
+        }
+
+    case MSG_ACTION:
+        return send_message (find_tree (h), NULL, MSG_ACTION, parm, NULL);
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#if defined(ENABLE_VFS) && defined (ENABLE_VFS_FTP)
+static cb_ret_t
+confvfs_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_NOTIFY:
+        /* message from "Always use ftp proxy" checkbutton */
+        if (sender != NULL && sender->id == ftpfs_always_use_proxy_id)
+        {
+            const gboolean not_use = !CHECK (sender)->state;
+            Widget *wi;
+
+            /* input */
+            wi = widget_find_by_id (w, ftpfs_proxy_host_id);
+            widget_disable (wi, not_use);
+            return MSG_HANDLED;
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+#endif /* ENABLE_VFS && ENABLE_VFS_FTP */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_BACKGROUND
+static void
+jobs_fill_listbox (WListbox * list)
+{
+    static const char *state_str[2] = { "", "" };
+    TaskList *tl;
+
+    if (state_str[0][0] == '\0')
+    {
+        state_str[0] = _("Running");
+        state_str[1] = _("Stopped");
+    }
+
+    for (tl = task_list; tl != NULL; tl = tl->next)
+    {
+        char *s;
+
+        s = g_strconcat (state_str[tl->state], " ", tl->info, (char *) NULL);
+        listbox_add_item (list, LISTBOX_APPEND_AT_END, 0, s, (void *) tl, FALSE);
+        g_free (s);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+task_cb (WButton * button, int action)
+{
+    TaskList *tl;
+    int sig = 0;
+
+    (void) button;
+
+    if (bg_list->list == NULL)
+        return 0;
+
+    /* Get this instance information */
+    listbox_get_current (bg_list, NULL, (void **) &tl);
+
+#ifdef SIGTSTP
+    if (action == B_STOP)
+    {
+        sig = SIGSTOP;
+        tl->state = Task_Stopped;
+    }
+    else if (action == B_RESUME)
+    {
+        sig = SIGCONT;
+        tl->state = Task_Running;
+    }
+    else
+#endif
+    if (action == B_KILL)
+        sig = SIGKILL;
+
+    if (sig == SIGKILL)
+        unregister_task_running (tl->pid, tl->fd);
+
+    kill (tl->pid, sig);
+    listbox_remove_list (bg_list);
+    jobs_fill_listbox (bg_list);
+
+    /* This can be optimized to just redraw this widget :-) */
+    widget_draw (WIDGET (WIDGET (button)->owner));
+
+    return 0;
+}
+#endif /* ENABLE_BACKGROUND */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+configure_box (void)
+{
+    const char *pause_options[] = {
+        N_("&Never"),
+        N_("On dum&b terminals"),
+        N_("Alwa&ys")
+    };
+
+    int pause_options_num;
+
+    pause_options_num = G_N_ELEMENTS (pause_options);
+
+    {
+        char time_out[BUF_TINY] = "";
+        char *time_out_new;
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_START_GROUPBOX (N_("File operations")),
+                    QUICK_CHECKBOX (N_("&Verbose operation"), &verbose, NULL),
+                    QUICK_CHECKBOX (N_("Compute tota&ls"), &file_op_compute_totals, NULL),
+                    QUICK_CHECKBOX (N_("Classic pro&gressbar"), &classic_progressbar, NULL),
+                    QUICK_CHECKBOX (N_("Mkdi&r autoname"), &auto_fill_mkdir_name, NULL),
+                    QUICK_CHECKBOX (N_("&Preallocate space"), &mc_global.vfs.preallocate_space,
+                                    NULL),
+                QUICK_STOP_GROUPBOX,
+                QUICK_START_GROUPBOX (N_("Esc key mode")),
+                    QUICK_CHECKBOX (N_("S&ingle press"), &old_esc_mode, &configure_old_esc_mode_id),
+                    QUICK_LABELED_INPUT (N_("Timeout:"), input_label_left,
+                                         (const char *) time_out, MC_HISTORY_ESC_TIMEOUT,
+                                         &time_out_new, &configure_time_out_id, FALSE, FALSE,
+                                         INPUT_COMPLETE_NONE),
+                QUICK_STOP_GROUPBOX,
+                QUICK_START_GROUPBOX (N_("Pause after run")),
+                    QUICK_RADIO (pause_options_num, pause_options, &pause_after_run, NULL),
+                QUICK_STOP_GROUPBOX,
+            QUICK_NEXT_COLUMN,
+                QUICK_START_GROUPBOX (N_("Other options")),
+                    QUICK_CHECKBOX (N_("Use internal edi&t"), &use_internal_edit, NULL),
+                    QUICK_CHECKBOX (N_("Use internal vie&w"), &use_internal_view, NULL),
+                    QUICK_CHECKBOX (N_("A&sk new file name"),
+                                    &editor_ask_filename_before_edit, NULL),
+                    QUICK_CHECKBOX (N_("Auto m&enus"), &auto_menu, NULL),
+                    QUICK_CHECKBOX (N_("&Drop down menus"), &drop_menus, NULL),
+                    QUICK_CHECKBOX (N_("S&hell patterns"), &easy_patterns, NULL),
+                    QUICK_CHECKBOX (N_("Co&mplete: show all"),
+                                    &mc_global.widget.show_all_if_ambiguous, NULL),
+                    QUICK_CHECKBOX (N_("Rotating d&ash"), &nice_rotating_dash, NULL),
+                    QUICK_CHECKBOX (N_("Cd follows lin&ks"), &mc_global.vfs.cd_symlinks, NULL),
+                    QUICK_CHECKBOX (N_("Sa&fe delete"), &safe_delete, NULL),
+                    QUICK_CHECKBOX (N_("Safe overwrite"), &safe_overwrite, NULL),       /* w/o hotkey */
+                    QUICK_CHECKBOX (N_("A&uto save setup"), &auto_save_setup, NULL),
+                    QUICK_SEPARATOR (FALSE),
+                    QUICK_SEPARATOR (FALSE),
+                QUICK_STOP_GROUPBOX,
+            QUICK_STOP_COLUMNS,
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 60 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Configure options"), "[Configuration]",
+            quick_widgets, configure_callback, NULL
+        };
+
+        g_snprintf (time_out, sizeof (time_out), "%d", old_esc_mode_timeout);
+
+#ifndef USE_INTERNAL_EDIT
+        quick_widgets[17].state = WST_DISABLED;
+#endif
+
+        if (!old_esc_mode)
+            quick_widgets[10].state = quick_widgets[11].state = WST_DISABLED;
+
+#ifndef HAVE_POSIX_FALLOCATE
+        mc_global.vfs.preallocate_space = FALSE;
+        quick_widgets[7].state = WST_DISABLED;
+#endif
+
+        if (quick_dialog (&qdlg) == B_ENTER)
+        {
+            if (time_out_new[0] == '\0')
+                old_esc_mode_timeout = 0;
+            else
+                old_esc_mode_timeout = atoi (time_out_new);
+        }
+
+        g_free (time_out_new);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+appearance_box (void)
+{
+    gboolean shadows = mc_global.tty.shadows;
+
+    current_skin_name = g_strdup (mc_skin__default.name);
+    skin_names = mc_skin_list ();
+
+    {
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_LABEL (N_("Skin:"), NULL),
+            QUICK_NEXT_COLUMN,
+                QUICK_BUTTON (str_fit_to_term (skin_name_to_label (current_skin_name), 20, J_LEFT_FIT),
+                              B_USER, sel_skin_button, NULL),
+            QUICK_STOP_COLUMNS,
+            QUICK_SEPARATOR (TRUE),
+            QUICK_CHECKBOX (N_("&Shadows"), &mc_global.tty.shadows, &shadows_id),
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 54 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Appearance"), "[Appearance]",
+            quick_widgets, appearance_box_callback, NULL
+        };
+
+        if (quick_dialog (&qdlg) == B_ENTER)
+            mc_config_set_string (mc_global.main_config, CONFIG_APP_SECTION, "skin",
+                                  current_skin_name);
+        else
+        {
+            skin_apply (NULL);
+            mc_global.tty.shadows = shadows;
+        }
+    }
+
+    g_free (current_skin_name);
+    g_ptr_array_free (skin_names, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_options_box (void)
+{
+    gboolean simple_swap;
+
+    simple_swap = mc_config_get_bool (mc_global.main_config, CONFIG_PANELS_SECTION,
+                                      "simple_swap", FALSE);
+    {
+        const char *qsearch_options[] = {
+            N_("Case &insensitive"),
+            N_("Cas&e sensitive"),
+            N_("Use panel sort mo&de")
+        };
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_START_GROUPBOX (N_("Main options")),
+                    QUICK_CHECKBOX (N_("Show mi&ni-status"), &panels_options.show_mini_info, NULL),
+                    QUICK_CHECKBOX (N_("Use SI si&ze units"), &panels_options.kilobyte_si, NULL),
+                    QUICK_CHECKBOX (N_("Mi&x all files"), &panels_options.mix_all_files, NULL),
+                    QUICK_CHECKBOX (N_("Show &backup files"), &panels_options.show_backups, NULL),
+                    QUICK_CHECKBOX (N_("Show &hidden files"), &panels_options.show_dot_files, NULL),
+                    QUICK_CHECKBOX (N_("&Fast dir reload"), &panels_options.fast_reload, NULL),
+                    QUICK_CHECKBOX (N_("Ma&rk moves down"), &panels_options.mark_moves_down, NULL),
+                    QUICK_CHECKBOX (N_("Re&verse files only"), &panels_options.reverse_files_only,
+                                    NULL),
+                    QUICK_CHECKBOX (N_("Simple s&wap"), &simple_swap, NULL),
+                    QUICK_CHECKBOX (N_("A&uto save panels setup"), &panels_options.auto_save_setup,
+                                    NULL),
+                    QUICK_SEPARATOR (FALSE),
+                    QUICK_SEPARATOR (FALSE),
+                    QUICK_SEPARATOR (FALSE),
+                QUICK_STOP_GROUPBOX,
+            QUICK_NEXT_COLUMN,
+                QUICK_START_GROUPBOX (N_("Navigation")),
+                    QUICK_CHECKBOX (N_("L&ynx-like motion"), &panels_options.navigate_with_arrows,
+                                    NULL),
+                    QUICK_CHECKBOX (N_("Pa&ge scrolling"), &panels_options.scroll_pages, NULL),
+                    QUICK_CHECKBOX (N_("Center &scrolling"), &panels_options.scroll_center, NULL),
+                    QUICK_CHECKBOX (N_("&Mouse page scrolling"), &panels_options.mouse_move_pages,
+                                    NULL),
+                QUICK_STOP_GROUPBOX,
+                QUICK_START_GROUPBOX (N_("File highlight")),
+                    QUICK_CHECKBOX (N_("File &types"), &panels_options.filetype_mode, NULL),
+                    QUICK_CHECKBOX (N_("&Permissions"), &panels_options.permission_mode, NULL),
+                QUICK_STOP_GROUPBOX,
+                QUICK_START_GROUPBOX (N_("Quick search")),
+                    QUICK_RADIO (QSEARCH_NUM, qsearch_options, (int *) &panels_options.qsearch_mode,
+                                 NULL),
+                QUICK_STOP_GROUPBOX,
+            QUICK_STOP_COLUMNS,
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 60 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Panel options"), "[Panel options]",
+            quick_widgets, NULL, NULL
+        };
+
+        if (quick_dialog (&qdlg) != B_ENTER)
+            return;
+    }
+
+    mc_config_set_bool (mc_global.main_config, CONFIG_PANELS_SECTION, "simple_swap", simple_swap);
+
+    if (!panels_options.fast_reload_msg_shown && panels_options.fast_reload)
+    {
+        message (D_NORMAL, _("Information"),
+                 _("Using the fast reload option may not reflect the exact\n"
+                   "directory contents. In this case you'll need to do a\n"
+                   "manual reload of the directory. See the man page for\n" "the details."));
+        panels_options.fast_reload_msg_shown = TRUE;
+    }
+
+    update_panels (UP_RELOAD, UP_KEEPSEL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* return list type */
+int
+panel_listing_box (WPanel * panel, int num, char **userp, char **minip, gboolean * use_msformat,
+                   int *brief_cols)
+{
+    int result = -1;
+    const char *p = NULL;
+
+    if (panel == NULL)
+    {
+        p = get_nth_panel_name (num);
+        panel = panel_empty_new (p);
+    }
+
+    {
+        gboolean user_mini_status;
+        char panel_brief_cols_in[BUF_TINY];
+        char *panel_brief_cols_out = NULL;
+        char *panel_user_format = NULL;
+        char *mini_user_format = NULL;
+
+        /* Controls whether the array strings have been translated */
+        const char *list_formats[LIST_FORMATS] = {
+            N_("&Full file list"),
+            N_("&Brief file list:"),
+            N_("&Long file list"),
+            N_("&User defined:")
+        };
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_RADIO (LIST_FORMATS, list_formats, &result, &panel_list_formats_id),
+            QUICK_NEXT_COLUMN,
+                QUICK_SEPARATOR (FALSE),
+                QUICK_LABELED_INPUT (_ ("columns"), input_label_right, panel_brief_cols_in,
+                                     "panel-brief-cols-input", &panel_brief_cols_out,
+                                     &panel_brief_cols_id, FALSE, FALSE, INPUT_COMPLETE_NONE),
+            QUICK_STOP_COLUMNS,
+            QUICK_INPUT (panel->user_format, "user-fmt-input", &panel_user_format,
+                         &panel_user_format_id, FALSE, FALSE, INPUT_COMPLETE_NONE),
+            QUICK_SEPARATOR (TRUE),
+            QUICK_CHECKBOX (N_("User &mini status"), &user_mini_status, &user_mini_status_id),
+            QUICK_INPUT (panel->user_status_format[panel->list_format], "mini_input",
+                         &mini_user_format, &mini_user_format_id, FALSE, FALSE, INPUT_COMPLETE_NONE),
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 48 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Listing format"), "[Listing Format...]",
+            quick_widgets, panel_listing_callback, NULL
+        };
+
+        user_mini_status = panel->user_mini_status;
+        result = panel->list_format;
+        status_format = panel->user_status_format;
+
+        g_snprintf (panel_brief_cols_in, sizeof (panel_brief_cols_in), "%d", panel->brief_cols);
+
+        if ((int) panel->list_format != panel_list_brief_idx)
+            quick_widgets[4].state = WST_DISABLED;
+
+        if ((int) panel->list_format != panel_list_user_idx)
+            quick_widgets[6].state = WST_DISABLED;
+
+        if (!user_mini_status)
+            quick_widgets[9].state = WST_DISABLED;
+
+        if (quick_dialog (&qdlg) == B_CANCEL)
+            result = -1;
+        else
+        {
+            int cols;
+            char *error = NULL;
+
+            *userp = panel_user_format;
+            *minip = mini_user_format;
+            *use_msformat = user_mini_status;
+
+            cols = strtol (panel_brief_cols_out, &error, 10);
+            if (*error == '\0')
+                *brief_cols = cols;
+            else
+                *brief_cols = panel->brief_cols;
+
+            g_free (panel_brief_cols_out);
+        }
+    }
+
+    if (p != NULL)
+    {
+        int i;
+
+        g_free (panel->user_format);
+        for (i = 0; i < LIST_FORMATS; i++)
+            g_free (panel->user_status_format[i]);
+        g_free (panel);
+    }
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const panel_field_t *
+sort_box (dir_sort_options_t * op, const panel_field_t * sort_field)
+{
+    char **sort_orders_names;
+    gsize i;
+    gsize sort_names_num = 0;
+    int sort_idx = 0;
+    const panel_field_t *result = NULL;
+
+    sort_orders_names = panel_get_sortable_fields (&sort_names_num);
+
+    for (i = 0; i < sort_names_num; i++)
+        if (strcmp (sort_orders_names[i], _(sort_field->title_hotkey)) == 0)
+        {
+            sort_idx = i;
+            break;
+        }
+
+    {
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_RADIO (sort_names_num, (const char **) sort_orders_names, &sort_idx, NULL),
+            QUICK_NEXT_COLUMN,
+                QUICK_CHECKBOX (N_("Executable &first"), &op->exec_first, NULL),
+                QUICK_CHECKBOX (N_("Cas&e sensitive"), &op->case_sensitive, NULL),
+                QUICK_CHECKBOX (N_("&Reverse"), &op->reverse, NULL),
+            QUICK_STOP_COLUMNS,
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 40 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Sort order"), "[Sort Order...]",
+            quick_widgets, NULL, NULL
+        };
+
+        if (quick_dialog (&qdlg) != B_CANCEL)
+            result = panel_get_field_by_title_hotkey (sort_orders_names[sort_idx]);
+
+        if (result == NULL)
+            result = sort_field;
+    }
+
+    g_strfreev (sort_orders_names);
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+confirm_box (void)
+{
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        /* TRANSLATORS: no need to translate 'Confirmation', it's just a context prefix */
+        QUICK_CHECKBOX (Q_("Confirmation|&Delete"), &confirm_delete, NULL),
+        QUICK_CHECKBOX (Q_("Confirmation|O&verwrite"), &confirm_overwrite, NULL),
+        QUICK_CHECKBOX (Q_("Confirmation|&Execute"), &confirm_execute, NULL),
+        QUICK_CHECKBOX (Q_("Confirmation|E&xit"), &confirm_exit, NULL),
+        QUICK_CHECKBOX (Q_("Confirmation|Di&rectory hotlist delete"),
+                        &confirm_directory_hotlist_delete, NULL),
+        QUICK_CHECKBOX (Q_("Confirmation|&History cleanup"),
+                        &mc_global.widget.confirm_history_cleanup, NULL),
+        QUICK_BUTTONS_OK_CANCEL,
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 46 };
+
+    quick_dialog_t qdlg = {
+        r, N_("Confirmation"), "[Confirmation]",
+        quick_widgets, NULL, NULL
+    };
+
+    (void) quick_dialog (&qdlg);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifndef HAVE_CHARSET
+void
+display_bits_box (void)
+{
+    gboolean new_meta;
+    int current_mode;
+
+    const char *display_bits_str[] = {
+        N_("&UTF-8 output"),
+        N_("&Full 8 bits output"),
+        N_("&ISO 8859-1"),
+        N_("7 &bits")
+    };
+
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        QUICK_RADIO (4, display_bits_str, &current_mode, NULL),
+        QUICK_SEPARATOR (TRUE),
+        QUICK_CHECKBOX (N_("F&ull 8 bits input"), &new_meta, NULL),
+        QUICK_BUTTONS_OK_CANCEL,
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 46 };
+
+    quick_dialog_t qdlg = {
+        r, _("Display bits"), "[Display bits]",
+        quick_widgets, NULL, NULL
+    };
+
+    if (mc_global.full_eight_bits)
+        current_mode = 0;
+    else if (mc_global.eight_bit_clean)
+        current_mode = 1;
+    else
+        current_mode = 2;
+
+    new_meta = !use_8th_bit_as_meta;
+
+    if (quick_dialog (&qdlg) != B_CANCEL)
+    {
+        mc_global.eight_bit_clean = current_mode < 3;
+        mc_global.full_eight_bits = current_mode < 2;
+#ifndef HAVE_SLANG
+        tty_display_8bit (mc_global.eight_bit_clean);
+#else
+        tty_display_8bit (mc_global.full_eight_bits);
+#endif
+        use_8th_bit_as_meta = !new_meta;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+#else /* HAVE_CHARSET */
+
+void
+display_bits_box (void)
+{
+    const char *cpname;
+
+    new_display_codepage = mc_global.display_codepage;
+
+    cpname = (new_display_codepage < 0) ? _("Other 8 bit")
+        : ((codepage_desc *) g_ptr_array_index (codepages, new_display_codepage))->name;
+
+    {
+        gboolean new_meta;
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_START_COLUMNS,
+                QUICK_LABEL (N_("Input / display codepage:"), NULL),
+            QUICK_NEXT_COLUMN,
+                QUICK_BUTTON (cpname, B_USER, sel_charset_button, NULL),
+            QUICK_STOP_COLUMNS,
+            QUICK_SEPARATOR (TRUE),
+                QUICK_CHECKBOX (N_("F&ull 8 bits input"), &new_meta, NULL),
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 46 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Display bits"), "[Display bits]",
+            quick_widgets, NULL, NULL
+        };
+
+        new_meta = !use_8th_bit_as_meta;
+        application_keypad_mode ();
+
+        if (quick_dialog (&qdlg) == B_ENTER)
+        {
+            char *errmsg;
+
+            mc_global.display_codepage = new_display_codepage;
+
+            errmsg = init_translation_table (mc_global.source_codepage, mc_global.display_codepage);
+            if (errmsg != NULL)
+            {
+                message (D_ERROR, MSG_ERROR, "%s", errmsg);
+                g_free (errmsg);
+            }
+
+#ifdef HAVE_SLANG
+            tty_display_8bit (mc_global.display_codepage != 0 && mc_global.display_codepage != 1);
+#else
+            tty_display_8bit (mc_global.display_codepage != 0);
+#endif
+            use_8th_bit_as_meta = !new_meta;
+
+            repaint_screen ();
+        }
+    }
+}
+#endif /* HAVE_CHARSET */
+
+/* --------------------------------------------------------------------------------------------- */
+/** Show tree in a box, not on a panel */
+
+char *
+tree_box (const char *current_dir)
+{
+    WTree *mytree;
+    WDialog *dlg;
+    WGroup *g;
+    Widget *wd;
+    char *val = NULL;
+    WButtonBar *bar;
+
+    (void) current_dir;
+
+    /* Create the components */
+    dlg = dlg_create (TRUE, 0, 0, LINES - 9, COLS - 20, WPOS_CENTER, FALSE, dialog_colors,
+                      tree_callback, NULL, "[Directory Tree]", _("Directory tree"));
+    g = GROUP (dlg);
+    wd = WIDGET (dlg);
+
+    mytree = tree_new (2, 2, wd->rect.lines - 6, wd->rect.cols - 5, FALSE);
+    group_add_widget_autopos (g, mytree, WPOS_KEEP_ALL, NULL);
+    group_add_widget_autopos (g, hline_new (wd->rect.lines - 4, 1, -1), WPOS_KEEP_BOTTOM, NULL);
+    bar = buttonbar_new ();
+    group_add_widget (g, bar);
+    /* restore ButtonBar coordinates after add_widget() */
+    WIDGET (bar)->rect.x = 0;
+    WIDGET (bar)->rect.y = LINES - 1;
+
+    if (dlg_run (dlg) == B_ENTER)
+    {
+        const vfs_path_t *selected_name;
+
+        selected_name = tree_selected_name (mytree);
+        val = g_strdup (vfs_path_as_str (selected_name));
+    }
+
+    widget_destroy (wd);
+    return val;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS
+void
+configure_vfs_box (void)
+{
+    char buffer2[BUF_TINY];
+#ifdef ENABLE_VFS_FTP
+    char buffer3[BUF_TINY];
+
+    g_snprintf (buffer3, sizeof (buffer3), "%i", ftpfs_directory_timeout);
+#endif
+
+    g_snprintf (buffer2, sizeof (buffer2), "%i", vfs_timeout);
+
+    {
+        char *ret_timeout;
+#ifdef ENABLE_VFS_FTP
+        char *ret_passwd;
+        char *ret_ftp_proxy;
+        char *ret_directory_timeout;
+#endif /* ENABLE_VFS_FTP */
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_LABELED_INPUT (N_("Timeout for freeing VFSs (sec):"), input_label_left,
+                                 buffer2, "input-timo-vfs", &ret_timeout, NULL, FALSE, FALSE,
+                                 INPUT_COMPLETE_NONE),
+#ifdef ENABLE_VFS_FTP
+            QUICK_SEPARATOR (TRUE),
+            QUICK_LABELED_INPUT (N_("FTP anonymous password:"), input_label_left,
+                                 ftpfs_anonymous_passwd, "input-passwd", &ret_passwd, NULL,
+                                 FALSE, FALSE, INPUT_COMPLETE_NONE),
+            QUICK_LABELED_INPUT (N_("FTP directory cache timeout (sec):"), input_label_left,
+                                 buffer3, "input-timeout", &ret_directory_timeout, NULL,
+                                 FALSE, FALSE, INPUT_COMPLETE_NONE),
+            QUICK_CHECKBOX (N_("&Always use ftp proxy:"), &ftpfs_always_use_proxy,
+                            &ftpfs_always_use_proxy_id),
+            QUICK_INPUT (ftpfs_proxy_host, "input-ftp-proxy", &ret_ftp_proxy,
+                         &ftpfs_proxy_host_id, FALSE, FALSE, INPUT_COMPLETE_HOSTNAMES),
+            QUICK_CHECKBOX (N_("&Use ~/.netrc"), &ftpfs_use_netrc, NULL),
+            QUICK_CHECKBOX (N_("Use &passive mode"), &ftpfs_use_passive_connections, NULL),
+            QUICK_CHECKBOX (N_("Use passive mode over pro&xy"),
+                            &ftpfs_use_passive_connections_over_proxy, NULL),
+#endif /* ENABLE_VFS_FTP */
+            QUICK_BUTTONS_OK_CANCEL,
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, 56 };
+
+        quick_dialog_t qdlg = {
+            r, N_("Virtual File System Setting"), "[Virtual FS]",
+            quick_widgets,
+#ifdef ENABLE_VFS_FTP
+            confvfs_callback,
+#else
+            NULL,
+#endif
+            NULL,
+        };
+
+#ifdef ENABLE_VFS_FTP
+        if (!ftpfs_always_use_proxy)
+            quick_widgets[5].state = WST_DISABLED;
+#endif
+
+        if (quick_dialog (&qdlg) != B_CANCEL)
+        {
+            /* cppcheck-suppress uninitvar */
+            if (ret_timeout[0] == '\0')
+                vfs_timeout = 0;
+            else
+                vfs_timeout = atoi (ret_timeout);
+            g_free (ret_timeout);
+
+            if (vfs_timeout < 0 || vfs_timeout > 10000)
+                vfs_timeout = 10;
+#ifdef ENABLE_VFS_FTP
+            g_free (ftpfs_anonymous_passwd);
+            /* cppcheck-suppress uninitvar */
+            ftpfs_anonymous_passwd = ret_passwd;
+            g_free (ftpfs_proxy_host);
+            /* cppcheck-suppress uninitvar */
+            ftpfs_proxy_host = ret_ftp_proxy;
+            /* cppcheck-suppress uninitvar */
+            if (ret_directory_timeout[0] == '\0')
+                ftpfs_directory_timeout = 0;
+            else
+                ftpfs_directory_timeout = atoi (ret_directory_timeout);
+            g_free (ret_directory_timeout);
+#endif
+        }
+    }
+}
+
+#endif /* ENABLE_VFS */
+
+/* --------------------------------------------------------------------------------------------- */
+
+char *
+cd_box (const WPanel * panel)
+{
+    const Widget *w = CONST_WIDGET (panel);
+    char *my_str;
+
+    quick_widget_t quick_widgets[] = {
+        QUICK_LABELED_INPUT (N_("cd"), input_label_left, "", "input", &my_str, NULL, FALSE, TRUE,
+                             INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD),
+        QUICK_END
+    };
+
+    WRect r = { w->rect.y + w->rect.lines - 6, w->rect.x, 0, w->rect.cols };
+
+    quick_dialog_t qdlg = {
+        r, N_("Quick cd"), "[Quick cd]",
+        quick_widgets, NULL, NULL
+    };
+
+    return (quick_dialog (&qdlg) != B_CANCEL) ? my_str : NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+symlink_box (const vfs_path_t * existing_vpath, const vfs_path_t * new_vpath,
+             char **ret_existing, char **ret_new)
+{
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        QUICK_LABELED_INPUT (N_("Existing filename (filename symlink will point to):"),
+                             input_label_above, vfs_path_as_str (existing_vpath), "input-2",
+                             ret_existing, NULL, FALSE, FALSE, INPUT_COMPLETE_FILENAMES),
+        QUICK_SEPARATOR (FALSE),
+        QUICK_LABELED_INPUT (N_("Symbolic link filename:"), input_label_above,
+                             vfs_path_as_str (new_vpath), "input-1",
+                             ret_new, NULL, FALSE, FALSE, INPUT_COMPLETE_FILENAMES),
+        QUICK_BUTTONS_OK_CANCEL,
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 64 };
+
+    quick_dialog_t qdlg = {
+        r, N_("Symbolic link"), "[File Menu]",
+        quick_widgets, NULL, NULL
+    };
+
+    if (quick_dialog (&qdlg) == B_CANCEL)
+    {
+        *ret_new = NULL;
+        *ret_existing = NULL;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_BACKGROUND
+void
+jobs_box (void)
+{
+    struct
+    {
+        const char *name;
+        int flags;
+        int value;
+        int len;
+        bcback_fn callback;
+    }
+    job_but[] =
+    {
+        /* *INDENT-OFF* */
+        { N_("&Stop"), NORMAL_BUTTON, B_STOP, 0, task_cb },
+        { N_("&Resume"), NORMAL_BUTTON, B_RESUME, 0, task_cb },
+        { N_("&Kill"), NORMAL_BUTTON, B_KILL, 0, task_cb },
+        { N_("&OK"), DEFPUSH_BUTTON, B_CANCEL, 0, NULL }
+        /* *INDENT-ON* */
+    };
+
+    size_t i;
+    const size_t n_but = G_N_ELEMENTS (job_but);
+
+    WDialog *jobs_dlg;
+    WGroup *g;
+    int cols = 60;
+    int lines = 15;
+    int x = 0;
+
+    for (i = 0; i < n_but; i++)
+    {
+#ifdef ENABLE_NLS
+        job_but[i].name = _(job_but[i].name);
+#endif /* ENABLE_NLS */
+
+        job_but[i].len = str_term_width1 (job_but[i].name) + 3;
+        if (job_but[i].flags == DEFPUSH_BUTTON)
+            job_but[i].len += 2;
+        x += job_but[i].len;
+    }
+
+    x += (int) n_but - 1;
+    cols = MAX (cols, x + 6);
+
+    jobs_dlg = dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, NULL, NULL,
+                           "[Background jobs]", _("Background jobs"));
+    g = GROUP (jobs_dlg);
+
+    bg_list = listbox_new (2, 2, lines - 6, cols - 6, FALSE, NULL);
+    jobs_fill_listbox (bg_list);
+    group_add_widget (g, bg_list);
+
+    group_add_widget (g, hline_new (lines - 4, -1, -1));
+
+    x = (cols - x) / 2;
+    for (i = 0; i < n_but; i++)
+    {
+        group_add_widget (g, button_new (lines - 3, x, job_but[i].value, job_but[i].flags,
+                                         job_but[i].name, job_but[i].callback));
+        x += job_but[i].len + 1;
+    }
+
+    (void) dlg_run (jobs_dlg);
+    widget_destroy (WIDGET (jobs_dlg));
+}
+#endif /* ENABLE_BACKGROUND */
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/boxes.h b/src/filemanager/boxes.h
new file mode 100644
index 0000000..6cb115e
--- /dev/null
+++ b/src/filemanager/boxes.h
@@ -0,0 +1,37 @@
+/** \file boxes.h
+ *  \brief Header: Some misc dialog boxes for the program
+ */
+
+#ifndef MC__BOXES_H
+#define MC__BOXES_H
+
+#include "dir.h"
+#include "panel.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void configure_box (void);
+void appearance_box (void);
+void panel_options_box (void);
+int panel_listing_box (WPanel * p, int num, char **user, char **mini, gboolean * use_msformat,
+                       int *brief_cols);
+const panel_field_t *sort_box (dir_sort_options_t * op, const panel_field_t * sort_field);
+void confirm_box (void);
+void display_bits_box (void);
+void configure_vfs_box (void);
+void jobs_box (void);
+char *cd_box (const WPanel * panel);
+void symlink_box (const vfs_path_t * existing_vpath, const vfs_path_t * new_vpath,
+                  char **ret_existing, char **ret_new);
+char *tree_box (const char *current_dir);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__BOXES_H */
diff --git a/src/filemanager/cd.c b/src/filemanager/cd.c
new file mode 100644
index 0000000..564a605
--- /dev/null
+++ b/src/filemanager/cd.c
@@ -0,0 +1,310 @@
+/*
+   cd_to() function.
+
+   Copyright (C) 1995-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2020
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file cd.c
+ *  \brief Source: cd_to() function
+ */
+
+#include <config.h>
+
+#include <stdlib.h>
+#include <errno.h>
+#include <string.h>
+
+#include "lib/global.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strescape.h"      /* strutils_shell_unescape() */
+#include "lib/util.h"           /* whitespace() */
+#include "lib/widget.h"         /* message() */
+
+#include "filemanager.h"        /* current_panel, panel.h, layout.h */
+#include "tree.h"               /* sync_tree() */
+
+#include "cd.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Expand the argument to "cd" and change directory.  First try tilde
+ * expansion, then variable substitution.  If the CDPATH variable is set
+ * (e.g. CDPATH=".:~:/usr"), try all the paths contained there.
+ * We do not support such rare substitutions as ${var:-value} etc.
+ * No quoting is implemented here, so ${VAR} and $VAR will be always
+ * substituted.  Wildcards are not supported either.
+ * Advanced users should be encouraged to use "\cd" instead of "cd" if
+ * they want the behavior they are used to in the shell.
+ *
+ * @param _path string to examine
+ * @return newly allocated string
+ */
+
+static GString *
+examine_cd (const char *_path)
+{
+    /* *INDENT-OFF* */
+    typedef enum
+    {
+        copy_sym,
+        subst_var
+    } state_t;
+    /* *INDENT-ON* */
+
+    state_t state = copy_sym;
+    GString *q;
+    char *path_tilde, *path;
+    char *p;
+
+    /* Tilde expansion */
+    path = strutils_shell_unescape (_path);
+    path_tilde = tilde_expand (path);
+    g_free (path);
+
+    q = g_string_sized_new (32);
+
+    /* Variable expansion */
+    for (p = path_tilde; *p != '\0';)
+    {
+        switch (state)
+        {
+        case copy_sym:
+            if (p[0] == '\\' && p[1] == '$')
+            {
+                g_string_append_c (q, '$');
+                p += 2;
+            }
+            else if (p[0] != '$' || p[1] == '[' || p[1] == '(')
+            {
+                g_string_append_c (q, *p);
+                p++;
+            }
+            else
+                state = subst_var;
+            break;
+
+        case subst_var:
+            {
+                char *s = NULL;
+                char c;
+                const char *t = NULL;
+
+                /* skip dollar */
+                p++;
+
+                if (p[0] == '{')
+                {
+                    p++;
+                    s = strchr (p, '}');
+                }
+                if (s == NULL)
+                    s = strchr (p, PATH_SEP);
+                if (s == NULL)
+                    s = strchr (p, '\0');
+                c = *s;
+                *s = '\0';
+                t = getenv (p);
+                *s = c;
+                if (t == NULL)
+                {
+                    g_string_append_c (q, '$');
+                    if (p[-1] != '$')
+                        g_string_append_c (q, '{');
+                }
+                else
+                {
+                    g_string_append (q, t);
+                    p = s;
+                    if (*s == '}')
+                        p++;
+                }
+
+                state = copy_sym;
+                break;
+            }
+
+        default:
+            break;
+        }
+    }
+
+    g_free (path_tilde);
+
+    return q;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* CDPATH handling */
+static gboolean
+handle_cdpath (const char *path)
+{
+    gboolean result = FALSE;
+
+    /* CDPATH handling */
+    if (!IS_PATH_SEP (*path))
+    {
+        char *cdpath, *p;
+        char c;
+
+        cdpath = g_strdup (getenv ("CDPATH"));
+        p = cdpath;
+        c = (p == NULL) ? '\0' : ':';
+
+        while (!result && c == ':')
+        {
+            char *s;
+
+            s = strchr (p, ':');
+            if (s == NULL)
+                s = strchr (p, '\0');
+            c = *s;
+            *s = '\0';
+            if (*p != '\0')
+            {
+                vfs_path_t *r_vpath;
+
+                r_vpath = vfs_path_build_filename (p, path, (char *) NULL);
+                result = panel_cd (current_panel, r_vpath, cd_parse_command);
+                vfs_path_free (r_vpath, TRUE);
+            }
+            *s = c;
+            p = s + 1;
+        }
+        g_free (cdpath);
+    }
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/** Execute the cd command to specified path
+ *
+ * @param path path to cd
+ */
+
+void
+cd_to (const char *path)
+{
+    char *p;
+
+    /* Remove leading whitespaces. */
+    /* Any final whitespace should be removed here (to see why, try "cd fred "). */
+    /* NOTE: I think we should not remove the extra space,
+       that way, we can cd into hidden directories */
+    /* FIXME: what about interpreting quoted strings like the shell.
+       so one could type "cd <tab> M-a <enter>" and it would work. */
+    p = g_strstrip (g_strdup (path));
+
+    if (get_current_type () == view_tree)
+    {
+        vfs_path_t *new_vpath = NULL;
+
+        if (p[0] == '\0')
+        {
+            new_vpath = vfs_path_from_str (mc_config_get_home_dir ());
+            sync_tree (new_vpath);
+        }
+        else if (DIR_IS_DOTDOT (p))
+        {
+            if (vfs_path_elements_count (current_panel->cwd_vpath) != 1 ||
+                strlen (vfs_path_get_by_index (current_panel->cwd_vpath, 0)->path) > 1)
+            {
+                vfs_path_t *tmp_vpath = current_panel->cwd_vpath;
+
+                current_panel->cwd_vpath =
+                    vfs_path_vtokens_get (tmp_vpath, 0, vfs_path_tokens_count (tmp_vpath) - 1);
+                vfs_path_free (tmp_vpath, TRUE);
+            }
+            sync_tree (current_panel->cwd_vpath);
+        }
+        else
+        {
+            if (IS_PATH_SEP (*p))
+                new_vpath = vfs_path_from_str (p);
+            else
+                new_vpath = vfs_path_append_new (current_panel->cwd_vpath, p, (char *) NULL);
+
+            sync_tree (new_vpath);
+        }
+
+        vfs_path_free (new_vpath, TRUE);
+    }
+    else
+    {
+        GString *s_path;
+        vfs_path_t *q_vpath;
+        gboolean ok;
+
+        s_path = examine_cd (p);
+
+        if (s_path->len == 0)
+            q_vpath = vfs_path_from_str (mc_config_get_home_dir ());
+        else
+            q_vpath = vfs_path_from_str_flags (s_path->str, VPF_NO_CANON);
+
+        ok = panel_cd (current_panel, q_vpath, cd_parse_command);
+        if (!ok)
+            ok = handle_cdpath (s_path->str);
+        if (!ok)
+        {
+            char *d;
+
+            d = vfs_path_to_str_flags (q_vpath, 0, VPF_STRIP_PASSWORD);
+            cd_error_message (d);
+            g_free (d);
+        }
+
+        vfs_path_free (q_vpath, TRUE);
+        g_string_free (s_path, TRUE);
+    }
+
+    g_free (p);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+cd_error_message (const char *path)
+{
+    message (D_ERROR, MSG_ERROR, _("Cannot change directory to\n%s\n%s"), path,
+             unix_error_string (errno));
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/cd.h b/src/filemanager/cd.h
new file mode 100644
index 0000000..13e7718
--- /dev/null
+++ b/src/filemanager/cd.h
@@ -0,0 +1,23 @@
+/** \file cd.h
+ *  \brief Header: cd function
+ */
+
+#ifndef MC__CD_H
+#define MC__CD_H
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void cd_to (const char *path);
+void cd_error_message (const char *path);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__CD_H */
diff --git a/src/filemanager/chattr.c b/src/filemanager/chattr.c
new file mode 100644
index 0000000..08a5a99
--- /dev/null
+++ b/src/filemanager/chattr.c
@@ -0,0 +1,1358 @@
+/*
+   Chattr command -- for the Midnight Commander
+
+   Copyright (C) 2020-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Andrew Borodin <aborodin@vmail.ru>, 2020-2023
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file chattr.c
+ *  \brief Source: chattr command
+ */
+
+/* TODO: change attributes recursively (ticket #3109) */
+
+#include <config.h>
+
+#include <errno.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#include <ext2fs/ext2_fs.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"        /* tty_print*() */
+#include "lib/tty/color.h"      /* tty_setcolor() */
+#include "lib/skin.h"           /* COLOR_NORMAL, DISABLED_COLOR */
+#include "lib/vfs/vfs.h"
+#include "lib/widget.h"
+#include "lib/util.h"           /* x_basename() */
+
+#include "src/keymap.h"         /* chattr_map */
+
+#include "cmd.h"                /* chattr_cmd(), chattr_get_as_str() */
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define B_MARKED B_USER
+#define B_SETALL (B_USER + 1)
+#define B_SETMRK (B_USER + 2)
+#define B_CLRMRK (B_USER + 3)
+
+#define BUTTONS  6
+
+#define CHATTRBOXES(x) ((WChattrBoxes *)(x))
+
+/*** file scope type declarations ****************************************************************/
+
+typedef struct WFileAttrText WFileAttrText;
+
+struct WFileAttrText
+{
+    Widget widget;              /* base class */
+
+    char *filename;
+    int filename_width;         /* cached width of file name */
+    char attrs[32 + 1];         /* 32 bits in attributes (unsigned long) */
+};
+
+typedef struct WChattrBoxes WChattrBoxes;
+
+struct WChattrBoxes
+{
+    WGroup base;                /* base class */
+
+    int pos;                    /* The current checkbox selected */
+    int top;                    /* The first flag displayed */
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* see /usr/include/ext2fs/ext2_fs.h
+ *
+ * EXT2_SECRM_FL            0x00000001 -- Secure deletion
+ * EXT2_UNRM_FL             0x00000002 -- Undelete
+ * EXT2_COMPR_FL            0x00000004 -- Compress file
+ * EXT2_SYNC_FL             0x00000008 -- Synchronous updates
+ * EXT2_IMMUTABLE_FL        0x00000010 -- Immutable file
+ * EXT2_APPEND_FL           0x00000020 -- writes to file may only append
+ * EXT2_NODUMP_FL           0x00000040 -- do not dump file
+ * EXT2_NOATIME_FL          0x00000080 -- do not update atime
+ * * Reserved for compression usage...
+ * EXT2_DIRTY_FL            0x00000100
+ * EXT2_COMPRBLK_FL         0x00000200 -- One or more compressed clusters
+ * EXT2_NOCOMPR_FL          0x00000400 -- Access raw compressed data
+ * * nb: was previously EXT2_ECOMPR_FL
+ * EXT4_ENCRYPT_FL          0x00000800 -- encrypted inode
+ * * End compression flags --- maybe not all used
+ * EXT2_BTREE_FL            0x00001000 -- btree format dir
+ * EXT2_INDEX_FL            0x00001000 -- hash-indexed directory
+ * EXT2_IMAGIC_FL           0x00002000
+ * EXT3_JOURNAL_DATA_FL     0x00004000 -- file data should be journaled
+ * EXT2_NOTAIL_FL           0x00008000 -- file tail should not be merged
+ * EXT2_DIRSYNC_FL          0x00010000 -- Synchronous directory modifications
+ * EXT2_TOPDIR_FL           0x00020000 -- Top of directory hierarchies
+ * EXT4_HUGE_FILE_FL        0x00040000 -- Set to each huge file
+ * EXT4_EXTENTS_FL          0x00080000 -- Inode uses extents
+ * EXT4_VERITY_FL           0x00100000 -- Verity protected inode
+ * EXT4_EA_INODE_FL         0x00200000 -- Inode used for large EA
+ * EXT4_EOFBLOCKS_FL        0x00400000 was here, unused
+ * FS_NOCOW_FL              0x00800000 -- Do not cow file
+ * EXT4_SNAPFILE_FL         0x01000000 -- Inode is a snapshot
+ * FS_DAX_FL                0x02000000 -- Inode is DAX
+ * EXT4_SNAPFILE_DELETED_FL 0x04000000 -- Snapshot is being deleted
+ * EXT4_SNAPFILE_SHRUNK_FL  0x08000000 -- Snapshot shrink has completed
+ * EXT4_INLINE_DATA_FL      0x10000000 -- Inode has inline data
+ * EXT4_PROJINHERIT_FL      0x20000000 -- Create with parents projid
+ * EXT4_CASEFOLD_FL         0x40000000 -- Casefolded file
+ *                          0x80000000 -- unused yet
+ */
+
+static struct
+{
+    unsigned long flags;
+    char attr;
+    const char *text;
+    gboolean selected;
+    gboolean state;             /* state of checkboxes */
+} check_attr[] =
+{
+    /* *INDENT-OFF* */
+    { EXT2_SECRM_FL,        's', N_("Secure deletion"),               FALSE, FALSE },
+    { EXT2_UNRM_FL,         'u', N_("Undelete"),                      FALSE, FALSE },
+    { EXT2_SYNC_FL,         'S', N_("Synchronous updates"),           FALSE, FALSE },
+    { EXT2_DIRSYNC_FL,      'D', N_("Synchronous directory updates"), FALSE, FALSE },
+    { EXT2_IMMUTABLE_FL,    'i', N_("Immutable"),                     FALSE, FALSE },
+    { EXT2_APPEND_FL,       'a', N_("Append only"),                   FALSE, FALSE },
+    { EXT2_NODUMP_FL,       'd', N_("No dump"),                       FALSE, FALSE },
+    { EXT2_NOATIME_FL,      'A', N_("No update atime"),               FALSE, FALSE },
+    { EXT2_COMPR_FL,        'c', N_("Compress"),                      FALSE, FALSE },
+#ifdef EXT2_COMPRBLK_FL
+    /* removed in v1.43-WIP-2015-05-18
+       ext2fsprogs 4a05268cf86f7138c78d80a53f7e162f32128a3d 2015-04-12 */
+    { EXT2_COMPRBLK_FL,     'B', N_("Compressed clusters"),           FALSE, FALSE },
+#endif
+#ifdef EXT2_DIRTY_FL
+    /* removed in v1.43-WIP-2015-05-18
+       ext2fsprogs 4a05268cf86f7138c78d80a53f7e162f32128a3d 2015-04-12 */
+    { EXT2_DIRTY_FL,        'Z', N_("Compressed dirty file"),         FALSE, FALSE },
+#endif
+#ifdef EXT2_NOCOMPR_FL
+    /* removed in v1.43-WIP-2015-05-18
+       ext2fsprogs 4a05268cf86f7138c78d80a53f7e162f32128a3d 2015-04-12 */
+    { EXT2_NOCOMPR_FL,      'X', N_("Compression raw access"),        FALSE, FALSE },
+#endif
+#ifdef EXT4_ENCRYPT_FL
+    { EXT4_ENCRYPT_FL,      'E', N_("Encrypted inode"),               FALSE, FALSE },
+#endif
+    { EXT3_JOURNAL_DATA_FL, 'j', N_("Journaled data"),                FALSE, FALSE },
+    { EXT2_INDEX_FL,        'I', N_("Indexed directory"),             FALSE, FALSE },
+    { EXT2_NOTAIL_FL,       't', N_("No tail merging"),               FALSE, FALSE },
+    { EXT2_TOPDIR_FL,       'T', N_("Top of directory hierarchies"),  FALSE, FALSE },
+    { EXT4_EXTENTS_FL,      'e', N_("Inode uses extents"),            FALSE, FALSE },
+#ifdef EXT4_HUGE_FILE_FL
+    /* removed in v1.43.9
+       ext2fsprogs 4825daeb0228e556444d199274b08c499ac3706c 2018-02-06 */
+    { EXT4_HUGE_FILE_FL,    'h', N_("Huge_file"),                     FALSE, FALSE },
+#endif
+    { FS_NOCOW_FL,          'C', N_("No COW"),                        FALSE, FALSE },
+#ifdef FS_DAX_FL
+    /* added in v1.45.7
+       ext2fsprogs 1dd48bc23c3776df76459aff0c7723fff850ea45 2020-07-28 */
+    { FS_DAX_FL,            'x', N_("Direct access for files"),       FALSE, FALSE },
+#endif
+#ifdef EXT4_CASEFOLD_FL
+    /* added in v1.45.0
+       ext2fsprogs 1378bb6515e98a27f0f5c220381d49d20544204e 2018-12-01 */
+    { EXT4_CASEFOLD_FL,     'F', N_("Casefolded file"),               FALSE, FALSE },
+#endif
+#ifdef EXT4_INLINE_DATA_FL
+    { EXT4_INLINE_DATA_FL,  'N', N_("Inode has inline data"),         FALSE, FALSE },
+#endif
+#ifdef EXT4_PROJINHERIT_FL
+    /* added in v1.43-WIP-2016-05-12
+       ext2fsprogs e1cec4464bdaf93ea609de43c5cdeb6a1f553483 2016-03-07
+                   97d7e2fdb2ebec70c3124c1a6370d28ec02efad0 2016-05-09 */
+    { EXT4_PROJINHERIT_FL,  'P', N_("Project hierarchy"),             FALSE, FALSE },
+#endif
+#ifdef EXT4_VERITY_FL
+    /* added in v1.44.4
+       ext2fsprogs faae7aa00df0abe7c6151fc4947aa6501b981ee1 2018-08-14
+       v1.44.5
+       ext2fsprogs 7e5a95e3d59719361661086ec7188ca6e674f139 2018-08-21 */
+    { EXT4_VERITY_FL,       'V', N_("Verity protected inode"),        FALSE, FALSE }
+#endif
+    /* *INDENT-ON* */
+};
+
+/* number of attributes */
+static const size_t check_attr_num = G_N_ELEMENTS (check_attr);
+
+/* modifiable attribute numbers */
+static int check_attr_mod[32];
+static int check_attr_mod_num = 0;      /* 0..31 */
+
+/* maximum width of attribute text */
+static int check_attr_width = 0;
+
+static struct
+{
+    int ret_cmd;
+    button_flags_t flags;
+    int width;
+    const char *text;
+    Widget *button;
+} chattr_but[BUTTONS] =
+{
+    /* *INDENT-OFF* */
+    /* 0 */ { B_SETALL, NORMAL_BUTTON, 0, N_("Set &all"),      NULL },
+    /* 1 */ { B_MARKED, NORMAL_BUTTON, 0, N_("&Marked all"),   NULL },
+    /* 2 */ { B_SETMRK, NORMAL_BUTTON, 0, N_("S&et marked"),   NULL },
+    /* 3 */ { B_CLRMRK, NORMAL_BUTTON, 0, N_("C&lear marked"), NULL },
+    /* 4 */ { B_ENTER, DEFPUSH_BUTTON, 0, N_("&Set"),          NULL },
+    /* 5 */ { B_CANCEL, NORMAL_BUTTON, 0, N_("&Cancel"),       NULL }
+    /* *INDENT-ON* */
+};
+
+static gboolean flags_changed;
+static int current_file;
+static gboolean ignore_all;
+
+static unsigned long and_mask, or_mask, flags;
+
+static WFileAttrText *file_attr;
+
+/* x-coord of widget in the dialog */
+static const int wx = 3;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static inline gboolean
+chattr_is_modifiable (size_t i)
+{
+    return ((check_attr[i].flags & EXT2_FL_USER_MODIFIABLE) != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_fill_str (unsigned long attr, char *str)
+{
+    size_t i;
+
+    for (i = 0; i < check_attr_num; i++)
+        str[i] = (attr & check_attr[i].flags) != 0 ? check_attr[i].attr : '-';
+
+    str[check_attr_num] = '\0';
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+fileattrtext_fill (WFileAttrText * fat, unsigned long attr)
+{
+    chattr_fill_str (attr, fat->attrs);
+    widget_draw (WIDGET (fat));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+fileattrtext_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WFileAttrText *fat = (WFileAttrText *) w;
+
+    switch (msg)
+    {
+    case MSG_DRAW:
+        {
+            int color;
+            size_t i;
+
+            color = COLOR_NORMAL;
+            tty_setcolor (color);
+
+            if (w->rect.cols > fat->filename_width)
+            {
+                widget_gotoyx (w, 0, (w->rect.cols - fat->filename_width) / 2);
+                tty_print_string (fat->filename);
+            }
+            else
+            {
+                widget_gotoyx (w, 0, 0);
+                tty_print_string (str_trunc (fat->filename, w->rect.cols));
+            }
+
+            /* hope that w->cols is greater than check_attr_num */
+            widget_gotoyx (w, 1, (w->rect.cols - check_attr_num) / 2);
+            for (i = 0; i < check_attr_num; i++)
+            {
+                /* Do not set new color for each symbol. Try to use previous color. */
+                if (chattr_is_modifiable (i))
+                {
+                    if (color == DISABLED_COLOR)
+                    {
+                        color = COLOR_NORMAL;
+                        tty_setcolor (color);
+                    }
+                }
+                else
+                {
+                    if (color != DISABLED_COLOR)
+                    {
+                        color = DISABLED_COLOR;
+                        tty_setcolor (color);
+                    }
+                }
+
+                tty_print_char (fat->attrs[i]);
+            }
+            return MSG_HANDLED;
+        }
+
+    case MSG_RESIZE:
+        {
+            const WRect *wo = &CONST_WIDGET (w->owner)->rect;
+
+            widget_default_callback (w, sender, msg, parm, data);
+            /* initially file name may be wider than screen */
+            if (fat->filename_width > wo->cols - wx * 2)
+            {
+                w->rect.x = wo->x + wx;
+                w->rect.cols = wo->cols - wx * 2;
+            }
+            return MSG_HANDLED;
+        }
+
+    case MSG_DESTROY:
+        g_free (fat->filename);
+        return MSG_HANDLED;
+
+    default:
+        return widget_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WFileAttrText *
+fileattrtext_new (int y, int x, const char *filename, unsigned long attr)
+{
+    WRect r = { y, x, 2, 1 };
+    WFileAttrText *fat;
+    int width;
+
+    width = str_term_width1 (filename);
+    r.cols = MAX (width, (int) check_attr_num);
+
+    fat = g_new (WFileAttrText, 1);
+    widget_init (WIDGET (fat), &r, fileattrtext_callback, NULL);
+
+    fat->filename = g_strdup (filename);
+    fat->filename_width = width;
+    fileattrtext_fill (fat, attr);
+
+    return fat;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_draw_select (const Widget * w, gboolean selected)
+{
+    widget_gotoyx (w, 0, -1);
+    tty_print_char (selected ? '*' : ' ');
+    widget_gotoyx (w, 0, 1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_toggle_select (const WChattrBoxes * cb, int Id)
+{
+    Widget *w;
+
+    /* find checkbox */
+    w = WIDGET (g_list_nth_data (CONST_GROUP (cb)->widgets, Id - cb->top));
+
+    check_attr[Id].selected = !check_attr[Id].selected;
+
+    tty_setcolor (COLOR_NORMAL);
+    chattr_draw_select (w, check_attr[Id].selected);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+chattrboxes_draw_scrollbar (const WChattrBoxes * cb)
+{
+    const Widget *w = CONST_WIDGET (cb);
+    int max_line;
+    int line;
+    int i;
+
+    /* Are we at the top? */
+    widget_gotoyx (w, 0, w->rect.cols);
+    if (cb->top == 0)
+        tty_print_one_vline (TRUE);
+    else
+        tty_print_char ('^');
+
+    max_line = w->rect.lines - 1;
+
+    /* Are we at the bottom? */
+    widget_gotoyx (w, max_line, w->rect.cols);
+    if (cb->top + w->rect.lines == check_attr_mod_num || w->rect.lines >= check_attr_mod_num)
+        tty_print_one_vline (TRUE);
+    else
+        tty_print_char ('v');
+
+    /* Now draw the nice relative pointer */
+    line = 1 + (cb->pos * (w->rect.lines - 2)) / check_attr_mod_num;
+
+    for (i = 1; i < max_line; i++)
+    {
+        widget_gotoyx (w, i, w->rect.cols);
+        if (i != line)
+            tty_print_one_vline (TRUE);
+        else
+            tty_print_char ('*');
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattrboxes_draw (WChattrBoxes * cb)
+{
+    Widget *w = WIDGET (cb);
+    int i;
+    GList *l;
+    const int *colors;
+
+    colors = widget_get_colors (w);
+    tty_setcolor (colors[DLG_COLOR_NORMAL]);
+    tty_fill_region (w->rect.y, w->rect.x - 1, w->rect.lines, w->rect.cols + 1, ' ');
+
+    /* redraw checkboxes */
+    group_default_callback (w, NULL, MSG_DRAW, 0, NULL);
+
+    /* draw scrollbar */
+    tty_setcolor (colors[DLG_COLOR_NORMAL]);
+    if (!mc_global.tty.slow_terminal && check_attr_mod_num > w->rect.lines)
+        chattrboxes_draw_scrollbar (cb);
+
+    /* mark selected checkboxes */
+    for (i = cb->top, l = GROUP (cb)->widgets; l != NULL; i++, l = g_list_next (l))
+        chattr_draw_select (WIDGET (l->data), check_attr[i].selected);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattrboxes_rename (WChattrBoxes * cb)
+{
+    Widget *w = WIDGET (cb);
+    gboolean active;
+    int i;
+    GList *l;
+    char btext[BUF_SMALL];      /* FIXME: is 128 bytes enough? */
+
+    active = widget_get_state (w, WST_ACTIVE);
+
+    /* lock the group to avoid redraw of checkboxes individually */
+    if (active)
+        widget_set_state (w, WST_SUSPENDED, TRUE);
+
+    for (i = cb->top, l = GROUP (cb)->widgets; l != NULL; i++, l = g_list_next (l))
+    {
+        WCheck *c = CHECK (l->data);
+        int m;
+
+        m = check_attr_mod[i];
+        g_snprintf (btext, sizeof (btext), "(%c) %s", check_attr[m].attr, check_attr[m].text);
+        check_set_text (c, btext);
+        c->state = check_attr[m].state;
+    }
+
+    /* unlock */
+    if (active)
+        widget_set_state (w, WST_ACTIVE, TRUE);
+
+    widget_draw (w);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+checkboxes_save_state (const WChattrBoxes * cb)
+{
+    int i;
+    GList *l;
+
+    for (i = cb->top, l = CONST_GROUP (cb)->widgets; l != NULL; i++, l = g_list_next (l))
+    {
+        int m;
+
+        m = check_attr_mod[i];
+        check_attr[m].state = CHECK (l->data)->state;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_down (WChattrBoxes * cb)
+{
+    if (cb->pos == cb->top + WIDGET (cb)->rect.lines - 1)
+    {
+        /* We are on the last checkbox.
+           Keep this position. */
+
+        if (cb->pos == check_attr_mod_num - 1)
+            /* get out of widget */
+            return MSG_NOT_HANDLED;
+
+        /* emulate scroll of checkboxes */
+        checkboxes_save_state (cb);
+        cb->pos++;
+        cb->top++;
+        chattrboxes_rename (cb);
+    }
+    else                        /* cb->pos > cb-top */
+    {
+        GList *l;
+
+        /* select next checkbox */
+        cb->pos++;
+        l = g_list_next (GROUP (cb)->current);
+        widget_select (WIDGET (l->data));
+    }
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_page_down (WChattrBoxes * cb)
+{
+    WGroup *g = GROUP (cb);
+    GList *l;
+
+    if (cb->pos == check_attr_mod_num - 1)
+    {
+        /* We are on the last checkbox.
+           Keep this position.
+           Do nothing. */
+        l = g_list_last (g->widgets);
+    }
+    else
+    {
+        int i = WIDGET (cb)->rect.lines;
+
+        checkboxes_save_state (cb);
+
+        if (cb->top > check_attr_mod_num - 2 * i)
+            i = check_attr_mod_num - i - cb->top;
+        if (cb->top + i < 0)
+            i = -cb->top;
+        if (i == 0)
+        {
+            cb->pos = check_attr_mod_num - 1;
+            cb->top += i;
+            l = g_list_last (g->widgets);
+        }
+        else
+        {
+            cb->pos += i;
+            cb->top += i;
+            l = g_list_nth (g->widgets, cb->pos - cb->top);
+        }
+
+        chattrboxes_rename (cb);
+    }
+
+    widget_select (WIDGET (l->data));
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_end (WChattrBoxes * cb)
+{
+    GList *l;
+
+    checkboxes_save_state (cb);
+    cb->pos = check_attr_mod_num - 1;
+    cb->top = cb->pos - WIDGET (cb)->rect.lines + 1;
+    l = g_list_last (GROUP (cb)->widgets);
+    chattrboxes_rename (cb);
+    widget_select (WIDGET (l->data));
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_up (WChattrBoxes * cb)
+{
+    if (cb->pos == cb->top)
+    {
+        /* We are on the first checkbox.
+           Keep this position. */
+
+        if (cb->top == 0)
+            /* get out of widget */
+            return MSG_NOT_HANDLED;
+
+        /* emulate scroll of checkboxes */
+        checkboxes_save_state (cb);
+        cb->pos--;
+        cb->top--;
+        chattrboxes_rename (cb);
+    }
+    else                        /* cb->pos > cb-top */
+    {
+        GList *l;
+
+        /* select previous checkbox */
+        cb->pos--;
+        l = g_list_previous (GROUP (cb)->current);
+        widget_select (WIDGET (l->data));
+    }
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_page_up (WChattrBoxes * cb)
+{
+    WGroup *g = GROUP (cb);
+    GList *l;
+
+    if (cb->pos == 0 && cb->top == 0)
+    {
+        /* We are on the first checkbox.
+           Keep this position.
+           Do nothing. */
+        l = g_list_first (g->widgets);
+    }
+    else
+    {
+        int i = WIDGET (cb)->rect.lines;
+
+        checkboxes_save_state (cb);
+
+        if (cb->top < i)
+            i = cb->top;
+        if (i == 0)
+        {
+            cb->pos = 0;
+            cb->top -= i;
+            l = g_list_first (g->widgets);
+        }
+        else
+        {
+            cb->pos -= i;
+            cb->top -= i;
+            l = g_list_nth (g->widgets, cb->pos - cb->top);
+        }
+
+        chattrboxes_rename (cb);
+    }
+
+    widget_select (WIDGET (l->data));
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_home (WChattrBoxes * cb)
+{
+    GList *l;
+
+    checkboxes_save_state (cb);
+    cb->pos = 0;
+    cb->top = 0;
+    l = g_list_first (GROUP (cb)->widgets);
+    chattrboxes_rename (cb);
+    widget_select (WIDGET (l->data));
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_execute_cmd (WChattrBoxes * cb, long command)
+{
+    switch (command)
+    {
+    case CK_Down:
+        return chattrboxes_down (cb);
+
+    case CK_PageDown:
+        return chattrboxes_page_down (cb);
+
+    case CK_Bottom:
+        return chattrboxes_end (cb);
+
+    case CK_Up:
+        return chattrboxes_up (cb);
+
+    case CK_PageUp:
+        return chattrboxes_page_up (cb);
+
+    case CK_Top:
+        return chattrboxes_home (cb);
+
+    case CK_Mark:
+    case CK_MarkAndDown:
+        {
+            chattr_toggle_select (cb, cb->pos); /* FIXME */
+            if (command == CK_MarkAndDown)
+                chattrboxes_down (cb);
+
+            return MSG_HANDLED;
+        }
+
+    default:
+        return MSG_NOT_HANDLED;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_key (WChattrBoxes * cb, int key)
+{
+    long command;
+
+    command = widget_lookup_key (WIDGET (cb), key);
+    if (command == CK_IgnoreKey)
+        return MSG_NOT_HANDLED;
+    return chattrboxes_execute_cmd (cb, command);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chattrboxes_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WChattrBoxes *cb = CHATTRBOXES (w);
+    WGroup *g = GROUP (w);
+
+    switch (msg)
+    {
+    case MSG_DRAW:
+        chattrboxes_draw (cb);
+        return MSG_HANDLED;
+
+    case MSG_NOTIFY:
+        {
+            /* handle checkboxes */
+            int i;
+
+            i = g_list_index (g->widgets, sender);
+            if (i >= 0)
+            {
+                int m;
+
+                i += cb->top;
+                m = check_attr_mod[i];
+                flags ^= check_attr[m].flags;
+                fileattrtext_fill (file_attr, flags);
+                chattr_toggle_select (cb, i);
+                flags_changed = TRUE;
+                return MSG_HANDLED;
+            }
+        }
+        return MSG_NOT_HANDLED;
+
+    case MSG_CHANGED_FOCUS:
+        /* sender is one of chattr checkboxes */
+        if (widget_get_state (sender, WST_FOCUSED))
+        {
+            int i;
+
+            i = g_list_index (g->widgets, sender);
+            cb->pos = cb->top + i;
+        }
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        {
+            cb_ret_t ret;
+
+            ret = chattrboxes_key (cb, parm);
+            if (ret != MSG_HANDLED)
+                ret = group_default_callback (w, NULL, MSG_KEY, parm, NULL);
+
+            return ret;
+        }
+
+    case MSG_ACTION:
+        return chattrboxes_execute_cmd (cb, parm);
+
+    case MSG_DESTROY:
+        /* save all states */
+        checkboxes_save_state (cb);
+        MC_FALLTHROUGH;
+
+    default:
+        return group_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+chattrboxes_handle_mouse_event (Widget * w, Gpm_Event * event)
+{
+    int mou;
+
+    mou = mouse_handle_event (w, event);
+    if (mou == MOU_UNHANDLED)
+        mou = group_handle_mouse_event (w, event);
+
+    return mou;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattrboxes_mouse_callback (Widget * w, mouse_msg_t msg, mouse_event_t * event)
+{
+    WChattrBoxes *cb = CHATTRBOXES (w);
+
+    (void) event;
+
+    switch (msg)
+    {
+    case MSG_MOUSE_SCROLL_UP:
+        chattrboxes_up (cb);
+        break;
+
+    case MSG_MOUSE_SCROLL_DOWN:
+        chattrboxes_down (cb);
+        break;
+
+    default:
+        /* return MOU_UNHANDLED */
+        event->result.abort = TRUE;
+        break;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WChattrBoxes *
+chattrboxes_new (const WRect * r)
+{
+    WChattrBoxes *cb;
+    Widget *w;
+    WGroup *cbg;
+    int i;
+
+    cb = g_new0 (WChattrBoxes, 1);
+    w = WIDGET (cb);
+    cbg = GROUP (cb);
+    group_init (cbg, r, chattrboxes_callback, chattrboxes_mouse_callback);
+    w->options |= WOP_SELECTABLE | WOP_WANT_CURSOR;
+    w->mouse_handler = chattrboxes_handle_mouse_event;
+    w->keymap = chattr_map;
+
+    /* create checkboxes */
+    for (i = 0; i < r->lines; i++)
+    {
+        int m;
+        WCheck *check;
+
+        m = check_attr_mod[i];
+
+        check = check_new (i, 0, check_attr[m].state, NULL);
+        group_add_widget (cbg, check);
+    }
+
+    chattrboxes_rename (cb);
+
+    /* select first checkbox */
+    cbg->current = cbg->widgets;
+
+    return cb;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_init (void)
+{
+    static gboolean i18n = FALSE;
+    size_t i;
+
+    for (i = 0; i < check_attr_num; i++)
+        check_attr[i].selected = FALSE;
+
+    if (i18n)
+        return;
+
+    i18n = TRUE;
+
+    for (i = 0; i < check_attr_num; i++)
+        if (chattr_is_modifiable (i))
+        {
+            int width;
+
+#ifdef ENABLE_NLS
+            check_attr[i].text = _(check_attr[i].text);
+#endif
+
+            check_attr_mod[check_attr_mod_num++] = i;
+
+            width = 4 + str_term_width1 (check_attr[i].text);   /* "(Q) text " */
+            check_attr_width = MAX (check_attr_width, width);
+        }
+
+    check_attr_width += 1 + 3 + 1;      /* mark, [x] and space */
+
+    for (i = 0; i < BUTTONS; i++)
+    {
+#ifdef ENABLE_NLS
+        chattr_but[i].text = _(chattr_but[i].text);
+#endif
+
+        chattr_but[i].width = str_term_width1 (chattr_but[i].text) + 3; /* [], spaces and w/o & */
+        if (chattr_but[i].flags == DEFPUSH_BUTTON)
+            chattr_but[i].width += 2;   /* <> */
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WDialog *
+chattr_dlg_create (WPanel * panel, const char *fname, unsigned long attr)
+{
+    Widget *mw = WIDGET (WIDGET (panel)->owner);
+    gboolean single_set;
+    WDialog *ch_dlg;
+    int lines, cols;
+    int checkboxes_lines = check_attr_mod_num;
+    size_t i;
+    int y;
+    Widget *dw;
+    WGroup *dg;
+    WChattrBoxes *cb;
+    const int cb_scrollbar_width = 1;
+    WRect r;
+
+    /* prepare to set up checkbox states */
+    for (i = 0; i < check_attr_num; i++)
+        check_attr[i].state = chattr_is_modifiable (i) && (attr & check_attr[i].flags) != 0;
+
+    cols = check_attr_width + cb_scrollbar_width;
+
+    single_set = (panel->marked < 2);
+
+    lines = 5 + checkboxes_lines + 4;
+    if (!single_set)
+        lines += 3;
+
+    if (lines >= mw->rect.lines - 2)
+    {
+        int dl;
+
+        dl = lines - (mw->rect.lines - 2);
+        lines -= dl;
+        checkboxes_lines -= dl;
+    }
+
+    ch_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols + wx * 2, WPOS_CENTER, FALSE, dialog_colors,
+                    dlg_default_callback, NULL, "[Chattr]", _("Chattr command"));
+    dg = GROUP (ch_dlg);
+    dw = WIDGET (ch_dlg);
+
+    y = 2;
+    file_attr = fileattrtext_new (y, wx, fname, attr);
+    group_add_widget_autopos (dg, file_attr, WPOS_KEEP_TOP | WPOS_CENTER_HORZ, NULL);
+    y += WIDGET (file_attr)->rect.lines;
+    group_add_widget (dg, hline_new (y++, -1, -1));
+
+    if (cols < WIDGET (file_attr)->rect.cols)
+    {
+        r = dw->rect;
+        cols = WIDGET (file_attr)->rect.cols;
+        cols = MIN (cols, mw->rect.cols - wx * 2);
+        r.cols = cols + wx * 2;
+        r.lines = lines;
+        widget_set_size_rect (dw, &r);
+    }
+
+    checkboxes_lines = MIN (check_attr_mod_num, checkboxes_lines);
+    rect_init (&r, y++, wx, checkboxes_lines > 0 ? checkboxes_lines : 1, cols);
+    cb = chattrboxes_new (&r);
+    group_add_widget_autopos (dg, cb, WPOS_KEEP_TOP | WPOS_KEEP_HORZ, NULL);
+
+    y += checkboxes_lines - 1;
+    cols = 0;
+
+    for (i = single_set ? (BUTTONS - 2) : 0; i < BUTTONS; i++)
+    {
+        if (i == 0 || i == BUTTONS - 2)
+            group_add_widget (dg, hline_new (y++, -1, -1));
+
+        chattr_but[i].button = WIDGET (button_new (y, dw->rect.cols / 2 + 1 - chattr_but[i].width,
+                                                   chattr_but[i].ret_cmd, chattr_but[i].flags,
+                                                   chattr_but[i].text, NULL));
+        group_add_widget (dg, chattr_but[i].button);
+
+        i++;
+        chattr_but[i].button =
+            WIDGET (button_new (y++, dw->rect.cols / 2 + 2, chattr_but[i].ret_cmd,
+                                chattr_but[i].flags, chattr_but[i].text, NULL));
+        group_add_widget (dg, chattr_but[i].button);
+
+        /* two buttons in a row */
+        cols =
+            MAX (cols, chattr_but[i - 1].button->rect.cols + 1 + chattr_but[i].button->rect.cols);
+    }
+
+    /* adjust dialog size and button positions */
+    cols += 6;
+    if (cols > dw->rect.cols)
+    {
+        r = dw->rect;
+        r.lines = lines;
+        r.cols = cols;
+        widget_set_size_rect (dw, &r);
+
+        /* dialog center */
+        cols = dw->rect.x + dw->rect.cols / 2 + 1;
+
+        for (i = single_set ? (BUTTONS - 2) : 0; i < BUTTONS; i++)
+        {
+            Widget *b;
+
+            b = chattr_but[i++].button;
+            r = b->rect;
+            r.x = cols - r.cols;
+            widget_set_size_rect (b, &r);
+
+            b = chattr_but[i].button;
+            r = b->rect;
+            r.x = cols + 1;
+            widget_set_size_rect (b, &r);
+        }
+    }
+
+    widget_select (WIDGET (cb));
+
+    return ch_dlg;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_done (gboolean need_update)
+{
+    if (need_update)
+        update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const GString *
+next_file (const WPanel * panel)
+{
+    while (panel->dir.list[current_file].f.marked == 0)
+        current_file++;
+
+    return panel->dir.list[current_file].fname;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+try_chattr (const vfs_path_t * p, unsigned long m)
+{
+    const char *fname = NULL;
+
+    while (mc_fsetflags (p, m) == -1 && !ignore_all)
+    {
+        int my_errno = errno;
+        int result;
+        char *msg;
+
+        if (fname == NULL)
+            fname = x_basename (vfs_path_as_str (p));
+        msg = g_strdup_printf (_("Cannot chattr \"%s\"\n%s"), fname, unix_error_string (my_errno));
+        result =
+            query_dialog (MSG_ERROR, msg, D_ERROR, 4, _("&Ignore"), _("Ignore &all"), _("&Retry"),
+                          _("&Cancel"));
+        g_free (msg);
+
+        switch (result)
+        {
+        case 0:
+            /* try next file */
+            return TRUE;
+
+        case 1:
+            ignore_all = TRUE;
+            /* try next file */
+            return TRUE;
+
+        case 2:
+            /* retry this file */
+            break;
+
+        case 3:
+        default:
+            /* stop remain files processing */
+            return FALSE;
+        }
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+do_chattr (WPanel * panel, const vfs_path_t * p, unsigned long m)
+{
+    gboolean ret;
+
+    m &= and_mask;
+    m |= or_mask;
+
+    ret = try_chattr (p, m);
+
+    do_file_mark (panel, current_file, 0);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chattr_apply_mask (WPanel * panel, vfs_path_t * vpath, unsigned long m)
+{
+    gboolean ok;
+
+    if (!do_chattr (panel, vpath, m))
+        return;
+
+    do
+    {
+        const GString *fname;
+
+        fname = next_file (panel);
+        vpath = vfs_path_from_str (fname->str);
+        ok = (mc_fgetflags (vpath, &m) == 0);
+
+        if (!ok)
+        {
+            /* if current file was deleted outside mc -- try next file */
+            /* decrease panel->marked */
+            do_file_mark (panel, current_file, 0);
+
+            /* try next file */
+            ok = TRUE;
+        }
+        else
+        {
+            flags = m;
+            ok = do_chattr (panel, vpath, m);
+            vfs_path_free (vpath, TRUE);
+        }
+    }
+    while (ok && panel->marked != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+chattr_cmd (WPanel * panel)
+{
+    gboolean need_update = FALSE;
+    gboolean end_chattr = FALSE;
+
+    chattr_init ();
+
+    current_file = 0;
+    ignore_all = FALSE;
+
+    do
+    {                           /* do while any files remaining */
+        vfs_path_t *vpath;
+        WDialog *ch_dlg;
+        const GString *fname;
+        size_t i;
+        int result;
+
+        do_refresh ();
+
+        need_update = FALSE;
+        end_chattr = FALSE;
+
+        if (panel->marked != 0)
+            fname = next_file (panel);  /* next marked file */
+        else
+            fname = panel_current_entry (panel)->fname; /* single file */
+
+        vpath = vfs_path_from_str (fname->str);
+
+        if (mc_fgetflags (vpath, &flags) != 0)
+        {
+            message (D_ERROR, MSG_ERROR, _("Cannot get flags of \"%s\"\n%s"), fname->str,
+                     unix_error_string (errno));
+            vfs_path_free (vpath, TRUE);
+            break;
+        }
+
+        flags_changed = FALSE;
+
+        ch_dlg = chattr_dlg_create (panel, fname->str, flags);
+        result = dlg_run (ch_dlg);
+        widget_destroy (WIDGET (ch_dlg));
+
+        switch (result)
+        {
+        case B_CANCEL:
+            end_chattr = TRUE;
+            break;
+
+        case B_ENTER:
+            if (flags_changed)
+            {
+                if (panel->marked <= 1)
+                {
+                    /* single or last file */
+                    if (mc_fsetflags (vpath, flags) == -1 && !ignore_all)
+                        message (D_ERROR, MSG_ERROR, _("Cannot chattr \"%s\"\n%s"), fname->str,
+                                 unix_error_string (errno));
+                    end_chattr = TRUE;
+                }
+                else if (!try_chattr (vpath, flags))
+                {
+                    /* stop multiple files processing */
+                    result = B_CANCEL;
+                    end_chattr = TRUE;
+                }
+            }
+
+            need_update = TRUE;
+            break;
+
+        case B_SETALL:
+        case B_MARKED:
+            or_mask = 0;
+            and_mask = ~0;
+
+            for (i = 0; i < check_attr_num; i++)
+                if (chattr_is_modifiable (i) && (check_attr[i].selected || result == B_SETALL))
+                {
+                    if (check_attr[i].state)
+                        or_mask |= check_attr[i].flags;
+                    else
+                        and_mask &= ~check_attr[i].flags;
+                }
+
+            chattr_apply_mask (panel, vpath, flags);
+            need_update = TRUE;
+            end_chattr = TRUE;
+            break;
+
+        case B_SETMRK:
+            or_mask = 0;
+            and_mask = ~0;
+
+            for (i = 0; i < check_attr_num; i++)
+                if (chattr_is_modifiable (i) && check_attr[i].selected)
+                    or_mask |= check_attr[i].flags;
+
+            chattr_apply_mask (panel, vpath, flags);
+            need_update = TRUE;
+            end_chattr = TRUE;
+            break;
+
+        case B_CLRMRK:
+            or_mask = 0;
+            and_mask = ~0;
+
+            for (i = 0; i < check_attr_num; i++)
+                if (chattr_is_modifiable (i) && check_attr[i].selected)
+                    and_mask &= ~check_attr[i].flags;
+
+            chattr_apply_mask (panel, vpath, flags);
+            need_update = TRUE;
+            end_chattr = TRUE;
+            break;
+
+        default:
+            break;
+        }
+
+        if (panel->marked != 0 && result != B_CANCEL)
+        {
+            do_file_mark (panel, current_file, 0);
+            need_update = TRUE;
+        }
+
+        vfs_path_free (vpath, TRUE);
+
+    }
+    while (panel->marked != 0 && !end_chattr);
+
+    chattr_done (need_update);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const char *
+chattr_get_as_str (unsigned long attr)
+{
+    static char str[32 + 1];    /* 32 bits in attributes (unsigned long) */
+
+    chattr_fill_str (attr, str);
+
+    return str;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/chmod.c b/src/filemanager/chmod.c
new file mode 100644
index 0000000..c93bcbc
--- /dev/null
+++ b/src/filemanager/chmod.c
@@ -0,0 +1,664 @@
+/*
+   Chmod command -- for the Midnight Commander
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file chmod.c
+ *  \brief Source: chmod command
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/skin.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "cmd.h"                /* chmod_cmd() */
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define PX 3
+#define PY 2
+
+#define B_MARKED B_USER
+#define B_SETALL (B_USER + 1)
+#define B_SETMRK (B_USER + 2)
+#define B_CLRMRK (B_USER + 3)
+
+#define BUTTONS      6
+#define BUTTONS_PERM 12
+#define LABELS       4
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct
+{
+    mode_t mode;
+    const char *text;
+    gboolean selected;
+    WCheck *check;
+} check_perm[BUTTONS_PERM] =
+{
+    /* *INDENT-OFF* */
+    { S_ISUID, N_("set &user ID on execution"),  FALSE, NULL },
+    { S_ISGID, N_("set &group ID on execution"), FALSE, NULL },
+    { S_ISVTX, N_("stick&y bit"),                FALSE, NULL },
+    { S_IRUSR, N_("&read by owner"),             FALSE, NULL },
+    { S_IWUSR, N_("&write by owner"),            FALSE, NULL },
+    { S_IXUSR, N_("e&xecute/search by owner"),   FALSE, NULL },
+    { S_IRGRP, N_("rea&d by group"),             FALSE, NULL },
+    { S_IWGRP, N_("write by grou&p"),            FALSE, NULL },
+    { S_IXGRP, N_("execu&te/search by group"),   FALSE, NULL },
+    { S_IROTH, N_("read &by others"),            FALSE, NULL },
+    { S_IWOTH, N_("wr&ite by others"),           FALSE, NULL },
+    { S_IXOTH, N_("execute/searc&h by others"),  FALSE, NULL }
+    /* *INDENT-ON* */
+};
+
+static int check_perm_len = 0;
+
+static const char *file_info_labels[LABELS] = {
+    N_("Name:"),
+    N_("Permissions (octal):"),
+    N_("Owner name:"),
+    N_("Group name:")
+};
+
+static int file_info_labels_len = 0;
+
+static struct
+{
+    int ret_cmd;
+    button_flags_t flags;
+    int y;                      /* vertical position relatively to dialog bottom boundary */
+    int len;
+    const char *text;
+} chmod_but[BUTTONS] =
+{
+    /* *INDENT-OFF* */
+    { B_SETALL, NORMAL_BUTTON, 6, 0, N_("Set &all")      },
+    { B_MARKED, NORMAL_BUTTON, 6, 0, N_("&Marked all")   },
+    { B_SETMRK, NORMAL_BUTTON, 5, 0, N_("S&et marked")   },
+    { B_CLRMRK, NORMAL_BUTTON, 5, 0, N_("C&lear marked") },
+    { B_ENTER, DEFPUSH_BUTTON, 3, 0, N_("&Set")          },
+    { B_CANCEL, NORMAL_BUTTON, 3, 0, N_("&Cancel")       }
+    /* *INDENT-ON* */
+};
+
+static gboolean mode_change;
+static int current_file;
+static gboolean ignore_all;
+
+static mode_t and_mask, or_mask, ch_mode;
+
+static WLabel *statl;
+static WGroupbox *file_gb;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chmod_init (void)
+{
+    static gboolean i18n = FALSE;
+    int i, len;
+
+    for (i = 0; i < BUTTONS_PERM; i++)
+        check_perm[i].selected = FALSE;
+
+    if (i18n)
+        return;
+
+    i18n = TRUE;
+
+#ifdef ENABLE_NLS
+    for (i = 0; i < BUTTONS_PERM; i++)
+        check_perm[i].text = _(check_perm[i].text);
+
+    for (i = 0; i < LABELS; i++)
+        file_info_labels[i] = _(file_info_labels[i]);
+
+    for (i = 0; i < BUTTONS; i++)
+        chmod_but[i].text = _(chmod_but[i].text);
+#endif /* ENABLE_NLS */
+
+    for (i = 0; i < BUTTONS_PERM; i++)
+    {
+        len = str_term_width1 (check_perm[i].text);
+        check_perm_len = MAX (check_perm_len, len);
+    }
+
+    check_perm_len += 1 + 3 + 1;        /* mark, [x] and space */
+
+    for (i = 0; i < LABELS; i++)
+    {
+        len = str_term_width1 (file_info_labels[i]) + 2;        /* spaces around */
+        file_info_labels_len = MAX (file_info_labels_len, len);
+    }
+
+    for (i = 0; i < BUTTONS; i++)
+    {
+        chmod_but[i].len = str_term_width1 (chmod_but[i].text) + 3;     /* [], spaces and w/o & */
+        if (chmod_but[i].flags == DEFPUSH_BUTTON)
+            chmod_but[i].len += 2;      /* <> */
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chmod_draw_select (const WDialog * h, int Id)
+{
+    widget_gotoyx (h, PY + Id + 1, PX + 1);
+    tty_print_char (check_perm[Id].selected ? '*' : ' ');
+    widget_gotoyx (h, PY + Id + 1, PX + 3);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chmod_toggle_select (const WDialog * h, int Id)
+{
+    check_perm[Id].selected = !check_perm[Id].selected;
+    tty_setcolor (COLOR_NORMAL);
+    chmod_draw_select (h, Id);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chmod_refresh (const WDialog * h)
+{
+    int i;
+    int y, x;
+
+    tty_setcolor (COLOR_NORMAL);
+
+    for (i = 0; i < BUTTONS_PERM; i++)
+        chmod_draw_select (h, i);
+
+    y = WIDGET (file_gb)->rect.y + 1;
+    x = WIDGET (file_gb)->rect.x + 2;
+
+    tty_gotoyx (y, x);
+    tty_print_string (file_info_labels[0]);
+    tty_gotoyx (y + 2, x);
+    tty_print_string (file_info_labels[1]);
+    tty_gotoyx (y + 4, x);
+    tty_print_string (file_info_labels[2]);
+    tty_gotoyx (y + 6, x);
+    tty_print_string (file_info_labels[3]);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chmod_bg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_DRAW:
+        frame_callback (w, NULL, MSG_DRAW, 0, NULL);
+        chmod_refresh (CONST_DIALOG (w->owner));
+        return MSG_HANDLED;
+
+    default:
+        return frame_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chmod_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WGroup *g = GROUP (w);
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_NOTIFY:
+        {
+            /* handle checkboxes */
+            int i;
+
+            /* whether notification was sent by checkbox? */
+            for (i = 0; i < BUTTONS_PERM; i++)
+                if (sender == WIDGET (check_perm[i].check))
+                    break;
+
+            if (i < BUTTONS_PERM)
+            {
+                ch_mode ^= check_perm[i].mode;
+                label_set_textv (statl, "%o", (unsigned int) ch_mode);
+                chmod_toggle_select (h, i);
+                mode_change = TRUE;
+                return MSG_HANDLED;
+            }
+        }
+
+        return MSG_NOT_HANDLED;
+
+    case MSG_KEY:
+        if (parm == 'T' || parm == 't' || parm == KEY_IC)
+        {
+            int i;
+            unsigned long id;
+
+            id = group_get_current_widget_id (g);
+            for (i = 0; i < BUTTONS_PERM; i++)
+                if (id == WIDGET (check_perm[i].check)->id)
+                    break;
+
+            if (i < BUTTONS_PERM)
+            {
+                chmod_toggle_select (h, i);
+                if (parm == KEY_IC)
+                    group_select_next_widget (g);
+                return MSG_HANDLED;
+            }
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WDialog *
+chmod_dlg_create (WPanel * panel, const char *fname, const struct stat *sf_stat)
+{
+    gboolean single_set;
+    WDialog *ch_dlg;
+    WGroup *g;
+    int lines, cols;
+    int i, y;
+    int perm_gb_len;
+    int file_gb_len;
+    const char *c_fname, *c_fown, *c_fgrp;
+    char buffer[BUF_TINY];
+
+    mode_change = FALSE;
+
+    single_set = (panel->marked < 2);
+    perm_gb_len = check_perm_len + 2;
+    file_gb_len = file_info_labels_len + 2;
+    cols = str_term_width1 (fname) + 2 + 1;
+    file_gb_len = MAX (file_gb_len, cols);
+
+    lines = single_set ? 20 : 23;
+    cols = perm_gb_len + file_gb_len + 1 + 6;
+
+    if (cols > COLS)
+    {
+        /* shrink the right groupbox */
+        cols = COLS;
+        file_gb_len = cols - (perm_gb_len + 1 + 6);
+    }
+
+    ch_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors,
+                    chmod_callback, NULL, "[Chmod]", _("Chmod command"));
+    g = GROUP (ch_dlg);
+
+    /* draw background */
+    ch_dlg->bg->callback = chmod_bg_callback;
+
+    group_add_widget (g, groupbox_new (PY, PX, BUTTONS_PERM + 2, perm_gb_len, _("Permission")));
+
+    for (i = 0; i < BUTTONS_PERM; i++)
+    {
+        check_perm[i].check = check_new (PY + i + 1, PX + 2, (ch_mode & check_perm[i].mode) != 0,
+                                         check_perm[i].text);
+        group_add_widget (g, check_perm[i].check);
+    }
+
+    file_gb = groupbox_new (PY, PX + perm_gb_len + 1, BUTTONS_PERM + 2, file_gb_len, _("File"));
+    group_add_widget (g, file_gb);
+
+    /* Set the labels */
+    y = PY + 2;
+    cols = PX + perm_gb_len + 3;
+    c_fname = str_trunc (fname, file_gb_len - 3);
+    group_add_widget (g, label_new (y, cols, c_fname));
+    g_snprintf (buffer, sizeof (buffer), "%o", (unsigned int) ch_mode);
+    statl = label_new (y + 2, cols, buffer);
+    group_add_widget (g, statl);
+    c_fown = str_trunc (get_owner (sf_stat->st_uid), file_gb_len - 3);
+    group_add_widget (g, label_new (y + 4, cols, c_fown));
+    c_fgrp = str_trunc (get_group (sf_stat->st_gid), file_gb_len - 3);
+    group_add_widget (g, label_new (y + 6, cols, c_fgrp));
+
+    if (!single_set)
+    {
+        i = 0;
+
+        group_add_widget (g, hline_new (lines - chmod_but[i].y - 1, -1, -1));
+
+        for (; i < BUTTONS - 2; i++)
+        {
+            y = lines - chmod_but[i].y;
+            group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 - chmod_but[i].len,
+                                             chmod_but[i].ret_cmd, chmod_but[i].flags,
+                                             chmod_but[i].text, NULL));
+            i++;
+            group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 + 1,
+                                             chmod_but[i].ret_cmd, chmod_but[i].flags,
+                                             chmod_but[i].text, NULL));
+        }
+    }
+
+    i = BUTTONS - 2;
+    y = lines - chmod_but[i].y;
+    group_add_widget (g, hline_new (y - 1, -1, -1));
+    group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 - chmod_but[i].len,
+                                     chmod_but[i].ret_cmd, chmod_but[i].flags, chmod_but[i].text,
+                                     NULL));
+    i++;
+    group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 + 1, chmod_but[i].ret_cmd,
+                                     chmod_but[i].flags, chmod_but[i].text, NULL));
+
+    /* select first checkbox */
+    widget_select (WIDGET (check_perm[0].check));
+
+    return ch_dlg;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chmod_done (gboolean need_update)
+{
+    if (need_update)
+        update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const GString *
+next_file (const WPanel * panel)
+{
+    while (panel->dir.list[current_file].f.marked == 0)
+        current_file++;
+
+    return panel->dir.list[current_file].fname;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+try_chmod (const vfs_path_t * p, mode_t m)
+{
+    const char *fname = NULL;
+
+    while (mc_chmod (p, m) == -1 && !ignore_all)
+    {
+        int my_errno = errno;
+        int result;
+        char *msg;
+
+        if (fname == NULL)
+            fname = x_basename (vfs_path_as_str (p));
+        msg = g_strdup_printf (_("Cannot chmod \"%s\"\n%s"), fname, unix_error_string (my_errno));
+        result =
+            query_dialog (MSG_ERROR, msg, D_ERROR, 4, _("&Ignore"), _("Ignore &all"), _("&Retry"),
+                          _("&Cancel"));
+        g_free (msg);
+
+        switch (result)
+        {
+        case 0:
+            /* try next file */
+            return TRUE;
+
+        case 1:
+            ignore_all = TRUE;
+            /* try next file */
+            return TRUE;
+
+        case 2:
+            /* retry this file */
+            break;
+
+        case 3:
+        default:
+            /* stop remain files processing */
+            return FALSE;
+        }
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+do_chmod (WPanel * panel, const vfs_path_t * p, struct stat *sf)
+{
+    gboolean ret;
+
+    sf->st_mode &= and_mask;
+    sf->st_mode |= or_mask;
+
+    ret = try_chmod (p, sf->st_mode);
+
+    do_file_mark (panel, current_file, 0);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+apply_mask (WPanel * panel, vfs_path_t * vpath, struct stat *sf)
+{
+    gboolean ok;
+
+    if (!do_chmod (panel, vpath, sf))
+        return;
+
+    do
+    {
+        const GString *fname;
+
+        fname = next_file (panel);
+        vpath = vfs_path_from_str (fname->str);
+        ok = (mc_stat (vpath, sf) == 0);
+
+        if (!ok)
+        {
+            /* if current file was deleted outside mc -- try next file */
+            /* decrease panel->marked */
+            do_file_mark (panel, current_file, 0);
+
+            /* try next file */
+            ok = TRUE;
+        }
+        else
+        {
+            ch_mode = sf->st_mode;
+
+            ok = do_chmod (panel, vpath, sf);
+        }
+
+        vfs_path_free (vpath, TRUE);
+    }
+    while (ok && panel->marked != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+chmod_cmd (WPanel * panel)
+{
+    gboolean need_update;
+    gboolean end_chmod;
+
+    chmod_init ();
+
+    current_file = 0;
+    ignore_all = FALSE;
+
+    do
+    {                           /* do while any files remaining */
+        vfs_path_t *vpath;
+        WDialog *ch_dlg;
+        struct stat sf_stat;
+        const GString *fname;
+        int i, result;
+
+        do_refresh ();
+
+        need_update = FALSE;
+        end_chmod = FALSE;
+
+        if (panel->marked != 0)
+            fname = next_file (panel);  /* next marked file */
+        else
+            fname = panel_current_entry (panel)->fname; /* single file */
+
+        vpath = vfs_path_from_str (fname->str);
+
+        if (mc_stat (vpath, &sf_stat) != 0)
+        {
+            vfs_path_free (vpath, TRUE);
+            break;
+        }
+
+        ch_mode = sf_stat.st_mode;
+
+        ch_dlg = chmod_dlg_create (panel, fname->str, &sf_stat);
+        result = dlg_run (ch_dlg);
+
+        switch (result)
+        {
+        case B_CANCEL:
+            end_chmod = TRUE;
+            break;
+
+        case B_ENTER:
+            if (mode_change)
+            {
+                if (panel->marked <= 1)
+                {
+                    /* single or last file */
+                    if (mc_chmod (vpath, ch_mode) == -1 && !ignore_all)
+                        message (D_ERROR, MSG_ERROR, _("Cannot chmod \"%s\"\n%s"), fname->str,
+                                 unix_error_string (errno));
+                    end_chmod = TRUE;
+                }
+                else if (!try_chmod (vpath, ch_mode))
+                {
+                    /* stop multiple files processing */
+                    result = B_CANCEL;
+                    end_chmod = TRUE;
+                }
+            }
+
+            need_update = TRUE;
+            break;
+
+        case B_SETALL:
+        case B_MARKED:
+            and_mask = or_mask = 0;
+            and_mask = ~and_mask;
+
+            for (i = 0; i < BUTTONS_PERM; i++)
+                if (check_perm[i].selected || result == B_SETALL)
+                {
+                    if (check_perm[i].check->state)
+                        or_mask |= check_perm[i].mode;
+                    else
+                        and_mask &= ~check_perm[i].mode;
+                }
+
+            apply_mask (panel, vpath, &sf_stat);
+            need_update = TRUE;
+            end_chmod = TRUE;
+            break;
+
+        case B_SETMRK:
+            and_mask = or_mask = 0;
+            and_mask = ~and_mask;
+
+            for (i = 0; i < BUTTONS_PERM; i++)
+                if (check_perm[i].selected)
+                    or_mask |= check_perm[i].mode;
+
+            apply_mask (panel, vpath, &sf_stat);
+            need_update = TRUE;
+            end_chmod = TRUE;
+            break;
+
+        case B_CLRMRK:
+            and_mask = or_mask = 0;
+            and_mask = ~and_mask;
+
+            for (i = 0; i < BUTTONS_PERM; i++)
+                if (check_perm[i].selected)
+                    and_mask &= ~check_perm[i].mode;
+
+            apply_mask (panel, vpath, &sf_stat);
+            need_update = TRUE;
+            end_chmod = TRUE;
+            break;
+
+        default:
+            break;
+        }
+
+        if (panel->marked != 0 && result != B_CANCEL)
+        {
+            do_file_mark (panel, current_file, 0);
+            need_update = TRUE;
+        }
+
+        vfs_path_free (vpath, TRUE);
+
+        widget_destroy (WIDGET (ch_dlg));
+    }
+    while (panel->marked != 0 && !end_chmod);
+
+    chmod_done (need_update);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/chown.c b/src/filemanager/chown.c
new file mode 100644
index 0000000..1ce769f
--- /dev/null
+++ b/src/filemanager/chown.c
@@ -0,0 +1,552 @@
+/*
+   Chown command -- for the Midnight Commander
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file chown.c
+ *  \brief Source: chown command
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+#include <pwd.h>
+#include <grp.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/skin.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "src/setup.h"          /* panels_options */
+
+#include "cmd.h"                /* chown_cmd() */
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define GH 12
+#define GW 21
+
+#define BUTTONS 5
+
+#define B_SETALL        B_USER
+#define B_SETUSR        (B_USER + 1)
+#define B_SETGRP        (B_USER + 2)
+
+#define LABELS 5
+
+#define chown_label(n,txt) label_set_text (chown_label [n].l, txt)
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct
+{
+    int ret_cmd;
+    button_flags_t flags;
+    int y;
+    int len;
+    const char *text;
+} chown_but[BUTTONS] =
+{
+    /* *INDENT-OFF* */
+    { B_SETALL,  NORMAL_BUTTON, 5, 0, N_("Set &all")    },
+    { B_SETGRP,  NORMAL_BUTTON, 5, 0, N_("Set &groups") },
+    { B_SETUSR,  NORMAL_BUTTON, 5, 0, N_("Set &users")  },
+    { B_ENTER,  DEFPUSH_BUTTON, 3, 0, N_("&Set")        },
+    { B_CANCEL,  NORMAL_BUTTON, 3, 0, N_("&Cancel")     }
+    /* *INDENT-ON* */
+};
+
+/* summary length of three buttons */
+static int blen = 0;
+
+static struct
+{
+    int y;
+    WLabel *l;
+} chown_label[LABELS] =
+{
+    /* *INDENT-OFF* */
+    {  4, NULL },
+    {  6, NULL },
+    {  8, NULL },
+    { 10, NULL },
+    { 12, NULL }
+    /* *INDENT-ON* */
+};
+
+static int current_file;
+static gboolean ignore_all;
+
+static WListbox *l_user, *l_group;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chown_init (void)
+{
+    static gboolean i18n = FALSE;
+    int i;
+
+    if (i18n)
+        return;
+
+    i18n = TRUE;
+
+#ifdef ENABLE_NLS
+    for (i = 0; i < BUTTONS; i++)
+        chown_but[i].text = _(chown_but[i].text);
+#endif /* ENABLE_NLS */
+
+    for (i = 0; i < BUTTONS; i++)
+    {
+        chown_but[i].len = str_term_width1 (chown_but[i].text) + 3;     /* [], spaces and w/o & */
+        if (chown_but[i].flags == DEFPUSH_BUTTON)
+            chown_but[i].len += 2;      /* <> */
+
+        if (i < BUTTONS - 2)
+            blen += chown_but[i].len;
+    }
+
+    blen += 2;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chown_refresh (const Widget * h)
+{
+    int y = 3;
+    int x = 7 + GW * 2;
+
+    tty_setcolor (COLOR_NORMAL);
+
+    widget_gotoyx (h, y + 0, x);
+    tty_print_string (_("Name"));
+    widget_gotoyx (h, y + 2, x);
+    tty_print_string (_("Owner name"));
+    widget_gotoyx (h, y + 4, x);
+    tty_print_string (_("Group name"));
+    widget_gotoyx (h, y + 6, x);
+    tty_print_string (_("Size"));
+    widget_gotoyx (h, y + 8, x);
+    tty_print_string (_("Permission"));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+chown_bg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_DRAW:
+        frame_callback (w, NULL, MSG_DRAW, 0, NULL);
+        chown_refresh (WIDGET (w->owner));
+        return MSG_HANDLED;
+
+    default:
+        return frame_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WDialog *
+chown_dlg_create (WPanel * panel)
+{
+    int single_set;
+    WDialog *ch_dlg;
+    WGroup *g;
+    int lines, cols;
+    int i, y;
+    struct passwd *l_pass;
+    struct group *l_grp;
+
+    single_set = (panel->marked < 2) ? 3 : 0;
+    lines = GH + 4 + (single_set != 0 ? 2 : 4);
+    cols = GW * 3 + 2 + 6;
+
+    ch_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, NULL, NULL,
+                    "[Chown]", _("Chown command"));
+    g = GROUP (ch_dlg);
+
+    /* draw background */
+    ch_dlg->bg->callback = chown_bg_callback;
+
+    group_add_widget (g, groupbox_new (2, 3, GH, GW, _("User name")));
+    l_user = listbox_new (3, 4, GH - 2, GW - 2, FALSE, NULL);
+    group_add_widget (g, l_user);
+    /* add field for unknown names (numbers) */
+    listbox_add_item (l_user, LISTBOX_APPEND_AT_END, 0, _("<Unknown user>"), NULL, FALSE);
+    /* get and put user names in the listbox */
+    setpwent ();
+    while ((l_pass = getpwent ()) != NULL)
+        listbox_add_item (l_user, LISTBOX_APPEND_SORTED, 0, l_pass->pw_name, NULL, FALSE);
+    endpwent ();
+
+    group_add_widget (g, groupbox_new (2, 4 + GW, GH, GW, _("Group name")));
+    l_group = listbox_new (3, 5 + GW, GH - 2, GW - 2, FALSE, NULL);
+    group_add_widget (g, l_group);
+    /* add field for unknown names (numbers) */
+    listbox_add_item (l_group, LISTBOX_APPEND_AT_END, 0, _("<Unknown group>"), NULL, FALSE);
+    /* get and put group names in the listbox */
+    setgrent ();
+    while ((l_grp = getgrent ()) != NULL)
+        listbox_add_item (l_group, LISTBOX_APPEND_SORTED, 0, l_grp->gr_name, NULL, FALSE);
+    endgrent ();
+
+    group_add_widget (g, groupbox_new (2, 5 + GW * 2, GH, GW, _("File")));
+    /* add widgets for the file information */
+    for (i = 0; i < LABELS; i++)
+    {
+        chown_label[i].l = label_new (chown_label[i].y, 7 + GW * 2, NULL);
+        group_add_widget (g, chown_label[i].l);
+    }
+
+    if (single_set == 0)
+    {
+        int x;
+
+        group_add_widget (g, hline_new (lines - chown_but[0].y - 1, -1, -1));
+
+        y = lines - chown_but[0].y;
+        x = (cols - blen) / 2;
+
+        for (i = 0; i < BUTTONS - 2; i++)
+        {
+            group_add_widget (g, button_new (y, x, chown_but[i].ret_cmd, chown_but[i].flags,
+                                             chown_but[i].text, NULL));
+            x += chown_but[i].len + 1;
+        }
+    }
+
+    i = BUTTONS - 2;
+    y = lines - chown_but[i].y;
+    group_add_widget (g, hline_new (y - 1, -1, -1));
+    group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 - chown_but[i].len,
+                                     chown_but[i].ret_cmd, chown_but[i].flags, chown_but[i].text,
+                                     NULL));
+    i++;
+    group_add_widget (g, button_new (y, WIDGET (ch_dlg)->rect.cols / 2 + 1, chown_but[i].ret_cmd,
+                                     chown_but[i].flags, chown_but[i].text, NULL));
+
+    /* select first listbox */
+    widget_select (WIDGET (l_user));
+
+    return ch_dlg;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chown_done (gboolean need_update)
+{
+    if (need_update)
+        update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const GString *
+next_file (const WPanel * panel)
+{
+    while (panel->dir.list[current_file].f.marked == 0)
+        current_file++;
+
+    return panel->dir.list[current_file].fname;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+try_chown (const vfs_path_t * p, uid_t u, gid_t g)
+{
+    const char *fname = NULL;
+
+    while (mc_chown (p, u, g) == -1 && !ignore_all)
+    {
+        int my_errno = errno;
+        int result;
+        char *msg;
+
+        if (fname == NULL)
+            fname = x_basename (vfs_path_as_str (p));
+        msg = g_strdup_printf (_("Cannot chown \"%s\"\n%s"), fname, unix_error_string (my_errno));
+        result =
+            query_dialog (MSG_ERROR, msg, D_ERROR, 4, _("&Ignore"), _("Ignore &all"), _("&Retry"),
+                          _("&Cancel"));
+        g_free (msg);
+
+        switch (result)
+        {
+        case 0:
+            /* try next file */
+            return TRUE;
+
+        case 1:
+            ignore_all = TRUE;
+            /* try next file */
+            return TRUE;
+
+        case 2:
+            /* retry this file */
+            break;
+
+        case 3:
+        default:
+            /* stop remain files processing */
+            return FALSE;
+        }
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+do_chown (WPanel * panel, const vfs_path_t * p, uid_t u, gid_t g)
+{
+    gboolean ret;
+
+    ret = try_chown (p, u, g);
+
+    do_file_mark (panel, current_file, 0);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+apply_chowns (WPanel * panel, vfs_path_t * vpath, uid_t u, gid_t g)
+{
+    gboolean ok;
+
+    if (!do_chown (panel, vpath, u, g))
+        return;
+
+    do
+    {
+        const GString *fname;
+        struct stat sf;
+
+        fname = next_file (panel);
+        vpath = vfs_path_from_str (fname->str);
+        ok = (mc_stat (vpath, &sf) == 0);
+
+        if (!ok)
+        {
+            /* if current file was deleted outside mc -- try next file */
+            /* decrease panel->marked */
+            do_file_mark (panel, current_file, 0);
+
+            /* try next file */
+            ok = TRUE;
+        }
+        else
+            ok = do_chown (panel, vpath, u, g);
+
+        vfs_path_free (vpath, TRUE);
+    }
+    while (ok && panel->marked != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+chown_cmd (WPanel * panel)
+{
+    gboolean need_update;
+    gboolean end_chown;
+
+    chown_init ();
+
+    current_file = 0;
+    ignore_all = FALSE;
+
+    do
+    {                           /* do while any files remaining */
+        vfs_path_t *vpath;
+        WDialog *ch_dlg;
+        struct stat sf_stat;
+        const GString *fname;
+        int result;
+        char buffer[BUF_TINY];
+        uid_t new_user = (uid_t) (-1);
+        gid_t new_group = (gid_t) (-1);
+
+        do_refresh ();
+
+        need_update = FALSE;
+        end_chown = FALSE;
+
+        if (panel->marked != 0)
+            fname = next_file (panel);  /* next marked file */
+        else
+            fname = panel_current_entry (panel)->fname; /* single file */
+
+        vpath = vfs_path_from_str (fname->str);
+
+        if (mc_stat (vpath, &sf_stat) != 0)
+        {
+            vfs_path_free (vpath, TRUE);
+            break;
+        }
+
+        ch_dlg = chown_dlg_create (panel);
+
+        /* select in listboxes */
+        listbox_set_current (l_user, listbox_search_text (l_user, get_owner (sf_stat.st_uid)));
+        listbox_set_current (l_group, listbox_search_text (l_group, get_group (sf_stat.st_gid)));
+
+        chown_label (0, str_trunc (fname->str, GW - 4));
+        chown_label (1, str_trunc (get_owner (sf_stat.st_uid), GW - 4));
+        chown_label (2, str_trunc (get_group (sf_stat.st_gid), GW - 4));
+        size_trunc_len (buffer, GW - 4, sf_stat.st_size, 0, panels_options.kilobyte_si);
+        chown_label (3, buffer);
+        chown_label (4, string_perm (sf_stat.st_mode));
+
+        result = dlg_run (ch_dlg);
+
+        switch (result)
+        {
+        case B_CANCEL:
+            end_chown = TRUE;
+            break;
+
+        case B_ENTER:
+        case B_SETALL:
+            {
+                struct group *grp;
+                struct passwd *user;
+                char *text;
+
+                listbox_get_current (l_group, &text, NULL);
+                grp = getgrnam (text);
+                if (grp != NULL)
+                    new_group = grp->gr_gid;
+                listbox_get_current (l_user, &text, NULL);
+                user = getpwnam (text);
+                if (user != NULL)
+                    new_user = user->pw_uid;
+                if (result == B_ENTER)
+                {
+                    if (panel->marked <= 1)
+                    {
+                        /* single or last file */
+                        if (mc_chown (vpath, new_user, new_group) == -1)
+                            message (D_ERROR, MSG_ERROR, _("Cannot chown \"%s\"\n%s"),
+                                     fname->str, unix_error_string (errno));
+                        end_chown = TRUE;
+                    }
+                    else if (!try_chown (vpath, new_user, new_group))
+                    {
+                        /* stop multiple files processing */
+                        result = B_CANCEL;
+                        end_chown = TRUE;
+                    }
+                }
+                else
+                {
+                    apply_chowns (panel, vpath, new_user, new_group);
+                    end_chown = TRUE;
+                }
+
+                need_update = TRUE;
+                break;
+            }
+
+        case B_SETUSR:
+            {
+                struct passwd *user;
+                char *text;
+
+                listbox_get_current (l_user, &text, NULL);
+                user = getpwnam (text);
+                if (user != NULL)
+                {
+                    new_user = user->pw_uid;
+                    apply_chowns (panel, vpath, new_user, new_group);
+                    need_update = TRUE;
+                    end_chown = TRUE;
+                }
+                break;
+            }
+
+        case B_SETGRP:
+            {
+                struct group *grp;
+                char *text;
+
+                listbox_get_current (l_group, &text, NULL);
+                grp = getgrnam (text);
+                if (grp != NULL)
+                {
+                    new_group = grp->gr_gid;
+                    apply_chowns (panel, vpath, new_user, new_group);
+                    need_update = TRUE;
+                    end_chown = TRUE;
+                }
+                break;
+            }
+
+        default:
+            break;
+        }
+
+        if (panel->marked != 0 && result != B_CANCEL)
+        {
+            do_file_mark (panel, current_file, 0);
+            need_update = TRUE;
+        }
+
+        vfs_path_free (vpath, TRUE);
+
+        widget_destroy (WIDGET (ch_dlg));
+    }
+    while (panel->marked != 0 && !end_chown);
+
+    chown_done (need_update);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/cmd.c b/src/filemanager/cmd.c
new file mode 100644
index 0000000..8c33fd8
--- /dev/null
+++ b/src/filemanager/cmd.c
@@ -0,0 +1,1470 @@
+/*
+   Routines invoked by a function key
+   They normally operate on the current panel.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file cmd.c
+ *  \brief Source: routines invoked by a function key
+ *
+ *  They normally operate on the current panel.
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+
+#include <sys/types.h>
+#include <sys/stat.h>
+#ifdef HAVE_MMAP
+#include <sys/mman.h>
+#endif
+#ifdef ENABLE_VFS_NET
+#include <netdb.h>
+#endif
+#include <unistd.h>
+#include <stdlib.h>
+#include <pwd.h>
+#include <grp.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"        /* LINES, tty_touch_screen() */
+#include "lib/tty/key.h"        /* ALT() macro */
+#include "lib/mcconfig.h"
+#include "lib/filehighlight.h"  /* MC_FHL_INI_FILE */
+#include "lib/vfs/vfs.h"
+#include "lib/fileloc.h"
+#include "lib/strutil.h"
+#include "lib/file-entry.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+#include "lib/keybind.h"        /* CK_Down, CK_History */
+#include "lib/event.h"          /* mc_event_raise() */
+
+#include "src/setup.h"
+#include "src/execute.h"        /* toggle_panels() */
+#include "src/history.h"
+#include "src/usermenu.h"       /* MC_GLOBAL_MENU */
+#include "src/util.h"           /* check_for_default() */
+
+#include "src/viewer/mcviewer.h"
+
+#ifdef USE_INTERNAL_EDIT
+#include "src/editor/edit.h"
+#endif
+
+#ifdef USE_DIFF_VIEW
+#include "src/diffviewer/ydiff.h"
+#endif
+
+#include "fileopctx.h"
+#include "filenot.h"
+#include "hotlist.h"            /* hotlist_show() */
+#include "tree.h"               /* tree_chdir() */
+#include "filemanager.h"        /* change_panel() */
+#include "command.h"            /* cmdline */
+#include "layout.h"             /* get_current_type() */
+#include "ext.h"                /* regex_command() */
+#include "boxes.h"              /* cd_box() */
+#include "dir.h"
+#include "cd.h"
+
+#include "cmd.h"                /* Our definitions */
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#ifdef HAVE_MMAP
+#ifndef MAP_FILE
+#define MAP_FILE 0
+#endif
+#endif /* HAVE_MMAP */
+
+/*** file scope type declarations ****************************************************************/
+
+enum CompareMode
+{
+    compare_quick = 0,
+    compare_size_only,
+    compare_thourough
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+#ifdef ENABLE_VFS_NET
+static const char *machine_str = N_("Enter machine name (F1 for details):");
+#endif /* ENABLE_VFS_NET */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Run viewer (internal or external) on the current file.
+ * If @plain_view is TRUE, force internal viewer and raw mode (used for F13).
+ */
+static void
+do_view_cmd (WPanel * panel, gboolean plain_view)
+{
+    const file_entry_t *fe;
+
+    fe = panel_current_entry (panel);
+
+    /* Directories are viewed by changing to them */
+    if (S_ISDIR (fe->st.st_mode) || link_isdir (fe))
+    {
+        vfs_path_t *fname_vpath;
+
+        if (confirm_view_dir && (panel->marked != 0 || panel->dirs_marked != 0) &&
+            query_dialog (_("Confirmation"), _("Files tagged, want to cd?"), D_NORMAL, 2,
+                          _("&Yes"), _("&No")) != 0)
+            return;
+
+        fname_vpath = vfs_path_from_str (fe->fname->str);
+        if (!panel_cd (panel, fname_vpath, cd_exact))
+            cd_error_message (fe->fname->str);
+        vfs_path_free (fname_vpath, TRUE);
+    }
+    else
+    {
+        vfs_path_t *filename_vpath;
+
+        filename_vpath = vfs_path_from_str (fe->fname->str);
+        view_file (filename_vpath, plain_view, use_internal_view);
+        vfs_path_free (filename_vpath, TRUE);
+    }
+
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+do_edit (const vfs_path_t * what_vpath)
+{
+    edit_file_at_line (what_vpath, use_internal_edit, 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+compare_files (const vfs_path_t * vpath1, const vfs_path_t * vpath2, off_t size)
+{
+    int file1;
+    int result = -1;            /* Different by default */
+
+    if (size == 0)
+        return 0;
+
+    file1 = open (vfs_path_as_str (vpath1), O_RDONLY);
+    if (file1 >= 0)
+    {
+        int file2;
+
+        file2 = open (vfs_path_as_str (vpath2), O_RDONLY);
+        if (file2 >= 0)
+        {
+#ifdef HAVE_MMAP
+            char *data1;
+
+            /* Ugly if jungle */
+            data1 = mmap (0, size, PROT_READ, MAP_FILE | MAP_PRIVATE, file1, 0);
+            if (data1 != (char *) -1)
+            {
+                char *data2;
+
+                data2 = mmap (0, size, PROT_READ, MAP_FILE | MAP_PRIVATE, file2, 0);
+                if (data2 != (char *) -1)
+                {
+                    rotate_dash (TRUE);
+                    result = memcmp (data1, data2, size);
+                    munmap (data2, size);
+                }
+                munmap (data1, size);
+            }
+#else
+            /* Don't have mmap() :( Even more ugly :) */
+            char buf1[BUFSIZ], buf2[BUFSIZ];
+            int n1, n2;
+
+            rotate_dash (TRUE);
+            do
+            {
+                while ((n1 = read (file1, buf1, sizeof (buf1))) == -1 && errno == EINTR)
+                    ;
+                while ((n2 = read (file2, buf2, sizeof (buf2))) == -1 && errno == EINTR)
+                    ;
+            }
+            while (n1 == n2 && n1 == sizeof (buf1) && memcmp (buf1, buf2, sizeof (buf1)) == 0);
+            result = (n1 != n2) || memcmp (buf1, buf2, n1);
+#endif /* !HAVE_MMAP */
+            close (file2);
+        }
+        close (file1);
+    }
+    rotate_dash (FALSE);
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+compare_dir (WPanel * panel, const WPanel * other, enum CompareMode mode)
+{
+    int i, j;
+
+    /* No marks by default */
+    panel->marked = 0;
+    panel->total = 0;
+    panel->dirs_marked = 0;
+
+    /* Handle all files in the panel */
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        file_entry_t *source = &panel->dir.list[i];
+        const char *source_fname;
+
+        /* Default: unmarked */
+        file_mark (panel, i, 0);
+
+        /* Skip directories */
+        if (S_ISDIR (source->st.st_mode))
+            continue;
+
+        source_fname = source->fname->str;
+        if (panel->is_panelized)
+            source_fname = x_basename (source_fname);
+
+        /* Search the corresponding entry from the other panel */
+        for (j = 0; j < other->dir.len; j++)
+        {
+            const char *other_fname;
+
+            other_fname = other->dir.list[j].fname->str;
+            if (other->is_panelized)
+                other_fname = x_basename (other_fname);
+
+            if (strcmp (source_fname, other_fname) == 0)
+                break;
+        }
+
+        if (j >= other->dir.len)
+            /* Not found -> mark */
+            do_file_mark (panel, i, 1);
+        else
+        {
+            /* Found */
+            file_entry_t *target = &other->dir.list[j];
+
+            if (mode != compare_size_only)
+                /* Older version is not marked */
+                if (source->st.st_mtime < target->st.st_mtime)
+                    continue;
+
+            /* Newer version with different size is marked */
+            if (source->st.st_size != target->st.st_size)
+            {
+                do_file_mark (panel, i, 1);
+                continue;
+            }
+
+            if (mode == compare_size_only)
+                continue;
+
+            if (mode == compare_quick)
+            {
+                /* Thorough compare off, compare only time stamps */
+                /* Mark newer version, don't mark version with the same date */
+                if (source->st.st_mtime > target->st.st_mtime)
+                    do_file_mark (panel, i, 1);
+
+                continue;
+            }
+
+            /* Thorough compare on, do byte-by-byte comparison */
+            {
+                vfs_path_t *src_name, *dst_name;
+
+                src_name =
+                    vfs_path_append_new (panel->cwd_vpath, source->fname->str, (char *) NULL);
+                dst_name =
+                    vfs_path_append_new (other->cwd_vpath, target->fname->str, (char *) NULL);
+                if (compare_files (src_name, dst_name, source->st.st_size))
+                    do_file_mark (panel, i, 1);
+                vfs_path_free (src_name, TRUE);
+                vfs_path_free (dst_name, TRUE);
+            }
+        }
+    }                           /* for (i ...) */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+do_link (link_type_t link_type, const char *fname)
+{
+    char *dest = NULL, *src = NULL;
+    vfs_path_t *dest_vpath = NULL;
+
+    if (link_type == LINK_HARDLINK)
+    {
+        vfs_path_t *fname_vpath;
+
+        src = g_strdup_printf (_("Link %s to:"), str_trunc (fname, 46));
+        dest =
+            input_expand_dialog (_("Link"), src, MC_HISTORY_FM_LINK, "", INPUT_COMPLETE_FILENAMES);
+        if (dest == NULL || *dest == '\0')
+            goto cleanup;
+
+        save_cwds_stat ();
+
+        fname_vpath = vfs_path_from_str (fname);
+        dest_vpath = vfs_path_from_str (dest);
+        if (mc_link (fname_vpath, dest_vpath) == -1)
+            message (D_ERROR, MSG_ERROR, _("link: %s"), unix_error_string (errno));
+        vfs_path_free (fname_vpath, TRUE);
+    }
+    else
+    {
+        vfs_path_t *s, *d;
+
+        /* suggest the full path for symlink, and either the full or
+           relative path to the file it points to  */
+        s = vfs_path_append_new (current_panel->cwd_vpath, fname, (char *) NULL);
+
+        if (get_other_type () == view_listing)
+            d = vfs_path_append_new (other_panel->cwd_vpath, fname, (char *) NULL);
+        else
+            d = vfs_path_from_str (fname);
+
+        if (link_type == LINK_SYMLINK_RELATIVE)
+        {
+            char *s_str;
+
+            s_str = diff_two_paths (other_panel->cwd_vpath, s);
+            vfs_path_free (s, TRUE);
+            s = vfs_path_from_str_flags (s_str, VPF_NO_CANON);
+            g_free (s_str);
+        }
+
+        symlink_box (s, d, &dest, &src);
+        vfs_path_free (d, TRUE);
+        vfs_path_free (s, TRUE);
+
+        if (dest == NULL || *dest == '\0' || src == NULL || *src == '\0')
+            goto cleanup;
+
+        save_cwds_stat ();
+
+        dest_vpath = vfs_path_from_str_flags (dest, VPF_NO_CANON);
+
+        s = vfs_path_from_str (src);
+        if (mc_symlink (dest_vpath, s) == -1)
+            message (D_ERROR, MSG_ERROR, _("symlink: %s"), unix_error_string (errno));
+        vfs_path_free (s, TRUE);
+    }
+
+    update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+
+  cleanup:
+    vfs_path_free (dest_vpath, TRUE);
+    g_free (src);
+    g_free (dest);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#if defined(ENABLE_VFS_UNDELFS) || defined(ENABLE_VFS_NET)
+static void
+nice_cd (const char *text, const char *xtext, const char *help,
+         const char *history_name, const char *prefix, int to_home, gboolean strip_password)
+{
+    char *machine;
+    char *cd_path;
+
+    machine =
+        input_dialog_help (text, xtext, help, history_name, INPUT_LAST_TEXT, strip_password,
+                           INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD | INPUT_COMPLETE_HOSTNAMES |
+                           INPUT_COMPLETE_USERNAMES);
+    if (machine == NULL)
+        return;
+
+    to_home = 0;                /* FIXME: how to solve going to home nicely? /~/ is
+                                   ugly as hell and leads to problems in vfs layer */
+
+    if (strncmp (prefix, machine, strlen (prefix)) == 0)
+        cd_path = g_strconcat (machine, to_home ? "/~/" : (char *) NULL, (char *) NULL);
+    else
+        cd_path = g_strconcat (prefix, machine, to_home ? "/~/" : (char *) NULL, (char *) NULL);
+
+    g_free (machine);
+
+    if (!IS_PATH_SEP (*cd_path))
+    {
+        char *tmp = cd_path;
+
+        cd_path = g_strconcat (PATH_SEP_STR, tmp, (char *) NULL);
+        g_free (tmp);
+    }
+
+    {
+        panel_view_mode_t save_type;
+        vfs_path_t *cd_vpath;
+
+        save_type = get_panel_type (MENU_PANEL_IDX);
+
+        if (save_type != view_listing)
+            create_panel (MENU_PANEL_IDX, view_listing);
+
+        cd_vpath = vfs_path_from_str_flags (cd_path, VPF_NO_CANON);
+        if (!panel_do_cd (MENU_PANEL, cd_vpath, cd_parse_command))
+        {
+            cd_error_message (cd_path);
+
+            if (save_type != view_listing)
+                create_panel (MENU_PANEL_IDX, save_type);
+        }
+        vfs_path_free (cd_vpath, TRUE);
+    }
+    g_free (cd_path);
+
+    /* In case of passive panel, restore current VFS directory that was changed in panel_do_cd() */
+    if (MENU_PANEL != current_panel)
+        (void) mc_chdir (current_panel->cwd_vpath);
+}
+#endif /* ENABLE_VFS_UNDELFS || ENABLE_VFS_NET */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+configure_panel_listing (WPanel * p, int list_format, int brief_cols, gboolean use_msformat,
+                         char **user, char **status)
+{
+    p->user_mini_status = use_msformat;
+    p->list_format = list_format;
+
+    if (list_format == list_brief)
+        p->brief_cols = brief_cols;
+
+    if (list_format == list_user || use_msformat)
+    {
+        g_free (p->user_format);
+        p->user_format = *user;
+        *user = NULL;
+
+        g_free (p->user_status_format[list_format]);
+        p->user_status_format[list_format] = *status;
+        *status = NULL;
+
+        set_panel_formats (p);
+    }
+
+    set_panel_formats (p);
+    do_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+switch_to_listing (int panel_index)
+{
+    if (get_panel_type (panel_index) != view_listing)
+        create_panel (panel_index, view_listing);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+view_file_at_line (const vfs_path_t * filename_vpath, gboolean plain_view, gboolean internal,
+                   long start_line, off_t search_start, off_t search_end)
+{
+    gboolean ret = TRUE;
+
+    if (plain_view)
+    {
+        mcview_mode_flags_t changed_flags;
+
+        mcview_clear_mode_flags (&changed_flags);
+        mcview_altered_flags.hex = FALSE;
+        mcview_altered_flags.magic = FALSE;
+        mcview_altered_flags.nroff = FALSE;
+        if (mcview_global_flags.hex)
+            changed_flags.hex = TRUE;
+        if (mcview_global_flags.magic)
+            changed_flags.magic = TRUE;
+        if (mcview_global_flags.nroff)
+            changed_flags.nroff = TRUE;
+        mcview_global_flags.hex = FALSE;
+        mcview_global_flags.magic = FALSE;
+        mcview_global_flags.nroff = FALSE;
+
+        ret = mcview_viewer (NULL, filename_vpath, start_line, search_start, search_end);
+
+        if (changed_flags.hex && !mcview_altered_flags.hex)
+            mcview_global_flags.hex = TRUE;
+        if (changed_flags.magic && !mcview_altered_flags.magic)
+            mcview_global_flags.magic = TRUE;
+        if (changed_flags.nroff && !mcview_altered_flags.nroff)
+            mcview_global_flags.nroff = TRUE;
+
+        dialog_switch_process_pending ();
+    }
+    else if (internal)
+    {
+        char view_entry[BUF_TINY];
+
+        if (start_line > 0)
+            g_snprintf (view_entry, sizeof (view_entry), "View:%ld", start_line);
+        else
+            strcpy (view_entry, "View");
+
+        ret = (regex_command (filename_vpath, view_entry) == 0);
+        if (ret)
+        {
+            ret = mcview_viewer (NULL, filename_vpath, start_line, search_start, search_end);
+            dialog_switch_process_pending ();
+        }
+    }
+    else
+    {
+        static const char *viewer = NULL;
+
+        if (viewer == NULL)
+        {
+            viewer = getenv ("VIEWER");
+            if (viewer == NULL)
+                viewer = getenv ("PAGER");
+            if (viewer == NULL)
+                viewer = "view";
+        }
+
+        execute_external_editor_or_viewer (viewer, filename_vpath, start_line);
+    }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** view_file (filename, plain_view, internal)
+ *
+ * Inputs:
+ *   filename_vpath: The file name to view
+ *   plain_view:     If set does not do any fancy pre-processing (no filtering) and
+ *                   always invokes the internal viewer.
+ *   internal:       If set uses the internal viewer, otherwise an external viewer.
+ */
+
+gboolean
+view_file (const vfs_path_t * filename_vpath, gboolean plain_view, gboolean internal)
+{
+    return view_file_at_line (filename_vpath, plain_view, internal, 0, 0, 0);
+}
+
+
+/* --------------------------------------------------------------------------------------------- */
+/** Run user's preferred viewer on the current file */
+
+void
+view_cmd (WPanel * panel)
+{
+    do_view_cmd (panel, FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Ask for file and run user's preferred viewer on it */
+
+void
+view_file_cmd (const WPanel * panel)
+{
+    char *filename;
+    vfs_path_t *vpath;
+
+    filename =
+        input_expand_dialog (_("View file"), _("Filename:"),
+                             MC_HISTORY_FM_VIEW_FILE, panel_current_entry (panel)->fname->str,
+                             INPUT_COMPLETE_FILENAMES);
+    if (filename == NULL)
+        return;
+
+    vpath = vfs_path_from_str (filename);
+    g_free (filename);
+    view_file (vpath, FALSE, use_internal_view);
+    vfs_path_free (vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Run plain internal viewer on the current file */
+void
+view_raw_cmd (WPanel * panel)
+{
+    do_view_cmd (panel, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+view_filtered_cmd (const WPanel * panel)
+{
+    char *command;
+    const char *initial_command;
+
+    if (input_is_empty (cmdline))
+        initial_command = panel_current_entry (panel)->fname->str;
+    else
+        initial_command = input_get_ctext (cmdline);
+
+    command =
+        input_dialog (_("Filtered view"),
+                      _("Filter command and arguments:"),
+                      MC_HISTORY_FM_FILTERED_VIEW, initial_command,
+                      INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_COMMANDS);
+
+    if (command != NULL)
+    {
+        mcview_viewer (command, NULL, 0, 0, 0);
+        g_free (command);
+        dialog_switch_process_pending ();
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+edit_file_at_line (const vfs_path_t * what_vpath, gboolean internal, long start_line)
+{
+
+#ifdef USE_INTERNAL_EDIT
+    if (internal)
+        edit_file (what_vpath, start_line);
+    else
+#endif /* USE_INTERNAL_EDIT */
+    {
+        static const char *editor = NULL;
+
+        (void) internal;
+
+        if (editor == NULL)
+        {
+            editor = getenv ("EDITOR");
+            if (editor == NULL)
+                editor = get_default_editor ();
+        }
+
+        execute_external_editor_or_viewer (editor, what_vpath, start_line);
+    }
+
+    if (mc_global.mc_run_mode == MC_RUN_FULL)
+        update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+
+#ifdef USE_INTERNAL_EDIT
+    if (use_internal_edit)
+        dialog_switch_process_pending ();
+    else
+#endif /* USE_INTERNAL_EDIT */
+        repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+edit_cmd (const WPanel * panel)
+{
+    vfs_path_t *fname;
+
+    fname = vfs_path_from_str (panel_current_entry (panel)->fname->str);
+    if (regex_command (fname, "Edit") == 0)
+        do_edit (fname);
+    vfs_path_free (fname, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef USE_INTERNAL_EDIT
+void
+edit_cmd_force_internal (const WPanel * panel)
+{
+    vfs_path_t *fname;
+
+    fname = vfs_path_from_str (panel_current_entry (panel)->fname->str);
+    if (regex_command (fname, "Edit") == 0)
+        edit_file_at_line (fname, TRUE, 1);
+    vfs_path_free (fname, TRUE);
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+edit_cmd_new (void)
+{
+    vfs_path_t *fname_vpath = NULL;
+
+    if (editor_ask_filename_before_edit)
+    {
+        char *fname;
+
+        fname = input_expand_dialog (_("Edit file"), _("Enter file name:"),
+                                     MC_HISTORY_EDIT_LOAD, "", INPUT_COMPLETE_FILENAMES);
+        if (fname == NULL)
+            return;
+
+        if (*fname != '\0')
+            fname_vpath = vfs_path_from_str (fname);
+
+        g_free (fname);
+    }
+
+#ifdef HAVE_CHARSET
+    mc_global.source_codepage = default_source_codepage;
+#endif
+    do_edit (fname_vpath);
+
+    vfs_path_free (fname_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+mkdir_cmd (WPanel * panel)
+{
+    const file_entry_t *fe;
+    char *dir;
+    const char *name = "";
+
+    fe = panel_current_entry (panel);
+
+    /* If 'on' then automatically fills name with current item name */
+    if (auto_fill_mkdir_name && !DIR_IS_DOTDOT (fe->fname->str))
+        name = fe->fname->str;
+
+    dir =
+        input_expand_dialog (_("Create a new Directory"),
+                             _("Enter directory name:"), MC_HISTORY_FM_MKDIR, name,
+                             INPUT_COMPLETE_FILENAMES);
+
+    if (dir != NULL && *dir != '\0')
+    {
+        vfs_path_t *absdir;
+
+        if (IS_PATH_SEP (dir[0]) || dir[0] == '~')
+            absdir = vfs_path_from_str (dir);
+        else
+        {
+            /* possible escaped '~' */
+            /* allow create directory with name '~' */
+            char *tmpdir = dir;
+
+            if (dir[0] == '\\' && dir[1] == '~')
+                tmpdir = dir + 1;
+
+            absdir = vfs_path_append_new (panel->cwd_vpath, tmpdir, (char *) NULL);
+        }
+
+        save_cwds_stat ();
+
+        if (my_mkdir (absdir, 0777) != 0)
+            message (D_ERROR, MSG_ERROR, "%s", unix_error_string (errno));
+        else
+        {
+            update_panels (UP_OPTIMIZE, dir);
+            repaint_screen ();
+            select_item (panel);
+        }
+
+        vfs_path_free (absdir, TRUE);
+    }
+    g_free (dir);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+reread_cmd (void)
+{
+    panel_update_flags_t flag = UP_ONLY_CURRENT;
+
+    if (get_current_type () == view_listing && get_other_type () == view_listing &&
+        vfs_path_equal (current_panel->cwd_vpath, other_panel->cwd_vpath))
+        flag = UP_OPTIMIZE;
+
+    update_panels (UP_RELOAD | flag, UP_KEEPSEL);
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+ext_cmd (void)
+{
+    vfs_path_t *extdir_vpath;
+    int dir = 0;
+
+    if (geteuid () == 0)
+        dir = query_dialog (_("Extension file edit"),
+                            _("Which extension file you want to edit?"), D_NORMAL, 2,
+                            _("&User"), _("&System Wide"));
+
+    extdir_vpath = vfs_path_build_filename (mc_global.sysconfig_dir, MC_EXT_FILE, (char *) NULL);
+
+    if (dir == 0)
+    {
+        vfs_path_t *buffer_vpath;
+
+        buffer_vpath = mc_config_get_full_vpath (MC_EXT_FILE);
+        check_for_default (extdir_vpath, buffer_vpath);
+        do_edit (buffer_vpath);
+        vfs_path_free (buffer_vpath, TRUE);
+    }
+    else if (dir == 1)
+    {
+        if (!exist_file (vfs_path_get_last_path_str (extdir_vpath)))
+        {
+            vfs_path_free (extdir_vpath, TRUE);
+            extdir_vpath =
+                vfs_path_build_filename (mc_global.share_data_dir, MC_EXT_FILE, (char *) NULL);
+        }
+        do_edit (extdir_vpath);
+    }
+
+    vfs_path_free (extdir_vpath, TRUE);
+    flush_extension_file ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** edit file menu for mc */
+
+void
+edit_mc_menu_cmd (void)
+{
+    vfs_path_t *buffer_vpath;
+    vfs_path_t *menufile_vpath;
+    int dir = 0;
+
+    query_set_sel (1);
+    dir = query_dialog (_("Menu edit"),
+                        _("Which menu file do you want to edit?"),
+                        D_NORMAL, geteuid ()? 2 : 3, _("&Local"), _("&User"), _("&System Wide"));
+
+    menufile_vpath =
+        vfs_path_build_filename (mc_global.sysconfig_dir, MC_GLOBAL_MENU, (char *) NULL);
+
+    if (!exist_file (vfs_path_get_last_path_str (menufile_vpath)))
+    {
+        vfs_path_free (menufile_vpath, TRUE);
+        menufile_vpath =
+            vfs_path_build_filename (mc_global.share_data_dir, MC_GLOBAL_MENU, (char *) NULL);
+    }
+
+    switch (dir)
+    {
+    case 0:
+        buffer_vpath = vfs_path_from_str (MC_LOCAL_MENU);
+        check_for_default (menufile_vpath, buffer_vpath);
+        chmod (vfs_path_get_last_path_str (buffer_vpath), 0600);
+        break;
+
+    case 1:
+        buffer_vpath = mc_config_get_full_vpath (MC_USERMENU_FILE);
+        check_for_default (menufile_vpath, buffer_vpath);
+        break;
+
+    case 2:
+        buffer_vpath =
+            vfs_path_build_filename (mc_global.sysconfig_dir, MC_GLOBAL_MENU, (char *) NULL);
+        if (!exist_file (vfs_path_get_last_path_str (buffer_vpath)))
+        {
+            vfs_path_free (buffer_vpath, TRUE);
+            buffer_vpath =
+                vfs_path_build_filename (mc_global.share_data_dir, MC_GLOBAL_MENU, (char *) NULL);
+        }
+        break;
+
+    default:
+        vfs_path_free (menufile_vpath, TRUE);
+        return;
+    }
+
+    do_edit (buffer_vpath);
+
+    vfs_path_free (buffer_vpath, TRUE);
+    vfs_path_free (menufile_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+edit_fhl_cmd (void)
+{
+    vfs_path_t *fhlfile_vpath = NULL;
+    int dir = 0;
+
+    if (geteuid () == 0)
+        dir = query_dialog (_("Highlighting groups file edit"),
+                            _("Which highlighting file you want to edit?"), D_NORMAL, 2,
+                            _("&User"), _("&System Wide"));
+
+    fhlfile_vpath =
+        vfs_path_build_filename (mc_global.sysconfig_dir, MC_FHL_INI_FILE, (char *) NULL);
+
+    if (dir == 0)
+    {
+        vfs_path_t *buffer_vpath;
+
+        buffer_vpath = mc_config_get_full_vpath (MC_FHL_INI_FILE);
+        check_for_default (fhlfile_vpath, buffer_vpath);
+        do_edit (buffer_vpath);
+        vfs_path_free (buffer_vpath, TRUE);
+    }
+    else if (dir == 1)
+    {
+        if (!exist_file (vfs_path_get_last_path_str (fhlfile_vpath)))
+        {
+            vfs_path_free (fhlfile_vpath, TRUE);
+            fhlfile_vpath =
+                vfs_path_build_filename (mc_global.sysconfig_dir, MC_FHL_INI_FILE, (char *) NULL);
+        }
+        do_edit (fhlfile_vpath);
+    }
+
+    vfs_path_free (fhlfile_vpath, TRUE);
+    /* refresh highlighting rules */
+    mc_fhl_free (&mc_filehighlight);
+    mc_filehighlight = mc_fhl_new (TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+hotlist_cmd (WPanel * panel)
+{
+    char *target;
+
+    target = hotlist_show (LIST_HOTLIST, panel);
+    if (target == NULL)
+        return;
+
+    if (get_current_type () == view_tree)
+    {
+        vfs_path_t *vpath;
+
+        vpath = vfs_path_from_str (target);
+        tree_chdir (the_tree, vpath);
+        vfs_path_free (vpath, TRUE);
+    }
+    else
+    {
+        vfs_path_t *deprecated_vpath;
+        const char *deprecated_path;
+
+        deprecated_vpath = vfs_path_from_str_flags (target, VPF_USE_DEPRECATED_PARSER);
+        deprecated_path = vfs_path_as_str (deprecated_vpath);
+        cd_to (deprecated_path);
+        vfs_path_free (deprecated_vpath, TRUE);
+    }
+
+    g_free (target);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS
+void
+vfs_list (WPanel * panel)
+{
+    char *target;
+    vfs_path_t *target_vpath;
+
+    target = hotlist_show (LIST_VFSLIST, panel);
+    if (target == NULL)
+        return;
+
+    target_vpath = vfs_path_from_str (target);
+    if (!panel_cd (current_panel, target_vpath, cd_exact))
+        cd_error_message (target);
+    vfs_path_free (target_vpath, TRUE);
+    g_free (target);
+}
+#endif /* ENABLE_VFS */
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+compare_dirs_cmd (void)
+{
+    int choice;
+    enum CompareMode thorough_flag;
+
+    choice =
+        query_dialog (_("Compare directories"),
+                      _("Select compare method:"), D_NORMAL, 4,
+                      _("&Quick"), _("&Size only"), _("&Thorough"), _("&Cancel"));
+
+    if (choice < 0 || choice > 2)
+        return;
+
+    thorough_flag = choice;
+
+    if (get_current_type () == view_listing && get_other_type () == view_listing)
+    {
+        compare_dir (current_panel, other_panel, thorough_flag);
+        compare_dir (other_panel, current_panel, thorough_flag);
+    }
+    else
+        message (D_ERROR, MSG_ERROR,
+                 _("Both panels should be in the listing mode\nto use this command"));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef USE_DIFF_VIEW
+void
+diff_view_cmd (void)
+{
+    /* both panels must be in the list mode */
+    if (get_current_type () == view_listing && get_other_type () == view_listing)
+    {
+        if (get_current_index () == 0)
+            dview_diff_cmd (current_panel, other_panel);
+        else
+            dview_diff_cmd (other_panel, current_panel);
+
+        if (mc_global.mc_run_mode == MC_RUN_FULL)
+            update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+
+        dialog_switch_process_pending ();
+    }
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+swap_cmd (void)
+{
+    swap_panels ();
+    tty_touch_screen ();
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+link_cmd (link_type_t link_type)
+{
+    const char *filename;
+
+    filename = panel_current_entry (current_panel)->fname->str;
+    if (filename != NULL)
+        do_link (link_type, filename);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+edit_symlink_cmd (void)
+{
+    const file_entry_t *fe;
+    const char *p;
+
+    fe = panel_current_entry (current_panel);
+    p = fe->fname->str;
+
+    if (!S_ISLNK (fe->st.st_mode))
+        message (D_ERROR, MSG_ERROR, _("'%s' is not a symbolic link"), p);
+    else
+    {
+        char buffer[MC_MAXPATHLEN];
+        int i;
+
+        i = readlink (p, buffer, sizeof (buffer) - 1);
+        if (i > 0)
+        {
+            char *q, *dest;
+
+            buffer[i] = '\0';
+
+            q = g_strdup_printf (_("Symlink '%s\' points to:"), str_trunc (p, 32));
+            dest =
+                input_expand_dialog (_("Edit symlink"), q, MC_HISTORY_FM_EDIT_LINK, buffer,
+                                     INPUT_COMPLETE_FILENAMES);
+            g_free (q);
+
+            if (dest != NULL && *dest != '\0' && strcmp (buffer, dest) != 0)
+            {
+                vfs_path_t *p_vpath;
+
+                p_vpath = vfs_path_from_str (p);
+
+                save_cwds_stat ();
+
+                if (mc_unlink (p_vpath) == -1)
+                    message (D_ERROR, MSG_ERROR, _("edit symlink, unable to remove %s: %s"), p,
+                             unix_error_string (errno));
+                else
+                {
+                    vfs_path_t *dest_vpath;
+
+                    dest_vpath = vfs_path_from_str_flags (dest, VPF_NO_CANON);
+                    if (mc_symlink (dest_vpath, p_vpath) == -1)
+                        message (D_ERROR, MSG_ERROR, _("edit symlink: %s"),
+                                 unix_error_string (errno));
+                    vfs_path_free (dest_vpath, TRUE);
+                }
+
+                vfs_path_free (p_vpath, TRUE);
+
+                update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+                repaint_screen ();
+            }
+
+            g_free (dest);
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+help_cmd (void)
+{
+    ev_help_t event_data = { NULL, NULL };
+
+    if (current_panel->quick_search.active)
+        event_data.node = "[Quick search]";
+    else
+        event_data.node = "[main]";
+
+    mc_event_raise (MCEVENT_GROUP_CORE, "help", &event_data);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+user_file_menu_cmd (void)
+{
+    (void) user_menu_cmd (NULL, NULL, -1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS_FTP
+void
+ftplink_cmd (void)
+{
+    nice_cd (_("FTP to machine"), _(machine_str),
+             "[FTP File System]", ":ftplink_cmd: FTP to machine ", "ftp://", 1, TRUE);
+}
+#endif /* ENABLE_VFS_FTP */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS_SFTP
+void
+sftplink_cmd (void)
+{
+    nice_cd (_("SFTP to machine"), _(machine_str),
+             "[SFTP (SSH File Transfer Protocol) filesystem]",
+             ":sftplink_cmd: SFTP to machine ", "sftp://", 1, TRUE);
+}
+#endif /* ENABLE_VFS_SFTP */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS_FISH
+void
+fishlink_cmd (void)
+{
+    nice_cd (_("Shell link to machine"), _(machine_str),
+             "[FIle transfer over SHell filesystem]", ":fishlink_cmd: Shell link to machine ",
+             "sh://", 1, TRUE);
+}
+#endif /* ENABLE_VFS_FISH */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS_UNDELFS
+void
+undelete_cmd (void)
+{
+    nice_cd (_("Undelete files on an ext2 file system"),
+             _("Enter device (without /dev/) to undelete\nfiles on: (F1 for details)"),
+             "[Undelete File System]", ":undelete_cmd: Undel on ext2 fs ", "undel://", 0, FALSE);
+}
+#endif /* ENABLE_VFS_UNDELFS */
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+quick_cd_cmd (WPanel * panel)
+{
+    char *p;
+
+    p = cd_box (panel);
+    if (p != NULL && *p != '\0')
+        cd_to (p);
+    g_free (p);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*!
+   \brief calculate dirs sizes
+
+   calculate dirs sizes and resort panel:
+   dirs_selected = show size for selected dirs,
+   otherwise = show size for dir under cursor:
+   dir under cursor ".." = show size for all dirs,
+   otherwise = show size for dir under cursor
+ */
+
+void
+smart_dirsize_cmd (WPanel * panel)
+{
+    const file_entry_t *entry;
+
+    entry = panel_current_entry (panel);
+    if ((S_ISDIR (entry->st.st_mode) && DIR_IS_DOTDOT (entry->fname->str)) || panel->dirs_marked)
+        dirsizes_cmd (panel);
+    else
+        single_dirsize_cmd (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+single_dirsize_cmd (WPanel * panel)
+{
+    file_entry_t *entry;
+
+    entry = panel_current_entry (panel);
+
+    if (S_ISDIR (entry->st.st_mode) && !DIR_IS_DOTDOT (entry->fname->str))
+    {
+        size_t dir_count = 0;
+        size_t count = 0;
+        uintmax_t total = 0;
+        dirsize_status_msg_t dsm;
+        vfs_path_t *p;
+
+        p = vfs_path_from_str (entry->fname->str);
+
+        memset (&dsm, 0, sizeof (dsm));
+        status_msg_init (STATUS_MSG (&dsm), _("Directory scanning"), 0, dirsize_status_init_cb,
+                         dirsize_status_update_cb, dirsize_status_deinit_cb);
+
+        if (compute_dir_size (p, &dsm, &dir_count, &count, &total, FALSE) == FILE_CONT)
+        {
+            entry->st.st_size = (off_t) total;
+            entry->f.dir_size_computed = 1;
+        }
+
+        vfs_path_free (p, TRUE);
+
+        status_msg_deinit (STATUS_MSG (&dsm));
+    }
+
+    if (panels_options.mark_moves_down)
+        send_message (panel, NULL, MSG_ACTION, CK_Down, NULL);
+
+    recalculate_panel_summary (panel);
+
+    if (panel->sort_field->sort_routine == (GCompareFunc) sort_size)
+        panel_re_sort (panel);
+
+    panel->dirty = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+dirsizes_cmd (WPanel * panel)
+{
+    int i;
+    dirsize_status_msg_t dsm;
+
+    memset (&dsm, 0, sizeof (dsm));
+    status_msg_init (STATUS_MSG (&dsm), _("Directory scanning"), 0, dirsize_status_init_cb,
+                     dirsize_status_update_cb, dirsize_status_deinit_cb);
+
+    for (i = 0; i < panel->dir.len; i++)
+        if (S_ISDIR (panel->dir.list[i].st.st_mode)
+            && ((panel->dirs_marked != 0 && panel->dir.list[i].f.marked != 0)
+                || panel->dirs_marked == 0) && !DIR_IS_DOTDOT (panel->dir.list[i].fname->str))
+        {
+            vfs_path_t *p;
+            size_t dir_count = 0;
+            size_t count = 0;
+            uintmax_t total = 0;
+            gboolean ok;
+
+            p = vfs_path_from_str (panel->dir.list[i].fname->str);
+            ok = compute_dir_size (p, &dsm, &dir_count, &count, &total, FALSE) != FILE_CONT;
+            vfs_path_free (p, TRUE);
+            if (ok)
+                break;
+
+            panel->dir.list[i].st.st_size = (off_t) total;
+            panel->dir.list[i].f.dir_size_computed = 1;
+        }
+
+    status_msg_deinit (STATUS_MSG (&dsm));
+
+    recalculate_panel_summary (panel);
+
+    if (panel->sort_field->sort_routine == (GCompareFunc) sort_size)
+        panel_re_sort (panel);
+
+    panel->dirty = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+save_setup_cmd (void)
+{
+    vfs_path_t *vpath;
+    const char *path;
+
+    vpath = vfs_path_from_str_flags (mc_config_get_path (), VPF_STRIP_HOME);
+    path = vfs_path_as_str (vpath);
+
+    if (save_setup (TRUE, TRUE))
+        message (D_NORMAL, _("Setup"), _("Setup saved to %s"), path);
+    else
+        message (D_ERROR, _("Setup"), _("Unable to save setup to %s"), path);
+
+    vfs_path_free (vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+info_cmd_no_menu (void)
+{
+    if (get_panel_type (0) == view_info)
+        create_panel (0, view_listing);
+    else if (get_panel_type (1) == view_info)
+        create_panel (1, view_listing);
+    else
+        create_panel (current_panel == left_panel ? 1 : 0, view_info);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+quick_cmd_no_menu (void)
+{
+    if (get_panel_type (0) == view_quick)
+        create_panel (0, view_listing);
+    else if (get_panel_type (1) == view_quick)
+        create_panel (1, view_listing);
+    else
+        create_panel (current_panel == left_panel ? 1 : 0, view_quick);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+listing_cmd (void)
+{
+    WPanel *p;
+
+    switch_to_listing (MENU_PANEL_IDX);
+
+    p = PANEL (get_panel_widget (MENU_PANEL_IDX));
+
+    p->is_panelized = FALSE;
+    panel_set_filter (p, NULL); /* including panel reload */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+setup_listing_format_cmd (void)
+{
+    int list_format;
+    gboolean use_msformat;
+    int brief_cols;
+    char *user, *status;
+    WPanel *p = NULL;
+
+    if (SELECTED_IS_PANEL)
+        p = MENU_PANEL_IDX == 0 ? left_panel : right_panel;
+
+    list_format = panel_listing_box (p, MENU_PANEL_IDX, &user, &status, &use_msformat, &brief_cols);
+    if (list_format != -1)
+    {
+        switch_to_listing (MENU_PANEL_IDX);
+        p = MENU_PANEL_IDX == 0 ? left_panel : right_panel;
+        configure_panel_listing (p, list_format, brief_cols, use_msformat, &user, &status);
+        g_free (user);
+        g_free (status);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_tree_cmd (void)
+{
+    create_panel (MENU_PANEL_IDX, view_tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+info_cmd (void)
+{
+    create_panel (MENU_PANEL_IDX, view_info);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+quick_view_cmd (void)
+{
+    if (PANEL (get_panel_widget (MENU_PANEL_IDX)) == current_panel)
+        (void) change_panel ();
+    create_panel (MENU_PANEL_IDX, view_quick);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_CHARSET
+void
+encoding_cmd (void)
+{
+    if (SELECTED_IS_PANEL)
+        panel_change_encoding (MENU_PANEL);
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/cmd.h b/src/filemanager/cmd.h
new file mode 100644
index 0000000..26bfdb7
--- /dev/null
+++ b/src/filemanager/cmd.h
@@ -0,0 +1,172 @@
+/** \file cmd.h
+ *  \brief Header: routines invoked by a function key
+ *
+ *  They normally operate on the current panel.
+ */
+
+#ifndef MC__CMD_H
+#define MC__CMD_H
+
+#include "lib/global.h"
+
+#include "file.h"               /* panel_operate() */
+#include "panel.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+typedef enum
+{
+    LINK_HARDLINK = 0,
+    LINK_SYMLINK_ABSOLUTE,
+    LINK_SYMLINK_RELATIVE
+} link_type_t;
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+#ifdef ENABLE_VFS_FTP
+void ftplink_cmd (void);
+#endif
+#ifdef ENABLE_VFS_SFTP
+void sftplink_cmd (void);
+#endif
+#ifdef ENABLE_VFS_FISH
+void fishlink_cmd (void);
+#endif
+void undelete_cmd (void);
+void help_cmd (void);
+void smart_dirsize_cmd (WPanel * panel);
+void single_dirsize_cmd (WPanel * panel);
+void dirsizes_cmd (WPanel * panel);
+gboolean view_file_at_line (const vfs_path_t * filename_vpath, gboolean plain_view,
+                            gboolean internal, long start_line, off_t search_start,
+                            off_t search_end);
+gboolean view_file (const vfs_path_t * filename_vpath, gboolean plain_view, gboolean internal);
+void view_cmd (WPanel * panel);
+void view_file_cmd (const WPanel * panel);
+void view_raw_cmd (WPanel * panel);
+void view_filtered_cmd (const WPanel * panel);
+void edit_file_at_line (const vfs_path_t * what_vpath, gboolean internal, long start_line);
+void edit_cmd (const WPanel * panel);
+void edit_cmd_new (void);
+#ifdef USE_INTERNAL_EDIT
+void edit_cmd_force_internal (const WPanel * panel);
+#endif
+void mkdir_cmd (WPanel * panel);
+void reread_cmd (void);
+void vfs_list (WPanel * panel);
+void ext_cmd (void);
+void edit_mc_menu_cmd (void);
+void edit_fhl_cmd (void);
+void hotlist_cmd (WPanel * panel);
+void compare_dirs_cmd (void);
+#ifdef USE_DIFF_VIEW
+void diff_view_cmd (void);
+#endif
+void panel_tree_cmd (void);
+void link_cmd (link_type_t link_type);
+void edit_symlink_cmd (void);
+void swap_cmd (void);
+void quick_cd_cmd (WPanel * panel);
+void save_setup_cmd (void);
+void user_file_menu_cmd (void);
+void info_cmd (void);
+void listing_cmd (void);
+void setup_listing_format_cmd (void);
+void quick_cmd_no_menu (void);
+void info_cmd_no_menu (void);
+void quick_view_cmd (void);
+#ifdef HAVE_CHARSET
+void encoding_cmd (void);
+#endif
+/* achown.c */
+void advanced_chown_cmd (WPanel * panel);
+/* chmod.c */
+void chmod_cmd (WPanel * panel);
+/* chown.c */
+void chown_cmd (WPanel * panel);
+#ifdef ENABLE_EXT2FS_ATTR
+/* chattr.c */
+void chattr_cmd (WPanel * panel);
+const char *chattr_get_as_str (unsigned long attr);
+#endif
+/* find.c */
+void find_cmd (WPanel * panel);
+
+/* --------------------------------------------------------------------------------------------- */
+/*** inline functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Copy, default to the other panel.
+ */
+
+static inline void
+copy_cmd (WPanel * panel)
+{
+    panel_operate (panel, OP_COPY, FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Copy, default to the same panel, ignore marks.
+ */
+
+static inline void
+copy_cmd_local (WPanel * panel)
+{
+    panel_operate (panel, OP_COPY, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Move/rename, default to the other panel.
+ */
+
+static inline void
+rename_cmd (WPanel * panel)
+{
+    panel_operate (panel, OP_MOVE, FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Move/rename, default to the same panel, ignore marks.
+ */
+
+static inline void
+rename_cmd_local (WPanel * panel)
+{
+    panel_operate (panel, OP_MOVE, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ *  Remove.
+ */
+
+static inline void
+delete_cmd (WPanel * panel)
+{
+    panel_operate (panel, OP_DELETE, FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ *  Remove, ignore marks.
+ */
+
+static inline void
+delete_cmd_local (WPanel * panel)
+{
+    panel_operate (panel, OP_DELETE, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#endif /* MC__CMD_H */
diff --git a/src/filemanager/command.c b/src/filemanager/command.c
new file mode 100644
index 0000000..47d2d75
--- /dev/null
+++ b/src/filemanager/command.c
@@ -0,0 +1,255 @@
+/*
+   Command line widget.
+   This widget is derived from the WInput widget, it's used to cope
+   with all the magic of the command input line, we depend on some
+   help from the program's callback.
+
+   Copyright (C) 1995-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2011-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file command.c
+ *  \brief Source: command line widget
+ */
+
+#include <config.h>
+
+#include <stdlib.h>
+#include <string.h>
+
+#include "lib/global.h"
+#include "lib/vfs/vfs.h"        /* vfs_current_is_local() */
+#include "lib/skin.h"           /* DEFAULT_COLOR */
+#include "lib/util.h"           /* whitespace() */
+#include "lib/widget.h"
+
+#include "src/setup.h"          /* quit */
+#ifdef ENABLE_SUBSHELL
+#include "src/subshell/subshell.h"
+#endif
+#include "src/execute.h"        /* shell_execute() */
+#include "src/usermenu.h"       /* expand_format() */
+
+#include "filemanager.h"        /* quiet_quit_cmd(), layout.h */
+#include "cd.h"                 /* cd_to() */
+
+#include "command.h"
+
+/*** global variables ****************************************************************************/
+
+/* This holds the command line */
+WInput *cmdline;
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* Color styles command line */
+static input_colors_t command_colors;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/** Handle Enter on the command line
+ *
+ * @param lc_cmdline string for handling
+ * @return MSG_HANDLED on success else MSG_NOT_HANDLED
+ */
+
+static cb_ret_t
+enter (WInput * lc_cmdline)
+{
+    const char *cmd;
+
+    if (!command_prompt)
+        return MSG_HANDLED;
+
+    cmd = input_get_ctext (lc_cmdline);
+
+    /* Any initial whitespace should be removed at this point */
+    while (whiteness (*cmd))
+        cmd++;
+
+    if (*cmd == '\0')
+        return MSG_HANDLED;
+
+    if (strncmp (cmd, "cd", 2) == 0 && (cmd[2] == '\0' || whitespace (cmd[2])))
+    {
+        cd_to (cmd + 2);
+        input_clean (lc_cmdline);
+        return MSG_HANDLED;
+    }
+    else if (strcmp (cmd, "exit") == 0)
+    {
+        input_assign_text (lc_cmdline, "");
+        if (!quiet_quit_cmd ())
+            return MSG_NOT_HANDLED;
+    }
+    else
+    {
+        GString *command;
+        size_t i;
+
+        if (!vfs_current_is_local ())
+        {
+            message (D_ERROR, MSG_ERROR, _("Cannot execute commands on non-local filesystems"));
+            return MSG_NOT_HANDLED;
+        }
+#ifdef ENABLE_SUBSHELL
+        /* Check this early before we clean command line
+         * (will be checked again by shell_execute) */
+        if (mc_global.tty.use_subshell && subshell_state != INACTIVE)
+        {
+            message (D_ERROR, MSG_ERROR, _("The shell is already running a command"));
+            return MSG_NOT_HANDLED;
+        }
+#endif
+        command = g_string_sized_new (32);
+
+        for (i = 0; cmd[i] != '\0'; i++)
+        {
+            if (cmd[i] != '%')
+                g_string_append_c (command, cmd[i]);
+            else
+            {
+                char *s;
+
+                s = expand_format (NULL, cmd[++i], TRUE);
+                g_string_append (command, s);
+                g_free (s);
+            }
+        }
+
+        input_clean (lc_cmdline);
+        shell_execute (command->str, 0);
+        g_string_free (command, TRUE);
+
+#ifdef ENABLE_SUBSHELL
+        if ((quit & SUBSHELL_EXIT) != 0)
+        {
+            if (quiet_quit_cmd ())
+                return MSG_HANDLED;
+
+            quit = 0;
+            /* restart subshell */
+            if (mc_global.tty.use_subshell)
+                init_subshell ();
+        }
+
+        if (mc_global.tty.use_subshell)
+            do_load_prompt ();
+#endif
+    }
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Default command line callback
+ *
+ * @param w Widget object
+ * @param msg message for handling
+ * @param parm extra parameter such as key code
+ *
+ * @return MSG_NOT_HANDLED on fail else MSG_HANDLED
+ */
+
+static cb_ret_t
+command_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_KEY:
+        /* Special case: we handle the enter key */
+        if (parm == '\n')
+            return enter (INPUT (w));
+        MC_FALLTHROUGH;
+
+    default:
+        return input_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+WInput *
+command_new (int y, int x, int cols)
+{
+    WInput *cmd;
+    Widget *w;
+
+    cmd = input_new (y, x, command_colors, cols, "", "cmdline",
+                     INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_VARIABLES | INPUT_COMPLETE_USERNAMES
+                     | INPUT_COMPLETE_HOSTNAMES | INPUT_COMPLETE_CD | INPUT_COMPLETE_COMMANDS |
+                     INPUT_COMPLETE_SHELL_ESC);
+    w = WIDGET (cmd);
+    /* Don't set WOP_SELECTABLE up, otherwise panels will be unselected */
+    widget_set_options (w, WOP_SELECTABLE, FALSE);
+    /* Add our hooks */
+    w->callback = command_callback;
+
+    return cmd;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Set colors for the command line.
+ */
+
+void
+command_set_default_colors (void)
+{
+    command_colors[WINPUTC_MAIN] = DEFAULT_COLOR;
+    command_colors[WINPUTC_MARK] = COMMAND_MARK_COLOR;
+    command_colors[WINPUTC_UNCHANGED] = DEFAULT_COLOR;
+    command_colors[WINPUTC_HISTORY] = COMMAND_HISTORY_COLOR;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Insert quoted text in input line.  The function is meant for the
+ * command line, so the percent sign is quoted as well.
+ *
+ * @param in WInput object
+ * @param text string for insertion
+ * @param insert_extra_space add extra space
+ */
+
+void
+command_insert (WInput * in, const char *text, gboolean insert_extra_space)
+{
+    char *quoted_text;
+
+    quoted_text = name_quote (text, TRUE);
+    input_insert (in, quoted_text, insert_extra_space);
+    g_free (quoted_text);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/command.h b/src/filemanager/command.h
new file mode 100644
index 0000000..9aacca4
--- /dev/null
+++ b/src/filemanager/command.h
@@ -0,0 +1,27 @@
+/** \file command.h
+ *  \brief Header: command line widget
+ */
+
+#ifndef MC__COMMAND_H
+#define MC__COMMAND_H
+
+#include "lib/widget.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+extern WInput *cmdline;
+
+/*** declarations of public functions ************************************************************/
+
+WInput *command_new (int y, int x, int len);
+void command_set_default_colors (void);
+void command_insert (WInput * in, const char *text, gboolean insert_extra_space);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__COMMAND_H */
diff --git a/src/filemanager/dir.c b/src/filemanager/dir.c
new file mode 100644
index 0000000..0931819
--- /dev/null
+++ b/src/filemanager/dir.c
@@ -0,0 +1,839 @@
+/*
+   Directory routines
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file src/filemanager/dir.c
+ *  \brief Source: directory routines
+ */
+
+#include <config.h>
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
+
+#include "lib/global.h"
+#include "lib/tty/tty.h"
+#include "lib/search.h"
+#include "lib/vfs/vfs.h"
+#include "lib/fs.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+
+#include "src/setup.h"          /* panels_options */
+
+#include "treestore.h"
+#include "file.h"               /* file_is_symlink_to_dir() */
+#include "dir.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define MY_ISDIR(x) (\
+    (is_exe (x->st.st_mode) && !(S_ISDIR (x->st.st_mode) || link_isdir (x)) && exec_first) \
+        ? 1 \
+        : ( (S_ISDIR (x->st.st_mode) || link_isdir (x)) ? 2 : 0) )
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* Reverse flag */
+static int reverse = 1;
+
+/* Are the files sorted case sensitively? */
+static gboolean case_sensitive = OS_SORT_CASE_SENSITIVE_DEFAULT;
+
+/* Are the exec_bit files top in list */
+static gboolean exec_first = TRUE;
+
+static dir_list dir_copy = { NULL, 0, 0, NULL };
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static inline int
+key_collate (const char *t1, const char *t2)
+{
+    int dotdot = 0;
+    int ret;
+
+    dotdot = (t1[0] == '.' ? 1 : 0) | ((t2[0] == '.' ? 1 : 0) << 1);
+
+    switch (dotdot)
+    {
+    case 0:
+    case 3:
+        ret = str_key_collate (t1, t2, case_sensitive) * reverse;
+        break;
+    case 1:
+        ret = -1;               /* t1 < t2 */
+        break;
+    case 2:
+        ret = 1;                /* t1 > t2 */
+        break;
+    default:
+        ret = 0;                /* it must not happen */
+    }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline int
+compare_by_names (file_entry_t * a, file_entry_t * b)
+{
+    /* create key if does not exist, key will be freed after sorting */
+    if (a->name_sort_key == NULL)
+        a->name_sort_key = str_create_key_for_filename (a->fname->str, case_sensitive);
+    if (b->name_sort_key == NULL)
+        b->name_sort_key = str_create_key_for_filename (b->fname->str, case_sensitive);
+
+    return key_collate (a->name_sort_key, b->name_sort_key);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * clear keys, should be call after sorting is finished.
+ */
+
+static void
+clean_sort_keys (dir_list * list, int start, int count)
+{
+    int i;
+
+    for (i = 0; i < count; i++)
+    {
+        file_entry_t *fentry;
+
+        fentry = &list->list[i + start];
+        str_release_key (fentry->name_sort_key, case_sensitive);
+        fentry->name_sort_key = NULL;
+        str_release_key (fentry->extension_sort_key, case_sensitive);
+        fentry->extension_sort_key = NULL;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * If you change handle_dirent then check also handle_path.
+ * @return FALSE = don't add, TRUE = add to the list
+ */
+
+static gboolean
+handle_dirent (struct vfs_dirent *dp, const file_filter_t * filter, struct stat *buf1,
+               gboolean * link_to_dir, gboolean * stale_link)
+{
+    vfs_path_t *vpath;
+    gboolean ok = TRUE;
+
+    if (DIR_IS_DOT (dp->d_name) || DIR_IS_DOTDOT (dp->d_name))
+        return FALSE;
+    if (!panels_options.show_dot_files && (dp->d_name[0] == '.'))
+        return FALSE;
+    if (!panels_options.show_backups && dp->d_name[strlen (dp->d_name) - 1] == '~')
+        return FALSE;
+
+    vpath = vfs_path_from_str (dp->d_name);
+    if (mc_lstat (vpath, buf1) == -1)
+    {
+        /*
+         * lstat() fails - such entries should be identified by
+         * buf1->st_mode being 0.
+         * It happens on QNX Neutrino for /fs/cd0 if no CD is inserted.
+         */
+        memset (buf1, 0, sizeof (*buf1));
+    }
+
+    if (S_ISDIR (buf1->st_mode))
+        tree_store_mark_checked (dp->d_name);
+
+    /* A link to a file or a directory? */
+    *link_to_dir = file_is_symlink_to_dir (vpath, buf1, stale_link);
+
+    vfs_path_free (vpath, TRUE);
+
+    if (filter != NULL && filter->handler != NULL)
+    {
+        gboolean files_only = (filter->flags & SELECT_FILES_ONLY) != 0;
+
+        ok = ((S_ISDIR (buf1->st_mode) || *link_to_dir) && files_only)
+            || mc_search_run (filter->handler, dp->d_name, 0, strlen (dp->d_name), NULL);
+    }
+
+    return ok;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** get info about ".." */
+
+static gboolean
+dir_get_dotdot_stat (const vfs_path_t * vpath, struct stat *st)
+{
+    gboolean ret = FALSE;
+
+    if ((vpath != NULL) && (st != NULL))
+    {
+        const char *path;
+
+        path = vfs_path_get_by_index (vpath, 0)->path;
+        if (path != NULL && *path != '\0')
+        {
+            vfs_path_t *tmp_vpath;
+
+            tmp_vpath = vfs_path_append_new (vpath, "..", (char *) NULL);
+            ret = mc_stat (tmp_vpath, st) == 0;
+            vfs_path_free (tmp_vpath, TRUE);
+        }
+    }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+alloc_dir_copy (int size)
+{
+    if (dir_copy.size < size)
+    {
+        if (dir_copy.list != NULL)
+            dir_list_free_list (&dir_copy);
+
+        dir_copy.list = g_new0 (file_entry_t, size);
+        dir_copy.size = size;
+        dir_copy.len = 0;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Increase or decrease directory list size.
+ *
+ * @param list directory list
+ * @param delta value by increase (if positive) or decrease (if negative) list size
+ *
+ * @return FALSE on failure, TRUE on success
+ */
+
+gboolean
+dir_list_grow (dir_list * list, int delta)
+{
+    int size;
+    gboolean clear_flag = FALSE;
+
+    if (list == NULL)
+        return FALSE;
+
+    if (delta == 0)
+        return TRUE;
+
+    size = list->size + delta;
+    if (size <= 0)
+    {
+        size = DIR_LIST_MIN_SIZE;
+        clear_flag = TRUE;
+    }
+
+    if (size != list->size)
+    {
+        file_entry_t *fe;
+
+        fe = g_try_renew (file_entry_t, list->list, size);
+        if (fe == NULL)
+            return FALSE;
+
+        list->list = fe;
+        list->size = size;
+    }
+
+    list->len = clear_flag ? 0 : MIN (list->len, size);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Append file info to the directory list.
+ *
+ * @param list directory list
+ * @param fname file name
+ * @param st file stat info
+ * @param link_to_dir is file link to directory
+ * @param stale_link is file stale elink
+ *
+ * @return FALSE on failure, TRUE on success
+ */
+
+gboolean
+dir_list_append (dir_list * list, const char *fname, const struct stat * st,
+                 gboolean link_to_dir, gboolean stale_link)
+{
+    file_entry_t *fentry;
+
+    /* Need to grow the *list? */
+    if (list->len == list->size && !dir_list_grow (list, DIR_LIST_RESIZE_STEP))
+        return FALSE;
+
+    fentry = &list->list[list->len];
+    fentry->fname = g_string_new (fname);
+    fentry->f.marked = 0;
+    fentry->f.link_to_dir = link_to_dir ? 1 : 0;
+    fentry->f.stale_link = stale_link ? 1 : 0;
+    fentry->f.dir_size_computed = 0;
+    fentry->st = *st;
+    fentry->name_sort_key = NULL;
+    fentry->extension_sort_key = NULL;
+
+    list->len++;
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+unsorted (file_entry_t * a, file_entry_t * b)
+{
+    (void) a;
+    (void) b;
+
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_name (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+        return compare_by_names (a, b);
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_vers (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int result;
+
+        result = filevercmp (a->fname->str, b->fname->str);
+        if (result != 0)
+            return result * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_ext (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int r;
+
+        if (a->extension_sort_key == NULL)
+            a->extension_sort_key = str_create_key (extension (a->fname->str), case_sensitive);
+        if (b->extension_sort_key == NULL)
+            b->extension_sort_key = str_create_key (extension (b->fname->str), case_sensitive);
+
+        r = str_key_collate (a->extension_sort_key, b->extension_sort_key, case_sensitive);
+        if (r != 0)
+            return r * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_time (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int result = _GL_CMP (a->st.st_mtime, b->st.st_mtime);
+
+        if (result != 0)
+            return result * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_ctime (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int result = _GL_CMP (a->st.st_ctime, b->st.st_ctime);
+
+        if (result != 0)
+            return result * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_atime (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int result = _GL_CMP (a->st.st_atime, b->st.st_atime);
+
+        if (result != 0)
+            return result * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_inode (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+        return (a->st.st_ino - b->st.st_ino) * reverse;
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+sort_size (file_entry_t * a, file_entry_t * b)
+{
+    int ad = MY_ISDIR (a);
+    int bd = MY_ISDIR (b);
+
+    if (ad == bd || panels_options.mix_all_files)
+    {
+        int result = _GL_CMP (a->st.st_size, b->st.st_size);
+
+        if (result != 0)
+            return result * reverse;
+
+        return compare_by_names (a, b);
+    }
+
+    return bd - ad;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+dir_list_sort (dir_list * list, GCompareFunc sort, const dir_sort_options_t * sort_op)
+{
+    if (list->len > 1 && sort != (GCompareFunc) unsorted)
+    {
+        file_entry_t *fentry = &list->list[0];
+        int dot_dot_found;
+
+        /* If there is an ".." entry the caller must take care to
+           ensure that it occupies the first list element. */
+        dot_dot_found = DIR_IS_DOTDOT (fentry->fname->str) ? 1 : 0;
+        reverse = sort_op->reverse ? -1 : 1;
+        case_sensitive = sort_op->case_sensitive ? 1 : 0;
+        exec_first = sort_op->exec_first;
+        qsort (&(list->list)[dot_dot_found], list->len - dot_dot_found, sizeof (file_entry_t),
+               sort);
+
+        clean_sort_keys (list, dot_dot_found, list->len - dot_dot_found);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+dir_list_clean (dir_list * list)
+{
+    int i;
+
+    for (i = 0; i < list->len; i++)
+    {
+        file_entry_t *fentry;
+
+        fentry = &list->list[i];
+        g_string_free (fentry->fname, TRUE);
+        fentry->fname = NULL;
+    }
+
+    list->len = 0;
+    /* reduce memory usage */
+    dir_list_grow (list, DIR_LIST_MIN_SIZE - list->size);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+dir_list_free_list (dir_list * list)
+{
+    int i;
+
+    for (i = 0; i < list->len; i++)
+    {
+        file_entry_t *fentry;
+
+        fentry = &list->list[i];
+        g_string_free (fentry->fname, TRUE);
+    }
+
+    MC_PTR_FREE (list->list);
+    list->len = 0;
+    list->size = 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Used to set up a directory list when there is no access to a directory */
+
+gboolean
+dir_list_init (dir_list * list)
+{
+    file_entry_t *fentry;
+
+    /* Need to grow the *list? */
+    if (list->size == 0 && !dir_list_grow (list, DIR_LIST_RESIZE_STEP))
+    {
+        list->len = 0;
+        return FALSE;
+    }
+
+    fentry = &list->list[0];
+    memset (fentry, 0, sizeof (*fentry));
+    fentry->fname = g_string_new ("..");
+    fentry->f.link_to_dir = 0;
+    fentry->f.stale_link = 0;
+    fentry->f.dir_size_computed = 0;
+    fentry->f.marked = 0;
+    fentry->st.st_mode = 040755;
+    list->len = 1;
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+   handle_path is a simplified handle_dirent. The difference is that
+   handle_path doesn't pay attention to panels_options.show_dot_files
+   and panels_options.show_backups.
+   Moreover handle_path can't be used with a filemask.
+   If you change handle_path then check also handle_dirent. */
+/* Return values: FALSE = don't add, TRUE = add to the list */
+
+gboolean
+handle_path (const char *path, struct stat * buf1, gboolean * link_to_dir, gboolean * stale_link)
+{
+    vfs_path_t *vpath;
+
+    if (DIR_IS_DOT (path) || DIR_IS_DOTDOT (path))
+        return FALSE;
+
+    vpath = vfs_path_from_str (path);
+    if (mc_lstat (vpath, buf1) == -1)
+    {
+        vfs_path_free (vpath, TRUE);
+        return FALSE;
+    }
+
+    if (S_ISDIR (buf1->st_mode))
+        tree_store_mark_checked (path);
+
+    /* A link to a file or a directory? */
+    *link_to_dir = FALSE;
+    *stale_link = FALSE;
+    if (S_ISLNK (buf1->st_mode))
+    {
+        struct stat buf2;
+
+        if (mc_stat (vpath, &buf2) == 0)
+            *link_to_dir = S_ISDIR (buf2.st_mode) != 0;
+        else
+            *stale_link = TRUE;
+    }
+
+    vfs_path_free (vpath, TRUE);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+dir_list_load (dir_list * list, const vfs_path_t * vpath, GCompareFunc sort,
+               const dir_sort_options_t * sort_op, const file_filter_t * filter)
+{
+    DIR *dirp;
+    struct vfs_dirent *dp;
+    struct stat st;
+    file_entry_t *fentry;
+    const char *vpath_str;
+    gboolean ret = TRUE;
+
+    /* ".." (if any) must be the first entry in the list */
+    if (!dir_list_init (list))
+        return FALSE;
+
+    fentry = &list->list[0];
+    if (dir_get_dotdot_stat (vpath, &st))
+        fentry->st = st;
+
+    if (list->callback != NULL)
+        list->callback (DIR_OPEN, (void *) vpath);
+    dirp = mc_opendir (vpath);
+    if (dirp == NULL)
+        return FALSE;
+
+    tree_store_start_check (vpath);
+
+    vpath_str = vfs_path_as_str (vpath);
+    /* Do not add a ".." entry to the root directory */
+    if (IS_PATH_SEP (vpath_str[0]) && vpath_str[1] == '\0')
+        dir_list_clean (list);
+
+    while (ret && (dp = mc_readdir (dirp)) != NULL)
+    {
+        gboolean link_to_dir, stale_link;
+
+        if (list->callback != NULL)
+            list->callback (DIR_READ, dp);
+
+        if (!handle_dirent (dp, filter, &st, &link_to_dir, &stale_link))
+            continue;
+
+        if (!dir_list_append (list, dp->d_name, &st, link_to_dir, stale_link))
+            ret = FALSE;
+    }
+
+    if (ret)
+        dir_list_sort (list, sort, sort_op);
+
+    if (list->callback != NULL)
+        list->callback (DIR_CLOSE, NULL);
+    mc_closedir (dirp);
+    tree_store_end_check ();
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+if_link_is_exe (const vfs_path_t * full_name_vpath, const file_entry_t * file)
+{
+    struct stat b;
+
+    if (S_ISLNK (file->st.st_mode) && mc_stat (full_name_vpath, &b) == 0)
+        return is_exe (b.st_mode);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** If filter is null, then it is a match */
+
+gboolean
+dir_list_reload (dir_list * list, const vfs_path_t * vpath, GCompareFunc sort,
+                 const dir_sort_options_t * sort_op, const file_filter_t * filter)
+{
+    DIR *dirp;
+    struct vfs_dirent *dp;
+    int i;
+    struct stat st;
+    int marked_cnt;
+    GHashTable *marked_files;
+    const char *tmp_path;
+    gboolean ret = TRUE;
+
+    if (list->callback != NULL)
+        list->callback (DIR_OPEN, (void *) vpath);
+    dirp = mc_opendir (vpath);
+    if (dirp == NULL)
+    {
+        dir_list_clean (list);
+        dir_list_init (list);
+        return FALSE;
+    }
+
+    tree_store_start_check (vpath);
+
+    marked_files = g_hash_table_new (g_str_hash, g_str_equal);
+    alloc_dir_copy (list->len);
+    for (marked_cnt = i = 0; i < list->len; i++)
+    {
+        file_entry_t *fentry, *dfentry;
+
+        fentry = &list->list[i];
+        dfentry = &dir_copy.list[i];
+
+        dfentry->fname = mc_g_string_dup (fentry->fname);
+        dfentry->f.marked = fentry->f.marked;
+        dfentry->f.dir_size_computed = fentry->f.dir_size_computed;
+        dfentry->f.link_to_dir = fentry->f.link_to_dir;
+        dfentry->f.stale_link = fentry->f.stale_link;
+        dfentry->name_sort_key = NULL;
+        dfentry->extension_sort_key = NULL;
+        if (fentry->f.marked != 0)
+        {
+            g_hash_table_insert (marked_files, dfentry->fname->str, dfentry);
+            marked_cnt++;
+        }
+    }
+
+    /* save len for later dir_list_clean() */
+    dir_copy.len = list->len;
+
+    /* Add ".." except to the root directory. The ".." entry
+       (if any) must be the first in the list. */
+    tmp_path = vfs_path_get_by_index (vpath, 0)->path;
+    if (vfs_path_elements_count (vpath) == 1 && IS_PATH_SEP (tmp_path[0]) && tmp_path[1] == '\0')
+    {
+        /* root directory */
+        dir_list_clean (list);
+    }
+    else
+    {
+        dir_list_clean (list);
+        if (!dir_list_init (list))
+        {
+            dir_list_free_list (&dir_copy);
+            mc_closedir (dirp);
+            return FALSE;
+        }
+
+        if (dir_get_dotdot_stat (vpath, &st))
+        {
+            file_entry_t *fentry;
+
+            fentry = &list->list[0];
+            fentry->st = st;
+        }
+    }
+
+    while (ret && (dp = mc_readdir (dirp)) != NULL)
+    {
+        gboolean link_to_dir, stale_link;
+
+        if (list->callback != NULL)
+            list->callback (DIR_READ, dp);
+
+        if (!handle_dirent (dp, filter, &st, &link_to_dir, &stale_link))
+            continue;
+
+        if (!dir_list_append (list, dp->d_name, &st, link_to_dir, stale_link))
+            ret = FALSE;
+        else
+        {
+            file_entry_t *fentry;
+
+            fentry = &list->list[list->len - 1];
+
+            /*
+             * If we have marked files in the copy, scan through the copy
+             * to find matching file.  Decrease number of remaining marks if
+             * we copied one.
+             */
+            fentry->f.marked = (marked_cnt > 0
+                                && g_hash_table_lookup (marked_files, dp->d_name) != NULL) ? 1 : 0;
+            if (fentry->f.marked != 0)
+                marked_cnt--;
+        }
+    }
+
+    if (ret)
+        dir_list_sort (list, sort, sort_op);
+
+    if (list->callback != NULL)
+        list->callback (DIR_CLOSE, NULL);
+    mc_closedir (dirp);
+    tree_store_end_check ();
+
+    g_hash_table_destroy (marked_files);
+    dir_list_free_list (&dir_copy);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_filter_clear (file_filter_t * filter)
+{
+    MC_PTR_FREE (filter->value);
+    mc_search_free (filter->handler);
+    filter->handler = NULL;
+    /* keep filter->flags */
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/dir.h b/src/filemanager/dir.h
new file mode 100644
index 0000000..80a19df
--- /dev/null
+++ b/src/filemanager/dir.h
@@ -0,0 +1,115 @@
+/** \file dir.h
+ *  \brief Header: directory routines
+ */
+
+#ifndef MC__DIR_H
+#define MC__DIR_H
+
+#include <sys/stat.h>
+
+#include "lib/global.h"
+#include "lib/search.h"
+#include "lib/file-entry.h"
+#include "lib/vfs/vfs.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+#define DIR_LIST_MIN_SIZE 128
+#define DIR_LIST_RESIZE_STEP 128
+
+typedef enum
+{
+    DIR_OPEN = 0,
+    DIR_READ,
+    DIR_CLOSE
+} dir_list_cb_state_t;
+
+/* selection flags */
+typedef enum
+{
+    SELECT_FILES_ONLY = 1 << 0,
+    SELECT_MATCH_CASE = 1 << 1,
+    SELECT_SHELL_PATTERNS = 1 << 2
+} select_flags_t;
+
+#define FILE_FILTER_DEFAULT_FLAGS (SELECT_FILES_ONLY | SELECT_MATCH_CASE | SELECT_SHELL_PATTERNS)
+
+/* dir_list callback */
+typedef void (*dir_list_cb_fn) (dir_list_cb_state_t state, void *data);
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/**
+ * A structure to represent directory content
+ */
+typedef struct
+{
+    file_entry_t *list; /**< list of file_entry_t objects */
+    int size;           /**< number of allocated elements in list (capacity) */
+    int len;            /**< number of used elements in list */
+    dir_list_cb_fn callback;    /**< callback to visualize of directory read */
+} dir_list;
+
+/**
+ * A structure to represent sort options for directory content
+ */
+typedef struct dir_sort_options_struct
+{
+    gboolean reverse;           /**< sort is reverse */
+    gboolean case_sensitive;    /**< sort is case sensitive */
+    gboolean exec_first;        /**< executables are at top of list */
+} dir_sort_options_t;
+
+/* filter  */
+typedef struct
+{
+    char *value;
+    mc_search_t *handler;
+    select_flags_t flags;
+} file_filter_t;
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+gboolean dir_list_grow (dir_list * list, int delta);
+gboolean dir_list_append (dir_list * list, const char *fname, const struct stat *st,
+                          gboolean link_to_dir, gboolean stale_link);
+
+gboolean dir_list_load (dir_list * list, const vfs_path_t * vpath, GCompareFunc sort,
+                        const dir_sort_options_t * sort_op, const file_filter_t * filter);
+gboolean dir_list_reload (dir_list * list, const vfs_path_t * vpath, GCompareFunc sort,
+                          const dir_sort_options_t * sort_op, const file_filter_t * filter);
+void dir_list_sort (dir_list * list, GCompareFunc sort, const dir_sort_options_t * sort_op);
+gboolean dir_list_init (dir_list * list);
+void dir_list_clean (dir_list * list);
+void dir_list_free_list (dir_list * list);
+gboolean handle_path (const char *path, struct stat *buf1, gboolean * link_to_dir,
+                      gboolean * stale_link);
+
+/* Sorting functions */
+int unsorted (file_entry_t * a, file_entry_t * b);
+int sort_name (file_entry_t * a, file_entry_t * b);
+int sort_vers (file_entry_t * a, file_entry_t * b);
+int sort_ext (file_entry_t * a, file_entry_t * b);
+int sort_time (file_entry_t * a, file_entry_t * b);
+int sort_atime (file_entry_t * a, file_entry_t * b);
+int sort_ctime (file_entry_t * a, file_entry_t * b);
+int sort_size (file_entry_t * a, file_entry_t * b);
+int sort_inode (file_entry_t * a, file_entry_t * b);
+
+gboolean if_link_is_exe (const vfs_path_t * full_name, const file_entry_t * file);
+
+void file_filter_clear (file_filter_t * filter);
+
+/*** inline functions ****************************************************************************/
+
+static inline gboolean
+link_isdir (const file_entry_t * file)
+{
+    return (file->f.link_to_dir != 0);
+}
+
+#endif /* MC__DIR_H */
diff --git a/src/filemanager/ext.c b/src/filemanager/ext.c
new file mode 100644
index 0000000..b21c4d0
--- /dev/null
+++ b/src/filemanager/ext.c
@@ -0,0 +1,1089 @@
+/*
+   Extension dependent execution.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Jakub Jelinek, 1995
+   Miguel de Icaza, 1994
+   Slava Zanko <slavazanko@gmail.com>, 2013
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file  ext.c
+ *  \brief Source: extension dependent execution
+ */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+#include "lib/tty/tty.h"
+#include "lib/search.h"
+#include "lib/fileloc.h"
+#include "lib/mcconfig.h"
+#include "lib/util.h"
+#include "lib/vfs/vfs.h"
+#include "lib/widget.h"
+#ifdef HAVE_CHARSET
+#include "lib/charsets.h"       /* get_codepage_index */
+#endif
+
+#ifdef USE_FILE_CMD
+#include "src/setup.h"          /* use_file_to_check_type */
+#endif
+#include "src/execute.h"
+#include "src/history.h"
+#include "src/usermenu.h"
+
+#include "src/consaver/cons.saver.h"
+#include "src/viewer/mcviewer.h"
+
+#ifdef HAVE_CHARSET
+#include "src/selcodepage.h"    /* do_set_codepage */
+#endif
+
+#include "filemanager.h"        /* current_panel */
+#include "panel.h"              /* panel_cd */
+
+#include "ext.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#ifdef USE_FILE_CMD
+#ifdef FILE_B
+#define FILE_CMD "file -z " FILE_B FILE_S FILE_L
+#else
+#define FILE_CMD "file -z " FILE_S FILE_L
+#endif
+#endif
+
+/*** file scope type declarations ****************************************************************/
+
+typedef char *(*quote_func_t) (const char *name, gboolean quote_percent);
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* This variable points to a copy of the mc.ext file in memory
+ * With this we avoid loading/parsing the file each time we
+ * need it
+ */
+static mc_config_t *ext_ini = NULL;
+static gchar **ext_ini_groups = NULL;
+static vfs_path_t *localfilecopy_vpath = NULL;
+static char buffer[BUF_1K];
+
+static char *pbuffer = NULL;
+static time_t localmtime = 0;
+static quote_func_t quote_func = name_quote;
+static gboolean run_view = FALSE;
+static gboolean is_cd = FALSE;
+static gboolean written_nonspace = FALSE;
+static gboolean do_local_copy = FALSE;
+
+static const char *descr_group = "mc.ext.ini";
+static const char *default_group = "Default";
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+exec_cleanup_script (vfs_path_t * script_vpath)
+{
+    if (script_vpath != NULL)
+    {
+        (void) mc_unlink (script_vpath);
+        vfs_path_free (script_vpath, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+exec_cleanup_file_name (const vfs_path_t * filename_vpath, gboolean has_changed)
+{
+    if (localfilecopy_vpath == NULL)
+        return;
+
+    if (has_changed)
+    {
+        struct stat mystat;
+
+        mc_stat (localfilecopy_vpath, &mystat);
+        has_changed = localmtime != mystat.st_mtime;
+    }
+    mc_ungetlocalcopy (filename_vpath, localfilecopy_vpath, has_changed);
+    vfs_path_free (localfilecopy_vpath, TRUE);
+    localfilecopy_vpath = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+exec_get_file_name (const vfs_path_t * filename_vpath)
+{
+    if (!do_local_copy)
+        return quote_func (vfs_path_get_last_path_str (filename_vpath), FALSE);
+
+    if (localfilecopy_vpath == NULL)
+    {
+        struct stat mystat;
+        localfilecopy_vpath = mc_getlocalcopy (filename_vpath);
+        if (localfilecopy_vpath == NULL)
+            return NULL;
+
+        mc_stat (localfilecopy_vpath, &mystat);
+        localmtime = mystat.st_mtime;
+    }
+
+    return quote_func (vfs_path_get_last_path_str (localfilecopy_vpath), FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+exec_expand_format (char symbol, gboolean is_result_quoted)
+{
+    char *text;
+
+    text = expand_format (NULL, symbol, TRUE);
+    if (is_result_quoted && text != NULL)
+    {
+        char *quoted_text;
+
+        quoted_text = g_strdup_printf ("\"%s\"", text);
+        g_free (text);
+        text = quoted_text;
+    }
+    return text;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GString *
+exec_get_export_variables (const vfs_path_t * filename_vpath)
+{
+    char *text;
+    GString *export_vars_string;
+    size_t i;
+
+    /* *INDENT-OFF* */
+    struct
+    {
+        const char symbol;
+        const char *name;
+        const gboolean is_result_quoted;
+    } export_variables[] = {
+        {'p', "MC_EXT_BASENAME", FALSE},
+        {'d', "MC_EXT_CURRENTDIR", FALSE},
+        {'s', "MC_EXT_SELECTED", TRUE},
+        {'t', "MC_EXT_ONLYTAGGED", TRUE},
+        {'\0', NULL, FALSE}
+    };
+    /* *INDENT-ON* */
+
+    text = exec_get_file_name (filename_vpath);
+    if (text == NULL)
+        return NULL;
+
+    export_vars_string = g_string_new ("MC_EXT_FILENAME=");
+    g_string_append_printf (export_vars_string, "%s\nexport MC_EXT_FILENAME\n", text);
+    g_free (text);
+
+    for (i = 0; export_variables[i].name != NULL; i++)
+    {
+        text =
+            exec_expand_format (export_variables[i].symbol, export_variables[i].is_result_quoted);
+        if (text != NULL)
+        {
+            g_string_append_printf (export_vars_string,
+                                    "%s=%s\nexport %s\n", export_variables[i].name, text,
+                                    export_variables[i].name);
+            g_free (text);
+        }
+    }
+
+    return export_vars_string;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GString *
+exec_make_shell_string (const char *lc_data, const vfs_path_t * filename_vpath)
+{
+    GString *shell_string;
+    char lc_prompt[80] = "\0";
+    gboolean parameter_found = FALSE;
+    gboolean expand_prefix_found = FALSE;
+
+    shell_string = g_string_new ("");
+
+    for (; *lc_data != '\0' && *lc_data != '\n'; lc_data++)
+    {
+        if (parameter_found)
+        {
+            if (*lc_data == '}')
+            {
+                char *parameter;
+
+                parameter_found = FALSE;
+                parameter =
+                    input_dialog (_("Parameter"), lc_prompt, MC_HISTORY_EXT_PARAMETER, "",
+                                  INPUT_COMPLETE_NONE);
+                if (parameter == NULL)
+                {
+                    /* User canceled */
+                    g_string_free (shell_string, TRUE);
+                    exec_cleanup_file_name (filename_vpath, FALSE);
+                    return NULL;
+                }
+                g_string_append (shell_string, parameter);
+                written_nonspace = TRUE;
+                g_free (parameter);
+            }
+            else
+            {
+                size_t len = strlen (lc_prompt);
+
+                if (len < sizeof (lc_prompt) - 1)
+                {
+                    lc_prompt[len] = *lc_data;
+                    lc_prompt[len + 1] = '\0';
+                }
+            }
+        }
+        else if (expand_prefix_found)
+        {
+            expand_prefix_found = FALSE;
+            if (*lc_data == '{')
+                parameter_found = TRUE;
+            else
+            {
+                int i;
+
+                i = check_format_view (lc_data);
+                if (i != 0)
+                {
+                    lc_data += i - 1;
+                    run_view = TRUE;
+                }
+                else
+                {
+                    i = check_format_cd (lc_data);
+                    if (i > 0)
+                    {
+                        is_cd = TRUE;
+                        quote_func = fake_name_quote;
+                        do_local_copy = FALSE;
+                        pbuffer = buffer;
+                        lc_data += i - 1;
+                    }
+                    else
+                    {
+                        char *v;
+
+                        i = check_format_var (lc_data, &v);
+                        if (i > 0)
+                        {
+                            g_string_append (shell_string, v);
+                            g_free (v);
+                            lc_data += i;
+                        }
+                        else
+                        {
+                            char *text;
+
+                            if (*lc_data != 'f')
+                                text = expand_format (NULL, *lc_data, !is_cd);
+                            else
+                            {
+                                text = exec_get_file_name (filename_vpath);
+                                if (text == NULL)
+                                {
+                                    g_string_free (shell_string, TRUE);
+                                    return NULL;
+                                }
+                            }
+
+                            if (!is_cd)
+                                g_string_append (shell_string, text);
+                            else
+                            {
+                                strcpy (pbuffer, text);
+                                pbuffer = strchr (pbuffer, 0);
+                            }
+
+                            g_free (text);
+                            written_nonspace = TRUE;
+                        }
+                    }
+                }
+            }
+        }
+        else if (*lc_data == '%')
+            expand_prefix_found = TRUE;
+        else
+        {
+            if (!whitespace (*lc_data))
+                written_nonspace = TRUE;
+            if (is_cd)
+                *(pbuffer++) = *lc_data;
+            else
+                g_string_append_c (shell_string, *lc_data);
+        }
+    }                           /* for */
+
+    return shell_string;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+exec_extension_view (void *target, char *cmd, const vfs_path_t * filename_vpath, int start_line)
+{
+    mcview_mode_flags_t def_flags = {
+        /* *INDENT-OFF* */
+        .wrap = FALSE,
+        .hex = mcview_global_flags.hex,
+        .magic = FALSE,
+        .nroff = mcview_global_flags.nroff
+        /* *INDENT-ON* */
+    };
+
+    mcview_mode_flags_t changed_flags;
+
+    mcview_clear_mode_flags (&changed_flags);
+    mcview_altered_flags.hex = FALSE;
+    mcview_altered_flags.nroff = FALSE;
+    if (def_flags.hex != mcview_global_flags.hex)
+        changed_flags.hex = TRUE;
+    if (def_flags.nroff != mcview_global_flags.nroff)
+        changed_flags.nroff = TRUE;
+
+    if (target == NULL)
+        mcview_viewer (cmd, filename_vpath, start_line, 0, 0);
+    else
+        mcview_load ((WView *) target, cmd, vfs_path_as_str (filename_vpath), start_line, 0, 0);
+
+    if (changed_flags.hex && !mcview_altered_flags.hex)
+        mcview_global_flags.hex = def_flags.hex;
+    if (changed_flags.nroff && !mcview_altered_flags.nroff)
+        mcview_global_flags.nroff = def_flags.nroff;
+
+    dialog_switch_process_pending ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+exec_extension_cd (WPanel * panel)
+{
+    char *q;
+    vfs_path_t *p_vpath;
+
+    *pbuffer = '\0';
+    pbuffer = buffer;
+    /* Search last non-space character. Start search at the end in order
+       not to short filenames containing spaces. */
+    q = pbuffer + strlen (pbuffer) - 1;
+    while (q >= pbuffer && whitespace (*q))
+        q--;
+    q[1] = 0;
+
+    p_vpath = vfs_path_from_str_flags (pbuffer, VPF_NO_CANON);
+    panel_cd (panel, p_vpath, cd_parse_command);
+    vfs_path_free (p_vpath, TRUE);
+}
+
+
+/* --------------------------------------------------------------------------------------------- */
+
+static vfs_path_t *
+exec_extension (WPanel * panel, void *target, const vfs_path_t * filename_vpath,
+                const char *lc_data, int start_line)
+{
+    GString *shell_string, *export_variables;
+    vfs_path_t *script_vpath = NULL;
+    int cmd_file_fd;
+    FILE *cmd_file;
+    char *cmd = NULL;
+
+    pbuffer = NULL;
+    localmtime = 0;
+    quote_func = name_quote;
+    run_view = FALSE;
+    is_cd = FALSE;
+    written_nonspace = FALSE;
+
+    /* Avoid making a local copy if we are doing a cd */
+    do_local_copy = !vfs_file_is_local (filename_vpath);
+
+    shell_string = exec_make_shell_string (lc_data, filename_vpath);
+    if (shell_string == NULL)
+        goto ret;
+
+    if (is_cd)
+    {
+        exec_extension_cd (panel);
+        g_string_free (shell_string, TRUE);
+        goto ret;
+    }
+
+    /*
+     * All commands should be run in /bin/sh regardless of user shell.
+     * To do that, create temporary shell script and run it.
+     * Sometimes it's not needed (e.g. for %cd and %view commands),
+     * but it's easier to create it anyway.
+     */
+    cmd_file_fd = mc_mkstemps (&script_vpath, "mcext", SCRIPT_SUFFIX);
+
+    if (cmd_file_fd == -1)
+    {
+        message (D_ERROR, MSG_ERROR,
+                 _("Cannot create temporary command file\n%s"), unix_error_string (errno));
+        g_string_free (shell_string, TRUE);
+        goto ret;
+    }
+
+    cmd_file = fdopen (cmd_file_fd, "w");
+    fputs ("#! /bin/sh\n\n", cmd_file);
+
+    export_variables = exec_get_export_variables (filename_vpath);
+    if (export_variables != NULL)
+    {
+        fputs (export_variables->str, cmd_file);
+        g_string_free (export_variables, TRUE);
+    }
+
+    fputs (shell_string->str, cmd_file);
+    g_string_free (shell_string, TRUE);
+
+    /*
+     * Make the script remove itself when it finishes.
+     * Don't do it for the viewer - it may need to rerun the script,
+     * so we clean up after calling view().
+     */
+    if (!run_view)
+        fprintf (cmd_file, "\n/bin/rm -f %s\n", vfs_path_as_str (script_vpath));
+
+    fclose (cmd_file);
+
+    if ((run_view && !written_nonspace) || is_cd)
+    {
+        exec_cleanup_script (script_vpath);
+        script_vpath = NULL;
+    }
+    else
+    {
+        /* Set executable flag on the command file ... */
+        mc_chmod (script_vpath, S_IRWXU);
+        /* ... but don't rely on it - run /bin/sh explicitly */
+        cmd = g_strconcat ("/bin/sh ", vfs_path_as_str (script_vpath), (char *) NULL);
+    }
+
+    if (run_view)
+    {
+        /* If we've written whitespace only, then just load filename into view */
+        if (!written_nonspace)
+            exec_extension_view (target, NULL, filename_vpath, start_line);
+        else
+            exec_extension_view (target, cmd, filename_vpath, start_line);
+    }
+    else
+    {
+        shell_execute (cmd, EXECUTE_INTERNAL);
+        if (mc_global.tty.console_flag != '\0')
+        {
+            handle_console (CONSOLE_SAVE);
+            if (output_lines != 0 && mc_global.keybar_visible)
+            {
+                unsigned char end_line;
+
+                end_line = LINES - (mc_global.keybar_visible ? 1 : 0) - 1;
+                show_console_contents (output_start_y, end_line - output_lines, end_line);
+            }
+        }
+    }
+
+    g_free (cmd);
+
+    exec_cleanup_file_name (filename_vpath, TRUE);
+  ret:
+    return script_vpath;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Run cmd_file with args, put result into buf.
+ * If error, put '\0' into buf[0]
+ * Return 1 if the data is valid, 0 otherwise, -1 for fatal errors.
+ *
+ * NOTES: buf is null-terminated string.
+ */
+
+#ifdef USE_FILE_CMD
+static int
+get_popen_information (const char *cmd_file, const char *args, char *buf, int buflen)
+{
+    gboolean read_bytes = FALSE;
+    char *command;
+    FILE *f;
+
+    command = g_strconcat (cmd_file, args, " 2>/dev/null", (char *) NULL);
+    f = popen (command, "r");
+    g_free (command);
+
+    if (f != NULL)
+    {
+#ifdef __QNXNTO__
+        if (setvbuf (f, NULL, _IOFBF, 0) != 0)
+        {
+            (void) pclose (f);
+            return -1;
+        }
+#endif
+        read_bytes = (fgets (buf, buflen, f) != NULL);
+        if (!read_bytes)
+            buf[0] = '\0';      /* Paranoid termination */
+        pclose (f);
+    }
+    else
+    {
+        buf[0] = '\0';          /* Paranoid termination */
+        return -1;
+    }
+
+    buf[buflen - 1] = '\0';
+
+    return read_bytes ? 1 : 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Run the "file" command on the local file.
+ * Return 1 if the data is valid, 0 otherwise, -1 for fatal errors.
+ */
+
+static int
+get_file_type_local (const vfs_path_t * filename_vpath, char *buf, int buflen)
+{
+    char *tmp;
+    int ret;
+
+    tmp = name_quote (vfs_path_get_last_path_str (filename_vpath), FALSE);
+    ret = get_popen_information (FILE_CMD, tmp, buf, buflen);
+    g_free (tmp);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Run the "enca" command on the local file.
+ * Return 1 if the data is valid, 0 otherwise, -1 for fatal errors.
+ */
+
+#ifdef HAVE_CHARSET
+static int
+get_file_encoding_local (const vfs_path_t * filename_vpath, char *buf, int buflen)
+{
+    char *tmp, *lang, *args;
+    int ret;
+
+    tmp = name_quote (vfs_path_get_last_path_str (filename_vpath), FALSE);
+    lang = name_quote (autodetect_codeset, FALSE);
+    args = g_strconcat (" -L", lang, " -i ", tmp, (char *) NULL);
+
+    ret = get_popen_information ("enca", args, buf, buflen);
+
+    g_free (args);
+    g_free (lang);
+    g_free (tmp);
+
+    return ret;
+}
+#endif /* HAVE_CHARSET */
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Invoke the "file" command on the file and match its output against PTR.
+ * have_type is a flag that is set if we already have tried to determine
+ * the type of that file.
+ * Return TRUE for match, FALSE otherwise.
+ */
+
+static gboolean
+regex_check_type (const vfs_path_t * filename_vpath, const char *ptr, gboolean case_insense,
+                  gboolean * have_type, GError ** mcerror)
+{
+    gboolean found = FALSE;
+
+    /* Following variables are valid if *have_type is TRUE */
+    static char content_string[2048];
+    static size_t content_shift = 0;
+    static int got_data = 0;
+
+    mc_return_val_if_error (mcerror, FALSE);
+
+    if (!*have_type)
+    {
+        vfs_path_t *localfile_vpath;
+
+#ifdef HAVE_CHARSET
+        static char encoding_id[21];    /* CSISO51INISCYRILLIC -- 20 */
+        int got_encoding_data;
+#endif /* HAVE_CHARSET */
+
+        /* Don't repeate even unsuccessful checks */
+        *have_type = TRUE;
+
+        localfile_vpath = mc_getlocalcopy (filename_vpath);
+        if (localfile_vpath == NULL)
+        {
+            mc_propagate_error (mcerror, 0, _("Cannot fetch a local copy of %s"),
+                                vfs_path_as_str (filename_vpath));
+            return FALSE;
+        }
+
+
+#ifdef HAVE_CHARSET
+        got_encoding_data = is_autodetect_codeset_enabled
+            ? get_file_encoding_local (localfile_vpath, encoding_id, sizeof (encoding_id)) : 0;
+
+        if (got_encoding_data > 0)
+        {
+            char *pp;
+            int cp_id;
+
+            pp = strchr (encoding_id, '\n');
+            if (pp != NULL)
+                *pp = '\0';
+
+            cp_id = get_codepage_index (encoding_id);
+            if (cp_id == -1)
+                cp_id = default_source_codepage;
+
+            do_set_codepage (cp_id);
+        }
+#endif /* HAVE_CHARSET */
+
+        got_data = get_file_type_local (localfile_vpath, content_string, sizeof (content_string));
+
+        mc_ungetlocalcopy (filename_vpath, localfile_vpath, FALSE);
+
+        if (got_data > 0)
+        {
+            char *pp;
+
+            pp = strchr (content_string, '\n');
+            if (pp != NULL)
+                *pp = '\0';
+
+#ifndef FILE_B
+            {
+                const char *real_name;  /* name used with "file" */
+                size_t real_len;
+
+                real_name = vfs_path_get_last_path_str (localfile_vpath);
+                real_len = strlen (real_name);
+
+                if (strncmp (content_string, real_name, real_len) == 0)
+                {
+                    /* Skip "real_name: " */
+                    content_shift = real_len;
+
+                    /* Solaris' file prints tab(s) after ':' */
+                    if (content_string[content_shift] == ':')
+                        for (content_shift++; whitespace (content_string[content_shift]);
+                             content_shift++)
+                            ;
+                }
+            }
+#endif /* FILE_B */
+        }
+        else
+        {
+            /* No data */
+            content_string[0] = '\0';
+        }
+        vfs_path_free (localfile_vpath, TRUE);
+    }
+
+    if (got_data == -1)
+    {
+        mc_propagate_error (mcerror, 0, "%s", _("Pipe failed"));
+        return FALSE;
+    }
+
+    if (content_string[0] != '\0')
+    {
+        mc_search_t *search;
+
+        search = mc_search_new (ptr, DEFAULT_CHARSET);
+        if (search != NULL)
+        {
+            search->search_type = MC_SEARCH_T_REGEX;
+            search->is_case_sensitive = !case_insense;
+            found = mc_search_run (search, content_string + content_shift, 0, -1, NULL);
+            mc_search_free (search);
+        }
+        else
+        {
+            mc_propagate_error (mcerror, 0, "%s", _("Regular expression error"));
+        }
+    }
+
+    return found;
+}
+#endif /* USE_FILE_CMD */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+check_old_extension_file (void)
+{
+    char *extension_old_file;
+
+    extension_old_file = mc_config_get_full_path (MC_EXT_OLD_FILE);
+    if (exist_file (extension_old_file))
+        message (D_ERROR, _("Warning"),
+                 _("You have an outdated %s file.\nMidnight Commander now uses %s file.\n"
+                   "Please copy your modifications of the old file to the new one."),
+                 extension_old_file, MC_EXT_FILE);
+    g_free (extension_old_file);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+load_extension_file (void)
+{
+    char *extension_file;
+    gboolean mc_user_ext = TRUE;
+    gboolean home_error = FALSE;
+
+    extension_file = mc_config_get_full_path (MC_EXT_FILE);
+    if (!exist_file (extension_file))
+    {
+        g_free (extension_file);
+
+        check_old_extension_file ();
+
+      check_stock_mc_ext:
+        extension_file = mc_build_filename (mc_global.sysconfig_dir, MC_EXT_FILE, (char *) NULL);
+        if (!exist_file (extension_file))
+        {
+            g_free (extension_file);
+            extension_file =
+                mc_build_filename (mc_global.share_data_dir, MC_EXT_FILE, (char *) NULL);
+            if (!exist_file (extension_file))
+                MC_PTR_FREE (extension_file);
+        }
+        mc_user_ext = FALSE;
+    }
+
+    if (extension_file != NULL)
+    {
+        ext_ini = mc_config_init (extension_file, TRUE);
+        g_free (extension_file);
+    }
+    if (ext_ini == NULL)
+        return FALSE;
+
+    /* Check version */
+    if (!mc_config_has_group (ext_ini, descr_group))
+    {
+        flush_extension_file ();
+
+        if (!mc_user_ext)
+        {
+            message (D_ERROR, MSG_ERROR,
+                     _("The format of the\n%s%s\nfile has changed with version 4.0.\n"
+                       "It seems that the installation has failed.\nPlease fetch a fresh copy "
+                       "from the Midnight Commander package."),
+                     mc_global.sysconfig_dir, MC_EXT_FILE);
+            return FALSE;
+        }
+
+        home_error = TRUE;
+        goto check_stock_mc_ext;
+    }
+
+    if (home_error)
+    {
+        extension_file = mc_config_get_full_path (MC_EXT_FILE);
+        message (D_ERROR, MSG_ERROR,
+                 _("The format of the\n%s\nfile has changed with version 4.0.\nYou may either want "
+                   "to copy it from\n%s%s\nor use that file as an example of how to write it."),
+                 extension_file, mc_global.sysconfig_dir, MC_EXT_FILE);
+        g_free (extension_file);
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+flush_extension_file (void)
+{
+    g_strfreev (ext_ini_groups);
+    ext_ini_groups = NULL;
+
+    mc_config_deinit (ext_ini);
+    ext_ini = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * The second argument is action, i.e. Open, View or Edit
+ * Use target object to open file in.
+ *
+ * This function returns:
+ *
+ * -1 for a failure or user interrupt
+ * 0 if no command was run
+ * 1 if some command was run
+ *
+ * If action == "View" then a parameter is checked in the form of "View:%d",
+ * if the value for %d exists, then the viewer is started up at that line number.
+ */
+
+int
+regex_command_for (void *target, const vfs_path_t * filename_vpath, const char *action,
+                   vfs_path_t ** script_vpath)
+{
+    const char *filename;
+    size_t filename_len;
+    gboolean found = FALSE;
+    gboolean error_flag = FALSE;
+    int ret = 0;
+    struct stat mystat;
+    int view_at_line_number = 0;
+#ifdef USE_FILE_CMD
+    gboolean have_type = FALSE; /* Flag used by regex_check_type() */
+#endif
+    char **group_iter;
+    char *include_group = NULL;
+    const char *current_group;
+
+    if (filename_vpath == NULL)
+        return 0;
+
+    if (script_vpath != NULL)
+        *script_vpath = NULL;
+
+    /* Check for the special View:%d parameter */
+    if (strncmp (action, "View:", 5) == 0)
+    {
+        view_at_line_number = atoi (action + 5);
+        action = "View";
+    }
+
+    if (ext_ini == NULL && !load_extension_file ())
+        return 0;
+
+    mc_stat (filename_vpath, &mystat);
+
+    filename = vfs_path_get_last_path_str (filename_vpath);
+    filename = x_basename (filename);
+    filename_len = strlen (filename);
+
+    if (ext_ini_groups == NULL)
+        ext_ini_groups = mc_config_get_groups (ext_ini, NULL);
+
+    /* find matched type, regex or shell pattern */
+    for (group_iter = ext_ini_groups; *group_iter != NULL && !found; group_iter++)
+    {
+        enum
+        {
+            TYPE_UNUSED,
+            TYPE_NOT_FOUND,
+            TYPE_FOUND
+        } type_state = TYPE_UNUSED;
+
+        const gchar *g = *group_iter;
+        gchar *pattern;
+        gboolean ignore_case;
+
+        if (strcmp (g, descr_group) == 0 || strncmp (g, "Include/", 8) == 0
+            || strcmp (g, default_group) == 0)
+            continue;
+
+        /* The "Directory" parameter is a special case: if it's present then
+           "Type", "Regex", and "Shell" parameters are ignored */
+        pattern = mc_config_get_string_raw (ext_ini, g, "Directory", NULL);
+        if (pattern != NULL)
+        {
+            found = S_ISDIR (mystat.st_mode)
+                && mc_search (pattern, DEFAULT_CHARSET, vfs_path_as_str (filename_vpath),
+                              MC_SEARCH_T_REGEX);
+            g_free (pattern);
+
+            continue;           /* stop if found */
+        }
+
+#ifdef USE_FILE_CMD
+        if (use_file_to_check_type)
+        {
+            pattern = mc_config_get_string_raw (ext_ini, g, "Type", NULL);
+            if (pattern != NULL)
+            {
+                GError *mcerror = NULL;
+
+                ignore_case = mc_config_get_bool (ext_ini, g, "TypeIgnoreCase", FALSE);
+                type_state =
+                    regex_check_type (filename_vpath, pattern, ignore_case, &have_type, &mcerror)
+                    ? TYPE_FOUND : TYPE_NOT_FOUND;
+                g_free (pattern);
+
+                if (mc_error_message (&mcerror, NULL))
+                    error_flag = TRUE;  /* leave it if file cannot be opened */
+
+                if (type_state == TYPE_NOT_FOUND)
+                    continue;
+            }
+        }
+#endif /* USE_FILE_CMD */
+
+        pattern = mc_config_get_string_raw (ext_ini, g, "Regex", NULL);
+        if (pattern != NULL)
+        {
+            mc_search_t *search;
+
+            ignore_case = mc_config_get_bool (ext_ini, g, "RegexIgnoreCase", FALSE);
+            search = mc_search_new (pattern, DEFAULT_CHARSET);
+            g_free (pattern);
+
+            if (search != NULL)
+            {
+                search->search_type = MC_SEARCH_T_REGEX;
+                search->is_case_sensitive = !ignore_case;
+                found = mc_search_run (search, filename, 0, filename_len, NULL);
+                mc_search_free (search);
+            }
+
+            found = found && (type_state == TYPE_UNUSED || type_state == TYPE_FOUND);
+        }
+        else
+        {
+            pattern = mc_config_get_string_raw (ext_ini, g, "Shell", NULL);
+            if (pattern != NULL)
+            {
+                int (*cmp_func) (const char *s1, const char *s2, size_t n);
+                size_t pattern_len;
+
+                ignore_case = mc_config_get_bool (ext_ini, g, "ShellIgnoreCase", FALSE);
+                cmp_func = ignore_case ? strncasecmp : strncmp;
+                pattern_len = strlen (pattern);
+
+                if (*pattern == '.' && filename_len >= pattern_len)
+                    found =
+                        cmp_func (pattern, filename + filename_len - pattern_len, pattern_len) == 0;
+                else
+                    found = pattern_len == filename_len
+                        && cmp_func (pattern, filename, filename_len) == 0;
+
+                g_free (pattern);
+
+                found = found && (type_state == TYPE_UNUSED || type_state == TYPE_FOUND);
+            }
+            else
+                found = type_state == TYPE_FOUND;
+        }
+    }
+
+    /* group is found, process actions */
+    if (found)
+    {
+        char *include_value;
+
+        group_iter--;
+
+        /* "Include" parameter has the highest priority over any actions */
+        include_value = mc_config_get_string_raw (ext_ini, *group_iter, "Include", NULL);
+        if (include_value != NULL)
+        {
+            /* find "Include/include_value" group */
+            include_group = g_strconcat ("Include/", include_value, (char *) NULL);
+            g_free (include_value);
+            found = mc_config_has_group (ext_ini, include_group);
+        }
+    }
+
+    if (found)
+        current_group = include_group != NULL ? include_group : *group_iter;
+    else
+    {
+        current_group = default_group;
+        found = mc_config_has_group (ext_ini, current_group);
+    }
+
+    if (found && !error_flag)
+    {
+        gchar *action_value;
+
+        action_value = mc_config_get_string_raw (ext_ini, current_group, action, NULL);
+        if (action_value == NULL)
+        {
+            /* Not found, try the action from default section */
+            action_value = mc_config_get_string_raw (ext_ini, default_group, action, NULL);
+            found = (action_value != NULL && *action_value != '\0');
+        }
+        else
+        {
+            /* If action's value is empty, ignore action from default section */
+            found = (*action_value != '\0');
+        }
+
+        if (found)
+        {
+            vfs_path_t *sv;
+
+            sv = exec_extension (current_panel, target, filename_vpath, action_value,
+                                 view_at_line_number);
+            if (script_vpath != NULL)
+                *script_vpath = sv;
+            else
+                exec_cleanup_script (sv);
+
+            ret = 1;
+        }
+
+        g_free (action_value);
+    }
+
+    g_free (include_group);
+
+    return (error_flag ? -1 : ret);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/ext.h b/src/filemanager/ext.h
new file mode 100644
index 0000000..771ca18
--- /dev/null
+++ b/src/filemanager/ext.h
@@ -0,0 +1,33 @@
+/** \file  ext.h
+ *  \brief Header: extension dependent execution
+ */
+
+#ifndef MC__EXT_H
+#define MC__EXT_H
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+int regex_command_for (void *target, const vfs_path_t * filename_vpath, const char *action,
+                       vfs_path_t ** script_vpath);
+
+/* Call it after the user has edited the mc.ext file,
+ * to flush the cached mc.ext file
+ */
+void flush_extension_file (void);
+
+/*** inline functions ****************************************************************************/
+
+static inline int
+regex_command (const vfs_path_t * filename_vpath, const char *action)
+{
+    return regex_command_for (NULL, filename_vpath, action, NULL);
+}
+
+#endif /* MC__EXT_H */
diff --git a/src/filemanager/file.c b/src/filemanager/file.c
new file mode 100644
index 0000000..fa2ef44
--- /dev/null
+++ b/src/filemanager/file.c
@@ -0,0 +1,3562 @@
+/*
+   File management.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1994, 1995
+   Fred Leeflang, 1994, 1995
+   Miguel de Icaza, 1994, 1995, 1996
+   Jakub Jelinek, 1995, 1996
+   Norbert Warmuth, 1997
+   Pavel Machek, 1998
+   Andrew Borodin <aborodin@vmail.ru>, 2011-2022
+
+   The copy code was based in GNU's cp, and was written by:
+   Torbjorn Granlund, David MacKenzie, and Jim Meyering.
+
+   The move code was based in GNU's mv, and was written by:
+   Mike Parker and David MacKenzie.
+
+   Janne Kukonlehto added much error recovery to them for being used
+   in an interactive program.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/*
+ * Please note that all dialogs used here must be safe for background
+ * operations.
+ */
+
+/** \file src/filemanager/file.c
+ *  \brief Source: file management
+ */
+
+/* {{{ Include files */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <errno.h>
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"
+#include "lib/search.h"
+#include "lib/strescape.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+#include "lib/vfs/vfs.h"
+#include "lib/widget.h"
+
+#include "src/setup.h"
+#ifdef ENABLE_BACKGROUND
+#include "src/background.h"     /* do_background() */
+#endif
+
+/* Needed for other_panel and WTree */
+#include "dir.h"
+#include "filegui.h"
+#include "filenot.h"
+#include "tree.h"
+#include "filemanager.h"        /* other_panel */
+#include "layout.h"             /* rotate_dash() */
+#include "ioblksize.h"          /* io_blksize() */
+
+#include "file.h"
+
+/* }}} */
+
+/*** global variables ****************************************************************************/
+
+/* TRANSLATORS: no need to translate 'DialogTitle', it's just a context prefix  */
+const char *op_names[3] = {
+    N_("DialogTitle|Copy"),
+    N_("DialogTitle|Move"),
+    N_("DialogTitle|Delete")
+};
+
+/*** file scope macro definitions ****************************************************************/
+
+#define FILEOP_UPDATE_INTERVAL 2
+#define FILEOP_STALLING_INTERVAL 4
+#define FILEOP_UPDATE_INTERVAL_US (FILEOP_UPDATE_INTERVAL * G_USEC_PER_SEC)
+#define FILEOP_STALLING_INTERVAL_US (FILEOP_STALLING_INTERVAL * G_USEC_PER_SEC)
+
+/*** file scope type declarations ****************************************************************/
+
+/* This is a hard link cache */
+struct link
+{
+    const struct vfs_class *vfs;
+    dev_t dev;
+    ino_t ino;
+    short linkcount;
+    mode_t st_mode;
+    vfs_path_t *src_vpath;
+    vfs_path_t *dst_vpath;
+};
+
+/* Status of the destination file */
+typedef enum
+{
+    DEST_NONE = 0,              /**< Not created */
+    DEST_SHORT_QUERY,           /**< Created, not fully copied, query to do */
+    DEST_SHORT_KEEP,            /**< Created, not fully copied, keep it */
+    DEST_SHORT_DELETE,          /**< Created, not fully copied, delete it */
+    DEST_FULL                   /**< Created, fully copied */
+} dest_status_t;
+
+/* Status of hard link creation */
+typedef enum
+{
+    HARDLINK_OK = 0,            /**< Hardlink was created successfully */
+    HARDLINK_CACHED,            /**< Hardlink was added to the cache */
+    HARDLINK_NOTLINK,           /**< This is not a hard link */
+    HARDLINK_UNSUPPORTED,       /**< VFS doesn't support hard links */
+    HARDLINK_ERROR,             /**< Hard link creation error */
+    HARDLINK_ABORT              /**< Stop file operation after hardlink creation error */
+} hardlink_status_t;
+
+/*
+ * This array introduced to avoid translation problems. The former (op_names)
+ * is assumed to be nouns, suitable in dialog box titles; this one should
+ * contain whatever is used in prompt itself (i.e. in russian, it's verb).
+ * (I don't use spaces around the words, because someday they could be
+ * dropped, when widgets get smarter)
+ */
+
+/* TRANSLATORS: no need to translate 'FileOperation', it's just a context prefix  */
+static const char *op_names1[] = {
+    N_("FileOperation|Copy"),
+    N_("FileOperation|Move"),
+    N_("FileOperation|Delete")
+};
+
+/*
+ * These are formats for building a prompt. Parts encoded as follows:
+ * %o - operation from op_names1
+ * %f - file/files or files/directories, as appropriate
+ * %m - "with source mask" or question mark for delete
+ * %s - source name (truncated)
+ * %d - number of marked files
+ * %n - the '\n' symbol to form two-line prompt for delete or space for other operations
+ */
+/* xgettext:no-c-format */
+static const char *one_format = N_("%o %f%n\"%s\"%m");
+/* xgettext:no-c-format */
+static const char *many_format = N_("%o %d %f%m");
+
+static const char *prompt_parts[] = {
+    N_("file"),
+    N_("files"),
+    N_("directory"),
+    N_("directories"),
+    N_("files/directories"),
+    /* TRANSLATORS: keep leading space here to split words in Copy/Move dialog */
+    N_(" with source mask:")
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* the hard link cache */
+static GSList *linklist = NULL;
+
+/* the files-to-be-erased list */
+static GQueue *erase_list = NULL;
+
+/*
+ * In copy_dir_dir we use two additional single linked lists: The first -
+ * variable name 'parent_dirs' - holds information about already copied
+ * directories and is used to detect cyclic symbolic links.
+ * The second ('dest_dirs' below) holds information about just created
+ * target directories and is used to detect when an directory is copied
+ * into itself (we don't want to copy infinitely).
+ * Both lists don't use the linkcount and name structure members of struct
+ * link.
+ */
+static GSList *dest_dirs = NULL;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+dirsize_status_locate_buttons (dirsize_status_msg_t * dsm)
+{
+    status_msg_t *sm = STATUS_MSG (dsm);
+    Widget *wd = WIDGET (sm->dlg);
+    int y, x;
+    WRect r;
+
+    y = wd->rect.y + 5;
+    x = wd->rect.x;
+
+    if (!dsm->allow_skip)
+    {
+        /* single button: "Abort" */
+        x += (wd->rect.cols - dsm->abort_button->rect.cols) / 2;
+        r = dsm->abort_button->rect;
+        r.y = y;
+        r.x = x;
+        widget_set_size_rect (dsm->abort_button, &r);
+    }
+    else
+    {
+        /* two buttons: "Abort" and "Skip" */
+        int cols;
+
+        cols = dsm->abort_button->rect.cols + dsm->skip_button->rect.cols + 1;
+        x += (wd->rect.cols - cols) / 2;
+        r = dsm->abort_button->rect;
+        r.y = y;
+        r.x = x;
+        widget_set_size_rect (dsm->abort_button, &r);
+        x += dsm->abort_button->rect.cols + 1;
+        r = dsm->skip_button->rect;
+        r.y = y;
+        r.x = x;
+        widget_set_size_rect (dsm->skip_button, &r);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+build_dest (file_op_context_t * ctx, const char *src, const char *dest, FileProgressStatus * status)
+{
+    char *s, *q;
+    const char *fnsource;
+
+    *status = FILE_CONT;
+
+    s = g_strdup (src);
+
+    /* We remove \n from the filename since regex routines would use \n as an anchor */
+    /* this is just to be allowed to maniupulate file names with \n on it */
+    for (q = s; *q != '\0'; q++)
+        if (*q == '\n')
+            *q = ' ';
+
+    fnsource = x_basename (s);
+
+    if (!mc_search_run (ctx->search_handle, fnsource, 0, strlen (fnsource), NULL))
+    {
+        q = NULL;
+        *status = FILE_SKIP;
+    }
+    else
+    {
+        q = mc_search_prepare_replace_str2 (ctx->search_handle, ctx->dest_mask);
+        if (ctx->search_handle->error != MC_SEARCH_E_OK)
+        {
+            if (ctx->search_handle->error_str != NULL)
+                message (D_ERROR, MSG_ERROR, "%s", ctx->search_handle->error_str);
+
+            *status = FILE_ABORT;
+        }
+    }
+
+    MC_PTR_FREE (s);
+
+    if (*status == FILE_CONT)
+    {
+        char *repl_dest;
+
+        repl_dest = mc_search_prepare_replace_str2 (ctx->search_handle, dest);
+        if (ctx->search_handle->error == MC_SEARCH_E_OK)
+            s = mc_build_filename (repl_dest, q, (char *) NULL);
+        else
+        {
+            if (ctx->search_handle->error_str != NULL)
+                message (D_ERROR, MSG_ERROR, "%s", ctx->search_handle->error_str);
+
+            *status = FILE_ABORT;
+        }
+
+        g_free (repl_dest);
+    }
+
+    g_free (q);
+
+    return s;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+free_link (void *data)
+{
+    struct link *lp = (struct link *) data;
+
+    vfs_path_free (lp->src_vpath, TRUE);
+    vfs_path_free (lp->dst_vpath, TRUE);
+    g_free (lp);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void *
+free_erase_list (GQueue * lp)
+{
+    if (lp != NULL)
+        g_queue_free_full (lp, free_link);
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void *
+free_linklist (GSList * lp)
+{
+    g_slist_free_full (lp, free_link);
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const struct link *
+is_in_linklist (const GSList * lp, const vfs_path_t * vpath, const struct stat *sb)
+{
+    const struct vfs_class *class;
+    ino_t ino = sb->st_ino;
+    dev_t dev = sb->st_dev;
+
+    class = vfs_path_get_last_path_vfs (vpath);
+
+    for (; lp != NULL; lp = (const GSList *) g_slist_next (lp))
+    {
+        const struct link *lnk = (const struct link *) lp->data;
+
+        if (lnk->vfs == class && lnk->ino == ino && lnk->dev == dev)
+            return lnk;
+    }
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Check and made hardlink
+ *
+ * @return FALSE if the inode wasn't found in the cache and TRUE if it was found
+ * and a hardlink was successfully made
+ */
+
+static hardlink_status_t
+check_hardlinks (const vfs_path_t * src_vpath, const struct stat *src_stat,
+                 const vfs_path_t * dst_vpath, gboolean * skip_all)
+{
+    struct link *lnk;
+    ino_t ino = src_stat->st_ino;
+    dev_t dev = src_stat->st_dev;
+
+    if (src_stat->st_nlink < 2)
+        return HARDLINK_NOTLINK;
+    if ((vfs_file_class_flags (src_vpath) & VFSF_NOLINKS) != 0)
+        return HARDLINK_UNSUPPORTED;
+
+    lnk = (struct link *) is_in_linklist (linklist, src_vpath, src_stat);
+    if (lnk != NULL)
+    {
+        int stat_result;
+        struct stat link_stat;
+
+        stat_result = mc_stat (lnk->src_vpath, &link_stat);
+
+        if (stat_result == 0 && link_stat.st_ino == ino && link_stat.st_dev == dev)
+        {
+            const struct vfs_class *lp_name_class;
+            const struct vfs_class *my_vfs;
+
+            lp_name_class = vfs_path_get_last_path_vfs (lnk->src_vpath);
+            my_vfs = vfs_path_get_last_path_vfs (src_vpath);
+
+            if (lp_name_class == my_vfs)
+            {
+                const struct vfs_class *p_class, *dst_name_class;
+
+                dst_name_class = vfs_path_get_last_path_vfs (dst_vpath);
+                p_class = vfs_path_get_last_path_vfs (lnk->dst_vpath);
+
+                if (dst_name_class == p_class)
+                {
+                    gboolean ok;
+
+                    while (!(ok = (mc_stat (lnk->dst_vpath, &link_stat) == 0)) && !*skip_all)
+                    {
+                        FileProgressStatus status;
+
+                        status =
+                            file_error (TRUE, _("Cannot stat hardlink source file \"%s\"\n%s"),
+                                        vfs_path_as_str (lnk->dst_vpath));
+                        if (status == FILE_ABORT)
+                            return HARDLINK_ABORT;
+                        if (status == FILE_RETRY)
+                            continue;
+                        if (status == FILE_SKIPALL)
+                            *skip_all = TRUE;
+                        break;
+                    }
+
+                    /* if stat() finished unsuccessfully, don't try to create link */
+                    if (!ok)
+                        return HARDLINK_ERROR;
+
+                    while (!(ok = (mc_link (lnk->dst_vpath, dst_vpath) == 0)) && !*skip_all)
+                    {
+                        FileProgressStatus status;
+
+                        status =
+                            file_error (TRUE, _("Cannot create target hardlink \"%s\"\n%s"),
+                                        vfs_path_as_str (dst_vpath));
+                        if (status == FILE_ABORT)
+                            return HARDLINK_ABORT;
+                        if (status == FILE_RETRY)
+                            continue;
+                        if (status == FILE_SKIPALL)
+                            *skip_all = TRUE;
+                        break;
+                    }
+
+                    /* Success? */
+                    return (ok ? HARDLINK_OK : HARDLINK_ERROR);
+                }
+            }
+        }
+
+        if (!*skip_all)
+        {
+            FileProgressStatus status;
+
+            /* Message w/o "Retry" action.
+             *
+             * FIXME: Can't say what errno is here. Define it and don't display.
+             *
+             * file_error() displays a message with text representation of errno
+             * and the string passed to file_error() should provide the format "%s"
+             * for that at end (see previous file_error() call for the reference).
+             * But if format for errno isn't provided, it is safe, because C standard says:
+             * "If the format is exhausted while arguments remain, the excess arguments
+             * are evaluated (as always) but are otherwise ignored" (ISO/IEC 9899:1999,
+             * section 7.19.6.1, paragraph 2).
+             *
+             */
+            errno = 0;
+            status =
+                file_error (FALSE, _("Cannot create target hardlink \"%s\""),
+                            vfs_path_as_str (dst_vpath));
+
+            if (status == FILE_ABORT)
+                return HARDLINK_ABORT;
+
+            if (status == FILE_SKIPALL)
+                *skip_all = TRUE;
+        }
+
+        return HARDLINK_ERROR;
+    }
+
+    lnk = g_try_new (struct link, 1);
+    if (lnk != NULL)
+    {
+        lnk->vfs = vfs_path_get_last_path_vfs (src_vpath);
+        lnk->ino = ino;
+        lnk->dev = dev;
+        lnk->linkcount = 0;
+        lnk->st_mode = 0;
+        lnk->src_vpath = vfs_path_clone (src_vpath);
+        lnk->dst_vpath = vfs_path_clone (dst_vpath);
+
+        linklist = g_slist_prepend (linklist, lnk);
+    }
+
+    return HARDLINK_CACHED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Duplicate the contents of the symbolic link src_vpath in dst_vpath.
+ * Try to make a stable symlink if the option "stable symlink" was
+ * set in the file mask dialog.
+ * If dst_path is an existing symlink it will be deleted silently
+ * (upper levels take already care of existing files at dst_vpath).
+ */
+
+static FileProgressStatus
+make_symlink (file_op_context_t * ctx, const vfs_path_t * src_vpath, const vfs_path_t * dst_vpath)
+{
+    const char *src_path;
+    const char *dst_path;
+    char link_target[MC_MAXPATHLEN];
+    int len;
+    FileProgressStatus return_status;
+    struct stat dst_stat;
+    gboolean dst_is_symlink;
+    vfs_path_t *link_target_vpath = NULL;
+
+    src_path = vfs_path_as_str (src_vpath);
+    dst_path = vfs_path_as_str (dst_vpath);
+
+    dst_is_symlink = (mc_lstat (dst_vpath, &dst_stat) == 0) && S_ISLNK (dst_stat.st_mode);
+
+  retry_src_readlink:
+    len = mc_readlink (src_vpath, link_target, sizeof (link_target) - 1);
+    if (len < 0)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot read source link \"%s\"\n%s"), src_path);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+            if (return_status == FILE_RETRY)
+                goto retry_src_readlink;
+        }
+        goto ret;
+    }
+
+    link_target[len] = '\0';
+
+    if (ctx->stable_symlinks && !(vfs_file_is_local (src_vpath) && vfs_file_is_local (dst_vpath)))
+    {
+        message (D_ERROR, MSG_ERROR,
+                 _("Cannot make stable symlinks across "
+                   "non-local filesystems:\n\nOption Stable Symlinks will be disabled"));
+        ctx->stable_symlinks = FALSE;
+    }
+
+    if (ctx->stable_symlinks && !g_path_is_absolute (link_target))
+    {
+        const char *r;
+
+        r = strrchr (src_path, PATH_SEP);
+        if (r != NULL)
+        {
+            size_t slen;
+            GString *p;
+            vfs_path_t *q;
+
+            slen = r - src_path + 1;
+
+            p = g_string_sized_new (slen + len);
+            g_string_append_len (p, src_path, slen);
+
+            if (g_path_is_absolute (dst_path))
+                q = vfs_path_from_str_flags (dst_path, VPF_NO_CANON);
+            else
+                q = vfs_path_build_filename (p->str, dst_path, (char *) NULL);
+
+            if (vfs_path_tokens_count (q) > 1)
+            {
+                char *s = NULL;
+                vfs_path_t *tmp_vpath1, *tmp_vpath2;
+
+                g_string_append_len (p, link_target, len);
+                tmp_vpath1 = vfs_path_vtokens_get (q, -1, 1);
+                tmp_vpath2 = vfs_path_from_str (p->str);
+                s = diff_two_paths (tmp_vpath1, tmp_vpath2);
+                vfs_path_free (tmp_vpath2, TRUE);
+                vfs_path_free (tmp_vpath1, TRUE);
+                g_strlcpy (link_target, s != NULL ? s : p->str, sizeof (link_target));
+                g_free (s);
+            }
+
+            g_string_free (p, TRUE);
+            vfs_path_free (q, TRUE);
+        }
+    }
+    link_target_vpath = vfs_path_from_str_flags (link_target, VPF_NO_CANON);
+
+  retry_dst_symlink:
+    if (mc_symlink (link_target_vpath, dst_vpath) == 0)
+    {
+        /* Success */
+        return_status = FILE_CONT;
+        goto ret;
+    }
+    /*
+     * if dst_exists, it is obvious that this had failed.
+     * We can delete the old symlink and try again...
+     */
+    if (dst_is_symlink && mc_unlink (dst_vpath) == 0
+        && mc_symlink (link_target_vpath, dst_vpath) == 0)
+    {
+        /* Success */
+        return_status = FILE_CONT;
+        goto ret;
+    }
+
+    if (ctx->skip_all)
+        return_status = FILE_SKIPALL;
+    else
+    {
+        return_status = file_error (TRUE, _("Cannot create target symlink \"%s\"\n%s"), dst_path);
+        if (return_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        if (return_status == FILE_RETRY)
+            goto retry_dst_symlink;
+    }
+
+  ret:
+    vfs_path_free (link_target_vpath, TRUE);
+    return return_status;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * do_compute_dir_size:
+ *
+ * Computes the number of bytes used by the files in a directory
+ */
+
+static FileProgressStatus
+do_compute_dir_size (const vfs_path_t * dirname_vpath, dirsize_status_msg_t * dsm,
+                     size_t * dir_count, size_t * ret_marked, uintmax_t * ret_total,
+                     mc_stat_fn stat_func)
+{
+    static gint64 timestamp = 0;
+    /* update with 25 FPS rate */
+    static const gint64 delay = G_USEC_PER_SEC / 25;
+
+    status_msg_t *sm = STATUS_MSG (dsm);
+    int res;
+    struct stat s;
+    DIR *dir;
+    struct vfs_dirent *dirent;
+    FileProgressStatus ret = FILE_CONT;
+
+    (*dir_count)++;
+
+    dir = mc_opendir (dirname_vpath);
+    if (dir == NULL)
+        return ret;
+
+    while (ret == FILE_CONT && (dirent = mc_readdir (dir)) != NULL)
+    {
+        vfs_path_t *tmp_vpath;
+
+        if (DIR_IS_DOT (dirent->d_name) || DIR_IS_DOTDOT (dirent->d_name))
+            continue;
+
+        tmp_vpath = vfs_path_append_new (dirname_vpath, dirent->d_name, (char *) NULL);
+
+        res = stat_func (tmp_vpath, &s);
+        if (res == 0)
+        {
+            if (S_ISDIR (s.st_mode))
+                ret =
+                    do_compute_dir_size (tmp_vpath, dsm, dir_count, ret_marked, ret_total,
+                                         stat_func);
+            else
+            {
+                ret = FILE_CONT;
+
+                (*ret_marked)++;
+                *ret_total += (uintmax_t) s.st_size;
+            }
+
+            if (ret == FILE_CONT && sm->update != NULL && mc_time_elapsed (&timestamp, delay))
+            {
+                dsm->dirname_vpath = tmp_vpath;
+                dsm->dir_count = *dir_count;
+                dsm->total_size = *ret_total;
+                ret = sm->update (sm);
+            }
+        }
+
+        vfs_path_free (tmp_vpath, TRUE);
+    }
+
+    mc_closedir (dir);
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * panel_compute_totals:
+ *
+ * compute the number of files and the number of bytes
+ * used up by the whole selection, recursing directories
+ * as required.  In addition, it checks to see if it will
+ * overwrite any files by doing the copy.
+ */
+
+static FileProgressStatus
+panel_compute_totals (const WPanel * panel, dirsize_status_msg_t * sm, size_t * ret_count,
+                      uintmax_t * ret_total, gboolean follow_symlinks)
+{
+    int i;
+    size_t dir_count = 0;
+    mc_stat_fn stat_func = follow_symlinks ? mc_stat : mc_lstat;
+
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        const file_entry_t *fe = &panel->dir.list[i];
+        const struct stat *s;
+
+        if (fe->f.marked == 0)
+            continue;
+
+        s = &fe->st;
+
+        if (S_ISDIR (s->st_mode) || (follow_symlinks && link_isdir (fe) && fe->f.stale_link == 0))
+        {
+            vfs_path_t *p;
+            FileProgressStatus status;
+
+            p = vfs_path_append_new (panel->cwd_vpath, fe->fname->str, (char *) NULL);
+            status = do_compute_dir_size (p, sm, &dir_count, ret_count, ret_total, stat_func);
+            vfs_path_free (p, TRUE);
+
+            if (status != FILE_CONT)
+                return status;
+        }
+        else
+        {
+            (*ret_count)++;
+            *ret_total += (uintmax_t) s->st_size;
+        }
+    }
+
+    return FILE_CONT;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Initialize variables for progress bars */
+static FileProgressStatus
+panel_operate_init_totals (const WPanel * panel, const vfs_path_t * source,
+                           const struct stat *source_stat, file_op_context_t * ctx,
+                           gboolean compute_totals, filegui_dialog_type_t dialog_type)
+{
+    FileProgressStatus status;
+
+#ifdef ENABLE_BACKGROUND
+    if (mc_global.we_are_background)
+        return FILE_CONT;
+#endif
+
+    if (verbose && compute_totals)
+    {
+        dirsize_status_msg_t dsm;
+        gboolean stale_link = FALSE;
+
+        memset (&dsm, 0, sizeof (dsm));
+        dsm.allow_skip = TRUE;
+        status_msg_init (STATUS_MSG (&dsm), _("Directory scanning"), 0, dirsize_status_init_cb,
+                         dirsize_status_update_cb, dirsize_status_deinit_cb);
+
+        ctx->progress_count = 0;
+        ctx->progress_bytes = 0;
+
+        if (source == NULL)
+            status = panel_compute_totals (panel, &dsm, &ctx->progress_count, &ctx->progress_bytes,
+                                           ctx->follow_links);
+        else if (S_ISDIR (source_stat->st_mode)
+                 || (ctx->follow_links
+                     && file_is_symlink_to_dir (source, (struct stat *) source_stat, &stale_link)
+                     && !stale_link))
+        {
+            size_t dir_count = 0;
+
+            status = do_compute_dir_size (source, &dsm, &dir_count, &ctx->progress_count,
+                                          &ctx->progress_bytes, ctx->stat_func);
+        }
+        else
+        {
+            ctx->progress_count++;
+            ctx->progress_bytes += (uintmax_t) source_stat->st_size;
+            status = FILE_CONT;
+        }
+
+        status_msg_deinit (STATUS_MSG (&dsm));
+
+        ctx->progress_totals_computed = (status == FILE_CONT);
+
+        if (status == FILE_SKIP)
+            status = FILE_CONT;
+    }
+    else
+    {
+        status = FILE_CONT;
+        ctx->progress_count = panel->marked;
+        ctx->progress_bytes = panel->total;
+        ctx->progress_totals_computed = verbose && dialog_type == FILEGUI_DIALOG_ONE_ITEM;
+    }
+
+    /* destroy already created UI for single file rename operation */
+    file_op_context_destroy_ui (ctx);
+
+    file_op_context_create_ui (ctx, TRUE, dialog_type);
+
+    return status;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+progress_update_one (file_op_total_context_t * tctx, file_op_context_t * ctx, off_t add)
+{
+    gint64 tv_current;
+    static gint64 tv_start = -1;
+
+    tctx->progress_count++;
+    tctx->progress_bytes += (uintmax_t) add;
+
+    tv_current = g_get_monotonic_time ();
+
+    if (tv_start < 0)
+        tv_start = tv_current;
+
+    if (tv_current - tv_start > FILEOP_UPDATE_INTERVAL_US)
+    {
+        if (verbose && ctx->dialog_type == FILEGUI_DIALOG_MULTI_ITEM)
+        {
+            file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+            file_progress_show_total (tctx, ctx, tctx->progress_bytes, TRUE);
+        }
+
+        tv_start = tv_current;
+    }
+
+    return check_progress_buttons (ctx);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+real_warn_same_file (enum OperationMode mode, const char *fmt, const char *a, const char *b)
+{
+    char *msg;
+    int result = 0;
+    const char *head_msg;
+    int width_a, width_b, width;
+
+    head_msg = mode == Foreground ? MSG_ERROR : _("Background process error");
+
+    width_a = str_term_width1 (a);
+    width_b = str_term_width1 (b);
+    width = COLS - 8;
+
+    if (width_a > width)
+    {
+        if (width_b > width)
+        {
+            char *s;
+
+            s = g_strndup (str_trunc (a, width), width);
+            b = str_trunc (b, width);
+            msg = g_strdup_printf (fmt, s, b);
+            g_free (s);
+        }
+        else
+        {
+            a = str_trunc (a, width);
+            msg = g_strdup_printf (fmt, a, b);
+        }
+    }
+    else
+    {
+        if (width_b > width)
+            b = str_trunc (b, width);
+
+        msg = g_strdup_printf (fmt, a, b);
+    }
+
+    result = query_dialog (head_msg, msg, D_ERROR, 2, _("&Skip"), _("&Abort"));
+    g_free (msg);
+    do_refresh ();
+
+    return (result == 1) ? FILE_ABORT : FILE_SKIP;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+warn_same_file (const char *fmt, const char *a, const char *b)
+{
+#ifdef ENABLE_BACKGROUND
+/* *INDENT-OFF* */
+    union
+    {
+        void *p;
+        FileProgressStatus (*f) (enum OperationMode, const char *fmt, const char *a, const char *b);
+    } pntr;
+/* *INDENT-ON* */
+
+    pntr.f = real_warn_same_file;
+
+    if (mc_global.we_are_background)
+        return parent_call (pntr.p, NULL, 3, strlen (fmt), fmt, strlen (a), a, strlen (b), b);
+#endif
+    return real_warn_same_file (Foreground, fmt, a, b);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+check_same_file (const char *a, const struct stat *ast, const char *b, const struct stat *bst,
+                 FileProgressStatus * status)
+{
+    if (ast->st_dev != bst->st_dev || ast->st_ino != bst->st_ino)
+        return FALSE;
+
+    if (S_ISDIR (ast->st_mode))
+        *status = warn_same_file (_("\"%s\"\nand\n\"%s\"\nare the same directory"), a, b);
+    else
+        *status = warn_same_file (_("\"%s\"\nand\n\"%s\"\nare the same file"), a, b);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+get_times (const struct stat *sb, mc_timesbuf_t * times)
+{
+#ifdef HAVE_UTIMENSAT
+    (*times)[0] = sb->st_atim;
+    (*times)[1] = sb->st_mtim;
+#else
+    times->actime = sb->st_atime;
+    times->modtime = sb->st_mtime;
+#endif
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Query/status report routines */
+
+static FileProgressStatus
+real_do_file_error (enum OperationMode mode, gboolean allow_retry, const char *error)
+{
+    int result;
+    const char *msg;
+
+    msg = mode == Foreground ? MSG_ERROR : _("Background process error");
+
+    if (allow_retry)
+        result =
+            query_dialog (msg, error, D_ERROR, 4, _("&Skip"), _("Ski&p all"), _("&Retry"),
+                          _("&Abort"));
+    else
+        result = query_dialog (msg, error, D_ERROR, 3, _("&Skip"), _("Ski&p all"), _("&Abort"));
+
+    switch (result)
+    {
+    case 0:
+        do_refresh ();
+        return FILE_SKIP;
+
+    case 1:
+        do_refresh ();
+        return FILE_SKIPALL;
+
+    case 2:
+        if (allow_retry)
+        {
+            do_refresh ();
+            return FILE_RETRY;
+        }
+        MC_FALLTHROUGH;
+
+    case 3:
+    default:
+        return FILE_ABORT;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+real_query_recursive (file_op_context_t * ctx, enum OperationMode mode, const char *s)
+{
+    if (ctx->recursive_result < RECURSIVE_ALWAYS)
+    {
+        const char *msg;
+        char *text;
+
+        msg = mode == Foreground
+            ? _("Directory \"%s\" not empty.\nDelete it recursively?")
+            : _("Background process:\nDirectory \"%s\" not empty.\nDelete it recursively?");
+        text = g_strdup_printf (msg, path_trunc (s, 30));
+
+        if (safe_delete)
+            query_set_sel (1);
+
+        ctx->recursive_result =
+            query_dialog (op_names[OP_DELETE], text, D_ERROR, 5, _("&Yes"), _("&No"), _("A&ll"),
+                          _("Non&e"), _("&Abort"));
+        g_free (text);
+
+        if (ctx->recursive_result != RECURSIVE_ABORT)
+            do_refresh ();
+    }
+
+    switch (ctx->recursive_result)
+    {
+    case RECURSIVE_YES:
+    case RECURSIVE_ALWAYS:
+        return FILE_CONT;
+
+    case RECURSIVE_NO:
+    case RECURSIVE_NEVER:
+        return FILE_SKIP;
+
+    case RECURSIVE_ABORT:
+    default:
+        return FILE_ABORT;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_BACKGROUND
+static FileProgressStatus
+do_file_error (gboolean allow_retry, const char *str)
+{
+/* *INDENT-OFF* */
+    union
+    {
+        void *p;
+        FileProgressStatus (*f) (enum OperationMode, gboolean, const char *);
+    } pntr;
+/* *INDENT-ON* */
+
+    pntr.f = real_do_file_error;
+
+    if (mc_global.we_are_background)
+        return parent_call (pntr.p, NULL, 2, sizeof (allow_retry), allow_retry, strlen (str), str);
+    else
+        return real_do_file_error (Foreground, allow_retry, str);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+query_recursive (file_op_context_t * ctx, const char *s)
+{
+/* *INDENT-OFF* */
+    union
+    {
+        void *p;
+        FileProgressStatus (*f) (file_op_context_t *, enum OperationMode, const char *);
+    } pntr;
+/* *INDENT-ON* */
+
+    pntr.f = real_query_recursive;
+
+    if (mc_global.we_are_background)
+        return parent_call (pntr.p, ctx, 1, strlen (s), s);
+    else
+        return real_query_recursive (ctx, Foreground, s);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+query_replace (file_op_context_t * ctx, const char *src, struct stat *src_stat, const char *dst,
+               struct stat *dst_stat)
+{
+/* *INDENT-OFF* */
+    union
+    {
+        void *p;
+        FileProgressStatus (*f) (file_op_context_t *, enum OperationMode, const char *,
+                                 struct stat *, const char *, struct stat *);
+    } pntr;
+/* *INDENT-ON* */
+
+    pntr.f = file_progress_real_query_replace;
+
+    if (mc_global.we_are_background)
+        return parent_call (pntr.p, ctx, 4, strlen (src), src, sizeof (struct stat), src_stat,
+                            strlen (dst), dst, sizeof (struct stat), dst_stat);
+    else
+        return file_progress_real_query_replace (ctx, Foreground, src, src_stat, dst, dst_stat);
+}
+
+#else
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+do_file_error (gboolean allow_retry, const char *str)
+{
+    return real_do_file_error (Foreground, allow_retry, str);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+query_recursive (file_op_context_t * ctx, const char *s)
+{
+    return real_query_recursive (ctx, Foreground, s);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+query_replace (file_op_context_t * ctx, const char *src, struct stat *src_stat, const char *dst,
+               struct stat *dst_stat)
+{
+    return file_progress_real_query_replace (ctx, Foreground, src, src_stat, dst, dst_stat);
+}
+
+#endif /* !ENABLE_BACKGROUND */
+
+/* --------------------------------------------------------------------------------------------- */
+/** Report error with two files */
+
+static FileProgressStatus
+files_error (const char *format, const char *file1, const char *file2)
+{
+    char buf[BUF_MEDIUM];
+    char *nfile1 = g_strdup (path_trunc (file1, 15));
+    char *nfile2 = g_strdup (path_trunc (file2, 15));
+
+    g_snprintf (buf, sizeof (buf), format, nfile1, nfile2, unix_error_string (errno));
+
+    g_free (nfile1);
+    g_free (nfile2);
+
+    return do_file_error (TRUE, buf);
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+copy_file_file_display_progress (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                                 gint64 tv_current, gint64 tv_transfer_start, off_t file_size,
+                                 off_t file_part)
+{
+    gint64 dt;
+
+    /* Update rotating dash after some time */
+    rotate_dash (TRUE);
+
+    /* Compute ETA */
+    dt = (tv_current - tv_transfer_start) / G_USEC_PER_SEC;
+
+    if (file_part == 0)
+        ctx->eta_secs = 0.0;
+    else
+        ctx->eta_secs = ((dt / (double) file_part) * file_size) - dt;
+
+    /* Compute BPS rate */
+    ctx->bps_time = MAX (1, dt);
+    ctx->bps = file_part / ctx->bps_time;
+
+    /* Compute total ETA and BPS */
+    if (ctx->progress_bytes != 0)
+    {
+        uintmax_t remain_bytes;
+
+        remain_bytes = ctx->progress_bytes - tctx->copied_bytes;
+#if 1
+        {
+            gint64 total_secs;
+
+            total_secs = (tv_current - tctx->transfer_start) / G_USEC_PER_SEC;
+            total_secs = MAX (1, total_secs);
+
+            tctx->bps = tctx->copied_bytes / total_secs;
+            tctx->eta_secs = (tctx->bps != 0) ? remain_bytes / tctx->bps : 0;
+        }
+#else
+        /* broken on lot of little files */
+        tctx->bps_count++;
+        tctx->bps = (tctx->bps * (tctx->bps_count - 1) + ctx->bps) / tctx->bps_count;
+        tctx->eta_secs = (tctx->bps != 0) ? remain_bytes / tctx->bps : 0;
+#endif
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+try_remove_file (file_op_context_t * ctx, const vfs_path_t * vpath, FileProgressStatus * status)
+{
+    while (mc_unlink (vpath) != 0 && !ctx->skip_all)
+    {
+        *status = file_error (TRUE, _("Cannot remove file \"%s\"\n%s"), vfs_path_as_str (vpath));
+        if (*status == FILE_RETRY)
+            continue;
+        if (*status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        return FALSE;
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* {{{ Move routines */
+
+/**
+ * Move single file or one of many files from one location to another.
+ *
+ * @panel pointer to panel in case of single file, NULL otherwise
+ * @tctx file operation total context object
+ * @ctx file operation context object
+ * @s source file name
+ * @d destination file name
+ *
+ * @return operation result
+ */
+static FileProgressStatus
+move_file_file (const WPanel * panel, file_op_total_context_t * tctx, file_op_context_t * ctx,
+                const char *s, const char *d)
+{
+    struct stat src_stat, dst_stat;
+    FileProgressStatus return_status = FILE_CONT;
+    gboolean copy_done = FALSE;
+    gboolean old_ask_overwrite;
+    vfs_path_t *src_vpath, *dst_vpath;
+
+    src_vpath = vfs_path_from_str (s);
+    dst_vpath = vfs_path_from_str (d);
+
+    file_progress_show_source (ctx, src_vpath);
+    file_progress_show_target (ctx, dst_vpath);
+
+    /* FIXME: do we really need to check buttons in case of single file? */
+    if (check_progress_buttons (ctx) == FILE_ABORT)
+    {
+        return_status = FILE_ABORT;
+        goto ret;
+    }
+
+    mc_refresh ();
+
+    while (mc_lstat (src_vpath, &src_stat) != 0)
+    {
+        /* Source doesn't exist */
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot stat file \"%s\"\n%s"), s);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+        }
+
+        if (return_status != FILE_RETRY)
+            goto ret;
+    }
+
+    if (mc_lstat (dst_vpath, &dst_stat) == 0)
+    {
+        if (check_same_file (s, &src_stat, d, &dst_stat, &return_status))
+            goto ret;
+
+        if (S_ISDIR (dst_stat.st_mode))
+        {
+            message (D_ERROR, MSG_ERROR, _("Cannot overwrite directory \"%s\""), d);
+            do_refresh ();
+            return_status = FILE_SKIP;
+            goto ret;
+        }
+
+        if (confirm_overwrite)
+        {
+            return_status = query_replace (ctx, s, &src_stat, d, &dst_stat);
+            if (return_status != FILE_CONT)
+                goto ret;
+        }
+        /* Ok to overwrite */
+    }
+
+    if (!ctx->do_append)
+    {
+        if (S_ISLNK (src_stat.st_mode) && ctx->stable_symlinks)
+        {
+            return_status = make_symlink (ctx, src_vpath, dst_vpath);
+            if (return_status == FILE_CONT)
+            {
+                if (ctx->preserve)
+                {
+                    mc_timesbuf_t times;
+
+                    get_times (&src_stat, &times);
+                    mc_utime (dst_vpath, &times);
+                }
+                goto retry_src_remove;
+            }
+            goto ret;
+        }
+
+        if (mc_rename (src_vpath, dst_vpath) == 0)
+        {
+            /* FIXME: do we really need to update progress in case of single file? */
+            return_status = progress_update_one (tctx, ctx, src_stat.st_size);
+            goto ret;
+        }
+    }
+#if 0
+    /* Comparison to EXDEV seems not to work in nfs if you're moving from
+       one nfs to the same, but on the server it is on two different
+       filesystems. Then nfs returns EIO instead of EXDEV.
+       Hope it will not hurt if we always in case of error try to copy/delete. */
+    else
+        errno = EXDEV;          /* Hack to copy (append) the file and then delete it */
+
+    if (errno != EXDEV)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = files_error (_("Cannot move file \"%s\" to \"%s\"\n%s"), s, d);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+            if (return_status == FILE_RETRY)
+                goto retry_rename;
+        }
+
+        goto ret;
+    }
+#endif
+
+    /* Failed rename -> copy the file instead */
+    if (panel != NULL)
+    {
+        /* In case of single file, calculate totals. In case of many files,
+           totals are calculated already. */
+        return_status =
+            panel_operate_init_totals (panel, src_vpath, &src_stat, ctx, TRUE,
+                                       FILEGUI_DIALOG_ONE_ITEM);
+        if (return_status != FILE_CONT)
+            goto ret;
+    }
+
+    old_ask_overwrite = tctx->ask_overwrite;
+    tctx->ask_overwrite = FALSE;
+    return_status = copy_file_file (tctx, ctx, s, d);
+    tctx->ask_overwrite = old_ask_overwrite;
+    if (return_status != FILE_CONT)
+        goto ret;
+
+    copy_done = TRUE;
+
+    /* FIXME: there is no need to update progress and check buttons
+       at the finish of single file operation. */
+    if (panel == NULL)
+    {
+        file_progress_show_source (ctx, NULL);
+        file_progress_show (ctx, 0, 0, "", FALSE);
+
+        return_status = check_progress_buttons (ctx);
+        if (return_status != FILE_CONT)
+            goto ret;
+    }
+
+    mc_refresh ();
+
+  retry_src_remove:
+    if (!try_remove_file (ctx, src_vpath, &return_status) && panel == NULL)
+        goto ret;
+
+    if (!copy_done)
+        return_status = progress_update_one (tctx, ctx, src_stat.st_size);
+
+  ret:
+    vfs_path_free (src_vpath, TRUE);
+    vfs_path_free (dst_vpath, TRUE);
+
+    return return_status;
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Erase routines */
+/** Don't update progress status if progress_count==NULL */
+
+static FileProgressStatus
+erase_file (file_op_total_context_t * tctx, file_op_context_t * ctx, const vfs_path_t * vpath)
+{
+    struct stat buf;
+    FileProgressStatus return_status;
+
+    /* check buttons if deleting info was changed */
+    if (file_progress_show_deleting (ctx, vfs_path_as_str (vpath), &tctx->progress_count))
+    {
+        file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+        if (check_progress_buttons (ctx) == FILE_ABORT)
+            return FILE_ABORT;
+
+        mc_refresh ();
+    }
+
+    if (tctx->progress_count != 0 && mc_lstat (vpath, &buf) != 0)
+    {
+        /* ignore, most likely the mc_unlink fails, too */
+        buf.st_size = 0;
+    }
+
+    if (!try_remove_file (ctx, vpath, &return_status) && return_status == FILE_ABORT)
+        return FILE_ABORT;
+
+    if (tctx->progress_count == 0)
+        return FILE_CONT;
+
+    return check_progress_buttons (ctx);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+try_erase_dir (file_op_context_t * ctx, const char *dir)
+{
+    FileProgressStatus return_status = FILE_CONT;
+
+    while (my_rmdir (dir) != 0 && !ctx->skip_all)
+    {
+        return_status = file_error (TRUE, _("Cannot remove directory \"%s\"\n%s"), dir);
+        if (return_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        if (return_status != FILE_RETRY)
+            break;
+    }
+
+    return return_status;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+  Recursive remove of files
+  abort->cancel stack
+  skip ->warn every level, gets default
+  skipall->remove as much as possible
+*/
+static FileProgressStatus
+recursive_erase (file_op_total_context_t * tctx, file_op_context_t * ctx, const vfs_path_t * vpath)
+{
+    struct vfs_dirent *next;
+    DIR *reading;
+    const char *s;
+    FileProgressStatus return_status = FILE_CONT;
+
+    reading = mc_opendir (vpath);
+    if (reading == NULL)
+        return FILE_RETRY;
+
+    while ((next = mc_readdir (reading)) && return_status != FILE_ABORT)
+    {
+        vfs_path_t *tmp_vpath;
+        struct stat buf;
+
+        if (DIR_IS_DOT (next->d_name) || DIR_IS_DOTDOT (next->d_name))
+            continue;
+
+        tmp_vpath = vfs_path_append_new (vpath, next->d_name, (char *) NULL);
+        if (mc_lstat (tmp_vpath, &buf) != 0)
+        {
+            mc_closedir (reading);
+            vfs_path_free (tmp_vpath, TRUE);
+            return FILE_RETRY;
+        }
+        if (S_ISDIR (buf.st_mode))
+            return_status = recursive_erase (tctx, ctx, tmp_vpath);
+        else
+            return_status = erase_file (tctx, ctx, tmp_vpath);
+        vfs_path_free (tmp_vpath, TRUE);
+    }
+    mc_closedir (reading);
+
+    if (return_status == FILE_ABORT)
+        return FILE_ABORT;
+
+    s = vfs_path_as_str (vpath);
+
+    file_progress_show_deleting (ctx, s, NULL);
+    file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+    if (check_progress_buttons (ctx) == FILE_ABORT)
+        return FILE_ABORT;
+
+    mc_refresh ();
+
+    return try_erase_dir (ctx, s);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+  * Check if directory is empty or not.
+  *
+  * @param vpath directory handler
+  *
+  * @returns -1 on error,
+  *          1 if there are no entries besides "." and ".." in the directory path points to,
+  *          0 else.
+  *
+  * ATTENTION! Be careful when modifying this function (like commit 25e419ba0886f)!
+  * Some implementations of readdir() in MC VFS (for example, vfs_s_readdir(), which is used
+  * in FISH) don't return "." and ".." entries.
+  */
+static int
+check_dir_is_empty (const vfs_path_t * vpath)
+{
+    DIR *dir;
+    struct vfs_dirent *d;
+    int i = 1;
+
+    dir = mc_opendir (vpath);
+    if (dir == NULL)
+        return -1;
+
+    for (d = mc_readdir (dir); d != NULL; d = mc_readdir (dir))
+        if (!DIR_IS_DOT (d->d_name) && !DIR_IS_DOTDOT (d->d_name))
+        {
+            i = 0;
+            break;
+        }
+
+    mc_closedir (dir);
+    return i;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+erase_dir_iff_empty (file_op_context_t * ctx, const vfs_path_t * vpath, size_t count)
+{
+    const char *s;
+
+    s = vfs_path_as_str (vpath);
+
+    file_progress_show_deleting (ctx, s, NULL);
+    file_progress_show_count (ctx, count, ctx->progress_count);
+    if (check_progress_buttons (ctx) == FILE_ABORT)
+        return FILE_ABORT;
+
+    mc_refresh ();
+
+    if (check_dir_is_empty (vpath) != 1)
+        return FILE_CONT;
+
+    /* not empty or error */
+    return try_erase_dir (ctx, s);
+}
+
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+erase_dir_after_copy (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                      const vfs_path_t * vpath, FileProgressStatus * status)
+{
+    if (ctx->erase_at_end && erase_list != NULL)
+    {
+        /* Reset progress count before delete to avoid counting files twice */
+        tctx->progress_count = tctx->prev_progress_count;
+
+        while (!g_queue_is_empty (erase_list) && *status != FILE_ABORT)
+        {
+            struct link *lp;
+
+            lp = (struct link *) g_queue_pop_head (erase_list);
+
+            if (S_ISDIR (lp->st_mode))
+                *status = erase_dir_iff_empty (ctx, lp->src_vpath, tctx->progress_count);
+            else
+                *status = erase_file (tctx, ctx, lp->src_vpath);
+
+            free_link (lp);
+        }
+
+        /* Save progress counter before move next directory */
+        tctx->prev_progress_count = tctx->progress_count;
+    }
+
+    erase_dir_iff_empty (ctx, vpath, tctx->progress_count);
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Move single directory or one of many directories from one location to another.
+ *
+ * @panel pointer to panel in case of single directory, NULL otherwise
+ * @tctx file operation total context object
+ * @ctx file operation context object
+ * @s source directory name
+ * @d destination directory name
+ *
+ * @return operation result
+ */
+static FileProgressStatus
+do_move_dir_dir (const WPanel * panel, file_op_total_context_t * tctx, file_op_context_t * ctx,
+                 const char *s, const char *d)
+{
+    struct stat src_stat, dst_stat;
+    FileProgressStatus return_status = FILE_CONT;
+    gboolean move_over = FALSE;
+    gboolean dstat_ok;
+    vfs_path_t *src_vpath, *dst_vpath;
+
+    src_vpath = vfs_path_from_str (s);
+    dst_vpath = vfs_path_from_str (d);
+
+    file_progress_show_source (ctx, src_vpath);
+    file_progress_show_target (ctx, dst_vpath);
+
+    /* FIXME: do we really need to check buttons in case of single directory? */
+    if (panel != NULL && check_progress_buttons (ctx) == FILE_ABORT)
+    {
+        return_status = FILE_ABORT;
+        goto ret_fast;
+    }
+
+    mc_refresh ();
+
+    mc_stat (src_vpath, &src_stat);
+
+    dstat_ok = (mc_stat (dst_vpath, &dst_stat) == 0);
+
+    if (dstat_ok && check_same_file (s, &src_stat, d, &dst_stat, &return_status))
+        goto ret_fast;
+
+    if (!dstat_ok)
+        ;                       /* destination doesn't exist */
+    else if (!ctx->dive_into_subdirs)
+        move_over = TRUE;
+    else
+    {
+        vfs_path_t *tmp;
+
+        tmp = dst_vpath;
+        dst_vpath = vfs_path_append_new (dst_vpath, x_basename (s), (char *) NULL);
+        vfs_path_free (tmp, TRUE);
+    }
+
+    d = vfs_path_as_str (dst_vpath);
+
+    /* Check if the user inputted an existing dir */
+  retry_dst_stat:
+    if (mc_stat (dst_vpath, &dst_stat) == 0)
+    {
+        if (move_over)
+        {
+            if (panel != NULL)
+            {
+                /* In case of single directory, calculate totals. In case of many directories,
+                   totals are calculated already. */
+                return_status =
+                    panel_operate_init_totals (panel, src_vpath, &src_stat, ctx, TRUE,
+                                               FILEGUI_DIALOG_MULTI_ITEM);
+                if (return_status != FILE_CONT)
+                    goto ret;
+            }
+
+            return_status = copy_dir_dir (tctx, ctx, s, d, FALSE, TRUE, TRUE, NULL);
+
+            if (return_status != FILE_CONT)
+                goto ret;
+            goto oktoret;
+        }
+        else if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            if (S_ISDIR (dst_stat.st_mode))
+                return_status = file_error (TRUE, _("Cannot overwrite directory \"%s\"\n%s"), d);
+            else
+                return_status = file_error (TRUE, _("Cannot overwrite file \"%s\"\n%s"), d);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+            if (return_status == FILE_RETRY)
+                goto retry_dst_stat;
+        }
+
+        goto ret_fast;
+    }
+
+  retry_rename:
+    if (mc_rename (src_vpath, dst_vpath) == 0)
+    {
+        return_status = FILE_CONT;
+        goto ret;
+    }
+
+    if (errno != EXDEV)
+    {
+        if (!ctx->skip_all)
+        {
+            return_status = files_error (_("Cannot move directory \"%s\" to \"%s\"\n%s"), s, d);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+            if (return_status == FILE_RETRY)
+                goto retry_rename;
+        }
+        goto ret;
+    }
+
+    /* Failed because of filesystem boundary -> copy dir instead */
+    if (panel != NULL)
+    {
+        /* In case of single directory, calculate totals. In case of many directories,
+           totals are calculated already. */
+        return_status =
+            panel_operate_init_totals (panel, src_vpath, &src_stat, ctx, TRUE,
+                                       FILEGUI_DIALOG_MULTI_ITEM);
+        if (return_status != FILE_CONT)
+            goto ret;
+    }
+
+    return_status = copy_dir_dir (tctx, ctx, s, d, FALSE, FALSE, TRUE, NULL);
+
+    if (return_status != FILE_CONT)
+        goto ret;
+
+  oktoret:
+    /* FIXME: there is no need to update progress and check buttons
+       at the finish of single directory operation. */
+    if (panel == NULL)
+    {
+        file_progress_show_source (ctx, NULL);
+        file_progress_show_target (ctx, NULL);
+        file_progress_show (ctx, 0, 0, "", FALSE);
+
+        return_status = check_progress_buttons (ctx);
+        if (return_status != FILE_CONT)
+            goto ret;
+    }
+
+    mc_refresh ();
+
+    erase_dir_after_copy (tctx, ctx, src_vpath, &return_status);
+
+  ret:
+    erase_list = free_erase_list (erase_list);
+  ret_fast:
+    vfs_path_free (src_vpath, TRUE);
+    vfs_path_free (dst_vpath, TRUE);
+    return return_status;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* {{{ Panel operate routines */
+
+/**
+ * Return currently selected entry name or the name of the first marked
+ * entry if there is one.
+ */
+
+static const char *
+panel_get_file (const WPanel * panel)
+{
+    if (get_current_type () == view_tree)
+    {
+        WTree *tree;
+        const vfs_path_t *selected_name;
+
+        tree = (WTree *) get_panel_widget (get_current_index ());
+        selected_name = tree_selected_name (tree);
+        return vfs_path_as_str (selected_name);
+    }
+
+    if (panel->marked != 0)
+    {
+        int i;
+
+        for (i = 0; i < panel->dir.len; i++)
+            if (panel->dir.list[i].f.marked != 0)
+                return panel->dir.list[i].fname->str;
+    }
+
+    return panel_current_entry (panel)->fname->str;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const char *
+check_single_entry (const WPanel * panel, gboolean force_single, struct stat *src_stat)
+{
+    const char *source;
+    gboolean ok;
+
+    if (force_single)
+        source = panel_current_entry (panel)->fname->str;
+    else
+        source = panel_get_file (panel);
+
+    ok = !DIR_IS_DOTDOT (source);
+
+    if (!ok)
+        message (D_ERROR, MSG_ERROR, _("Cannot operate on \"..\"!"));
+    else
+    {
+        vfs_path_t *source_vpath;
+
+        source_vpath = vfs_path_from_str (source);
+
+        /* Update stat to get actual info */
+        ok = mc_lstat (source_vpath, src_stat) == 0;
+        if (!ok)
+        {
+            message (D_ERROR, MSG_ERROR, _("Cannot stat \"%s\"\n%s"),
+                     path_trunc (source, 30), unix_error_string (errno));
+
+            /* Directory was changed outside MC. Reload it forced */
+            if (!panel->is_panelized)
+            {
+                panel_update_flags_t flags = UP_RELOAD;
+
+                /* don't update panelized panel */
+                if (get_other_type () == view_listing && other_panel->is_panelized)
+                    flags |= UP_ONLY_CURRENT;
+
+                update_panels (flags, UP_KEEPSEL);
+            }
+        }
+
+        vfs_path_free (source_vpath, TRUE);
+    }
+
+    return ok ? source : NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Generate user prompt for panel operation.
+ * src_stat must be not NULL for single source, and NULL for multiple sources
+ */
+
+static char *
+panel_operate_generate_prompt (const WPanel * panel, FileOperation operation,
+                               const struct stat *src_stat)
+{
+    char *sp;
+    char *format_string;
+    const char *cp;
+
+    static gboolean i18n_flag = FALSE;
+    if (!i18n_flag)
+    {
+        size_t i;
+
+        for (i = G_N_ELEMENTS (op_names1); i-- != 0;)
+            op_names1[i] = Q_ (op_names1[i]);
+
+#ifdef ENABLE_NLS
+        for (i = G_N_ELEMENTS (prompt_parts); i-- != 0;)
+            prompt_parts[i] = _(prompt_parts[i]);
+
+        one_format = _(one_format);
+        many_format = _(many_format);
+#endif /* ENABLE_NLS */
+        i18n_flag = TRUE;
+    }
+
+    /* Possible prompts:
+     *   OP_COPY:
+     *       "Copy file \"%s\" with source mask:"
+     *       "Copy %d files with source mask:"
+     *       "Copy directory \"%s\" with source mask:"
+     *       "Copy %d directories with source mask:"
+     *       "Copy %d files/directories with source mask:"
+     *   OP_MOVE:
+     *       "Move file \"%s\" with source mask:"
+     *       "Move %d files with source mask:"
+     *       "Move directory \"%s\" with source mask:"
+     *       "Move %d directories with source mask:"
+     *       "Move %d files/directories with source mask:"
+     *   OP_DELETE:
+     *       "Delete file \"%s\"?"
+     *       "Delete %d files?"
+     *       "Delete directory \"%s\"?"
+     *       "Delete %d directories?"
+     *       "Delete %d files/directories?"
+     */
+
+    cp = (src_stat != NULL ? one_format : many_format);
+
+    /* 1. Substitute %o */
+    format_string = str_replace_all (cp, "%o", op_names1[(int) operation]);
+
+    /* 2. Substitute %n */
+    cp = operation == OP_DELETE ? "\n" : " ";
+    sp = format_string;
+    format_string = str_replace_all (sp, "%n", cp);
+    g_free (sp);
+
+    /* 3. Substitute %f */
+    if (src_stat != NULL)
+        cp = S_ISDIR (src_stat->st_mode) ? prompt_parts[2] : prompt_parts[0];
+    else if (panel->marked == panel->dirs_marked)
+        cp = prompt_parts[3];
+    else
+        cp = panel->dirs_marked != 0 ? prompt_parts[4] : prompt_parts[1];
+
+    sp = format_string;
+    format_string = str_replace_all (sp, "%f", cp);
+    g_free (sp);
+
+    /* 4. Substitute %m */
+    cp = operation == OP_DELETE ? "?" : prompt_parts[5];
+    sp = format_string;
+    format_string = str_replace_all (sp, "%m", cp);
+    g_free (sp);
+
+    return format_string;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+do_confirm_copy_move (const WPanel * panel, gboolean force_single, const char *source,
+                      struct stat *src_stat, file_op_context_t * ctx, gboolean * do_bg)
+{
+    const char *tmp_dest_dir;
+    char *dest_dir;
+    char *format;
+    char *ret;
+
+    /* Forced single operations default to the original name */
+    if (force_single)
+        tmp_dest_dir = source;
+    else if (get_other_type () == view_listing)
+        tmp_dest_dir = vfs_path_as_str (other_panel->cwd_vpath);
+    else
+        tmp_dest_dir = vfs_path_as_str (panel->cwd_vpath);
+
+    /*
+     * Add trailing backslash only when do non-local ops.
+     * It saves user from occasional file renames (when destination
+     * dir is deleted)
+     */
+    if (!force_single && tmp_dest_dir != NULL && tmp_dest_dir[0] != '\0'
+        && !IS_PATH_SEP (tmp_dest_dir[strlen (tmp_dest_dir) - 1]))
+    {
+        /* add trailing separator */
+        dest_dir = g_strconcat (tmp_dest_dir, PATH_SEP_STR, (char *) NULL);
+    }
+    else
+    {
+        /* just copy */
+        dest_dir = g_strdup (tmp_dest_dir);
+    }
+
+    if (dest_dir == NULL)
+        return NULL;
+
+    if (source == NULL)
+        src_stat = NULL;
+
+    /* Generate confirmation prompt */
+    format = panel_operate_generate_prompt (panel, ctx->operation, src_stat);
+
+    ret = file_mask_dialog (ctx, source != NULL, format,
+                            source != NULL ? source : (const void *) &panel->marked, dest_dir,
+                            do_bg);
+
+    g_free (format);
+    g_free (dest_dir);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+do_confirm_erase (const WPanel * panel, const char *source, struct stat *src_stat)
+{
+    int i;
+    char *format;
+    char fmd_buf[BUF_MEDIUM];
+
+    if (source == NULL)
+        src_stat = NULL;
+
+    /* Generate confirmation prompt */
+    format = panel_operate_generate_prompt (panel, OP_DELETE, src_stat);
+
+    if (source == NULL)
+        g_snprintf (fmd_buf, sizeof (fmd_buf), format, panel->marked);
+    else
+    {
+        const int fmd_xlen = 64;
+
+        i = fmd_xlen - str_term_width1 (format) - 4;
+        g_snprintf (fmd_buf, sizeof (fmd_buf), format, str_trunc (source, i));
+    }
+
+    g_free (format);
+
+    if (safe_delete)
+        query_set_sel (1);
+
+    i = query_dialog (op_names[OP_DELETE], fmd_buf, D_ERROR, 2, _("&Yes"), _("&No"));
+
+    return (i == 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+operate_single_file (const WPanel * panel, file_op_total_context_t * tctx, file_op_context_t * ctx,
+                     const char *src, struct stat *src_stat, const char *dest,
+                     filegui_dialog_type_t dialog_type)
+{
+    FileProgressStatus value;
+    vfs_path_t *src_vpath;
+    gboolean is_file;
+
+    if (g_path_is_absolute (src))
+        src_vpath = vfs_path_from_str (src);
+    else
+        src_vpath = vfs_path_append_new (panel->cwd_vpath, src, (char *) NULL);
+
+    is_file = !S_ISDIR (src_stat->st_mode);
+    /* Is link to directory? */
+    if (is_file)
+    {
+        gboolean is_link;
+
+        is_link = file_is_symlink_to_dir (src_vpath, src_stat, NULL);
+        is_file = !(is_link && ctx->follow_links);
+    }
+
+    if (ctx->operation == OP_DELETE)
+    {
+        value = panel_operate_init_totals (panel, src_vpath, src_stat, ctx, !is_file, dialog_type);
+        if (value == FILE_CONT)
+        {
+            if (is_file)
+                value = erase_file (tctx, ctx, src_vpath);
+            else
+                value = erase_dir (tctx, ctx, src_vpath);
+        }
+    }
+    else
+    {
+        char *temp;
+
+        src = vfs_path_as_str (src_vpath);
+
+        temp = build_dest (ctx, src, dest, &value);
+        if (temp != NULL)
+        {
+            dest = temp;
+
+            switch (ctx->operation)
+            {
+            case OP_COPY:
+                /* we use file_mask_op_follow_links only with OP_COPY */
+                ctx->stat_func (src_vpath, src_stat);
+
+                value =
+                    panel_operate_init_totals (panel, src_vpath, src_stat, ctx, !is_file,
+                                               dialog_type);
+                if (value == FILE_CONT)
+                {
+                    is_file = !S_ISDIR (src_stat->st_mode);
+                    /* Is link to directory? */
+                    if (is_file)
+                    {
+                        gboolean is_link;
+
+                        is_link = file_is_symlink_to_dir (src_vpath, src_stat, NULL);
+                        is_file = !(is_link && ctx->follow_links);
+                    }
+
+                    if (is_file)
+                        value = copy_file_file (tctx, ctx, src, dest);
+                    else
+                        value = copy_dir_dir (tctx, ctx, src, dest, TRUE, FALSE, FALSE, NULL);
+                }
+                break;
+
+            case OP_MOVE:
+#ifdef ENABLE_BACKGROUND
+                if (!mc_global.we_are_background)
+#endif
+                    /* create UI to show confirmation dialog */
+                    file_op_context_create_ui (ctx, TRUE, FILEGUI_DIALOG_ONE_ITEM);
+
+                if (is_file)
+                    value = move_file_file (panel, tctx, ctx, src, dest);
+                else
+                    value = do_move_dir_dir (panel, tctx, ctx, src, dest);
+                break;
+
+            default:
+                /* Unknown file operation */
+                abort ();
+            }
+
+            g_free (temp);
+        }
+    }
+
+    vfs_path_free (src_vpath, TRUE);
+
+    return value;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FileProgressStatus
+operate_one_file (const WPanel * panel, file_op_total_context_t * tctx, file_op_context_t * ctx,
+                  const char *src, struct stat *src_stat, const char *dest)
+{
+    FileProgressStatus value = FILE_CONT;
+    vfs_path_t *src_vpath;
+    gboolean is_file;
+
+    if (g_path_is_absolute (src))
+        src_vpath = vfs_path_from_str (src);
+    else
+        src_vpath = vfs_path_append_new (panel->cwd_vpath, src, (char *) NULL);
+
+    is_file = !S_ISDIR (src_stat->st_mode);
+
+    if (ctx->operation == OP_DELETE)
+    {
+        if (is_file)
+            value = erase_file (tctx, ctx, src_vpath);
+        else
+            value = erase_dir (tctx, ctx, src_vpath);
+    }
+    else
+    {
+        char *temp;
+
+        src = vfs_path_as_str (src_vpath);
+
+        temp = build_dest (ctx, src, dest, &value);
+        if (temp != NULL)
+        {
+            dest = temp;
+
+            switch (ctx->operation)
+            {
+            case OP_COPY:
+                /* we use file_mask_op_follow_links only with OP_COPY */
+                ctx->stat_func (src_vpath, src_stat);
+                is_file = !S_ISDIR (src_stat->st_mode);
+
+                if (is_file)
+                    value = copy_file_file (tctx, ctx, src, dest);
+                else
+                    value = copy_dir_dir (tctx, ctx, src, dest, TRUE, FALSE, FALSE, NULL);
+                dest_dirs = free_linklist (dest_dirs);
+                break;
+
+            case OP_MOVE:
+                if (is_file)
+                    value = move_file_file (NULL, tctx, ctx, src, dest);
+                else
+                    value = do_move_dir_dir (NULL, tctx, ctx, src, dest);
+                break;
+
+            default:
+                /* Unknown file operation */
+                abort ();
+            }
+
+            g_free (temp);
+        }
+    }
+
+    vfs_path_free (src_vpath, TRUE);
+
+    return value;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_BACKGROUND
+static int
+end_bg_process (file_op_context_t * ctx, enum OperationMode mode)
+{
+    int pid = ctx->pid;
+
+    (void) mode;
+    ctx->pid = 0;
+
+    unregister_task_with_pid (pid);
+    /*     file_op_context_destroy(ctx); */
+    return 1;
+}
+#endif
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* Is file symlink to directory or not.
+ *
+ * @param path file or directory
+ * @param st result of mc_lstat(vpath). If NULL, mc_lstat(vpath) is performed here
+ * @param stale_link TRUE if file is stale link to directory
+ *
+ * @return TRUE if file symlink to directory, ELSE otherwise.
+ */
+gboolean
+file_is_symlink_to_dir (const vfs_path_t * vpath, struct stat * st, gboolean * stale_link)
+{
+    struct stat st2;
+    gboolean stale = FALSE;
+    gboolean res = FALSE;
+
+    if (st == NULL)
+    {
+        st = &st2;
+
+        if (mc_lstat (vpath, st) != 0)
+            goto ret;
+    }
+
+    if (S_ISLNK (st->st_mode))
+    {
+        struct stat st3;
+
+        stale = (mc_stat (vpath, &st3) != 0);
+
+        if (!stale)
+            res = (S_ISDIR (st3.st_mode) != 0);
+    }
+
+  ret:
+    if (stale_link != NULL)
+        *stale_link = stale;
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+FileProgressStatus
+copy_file_file (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                const char *src_path, const char *dst_path)
+{
+    uid_t src_uid = (uid_t) (-1);
+    gid_t src_gid = (gid_t) (-1);
+
+    int src_desc, dest_desc = -1;
+    mode_t src_mode = 0;        /* The mode of the source file */
+    struct stat src_stat, dst_stat;
+    mc_timesbuf_t times;
+    gboolean dst_exists = FALSE, appending = FALSE;
+    off_t file_size = -1;
+    FileProgressStatus return_status, temp_status;
+    gint64 tv_transfer_start;
+    dest_status_t dst_status = DEST_NONE;
+    int open_flags;
+    vfs_path_t *src_vpath = NULL, *dst_vpath = NULL;
+    char *buf = NULL;
+
+    /* FIXME: We should not be using global variables! */
+    ctx->do_reget = 0;
+    return_status = FILE_RETRY;
+
+    dst_vpath = vfs_path_from_str (dst_path);
+    src_vpath = vfs_path_from_str (src_path);
+
+    file_progress_show_source (ctx, src_vpath);
+    file_progress_show_target (ctx, dst_vpath);
+
+    if (check_progress_buttons (ctx) == FILE_ABORT)
+    {
+        return_status = FILE_ABORT;
+        goto ret_fast;
+    }
+
+    mc_refresh ();
+
+    while (mc_stat (dst_vpath, &dst_stat) == 0)
+    {
+        if (S_ISDIR (dst_stat.st_mode))
+        {
+            if (ctx->skip_all)
+                return_status = FILE_SKIPALL;
+            else
+            {
+                return_status =
+                    file_error (TRUE, _("Cannot overwrite directory \"%s\"\n%s"), dst_path);
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                if (return_status == FILE_RETRY)
+                    continue;
+            }
+            goto ret_fast;
+        }
+
+        dst_exists = TRUE;
+        break;
+    }
+
+    while ((*ctx->stat_func) (src_vpath, &src_stat) != 0)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot stat source file \"%s\"\n%s"), src_path);
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+        }
+
+        if (return_status != FILE_RETRY)
+            goto ret_fast;
+    }
+
+    if (dst_exists)
+    {
+        /* Destination already exists */
+        if (check_same_file (src_path, &src_stat, dst_path, &dst_stat, &return_status))
+            goto ret_fast;
+
+        /* Should we replace destination? */
+        if (tctx->ask_overwrite)
+        {
+            ctx->do_reget = 0;
+            return_status = query_replace (ctx, src_path, &src_stat, dst_path, &dst_stat);
+            if (return_status != FILE_CONT)
+                goto ret_fast;
+        }
+    }
+
+    get_times (&src_stat, &times);
+
+    if (!ctx->do_append)
+    {
+        /* Check the hardlinks */
+        if (!ctx->follow_links)
+        {
+            switch (check_hardlinks (src_vpath, &src_stat, dst_vpath, &ctx->skip_all))
+            {
+            case HARDLINK_OK:
+                /* We have made a hardlink - no more processing is necessary */
+                return_status = FILE_CONT;
+                goto ret_fast;
+
+            case HARDLINK_ABORT:
+                return_status = FILE_ABORT;
+                goto ret_fast;
+
+            default:
+                break;
+            }
+        }
+
+        if (S_ISLNK (src_stat.st_mode))
+        {
+            return_status = make_symlink (ctx, src_vpath, dst_vpath);
+            if (return_status == FILE_CONT && ctx->preserve)
+                mc_utime (dst_vpath, &times);
+            goto ret_fast;
+        }
+
+        if (S_ISCHR (src_stat.st_mode) || S_ISBLK (src_stat.st_mode) || S_ISFIFO (src_stat.st_mode)
+            || S_ISNAM (src_stat.st_mode) || S_ISSOCK (src_stat.st_mode))
+        {
+            dev_t rdev = 0;
+
+#ifdef HAVE_STRUCT_STAT_ST_RDEV
+            rdev = src_stat.st_rdev;
+#endif
+
+            while (mc_mknod (dst_vpath, src_stat.st_mode & ctx->umask_kill, rdev) < 0
+                   && !ctx->skip_all)
+            {
+                return_status =
+                    file_error (TRUE, _("Cannot create special file \"%s\"\n%s"), dst_path);
+                if (return_status == FILE_RETRY)
+                    continue;
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                goto ret_fast;
+            }
+            /* Success */
+
+            while (ctx->preserve_uidgid
+                   && mc_chown (dst_vpath, src_stat.st_uid, src_stat.st_gid) != 0 && !ctx->skip_all)
+            {
+                temp_status = file_error (TRUE, _("Cannot chown target file \"%s\"\n%s"), dst_path);
+                if (temp_status == FILE_SKIP)
+                    break;
+                if (temp_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                if (temp_status != FILE_RETRY)
+                {
+                    return_status = temp_status;
+                    goto ret_fast;
+                }
+            }
+
+            while (ctx->preserve && mc_chmod (dst_vpath, src_stat.st_mode & ctx->umask_kill) != 0
+                   && !ctx->skip_all)
+            {
+                temp_status = file_error (TRUE, _("Cannot chmod target file \"%s\"\n%s"), dst_path);
+                if (temp_status == FILE_SKIP)
+                    break;
+                if (temp_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                if (temp_status != FILE_RETRY)
+                {
+                    return_status = temp_status;
+                    goto ret_fast;
+                }
+            }
+
+            return_status = FILE_CONT;
+            mc_utime (dst_vpath, &times);
+            goto ret_fast;
+        }
+    }
+
+    tv_transfer_start = g_get_monotonic_time ();
+
+    while ((src_desc = mc_open (src_vpath, O_RDONLY | O_LINEAR)) < 0 && !ctx->skip_all)
+    {
+        return_status = file_error (TRUE, _("Cannot open source file \"%s\"\n%s"), src_path);
+        if (return_status == FILE_RETRY)
+            continue;
+        if (return_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        if (return_status == FILE_SKIP)
+            break;
+        ctx->do_append = FALSE;
+        goto ret_fast;
+    }
+
+    if (ctx->do_reget != 0 && mc_lseek (src_desc, ctx->do_reget, SEEK_SET) != ctx->do_reget)
+    {
+        message (D_ERROR, _("Warning"), _("Reget failed, about to overwrite file"));
+        ctx->do_reget = 0;
+        ctx->do_append = FALSE;
+    }
+
+    while (mc_fstat (src_desc, &src_stat) != 0)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot fstat source file \"%s\"\n%s"), src_path);
+            if (return_status == FILE_RETRY)
+                continue;
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+            ctx->do_append = FALSE;
+        }
+        goto ret;
+    }
+
+    src_mode = src_stat.st_mode;
+    src_uid = src_stat.st_uid;
+    src_gid = src_stat.st_gid;
+    file_size = src_stat.st_size;
+
+    open_flags = O_WRONLY;
+    if (!dst_exists)
+        open_flags |= O_CREAT | O_EXCL;
+    else if (ctx->do_append)
+        open_flags |= O_APPEND;
+    else
+        open_flags |= O_CREAT | O_TRUNC;
+
+    while ((dest_desc = mc_open (dst_vpath, open_flags, src_mode)) < 0)
+    {
+        if (errno != EEXIST)
+        {
+            if (ctx->skip_all)
+                return_status = FILE_SKIPALL;
+            else
+            {
+                return_status =
+                    file_error (TRUE, _("Cannot create target file \"%s\"\n%s"), dst_path);
+                if (return_status == FILE_RETRY)
+                    continue;
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                ctx->do_append = FALSE;
+            }
+        }
+        goto ret;
+    }
+
+    /* file opened, but not fully copied */
+    dst_status = DEST_SHORT_QUERY;
+
+    appending = ctx->do_append;
+    ctx->do_append = FALSE;
+
+    /* Try clone the file first. */
+    if (vfs_clone_file (dest_desc, src_desc) == 0)
+    {
+        dst_status = DEST_FULL;
+        return_status = FILE_CONT;
+        goto ret;
+    }
+
+    /* Find out the optimal buffer size.  */
+    while (mc_fstat (dest_desc, &dst_stat) != 0)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot fstat target file \"%s\"\n%s"), dst_path);
+            if (return_status == FILE_RETRY)
+                continue;
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+        }
+        goto ret;
+    }
+
+    /* try preallocate space; if fail, try copy anyway */
+    while (mc_global.vfs.preallocate_space &&
+           vfs_preallocate (dest_desc, file_size, appending ? dst_stat.st_size : 0) != 0)
+    {
+        if (ctx->skip_all)
+        {
+            /* cannot allocate, start the file copying anyway */
+            return_status = FILE_CONT;
+            break;
+        }
+
+        return_status =
+            file_error (TRUE, _("Cannot preallocate space for target file \"%s\"\n%s"), dst_path);
+
+        if (return_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+
+        if (ctx->skip_all || return_status == FILE_SKIP)
+        {
+            /* skip the space allocation error, start file copying */
+            return_status = FILE_CONT;
+            break;
+        }
+
+        if (return_status == FILE_ABORT)
+        {
+            mc_close (dest_desc);
+            dest_desc = -1;
+            mc_unlink (dst_vpath);
+            dst_status = DEST_NONE;
+            goto ret;
+        }
+
+        /* return_status == FILE_RETRY -- try allocate space again */
+    }
+
+    ctx->eta_secs = 0.0;
+    ctx->bps = 0;
+
+    if (tctx->bps == 0 || (file_size / tctx->bps) > FILEOP_UPDATE_INTERVAL)
+        file_progress_show (ctx, 0, file_size, "", TRUE);
+    else
+        file_progress_show (ctx, 1, 1, "", TRUE);
+    return_status = check_progress_buttons (ctx);
+    mc_refresh ();
+
+    if (return_status == FILE_CONT)
+    {
+        size_t bufsize;
+        off_t file_part = 0;
+        gint64 tv_current, tv_last_update;
+        gint64 tv_last_input = 0;
+        gint64 usecs, update_usecs;
+        const char *stalled_msg = "";
+        gboolean is_first_time = TRUE;
+
+        tv_last_update = tv_transfer_start;
+
+        bufsize = io_blksize (dst_stat);
+        buf = g_malloc (bufsize);
+
+        while (TRUE)
+        {
+            ssize_t n_read = -1, n_written;
+            gboolean force_update;
+
+            /* src_read */
+            if (mc_ctl (src_desc, VFS_CTL_IS_NOTREADY, 0) == 0)
+                while ((n_read = mc_read (src_desc, buf, bufsize)) < 0 && !ctx->skip_all)
+                {
+                    return_status =
+                        file_error (TRUE, _("Cannot read source file \"%s\"\n%s"), src_path);
+                    if (return_status == FILE_RETRY)
+                        continue;
+                    if (return_status == FILE_SKIPALL)
+                        ctx->skip_all = TRUE;
+                    goto ret;
+                }
+
+            if (n_read == 0)
+                break;
+
+            tv_current = g_get_monotonic_time ();
+
+            if (n_read > 0)
+            {
+                char *t = buf;
+
+                file_part += n_read;
+
+                tv_last_input = tv_current;
+
+                /* dst_write */
+                while ((n_written = mc_write (dest_desc, t, (size_t) n_read)) < n_read)
+                {
+                    gboolean write_errno_nospace;
+
+                    if (n_written > 0)
+                    {
+                        n_read -= n_written;
+                        t += n_written;
+                        continue;
+                    }
+
+                    write_errno_nospace = (n_written < 0 && errno == ENOSPC);
+
+                    if (ctx->skip_all)
+                        return_status = FILE_SKIPALL;
+                    else
+                        return_status =
+                            file_error (TRUE, _("Cannot write target file \"%s\"\n%s"), dst_path);
+
+                    if (return_status == FILE_SKIP)
+                    {
+                        if (write_errno_nospace)
+                            goto ret;
+                        break;
+                    }
+                    if (return_status == FILE_SKIPALL)
+                    {
+                        ctx->skip_all = TRUE;
+                        if (write_errno_nospace)
+                            goto ret;
+                    }
+                    if (return_status != FILE_RETRY)
+                        goto ret;
+                }
+            }
+
+            tctx->copied_bytes = tctx->progress_bytes + file_part + ctx->do_reget;
+
+            usecs = tv_current - tv_last_update;
+            update_usecs = tv_current - tv_last_input;
+
+            if (is_first_time || usecs > FILEOP_UPDATE_INTERVAL_US)
+            {
+                copy_file_file_display_progress (tctx, ctx, tv_current, tv_transfer_start,
+                                                 file_size, file_part);
+                tv_last_update = tv_current;
+            }
+
+            is_first_time = FALSE;
+
+            if (update_usecs > FILEOP_STALLING_INTERVAL_US)
+                stalled_msg = _("(stalled)");
+
+            force_update = (tv_current - tctx->transfer_start) > FILEOP_UPDATE_INTERVAL_US;
+
+            if (verbose && ctx->dialog_type == FILEGUI_DIALOG_MULTI_ITEM)
+            {
+                file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+                file_progress_show_total (tctx, ctx, tctx->copied_bytes, force_update);
+            }
+
+            file_progress_show (ctx, file_part + ctx->do_reget, file_size, stalled_msg,
+                                force_update);
+            mc_refresh ();
+
+            return_status = check_progress_buttons (ctx);
+            if (return_status != FILE_CONT)
+            {
+                int query_res;
+
+                query_res =
+                    query_dialog (Q_ ("DialogTitle|Copy"),
+                                  _("Incomplete file was retrieved"), D_ERROR, 3,
+                                  _("&Delete"), _("&Keep"), _("&Continue copy"));
+
+                switch (query_res)
+                {
+                case 0:
+                    /* delete */
+                    dst_status = DEST_SHORT_DELETE;
+                    goto ret;
+
+                case 1:
+                    /* keep */
+                    dst_status = DEST_SHORT_KEEP;
+                    goto ret;
+
+                default:
+                    /* continue copy */
+                    break;
+                }
+            }
+        }
+
+        /* copy successful */
+        dst_status = DEST_FULL;
+    }
+
+  ret:
+    g_free (buf);
+
+    rotate_dash (FALSE);
+    while (src_desc != -1 && mc_close (src_desc) < 0 && !ctx->skip_all)
+    {
+        temp_status = file_error (TRUE, _("Cannot close source file \"%s\"\n%s"), src_path);
+        if (temp_status == FILE_RETRY)
+            continue;
+        if (temp_status == FILE_ABORT)
+            return_status = temp_status;
+        if (temp_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        break;
+    }
+
+    while (dest_desc != -1 && mc_close (dest_desc) < 0 && !ctx->skip_all)
+    {
+        temp_status = file_error (TRUE, _("Cannot close target file \"%s\"\n%s"), dst_path);
+        if (temp_status == FILE_RETRY)
+            continue;
+        if (temp_status == FILE_SKIPALL)
+            ctx->skip_all = TRUE;
+        return_status = temp_status;
+        break;
+    }
+
+    if (dst_status == DEST_SHORT_QUERY)
+    {
+        /* Query to remove short file */
+        if (query_dialog (Q_ ("DialogTitle|Copy"), _("Incomplete file was retrieved"),
+                          D_ERROR, 2, _("&Delete"), _("&Keep")) == 0)
+            mc_unlink (dst_vpath);
+    }
+    else if (dst_status == DEST_SHORT_DELETE)
+        mc_unlink (dst_vpath);
+    else if (dst_status == DEST_FULL && !appending)
+    {
+        /* Copy has succeeded */
+
+        while (ctx->preserve_uidgid && mc_chown (dst_vpath, src_uid, src_gid) != 0
+               && !ctx->skip_all)
+        {
+            temp_status = file_error (TRUE, _("Cannot chown target file \"%s\"\n%s"), dst_path);
+            if (temp_status == FILE_RETRY)
+                continue;
+            if (temp_status == FILE_SKIPALL)
+            {
+                ctx->skip_all = TRUE;
+                return_status = FILE_CONT;
+            }
+            if (temp_status == FILE_SKIP)
+                return_status = FILE_CONT;
+            break;
+        }
+
+        while (ctx->preserve && mc_chmod (dst_vpath, (src_mode & ctx->umask_kill)) != 0
+               && !ctx->skip_all)
+        {
+            temp_status = file_error (TRUE, _("Cannot chmod target file \"%s\"\n%s"), dst_path);
+            if (temp_status == FILE_RETRY)
+                continue;
+            if (temp_status == FILE_SKIPALL)
+            {
+                ctx->skip_all = TRUE;
+                return_status = FILE_CONT;
+            }
+            if (temp_status == FILE_SKIP)
+                return_status = FILE_CONT;
+            break;
+        }
+
+        if (!ctx->preserve && !dst_exists)
+        {
+            src_mode = umask (-1);
+            umask (src_mode);
+            src_mode = 0100666 & ~src_mode;
+            mc_chmod (dst_vpath, (src_mode & ctx->umask_kill));
+        }
+
+        mc_utime (dst_vpath, &times);
+    }
+
+    if (return_status == FILE_CONT)
+        return_status = progress_update_one (tctx, ctx, file_size);
+
+  ret_fast:
+    vfs_path_free (src_vpath, TRUE);
+    vfs_path_free (dst_vpath, TRUE);
+    return return_status;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * I think these copy_*_* functions should have a return type.
+ * anyway, this function *must* have two directories as arguments.
+ */
+/* FIXME: This function needs to check the return values of the
+   function calls */
+
+FileProgressStatus
+copy_dir_dir (file_op_total_context_t * tctx, file_op_context_t * ctx, const char *s, const char *d,
+              gboolean toplevel, gboolean move_over, gboolean do_delete, GSList * parent_dirs)
+{
+    struct vfs_dirent *next;
+    struct stat dst_stat, src_stat;
+    DIR *reading;
+    FileProgressStatus return_status = FILE_CONT;
+    struct link *lp;
+    vfs_path_t *src_vpath, *dst_vpath;
+    gboolean do_mkdir = TRUE;
+
+    src_vpath = vfs_path_from_str (s);
+    dst_vpath = vfs_path_from_str (d);
+
+    /* First get the mode of the source dir */
+
+  retry_src_stat:
+    if ((*ctx->stat_func) (src_vpath, &src_stat) != 0)
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Cannot stat source directory \"%s\"\n%s"), s);
+            if (return_status == FILE_RETRY)
+                goto retry_src_stat;
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+        }
+        goto ret_fast;
+    }
+
+    if (is_in_linklist (dest_dirs, src_vpath, &src_stat) != NULL)
+    {
+        /* Don't copy a directory we created before (we don't want to copy
+           infinitely if a directory is copied into itself) */
+        /* FIXME: should there be an error message and FILE_SKIP? - Norbert */
+        return_status = FILE_CONT;
+        goto ret_fast;
+    }
+
+    /* Hmm, hardlink to directory??? - Norbert */
+    /* FIXME: In this step we should do something in case the destination already exist */
+    /* Check the hardlinks */
+    if (ctx->preserve)
+    {
+        switch (check_hardlinks (src_vpath, &src_stat, dst_vpath, &ctx->skip_all))
+        {
+        case HARDLINK_OK:
+            /* We have made a hardlink - no more processing is necessary */
+            goto ret_fast;
+
+        case HARDLINK_ABORT:
+            return_status = FILE_ABORT;
+            goto ret_fast;
+
+        default:
+            break;
+        }
+    }
+
+    if (!S_ISDIR (src_stat.st_mode))
+    {
+        if (ctx->skip_all)
+            return_status = FILE_SKIPALL;
+        else
+        {
+            return_status = file_error (TRUE, _("Source \"%s\" is not a directory\n%s"), s);
+            if (return_status == FILE_RETRY)
+                goto retry_src_stat;
+            if (return_status == FILE_SKIPALL)
+                ctx->skip_all = TRUE;
+        }
+        goto ret_fast;
+    }
+
+    if (is_in_linklist (parent_dirs, src_vpath, &src_stat) != NULL)
+    {
+        /* we found a cyclic symbolic link */
+        message (D_ERROR, MSG_ERROR, _("Cannot copy cyclic symbolic link\n\"%s\""), s);
+        return_status = FILE_SKIP;
+        goto ret_fast;
+    }
+
+    lp = g_new0 (struct link, 1);
+    lp->vfs = vfs_path_get_last_path_vfs (src_vpath);
+    lp->ino = src_stat.st_ino;
+    lp->dev = src_stat.st_dev;
+    parent_dirs = g_slist_prepend (parent_dirs, lp);
+
+  retry_dst_stat:
+    /* Now, check if the dest dir exists, if not, create it. */
+    if (mc_stat (dst_vpath, &dst_stat) != 0)
+    {
+        /* Here the dir doesn't exist : make it ! */
+        if (move_over && mc_rename (src_vpath, dst_vpath) == 0)
+        {
+            return_status = FILE_CONT;
+            goto ret;
+        }
+    }
+    else
+    {
+        /*
+         * If the destination directory exists, we want to copy the whole
+         * directory, but we only want this to happen once.
+         *
+         * Escape sequences added to the * to compiler warnings.
+         * so, say /bla exists, if we copy /tmp/\* to /bla, we get /bla/tmp/\*
+         * or ( /bla doesn't exist )       /tmp/\* to /bla     ->  /bla/\*
+         */
+        if (!S_ISDIR (dst_stat.st_mode))
+        {
+            if (ctx->skip_all)
+                return_status = FILE_SKIPALL;
+            else
+            {
+                return_status =
+                    file_error (TRUE, _("Destination \"%s\" must be a directory\n%s"), d);
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+                if (return_status == FILE_RETRY)
+                    goto retry_dst_stat;
+            }
+            goto ret;
+        }
+        /* Dive into subdir if exists */
+        if (toplevel && ctx->dive_into_subdirs)
+        {
+            vfs_path_t *tmp;
+
+            tmp = dst_vpath;
+            dst_vpath = vfs_path_append_new (dst_vpath, x_basename (s), (char *) NULL);
+            vfs_path_free (tmp, TRUE);
+
+        }
+        else
+            do_mkdir = FALSE;
+    }
+
+    d = vfs_path_as_str (dst_vpath);
+
+    if (do_mkdir)
+    {
+        while (my_mkdir (dst_vpath, (src_stat.st_mode & ctx->umask_kill) | S_IRWXU) != 0)
+        {
+            if (ctx->skip_all)
+                return_status = FILE_SKIPALL;
+            else
+            {
+                return_status =
+                    file_error (TRUE, _("Cannot create target directory \"%s\"\n%s"), d);
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+            }
+            if (return_status != FILE_RETRY)
+                goto ret;
+        }
+
+        lp = g_new0 (struct link, 1);
+        mc_stat (dst_vpath, &dst_stat);
+        lp->vfs = vfs_path_get_last_path_vfs (dst_vpath);
+        lp->ino = dst_stat.st_ino;
+        lp->dev = dst_stat.st_dev;
+        dest_dirs = g_slist_prepend (dest_dirs, lp);
+    }
+
+    if (ctx->preserve_uidgid)
+    {
+        while (mc_chown (dst_vpath, src_stat.st_uid, src_stat.st_gid) != 0)
+        {
+            if (ctx->skip_all)
+                return_status = FILE_SKIPALL;
+            else
+            {
+                return_status = file_error (TRUE, _("Cannot chown target directory \"%s\"\n%s"), d);
+                if (return_status == FILE_SKIPALL)
+                    ctx->skip_all = TRUE;
+            }
+            if (return_status != FILE_RETRY)
+                goto ret;
+        }
+    }
+
+    /* open the source dir for reading */
+    reading = mc_opendir (src_vpath);
+    if (reading == NULL)
+        goto ret;
+
+    while ((next = mc_readdir (reading)) && return_status != FILE_ABORT)
+    {
+        char *path;
+        vfs_path_t *tmp_vpath;
+
+        /*
+         * Now, we don't want '.' and '..' to be created / copied at any time
+         */
+        if (DIR_IS_DOT (next->d_name) || DIR_IS_DOTDOT (next->d_name))
+            continue;
+
+        /* get the filename and add it to the src directory */
+        path = mc_build_filename (s, next->d_name, (char *) NULL);
+        tmp_vpath = vfs_path_from_str (path);
+
+        (*ctx->stat_func) (tmp_vpath, &dst_stat);
+        if (S_ISDIR (dst_stat.st_mode))
+        {
+            char *mdpath;
+
+            mdpath = mc_build_filename (d, next->d_name, (char *) NULL);
+            /*
+             * From here, we just intend to recursively copy subdirs, not
+             * the double functionality of copying different when the target
+             * dir already exists. So, we give the recursive call the flag 0
+             * meaning no toplevel.
+             */
+            return_status =
+                copy_dir_dir (tctx, ctx, path, mdpath, FALSE, FALSE, do_delete, parent_dirs);
+            g_free (mdpath);
+        }
+        else
+        {
+            char *dest_file;
+
+            dest_file = mc_build_filename (d, x_basename (path), (char *) NULL);
+            return_status = copy_file_file (tctx, ctx, path, dest_file);
+            g_free (dest_file);
+        }
+
+        g_free (path);
+
+        if (do_delete && return_status == FILE_CONT)
+        {
+            if (ctx->erase_at_end)
+            {
+                if (erase_list == NULL)
+                    erase_list = g_queue_new ();
+
+                lp = g_new0 (struct link, 1);
+                lp->src_vpath = tmp_vpath;
+                lp->st_mode = dst_stat.st_mode;
+                g_queue_push_tail (erase_list, lp);
+                tmp_vpath = NULL;
+            }
+            else if (S_ISDIR (dst_stat.st_mode))
+                return_status = erase_dir_iff_empty (ctx, tmp_vpath, tctx->progress_count);
+            else
+                return_status = erase_file (tctx, ctx, tmp_vpath);
+        }
+        vfs_path_free (tmp_vpath, TRUE);
+    }
+    mc_closedir (reading);
+
+    if (ctx->preserve)
+    {
+        mc_timesbuf_t times;
+
+        mc_chmod (dst_vpath, src_stat.st_mode & ctx->umask_kill);
+        get_times (&src_stat, &times);
+        mc_utime (dst_vpath, &times);
+    }
+    else
+    {
+        src_stat.st_mode = umask (-1);
+        umask (src_stat.st_mode);
+        src_stat.st_mode = 0100777 & ~src_stat.st_mode;
+        mc_chmod (dst_vpath, src_stat.st_mode & ctx->umask_kill);
+    }
+
+  ret:
+    free_link (parent_dirs->data);
+    g_slist_free_1 (parent_dirs);
+  ret_fast:
+    vfs_path_free (src_vpath, TRUE);
+    vfs_path_free (dst_vpath, TRUE);
+    return return_status;
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Move routines */
+
+FileProgressStatus
+move_dir_dir (file_op_total_context_t * tctx, file_op_context_t * ctx, const char *s, const char *d)
+{
+    return do_move_dir_dir (NULL, tctx, ctx, s, d);
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Erase routines */
+
+FileProgressStatus
+erase_dir (file_op_total_context_t * tctx, file_op_context_t * ctx, const vfs_path_t * vpath)
+{
+    file_progress_show_deleting (ctx, vfs_path_as_str (vpath), NULL);
+    file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+    if (check_progress_buttons (ctx) == FILE_ABORT)
+        return FILE_ABORT;
+
+    mc_refresh ();
+
+    /* The old way to detect a non empty directory was:
+       error = my_rmdir (s);
+       if (error && (errno == ENOTEMPTY || errno == EEXIST))){
+       For the linux user space nfs server (nfs-server-2.2beta29-2)
+       we would have to check also for EIO. I hope the new way is
+       fool proof. (Norbert)
+     */
+    if (check_dir_is_empty (vpath) == 0)
+    {                           /* not empty */
+        FileProgressStatus error;
+
+        error = query_recursive (ctx, vfs_path_as_str (vpath));
+        if (error == FILE_CONT)
+            error = recursive_erase (tctx, ctx, vpath);
+        return error;
+    }
+
+    return try_erase_dir (ctx, vfs_path_as_str (vpath));
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Panel operate routines */
+
+void
+dirsize_status_init_cb (status_msg_t * sm)
+{
+    dirsize_status_msg_t *dsm = (dirsize_status_msg_t *) sm;
+    WGroup *gd = GROUP (sm->dlg);
+    Widget *wd = WIDGET (sm->dlg);
+    WRect r = wd->rect;
+
+    const char *b1_name = N_("&Abort");
+    const char *b2_name = N_("&Skip");
+    int b_width, ui_width;
+
+#ifdef ENABLE_NLS
+    b1_name = _(b1_name);
+    b2_name = _(b2_name);
+#endif
+
+    b_width = str_term_width1 (b1_name) + 4;
+    if (dsm->allow_skip)
+        b_width += str_term_width1 (b2_name) + 4 + 1;
+
+    ui_width = MAX (COLS / 2, b_width + 6);
+    dsm->dirname = label_new (2, 3, NULL);
+    group_add_widget (gd, dsm->dirname);
+    dsm->count_size = label_new (3, 3, NULL);
+    group_add_widget (gd, dsm->count_size);
+    group_add_widget (gd, hline_new (4, -1, -1));
+
+    dsm->abort_button = WIDGET (button_new (5, 3, FILE_ABORT, NORMAL_BUTTON, b1_name, NULL));
+    group_add_widget (gd, dsm->abort_button);
+    if (dsm->allow_skip)
+    {
+        dsm->skip_button = WIDGET (button_new (5, 3, FILE_SKIP, NORMAL_BUTTON, b2_name, NULL));
+        group_add_widget (gd, dsm->skip_button);
+        widget_select (dsm->skip_button);
+    }
+
+    r.lines = 8;
+    r.cols = ui_width;
+    widget_set_size_rect (wd, &r);
+    dirsize_status_locate_buttons (dsm);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+dirsize_status_update_cb (status_msg_t * sm)
+{
+    dirsize_status_msg_t *dsm = (dirsize_status_msg_t *) sm;
+    Widget *wd = WIDGET (sm->dlg);
+    WRect r = wd->rect;
+
+    /* update second (longer label) */
+    label_set_textv (dsm->count_size, _("Directories: %zu, total size: %s"),
+                     dsm->dir_count, size_trunc_sep (dsm->total_size, panels_options.kilobyte_si));
+
+    /* enlarge dialog if required */
+    if (WIDGET (dsm->count_size)->rect.cols + 6 > r.cols)
+    {
+        r.cols = WIDGET (dsm->count_size)->rect.cols + 6;
+        widget_set_size_rect (wd, &r);
+        dirsize_status_locate_buttons (dsm);
+        widget_draw (wd);
+        /* TODO: ret rid of double redraw */
+    }
+
+    /* adjust first label */
+    label_set_text (dsm->dirname,
+                    str_trunc (vfs_path_as_str (dsm->dirname_vpath), wd->rect.cols - 6));
+
+    switch (status_msg_common_update (sm))
+    {
+    case B_CANCEL:
+    case FILE_ABORT:
+        return FILE_ABORT;
+    case FILE_SKIP:
+        return FILE_SKIP;
+    default:
+        return FILE_CONT;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+dirsize_status_deinit_cb (status_msg_t * sm)
+{
+    (void) sm;
+
+    /* schedule to update passive panel */
+    if (get_other_type () == view_listing)
+        other_panel->dirty = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * compute_dir_size:
+ *
+ * Computes the number of bytes used by the files in a directory
+ */
+
+FileProgressStatus
+compute_dir_size (const vfs_path_t * dirname_vpath, dirsize_status_msg_t * sm,
+                  size_t * ret_dir_count, size_t * ret_marked_count, uintmax_t * ret_total,
+                  gboolean follow_symlinks)
+{
+    return do_compute_dir_size (dirname_vpath, sm, ret_dir_count, ret_marked_count, ret_total,
+                                follow_symlinks ? mc_stat : mc_lstat);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * panel_operate:
+ *
+ * Performs one of the operations on the current on the source_panel
+ * (copy, delete, move).
+ *
+ * Returns TRUE if did change the directory
+ * structure, Returns FALSE if user aborted
+ *
+ * force_single forces operation on the current entry and affects
+ * default destination.  Current filename is used as default.
+ */
+
+gboolean
+panel_operate (void *source_panel, FileOperation operation, gboolean force_single)
+{
+    WPanel *panel = PANEL (source_panel);
+    const gboolean single_entry = force_single || (panel->marked <= 1)
+        || (get_current_type () == view_tree);
+
+    const char *source = NULL;
+    char *dest = NULL;
+    vfs_path_t *dest_vpath = NULL;
+    vfs_path_t *save_cwd = NULL, *save_dest = NULL;
+    struct stat src_stat;
+    gboolean ret_val = TRUE;
+    int i;
+    FileProgressStatus value;
+    file_op_context_t *ctx;
+    file_op_total_context_t *tctx;
+    filegui_dialog_type_t dialog_type = FILEGUI_DIALOG_ONE_ITEM;
+
+    gboolean do_bg = FALSE;     /* do background operation? */
+
+    static gboolean i18n_flag = FALSE;
+    if (!i18n_flag)
+    {
+        for (i = G_N_ELEMENTS (op_names); i-- != 0;)
+            op_names[i] = Q_ (op_names[i]);
+        i18n_flag = TRUE;
+    }
+
+    linklist = free_linklist (linklist);
+    dest_dirs = free_linklist (dest_dirs);
+
+    save_cwds_stat ();
+
+    if (single_entry)
+    {
+        source = check_single_entry (panel, force_single, &src_stat);
+
+        if (source == NULL)
+            return FALSE;
+    }
+
+    ctx = file_op_context_new (operation);
+
+    /* Show confirmation dialog */
+    if (operation != OP_DELETE)
+    {
+        dest = do_confirm_copy_move (panel, force_single, source, &src_stat, ctx, &do_bg);
+        if (dest == NULL)
+        {
+            ret_val = FALSE;
+            goto ret_fast;
+        }
+
+        dest_vpath = vfs_path_from_str (dest);
+    }
+    else if (confirm_delete && !do_confirm_erase (panel, source, &src_stat))
+    {
+        ret_val = FALSE;
+        goto ret_fast;
+    }
+
+    tctx = file_op_total_context_new ();
+    tctx->transfer_start = g_get_monotonic_time ();
+
+#ifdef ENABLE_BACKGROUND
+    /* Did the user select to do a background operation? */
+    if (do_bg)
+    {
+        int v;
+
+        v = do_background (ctx,
+                           g_strconcat (op_names[operation], ": ",
+                                        vfs_path_as_str (panel->cwd_vpath), (char *) NULL));
+        if (v == -1)
+            message (D_ERROR, MSG_ERROR, _("Sorry, I could not put the job in background"));
+
+        /* If we are the parent */
+        if (v == 1)
+        {
+            mc_setctl (panel->cwd_vpath, VFS_SETCTL_FORGET, NULL);
+
+            mc_setctl (dest_vpath, VFS_SETCTL_FORGET, NULL);
+            vfs_path_free (dest_vpath, TRUE);
+            g_free (dest);
+            /*          file_op_context_destroy (ctx); */
+            return FALSE;
+        }
+    }
+    else
+#endif /* ENABLE_BACKGROUND */
+    {
+        if (operation == OP_DELETE)
+            dialog_type = FILEGUI_DIALOG_DELETE_ITEM;
+        else if (single_entry && S_ISDIR (panel_current_entry (panel)->st.st_mode))
+            dialog_type = FILEGUI_DIALOG_MULTI_ITEM;
+        else if (single_entry || force_single)
+            dialog_type = FILEGUI_DIALOG_ONE_ITEM;
+        else
+            dialog_type = FILEGUI_DIALOG_MULTI_ITEM;
+    }
+
+    /* Initialize things */
+    /* We do not want to trash cache every time file is
+       created/touched. However, this will make our cache contain
+       invalid data. */
+    if ((dest != NULL)
+        && (mc_setctl (dest_vpath, VFS_SETCTL_STALE_DATA, GUINT_TO_POINTER (1)) != 0))
+        save_dest = vfs_path_from_str (dest);
+
+    if ((vfs_path_tokens_count (panel->cwd_vpath) != 0)
+        && (mc_setctl (panel->cwd_vpath, VFS_SETCTL_STALE_DATA, GUINT_TO_POINTER (1)) != 0))
+        save_cwd = vfs_path_clone (panel->cwd_vpath);
+
+    /* Now, let's do the job */
+
+    /* This code is only called by the tree and panel code */
+    if (single_entry)
+    {
+        /* We now have ETA in all cases */
+
+        /* One file: FIXME mc_chdir will take user out of any vfs */
+        if ((operation != OP_COPY) && (get_current_type () == view_tree))
+        {
+            vfs_path_t *vpath;
+            int chdir_retcode;
+
+            vpath = vfs_path_from_str (PATH_SEP_STR);
+            chdir_retcode = mc_chdir (vpath);
+            vfs_path_free (vpath, TRUE);
+            if (chdir_retcode < 0)
+            {
+                ret_val = FALSE;
+                goto clean_up;
+            }
+        }
+
+        value = operate_single_file (panel, tctx, ctx, source, &src_stat, dest, dialog_type);
+        if ((value == FILE_CONT) && !force_single)
+            unmark_files (panel);
+    }
+    else
+    {
+        /* Many files */
+
+        /* Check destination for copy or move operation */
+        while (operation != OP_DELETE)
+        {
+            int dst_result;
+            struct stat dst_stat;
+
+            dst_result = mc_stat (dest_vpath, &dst_stat);
+
+            if ((dst_result != 0) || S_ISDIR (dst_stat.st_mode))
+                break;
+
+            if (ctx->skip_all
+                || file_error (TRUE, _("Destination \"%s\" must be a directory\n%s"),
+                               dest) != FILE_RETRY)
+                goto clean_up;
+        }
+
+        /* TODO: the good way is required to skip directories scanning in case of rename/move
+         * of several directories. Since reqular expression can be used for destination,
+         * some directory movements can be a cross-filesystem and directory scanning is useful
+         * for those directories only. */
+
+        if (panel_operate_init_totals (panel, NULL, NULL, ctx, file_op_compute_totals, dialog_type)
+            == FILE_CONT)
+        {
+            /* Loop for every file, perform the actual copy operation */
+            for (i = 0; i < panel->dir.len; i++)
+            {
+                const char *source2;
+
+                if (panel->dir.list[i].f.marked == 0)
+                    continue;   /* Skip the unmarked ones */
+
+                source2 = panel->dir.list[i].fname->str;
+                src_stat = panel->dir.list[i].st;
+
+                value = operate_one_file (panel, tctx, ctx, source2, &src_stat, dest);
+
+                if (value == FILE_ABORT)
+                    break;
+
+                if (value == FILE_CONT)
+                    do_file_mark (panel, i, 0);
+
+                if (verbose && ctx->dialog_type == FILEGUI_DIALOG_MULTI_ITEM)
+                {
+                    file_progress_show_count (ctx, tctx->progress_count, ctx->progress_count);
+                    file_progress_show_total (tctx, ctx, tctx->progress_bytes, FALSE);
+                }
+
+                if (operation != OP_DELETE)
+                    file_progress_show (ctx, 0, 0, "", FALSE);
+
+                if (check_progress_buttons (ctx) == FILE_ABORT)
+                    break;
+
+                mc_refresh ();
+            }                   /* Loop for every file */
+        }
+    }                           /* Many entries */
+
+  clean_up:
+    /* Clean up */
+    if (save_cwd != NULL)
+    {
+        mc_setctl (save_cwd, VFS_SETCTL_STALE_DATA, NULL);
+        vfs_path_free (save_cwd, TRUE);
+    }
+
+    if (save_dest != NULL)
+    {
+        mc_setctl (save_dest, VFS_SETCTL_STALE_DATA, NULL);
+        vfs_path_free (save_dest, TRUE);
+    }
+
+    linklist = free_linklist (linklist);
+    dest_dirs = free_linklist (dest_dirs);
+    g_free (dest);
+    vfs_path_free (dest_vpath, TRUE);
+    MC_PTR_FREE (ctx->dest_mask);
+
+#ifdef ENABLE_BACKGROUND
+    /* Let our parent know we are saying bye bye */
+    if (mc_global.we_are_background)
+    {
+        int cur_pid = getpid ();
+        /* Send pid to parent with child context, it is fork and
+           don't modify real parent ctx */
+        ctx->pid = cur_pid;
+        parent_call ((void *) end_bg_process, ctx, 0);
+
+        vfs_shut ();
+        my_exit (EXIT_SUCCESS);
+    }
+#endif /* ENABLE_BACKGROUND */
+
+    file_op_total_context_destroy (tctx);
+  ret_fast:
+    file_op_context_destroy (ctx);
+
+    update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+    repaint_screen ();
+
+    return ret_val;
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ Query/status report routines */
+/** Report error with one file */
+FileProgressStatus
+file_error (gboolean allow_retry, const char *format, const char *file)
+{
+    char buf[BUF_MEDIUM];
+
+    g_snprintf (buf, sizeof (buf), format, path_trunc (file, 30), unix_error_string (errno));
+
+    return do_file_error (allow_retry, buf);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/*
+   Cause emacs to enter folding mode for this file:
+   Local variables:
+   end:
+ */
diff --git a/src/filemanager/file.h b/src/filemanager/file.h
new file mode 100644
index 0000000..ae12e15
--- /dev/null
+++ b/src/filemanager/file.h
@@ -0,0 +1,72 @@
+/** \file  file.h
+ *  \brief Header: File and directory operation routines
+ */
+
+#ifndef MC__FILE_H
+#define MC__FILE_H
+
+#include <inttypes.h>           /* off_t, uintmax_t */
+
+#include "lib/global.h"
+#include "lib/widget.h"
+
+#include "fileopctx.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+typedef struct dirsize_status_msg_t dirsize_status_msg_t;
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/* status dialog of directory size computing */
+struct dirsize_status_msg_t
+{
+    status_msg_t status_msg;    /* base class */
+
+    gboolean allow_skip;
+    WLabel *dirname;
+    WLabel *count_size;
+    Widget *abort_button;
+    Widget *skip_button;
+    const vfs_path_t *dirname_vpath;
+    size_t dir_count;
+    uintmax_t total_size;
+};
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+gboolean file_is_symlink_to_dir (const vfs_path_t * path, struct stat *st, gboolean * stale_link);
+
+FileProgressStatus copy_file_file (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                                   const char *src_path, const char *dst_path);
+FileProgressStatus move_dir_dir (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                                 const char *s, const char *d);
+FileProgressStatus copy_dir_dir (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                                 const char *s, const char *d,
+                                 gboolean toplevel, gboolean move_over, gboolean do_delete,
+                                 GSList * parent_dirs);
+FileProgressStatus erase_dir (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                              const vfs_path_t * vpath);
+
+gboolean panel_operate (void *source_panel, FileOperation op, gboolean force_single);
+
+/* Error reporting routines */
+
+/* Report error with one file */
+FileProgressStatus file_error (gboolean allow_retry, const char *format, const char *file);
+
+/* return value is FILE_CONT or FILE_ABORT */
+FileProgressStatus compute_dir_size (const vfs_path_t * dirname_vpath, dirsize_status_msg_t * sm,
+                                     size_t * ret_dir_count, size_t * ret_marked_count,
+                                     uintmax_t * ret_total, gboolean follow_symlinks);
+
+void dirsize_status_init_cb (status_msg_t * sm);
+int dirsize_status_update_cb (status_msg_t * sm);
+void dirsize_status_deinit_cb (status_msg_t * sm);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__FILE_H */
diff --git a/src/filemanager/filegui.c b/src/filemanager/filegui.c
new file mode 100644
index 0000000..abca598
--- /dev/null
+++ b/src/filemanager/filegui.c
@@ -0,0 +1,1498 @@
+/*
+   File management GUI for the text mode edition
+
+   The copy code was based in GNU's cp, and was written by:
+   Torbjorn Granlund, David MacKenzie, and Jim Meyering.
+
+   The move code was based in GNU's mv, and was written by:
+   Mike Parker and David MacKenzie.
+
+   Janne Kukonlehto added much error recovery to them for being used
+   in an interactive program.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1994, 1995
+   Fred Leeflang, 1994, 1995
+   Miguel de Icaza, 1994, 1995, 1996
+   Jakub Jelinek, 1995, 1996
+   Norbert Warmuth, 1997
+   Pavel Machek, 1998
+   Slava Zanko, 2009, 2010, 2011, 2012, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2009-2023
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/*
+ * Please note that all dialogs used here must be safe for background
+ * operations.
+ */
+
+/** \file  filegui.c
+ *  \brief Source: file management GUI for the text mode edition
+ */
+
+/* {{{ Include files */
+
+#include <config.h>
+
+#if ((defined STAT_STATVFS || defined STAT_STATVFS64)                                       \
+     && (defined HAVE_STRUCT_STATVFS_F_BASETYPE || defined HAVE_STRUCT_STATVFS_F_FSTYPENAME \
+         || (! defined HAVE_STRUCT_STATFS_F_FSTYPENAME)))
+#define USE_STATVFS 1
+#else
+#define USE_STATVFS 0
+#endif
+
+#include <errno.h>
+#include <ctype.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+
+#if USE_STATVFS
+#include <sys/statvfs.h>
+#elif defined HAVE_SYS_VFS_H
+#include <sys/vfs.h>
+#elif defined HAVE_SYS_MOUNT_H && defined HAVE_SYS_PARAM_H
+/* NOTE: freebsd5.0 needs sys/param.h and sys/mount.h for statfs.
+   It does have statvfs.h, but shouldn't use it, since it doesn't
+   HAVE_STRUCT_STATVFS_F_BASETYPE.  So find a clean way to fix it.  */
+/* NetBSD 1.5.2 needs these, for the declaration of struct statfs. */
+#include <sys/param.h>
+#include <sys/mount.h>
+#elif defined HAVE_OS_H         /* Haiku, also (obsolete) BeOS */
+#include <fs_info.h>
+#endif
+
+#if USE_STATVFS
+#if ! defined STAT_STATVFS && defined STAT_STATVFS64
+#define STRUCT_STATVFS struct statvfs64
+#define STATFS statvfs64
+#else
+#define STRUCT_STATVFS struct statvfs
+#define STATFS statvfs
+
+#if defined __linux__ && (defined __GLIBC__ || defined __UCLIBC__)
+#include <sys/utsname.h>
+#include <sys/statfs.h>
+#define STAT_STATFS2_BSIZE 1
+#endif
+#endif
+
+#else
+#define STATFS statfs
+#define STRUCT_STATVFS struct statfs
+#ifdef HAVE_OS_H                /* Haiku, also (obsolete) BeOS */
+/* BeOS has a statvfs function, but it does not return sensible values
+   for f_files, f_ffree and f_favail, and lacks f_type, f_basetype and
+   f_fstypename.  Use 'struct fs_info' instead.  */
+static int
+statfs (char const *filename, struct fs_info *buf)
+{
+    dev_t device;
+
+    device = dev_for_path (filename);
+
+    if (device < 0)
+    {
+        errno = (device == B_ENTRY_NOT_FOUND ? ENOENT
+                 : device == B_BAD_VALUE ? EINVAL
+                 : device == B_NAME_TOO_LONG ? ENAMETOOLONG
+                 : device == B_NO_MEMORY ? ENOMEM : device == B_FILE_ERROR ? EIO : 0);
+        return -1;
+    }
+    /* If successful, buf->dev will be == device.  */
+    return fs_stat_dev (device, buf);
+}
+
+#define STRUCT_STATVFS struct fs_info
+#else
+#define STRUCT_STATVFS struct statfs
+#endif
+#endif
+
+#ifdef HAVE_STRUCT_STATVFS_F_BASETYPE
+#define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME f_basetype
+#else
+#if defined HAVE_STRUCT_STATVFS_F_FSTYPENAME || defined HAVE_STRUCT_STATFS_F_FSTYPENAME
+#define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME f_fstypename
+#elif defined HAVE_OS_H         /* Haiku, also (obsolete) BeOS */
+#define STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME fsh_name
+#endif
+#endif
+
+#include <unistd.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/key.h"        /* tty_get_event */
+#include "lib/mcconfig.h"
+#include "lib/search.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strescape.h"
+#include "lib/strutil.h"
+#include "lib/timefmt.h"        /* file_date() */
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "src/setup.h"          /* verbose, safe_overwrite */
+
+#include "filemanager.h"
+#include "fileopctx.h"          /* FILE_CONT */
+
+#include "filegui.h"
+
+/* }}} */
+
+/*** global variables ****************************************************************************/
+
+gboolean classic_progressbar = TRUE;
+
+/*** file scope macro definitions ****************************************************************/
+
+#define truncFileString(dlg, s)       str_trunc (s, WIDGET (dlg)->rect.cols - 10)
+#define truncFileStringSecure(dlg, s) path_trunc (s, WIDGET (dlg)->rect.cols - 10)
+
+/*** file scope type declarations ****************************************************************/
+
+/* *INDENT-OFF* */
+typedef enum {
+    MSDOS_SUPER_MAGIC     = 0x4d44,
+    NTFS_SB_MAGIC         = 0x5346544e,
+    FUSE_MAGIC            = 0x65735546,
+    PROC_SUPER_MAGIC      = 0x9fa0,
+    SMB_SUPER_MAGIC       = 0x517B,
+    NCP_SUPER_MAGIC       = 0x564c,
+    USBDEVICE_SUPER_MAGIC = 0x9fa2
+} filegui_nonattrs_fs_t;
+/* *INDENT-ON* */
+
+/* Used for button result values */
+typedef enum
+{
+    REPLACE_YES = B_USER,
+    REPLACE_NO,
+    REPLACE_APPEND,
+    REPLACE_REGET,
+    REPLACE_ALL,
+    REPLACE_OLDER,
+    REPLACE_NONE,
+    REPLACE_SMALLER,
+    REPLACE_SIZE,
+    REPLACE_ABORT
+} replace_action_t;
+
+/* This structure describes the UI and internal data required by a file
+ * operation context.
+ */
+typedef struct
+{
+    /* ETA and bps */
+    gboolean showing_eta;
+    gboolean showing_bps;
+
+    /* Dialog and widgets for the operation progress window */
+    WDialog *op_dlg;
+    /* Source file: label and name */
+    WLabel *src_file_label;
+    WLabel *src_file;
+    /* Target file: label and name */
+    WLabel *tgt_file_label;
+    WLabel *tgt_file;
+
+    WGauge *progress_file_gauge;
+    WLabel *progress_file_label;
+
+    WGauge *progress_total_gauge;
+
+    WLabel *total_files_processed_label;
+    WLabel *time_label;
+    WHLine *total_bytes_label;
+
+    /* Query replace dialog */
+    WDialog *replace_dlg;
+    const char *src_filename;
+    const char *tgt_filename;
+    replace_action_t replace_result;
+    gboolean dont_overwrite_with_zero;
+
+    struct stat *src_stat, *dst_stat;
+} file_op_context_ui_t;
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct
+{
+    Widget *w;
+    FileProgressStatus action;
+    const char *text;
+    button_flags_t flags;
+    int len;
+} progress_buttons[] =
+{
+    /* *INDENT-OFF* */
+    { NULL, FILE_SKIP, N_("&Skip"), NORMAL_BUTTON, -1 },
+    { NULL, FILE_SUSPEND, N_("S&uspend"), NORMAL_BUTTON, -1 },
+    { NULL, FILE_SUSPEND, N_("Con&tinue"), NORMAL_BUTTON, -1 },
+    { NULL, FILE_ABORT, N_("&Abort"), NORMAL_BUTTON, -1 }
+    /* *INDENT-ON* */
+};
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* Return true if statvfs works.  This is false for statvfs on systems
+   with GNU libc on Linux kernels before 2.6.36, which stats all
+   preceding entries in /proc/mounts; that makes df hang if even one
+   of the corresponding file systems is hard-mounted but not available.  */
+
+#if USE_STATVFS && ! (! defined STAT_STATVFS && defined STAT_STATVFS64)
+static int
+statvfs_works (void)
+{
+#if ! (defined __linux__ && (defined __GLIBC__ || defined __UCLIBC__))
+    return 1;
+#else
+    static int statvfs_works_cache = -1;
+    struct utsname name;
+
+    if (statvfs_works_cache < 0)
+        statvfs_works_cache = (uname (&name) == 0 && 0 <= str_verscmp (name.release, "2.6.36"));
+    return statvfs_works_cache;
+#endif
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+filegui__check_attrs_on_fs (const char *fs_path)
+{
+    STRUCT_STATVFS stfs;
+
+#if USE_STATVFS && defined(STAT_STATVFS)
+    if (statvfs_works () && statvfs (fs_path, &stfs) != 0)
+        return TRUE;
+#else
+    if (STATFS (fs_path, &stfs) != 0)
+        return TRUE;
+#endif
+
+#if (USE_STATVFS && defined(HAVE_STRUCT_STATVFS_F_TYPE)) || \
+        (!USE_STATVFS && defined(HAVE_STRUCT_STATFS_F_TYPE))
+    switch ((filegui_nonattrs_fs_t) stfs.f_type)
+    {
+    case MSDOS_SUPER_MAGIC:
+    case NTFS_SB_MAGIC:
+    case PROC_SUPER_MAGIC:
+    case SMB_SUPER_MAGIC:
+    case NCP_SUPER_MAGIC:
+    case USBDEVICE_SUPER_MAGIC:
+        return FALSE;
+    default:
+        break;
+    }
+#elif defined(HAVE_STRUCT_STATVFS_F_FSTYPENAME) || defined(HAVE_STRUCT_STATFS_F_FSTYPENAME)
+    if (strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "msdos") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "msdosfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "ntfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "procfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "smbfs") == 0
+        || strstr (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "fusefs") != NULL)
+        return FALSE;
+#elif defined(HAVE_STRUCT_STATVFS_F_BASETYPE)
+    if (strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "pcfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "ntfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "proc") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "smbfs") == 0
+        || strcmp (stfs.STATXFS_FILE_SYSTEM_TYPE_MEMBER_NAME, "fuse") == 0)
+        return FALSE;
+#endif
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+file_frmt_time (char *buffer, double eta_secs)
+{
+    int eta_hours, eta_mins, eta_s;
+
+    eta_hours = (int) (eta_secs / (60 * 60));
+    eta_mins = (int) ((eta_secs - (eta_hours * 60 * 60)) / 60);
+    eta_s = (int) (eta_secs - (eta_hours * 60 * 60 + eta_mins * 60));
+    g_snprintf (buffer, BUF_TINY, _("%d:%02d:%02d"), eta_hours, eta_mins, eta_s);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+file_eta_prepare_for_show (char *buffer, double eta_secs, gboolean always_show)
+{
+    char _fmt_buff[BUF_TINY];
+
+    if (eta_secs <= 0.5 && !always_show)
+    {
+        *buffer = '\0';
+        return;
+    }
+
+    if (eta_secs <= 0.5)
+        eta_secs = 1;
+    file_frmt_time (_fmt_buff, eta_secs);
+    g_snprintf (buffer, BUF_TINY, _("ETA %s"), _fmt_buff);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+file_bps_prepare_for_show (char *buffer, long bps)
+{
+    if (bps > 1024 * 1024)
+        g_snprintf (buffer, BUF_TINY, _("%.2f MB/s"), bps / (1024 * 1024.0));
+    else if (bps > 1024)
+        g_snprintf (buffer, BUF_TINY, _("%.2f KB/s"), bps / 1024.0);
+    else if (bps > 1)
+        g_snprintf (buffer, BUF_TINY, _("%ld B/s"), bps);
+    else
+        *buffer = '\0';
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+file_ui_op_dlg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_ACTION:
+        /* Do not close the dialog because the query dialog will be shown */
+        if (parm == CK_Cancel)
+        {
+            DIALOG (w)->ret_value = FILE_ABORT; /* for check_progress_buttons() */
+            return MSG_HANDLED;
+        }
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* The dialog layout:
+ *
+ * +---------------------- File exists -----------------------+
+ * | New     : /path/to/original_file_name                    |   // 0, 1
+ * |                    1234567             feb  4 2017 13:38 |   // 2, 3
+ * | Existing: /path/to/target_file_name                      |   // 4, 5
+ * |                 1234567890             feb  4 2017 13:37 |   // 6, 7
+ * +----------------------------------------------------------+
+ * |                   Overwrite this file?                   |   // 8
+ * |            [ Yes ] [ No ] [ Append ] [ Reget ]           |   // 9, 10, 11, 12
+ * +----------------------------------------------------------+
+ * |                   Overwrite all files?                   |   // 13
+ * |  [ ] Don't overwrite with zero length file               |   // 14
+ * |  [ All ] [ Older ] [None] [ Smaller ] [ Size differs ]   |   // 15, 16, 17, 18, 19
+ * +----------------------------------------------------------|
+ * |                         [ Abort ]                        |   // 20
+ * +----------------------------------------------------------+
+ */
+
+static replace_action_t
+overwrite_query_dialog (file_op_context_t * ctx, enum OperationMode mode)
+{
+#define W(i) dlg_widgets[i].widget
+#define WX(i) W(i)->rect.x
+#define WY(i) W(i)->rect.y
+#define WCOLS(i) W(i)->rect.cols
+
+#define NEW_LABEL(i, text) \
+    W(i) = WIDGET (label_new (dlg_widgets[i].y, dlg_widgets[i].x, text))
+
+#define ADD_LABEL(i) \
+    group_add_widget_autopos (g, W(i), dlg_widgets[i].pos_flags, \
+                              g->current != NULL ? g->current->data : NULL)
+
+#define NEW_BUTTON(i) \
+    W(i) = WIDGET (button_new (dlg_widgets[i].y, dlg_widgets[i].x, \
+                               dlg_widgets[i].value, NORMAL_BUTTON, dlg_widgets[i].text, NULL))
+
+#define ADD_BUTTON(i) \
+    group_add_widget_autopos (g, W(i), dlg_widgets[i].pos_flags, g->current->data)
+
+    /* dialog sizes */
+    const int dlg_height = 17;
+    int dlg_width = 60;
+
+    struct
+    {
+        Widget *widget;
+        const char *text;
+        int y;
+        int x;
+        widget_pos_flags_t pos_flags;
+        int value;              /* 0 for labels and checkbox */
+    } dlg_widgets[] =
+    {
+        /* *INDENT-OFF* */
+        /*  0 - label */
+        { NULL, N_("New     :"), 2, 3, WPOS_KEEP_DEFAULT, 0 },
+        /*  1 - label - name */
+        { NULL, NULL, 2, 14, WPOS_KEEP_DEFAULT, 0 },
+        /*  2 - label - size */
+        { NULL, NULL, 3, 3, WPOS_KEEP_DEFAULT, 0 },
+        /*  3 - label - date & time */
+        { NULL, NULL, 3, 43, WPOS_KEEP_TOP | WPOS_KEEP_RIGHT, 0 },
+        /*  4 - label */
+        { NULL, N_("Existing:"), 4, 3, WPOS_KEEP_DEFAULT, 0 },
+        /*  5 - label - name */
+        { NULL, NULL, 4, 14, WPOS_KEEP_DEFAULT, 0 },
+        /*  6 - label - size */
+        { NULL, NULL, 5, 3, WPOS_KEEP_DEFAULT, 0 },
+        /*  7 - label - date & time */
+        { NULL, NULL, 5, 43, WPOS_KEEP_TOP | WPOS_KEEP_RIGHT, 0 },
+        /* --------------------------------------------------- */
+        /*  8 - label */
+        { NULL, N_("Overwrite this file?"), 7, 21, WPOS_KEEP_TOP | WPOS_CENTER_HORZ, 0 },
+        /*  9 - button */
+        { NULL, N_("&Yes"), 8, 14, WPOS_KEEP_DEFAULT, REPLACE_YES },
+        /* 10 - button */
+        { NULL, N_("&No"), 8, 22, WPOS_KEEP_DEFAULT, REPLACE_NO },
+        /* 11 - button */
+        { NULL, N_("A&ppend"), 8, 29, WPOS_KEEP_DEFAULT, REPLACE_APPEND },
+        /* 12 - button */
+        { NULL, N_("&Reget"), 8, 40, WPOS_KEEP_DEFAULT, REPLACE_REGET },
+        /* --------------------------------------------------- */
+        /* 13 - label */
+        { NULL, N_("Overwrite all files?"), 10, 21, WPOS_KEEP_TOP | WPOS_CENTER_HORZ, 0 },
+        /* 14 - checkbox */
+        { NULL, N_("Don't overwrite with &zero length file"), 11, 3, WPOS_KEEP_DEFAULT, 0 },
+        /* 15 - button */
+        { NULL, N_("A&ll"), 12, 12, WPOS_KEEP_DEFAULT, REPLACE_ALL },
+        /* 16 - button */
+        { NULL, N_("&Older"), 12, 12, WPOS_KEEP_DEFAULT, REPLACE_OLDER },
+        /* 17 - button */
+        { NULL, N_("Non&e"), 12, 12, WPOS_KEEP_DEFAULT, REPLACE_NONE },
+        /* 18 - button */
+        { NULL, N_("S&maller"), 12, 25, WPOS_KEEP_DEFAULT, REPLACE_SMALLER },
+        /* 19 - button */
+        { NULL, N_("&Size differs"), 12, 40, WPOS_KEEP_DEFAULT, REPLACE_SIZE },
+        /* --------------------------------------------------- */
+        /* 20 - button */
+        { NULL, N_("&Abort"), 14, 27, WPOS_KEEP_TOP | WPOS_CENTER_HORZ, REPLACE_ABORT }
+        /* *INDENT-ON* */
+    };
+
+    const int gap = 1;
+
+    file_op_context_ui_t *ui = ctx->ui;
+    Widget *wd;
+    WGroup *g;
+    const char *title;
+
+    vfs_path_t *p;
+    char *s1;
+    const char *cs1;
+    char s2[BUF_SMALL];
+    int w, bw1, bw2;
+    unsigned short i;
+
+    gboolean do_append = FALSE, do_reget = FALSE;
+    unsigned long yes_id, no_id;
+    int result;
+
+    if (mode == Foreground)
+        title = _("File exists");
+    else
+        title = _("Background process: File exists");
+
+#ifdef ENABLE_NLS
+    {
+        const unsigned short num = G_N_ELEMENTS (dlg_widgets);
+
+        for (i = 0; i < num; i++)
+            if (dlg_widgets[i].text != NULL)
+                dlg_widgets[i].text = _(dlg_widgets[i].text);
+    }
+#endif /* ENABLE_NLS */
+
+    /* create widgets to get their real widths */
+    /* new file */
+    NEW_LABEL (0, dlg_widgets[0].text);
+    /* new file name */
+    p = vfs_path_from_str (ui->src_filename);
+    s1 = vfs_path_to_str_flags (p, 0, VPF_STRIP_HOME | VPF_STRIP_PASSWORD);
+    NEW_LABEL (1, s1);
+    vfs_path_free (p, TRUE);
+    g_free (s1);
+    /* new file size */
+    size_trunc_len (s2, sizeof (s2), ui->src_stat->st_size, 0, panels_options.kilobyte_si);
+    NEW_LABEL (2, s2);
+    /* new file modification date & time */
+    cs1 = file_date (ui->src_stat->st_mtime);
+    NEW_LABEL (3, cs1);
+
+    /* existing file */
+    NEW_LABEL (4, dlg_widgets[4].text);
+    /* existing file name */
+    p = vfs_path_from_str (ui->tgt_filename);
+    s1 = vfs_path_to_str_flags (p, 0, VPF_STRIP_HOME | VPF_STRIP_PASSWORD);
+    NEW_LABEL (5, s1);
+    vfs_path_free (p, TRUE);
+    g_free (s1);
+    /* existing file size */
+    size_trunc_len (s2, sizeof (s2), ui->dst_stat->st_size, 0, panels_options.kilobyte_si);
+    NEW_LABEL (6, s2);
+    /* existing file modification date & time */
+    cs1 = file_date (ui->dst_stat->st_mtime);
+    NEW_LABEL (7, cs1);
+
+    /* will "Append" and "Reget" buttons be in the dialog? */
+    do_append = !S_ISDIR (ui->dst_stat->st_mode);
+    do_reget = do_append && ctx->operation == OP_COPY && ui->dst_stat->st_size != 0
+        && ui->src_stat->st_size > ui->dst_stat->st_size;
+
+    NEW_LABEL (8, dlg_widgets[8].text);
+    NEW_BUTTON (9);
+    NEW_BUTTON (10);
+    if (do_append)
+        NEW_BUTTON (11);
+    if (do_reget)
+        NEW_BUTTON (12);
+
+    NEW_LABEL (13, dlg_widgets[13].text);
+    dlg_widgets[14].widget =
+        WIDGET (check_new (dlg_widgets[14].y, dlg_widgets[14].x, FALSE, dlg_widgets[14].text));
+    for (i = 15; i <= 20; i++)
+        NEW_BUTTON (i);
+
+    /* place widgets */
+    dlg_width -= 2 * (2 + gap); /* inside frame */
+
+    /* perhaps longest line is buttons */
+    bw1 = WCOLS (9) + gap + WCOLS (10);
+    if (do_append)
+        bw1 += gap + WCOLS (11);
+    if (do_reget)
+        bw1 += gap + WCOLS (12);
+    dlg_width = MAX (dlg_width, bw1);
+
+    bw2 = WCOLS (15);
+    for (i = 16; i <= 19; i++)
+        bw2 += gap + WCOLS (i);
+    dlg_width = MAX (dlg_width, bw2);
+
+    dlg_width = MAX (dlg_width, WCOLS (8));
+    dlg_width = MAX (dlg_width, WCOLS (13));
+    dlg_width = MAX (dlg_width, WCOLS (14));
+
+    /* truncate file names */
+    w = WCOLS (0) + gap + WCOLS (1);
+    if (w > dlg_width)
+    {
+        WLabel *l = LABEL (W (1));
+
+        w = dlg_width - gap - WCOLS (0);
+        label_set_text (l, str_trunc (l->text, w));
+    }
+
+    w = WCOLS (4) + gap + WCOLS (5);
+    if (w > dlg_width)
+    {
+        WLabel *l = LABEL (W (5));
+
+        w = dlg_width - gap - WCOLS (4);
+        label_set_text (l, str_trunc (l->text, w));
+    }
+
+    /* real dlalog width */
+    dlg_width += 2 * (2 + gap);
+
+    WX (1) = WX (0) + WCOLS (0) + gap;
+    WX (5) = WX (4) + WCOLS (4) + gap;
+
+    /* sizes: right alignment */
+    WX (2) = dlg_width / 2 - WCOLS (2);
+    WX (6) = dlg_width / 2 - WCOLS (6);
+
+    w = dlg_width - (2 + gap);  /* right bound */
+
+    /* date & time */
+    WX (3) = w - WCOLS (3);
+    WX (7) = w - WCOLS (7);
+
+    /* buttons: center alignment */
+    WX (9) = dlg_width / 2 - bw1 / 2;
+    WX (10) = WX (9) + WCOLS (9) + gap;
+    if (do_append)
+        WX (11) = WX (10) + WCOLS (10) + gap;
+    if (do_reget)
+        WX (12) = WX (11) + WCOLS (11) + gap;
+
+    WX (15) = dlg_width / 2 - bw2 / 2;
+    for (i = 16; i <= 19; i++)
+        WX (i) = WX (i - 1) + WCOLS (i - 1) + gap;
+
+    /* TODO: write help (ticket #3970) */
+    ui->replace_dlg =
+        dlg_create (TRUE, 0, 0, dlg_height, dlg_width, WPOS_CENTER, FALSE, alarm_colors, NULL, NULL,
+                    "[Replace]", title);
+    wd = WIDGET (ui->replace_dlg);
+    g = GROUP (ui->replace_dlg);
+
+    /* file info */
+    for (i = 0; i <= 7; i++)
+        ADD_LABEL (i);
+    group_add_widget (g, hline_new (WY (7) - wd->rect.y + 1, -1, -1));
+
+    /* label & buttons */
+    ADD_LABEL (8);              /* Overwrite this file? */
+    yes_id = ADD_BUTTON (9);    /* Yes */
+    no_id = ADD_BUTTON (10);    /* No */
+    if (do_append)
+        ADD_BUTTON (11);        /* Append */
+    if (do_reget)
+        ADD_BUTTON (12);        /* Reget */
+    group_add_widget (g, hline_new (WY (10) - wd->rect.y + 1, -1, -1));
+
+    /* label & buttons */
+    ADD_LABEL (13);             /* Overwrite all files? */
+    group_add_widget (g, dlg_widgets[14].widget);
+    for (i = 15; i <= 19; i++)
+        ADD_BUTTON (i);
+    group_add_widget (g, hline_new (WY (19) - wd->rect.y + 1, -1, -1));
+
+    ADD_BUTTON (20);            /* Abort */
+
+    group_select_widget_by_id (g, safe_overwrite ? no_id : yes_id);
+
+    result = dlg_run (ui->replace_dlg);
+
+    if (result != B_CANCEL)
+        ui->dont_overwrite_with_zero = CHECK (dlg_widgets[14].widget)->state;
+
+    widget_destroy (wd);
+
+    return (result == B_CANCEL) ? REPLACE_ABORT : (replace_action_t) result;
+
+#undef ADD_BUTTON
+#undef NEW_BUTTON
+#undef ADD_LABEL
+#undef NEW_LABEL
+#undef WCOLS
+#undef WX
+#undef W
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+is_wildcarded (const char *p)
+{
+    gboolean escaped = FALSE;
+
+    for (; *p != '\0'; p++)
+    {
+        if (*p == '\\')
+        {
+            if (p[1] >= '1' && p[1] <= '9' && !escaped)
+                return TRUE;
+            escaped = !escaped;
+        }
+        else
+        {
+            if ((*p == '*' || *p == '?') && !escaped)
+                return TRUE;
+            escaped = FALSE;
+        }
+    }
+    return FALSE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+place_progress_buttons (WDialog * h, gboolean suspended)
+{
+    const size_t i = suspended ? 2 : 1;
+    Widget *w = WIDGET (h);
+    int buttons_width;
+
+    buttons_width = 2 + progress_buttons[0].len + progress_buttons[3].len;
+    buttons_width += progress_buttons[i].len;
+    button_set_text (BUTTON (progress_buttons[i].w), progress_buttons[i].text);
+
+    progress_buttons[0].w->rect.x = w->rect.x + (w->rect.cols - buttons_width) / 2;
+    progress_buttons[i].w->rect.x = progress_buttons[0].w->rect.x + progress_buttons[0].len + 1;
+    progress_buttons[3].w->rect.x = progress_buttons[i].w->rect.x + progress_buttons[i].len + 1;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+progress_button_callback (WButton * button, int action)
+{
+    (void) button;
+    (void) action;
+
+    /* don't close dialog in any case */
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+FileProgressStatus
+check_progress_buttons (file_op_context_t * ctx)
+{
+    int c;
+    Gpm_Event event;
+    file_op_context_ui_t *ui;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return FILE_CONT;
+
+    ui = ctx->ui;
+
+  get_event:
+    event.x = -1;               /* Don't show the GPM cursor */
+    c = tty_get_event (&event, FALSE, ctx->suspended);
+    if (c == EV_NONE)
+        return FILE_CONT;
+
+    /* Reinitialize to avoid old values after events other than selecting a button */
+    ui->op_dlg->ret_value = FILE_CONT;
+
+    dlg_process_event (ui->op_dlg, c, &event);
+    switch (ui->op_dlg->ret_value)
+    {
+    case FILE_SKIP:
+        if (ctx->suspended)
+        {
+            /* redraw dialog in case of Skip after Suspend */
+            place_progress_buttons (ui->op_dlg, FALSE);
+            widget_draw (WIDGET (ui->op_dlg));
+        }
+        ctx->suspended = FALSE;
+        return FILE_SKIP;
+    case B_CANCEL:
+    case FILE_ABORT:
+        ctx->suspended = FALSE;
+        return FILE_ABORT;
+    case FILE_SUSPEND:
+        ctx->suspended = !ctx->suspended;
+        place_progress_buttons (ui->op_dlg, ctx->suspended);
+        widget_draw (WIDGET (ui->op_dlg));
+        MC_FALLTHROUGH;
+    default:
+        if (ctx->suspended)
+            goto get_event;
+        return FILE_CONT;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/* {{{ File progress display routines */
+
+void
+file_op_context_create_ui (file_op_context_t * ctx, gboolean with_eta,
+                           filegui_dialog_type_t dialog_type)
+{
+    file_op_context_ui_t *ui;
+    Widget *w;
+    WGroup *g;
+    int buttons_width;
+    int dlg_width = 58, dlg_height = 17;
+    int y = 2, x = 3;
+    WRect r;
+
+    if (ctx == NULL || ctx->ui != NULL)
+        return;
+
+#ifdef ENABLE_NLS
+    if (progress_buttons[0].len == -1)
+    {
+        size_t i;
+
+        for (i = 0; i < G_N_ELEMENTS (progress_buttons); i++)
+            progress_buttons[i].text = _(progress_buttons[i].text);
+    }
+#endif
+
+    ctx->dialog_type = dialog_type;
+    ctx->recursive_result = RECURSIVE_YES;
+    ctx->ui = g_new0 (file_op_context_ui_t, 1);
+
+    ui = ctx->ui;
+    ui->replace_result = REPLACE_YES;
+
+    ui->op_dlg = dlg_create (TRUE, 0, 0, dlg_height, dlg_width, WPOS_CENTER, FALSE, dialog_colors,
+                             file_ui_op_dlg_callback, NULL, NULL, op_names[ctx->operation]);
+    w = WIDGET (ui->op_dlg);
+    g = GROUP (ui->op_dlg);
+
+    if (dialog_type != FILEGUI_DIALOG_DELETE_ITEM)
+    {
+        ui->showing_eta = with_eta && ctx->progress_totals_computed;
+        ui->showing_bps = with_eta;
+
+        ui->src_file_label = label_new (y++, x, NULL);
+        group_add_widget (g, ui->src_file_label);
+
+        ui->src_file = label_new (y++, x, NULL);
+        group_add_widget (g, ui->src_file);
+
+        ui->tgt_file_label = label_new (y++, x, NULL);
+        group_add_widget (g, ui->tgt_file_label);
+
+        ui->tgt_file = label_new (y++, x, NULL);
+        group_add_widget (g, ui->tgt_file);
+
+        ui->progress_file_gauge = gauge_new (y++, x + 3, dlg_width - (x + 3) * 2, FALSE, 100, 0);
+        if (!classic_progressbar && (current_panel == right_panel))
+            ui->progress_file_gauge->from_left_to_right = FALSE;
+        group_add_widget_autopos (g, ui->progress_file_gauge, WPOS_KEEP_TOP | WPOS_KEEP_HORZ, NULL);
+
+        ui->progress_file_label = label_new (y++, x, NULL);
+        group_add_widget (g, ui->progress_file_label);
+
+        if (verbose && dialog_type == FILEGUI_DIALOG_MULTI_ITEM)
+        {
+            ui->total_bytes_label = hline_new (y++, -1, -1);
+            group_add_widget (g, ui->total_bytes_label);
+
+            if (ctx->progress_totals_computed)
+            {
+                ui->progress_total_gauge =
+                    gauge_new (y++, x + 3, dlg_width - (x + 3) * 2, FALSE, 100, 0);
+                if (!classic_progressbar && (current_panel == right_panel))
+                    ui->progress_total_gauge->from_left_to_right = FALSE;
+                group_add_widget_autopos (g, ui->progress_total_gauge,
+                                          WPOS_KEEP_TOP | WPOS_KEEP_HORZ, NULL);
+            }
+
+            ui->total_files_processed_label = label_new (y++, x, NULL);
+            group_add_widget (g, ui->total_files_processed_label);
+
+            ui->time_label = label_new (y++, x, NULL);
+            group_add_widget (g, ui->time_label);
+        }
+    }
+    else
+    {
+        ui->src_file = label_new (y++, x, NULL);
+        group_add_widget (g, ui->src_file);
+
+        ui->total_files_processed_label = label_new (y++, x, NULL);
+        group_add_widget (g, ui->total_files_processed_label);
+    }
+
+    group_add_widget (g, hline_new (y++, -1, -1));
+
+    progress_buttons[0].w = WIDGET (button_new (y, 0, progress_buttons[0].action,
+                                                progress_buttons[0].flags, progress_buttons[0].text,
+                                                progress_button_callback));
+    if (progress_buttons[0].len == -1)
+        progress_buttons[0].len = button_get_len (BUTTON (progress_buttons[0].w));
+
+    progress_buttons[1].w = WIDGET (button_new (y, 0, progress_buttons[1].action,
+                                                progress_buttons[1].flags, progress_buttons[1].text,
+                                                progress_button_callback));
+    if (progress_buttons[1].len == -1)
+        progress_buttons[1].len = button_get_len (BUTTON (progress_buttons[1].w));
+
+    if (progress_buttons[2].len == -1)
+    {
+        /* create and destroy button to get it length */
+        progress_buttons[2].w = WIDGET (button_new (y, 0, progress_buttons[2].action,
+                                                    progress_buttons[2].flags,
+                                                    progress_buttons[2].text,
+                                                    progress_button_callback));
+        progress_buttons[2].len = button_get_len (BUTTON (progress_buttons[2].w));
+        widget_destroy (progress_buttons[2].w);
+    }
+    progress_buttons[2].w = progress_buttons[1].w;
+
+    progress_buttons[3].w = WIDGET (button_new (y, 0, progress_buttons[3].action,
+                                                progress_buttons[3].flags, progress_buttons[3].text,
+                                                NULL));
+    if (progress_buttons[3].len == -1)
+        progress_buttons[3].len = button_get_len (BUTTON (progress_buttons[3].w));
+
+    group_add_widget (g, progress_buttons[0].w);
+    group_add_widget (g, progress_buttons[1].w);
+    group_add_widget (g, progress_buttons[3].w);
+
+    buttons_width = 2 +
+        progress_buttons[0].len + MAX (progress_buttons[1].len, progress_buttons[2].len) +
+        progress_buttons[3].len;
+
+    /* adjust dialog sizes  */
+    r = w->rect;
+    r.lines = y + 3;
+    r.cols = MAX (COLS * 2 / 3, buttons_width + 6);
+    widget_set_size_rect (w, &r);
+
+    place_progress_buttons (ui->op_dlg, FALSE);
+
+    widget_select (progress_buttons[0].w);
+
+    /* We will manage the dialog without any help, that's why
+       we have to call dlg_init */
+    dlg_init (ui->op_dlg);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_op_context_destroy_ui (file_op_context_t * ctx)
+{
+    if (ctx != NULL && ctx->ui != NULL)
+    {
+        file_op_context_ui_t *ui = (file_op_context_ui_t *) ctx->ui;
+
+        dlg_run_done (ui->op_dlg);
+        widget_destroy (WIDGET (ui->op_dlg));
+        MC_PTR_FREE (ctx->ui);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+   show progressbar for file
+ */
+
+void
+file_progress_show (file_op_context_t * ctx, off_t done, off_t total,
+                    const char *stalled_msg, gboolean force_update)
+{
+    file_op_context_ui_t *ui;
+
+    if (!verbose || ctx == NULL || ctx->ui == NULL)
+        return;
+
+    ui = ctx->ui;
+
+    if (total == 0)
+    {
+        gauge_show (ui->progress_file_gauge, FALSE);
+        return;
+    }
+
+    gauge_set_value (ui->progress_file_gauge, 1024, (int) (1024 * done / total));
+    gauge_show (ui->progress_file_gauge, TRUE);
+
+    if (!force_update)
+        return;
+
+    if (!ui->showing_eta || ctx->eta_secs <= 0.5)
+        label_set_text (ui->progress_file_label, stalled_msg);
+    else
+    {
+        char buffer2[BUF_TINY];
+
+        file_eta_prepare_for_show (buffer2, ctx->eta_secs, FALSE);
+        if (ctx->bps == 0)
+            label_set_textv (ui->progress_file_label, "%s %s", buffer2, stalled_msg);
+        else
+        {
+            char buffer3[BUF_TINY];
+
+            file_bps_prepare_for_show (buffer3, ctx->bps);
+            label_set_textv (ui->progress_file_label, "%s (%s) %s", buffer2, buffer3, stalled_msg);
+        }
+
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_progress_show_count (file_op_context_t * ctx, size_t done, size_t total)
+{
+    file_op_context_ui_t *ui;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return;
+
+    ui = ctx->ui;
+
+    if (ui->total_files_processed_label == NULL)
+        return;
+
+    if (ctx->progress_totals_computed)
+        label_set_textv (ui->total_files_processed_label, _("Files processed: %zu / %zu"), done,
+                         total);
+    else
+        label_set_textv (ui->total_files_processed_label, _("Files processed: %zu"), done);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_progress_show_total (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                          uintmax_t copied_bytes, gboolean show_summary)
+{
+    char buffer2[BUF_TINY];
+    char buffer3[BUF_TINY];
+    file_op_context_ui_t *ui;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return;
+
+    ui = ctx->ui;
+
+    if (ui->progress_total_gauge != NULL)
+    {
+        if (ctx->progress_bytes == 0)
+            gauge_show (ui->progress_total_gauge, FALSE);
+        else
+        {
+            gauge_set_value (ui->progress_total_gauge, 1024,
+                             (int) (1024 * copied_bytes / ctx->progress_bytes));
+            gauge_show (ui->progress_total_gauge, TRUE);
+        }
+    }
+
+    if (!show_summary && tctx->bps == 0)
+        return;
+
+    if (ui->time_label != NULL)
+    {
+        gint64 tv_current;
+        char buffer4[BUF_TINY];
+
+        tv_current = g_get_monotonic_time ();
+        file_frmt_time (buffer2, (tv_current - tctx->transfer_start) / G_USEC_PER_SEC);
+
+        if (ctx->progress_totals_computed)
+        {
+            file_eta_prepare_for_show (buffer3, tctx->eta_secs, TRUE);
+            if (tctx->bps == 0)
+                label_set_textv (ui->time_label, _("Time: %s %s"), buffer2, buffer3);
+            else
+            {
+                file_bps_prepare_for_show (buffer4, (long) tctx->bps);
+                label_set_textv (ui->time_label, _("Time: %s %s (%s)"), buffer2, buffer3, buffer4);
+            }
+        }
+        else
+        {
+            if (tctx->bps == 0)
+                label_set_textv (ui->time_label, _("Time: %s"), buffer2);
+            else
+            {
+                file_bps_prepare_for_show (buffer4, (long) tctx->bps);
+                label_set_textv (ui->time_label, _("Time: %s (%s)"), buffer2, buffer4);
+            }
+        }
+    }
+
+    if (ui->total_bytes_label != NULL)
+    {
+        size_trunc_len (buffer2, 5, tctx->copied_bytes, 0, panels_options.kilobyte_si);
+
+        if (!ctx->progress_totals_computed)
+            hline_set_textv (ui->total_bytes_label, _(" Total: %s "), buffer2);
+        else
+        {
+            size_trunc_len (buffer3, 5, ctx->progress_bytes, 0, panels_options.kilobyte_si);
+            hline_set_textv (ui->total_bytes_label, _(" Total: %s / %s "), buffer2, buffer3);
+        }
+    }
+}
+
+/* }}} */
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_progress_show_source (file_op_context_t * ctx, const vfs_path_t * vpath)
+{
+    file_op_context_ui_t *ui;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return;
+
+    ui = ctx->ui;
+
+    if (vpath != NULL)
+    {
+        char *s;
+
+        s = vfs_path_tokens_get (vpath, -1, 1);
+        label_set_text (ui->src_file_label, _("Source"));
+        label_set_text (ui->src_file, truncFileString (ui->op_dlg, s));
+        g_free (s);
+    }
+    else
+    {
+        label_set_text (ui->src_file_label, NULL);
+        label_set_text (ui->src_file, NULL);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_progress_show_target (file_op_context_t * ctx, const vfs_path_t * vpath)
+{
+    file_op_context_ui_t *ui;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return;
+
+    ui = ctx->ui;
+
+    if (vpath != NULL)
+    {
+        label_set_text (ui->tgt_file_label, _("Target"));
+        label_set_text (ui->tgt_file, truncFileStringSecure (ui->op_dlg, vfs_path_as_str (vpath)));
+    }
+    else
+    {
+        label_set_text (ui->tgt_file_label, NULL);
+        label_set_text (ui->tgt_file, NULL);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+file_progress_show_deleting (file_op_context_t * ctx, const char *s, size_t * count)
+{
+    static gint64 timestamp = 0;
+    /* update with 25 FPS rate */
+    static const gint64 delay = G_USEC_PER_SEC / 25;
+
+    gboolean ret;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return FALSE;
+
+    ret = mc_time_elapsed (&timestamp, delay);
+
+    if (ret)
+    {
+        file_op_context_ui_t *ui;
+
+        ui = ctx->ui;
+
+        if (ui->src_file_label != NULL)
+            label_set_text (ui->src_file_label, _("Deleting"));
+
+        label_set_text (ui->src_file, truncFileStringSecure (ui->op_dlg, s));
+    }
+
+    if (count != NULL)
+        (*count)++;
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+FileProgressStatus
+file_progress_real_query_replace (file_op_context_t * ctx, enum OperationMode mode,
+                                  const char *src, struct stat * src_stat,
+                                  const char *dst, struct stat * dst_stat)
+{
+    file_op_context_ui_t *ui;
+    FileProgressStatus replace_with_zero;
+
+    if (ctx == NULL || ctx->ui == NULL)
+        return FILE_CONT;
+
+    ui = ctx->ui;
+
+    if (ui->replace_result == REPLACE_YES || ui->replace_result == REPLACE_NO
+        || ui->replace_result == REPLACE_APPEND)
+    {
+        ui->src_filename = src;
+        ui->src_stat = src_stat;
+        ui->tgt_filename = dst;
+        ui->dst_stat = dst_stat;
+        ui->replace_result = overwrite_query_dialog (ctx, mode);
+    }
+
+    replace_with_zero = (src_stat->st_size == 0
+                         && ui->dont_overwrite_with_zero) ? FILE_SKIP : FILE_CONT;
+
+    switch (ui->replace_result)
+    {
+    case REPLACE_OLDER:
+        do_refresh ();
+        if (src_stat->st_mtime > dst_stat->st_mtime)
+            return replace_with_zero;
+        else
+            return FILE_SKIP;
+
+    case REPLACE_SIZE:
+        do_refresh ();
+        if (src_stat->st_size == dst_stat->st_size)
+            return FILE_SKIP;
+        else
+            return replace_with_zero;
+
+    case REPLACE_SMALLER:
+        do_refresh ();
+        if (src_stat->st_size > dst_stat->st_size)
+            return FILE_CONT;
+        else
+            return FILE_SKIP;
+
+    case REPLACE_ALL:
+        do_refresh ();
+        return replace_with_zero;
+
+    case REPLACE_REGET:
+        /* Careful: we fall through and set do_append */
+        ctx->do_reget = dst_stat->st_size;
+        MC_FALLTHROUGH;
+
+    case REPLACE_APPEND:
+        ctx->do_append = TRUE;
+        MC_FALLTHROUGH;
+
+    case REPLACE_YES:
+        do_refresh ();
+        return FILE_CONT;
+
+    case REPLACE_NO:
+    case REPLACE_NONE:
+        do_refresh ();
+        return FILE_SKIP;
+
+    case REPLACE_ABORT:
+    default:
+        return FILE_ABORT;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+char *
+file_mask_dialog (file_op_context_t * ctx, gboolean only_one, const char *format, const void *text,
+                  const char *def_text, gboolean * do_bg)
+{
+    size_t fmd_xlen;
+    vfs_path_t *vpath;
+    gboolean source_easy_patterns = easy_patterns;
+    char fmd_buf[BUF_MEDIUM];
+    char *dest_dir = NULL;
+    char *tmp;
+    char *def_text_secure;
+
+    if (ctx == NULL)
+        return NULL;
+
+    /* unselect checkbox if target filesystem doesn't support attributes */
+    ctx->op_preserve = copymove_persistent_attr && filegui__check_attrs_on_fs (def_text);
+    ctx->stable_symlinks = FALSE;
+    *do_bg = FALSE;
+
+    /* filter out a possible password from def_text */
+    vpath = vfs_path_from_str_flags (def_text, only_one ? VPF_NO_CANON : VPF_NONE);
+    tmp = vfs_path_to_str_flags (vpath, 0, VPF_STRIP_PASSWORD);
+    vfs_path_free (vpath, TRUE);
+
+    if (source_easy_patterns)
+        def_text_secure = strutils_glob_escape (tmp);
+    else
+        def_text_secure = strutils_regex_escape (tmp);
+    g_free (tmp);
+
+    if (only_one)
+    {
+        int format_len, text_len;
+        int max_len;
+
+        format_len = str_term_width1 (format);
+        text_len = str_term_width1 (text);
+        max_len = COLS - 2 - 6;
+
+        if (format_len + text_len <= max_len)
+        {
+            fmd_xlen = format_len + text_len + 6;
+            fmd_xlen = MAX (fmd_xlen, 68);
+        }
+        else
+        {
+            text = str_trunc ((const char *) text, max_len - format_len);
+            fmd_xlen = max_len + 6;
+        }
+
+        g_snprintf (fmd_buf, sizeof (fmd_buf), format, (const char *) text);
+    }
+    else
+    {
+        fmd_xlen = COLS * 2 / 3;
+        fmd_xlen = MAX (fmd_xlen, 68);
+        g_snprintf (fmd_buf, sizeof (fmd_buf), format, *(const int *) text);
+    }
+
+    {
+        char *source_mask = NULL;
+        char *orig_mask;
+        int val;
+        struct stat buf;
+
+        quick_widget_t quick_widgets[] = {
+            /* *INDENT-OFF* */
+            QUICK_LABELED_INPUT (fmd_buf, input_label_above, easy_patterns ? "*" : "^(.*)$",
+                                 "input-def", &source_mask, NULL, FALSE, FALSE,
+                                 INPUT_COMPLETE_FILENAMES),
+            QUICK_START_COLUMNS,
+                QUICK_SEPARATOR (FALSE),
+            QUICK_NEXT_COLUMN,
+                QUICK_CHECKBOX (N_("&Using shell patterns"), &source_easy_patterns, NULL),
+            QUICK_STOP_COLUMNS,
+            QUICK_LABELED_INPUT (N_("to:"), input_label_above, def_text_secure, "input2", &dest_dir,
+                                 NULL, FALSE, FALSE, INPUT_COMPLETE_FILENAMES),
+            QUICK_SEPARATOR (TRUE),
+            QUICK_START_COLUMNS,
+                QUICK_CHECKBOX (N_("Follow &links"), &ctx->follow_links, NULL),
+                QUICK_CHECKBOX (N_("Preserve &attributes"), &ctx->op_preserve, NULL),
+            QUICK_NEXT_COLUMN,
+                QUICK_CHECKBOX (N_("Di&ve into subdir if exists"), &ctx->dive_into_subdirs, NULL),
+                QUICK_CHECKBOX (N_("&Stable symlinks"), &ctx->stable_symlinks, NULL),
+            QUICK_STOP_COLUMNS,
+            QUICK_START_BUTTONS (TRUE, TRUE),
+                QUICK_BUTTON (N_("&OK"), B_ENTER, NULL, NULL),
+#ifdef ENABLE_BACKGROUND
+                QUICK_BUTTON (N_("&Background"), B_USER, NULL, NULL),
+#endif /* ENABLE_BACKGROUND */
+                QUICK_BUTTON (N_("&Cancel"), B_CANCEL, NULL, NULL),
+            QUICK_END
+            /* *INDENT-ON* */
+        };
+
+        WRect r = { -1, -1, 0, fmd_xlen };
+
+        quick_dialog_t qdlg = {
+            r, op_names[ctx->operation], "[Mask Copy/Rename]",
+            quick_widgets, NULL, NULL
+        };
+
+        while (TRUE)
+        {
+            val = quick_dialog_skip (&qdlg, 4);
+
+            if (val == B_CANCEL)
+            {
+                g_free (def_text_secure);
+                return NULL;
+            }
+
+            ctx->stat_func = ctx->follow_links ? mc_stat : mc_lstat;
+
+            if (ctx->op_preserve)
+            {
+                ctx->preserve = TRUE;
+                ctx->umask_kill = 0777777;
+                ctx->preserve_uidgid = (geteuid () == 0);
+            }
+            else
+            {
+                mode_t i2;
+
+                ctx->preserve = ctx->preserve_uidgid = FALSE;
+                i2 = umask (0);
+                umask (i2);
+                ctx->umask_kill = i2 ^ 0777777;
+            }
+
+            if (*dest_dir == '\0')
+            {
+                g_free (def_text_secure);
+                g_free (source_mask);
+                g_free (dest_dir);
+                return NULL;
+            }
+
+            ctx->search_handle = mc_search_new (source_mask, NULL);
+            if (ctx->search_handle != NULL)
+                break;
+
+            message (D_ERROR, MSG_ERROR, _("Invalid source pattern '%s'"), source_mask);
+            MC_PTR_FREE (dest_dir);
+            MC_PTR_FREE (source_mask);
+        }
+
+        g_free (def_text_secure);
+        g_free (source_mask);
+
+        ctx->search_handle->is_case_sensitive = TRUE;
+        if (source_easy_patterns)
+            ctx->search_handle->search_type = MC_SEARCH_T_GLOB;
+        else
+            ctx->search_handle->search_type = MC_SEARCH_T_REGEX;
+
+        tmp = dest_dir;
+        dest_dir = tilde_expand (tmp);
+        g_free (tmp);
+        vpath = vfs_path_from_str (dest_dir);
+
+        ctx->dest_mask = strrchr (dest_dir, PATH_SEP);
+        if (ctx->dest_mask == NULL)
+            ctx->dest_mask = dest_dir;
+        else
+            ctx->dest_mask++;
+
+        orig_mask = ctx->dest_mask;
+
+        if (*ctx->dest_mask == '\0'
+            || (!ctx->dive_into_subdirs && !is_wildcarded (ctx->dest_mask)
+                && (!only_one
+                    || (mc_stat (vpath, &buf) == 0 && S_ISDIR (buf.st_mode))))
+            || (ctx->dive_into_subdirs
+                && ((!only_one && !is_wildcarded (ctx->dest_mask))
+                    || (only_one && mc_stat (vpath, &buf) == 0 && S_ISDIR (buf.st_mode)))))
+            ctx->dest_mask = g_strdup ("\\0");
+        else
+        {
+            ctx->dest_mask = g_strdup (ctx->dest_mask);
+            *orig_mask = '\0';
+        }
+
+        if (*dest_dir == '\0')
+        {
+            g_free (dest_dir);
+            dest_dir = g_strdup ("./");
+        }
+
+        vfs_path_free (vpath, TRUE);
+
+        if (val == B_USER)
+            *do_bg = TRUE;
+    }
+
+    return dest_dir;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/filegui.h b/src/filemanager/filegui.h
new file mode 100644
index 0000000..6387faa
--- /dev/null
+++ b/src/filemanager/filegui.h
@@ -0,0 +1,40 @@
+/** \file  filegui.h
+ *  \brief Header: file management GUI for the text mode edition
+ */
+
+#ifndef MC__FILEGUI_H
+#define MC__FILEGUI_H
+
+#include "lib/global.h"
+#include "fileopctx.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void file_op_context_create_ui (file_op_context_t * ctx, gboolean with_eta,
+                                filegui_dialog_type_t dialog_type);
+void file_op_context_destroy_ui (file_op_context_t * ctx);
+
+char *file_mask_dialog (file_op_context_t * ctx, gboolean only_one, const char *format,
+                        const void *text, const char *def_text, gboolean * do_bg);
+
+FileProgressStatus check_progress_buttons (file_op_context_t * ctx);
+
+void file_progress_show (file_op_context_t * ctx, off_t done, off_t total,
+                         const char *stalled_msg, gboolean force_update);
+void file_progress_show_count (file_op_context_t * ctx, size_t done, size_t total);
+void file_progress_show_total (file_op_total_context_t * tctx, file_op_context_t * ctx,
+                               uintmax_t copied_bytes, gboolean show_summary);
+void file_progress_show_source (file_op_context_t * ctx, const vfs_path_t * vpath);
+void file_progress_show_target (file_op_context_t * ctx, const vfs_path_t * vpath);
+gboolean file_progress_show_deleting (file_op_context_t * ctx, const char *path, size_t * count);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__FILEGUI_H */
diff --git a/src/filemanager/filemanager.c b/src/filemanager/filemanager.c
new file mode 100644
index 0000000..b995024
--- /dev/null
+++ b/src/filemanager/filemanager.c
@@ -0,0 +1,1852 @@
+/*
+   Main dialog (file panels) of the Midnight Commander
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Miguel de Icaza, 1994, 1995, 1996, 1997
+   Janne Kukonlehto, 1994, 1995
+   Norbert Warmuth, 1997
+   Andrew Borodin <aborodin@vmail.ru>, 2009-2022
+   Slava Zanko <slavazanko@gmail.com>, 2013
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file filemanager.c
+ *  \brief Source: main dialog (file panels) of the Midnight Commander
+ */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <locale.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <sys/wait.h>
+#include <pwd.h>                /* for username in xterm title */
+
+#include "lib/global.h"
+#include "lib/fileloc.h"        /* MC_HINT */
+
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"        /* KEY_M_* masks */
+#include "lib/skin.h"
+#include "lib/util.h"
+
+#include "lib/vfs/vfs.h"
+
+#include "src/args.h"
+#ifdef ENABLE_SUBSHELL
+#include "src/subshell/subshell.h"
+#endif
+#include "src/execute.h"        /* toggle_subshell */
+#include "src/setup.h"          /* variables */
+#include "src/learn.h"          /* learn_keys() */
+#include "src/keymap.h"
+#include "lib/fileloc.h"        /* MC_FILEPOS_FILE */
+#include "lib/keybind.h"
+#include "lib/event.h"
+
+#include "tree.h"
+#include "boxes.h"              /* sort_box(), tree_box() */
+#include "layout.h"
+#include "cmd.h"                /* commands */
+#include "hotlist.h"
+#include "panelize.h"
+#include "command.h"            /* cmdline */
+#include "dir.h"                /* dir_list_clean() */
+
+#ifdef USE_INTERNAL_EDIT
+#include "src/editor/edit.h"
+#endif
+
+#ifdef USE_DIFF_VIEW
+#include "src/diffviewer/ydiff.h"
+#endif
+
+#include "src/consaver/cons.saver.h"    /* show_console_contents */
+#include "src/file_history.h"   /* show_file_history() */
+
+#include "filemanager.h"
+
+/*** global variables ****************************************************************************/
+
+/* When the modes are active, left_panel, right_panel and tree_panel */
+/* point to a proper data structure.  You should check with the functions */
+/* get_current_type and get_other_type the types of the panels before using */
+/* this pointer variables */
+
+/* The structures for the panels */
+WPanel *left_panel = NULL;
+WPanel *right_panel = NULL;
+/* Pointer to the selected and unselected panel */
+WPanel *current_panel = NULL;
+
+/* The Menubar */
+WMenuBar *the_menubar = NULL;
+/* The widget where we draw the prompt */
+WLabel *the_prompt;
+/* The hint bar */
+WLabel *the_hint;
+/* The button bar */
+WButtonBar *the_bar;
+
+/* The prompt */
+const char *mc_prompt = NULL;
+
+/*** file scope macro definitions ****************************************************************/
+
+#ifdef HAVE_CHARSET
+/*
+ * Don't restrict the output on the screen manager level,
+ * the translation tables take care of it.
+ */
+#endif /* !HAVE_CHARSET */
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static menu_t *left_menu, *right_menu;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/** Stop MC main dialog and the current dialog if it exists.
+  * Needed to provide fast exit from MC viewer or editor on shell exit */
+static void
+stop_dialogs (void)
+{
+    dlg_close (filemanager);
+
+    if (top_dlg != NULL)
+        dlg_close (DIALOG (top_dlg->data));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+treebox_cmd (void)
+{
+    char *sel_dir;
+
+    sel_dir = tree_box (panel_current_entry (current_panel)->fname->str);
+    if (sel_dir != NULL)
+    {
+        vfs_path_t *sel_vdir;
+
+        sel_vdir = vfs_path_from_str (sel_dir);
+        panel_cd (current_panel, sel_vdir, cd_exact);
+        vfs_path_free (sel_vdir, TRUE);
+        g_free (sel_dir);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef LISTMODE_EDITOR
+static void
+listmode_cmd (void)
+{
+    char *newmode;
+
+    if (get_current_type () != view_listing)
+        return;
+
+    newmode = listmode_edit (current_panel->user_format);
+    if (!newmode)
+        return;
+
+    g_free (current_panel->user_format);
+    current_panel->list_format = list_user;
+    current_panel->user_format = newmode;
+    set_panel_formats (current_panel);
+
+    do_refresh ();
+}
+#endif /* LISTMODE_EDITOR */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GList *
+create_panel_menu (void)
+{
+    GList *entries = NULL;
+
+    entries = g_list_prepend (entries, menu_entry_new (_("File listin&g"), CK_PanelListing));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Quick view"), CK_PanelQuickView));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Info"), CK_PanelInfo));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Tree"), CK_PanelTree));
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("&Listing format..."), CK_SetupListingFormat));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Sort order..."), CK_Sort));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Filter..."), CK_Filter));
+#ifdef HAVE_CHARSET
+    entries = g_list_prepend (entries, menu_entry_new (_("&Encoding..."), CK_SelectCodepage));
+#endif
+    entries = g_list_prepend (entries, menu_separator_new ());
+#ifdef ENABLE_VFS_FTP
+    entries = g_list_prepend (entries, menu_entry_new (_("FT&P link..."), CK_ConnectFtp));
+#endif
+#ifdef ENABLE_VFS_FISH
+    entries = g_list_prepend (entries, menu_entry_new (_("S&hell link..."), CK_ConnectFish));
+#endif
+#ifdef ENABLE_VFS_SFTP
+    entries = g_list_prepend (entries, menu_entry_new (_("SFTP li&nk..."), CK_ConnectSftp));
+#endif
+    entries = g_list_prepend (entries, menu_entry_new (_("Paneli&ze"), CK_Panelize));
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries = g_list_prepend (entries, menu_entry_new (_("&Rescan"), CK_Reread));
+
+    return g_list_reverse (entries);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GList *
+create_file_menu (void)
+{
+    GList *entries = NULL;
+
+    entries = g_list_prepend (entries, menu_entry_new (_("&View"), CK_View));
+    entries = g_list_prepend (entries, menu_entry_new (_("Vie&w file..."), CK_ViewFile));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Filtered view"), CK_ViewFiltered));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Edit"), CK_Edit));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Copy"), CK_Copy));
+    entries = g_list_prepend (entries, menu_entry_new (_("C&hmod"), CK_ChangeMode));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Link"), CK_Link));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Symlink"), CK_LinkSymbolic));
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("Relative symlin&k"), CK_LinkSymbolicRelative));
+    entries = g_list_prepend (entries, menu_entry_new (_("Edit s&ymlink"), CK_LinkSymbolicEdit));
+    entries = g_list_prepend (entries, menu_entry_new (_("Ch&own"), CK_ChangeOwn));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Advanced chown"), CK_ChangeOwnAdvanced));
+#ifdef ENABLE_EXT2FS_ATTR
+    entries = g_list_prepend (entries, menu_entry_new (_("Cha&ttr"), CK_ChangeAttributes));
+#endif
+    entries = g_list_prepend (entries, menu_entry_new (_("&Rename/Move"), CK_Move));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Mkdir"), CK_MakeDir));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Delete"), CK_Delete));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Quick cd"), CK_CdQuick));
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries = g_list_prepend (entries, menu_entry_new (_("Select &group"), CK_Select));
+    entries = g_list_prepend (entries, menu_entry_new (_("U&nselect group"), CK_Unselect));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Invert selection"), CK_SelectInvert));
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries = g_list_prepend (entries, menu_entry_new (_("E&xit"), CK_Quit));
+
+    return g_list_reverse (entries);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GList *
+create_command_menu (void)
+{
+    /* I know, I'm lazy, but the tree widget when it's not running
+     * as a panel still has some problems, I have not yet finished
+     * the WTree widget port, sorry.
+     */
+    GList *entries = NULL;
+
+    entries = g_list_prepend (entries, menu_entry_new (_("&User menu"), CK_UserMenu));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Directory tree"), CK_Tree));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Find file"), CK_Find));
+    entries = g_list_prepend (entries, menu_entry_new (_("S&wap panels"), CK_Swap));
+    entries = g_list_prepend (entries, menu_entry_new (_("Switch &panels on/off"), CK_Shell));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Compare directories"), CK_CompareDirs));
+#ifdef USE_DIFF_VIEW
+    entries = g_list_prepend (entries, menu_entry_new (_("C&ompare files"), CK_CompareFiles));
+#endif
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("E&xternal panelize"), CK_ExternalPanelize));
+    entries = g_list_prepend (entries, menu_entry_new (_("Show directory s&izes"), CK_DirSize));
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries = g_list_prepend (entries, menu_entry_new (_("Command &history"), CK_History));
+    entries =
+        g_list_prepend (entries,
+                        menu_entry_new (_("Viewed/edited files hi&story"), CK_EditorViewerHistory));
+    entries = g_list_prepend (entries, menu_entry_new (_("Di&rectory hotlist"), CK_HotList));
+#ifdef ENABLE_VFS
+    entries = g_list_prepend (entries, menu_entry_new (_("&Active VFS list"), CK_VfsList));
+#endif
+#ifdef ENABLE_BACKGROUND
+    entries = g_list_prepend (entries, menu_entry_new (_("&Background jobs"), CK_Jobs));
+#endif
+    entries = g_list_prepend (entries, menu_entry_new (_("Screen lis&t"), CK_ScreenList));
+    entries = g_list_prepend (entries, menu_separator_new ());
+#ifdef ENABLE_VFS_UNDELFS
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("&Undelete files (ext2fs only)"), CK_Undelete));
+#endif
+#ifdef LISTMODE_EDITOR
+    entries = g_list_prepend (entries, menu_entry_new (_("&Listing format edit"), CK_ListMode));
+#endif
+#if defined (ENABLE_VFS_UNDELFS) || defined (LISTMODE_EDITOR)
+    entries = g_list_prepend (entries, menu_separator_new ());
+#endif
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("Edit &extension file"), CK_EditExtensionsFile));
+    entries = g_list_prepend (entries, menu_entry_new (_("Edit &menu file"), CK_EditUserMenu));
+    entries =
+        g_list_prepend (entries,
+                        menu_entry_new (_("Edit hi&ghlighting group file"),
+                                        CK_EditFileHighlightFile));
+
+    return g_list_reverse (entries);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GList *
+create_options_menu (void)
+{
+    GList *entries = NULL;
+
+    entries = g_list_prepend (entries, menu_entry_new (_("&Configuration..."), CK_Options));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Layout..."), CK_OptionsLayout));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Panel options..."), CK_OptionsPanel));
+    entries = g_list_prepend (entries, menu_entry_new (_("C&onfirmation..."), CK_OptionsConfirm));
+    entries = g_list_prepend (entries, menu_entry_new (_("&Appearance..."), CK_OptionsAppearance));
+    entries =
+        g_list_prepend (entries, menu_entry_new (_("&Display bits..."), CK_OptionsDisplayBits));
+    entries = g_list_prepend (entries, menu_entry_new (_("Learn &keys..."), CK_LearnKeys));
+#ifdef ENABLE_VFS
+    entries = g_list_prepend (entries, menu_entry_new (_("&Virtual FS..."), CK_OptionsVfs));
+#endif
+    entries = g_list_prepend (entries, menu_separator_new ());
+    entries = g_list_prepend (entries, menu_entry_new (_("&Save setup"), CK_SaveSetup));
+
+    return g_list_reverse (entries);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+init_menu (void)
+{
+    left_menu = menu_new ("", create_panel_menu (), "[Left and Right Menus]");
+    menubar_add_menu (the_menubar, left_menu);
+    menubar_add_menu (the_menubar, menu_new (_("&File"), create_file_menu (), "[File Menu]"));
+    menubar_add_menu (the_menubar,
+                      menu_new (_("&Command"), create_command_menu (), "[Command Menu]"));
+    menubar_add_menu (the_menubar,
+                      menu_new (_("&Options"), create_options_menu (), "[Options Menu]"));
+    right_menu = menu_new ("", create_panel_menu (), "[Left and Right Menus]");
+    menubar_add_menu (the_menubar, right_menu);
+    update_menu ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+menu_last_selected_cmd (void)
+{
+    menubar_activate (the_menubar, drop_menus, -1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+menu_cmd (void)
+{
+    int selected;
+
+    if ((get_current_index () == 0) == current_panel->active)
+        selected = 0;
+    else
+        selected = g_list_length (the_menubar->menu) - 1;
+
+    menubar_activate (the_menubar, drop_menus, selected);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+sort_cmd (void)
+{
+    WPanel *p;
+    const panel_field_t *sort_order;
+
+    if (!SELECTED_IS_PANEL)
+        return;
+
+    p = MENU_PANEL;
+    sort_order = sort_box (&p->sort_info, p->sort_field);
+    panel_set_sort_order (p, sort_order);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+midnight_get_shortcut (long command)
+{
+    const char *ext_map;
+    const char *shortcut = NULL;
+
+    shortcut = keybind_lookup_keymap_shortcut (filemanager_map, command);
+    if (shortcut != NULL)
+        return g_strdup (shortcut);
+
+    shortcut = keybind_lookup_keymap_shortcut (panel_map, command);
+    if (shortcut != NULL)
+        return g_strdup (shortcut);
+
+    ext_map = keybind_lookup_keymap_shortcut (filemanager_map, CK_ExtendedKeyMap);
+    if (ext_map != NULL)
+        shortcut = keybind_lookup_keymap_shortcut (filemanager_x_map, command);
+    if (shortcut != NULL)
+        return g_strdup_printf ("%s %s", ext_map, shortcut);
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+midnight_get_title (const WDialog * h, size_t len)
+{
+    char *path;
+    char *login;
+    char *p;
+
+    (void) h;
+
+    title_path_prepare (&path, &login);
+
+    p = g_strdup_printf ("%s [%s]:%s", _("Panels:"), login, path);
+    g_free (path);
+    g_free (login);
+    path = g_strdup (str_trunc (p, len - 4));
+    g_free (p);
+
+    return path;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+toggle_panels_split (void)
+{
+    panels_layout.horizontal_split = !panels_layout.horizontal_split;
+    layout_change ();
+    do_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS
+/* event helper */
+static gboolean
+check_panel_timestamp (const WPanel * panel, panel_view_mode_t mode, struct vfs_class *vclass,
+                       vfsid id)
+{
+    if (mode == view_listing)
+    {
+        const struct vfs_class *me;
+
+        me = vfs_path_get_last_path_vfs (panel->cwd_vpath);
+        if (me != vclass)
+            return FALSE;
+
+        if (vfs_getid (panel->cwd_vpath) != id)
+            return FALSE;
+    }
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* event callback */
+static gboolean
+check_current_panel_timestamp (const gchar * event_group_name, const gchar * event_name,
+                               gpointer init_data, gpointer data)
+{
+    ev_vfs_stamp_create_t *event_data = (ev_vfs_stamp_create_t *) data;
+
+    (void) event_group_name;
+    (void) event_name;
+    (void) init_data;
+
+    event_data->ret =
+        check_panel_timestamp (current_panel, get_current_type (), event_data->vclass,
+                               event_data->id);
+    return !event_data->ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* event callback */
+static gboolean
+check_other_panel_timestamp (const gchar * event_group_name, const gchar * event_name,
+                             gpointer init_data, gpointer data)
+{
+    ev_vfs_stamp_create_t *event_data = (ev_vfs_stamp_create_t *) data;
+
+    (void) event_group_name;
+    (void) event_name;
+    (void) init_data;
+
+    event_data->ret =
+        check_panel_timestamp (other_panel, get_other_type (), event_data->vclass, event_data->id);
+    return !event_data->ret;
+}
+#endif /* ENABLE_VFS */
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* event callback */
+static gboolean
+print_vfs_message (const gchar * event_group_name, const gchar * event_name,
+                   gpointer init_data, gpointer data)
+{
+    ev_vfs_print_message_t *event_data = (ev_vfs_print_message_t *) data;
+
+    (void) event_group_name;
+    (void) event_name;
+    (void) init_data;
+
+    if (mc_global.midnight_shutdown)
+        goto ret;
+
+    if (!mc_global.message_visible || the_hint == NULL || WIDGET (the_hint)->owner == NULL)
+    {
+        int col, row;
+
+        if (!nice_rotating_dash || (ok_to_refresh <= 0))
+            goto ret;
+
+        /* Preserve current cursor position */
+        tty_getyx (&row, &col);
+
+        tty_gotoyx (0, 0);
+        tty_setcolor (NORMAL_COLOR);
+        tty_print_string (str_fit_to_term (event_data->msg, COLS - 1, J_LEFT));
+
+        /* Restore cursor position */
+        tty_gotoyx (row, col);
+        mc_refresh ();
+        goto ret;
+    }
+
+    if (mc_global.message_visible)
+        set_hintbar (event_data->msg);
+
+  ret:
+    MC_PTR_FREE (event_data->msg);
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+create_panels (void)
+{
+    int current_index, other_index;
+    panel_view_mode_t current_mode, other_mode;
+    char *current_dir, *other_dir;
+    vfs_path_t *original_dir;
+
+    /*
+     * Following cases from command line are possible:
+     * 'mc' (no arguments):            mc_run_param0 == NULL, mc_run_param1 == NULL
+     *                                 active panel uses current directory
+     *                                 passive panel uses "other_dir" from panels.ini
+     *
+     * 'mc dir1 dir2' (two arguments): mc_run_param0 != NULL, mc_run_param1 != NULL
+     *                                 active panel uses mc_run_param0
+     *                                 passive panel uses mc_run_param1
+     *
+     * 'mc dir1' (single argument):    mc_run_param0 != NULL, mc_run_param1 == NULL
+     *                                 active panel uses mc_run_param0
+     *                                 passive panel uses "other_dir" from panels.ini
+     */
+
+    /* Set up panel directories */
+    if (boot_current_is_left)
+    {
+        /* left panel is active */
+        current_index = 0;
+        other_index = 1;
+        current_mode = startup_left_mode;
+        other_mode = startup_right_mode;
+
+        if (mc_run_param0 == NULL && mc_run_param1 == NULL)
+        {
+            /* no arguments */
+            current_dir = NULL; /* assume current dir */
+            other_dir = saved_other_dir;        /* from ini */
+        }
+        else if (mc_run_param0 != NULL && mc_run_param1 != NULL)
+        {
+            /* two arguments */
+            current_dir = (char *) mc_run_param0;
+            other_dir = mc_run_param1;
+        }
+        else                    /* mc_run_param0 != NULL && mc_run_param1 == NULL */
+        {
+            /* one argument */
+            current_dir = (char *) mc_run_param0;
+            other_dir = saved_other_dir;        /* from ini */
+        }
+    }
+    else
+    {
+        /* right panel is active */
+        current_index = 1;
+        other_index = 0;
+        current_mode = startup_right_mode;
+        other_mode = startup_left_mode;
+
+        if (mc_run_param0 == NULL && mc_run_param1 == NULL)
+        {
+            /* no arguments */
+            current_dir = NULL; /* assume current dir */
+            other_dir = saved_other_dir;        /* from ini */
+        }
+        else if (mc_run_param0 != NULL && mc_run_param1 != NULL)
+        {
+            /* two arguments */
+            current_dir = (char *) mc_run_param0;
+            other_dir = mc_run_param1;
+        }
+        else                    /* mc_run_param0 != NULL && mc_run_param1 == NULL */
+        {
+            /* one argument */
+            current_dir = (char *) mc_run_param0;
+            other_dir = saved_other_dir;        /* from ini */
+        }
+    }
+
+    /* 1. Get current dir */
+    original_dir = vfs_path_clone (vfs_get_raw_current_dir ());
+
+    /* 2. Create passive panel */
+    if (other_dir != NULL)
+    {
+        vfs_path_t *vpath;
+
+        if (g_path_is_absolute (other_dir))
+            vpath = vfs_path_from_str (other_dir);
+        else
+            vpath = vfs_path_append_new (original_dir, other_dir, (char *) NULL);
+        mc_chdir (vpath);
+        vfs_path_free (vpath, TRUE);
+    }
+    create_panel (other_index, other_mode);
+
+    /* 3. Create active panel */
+    if (current_dir == NULL)
+        mc_chdir (original_dir);
+    else
+    {
+        vfs_path_t *vpath;
+
+        if (g_path_is_absolute (current_dir))
+            vpath = vfs_path_from_str (current_dir);
+        else
+            vpath = vfs_path_append_new (original_dir, current_dir, (char *) NULL);
+        mc_chdir (vpath);
+        vfs_path_free (vpath, TRUE);
+    }
+    create_panel (current_index, current_mode);
+
+    if (startup_left_mode == view_listing)
+        current_panel = left_panel;
+    else if (right_panel != NULL)
+        current_panel = right_panel;
+    else
+        current_panel = left_panel;
+
+    vfs_path_free (original_dir, TRUE);
+
+#ifdef ENABLE_VFS
+    mc_event_add (MCEVENT_GROUP_CORE, "vfs_timestamp", check_other_panel_timestamp, NULL, NULL);
+    mc_event_add (MCEVENT_GROUP_CORE, "vfs_timestamp", check_current_panel_timestamp, NULL, NULL);
+#endif /* ENABLE_VFS */
+
+    mc_event_add (MCEVENT_GROUP_CORE, "vfs_print_message", print_vfs_message, NULL, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+midnight_put_panel_path (WPanel * panel)
+{
+    vfs_path_t *cwd_vpath;
+    const char *cwd_vpath_str;
+
+    if (!command_prompt)
+        return;
+
+#ifdef HAVE_CHARSET
+    cwd_vpath = remove_encoding_from_path (panel->cwd_vpath);
+#else
+    cwd_vpath = vfs_path_clone (panel->cwd_vpath);
+#endif
+
+    cwd_vpath_str = vfs_path_as_str (cwd_vpath);
+
+    command_insert (cmdline, cwd_vpath_str, FALSE);
+
+    if (!IS_PATH_SEP (cwd_vpath_str[strlen (cwd_vpath_str) - 1]))
+        command_insert (cmdline, PATH_SEP_STR, FALSE);
+
+    vfs_path_free (cwd_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_link (WPanel * panel)
+{
+    const file_entry_t *fe;
+
+    if (!command_prompt)
+        return;
+
+    fe = panel_current_entry (panel);
+
+    if (S_ISLNK (fe->st.st_mode))
+    {
+        char buffer[MC_MAXPATHLEN];
+        vfs_path_t *vpath;
+        int i;
+
+        vpath = vfs_path_append_new (panel->cwd_vpath, fe->fname->str, (char *) NULL);
+        i = mc_readlink (vpath, buffer, sizeof (buffer) - 1);
+        vfs_path_free (vpath, TRUE);
+
+        if (i > 0)
+        {
+            buffer[i] = '\0';
+            command_insert (cmdline, buffer, TRUE);
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_current_link (void)
+{
+    put_link (current_panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_other_link (void)
+{
+    if (get_other_type () == view_listing)
+        put_link (other_panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Insert the selected file name into the input line */
+static void
+put_current_selected (void)
+{
+    const char *tmp;
+
+    if (!command_prompt)
+        return;
+
+    if (get_current_type () == view_tree)
+    {
+        WTree *tree;
+        const vfs_path_t *selected_name;
+
+        tree = (WTree *) get_panel_widget (get_current_index ());
+        selected_name = tree_selected_name (tree);
+        tmp = vfs_path_as_str (selected_name);
+    }
+    else
+        tmp = panel_current_entry (current_panel)->fname->str;
+
+    command_insert (cmdline, tmp, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_tagged (WPanel * panel)
+{
+    if (!command_prompt)
+        return;
+    input_disable_update (cmdline);
+    if (panel->marked)
+    {
+        int i;
+
+        for (i = 0; i < panel->dir.len; i++)
+            if (panel->dir.list[i].f.marked != 0)
+                command_insert (cmdline, panel->dir.list[i].fname->str, TRUE);
+    }
+    else
+        command_insert (cmdline, panel_current_entry (panel)->fname->str, TRUE);
+
+    input_enable_update (cmdline);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_current_tagged (void)
+{
+    put_tagged (current_panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+put_other_tagged (void)
+{
+    if (get_other_type () == view_listing)
+        put_tagged (other_panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+setup_mc (void)
+{
+#ifdef HAVE_SLANG
+#ifdef HAVE_CHARSET
+    tty_display_8bit (TRUE);
+#else
+    tty_display_8bit (mc_global.full_eight_bits);
+#endif /* HAVE_CHARSET */
+
+#else /* HAVE_SLANG */
+
+#ifdef HAVE_CHARSET
+    tty_display_8bit (TRUE);
+#else
+    tty_display_8bit (mc_global.eight_bit_clean);
+#endif /* HAVE_CHARSET */
+#endif /* HAVE_SLANG */
+
+    if ((tty_baudrate () < 9600) || mc_global.tty.slow_terminal)
+        verbose = FALSE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+setup_dummy_mc (void)
+{
+    vfs_path_t *vpath;
+    char *d;
+    int ret;
+
+    d = vfs_get_cwd ();
+    setup_mc ();
+    vpath = vfs_path_from_str (d);
+    ret = mc_chdir (vpath);
+    (void) ret;
+    vfs_path_free (vpath, TRUE);
+    g_free (d);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+done_mc (void)
+{
+    /* Setup shutdown
+     *
+     * We sync the profiles since the hotlist may have changed, while
+     * we only change the setup data if we have the auto save feature set
+     */
+
+    save_setup (auto_save_setup, panels_options.auto_save_setup);
+
+    vfs_stamp_path (vfs_get_raw_current_dir ());
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+create_file_manager (void)
+{
+    Widget *w = WIDGET (filemanager);
+    WGroup *g = GROUP (filemanager);
+
+    w->keymap = filemanager_map;
+    w->ext_keymap = filemanager_x_map;
+
+    filemanager->get_shortcut = midnight_get_shortcut;
+    filemanager->get_title = midnight_get_title;
+    /* allow rebind tab */
+    widget_want_tab (w, TRUE);
+
+    the_menubar = menubar_new (NULL);
+    group_add_widget (g, the_menubar);
+    init_menu ();
+
+    create_panels ();
+    group_add_widget (g, get_panel_widget (0));
+    group_add_widget (g, get_panel_widget (1));
+
+    the_hint = label_new (0, 0, NULL);
+    the_hint->transparent = TRUE;
+    the_hint->auto_adjust_cols = 0;
+    WIDGET (the_hint)->rect.cols = COLS;
+    group_add_widget (g, the_hint);
+
+    cmdline = command_new (0, 0, 0);
+    group_add_widget (g, cmdline);
+
+    the_prompt = label_new (0, 0, mc_prompt);
+    the_prompt->transparent = TRUE;
+    group_add_widget (g, the_prompt);
+
+    the_bar = buttonbar_new ();
+    group_add_widget (g, the_bar);
+    midnight_set_buttonbar (the_bar);
+
+#ifdef ENABLE_SUBSHELL
+    /* Must be done after creation of cmdline and prompt widgets to avoid potential
+       NULL dereference in load_prompt() -> ... -> setup_cmdline() -> label_set_text(). */
+    if (mc_global.tty.use_subshell)
+        add_select_channel (mc_global.tty.subshell_pty, load_prompt, NULL);
+#endif /* !ENABLE_SUBSHELL */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** result must be free'd (I think this should go in util.c) */
+static vfs_path_t *
+prepend_cwd_on_local (const char *filename)
+{
+    vfs_path_t *vpath;
+
+    vpath = vfs_path_from_str (filename);
+    if (!vfs_file_is_local (vpath) || g_path_is_absolute (filename))
+        return vpath;
+
+    vfs_path_free (vpath, TRUE);
+
+    return vfs_path_append_new (vfs_get_raw_current_dir (), filename, (char *) NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Invoke the internal view/edit routine with:
+ * the default processing and forcing the internal viewer/editor
+ */
+static gboolean
+mc_maybe_editor_or_viewer (void)
+{
+    gboolean ret;
+
+    switch (mc_global.mc_run_mode)
+    {
+#ifdef USE_INTERNAL_EDIT
+    case MC_RUN_EDITOR:
+        ret = edit_files ((GList *) mc_run_param0);
+        break;
+#endif /* USE_INTERNAL_EDIT */
+    case MC_RUN_VIEWER:
+        {
+            vfs_path_t *vpath = NULL;
+
+            if (mc_run_param0 != NULL && *(char *) mc_run_param0 != '\0')
+                vpath = prepend_cwd_on_local ((char *) mc_run_param0);
+
+            ret = view_file (vpath, FALSE, TRUE);
+            vfs_path_free (vpath, TRUE);
+            break;
+        }
+#ifdef USE_DIFF_VIEW
+    case MC_RUN_DIFFVIEWER:
+        ret = dview_diff_cmd (mc_run_param0, mc_run_param1);
+        break;
+#endif /* USE_DIFF_VIEW */
+    default:
+        ret = FALSE;
+    }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+show_editor_viewer_history (void)
+{
+    char *s;
+    int act;
+
+    s = show_file_history (WIDGET (filemanager), &act);
+    if (s != NULL)
+    {
+        vfs_path_t *s_vpath;
+
+        switch (act)
+        {
+        case CK_Edit:
+            s_vpath = vfs_path_from_str (s);
+            edit_file_at_line (s_vpath, use_internal_edit, 0);
+            break;
+
+        case CK_View:
+            s_vpath = vfs_path_from_str (s);
+            view_file (s_vpath, use_internal_view, FALSE);
+            break;
+
+        default:
+            {
+                char *d;
+
+                d = g_path_get_dirname (s);
+                s_vpath = vfs_path_from_str (d);
+                panel_cd (current_panel, s_vpath, cd_exact);
+                panel_set_current_by_name (current_panel, s);
+                g_free (d);
+            }
+        }
+
+        g_free (s);
+        vfs_path_free (s_vpath, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+quit_cmd_internal (int quiet)
+{
+    int q = quit;
+    size_t n;
+
+    n = dialog_switch_num () - 1;
+    if (n != 0)
+    {
+        char msg[BUF_MEDIUM];
+
+        g_snprintf (msg, sizeof (msg),
+                    ngettext ("You have %zu opened screen. Quit anyway?",
+                              "You have %zu opened screens. Quit anyway?", n), n);
+
+        if (query_dialog (_("The Midnight Commander"), msg, D_NORMAL, 2, _("&Yes"), _("&No")) != 0)
+            return FALSE;
+        q = 1;
+    }
+    else if (quiet || !confirm_exit)
+        q = 1;
+    else if (query_dialog (_("The Midnight Commander"),
+                           _("Do you really want to quit the Midnight Commander?"),
+                           D_NORMAL, 2, _("&Yes"), _("&No")) == 0)
+        q = 1;
+
+    if (q != 0)
+    {
+#ifdef ENABLE_SUBSHELL
+        if (!mc_global.tty.use_subshell)
+            stop_dialogs ();
+        else if ((q = exit_subshell ()? 1 : 0) != 0)
+#endif
+            stop_dialogs ();
+    }
+
+    if (q != 0)
+        quit |= 1;
+    return (quit != 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+quit_cmd (void)
+{
+    return quit_cmd_internal (0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Repaint the contents of the panels without frames.  To schedule panel
+ * for repainting, set panel->dirty to TRUE.  There are many reasons why
+ * the panels need to be repainted, and this is a costly operation, so
+ * it's done once per event.
+ */
+
+static void
+update_dirty_panels (void)
+{
+    if (get_current_type () == view_listing && current_panel->dirty)
+        widget_draw (WIDGET (current_panel));
+
+    if (get_other_type () == view_listing && other_panel->dirty)
+        widget_draw (WIDGET (other_panel));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+toggle_show_hidden (void)
+{
+    panels_options.show_dot_files = !panels_options.show_dot_files;
+    update_panels (UP_RELOAD, UP_KEEPSEL);
+    /* redraw panels forced */
+    update_dirty_panels ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+midnight_execute_cmd (Widget * sender, long command)
+{
+    cb_ret_t res = MSG_HANDLED;
+
+    (void) sender;
+
+    /* stop quick search before executing any command */
+    send_message (current_panel, NULL, MSG_ACTION, CK_SearchStop, NULL);
+
+    switch (command)
+    {
+    case CK_ChangePanel:
+        (void) change_panel ();
+        break;
+    case CK_HotListAdd:
+        add2hotlist_cmd (current_panel);
+        break;
+    case CK_SetupListingFormat:
+        setup_listing_format_cmd ();
+        break;
+    case CK_ChangeMode:
+        chmod_cmd (current_panel);
+        break;
+    case CK_ChangeOwn:
+        chown_cmd (current_panel);
+        break;
+    case CK_ChangeOwnAdvanced:
+        advanced_chown_cmd (current_panel);
+        break;
+#ifdef ENABLE_EXT2FS_ATTR
+    case CK_ChangeAttributes:
+        chattr_cmd (current_panel);
+        break;
+#endif
+    case CK_CompareDirs:
+        compare_dirs_cmd ();
+        break;
+    case CK_Options:
+        configure_box ();
+        break;
+#ifdef ENABLE_VFS
+    case CK_OptionsVfs:
+        configure_vfs_box ();
+        break;
+#endif
+    case CK_OptionsConfirm:
+        confirm_box ();
+        break;
+    case CK_Copy:
+        copy_cmd (current_panel);
+        break;
+    case CK_PutCurrentPath:
+        midnight_put_panel_path (current_panel);
+        break;
+    case CK_PutCurrentSelected:
+        put_current_selected ();
+        break;
+    case CK_PutCurrentFullSelected:
+        midnight_put_panel_path (current_panel);
+        put_current_selected ();
+        break;
+    case CK_PutCurrentLink:
+        put_current_link ();
+        break;
+    case CK_PutCurrentTagged:
+        put_current_tagged ();
+        break;
+    case CK_PutOtherPath:
+        if (get_other_type () == view_listing)
+            midnight_put_panel_path (other_panel);
+        break;
+    case CK_PutOtherLink:
+        put_other_link ();
+        break;
+    case CK_PutOtherTagged:
+        put_other_tagged ();
+        break;
+    case CK_Delete:
+        delete_cmd (current_panel);
+        break;
+    case CK_ScreenList:
+        dialog_switch_list ();
+        break;
+#ifdef USE_DIFF_VIEW
+    case CK_CompareFiles:
+        diff_view_cmd ();
+        break;
+#endif
+    case CK_OptionsDisplayBits:
+        display_bits_box ();
+        break;
+    case CK_Edit:
+        edit_cmd (current_panel);
+        break;
+#ifdef USE_INTERNAL_EDIT
+    case CK_EditForceInternal:
+        edit_cmd_force_internal (current_panel);
+        break;
+#endif
+    case CK_EditExtensionsFile:
+        ext_cmd ();
+        break;
+    case CK_EditFileHighlightFile:
+        edit_fhl_cmd ();
+        break;
+    case CK_EditUserMenu:
+        edit_mc_menu_cmd ();
+        break;
+    case CK_LinkSymbolicEdit:
+        edit_symlink_cmd ();
+        break;
+    case CK_ExternalPanelize:
+        external_panelize_cmd ();
+        break;
+    case CK_ViewFiltered:
+        view_filtered_cmd (current_panel);
+        break;
+    case CK_Find:
+        find_cmd (current_panel);
+        break;
+#ifdef ENABLE_VFS_FISH
+    case CK_ConnectFish:
+        fishlink_cmd ();
+        break;
+#endif
+#ifdef ENABLE_VFS_FTP
+    case CK_ConnectFtp:
+        ftplink_cmd ();
+        break;
+#endif
+#ifdef ENABLE_VFS_SFTP
+    case CK_ConnectSftp:
+        sftplink_cmd ();
+        break;
+#endif
+    case CK_Panelize:
+        panel_panelize_cd ();
+        break;
+    case CK_Help:
+        help_cmd ();
+        break;
+    case CK_History:
+        /* show the history of command line widget */
+        send_message (cmdline, NULL, MSG_ACTION, CK_History, NULL);
+        break;
+    case CK_PanelInfo:
+        if (sender == WIDGET (the_menubar))
+            info_cmd ();        /* menu */
+        else
+            info_cmd_no_menu ();        /* shortcut or buttonbar */
+        break;
+#ifdef ENABLE_BACKGROUND
+    case CK_Jobs:
+        jobs_box ();
+        break;
+#endif
+    case CK_OptionsLayout:
+        layout_box ();
+        break;
+    case CK_OptionsAppearance:
+        appearance_box ();
+        break;
+    case CK_LearnKeys:
+        learn_keys ();
+        break;
+    case CK_Link:
+        link_cmd (LINK_HARDLINK);
+        break;
+    case CK_PanelListing:
+        listing_cmd ();
+        break;
+#ifdef LISTMODE_EDITOR
+    case CK_ListMode:
+        listmode_cmd ();
+        break;
+#endif
+    case CK_Menu:
+        menu_cmd ();
+        break;
+    case CK_MenuLastSelected:
+        menu_last_selected_cmd ();
+        break;
+    case CK_MakeDir:
+        mkdir_cmd (current_panel);
+        break;
+    case CK_OptionsPanel:
+        panel_options_box ();
+        break;
+#ifdef HAVE_CHARSET
+    case CK_SelectCodepage:
+        encoding_cmd ();
+        break;
+#endif
+    case CK_CdQuick:
+        quick_cd_cmd (current_panel);
+        break;
+    case CK_HotList:
+        hotlist_cmd (current_panel);
+        break;
+    case CK_PanelQuickView:
+        if (sender == WIDGET (the_menubar))
+            quick_view_cmd ();  /* menu */
+        else
+            quick_cmd_no_menu ();       /* shortcut or buttonabr */
+        break;
+    case CK_QuitQuiet:
+        quiet_quit_cmd ();
+        break;
+    case CK_Quit:
+        quit_cmd ();
+        break;
+    case CK_LinkSymbolicRelative:
+        link_cmd (LINK_SYMLINK_RELATIVE);
+        break;
+    case CK_Move:
+        rename_cmd (current_panel);
+        break;
+    case CK_Reread:
+        reread_cmd ();
+        break;
+#ifdef ENABLE_VFS
+    case CK_VfsList:
+        vfs_list (current_panel);
+        break;
+#endif
+    case CK_SaveSetup:
+        save_setup_cmd ();
+        break;
+    case CK_Select:
+    case CK_Unselect:
+    case CK_SelectInvert:
+    case CK_Filter:
+        res = send_message (current_panel, filemanager, MSG_ACTION, command, NULL);
+        break;
+    case CK_Shell:
+        toggle_subshell ();
+        break;
+    case CK_DirSize:
+        smart_dirsize_cmd (current_panel);
+        break;
+    case CK_Sort:
+        sort_cmd ();
+        break;
+    case CK_ExtendedKeyMap:
+        WIDGET (filemanager)->ext_mode = TRUE;
+        break;
+    case CK_Suspend:
+        mc_event_raise (MCEVENT_GROUP_CORE, "suspend", NULL);
+        break;
+    case CK_Swap:
+        swap_cmd ();
+        break;
+    case CK_LinkSymbolic:
+        link_cmd (LINK_SYMLINK_ABSOLUTE);
+        break;
+    case CK_ShowHidden:
+        toggle_show_hidden ();
+        break;
+    case CK_SplitVertHoriz:
+        toggle_panels_split ();
+        break;
+    case CK_SplitEqual:
+        panels_split_equal ();
+        break;
+    case CK_SplitMore:
+        panels_split_more ();
+        break;
+    case CK_SplitLess:
+        panels_split_less ();
+        break;
+    case CK_PanelTree:
+        panel_tree_cmd ();
+        break;
+    case CK_Tree:
+        treebox_cmd ();
+        break;
+#ifdef ENABLE_VFS_UNDELFS
+    case CK_Undelete:
+        undelete_cmd ();
+        break;
+#endif
+    case CK_UserMenu:
+        user_file_menu_cmd ();
+        break;
+    case CK_View:
+        view_cmd (current_panel);
+        break;
+    case CK_ViewFile:
+        view_file_cmd (current_panel);
+        break;
+    case CK_EditorViewerHistory:
+        show_editor_viewer_history ();
+        break;
+    case CK_Cancel:
+        /* don't close panels due to SIGINT */
+        break;
+    default:
+        res = MSG_NOT_HANDLED;
+    }
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Whether the command-line should not respond to key events.
+ *
+ * This is TRUE if a QuickView or TreeView have the focus, as they're going
+ * to consume some keys and there's no sense in passing to the command-line
+ * just the leftovers.
+ */
+static gboolean
+is_cmdline_mute (void)
+{
+    /* When one of panels is other than view_listing,
+       current_panel points to view_listing panel all time independently of
+       it's activity. Thus, we can't use get_current_type() here.
+       current_panel should point to actually current active panel
+       independently of it's type. */
+    return (!current_panel->active
+            && (get_other_type () == view_quick || get_other_type () == view_tree));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Handles the Enter key on the command-line.
+ *
+ * Returns TRUE if non-whitespace was indeed processed.
+ */
+static gboolean
+handle_cmdline_enter (void)
+{
+    const char *s;
+
+    for (s = input_get_ctext (cmdline); *s != '\0' && whitespace (*s); s++)
+        ;
+
+    if (*s != '\0')
+    {
+        send_message (cmdline, NULL, MSG_KEY, '\n', NULL);
+        return TRUE;
+    }
+
+    input_insert (cmdline, "", FALSE);
+    cmdline->point = 0;
+
+    return FALSE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+midnight_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    long command;
+
+    switch (msg)
+    {
+    case MSG_INIT:
+        panel_init ();
+        setup_panels ();
+        return MSG_HANDLED;
+
+    case MSG_DRAW:
+        load_hint (TRUE);
+        group_default_callback (w, NULL, MSG_DRAW, 0, NULL);
+        /* We handle the special case of the output lines */
+        if (mc_global.tty.console_flag != '\0' && output_lines != 0)
+        {
+            unsigned char end_line;
+
+            end_line = LINES - (mc_global.keybar_visible ? 1 : 0) - 1;
+            show_console_contents (output_start_y, end_line - output_lines, end_line);
+        }
+        return MSG_HANDLED;
+
+    case MSG_RESIZE:
+        widget_adjust_position (w->pos_flags, &w->rect);
+        setup_panels ();
+        menubar_arrange (the_menubar);
+        return MSG_HANDLED;
+
+    case MSG_IDLE:
+        /* We only need the first idle event to show user menu after start */
+        widget_idle (w, FALSE);
+
+        if (boot_current_is_left)
+            widget_select (get_panel_widget (0));
+        else
+            widget_select (get_panel_widget (1));
+
+        if (auto_menu)
+            midnight_execute_cmd (NULL, CK_UserMenu);
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        if (w->ext_mode)
+        {
+            command = widget_lookup_key (w, parm);
+            if (command != CK_IgnoreKey)
+                return midnight_execute_cmd (NULL, command);
+        }
+
+        /* FIXME: should handle all menu shortcuts before this point */
+        if (widget_get_state (WIDGET (the_menubar), WST_FOCUSED))
+            return MSG_NOT_HANDLED;
+
+        if (parm == '\n' && !is_cmdline_mute ())
+        {
+            if (handle_cmdline_enter ())
+                return MSG_HANDLED;
+            /* Else: the panel will handle it. */
+        }
+
+        if ((!mc_global.tty.alternate_plus_minus
+             || !(mc_global.tty.console_flag != '\0' || mc_global.tty.xterm_flag)) && !quote
+            && !current_panel->quick_search.active)
+        {
+            if (!only_leading_plus_minus)
+            {
+                /* Special treatment, since the input line will eat them */
+                if (parm == '+')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_Select, NULL);
+
+                if (parm == '\\' || parm == '-')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_Unselect, NULL);
+
+                if (parm == '*')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_SelectInvert,
+                                         NULL);
+            }
+            else if (!command_prompt || input_is_empty (cmdline))
+            {
+                /* Special treatment '+', '-', '\', '*' only when this is
+                 * first char on input line
+                 */
+                if (parm == '+')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_Select, NULL);
+
+                if (parm == '\\' || parm == '-')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_Unselect, NULL);
+
+                if (parm == '*')
+                    return send_message (current_panel, filemanager, MSG_ACTION, CK_SelectInvert,
+                                         NULL);
+            }
+        }
+        return MSG_NOT_HANDLED;
+
+    case MSG_HOTKEY_HANDLED:
+        if ((get_current_type () == view_listing) && current_panel->quick_search.active)
+        {
+            current_panel->dirty = TRUE;        /* FIXME: unneeded? */
+            send_message (current_panel, NULL, MSG_ACTION, CK_SearchStop, NULL);
+        }
+        return MSG_HANDLED;
+
+    case MSG_UNHANDLED_KEY:
+        {
+            cb_ret_t v = MSG_NOT_HANDLED;
+
+            command = widget_lookup_key (w, parm);
+            if (command != CK_IgnoreKey)
+                v = midnight_execute_cmd (NULL, command);
+
+            if (v == MSG_NOT_HANDLED && command_prompt && !is_cmdline_mute ())
+                v = send_message (cmdline, NULL, MSG_KEY, parm, NULL);
+
+            return v;
+        }
+
+    case MSG_POST_KEY:
+        if (!widget_get_state (WIDGET (the_menubar), WST_FOCUSED))
+            update_dirty_panels ();
+        return MSG_HANDLED;
+
+    case MSG_ACTION:
+        /* Handle shortcuts, menu, and buttonbar. */
+        return midnight_execute_cmd (sender, parm);
+
+    case MSG_DESTROY:
+        panel_deinit ();
+        return MSG_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+update_menu (void)
+{
+    menu_set_name (left_menu, panels_layout.horizontal_split ? _("&Above") : _("&Left"));
+    menu_set_name (right_menu, panels_layout.horizontal_split ? _("&Below") : _("&Right"));
+    menubar_arrange (the_menubar);
+    widget_set_visibility (WIDGET (the_menubar), menubar_visible);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+midnight_set_buttonbar (WButtonBar * b)
+{
+    Widget *w = WIDGET (filemanager);
+
+    buttonbar_set_label (b, 1, Q_ ("ButtonBar|Help"), w->keymap, NULL);
+    buttonbar_set_label (b, 2, Q_ ("ButtonBar|Menu"), w->keymap, NULL);
+    buttonbar_set_label (b, 3, Q_ ("ButtonBar|View"), w->keymap, NULL);
+    buttonbar_set_label (b, 4, Q_ ("ButtonBar|Edit"), w->keymap, NULL);
+    buttonbar_set_label (b, 5, Q_ ("ButtonBar|Copy"), w->keymap, NULL);
+    buttonbar_set_label (b, 6, Q_ ("ButtonBar|RenMov"), w->keymap, NULL);
+    buttonbar_set_label (b, 7, Q_ ("ButtonBar|Mkdir"), w->keymap, NULL);
+    buttonbar_set_label (b, 8, Q_ ("ButtonBar|Delete"), w->keymap, NULL);
+    buttonbar_set_label (b, 9, Q_ ("ButtonBar|PullDn"), w->keymap, NULL);
+    buttonbar_set_label (b, 10, Q_ ("ButtonBar|Quit"), w->keymap, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Return a random hint.  If force is TRUE, ignore the timeout.
+ */
+
+char *
+get_random_hint (gboolean force)
+{
+    static const gint64 update_period = 60 * G_USEC_PER_SEC;
+    static gint64 tv = 0;
+
+    char *data, *result, *eop;
+    size_t len, start;
+    GIConv conv;
+
+    /* Do not change hints more often than one minute */
+    if (!force && !mc_time_elapsed (&tv, update_period))
+        return g_strdup ("");
+
+    data = load_mc_home_file (mc_global.share_data_dir, MC_HINT, NULL, &len);
+    if (data == NULL)
+        return NULL;
+
+    /* get a random entry */
+    srand ((unsigned int) (tv / G_USEC_PER_SEC));
+    start = ((size_t) rand ()) % (len - 1);
+
+    /* Search the start of paragraph */
+    for (; start != 0; start--)
+        if (data[start] == '\n' && data[start + 1] == '\n')
+        {
+            start += 2;
+            break;
+        }
+
+    /* Search the end of paragraph */
+    for (eop = data + start; *eop != '\0'; eop++)
+    {
+        if (*eop == '\n' && *(eop + 1) == '\n')
+        {
+            *eop = '\0';
+            break;
+        }
+        if (*eop == '\n')
+            *eop = ' ';
+    }
+
+    /* hint files are stored in utf-8 */
+    /* try convert hint file from utf-8 to terminal encoding */
+    conv = str_crt_conv_from ("UTF-8");
+    if (conv == INVALID_CONV)
+        result = g_strndup (data + start, len - start);
+    else
+    {
+        GString *buffer;
+        gboolean nok;
+
+        buffer = g_string_sized_new (len - start);
+        nok = (str_convert (conv, data + start, buffer) == ESTR_FAILURE);
+        result = g_string_free (buffer, nok);
+        str_close_conv (conv);
+    }
+
+    g_free (data);
+    return result;
+}
+
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Load new hint and display it.
+ * IF force is not 0, ignore the timeout.
+ */
+
+void
+load_hint (gboolean force)
+{
+    char *hint;
+
+    if (WIDGET (the_hint)->owner == NULL)
+        return;
+
+    if (!mc_global.message_visible)
+    {
+        label_set_text (the_hint, NULL);
+        return;
+    }
+
+    hint = get_random_hint (force);
+
+    if (hint != NULL)
+    {
+        if (*hint != '\0')
+            set_hintbar (hint);
+        g_free (hint);
+    }
+    else
+    {
+        char text[BUF_SMALL];
+
+        g_snprintf (text, sizeof (text), _("GNU Midnight Commander %s\n"), mc_global.mc_version);
+        set_hintbar (text);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+  * Change current panel in the file manager.
+  *
+  * @return current_panel
+  */
+
+WPanel *
+change_panel (void)
+{
+    input_complete_free (cmdline);
+    group_select_next_widget (GROUP (filemanager));
+    return current_panel;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Save current stat of directories to avoid reloading the panels
+ * when no modifications have taken place
+ */
+void
+save_cwds_stat (void)
+{
+    if (panels_options.fast_reload)
+    {
+        mc_stat (current_panel->cwd_vpath, &(current_panel->dir_stat));
+        if (get_other_type () == view_listing)
+            mc_stat (other_panel->cwd_vpath, &(other_panel->dir_stat));
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+quiet_quit_cmd (void)
+{
+    print_last_revert = TRUE;
+    return quit_cmd_internal (1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Run the main dialog that occupies the whole screen */
+gboolean
+do_nc (void)
+{
+    gboolean ret;
+
+#ifdef USE_INTERNAL_EDIT
+    edit_stack_init ();
+#endif
+
+    filemanager = dlg_create (FALSE, 0, 0, 1, 1, WPOS_FULLSCREEN, FALSE, dialog_colors,
+                              midnight_callback, NULL, "[main]", NULL);
+
+    /* Check if we were invoked as an editor or file viewer */
+    if (mc_global.mc_run_mode != MC_RUN_FULL)
+    {
+        setup_dummy_mc ();
+        ret = mc_maybe_editor_or_viewer ();
+    }
+    else
+    {
+        /* We only need the first idle event to show user menu after start */
+        widget_idle (WIDGET (filemanager), TRUE);
+
+        setup_mc ();
+        mc_filehighlight = mc_fhl_new (TRUE);
+
+        create_file_manager ();
+        (void) dlg_run (filemanager);
+
+        mc_fhl_free (&mc_filehighlight);
+
+        ret = TRUE;
+
+        /* widget_destroy destroys even current_panel->cwd_vpath, so we have to save a copy :) */
+        if (mc_args__last_wd_file != NULL && vfs_current_is_local ())
+            last_wd_string = g_strdup (vfs_path_as_str (current_panel->cwd_vpath));
+
+        /* don't handle VFS timestamps for dirs opened in panels */
+        mc_event_destroy (MCEVENT_GROUP_CORE, "vfs_timestamp");
+    }
+
+    /* Program end */
+    mc_global.midnight_shutdown = TRUE;
+    dialog_switch_shutdown ();
+    done_mc ();
+    widget_destroy (WIDGET (filemanager));
+    current_panel = NULL;
+
+#ifdef USE_INTERNAL_EDIT
+    edit_stack_free ();
+#endif
+
+    if ((quit & SUBSHELL_EXIT) == 0)
+        tty_clear_screen ();
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/filemanager.h b/src/filemanager/filemanager.h
new file mode 100644
index 0000000..ca607ce
--- /dev/null
+++ b/src/filemanager/filemanager.h
@@ -0,0 +1,53 @@
+/** \file filemanager.h
+ *  \brief Header: main dialog (file panels) for Midnight Commander
+ */
+
+#ifndef MC__FILEMANAGER_H
+#define MC__FILEMANAGER_H
+
+#include "lib/widget.h"
+
+#include "panel.h"
+#include "layout.h"
+
+/* TODO: merge content of layout.h here */
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+#define MENU_PANEL (mc_global.widget.is_right ? right_panel : left_panel)
+#define MENU_PANEL_IDX  (mc_global.widget.is_right ? 1 : 0)
+#define SELECTED_IS_PANEL (get_panel_type (MENU_PANEL_IDX) == view_listing)
+
+#define other_panel get_other_panel()
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+extern WMenuBar *the_menubar;
+extern WLabel *the_prompt;
+extern WLabel *the_hint;
+extern WButtonBar *the_bar;
+
+extern WPanel *left_panel;
+extern WPanel *right_panel;
+extern WPanel *current_panel;
+
+extern const char *mc_prompt;
+
+/*** declarations of public functions ************************************************************/
+
+void update_menu (void);
+void midnight_set_buttonbar (WButtonBar * b);
+char *get_random_hint (gboolean force);
+void load_hint (gboolean force);
+WPanel *change_panel (void);
+void save_cwds_stat (void);
+gboolean quiet_quit_cmd (void);
+gboolean do_nc (void);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__FILEMANAGER_H */
diff --git a/src/filemanager/filenot.c b/src/filemanager/filenot.c
new file mode 100644
index 0000000..2bfc76a
--- /dev/null
+++ b/src/filemanager/filenot.c
@@ -0,0 +1,150 @@
+/*
+   Wrapper for routines to notify the
+   tree about the changes made to the directory
+   structure.
+
+   Copyright (C) 2011-2023
+   Free Software Foundation, Inc.
+
+   Author:
+   Janne Kukonlehto
+   Miguel de Icaza
+   Slava Zanko <slavazanko@gmail.com>, 2013
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+
+/** \file  filenot.c
+ *  \brief Source: wrapper for routines to notify the
+ *  tree about the changes made to the directory
+ *  structure.
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <string.h>
+
+#include "lib/global.h"
+#include "lib/fs.h"
+#include "lib/util.h"
+#include "lib/vfs/vfs.h"
+
+#include "filenot.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static vfs_path_t *
+get_absolute_name (const vfs_path_t * vpath)
+{
+    if (vpath == NULL)
+        return NULL;
+
+    if (IS_PATH_SEP (*vfs_path_get_by_index (vpath, 0)->path))
+        return vfs_path_clone (vpath);
+
+    return vfs_path_append_vpath_new (vfs_get_raw_current_dir (), vpath, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+my_mkdir_rec (const vfs_path_t * vpath, mode_t mode)
+{
+    vfs_path_t *q;
+    int result;
+
+    if (mc_mkdir (vpath, mode) == 0)
+        return 0;
+    if (errno != ENOENT)
+        return (-1);
+
+    /* FIXME: should check instead if vpath is at the root of that filesystem */
+    if (!vfs_file_is_local (vpath))
+        return (-1);
+
+    if (strcmp (vfs_path_as_str (vpath), PATH_SEP_STR) == 0)
+    {
+        errno = ENOTDIR;
+        return (-1);
+    }
+
+    q = vfs_path_append_new (vpath, "..", (char *) NULL);
+    result = my_mkdir_rec (q, mode);
+    vfs_path_free (q, TRUE);
+
+    if (result == 0)
+        result = mc_mkdir (vpath, mode);
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+int
+my_mkdir (const vfs_path_t * vpath, mode_t mode)
+{
+    int result;
+
+    result = my_mkdir_rec (vpath, mode);
+    if (result == 0)
+    {
+        vfs_path_t *my_s;
+
+        my_s = get_absolute_name (vpath);
+        vfs_path_free (my_s, TRUE);
+    }
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+my_rmdir (const char *path)
+{
+    int result;
+    vfs_path_t *vpath;
+
+    vpath = vfs_path_from_str_flags (path, VPF_NO_CANON);
+    /* FIXME: Should receive a Wtree! */
+    result = mc_rmdir (vpath);
+    if (result == 0)
+    {
+        vfs_path_t *my_s;
+
+        my_s = get_absolute_name (vpath);
+        vfs_path_free (my_s, TRUE);
+    }
+    vfs_path_free (vpath, TRUE);
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/filenot.h b/src/filemanager/filenot.h
new file mode 100644
index 0000000..33991e8
--- /dev/null
+++ b/src/filemanager/filenot.h
@@ -0,0 +1,26 @@
+/** \file  file.h
+ *  \brief Header: File and directory operation routines
+ */
+
+#ifndef MC__FILENOT_H
+#define MC__FILENOT_H
+
+#include "lib/global.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+/* Misc Unix functions */
+int my_mkdir (const vfs_path_t * vpath, mode_t mode);
+int my_rmdir (const char *path);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__FILE_H */
diff --git a/src/filemanager/fileopctx.c b/src/filemanager/fileopctx.c
new file mode 100644
index 0000000..a118749
--- /dev/null
+++ b/src/filemanager/fileopctx.c
@@ -0,0 +1,128 @@
+/*
+   File operation contexts for the Midnight Commander
+
+   Copyright (C) 1999-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Federico Mena <federico@nuclecu.unam.mx>
+   Miguel de Icaza <miguel@nuclecu.unam.mx>
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file fileopctx.c
+ *  \brief Source: file operation contexts
+ *  \date 1998-2007
+ *  \author Federico Mena <federico@nuclecu.unam.mx>
+ *  \author Miguel de Icaza <miguel@nuclecu.unam.mx>
+ */
+
+#include <config.h>
+
+#include <unistd.h>
+
+#include "lib/global.h"
+#include "fileopctx.h"
+#include "filegui.h"
+#include "lib/search.h"
+#include "lib/vfs/vfs.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+/*** file scope variables ************************************************************************/
+
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * \fn file_op_context_t * file_op_context_new (FileOperation op)
+ * \param op file operation struct
+ * \return The newly-created context, filled with the default file mask values.
+ *
+ * Creates a new file operation context with the default values.  If you later want
+ * to have a user interface for this, call file_op_context_create_ui().
+ */
+
+file_op_context_t *
+file_op_context_new (FileOperation op)
+{
+    file_op_context_t *ctx;
+
+    ctx = g_new0 (file_op_context_t, 1);
+    ctx->operation = op;
+    ctx->eta_secs = 0.0;
+    ctx->progress_bytes = 0;
+    ctx->op_preserve = TRUE;
+    ctx->do_reget = 1;
+    ctx->stat_func = mc_lstat;
+    ctx->preserve = TRUE;
+    ctx->preserve_uidgid = (geteuid () == 0);
+    ctx->umask_kill = 0777777;
+    ctx->erase_at_end = TRUE;
+    ctx->skip_all = FALSE;
+
+    return ctx;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * \fn void file_op_context_destroy (file_op_context_t *ctx)
+ * \param ctx The file operation context to destroy.
+ *
+ * Destroys the specified file operation context and its associated UI data, if
+ * it exists.
+ */
+
+void
+file_op_context_destroy (file_op_context_t * ctx)
+{
+    if (ctx != NULL)
+    {
+        file_op_context_destroy_ui (ctx);
+        mc_search_free (ctx->search_handle);
+        g_free (ctx);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+file_op_total_context_t *
+file_op_total_context_new (void)
+{
+    file_op_total_context_t *tctx;
+    tctx = g_new0 (file_op_total_context_t, 1);
+    tctx->ask_overwrite = TRUE;
+    return tctx;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_op_total_context_destroy (file_op_total_context_t * tctx)
+{
+    g_free (tctx);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/fileopctx.h b/src/filemanager/fileopctx.h
new file mode 100644
index 0000000..ed0b5d6
--- /dev/null
+++ b/src/filemanager/fileopctx.h
@@ -0,0 +1,198 @@
+/** \file fileopctx.h
+ *  \brief Header: file operation contexts
+ *  \date 1998
+ *  \author Federico Mena <federico@nuclecu.unam.mx>
+ *  \author Miguel de Icaza <miguel@nuclecu.unam.mx>
+ */
+
+#ifndef MC__FILEOPCTX_H
+#define MC__FILEOPCTX_H
+
+#include <sys/stat.h>
+#include <sys/types.h>
+#include <inttypes.h>           /* uintmax_t */
+
+#include "lib/global.h"
+#include "lib/vfs/vfs.h"
+
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+typedef int (*mc_stat_fn) (const vfs_path_t * vpath, struct stat * buf);
+
+/*** enums ***************************************************************************************/
+
+typedef enum
+{
+    FILEGUI_DIALOG_ONE_ITEM,
+    FILEGUI_DIALOG_MULTI_ITEM,
+    FILEGUI_DIALOG_DELETE_ITEM
+} filegui_dialog_type_t;
+
+typedef enum
+{
+    OP_COPY = 0,
+    OP_MOVE = 1,
+    OP_DELETE = 2
+} FileOperation;
+
+typedef enum
+{
+    RECURSIVE_YES = 0,
+    RECURSIVE_NO = 1,
+    RECURSIVE_ALWAYS = 2,
+    RECURSIVE_NEVER = 3,
+    RECURSIVE_ABORT = 4
+} FileCopyMode;
+
+/* ATTENTION: avoid overlapping with B_* values (lib/widget/dialog.h) */
+typedef enum
+{
+    FILE_CONT = 10,
+    FILE_RETRY,
+    FILE_SKIP,
+    FILE_ABORT,
+    FILE_SKIPALL,
+    FILE_SUSPEND
+} FileProgressStatus;
+
+/* First argument passed to real functions */
+enum OperationMode
+{
+    Foreground,
+    Background
+};
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+struct mc_search_struct;
+
+/* This structure describes a context for file operations.  It is used to update
+ * the progress windows and pass around options.
+ */
+typedef struct
+{
+    /* Operation type (copy, move, delete) */
+    FileOperation operation;
+
+    /* The estimated time of arrival in seconds */
+    double eta_secs;
+
+    /* Transferred bytes per second */
+    long bps;
+
+    /* Transferred seconds */
+    long bps_time;
+
+    /* Whether the panel total has been computed */
+    gboolean progress_totals_computed;
+    filegui_dialog_type_t dialog_type;
+
+    /* Counters for progress indicators */
+    size_t progress_count;
+    uintmax_t progress_bytes;
+
+    /* The value of the "preserve Attributes" checkbox in the copy file dialog.
+     * We can't use the value of "ctx->preserve" because it can change in order
+     * to preserve file attributes when moving files across filesystem boundaries
+     * (we want to keep the value of the checkbox between copy operations).
+     */
+    gboolean op_preserve;
+
+    /* Result from the recursive query */
+    FileCopyMode recursive_result;
+
+    /* Whether to do a reget */
+    off_t do_reget;
+
+    /* Controls appending to files */
+    gboolean do_append;
+
+    /* Whether to stat or lstat */
+    gboolean follow_links;
+
+    /* Pointer to the stat function we will use */
+    mc_stat_fn stat_func;
+
+    /* Whether to recompute symlinks */
+    gboolean stable_symlinks;
+
+    /* Preserve the original files' owner, group, permissions, and
+     * timestamps (owner, group only as root).
+     */
+    gboolean preserve;
+
+    /* If running as root, preserve the original uid/gid (we don't want to
+     * try chown for non root) preserve_uidgid = preserve && uid == 0
+     */
+    gboolean preserve_uidgid;
+
+    /* The bits to preserve in created files' modes on file copy */
+    mode_t umask_kill;
+
+    /* The mask of files to actually operate on */
+    char *dest_mask;
+
+    /* search handler */
+    struct mc_search_struct *search_handle;
+
+    /* Whether to dive into subdirectories for recursive operations */
+    gboolean dive_into_subdirs;
+
+    /* When moving directories cross filesystem boundaries delete the
+     * successfully copied files when all files below the directory and its
+     * subdirectories were processed.
+     *
+     * If erase_at_end is FALSE files will be deleted immediately after their
+     * successful copy (Note: this behavior is not tested and at the moment
+     * it can't be changed at runtime).
+     */
+    gboolean erase_at_end;
+
+    /* PID of the child for background operations */
+    pid_t pid;
+
+    /* toggle if all errors should be ignored */
+    gboolean skip_all;
+
+    /* Whether the file operation is in pause */
+    gboolean suspended;
+
+    /* User interface data goes here */
+    void *ui;
+} file_op_context_t;
+
+typedef struct
+{
+    size_t progress_count;
+    size_t prev_progress_count; /* Used in OP_MOVE between copy and remove directories */
+    uintmax_t progress_bytes;
+    uintmax_t copied_bytes;
+    size_t bps;
+    size_t bps_count;
+    gint64 transfer_start;
+    double eta_secs;
+
+    gboolean ask_overwrite;
+} file_op_total_context_t;
+
+/*** global variables defined in .c file *********************************************************/
+
+extern const char *op_names[3];
+
+/*** declarations of public functions ************************************************************/
+
+file_op_context_t *file_op_context_new (FileOperation op);
+void file_op_context_destroy (file_op_context_t * ctx);
+
+file_op_total_context_t *file_op_total_context_new (void);
+void file_op_total_context_destroy (file_op_total_context_t * tctx);
+
+/* The following functions are implemented separately by each port */
+FileProgressStatus file_progress_real_query_replace (file_op_context_t * ctx,
+                                                     enum OperationMode mode, const char *src,
+                                                     struct stat *src_stat, const char *dst,
+                                                     struct stat *dst_stat);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__FILEOPCTX_H */
diff --git a/src/filemanager/find.c b/src/filemanager/find.c
new file mode 100644
index 0000000..c0d2cf9
--- /dev/null
+++ b/src/filemanager/find.c
@@ -0,0 +1,1968 @@
+/*
+   Find file command for the Midnight Commander
+
+   Copyright (C) 1995-2023
+   Free Software Foundation, Inc.
+
+   Written  by:
+   Miguel de Icaza, 1995
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file find.c
+ *  \brief Source: Find file command
+ */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/stat.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"
+#include "lib/skin.h"
+#include "lib/search.h"
+#include "lib/mcconfig.h"
+#include "lib/vfs/vfs.h"
+#include "lib/strutil.h"
+#include "lib/widget.h"
+#include "lib/util.h"           /* canonicalize_pathname() */
+
+#include "src/setup.h"          /* verbose */
+#include "src/history.h"        /* MC_HISTORY_SHARED_SEARCH */
+
+#include "dir.h"
+#include "cmd.h"                /* find_cmd(), view_file_at_line() */
+#include "boxes.h"
+#include "panelize.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define MAX_REFRESH_INTERVAL (G_USEC_PER_SEC / 20)      /* 50 ms */
+#define MIN_REFRESH_FILE_SIZE (256 * 1024)      /* 256 KB */
+
+/*** file scope type declarations ****************************************************************/
+
+/* A couple of extra messages we need */
+enum
+{
+    B_STOP = B_USER + 1,
+    B_AGAIN,
+    B_PANELIZE,
+    B_TREE,
+    B_VIEW
+};
+
+typedef enum
+{
+    FIND_CONT = 0,
+    FIND_SUSPEND,
+    FIND_ABORT
+} FindProgressStatus;
+
+/* find file options */
+typedef struct
+{
+    /* file name options */
+    gboolean file_case_sens;
+    gboolean file_pattern;
+    gboolean find_recurs;
+    gboolean follow_symlinks;
+    gboolean skip_hidden;
+    gboolean file_all_charsets;
+
+    /* file content options */
+    gboolean content_case_sens;
+    gboolean content_regexp;
+    gboolean content_first_hit;
+    gboolean content_whole_words;
+    gboolean content_all_charsets;
+
+    /* whether use ignore dirs or not */
+    gboolean ignore_dirs_enable;
+    /* list of directories to be ignored, separated by ':' */
+    char *ignore_dirs;
+} find_file_options_t;
+
+typedef struct
+{
+    char *dir;
+    gsize start;
+    gsize end;
+} find_match_location_t;
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/* button callbacks */
+static int start_stop (WButton * button, int action);
+static int find_do_view_file (WButton * button, int action);
+static int find_do_edit_file (WButton * button, int action);
+
+/*** file scope variables ************************************************************************/
+
+/* Parsed ignore dirs */
+static char **find_ignore_dirs = NULL;
+
+/* static variables to remember find parameters */
+static WInput *in_start;        /* Start path */
+static WInput *in_name;         /* Filename */
+static WInput *in_with;         /* Text */
+static WInput *in_ignore;
+static WLabel *content_label;   /* 'Content:' label */
+static WCheck *file_case_sens_cbox;     /* "case sensitive" checkbox */
+static WCheck *file_pattern_cbox;       /* File name is glob or regexp */
+static WCheck *recursively_cbox;
+static WCheck *follow_sym_cbox;
+static WCheck *skip_hidden_cbox;
+static WCheck *content_case_sens_cbox;  /* "case sensitive" checkbox */
+static WCheck *content_regexp_cbox;     /* "find regular expression" checkbox */
+static WCheck *content_first_hit_cbox;  /* "First hit" checkbox" */
+static WCheck *content_whole_words_cbox;        /* "whole words" checkbox */
+#ifdef HAVE_CHARSET
+static WCheck *file_all_charsets_cbox;
+static WCheck *content_all_charsets_cbox;
+#endif
+static WCheck *ignore_dirs_cbox;
+
+static gboolean running = FALSE;        /* nice flag */
+static char *find_pattern = NULL;       /* Pattern to search */
+static char *content_pattern = NULL;    /* pattern to search inside files; if
+                                           content_regexp_flag is true, it contains the
+                                           regex pattern, else the search string. */
+static gboolean content_is_empty = TRUE;        /* remember content field state; initially is empty */
+static unsigned long matches;   /* Number of matches */
+static gboolean is_start = FALSE;       /* Status of the start/stop toggle button */
+static char *old_dir = NULL;
+
+static gint64 last_refresh;
+
+/* Where did we stop */
+static gboolean resuming;
+static int last_line;
+static int last_pos;
+static off_t last_off;
+static int last_i;
+
+static size_t ignore_count = 0;
+
+static WDialog *find_dlg;       /* The dialog */
+static WLabel *status_label;    /* Finished, Searching etc. */
+static WLabel *found_num_label; /* Number of found items */
+
+/* This keeps track of the directory stack */
+static GQueue dir_queue = G_QUEUE_INIT;
+
+/* *INDENT-OFF* */
+static struct
+{
+    int ret_cmd;
+    button_flags_t flags;
+    const char *text;
+    int len;                    /* length including space and brackets */
+    int x;
+    Widget *button;
+    bcback_fn callback;
+} fbuts[] =
+{
+    { B_ENTER, DEFPUSH_BUTTON, N_("&Chdir"), 0, 0, NULL, NULL },
+    { B_AGAIN, NORMAL_BUTTON, N_("&Again"), 0, 0, NULL, NULL },
+    { B_STOP, NORMAL_BUTTON, N_("S&uspend"), 0, 0, NULL, start_stop },
+    { B_STOP, NORMAL_BUTTON, N_("Con&tinue"), 0, 0, NULL, NULL },
+    { B_CANCEL, NORMAL_BUTTON, N_("&Quit"), 0, 0, NULL, NULL },
+
+    { B_PANELIZE, NORMAL_BUTTON, N_("Pane&lize"), 0, 0, NULL, NULL },
+    { B_VIEW, NORMAL_BUTTON, N_("&View - F3"), 0, 0, NULL, find_do_view_file },
+    { B_VIEW, NORMAL_BUTTON, N_("&Edit - F4"), 0, 0, NULL, find_do_edit_file }
+};
+/* *INDENT-ON* */
+
+static const size_t fbuts_num = G_N_ELEMENTS (fbuts);
+static const size_t quit_button = 4;    /* index of "Quit" button */
+
+static WListbox *find_list;     /* Listbox with the file list */
+
+static find_file_options_t options = {
+    TRUE, TRUE, TRUE, FALSE, FALSE, FALSE,
+    TRUE, FALSE, FALSE, FALSE, FALSE,
+    FALSE, NULL
+};
+
+static char *in_start_dir = INPUT_LAST_TEXT;
+
+static mc_search_t *search_file_handle = NULL;
+static mc_search_t *search_content_handle = NULL;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* don't use max macro to avoid double str_term_width1() call in widget length calculation */
+#undef max
+
+static int
+max (int a, int b)
+{
+    return (a > b ? a : b);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+parse_ignore_dirs (const char *ignore_dirs)
+{
+    size_t r = 0, w = 0;        /* read and write iterators */
+
+    if (!options.ignore_dirs_enable || ignore_dirs == NULL || ignore_dirs[0] == '\0')
+        return;
+
+    find_ignore_dirs = g_strsplit (ignore_dirs, ":", -1);
+
+    /* Values like '/foo::/bar: produce holes in list.
+     * Find and remove them */
+    for (; find_ignore_dirs[r] != NULL; r++)
+    {
+        if (find_ignore_dirs[r][0] == '\0')
+        {
+            /* empty entry -- skip it */
+            MC_PTR_FREE (find_ignore_dirs[r]);
+            continue;
+        }
+
+        if (r != w)
+        {
+            /* copy entry to the previous free array cell */
+            find_ignore_dirs[w] = find_ignore_dirs[r];
+            find_ignore_dirs[r] = NULL;
+        }
+
+        canonicalize_pathname (find_ignore_dirs[w]);
+        if (find_ignore_dirs[w][0] != '\0')
+            w++;
+        else
+            MC_PTR_FREE (find_ignore_dirs[w]);
+    }
+
+    if (find_ignore_dirs[0] == NULL)
+    {
+        g_strfreev (find_ignore_dirs);
+        find_ignore_dirs = NULL;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_load_options (void)
+{
+    static gboolean loaded = FALSE;
+
+    if (loaded)
+        return;
+
+    loaded = TRUE;
+
+    options.file_case_sens =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "file_case_sens", TRUE);
+    options.file_pattern =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "file_shell_pattern", TRUE);
+    options.find_recurs =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "file_find_recurs", TRUE);
+    options.follow_symlinks =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "follow_symlinks", FALSE);
+    options.skip_hidden =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "file_skip_hidden", FALSE);
+    options.file_all_charsets =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "file_all_charsets", FALSE);
+    options.content_case_sens =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "content_case_sens", TRUE);
+    options.content_regexp =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "content_regexp", FALSE);
+    options.content_first_hit =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "content_first_hit", FALSE);
+    options.content_whole_words =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "content_whole_words", FALSE);
+    options.content_all_charsets =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "content_all_charsets", FALSE);
+    options.ignore_dirs_enable =
+        mc_config_get_bool (mc_global.main_config, "FindFile", "ignore_dirs_enable", TRUE);
+    options.ignore_dirs =
+        mc_config_get_string (mc_global.main_config, "FindFile", "ignore_dirs", "");
+
+    if (options.ignore_dirs[0] == '\0')
+        MC_PTR_FREE (options.ignore_dirs);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_save_options (void)
+{
+    mc_config_set_bool (mc_global.main_config, "FindFile", "file_case_sens",
+                        options.file_case_sens);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "file_shell_pattern",
+                        options.file_pattern);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "file_find_recurs", options.find_recurs);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "follow_symlinks",
+                        options.follow_symlinks);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "file_skip_hidden", options.skip_hidden);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "file_all_charsets",
+                        options.file_all_charsets);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "content_case_sens",
+                        options.content_case_sens);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "content_regexp",
+                        options.content_regexp);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "content_first_hit",
+                        options.content_first_hit);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "content_whole_words",
+                        options.content_whole_words);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "content_all_charsets",
+                        options.content_all_charsets);
+    mc_config_set_bool (mc_global.main_config, "FindFile", "ignore_dirs_enable",
+                        options.ignore_dirs_enable);
+    mc_config_set_string (mc_global.main_config, "FindFile", "ignore_dirs", options.ignore_dirs);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline char *
+add_to_list (const char *text, void *data)
+{
+    return listbox_add_item (find_list, LISTBOX_APPEND_AT_END, 0, text, data, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+stop_idle (void *data)
+{
+    widget_idle (WIDGET (data), FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+status_update (const char *text)
+{
+    label_set_text (status_label, text);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+found_num_update (void)
+{
+    label_set_textv (found_num_label, _("Found: %lu"), matches);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+get_list_info (char **file, char **dir, gsize * start, gsize * end)
+{
+    find_match_location_t *location;
+
+    listbox_get_current (find_list, file, (void **) &location);
+    if (location != NULL)
+    {
+        if (dir != NULL)
+            *dir = location->dir;
+        if (start != NULL)
+            *start = location->start;
+        if (end != NULL)
+            *end = location->end;
+    }
+    else
+    {
+        if (dir != NULL)
+            *dir = NULL;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** check regular expression */
+
+static gboolean
+find_check_regexp (const char *r)
+{
+    mc_search_t *search;
+    gboolean regexp_ok = FALSE;
+
+    search = mc_search_new (r, NULL);
+
+    if (search != NULL)
+    {
+        search->search_type = MC_SEARCH_T_REGEX;
+        regexp_ok = mc_search_prepare (search);
+        mc_search_free (search);
+    }
+
+    return regexp_ok;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_toggle_enable_ignore_dirs (void)
+{
+    widget_disable (WIDGET (in_ignore), !ignore_dirs_cbox->state);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_toggle_enable_params (void)
+{
+    gboolean disable = input_is_empty (in_name);
+
+    widget_disable (WIDGET (file_pattern_cbox), disable);
+    widget_disable (WIDGET (file_case_sens_cbox), disable);
+#ifdef HAVE_CHARSET
+    widget_disable (WIDGET (file_all_charsets_cbox), disable);
+#endif
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_toggle_enable_content (void)
+{
+    widget_disable (WIDGET (content_regexp_cbox), content_is_empty);
+    widget_disable (WIDGET (content_case_sens_cbox), content_is_empty);
+#ifdef HAVE_CHARSET
+    widget_disable (WIDGET (content_all_charsets_cbox), content_is_empty);
+#endif
+    widget_disable (WIDGET (content_whole_words_cbox), content_is_empty);
+    widget_disable (WIDGET (content_first_hit_cbox), content_is_empty);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Callback for the parameter dialog.
+ * Validate regex, prevent closing the dialog if it's invalid.
+ */
+
+static cb_ret_t
+find_parm_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    /* FIXME: HACK: use first draw of dialog to resolve widget state dependencies.
+     * Use this time moment to check input field content. We can't do that in MSG_INIT
+     * because history is not loaded yet.
+     * Probably, we want new MSG_ACTIVATE message as complement to MSG_VALIDATE one. Or
+     * we could name it MSG_POST_INIT.
+     *
+     * In one or two other places we use MSG_IDLE instead of MSG_DRAW for a similar
+     * purpose. We should remember to fix those places too when we introduce the new
+     * message.
+     */
+    static gboolean first_draw = TRUE;
+
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_INIT:
+        group_default_callback (w, NULL, MSG_INIT, 0, NULL);
+        first_draw = TRUE;
+        return MSG_HANDLED;
+
+    case MSG_NOTIFY:
+        if (sender == WIDGET (ignore_dirs_cbox))
+        {
+            find_toggle_enable_ignore_dirs ();
+            return MSG_HANDLED;
+        }
+
+        return MSG_NOT_HANDLED;
+
+    case MSG_VALIDATE:
+        if (h->ret_value != B_ENTER)
+            return MSG_HANDLED;
+
+        /* check filename regexp */
+        if (!file_pattern_cbox->state && !input_is_empty (in_name)
+            && !find_check_regexp (input_get_ctext (in_name)))
+        {
+            /* Don't stop the dialog */
+            widget_set_state (w, WST_ACTIVE, TRUE);
+            message (D_ERROR, MSG_ERROR, _("Malformed regular expression"));
+            widget_select (WIDGET (in_name));
+            return MSG_HANDLED;
+        }
+
+        /* check content regexp */
+        if (content_regexp_cbox->state && !content_is_empty
+            && !find_check_regexp (input_get_ctext (in_with)))
+        {
+            /* Don't stop the dialog */
+            widget_set_state (w, WST_ACTIVE, TRUE);
+            message (D_ERROR, MSG_ERROR, _("Malformed regular expression"));
+            widget_select (WIDGET (in_with));
+            return MSG_HANDLED;
+        }
+
+        return MSG_HANDLED;
+
+    case MSG_POST_KEY:
+        if (GROUP (h)->current->data == in_name)
+            find_toggle_enable_params ();
+        else if (GROUP (h)->current->data == in_with)
+        {
+            content_is_empty = input_is_empty (in_with);
+            find_toggle_enable_content ();
+        }
+        return MSG_HANDLED;
+
+    case MSG_DRAW:
+        if (first_draw)
+        {
+            find_toggle_enable_ignore_dirs ();
+            find_toggle_enable_params ();
+            find_toggle_enable_content ();
+        }
+
+        first_draw = FALSE;
+        MC_FALLTHROUGH;         /* to call MSG_DRAW default handler */
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * find_parameters: gets information from the user
+ *
+ * If the return value is TRUE, then the following holds:
+ *
+ * start_dir, ignore_dirs, pattern and content contain the information provided by the user.
+ * They are newly allocated strings and must be freed when unneeded.
+ *
+ * start_dir_len is -1 when user entered an absolute path, otherwise it is a length
+ * of start_dir (which is absolute). It is used to get a relative pats of find results.
+ */
+
+static gboolean
+find_parameters (WPanel * panel, char **start_dir, ssize_t * start_dir_len,
+                 char **ignore_dirs, char **pattern, char **content)
+{
+    WGroup *g;
+
+    /* Size of the find parameters window */
+#ifdef HAVE_CHARSET
+    const int lines = 19;
+#else
+    const int lines = 18;
+#endif
+    int cols = 68;
+
+    gboolean return_value;
+
+    /* file name */
+    const char *file_name_label = N_("File name:");
+    const char *file_recurs_label = N_("&Find recursively");
+    const char *file_follow_symlinks = N_("Follow s&ymlinks");
+    const char *file_pattern_label = N_("&Using shell patterns");
+#ifdef HAVE_CHARSET
+    const char *file_all_charsets_label = N_("&All charsets");
+#endif
+    const char *file_case_label = N_("Cas&e sensitive");
+    const char *file_skip_hidden_label = N_("S&kip hidden");
+
+    /* file content */
+    const char *content_content_label = N_("Content:");
+    const char *content_use_label = N_("Sea&rch for content");
+    const char *content_regexp_label = N_("Re&gular expression");
+    const char *content_case_label = N_("Case sens&itive");
+#ifdef HAVE_CHARSET
+    const char *content_all_charsets_label = N_("A&ll charsets");
+#endif
+    const char *content_whole_words_label = N_("&Whole words");
+    const char *content_first_hit_label = N_("Fir&st hit");
+
+    const char *buts[] = { N_("&Tree"), N_("&OK"), N_("&Cancel") };
+
+    /* button lengths */
+    int b0, b1, b2, b12;
+    int y1, y2, x1, x2;
+    /* column width */
+    int cw;
+
+#ifdef ENABLE_NLS
+    {
+        size_t i;
+
+        file_name_label = _(file_name_label);
+        file_recurs_label = _(file_recurs_label);
+        file_follow_symlinks = _(file_follow_symlinks);
+        file_pattern_label = _(file_pattern_label);
+#ifdef HAVE_CHARSET
+        file_all_charsets_label = _(file_all_charsets_label);
+#endif
+        file_case_label = _(file_case_label);
+        file_skip_hidden_label = _(file_skip_hidden_label);
+
+        /* file content */
+        content_content_label = _(content_content_label);
+        content_use_label = _(content_use_label);
+        content_regexp_label = _(content_regexp_label);
+        content_case_label = _(content_case_label);
+#ifdef HAVE_CHARSET
+        content_all_charsets_label = _(content_all_charsets_label);
+#endif
+        content_whole_words_label = _(content_whole_words_label);
+        content_first_hit_label = _(content_first_hit_label);
+
+        for (i = 0; i < G_N_ELEMENTS (buts); i++)
+            buts[i] = _(buts[i]);
+    }
+#endif /* ENABLE_NLS */
+
+    /* calculate dialog width */
+
+    /* widget widths */
+    cw = str_term_width1 (file_name_label);
+    cw = max (cw, str_term_width1 (file_recurs_label) + 4);
+    cw = max (cw, str_term_width1 (file_follow_symlinks) + 4);
+    cw = max (cw, str_term_width1 (file_pattern_label) + 4);
+#ifdef HAVE_CHARSET
+    cw = max (cw, str_term_width1 (file_all_charsets_label) + 4);
+#endif
+    cw = max (cw, str_term_width1 (file_case_label) + 4);
+    cw = max (cw, str_term_width1 (file_skip_hidden_label) + 4);
+
+    cw = max (cw, str_term_width1 (content_content_label) + 4);
+    cw = max (cw, str_term_width1 (content_use_label) + 4);
+    cw = max (cw, str_term_width1 (content_regexp_label) + 4);
+    cw = max (cw, str_term_width1 (content_case_label) + 4);
+#ifdef HAVE_CHARSET
+    cw = max (cw, str_term_width1 (content_all_charsets_label) + 4);
+#endif
+    cw = max (cw, str_term_width1 (content_whole_words_label) + 4);
+    cw = max (cw, str_term_width1 (content_first_hit_label) + 4);
+
+    /* button width */
+    b0 = str_term_width1 (buts[0]) + 3;
+    b1 = str_term_width1 (buts[1]) + 5; /* default button */
+    b2 = str_term_width1 (buts[2]) + 3;
+    b12 = b1 + b2 + 1;
+
+    cols = max (cols, max (b12, cw * 2 + 1) + 6);
+
+    find_load_options ();
+
+    if (in_start_dir == NULL)
+        in_start_dir = g_strdup (".");
+
+    find_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, find_parm_callback,
+                    NULL, "[Find File]", _("Find File"));
+    g = GROUP (find_dlg);
+
+    x1 = 3;
+    x2 = cols / 2 + 1;
+    cw = (cols - 7) / 2;
+    y1 = 2;
+
+    group_add_widget (g, label_new (y1++, x1, _("Start at:")));
+    in_start =
+        input_new (y1, x1, input_colors, cols - b0 - 7, in_start_dir, "start",
+                   INPUT_COMPLETE_CD | INPUT_COMPLETE_FILENAMES);
+    group_add_widget (g, in_start);
+
+    group_add_widget (g, button_new (y1++, cols - b0 - 3, B_TREE, NORMAL_BUTTON, buts[0], NULL));
+
+    ignore_dirs_cbox =
+        check_new (y1++, x1, options.ignore_dirs_enable, _("Ena&ble ignore directories:"));
+    group_add_widget (g, ignore_dirs_cbox);
+
+    in_ignore =
+        input_new (y1++, x1, input_colors, cols - 6,
+                   options.ignore_dirs != NULL ? options.ignore_dirs : "", "ignoredirs",
+                   INPUT_COMPLETE_CD | INPUT_COMPLETE_FILENAMES);
+    group_add_widget (g, in_ignore);
+
+    group_add_widget (g, hline_new (y1++, -1, -1));
+
+    y2 = y1;
+
+    /* Start 1st column */
+    group_add_widget (g, label_new (y1++, x1, file_name_label));
+    in_name =
+        input_new (y1++, x1, input_colors, cw, INPUT_LAST_TEXT, "name",
+                   INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD);
+    group_add_widget (g, in_name);
+
+    /* Start 2nd column */
+    content_label = label_new (y2++, x2, content_content_label);
+    group_add_widget (g, content_label);
+    in_with =
+        input_new (y2++, x2, input_colors, cw, content_is_empty ? "" : INPUT_LAST_TEXT,
+                   MC_HISTORY_SHARED_SEARCH, INPUT_COMPLETE_NONE);
+    in_with->label = content_label;
+    group_add_widget (g, in_with);
+
+    /* Continue 1st column */
+    recursively_cbox = check_new (y1++, x1, options.find_recurs, file_recurs_label);
+    group_add_widget (g, recursively_cbox);
+
+    follow_sym_cbox = check_new (y1++, x1, options.follow_symlinks, file_follow_symlinks);
+    group_add_widget (g, follow_sym_cbox);
+
+    file_pattern_cbox = check_new (y1++, x1, options.file_pattern, file_pattern_label);
+    group_add_widget (g, file_pattern_cbox);
+
+    file_case_sens_cbox = check_new (y1++, x1, options.file_case_sens, file_case_label);
+    group_add_widget (g, file_case_sens_cbox);
+
+#ifdef HAVE_CHARSET
+    file_all_charsets_cbox =
+        check_new (y1++, x1, options.file_all_charsets, file_all_charsets_label);
+    group_add_widget (g, file_all_charsets_cbox);
+#endif
+
+    skip_hidden_cbox = check_new (y1++, x1, options.skip_hidden, file_skip_hidden_label);
+    group_add_widget (g, skip_hidden_cbox);
+
+    /* Continue 2nd column */
+    content_whole_words_cbox =
+        check_new (y2++, x2, options.content_whole_words, content_whole_words_label);
+    group_add_widget (g, content_whole_words_cbox);
+
+    content_regexp_cbox = check_new (y2++, x2, options.content_regexp, content_regexp_label);
+    group_add_widget (g, content_regexp_cbox);
+
+    content_case_sens_cbox = check_new (y2++, x2, options.content_case_sens, content_case_label);
+    group_add_widget (g, content_case_sens_cbox);
+
+#ifdef HAVE_CHARSET
+    content_all_charsets_cbox =
+        check_new (y2++, x2, options.content_all_charsets, content_all_charsets_label);
+    group_add_widget (g, content_all_charsets_cbox);
+#endif
+
+    content_first_hit_cbox =
+        check_new (y2++, x2, options.content_first_hit, content_first_hit_label);
+    group_add_widget (g, content_first_hit_cbox);
+
+    /* buttons */
+    y1 = max (y1, y2);
+    x1 = (cols - b12) / 2;
+    group_add_widget (g, hline_new (y1++, -1, -1));
+    group_add_widget (g, button_new (y1, x1, B_ENTER, DEFPUSH_BUTTON, buts[1], NULL));
+    group_add_widget (g, button_new (y1, x1 + b1 + 1, B_CANCEL, NORMAL_BUTTON, buts[2], NULL));
+
+  find_par_start:
+    widget_select (WIDGET (in_name));
+
+    switch (dlg_run (find_dlg))
+    {
+    case B_CANCEL:
+        return_value = FALSE;
+        break;
+
+    case B_TREE:
+        {
+            const char *start_cstr;
+            const char *temp_dir;
+
+            start_cstr = input_get_ctext (in_start);
+
+            if (input_is_empty (in_start) || DIR_IS_DOT (start_cstr))
+                temp_dir = vfs_path_as_str (panel->cwd_vpath);
+            else
+                temp_dir = start_cstr;
+
+            if (in_start_dir != INPUT_LAST_TEXT)
+                g_free (in_start_dir);
+            in_start_dir = tree_box (temp_dir);
+            if (in_start_dir == NULL)
+                in_start_dir = g_strdup (temp_dir);
+
+            input_assign_text (in_start, in_start_dir);
+
+            /* Warning: Dreadful goto */
+            goto find_par_start;
+        }
+
+    default:
+        {
+            char *s;
+
+#ifdef HAVE_CHARSET
+            options.file_all_charsets = file_all_charsets_cbox->state;
+            options.content_all_charsets = content_all_charsets_cbox->state;
+#endif
+            options.content_case_sens = content_case_sens_cbox->state;
+            options.content_regexp = content_regexp_cbox->state;
+            options.content_first_hit = content_first_hit_cbox->state;
+            options.content_whole_words = content_whole_words_cbox->state;
+            options.find_recurs = recursively_cbox->state;
+            options.follow_symlinks = follow_sym_cbox->state;
+            options.file_pattern = file_pattern_cbox->state;
+            options.file_case_sens = file_case_sens_cbox->state;
+            options.skip_hidden = skip_hidden_cbox->state;
+            options.ignore_dirs_enable = ignore_dirs_cbox->state;
+            g_free (options.ignore_dirs);
+            options.ignore_dirs = input_get_text (in_ignore);
+
+            *content = !input_is_empty (in_with) ? input_get_text (in_with) : NULL;
+            if (input_is_empty (in_name))
+                *pattern = g_strdup (options.file_pattern ? "*" : ".*");
+            else
+                *pattern = input_get_text (in_name);
+            *start_dir = (char *) (!input_is_empty (in_start) ? input_get_ctext (in_start) : ".");
+            if (in_start_dir != INPUT_LAST_TEXT)
+                g_free (in_start_dir);
+            in_start_dir = g_strdup (*start_dir);
+
+            s = tilde_expand (*start_dir);
+            canonicalize_pathname (s);
+
+            if (DIR_IS_DOT (s))
+            {
+                *start_dir = g_strdup (vfs_path_as_str (panel->cwd_vpath));
+                /* FIXME: is panel->cwd_vpath canonicalized? */
+                /* relative paths will be used in panelization */
+                *start_dir_len = (ssize_t) strlen (*start_dir);
+                g_free (s);
+            }
+            else if (g_path_is_absolute (s))
+            {
+                *start_dir = s;
+                *start_dir_len = -1;
+            }
+            else
+            {
+                /* relative paths will be used in panelization */
+                *start_dir =
+                    mc_build_filename (vfs_path_as_str (panel->cwd_vpath), s, (char *) NULL);
+                *start_dir_len = (ssize_t) vfs_path_len (panel->cwd_vpath);
+                g_free (s);
+            }
+
+            if (!options.ignore_dirs_enable || input_is_empty (in_ignore)
+                || DIR_IS_DOT (input_get_ctext (in_ignore)))
+                *ignore_dirs = NULL;
+            else
+                *ignore_dirs = input_get_text (in_ignore);
+
+            find_save_options ();
+
+            return_value = TRUE;
+        }
+    }
+
+    widget_destroy (WIDGET (find_dlg));
+
+    return return_value;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+push_directory (vfs_path_t * dir)
+{
+    g_queue_push_head (&dir_queue, (void *) dir);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline vfs_path_t *
+pop_directory (void)
+{
+    return (vfs_path_t *) g_queue_pop_head (&dir_queue);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+queue_dir_free (gpointer data)
+{
+    vfs_path_free ((vfs_path_t *) data, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Remove all the items from the stack */
+
+static void
+clear_stack (void)
+{
+    g_queue_clear_full (&dir_queue, queue_dir_free);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+insert_file (const char *dir, const char *file, gsize start, gsize end)
+{
+    char *tmp_name = NULL;
+    static char *dirname = NULL;
+    find_match_location_t *location;
+
+    while (IS_PATH_SEP (dir[0]) && IS_PATH_SEP (dir[1]))
+        dir++;
+
+    if (old_dir != NULL)
+    {
+        if (strcmp (old_dir, dir) != 0)
+        {
+            g_free (old_dir);
+            old_dir = g_strdup (dir);
+            dirname = add_to_list (dir, NULL);
+        }
+    }
+    else
+    {
+        old_dir = g_strdup (dir);
+        dirname = add_to_list (dir, NULL);
+    }
+
+    tmp_name = g_strdup_printf ("    %s", file);
+    location = g_malloc (sizeof (*location));
+    location->dir = dirname;
+    location->start = start;
+    location->end = end;
+    add_to_list (tmp_name, location);
+    g_free (tmp_name);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_add_match (const char *dir, const char *file, gsize start, gsize end)
+{
+    insert_file (dir, file, start, end);
+
+    /* Don't scroll */
+    if (matches == 0)
+        listbox_select_first (find_list);
+    widget_draw (WIDGET (find_list));
+
+    matches++;
+    found_num_update ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static FindProgressStatus
+check_find_events (WDialog * h)
+{
+    Gpm_Event event;
+    int c;
+
+    event.x = -1;
+    c = tty_get_event (&event, GROUP (h)->mouse_status == MOU_REPEAT, FALSE);
+    if (c != EV_NONE)
+    {
+        dlg_process_event (h, c, &event);
+        if (h->ret_value == B_ENTER
+            || h->ret_value == B_CANCEL || h->ret_value == B_AGAIN || h->ret_value == B_PANELIZE)
+        {
+            /* dialog terminated */
+            return FIND_ABORT;
+        }
+        if (!widget_get_state (WIDGET (h), WST_IDLE))
+        {
+            /* searching suspended */
+            return FIND_SUSPEND;
+        }
+    }
+
+    return FIND_CONT;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * search_content:
+ *
+ * Search the content_pattern string in the DIRECTORY/FILE.
+ * It will add the found entries to the find listbox.
+ *
+ * returns FALSE if do_search should look for another file
+ *         TRUE if do_search should exit and proceed to the event handler
+ */
+
+static gboolean
+search_content (WDialog * h, const char *directory, const char *filename)
+{
+    struct stat s;
+    char buffer[BUF_4K] = "";   /* raw input buffer */
+    int file_fd;
+    gboolean ret_val = FALSE;
+    vfs_path_t *vpath;
+    gint64 tv;
+    gboolean status_updated = FALSE;
+
+    vpath = vfs_path_build_filename (directory, filename, (char *) NULL);
+
+    if (mc_stat (vpath, &s) != 0 || !S_ISREG (s.st_mode))
+    {
+        vfs_path_free (vpath, TRUE);
+        return FALSE;
+    }
+
+    file_fd = mc_open (vpath, O_RDONLY);
+    vfs_path_free (vpath, TRUE);
+
+    if (file_fd == -1)
+        return FALSE;
+
+    /* get time elapsed from last refresh */
+    tv = g_get_monotonic_time ();
+
+    if (s.st_size >= MIN_REFRESH_FILE_SIZE || (tv - last_refresh) > MAX_REFRESH_INTERVAL)
+    {
+        g_snprintf (buffer, sizeof (buffer), _("Grepping in %s"), filename);
+        status_update (str_trunc (buffer, WIDGET (h)->rect.cols - 8));
+        mc_refresh ();
+        last_refresh = tv;
+        status_updated = TRUE;
+    }
+
+    tty_enable_interrupt_key ();
+    tty_got_interrupt ();
+
+    {
+        int line = 1;
+        int pos = 0;
+        int n_read = 0;
+        off_t off = 0;          /* file_fd's offset corresponding to strbuf[0] */
+        gboolean found = FALSE;
+        gsize found_len;
+        gsize found_start;
+        char result[BUF_MEDIUM];
+        char *strbuf = NULL;    /* buffer for fetched string */
+        int strbuf_size = 0;
+        int i = -1;             /* compensate for a newline we'll add when we first enter the loop */
+
+        if (resuming)
+        {
+            /* We've been previously suspended, start from the previous position */
+            resuming = FALSE;
+            line = last_line;
+            pos = last_pos;
+            off = last_off;
+            i = last_i;
+        }
+
+        while (!ret_val)
+        {
+            char ch = '\0';
+
+            off += i + 1;       /* the previous line, plus a newline character */
+            i = 0;
+
+            /* read to buffer and get line from there */
+            while (TRUE)
+            {
+                if (pos >= n_read)
+                {
+                    pos = 0;
+                    n_read = mc_read (file_fd, buffer, sizeof (buffer));
+                    if (n_read <= 0)
+                        break;
+                }
+
+                ch = buffer[pos++];
+                if (ch == '\0')
+                {
+                    /* skip possible leading zero(s) */
+                    if (i == 0)
+                    {
+                        off++;
+                        continue;
+                    }
+                    break;
+                }
+
+                if (i >= strbuf_size - 1)
+                {
+                    strbuf_size += 128;
+                    strbuf = g_realloc (strbuf, strbuf_size);
+                }
+
+                /* Strip newline */
+                if (ch == '\n')
+                    break;
+
+                strbuf[i++] = ch;
+            }
+
+            if (i == 0)
+            {
+                if (ch == '\0')
+                    break;
+
+                /* if (ch == '\n'): do not search in empty strings */
+                goto skip_search;
+            }
+
+            strbuf[i] = '\0';
+
+            if (!found          /* Search in binary line once */
+                && mc_search_run (search_content_handle, (const void *) strbuf, 0, i, &found_len))
+            {
+                if (!status_updated)
+                {
+                    /* if we add results for a file, we have to ensure that
+                       name of this file is shown in status bar */
+                    g_snprintf (result, sizeof (result), _("Grepping in %s"), filename);
+                    status_update (str_trunc (result, WIDGET (h)->rect.cols - 8));
+                    mc_refresh ();
+                    last_refresh = tv;
+                    status_updated = TRUE;
+                }
+
+                g_snprintf (result, sizeof (result), "%d:%s", line, filename);
+                found_start = off + search_content_handle->normal_offset + 1;   /* off by one: ticket 3280 */
+                find_add_match (directory, result, found_start, found_start + found_len);
+                found = TRUE;
+            }
+
+            if (found && options.content_first_hit)
+                break;
+
+            if (ch == '\n')
+            {
+              skip_search:
+                found = FALSE;
+                line++;
+            }
+
+            if ((line & 0xff) == 0)
+            {
+                FindProgressStatus res;
+
+                res = check_find_events (h);
+                switch (res)
+                {
+                case FIND_ABORT:
+                    stop_idle (h);
+                    ret_val = TRUE;
+                    break;
+                case FIND_SUSPEND:
+                    resuming = TRUE;
+                    last_line = line;
+                    last_pos = pos;
+                    last_off = off;
+                    last_i = i;
+                    ret_val = TRUE;
+                    break;
+                default:
+                    break;
+                }
+            }
+        }
+
+        g_free (strbuf);
+    }
+
+    tty_disable_interrupt_key ();
+    mc_close (file_fd);
+    return ret_val;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+  If dir is absolute, this means we're within dir and searching file here.
+  If dir is relative, this means we're going to add dir to the directory stack.
+**/
+static gboolean
+find_ignore_dir_search (const char *dir)
+{
+    if (find_ignore_dirs != NULL)
+    {
+        const size_t dlen = strlen (dir);
+        const unsigned char dabs = g_path_is_absolute (dir) ? 1 : 0;
+
+        char **ignore_dir;
+
+        for (ignore_dir = find_ignore_dirs; *ignore_dir != NULL; ignore_dir++)
+        {
+            const size_t ilen = strlen (*ignore_dir);
+            const unsigned char iabs = g_path_is_absolute (*ignore_dir) ? 2 : 0;
+
+            /* ignore dir is too long -- skip it */
+            if (dlen < ilen)
+                continue;
+
+            /* handle absolute and relative paths */
+            switch (iabs | dabs)
+            {
+            case 0:            /* both paths are relative */
+            case 3:            /* both paths are absolute */
+                /* if ignore dir is not a path  of dir -- skip it */
+                if (strncmp (dir, *ignore_dir, ilen) == 0)
+                {
+                    /* be sure that ignore dir is not a part of dir like:
+                       ignore dir is "h", dir is "home" */
+                    if (dir[ilen] == '\0' || IS_PATH_SEP (dir[ilen]))
+                        return TRUE;
+                }
+                break;
+            case 1:            /* dir is absolute, ignore_dir is relative */
+                {
+                    char *d;
+
+                    d = strstr (dir, *ignore_dir);
+                    if (d != NULL && IS_PATH_SEP (d[-1])
+                        && (d[ilen] == '\0' || IS_PATH_SEP (d[ilen])))
+                        return TRUE;
+                }
+                break;
+            case 2:            /* dir is relative, ignore_dir is absolute */
+                /* FIXME: skip this case */
+                break;
+            default:           /* this cannot occurs */
+                return FALSE;
+            }
+        }
+    }
+
+    return FALSE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_rotate_dash (const WDialog * h, gboolean show)
+{
+    static size_t pos = 0;
+    static const char rotating_dash[4] = "|/-\\";
+    const Widget *w = CONST_WIDGET (h);
+    const int *colors;
+
+    colors = widget_get_colors (w);
+    tty_setcolor (colors[DLG_COLOR_NORMAL]);
+    widget_gotoyx (h, w->rect.lines - 7, w->rect.cols - 4);
+    tty_print_char (show ? rotating_dash[pos] : ' ');
+    pos = (pos + 1) % sizeof (rotating_dash);
+    mc_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+do_search (WDialog * h)
+{
+    static struct vfs_dirent *dp = NULL;
+    static DIR *dirp = NULL;
+    static char *directory = NULL;
+    static gboolean pop_start_dir = TRUE;
+    struct stat tmp_stat;
+    gsize bytes_found;
+    unsigned short count;
+
+    if (h == NULL)
+    {                           /* someone forces me to close dirp */
+        if (dirp != NULL)
+        {
+            mc_closedir (dirp);
+            dirp = NULL;
+        }
+        MC_PTR_FREE (directory);
+        dp = NULL;
+        pop_start_dir = TRUE;
+        return 1;
+    }
+
+    for (count = 0; count < 32; count++)
+    {
+        while (dp == NULL)
+        {
+            if (dirp != NULL)
+            {
+                mc_closedir (dirp);
+                dirp = NULL;
+            }
+
+            while (dirp == NULL)
+            {
+                vfs_path_t *tmp_vpath = NULL;
+
+                tty_setcolor (REVERSE_COLOR);
+
+                while (TRUE)
+                {
+                    tmp_vpath = pop_directory ();
+                    if (tmp_vpath == NULL)
+                    {
+                        running = FALSE;
+                        if (ignore_count == 0)
+                            status_update (_("Finished"));
+                        else
+                        {
+                            char msg[BUF_SMALL];
+
+                            g_snprintf (msg, sizeof (msg),
+                                        ngettext ("Finished (ignored %zu directory)",
+                                                  "Finished (ignored %zu directories)",
+                                                  ignore_count), ignore_count);
+                            status_update (msg);
+                        }
+                        if (verbose)
+                            find_rotate_dash (h, FALSE);
+                        stop_idle (h);
+                        return 0;
+                    }
+
+                    /* The start directory is the first one in the stack (see do_find() below).
+                       Do not apply ignore_dir to it. */
+                    if (pop_start_dir)
+                    {
+                        pop_start_dir = FALSE;
+                        break;
+                    }
+
+                    pop_start_dir = FALSE;
+
+                    /* handle absolute ignore dirs here */
+                    if (!find_ignore_dir_search (vfs_path_as_str (tmp_vpath)))
+                        break;
+
+                    vfs_path_free (tmp_vpath, TRUE);
+                    ignore_count++;
+                }
+
+                g_free (directory);
+
+                if (verbose)
+                {
+                    char buffer[BUF_MEDIUM];
+
+                    directory = (char *) vfs_path_as_str (tmp_vpath);
+                    g_snprintf (buffer, sizeof (buffer), _("Searching %s"), directory);
+                    status_update (str_trunc (directory, WIDGET (h)->rect.cols - 8));
+                }
+
+                dirp = mc_opendir (tmp_vpath);
+                directory = vfs_path_free (tmp_vpath, FALSE);
+            }                   /* while (!dirp) */
+
+            /* skip invalid filenames */
+            while ((dp = mc_readdir (dirp)) != NULL && !str_is_valid_string (dp->d_name))
+                ;
+        }                       /* while (!dp) */
+
+        if (DIR_IS_DOT (dp->d_name) || DIR_IS_DOTDOT (dp->d_name))
+        {
+            /* skip invalid filenames */
+            while ((dp = mc_readdir (dirp)) != NULL && !str_is_valid_string (dp->d_name))
+                ;
+
+            return 1;
+        }
+
+        if (!(options.skip_hidden && (dp->d_name[0] == '.')))
+        {
+            gboolean search_ok;
+
+            if (options.find_recurs && (directory != NULL))
+            {                   /* Can directory be NULL ? */
+                /* handle relative ignore dirs here */
+                if (options.ignore_dirs_enable && find_ignore_dir_search (dp->d_name))
+                    ignore_count++;
+                else
+                {
+                    vfs_path_t *tmp_vpath;
+                    int stat_res;
+
+                    tmp_vpath = vfs_path_build_filename (directory, dp->d_name, (char *) NULL);
+
+                    if (options.follow_symlinks)
+                        stat_res = mc_stat (tmp_vpath, &tmp_stat);
+                    else
+                        stat_res = mc_lstat (tmp_vpath, &tmp_stat);
+
+                    if (stat_res == 0 && S_ISDIR (tmp_stat.st_mode))
+                        push_directory (tmp_vpath);
+                    else
+                        vfs_path_free (tmp_vpath, TRUE);
+                }
+            }
+
+            search_ok = mc_search_run (search_file_handle, dp->d_name,
+                                       0, strlen (dp->d_name), &bytes_found);
+
+            if (search_ok)
+            {
+                if (content_pattern == NULL)
+                    find_add_match (directory, dp->d_name, 0, 0);
+                else if (search_content (h, directory, dp->d_name))
+                    return 1;
+            }
+        }
+
+        /* skip invalid filenames */
+        while ((dp = mc_readdir (dirp)) != NULL && !str_is_valid_string (dp->d_name))
+            ;
+    }                           /* for */
+
+    if (verbose)
+        find_rotate_dash (h, TRUE);
+
+    return 1;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+init_find_vars (void)
+{
+    MC_PTR_FREE (old_dir);
+    matches = 0;
+    ignore_count = 0;
+
+    /* Remove all the items from the stack */
+    clear_stack ();
+
+    g_strfreev (find_ignore_dirs);
+    find_ignore_dirs = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_do_view_edit (gboolean unparsed_view, gboolean edit, char *dir, char *file, off_t search_start,
+                   off_t search_end)
+{
+    const char *filename = NULL;
+    int line;
+    vfs_path_t *fullname_vpath;
+
+    if (content_pattern != NULL)
+    {
+        filename = strchr (file + 4, ':') + 1;
+        line = atoi (file + 4);
+    }
+    else
+    {
+        filename = file + 4;
+        line = 0;
+    }
+
+    fullname_vpath = vfs_path_build_filename (dir, filename, (char *) NULL);
+    if (edit)
+        edit_file_at_line (fullname_vpath, use_internal_edit, line);
+    else
+        view_file_at_line (fullname_vpath, unparsed_view, use_internal_view, line, search_start,
+                           search_end);
+    vfs_path_free (fullname_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+view_edit_currently_selected_file (gboolean unparsed_view, gboolean edit)
+{
+    char *text = NULL;
+    find_match_location_t *location;
+
+    listbox_get_current (find_list, &text, (void **) &location);
+
+    if ((text == NULL) || (location == NULL) || (location->dir == NULL))
+        return MSG_NOT_HANDLED;
+
+    find_do_view_edit (unparsed_view, edit, location->dir, text, location->start, location->end);
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_calc_button_locations (const WDialog * h, gboolean all_buttons)
+{
+    const int cols = CONST_WIDGET (h)->rect.cols;
+
+    int l1, l2;
+
+    l1 = fbuts[0].len + fbuts[1].len + fbuts[is_start ? 3 : 2].len + fbuts[4].len + 3;
+    l2 = fbuts[5].len + fbuts[6].len + fbuts[7].len + 2;
+
+    fbuts[0].x = (cols - l1) / 2;
+    fbuts[1].x = fbuts[0].x + fbuts[0].len + 1;
+    fbuts[2].x = fbuts[1].x + fbuts[1].len + 1;
+    fbuts[3].x = fbuts[2].x;
+    fbuts[4].x = fbuts[2].x + fbuts[is_start ? 3 : 2].len + 1;
+
+    if (all_buttons)
+    {
+        fbuts[5].x = (cols - l2) / 2;
+        fbuts[6].x = fbuts[5].x + fbuts[5].len + 1;
+        fbuts[7].x = fbuts[6].x + fbuts[6].len + 1;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_adjust_header (WDialog * h)
+{
+    char title[BUF_MEDIUM];
+    int title_len;
+
+    if (content_pattern != NULL)
+        g_snprintf (title, sizeof (title), _("Find File: \"%s\". Content: \"%s\""), find_pattern,
+                    content_pattern);
+    else
+        g_snprintf (title, sizeof (title), _("Find File: \"%s\""), find_pattern);
+
+    title_len = str_term_width1 (title);
+    if (title_len > WIDGET (h)->rect.cols - 6)
+    {
+        /* title is too wide, truncate it */
+        title_len = WIDGET (h)->rect.cols - 6;
+        title_len = str_column_to_pos (title, title_len);
+        title_len -= 3;         /* reserve space for three dots */
+        title_len = str_offset_to_pos (title, title_len);
+        /* mark that title is truncated */
+        memmove (title + title_len, "...", 4);
+    }
+
+    frame_set_title (FRAME (h->bg), title);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+find_relocate_buttons (const WDialog * h, gboolean all_buttons)
+{
+    size_t i;
+
+    find_calc_button_locations (h, all_buttons);
+
+    for (i = 0; i < fbuts_num; i++)
+        fbuts[i].button->rect.x = CONST_WIDGET (h)->rect.x + fbuts[i].x;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+find_resize (WDialog * h)
+{
+    Widget *w = WIDGET (h);
+    WRect r = w->rect;
+
+    r.lines = LINES - 4;
+    r.cols = COLS - 16;
+    dlg_default_callback (w, NULL, MSG_RESIZE, 0, &r);
+    find_adjust_header (h);
+    find_relocate_buttons (h, TRUE);
+
+    return MSG_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+find_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_INIT:
+        group_default_callback (w, NULL, MSG_INIT, 0, NULL);
+        find_adjust_header (h);
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        if (parm == KEY_F (3) || parm == KEY_F (13))
+        {
+            gboolean unparsed_view = (parm == KEY_F (13));
+
+            return view_edit_currently_selected_file (unparsed_view, FALSE);
+        }
+        if (parm == KEY_F (4))
+            return view_edit_currently_selected_file (FALSE, TRUE);
+        return MSG_NOT_HANDLED;
+
+    case MSG_RESIZE:
+        return find_resize (h);
+
+    case MSG_IDLE:
+        do_search (h);
+        return MSG_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Handles the Stop/Start button in the find window */
+
+static int
+start_stop (WButton * button, int action)
+{
+    Widget *w = WIDGET (button);
+
+    (void) action;
+
+    running = is_start;
+    widget_idle (WIDGET (find_dlg), running);
+    is_start = !is_start;
+
+    status_update (is_start ? _("Stopped") : _("Searching"));
+    button_set_text (button, fbuts[is_start ? 3 : 2].text);
+
+    find_relocate_buttons (DIALOG (w->owner), FALSE);
+    widget_draw (WIDGET (w->owner));
+
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Handle view command, when invoked as a button */
+
+static int
+find_do_view_file (WButton * button, int action)
+{
+    (void) button;
+    (void) action;
+
+    view_edit_currently_selected_file (FALSE, FALSE);
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Handle edit command, when invoked as a button */
+
+static int
+find_do_edit_file (WButton * button, int action)
+{
+    (void) button;
+    (void) action;
+
+    view_edit_currently_selected_file (FALSE, TRUE);
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+setup_gui (void)
+{
+    WGroup *g;
+    size_t i;
+    int lines, cols;
+    int y;
+
+    static gboolean i18n_flag = FALSE;
+
+    if (!i18n_flag)
+    {
+        for (i = 0; i < fbuts_num; i++)
+        {
+#ifdef ENABLE_NLS
+            fbuts[i].text = _(fbuts[i].text);
+#endif /* ENABLE_NLS */
+            fbuts[i].len = str_term_width1 (fbuts[i].text) + 3;
+            if (fbuts[i].flags == DEFPUSH_BUTTON)
+                fbuts[i].len += 2;
+        }
+
+        i18n_flag = TRUE;
+    }
+
+    lines = LINES - 4;
+    cols = COLS - 16;
+
+    find_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, find_callback, NULL,
+                    "[Find File]", NULL);
+    g = GROUP (find_dlg);
+
+    find_calc_button_locations (find_dlg, TRUE);
+
+    y = 2;
+    find_list = listbox_new (y, 2, lines - 10, cols - 4, FALSE, NULL);
+    group_add_widget_autopos (g, find_list, WPOS_KEEP_ALL, NULL);
+    y += WIDGET (find_list)->rect.lines;
+
+    group_add_widget_autopos (g, hline_new (y++, -1, -1), WPOS_KEEP_BOTTOM, NULL);
+
+    found_num_label = label_new (y++, 4, NULL);
+    group_add_widget_autopos (g, found_num_label, WPOS_KEEP_BOTTOM, NULL);
+
+    status_label = label_new (y++, 4, _("Searching"));
+    group_add_widget_autopos (g, status_label, WPOS_KEEP_BOTTOM, NULL);
+
+    group_add_widget_autopos (g, hline_new (y++, -1, -1), WPOS_KEEP_BOTTOM, NULL);
+
+    for (i = 0; i < fbuts_num; i++)
+    {
+        if (i == 3)
+            fbuts[3].button = fbuts[2].button;
+        else
+        {
+            fbuts[i].button =
+                WIDGET (button_new
+                        (y, fbuts[i].x, fbuts[i].ret_cmd, fbuts[i].flags, fbuts[i].text,
+                         fbuts[i].callback));
+            group_add_widget_autopos (g, fbuts[i].button, WPOS_KEEP_BOTTOM, NULL);
+        }
+
+        if (i == quit_button)
+            y++;
+    }
+
+    widget_select (WIDGET (find_list));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+run_process (void)
+{
+    int ret;
+
+    search_content_handle = mc_search_new (content_pattern, NULL);
+    if (search_content_handle)
+    {
+        search_content_handle->search_type =
+            options.content_regexp ? MC_SEARCH_T_REGEX : MC_SEARCH_T_NORMAL;
+        search_content_handle->is_case_sensitive = options.content_case_sens;
+        search_content_handle->whole_words = options.content_whole_words;
+#ifdef HAVE_CHARSET
+        search_content_handle->is_all_charsets = options.content_all_charsets;
+#endif
+    }
+    search_file_handle = mc_search_new (find_pattern, NULL);
+    search_file_handle->search_type = options.file_pattern ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
+    search_file_handle->is_case_sensitive = options.file_case_sens;
+#ifdef HAVE_CHARSET
+    search_file_handle->is_all_charsets = options.file_all_charsets;
+#endif
+    search_file_handle->is_entire_line = options.file_pattern;
+
+    resuming = FALSE;
+
+    widget_idle (WIDGET (find_dlg), TRUE);
+    ret = dlg_run (find_dlg);
+
+    mc_search_free (search_file_handle);
+    search_file_handle = NULL;
+    mc_search_free (search_content_handle);
+    search_content_handle = NULL;
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+kill_gui (void)
+{
+    Widget *w = WIDGET (find_dlg);
+
+    widget_idle (w, FALSE);
+    widget_destroy (w);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+do_find (WPanel * panel, const char *start_dir, ssize_t start_dir_len, const char *ignore_dirs,
+         char **dirname, char **filename)
+{
+    int return_value = 0;
+    char *dir_tmp = NULL, *file_tmp = NULL;
+
+    setup_gui ();
+
+    init_find_vars ();
+    parse_ignore_dirs (ignore_dirs);
+    push_directory (vfs_path_from_str (start_dir));
+
+    return_value = run_process ();
+
+    /* Clear variables */
+    init_find_vars ();
+
+    get_list_info (&file_tmp, &dir_tmp, NULL, NULL);
+
+    if (dir_tmp)
+        *dirname = g_strdup (dir_tmp);
+    if (file_tmp)
+        *filename = g_strdup (file_tmp);
+
+    if (return_value == B_PANELIZE && *filename)
+    {
+        struct stat st;
+        GList *entry;
+        dir_list *list = &panel->dir;
+        char *name = NULL;
+        gboolean ok = TRUE;
+
+        panel_clean_dir (panel);
+        dir_list_init (list);
+
+        for (entry = listbox_get_first_link (find_list); entry != NULL && ok;
+             entry = g_list_next (entry))
+        {
+            const char *lc_filename = NULL;
+            WLEntry *le = LENTRY (entry->data);
+            find_match_location_t *location = le->data;
+            char *p;
+            gboolean link_to_dir, stale_link;
+
+            if ((le->text == NULL) || (location == NULL) || (location->dir == NULL))
+                continue;
+
+            if (!content_is_empty)
+                lc_filename = strchr (le->text + 4, ':') + 1;
+            else
+                lc_filename = le->text + 4;
+
+            name = mc_build_filename (location->dir, lc_filename, (char *) NULL);
+            /* skip initial start dir */
+            if (start_dir_len < 0)
+                p = name;
+            else
+            {
+                p = name + (size_t) start_dir_len;
+                if (IS_PATH_SEP (*p))
+                    p++;
+            }
+
+            if (!handle_path (p, &st, &link_to_dir, &stale_link))
+            {
+                g_free (name);
+                continue;
+            }
+
+            /* don't add files more than once to the panel */
+            if (!content_is_empty && list->len != 0
+                && strcmp (list->list[list->len - 1].fname->str, p) == 0)
+            {
+                g_free (name);
+                continue;
+            }
+
+            ok = dir_list_append (list, p, &st, link_to_dir, stale_link);
+
+            g_free (name);
+
+            if ((list->len & 15) == 0)
+                rotate_dash (TRUE);
+        }
+
+        panel->is_panelized = TRUE;
+        panel_panelize_absolutize_if_needed (panel);
+        panel_panelize_save (panel);
+    }
+
+    kill_gui ();
+    do_search (NULL);           /* force do_search to release resources */
+    MC_PTR_FREE (old_dir);
+    rotate_dash (FALSE);
+
+    return return_value;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+find_cmd (WPanel * panel)
+{
+    char *start_dir = NULL, *ignore_dirs = NULL;
+    ssize_t start_dir_len;
+
+    find_pattern = NULL;
+    content_pattern = NULL;
+
+    while (find_parameters (panel, &start_dir, &start_dir_len,
+                            &ignore_dirs, &find_pattern, &content_pattern))
+    {
+        char *filename = NULL, *dirname = NULL;
+        int v = B_CANCEL;
+
+        content_is_empty = content_pattern == NULL;
+
+        if (find_pattern[0] != '\0')
+        {
+            last_refresh = 0;
+
+            is_start = FALSE;
+
+            if (!content_is_empty && !str_is_valid_string (content_pattern))
+                MC_PTR_FREE (content_pattern);
+
+            v = do_find (panel, start_dir, start_dir_len, ignore_dirs, &dirname, &filename);
+        }
+
+        g_free (start_dir);
+        g_free (ignore_dirs);
+        MC_PTR_FREE (find_pattern);
+
+        if (v == B_ENTER)
+        {
+            if (dirname != NULL)
+            {
+                vfs_path_t *dirname_vpath;
+
+                dirname_vpath = vfs_path_from_str (dirname);
+                panel_cd (panel, dirname_vpath, cd_exact);
+                vfs_path_free (dirname_vpath, TRUE);
+                /* *INDENT-OFF* */
+                if (filename != NULL)
+                    panel_set_current_by_name (panel,
+                                               filename + (content_pattern != NULL
+                                                           ? strchr (filename + 4, ':') - filename + 1
+                                                           : 4));
+                /* *INDENT-ON* */
+            }
+            else if (filename != NULL)
+            {
+                vfs_path_t *filename_vpath;
+
+                filename_vpath = vfs_path_from_str (filename);
+                panel_cd (panel, filename_vpath, cd_exact);
+                vfs_path_free (filename_vpath, TRUE);
+            }
+        }
+
+        MC_PTR_FREE (content_pattern);
+        g_free (dirname);
+        g_free (filename);
+
+        if (v == B_ENTER || v == B_CANCEL)
+            break;
+
+        if (v == B_PANELIZE)
+        {
+            panel_re_sort (panel);
+            panel_set_current_by_name (panel, NULL);
+            break;
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/hotlist.c b/src/filemanager/hotlist.c
new file mode 100644
index 0000000..fa04a3b
--- /dev/null
+++ b/src/filemanager/hotlist.c
@@ -0,0 +1,1733 @@
+/*
+   Directory hotlist -- for the Midnight Commander
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Radek Doulik, 1994
+   Janne Kukonlehto, 1995
+   Andrej Borsenkow, 1996
+   Norbert Warmuth, 1997
+   Andrew Borodin <aborodin@vmail.ru>, 2012-2022
+
+   Janne did the original Hotlist code, Andrej made the groupable
+   hotlist; the move hotlist and revamped the file format and made
+   it stronger.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file hotlist.c
+ *  \brief Source: directory hotlist
+ */
+
+#include <config.h>
+
+#include <ctype.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"        /* COLS */
+#include "lib/tty/key.h"        /* KEY_M_CTRL */
+#include "lib/skin.h"           /* colors */
+#include "lib/mcconfig.h"       /* Load/save directories hotlist */
+#include "lib/fileloc.h"
+#include "lib/strutil.h"
+#include "lib/vfs/vfs.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "src/setup.h"          /* For profile_bname */
+#include "src/history.h"
+
+#include "command.h"            /* cmdline */
+
+#include "hotlist.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define UX 3
+#define UY 2
+
+#define B_ADD_CURRENT   B_USER
+#define B_REMOVE        (B_USER + 1)
+#define B_NEW_GROUP     (B_USER + 2)
+#define B_NEW_ENTRY     (B_USER + 3)
+#define B_ENTER_GROUP   (B_USER + 4)
+#define B_UP_GROUP      (B_USER + 5)
+#define B_INSERT        (B_USER + 6)
+#define B_APPEND        (B_USER + 7)
+#define B_MOVE          (B_USER + 8)
+#ifdef ENABLE_VFS
+#define B_FREE_ALL_VFS  (B_USER + 9)
+#define B_REFRESH_VFS   (B_USER + 10)
+#endif
+
+#define TKN_GROUP   0
+#define TKN_ENTRY   1
+#define TKN_STRING  2
+#define TKN_URL     3
+#define TKN_ENDGROUP 4
+#define TKN_COMMENT  5
+#define TKN_EOL      125
+#define TKN_EOF      126
+#define TKN_UNKNOWN  127
+
+#define SKIP_TO_EOL \
+{ \
+    int _tkn; \
+    while ((_tkn = hot_next_token ()) != TKN_EOF && _tkn != TKN_EOL) ; \
+}
+
+#define CHECK_TOKEN(_TKN_) \
+tkn = hot_next_token (); \
+if (tkn != _TKN_) \
+{ \
+    hotlist_state.readonly = TRUE; \
+    hotlist_state.file_error = TRUE; \
+    while (tkn != TKN_EOL && tkn != TKN_EOF) \
+        tkn = hot_next_token (); \
+    break; \
+}
+
+/*** file scope type declarations ****************************************************************/
+
+enum HotListType
+{
+    HL_TYPE_GROUP,
+    HL_TYPE_ENTRY,
+    HL_TYPE_COMMENT,
+    HL_TYPE_DOTDOT
+};
+
+static struct
+{
+    /*
+     * these reflect run time state
+     */
+
+    gboolean loaded;            /* hotlist is loaded */
+    gboolean readonly;          /* hotlist readonly */
+    gboolean file_error;        /* parse error while reading file */
+    gboolean running;           /* we are running dlg (and have to
+                                   update listbox */
+    gboolean moving;            /* we are in moving hotlist currently */
+    gboolean modified;          /* hotlist was modified */
+    hotlist_t type;             /* LIST_HOTLIST || LIST_VFSLIST */
+} hotlist_state;
+
+/* Directory hotlist */
+struct hotlist
+{
+    enum HotListType type;
+    char *directory;
+    char *label;
+    struct hotlist *head;
+    struct hotlist *up;
+    struct hotlist *next;
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static WPanel *our_panel;
+
+static gboolean hotlist_has_dot_dot = TRUE;
+
+static WDialog *hotlist_dlg, *movelist_dlg;
+static WGroupbox *hotlist_group, *movelist_group;
+static WListbox *l_hotlist, *l_movelist;
+static WLabel *pname;
+
+static struct
+{
+    int ret_cmd, flags, y, x, len;
+    const char *text;
+    int type;
+    widget_pos_flags_t pos_flags;
+} hotlist_but[] =
+{
+    /* *INDENT-OFF* */
+    { B_ENTER, DEFPUSH_BUTTON, 0, 0, 0, N_("Change &to"),
+            LIST_HOTLIST | LIST_VFSLIST | LIST_MOVELIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+#ifdef ENABLE_VFS
+    { B_FREE_ALL_VFS, NORMAL_BUTTON, 0, 20, 0, N_("&Free VFSs now"),
+            LIST_VFSLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_REFRESH_VFS, NORMAL_BUTTON, 0, 43, 0, N_("&Refresh"),
+            LIST_VFSLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+#endif
+    { B_ADD_CURRENT, NORMAL_BUTTON, 0, 20, 0, N_("&Add current"),
+            LIST_HOTLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_UP_GROUP, NORMAL_BUTTON, 0, 42, 0, N_("&Up"),
+            LIST_HOTLIST | LIST_MOVELIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_CANCEL, NORMAL_BUTTON, 0, 53, 0, N_("&Cancel"),
+            LIST_HOTLIST | LIST_VFSLIST | LIST_MOVELIST, WPOS_KEEP_RIGHT | WPOS_KEEP_BOTTOM },
+    { B_NEW_GROUP, NORMAL_BUTTON, 1, 0, 0, N_("New &group"),
+            LIST_HOTLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_NEW_ENTRY, NORMAL_BUTTON, 1, 15, 0, N_("New &entry"),
+            LIST_HOTLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_INSERT, NORMAL_BUTTON, 1, 0, 0, N_("&Insert"),
+            LIST_MOVELIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_APPEND, NORMAL_BUTTON, 1, 15, 0, N_("A&ppend"),
+            LIST_MOVELIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_REMOVE, NORMAL_BUTTON, 1, 30, 0, N_("&Remove"),
+            LIST_HOTLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM },
+    { B_MOVE, NORMAL_BUTTON, 1, 42, 0, N_("&Move"),
+            LIST_HOTLIST, WPOS_KEEP_LEFT | WPOS_KEEP_BOTTOM }
+    /* *INDENT-ON* */
+};
+
+static const size_t hotlist_but_num = G_N_ELEMENTS (hotlist_but);
+
+static struct hotlist *hotlist = NULL;
+
+static struct hotlist *current_group;
+
+static GString *tkn_buf = NULL;
+
+static char *hotlist_file_name;
+static FILE *hotlist_file;
+static time_t hotlist_file_mtime;
+
+static int list_level = 0;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void init_movelist (struct hotlist *item);
+static void add_new_group_cmd (void);
+static void add_new_entry_cmd (WPanel * panel);
+static void remove_from_hotlist (struct hotlist *entry);
+static void load_hotlist (void);
+static void add_dotdot_to_list (void);
+
+/* --------------------------------------------------------------------------------------------- */
+/** If current->data is 0, then we are dealing with a VFS pathname */
+
+static void
+update_path_name (void)
+{
+    const char *text = "";
+    char *p;
+    WListbox *list = hotlist_state.moving ? l_movelist : l_hotlist;
+    Widget *w = WIDGET (list);
+
+    if (!listbox_is_empty (list))
+    {
+        char *ctext = NULL;
+        void *cdata = NULL;
+
+        listbox_get_current (list, &ctext, &cdata);
+        if (cdata == NULL)
+            text = ctext;
+        else
+        {
+            struct hotlist *hlp = (struct hotlist *) cdata;
+
+            if (hlp->type == HL_TYPE_ENTRY || hlp->type == HL_TYPE_DOTDOT)
+                text = hlp->directory;
+            else if (hlp->type == HL_TYPE_GROUP)
+                text = _("Subgroup - press ENTER to see list");
+        }
+    }
+
+    p = g_strconcat (" ", current_group->label, " ", (char *) NULL);
+    if (hotlist_state.moving)
+        groupbox_set_title (movelist_group, str_trunc (p, w->rect.cols - 2));
+    else
+    {
+        groupbox_set_title (hotlist_group, str_trunc (p, w->rect.cols - 2));
+        label_set_text (pname, str_trunc (text, w->rect.cols));
+    }
+    g_free (p);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+fill_listbox (WListbox * list)
+{
+    struct hotlist *current;
+    GString *buff;
+
+    buff = g_string_new ("");
+
+    for (current = current_group->head; current != NULL; current = current->next)
+        switch (current->type)
+        {
+        case HL_TYPE_GROUP:
+            {
+                /* buff clean up */
+                g_string_truncate (buff, 0);
+                g_string_append (buff, "->");
+                g_string_append (buff, current->label);
+                listbox_add_item (list, LISTBOX_APPEND_AT_END, 0, buff->str, current, FALSE);
+            }
+            break;
+        case HL_TYPE_DOTDOT:
+        case HL_TYPE_ENTRY:
+            listbox_add_item (list, LISTBOX_APPEND_AT_END, 0, current->label, current, FALSE);
+            break;
+        default:
+            break;
+        }
+
+    g_string_free (buff, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+unlink_entry (struct hotlist *entry)
+{
+    struct hotlist *current = current_group->head;
+
+    if (current == entry)
+        current_group->head = entry->next;
+    else
+    {
+        while (current != NULL && current->next != entry)
+            current = current->next;
+        if (current != NULL)
+            current->next = entry->next;
+    }
+    entry->next = entry->up = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_VFS
+static void
+add_name_to_list (const char *path)
+{
+    listbox_add_item (l_hotlist, LISTBOX_APPEND_AT_END, 0, path, NULL, FALSE);
+}
+#endif /* !ENABLE_VFS */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+hotlist_run_cmd (int action)
+{
+    switch (action)
+    {
+    case B_MOVE:
+        {
+            struct hotlist *saved = current_group;
+            struct hotlist *item = NULL;
+            struct hotlist *moveto_item = NULL;
+            struct hotlist *moveto_group = NULL;
+            int ret;
+
+            if (listbox_is_empty (l_hotlist))
+                return 0;       /* empty group - nothing to do */
+
+            listbox_get_current (l_hotlist, NULL, (void **) &item);
+            init_movelist (item);
+            hotlist_state.moving = TRUE;
+            ret = dlg_run (movelist_dlg);
+            hotlist_state.moving = FALSE;
+            listbox_get_current (l_movelist, NULL, (void **) &moveto_item);
+            moveto_group = current_group;
+            widget_destroy (WIDGET (movelist_dlg));
+            current_group = saved;
+            if (ret == B_CANCEL)
+                return 0;
+            if (moveto_item == item)
+                return 0;       /* If we insert/append a before/after a
+                                   it hardly changes anything ;) */
+            unlink_entry (item);
+            listbox_remove_current (l_hotlist);
+            item->up = moveto_group;
+            if (moveto_group->head == NULL)
+                moveto_group->head = item;
+            else if (moveto_item == NULL)
+            {                   /* we have group with just comments */
+                struct hotlist *p = moveto_group->head;
+
+                /* skip comments */
+                while (p->next != NULL)
+                    p = p->next;
+                p->next = item;
+            }
+            else if (ret == B_ENTER || ret == B_APPEND)
+            {
+                if (moveto_item->next == NULL)
+                    moveto_item->next = item;
+                else
+                {
+                    item->next = moveto_item->next;
+                    moveto_item->next = item;
+                }
+            }
+            else if (moveto_group->head == moveto_item)
+            {
+                moveto_group->head = item;
+                item->next = moveto_item;
+            }
+            else
+            {
+                struct hotlist *p = moveto_group->head;
+
+                while (p->next != moveto_item)
+                    p = p->next;
+                item->next = p->next;
+                p->next = item;
+            }
+            listbox_remove_list (l_hotlist);
+            fill_listbox (l_hotlist);
+            repaint_screen ();
+            hotlist_state.modified = TRUE;
+            return 0;
+        }
+    case B_REMOVE:
+        {
+            struct hotlist *entry = NULL;
+
+            listbox_get_current (l_hotlist, NULL, (void **) &entry);
+            remove_from_hotlist (entry);
+        }
+        return 0;
+
+    case B_NEW_GROUP:
+        add_new_group_cmd ();
+        return 0;
+
+    case B_ADD_CURRENT:
+        add2hotlist_cmd (our_panel);
+        return 0;
+
+    case B_NEW_ENTRY:
+        add_new_entry_cmd (our_panel);
+        return 0;
+
+    case B_ENTER:
+    case B_ENTER_GROUP:
+        {
+            WListbox *list;
+            void *data;
+            struct hotlist *hlp;
+
+            list = hotlist_state.moving ? l_movelist : l_hotlist;
+            listbox_get_current (list, NULL, &data);
+
+            if (data == NULL)
+                return 1;
+
+            hlp = (struct hotlist *) data;
+
+            if (hlp->type == HL_TYPE_ENTRY)
+                return (action == B_ENTER ? 1 : 0);
+            if (hlp->type != HL_TYPE_DOTDOT)
+            {
+                listbox_remove_list (list);
+                current_group = hlp;
+                fill_listbox (list);
+                return 0;
+            }
+        }
+        MC_FALLTHROUGH;         /* if list empty - just go up */
+
+    case B_UP_GROUP:
+        {
+            WListbox *list = hotlist_state.moving ? l_movelist : l_hotlist;
+
+            listbox_remove_list (list);
+            current_group = current_group->up;
+            fill_listbox (list);
+            return 0;
+        }
+
+#ifdef ENABLE_VFS
+    case B_FREE_ALL_VFS:
+        vfs_expire (TRUE);
+        MC_FALLTHROUGH;
+
+    case B_REFRESH_VFS:
+        listbox_remove_list (l_hotlist);
+        listbox_add_item (l_hotlist, LISTBOX_APPEND_AT_END, 0, mc_config_get_home_dir (), NULL,
+                          FALSE);
+        vfs_fill_names (add_name_to_list);
+        return 0;
+#endif /* ENABLE_VFS */
+
+    default:
+        return 1;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+hotlist_button_callback (WButton * button, int action)
+{
+    int ret;
+
+    (void) button;
+    ret = hotlist_run_cmd (action);
+    update_path_name ();
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline cb_ret_t
+hotlist_handle_key (WDialog * h, int key)
+{
+    switch (key)
+    {
+    case KEY_M_CTRL | '\n':
+        goto l1;
+
+    case '\n':
+    case KEY_ENTER:
+        if (hotlist_button_callback (NULL, B_ENTER) != 0)
+        {
+            h->ret_value = B_ENTER;
+            dlg_close (h);
+        }
+        return MSG_HANDLED;
+
+    case KEY_RIGHT:
+        /* enter to the group */
+        if (hotlist_state.type == LIST_VFSLIST)
+            return MSG_NOT_HANDLED;
+        return hotlist_button_callback (NULL, B_ENTER_GROUP) == 0 ? MSG_HANDLED : MSG_NOT_HANDLED;
+
+    case KEY_LEFT:
+        /* leave the group */
+        if (hotlist_state.type == LIST_VFSLIST)
+            return MSG_NOT_HANDLED;
+        return hotlist_button_callback (NULL, B_UP_GROUP) == 0 ? MSG_HANDLED : MSG_NOT_HANDLED;
+
+    case KEY_DC:
+        if (hotlist_state.moving)
+            return MSG_NOT_HANDLED;
+        hotlist_button_callback (NULL, B_REMOVE);
+        return MSG_HANDLED;
+
+      l1:
+    case ALT ('\n'):
+    case ALT ('\r'):
+        if (!hotlist_state.moving)
+        {
+            void *ldata = NULL;
+
+            listbox_get_current (l_hotlist, NULL, &ldata);
+
+            if (ldata != NULL)
+            {
+                struct hotlist *hlp = (struct hotlist *) ldata;
+
+                if (hlp->type == HL_TYPE_ENTRY)
+                {
+                    char *tmp;
+
+                    tmp = g_strconcat ("cd ", hlp->directory, (char *) NULL);
+                    input_insert (cmdline, tmp, FALSE);
+                    g_free (tmp);
+                    h->ret_value = B_CANCEL;
+                    dlg_close (h);
+                }
+            }
+        }
+        return MSG_HANDLED;     /* ignore key */
+
+    default:
+        return MSG_NOT_HANDLED;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+hotlist_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_INIT:
+    case MSG_NOTIFY:           /* MSG_NOTIFY is fired by the listbox to tell us the item has changed. */
+        update_path_name ();
+        return MSG_HANDLED;
+
+    case MSG_UNHANDLED_KEY:
+        return hotlist_handle_key (h, parm);
+
+    case MSG_POST_KEY:
+        /*
+         * The code here has two purposes:
+         *
+         * (1) Always stay on the hotlist.
+         *
+         * Activating a button using its hotkey (and even pressing ENTER, as
+         * there's a "default button") moves the focus to the button. But we
+         * want to stay on the hotlist, to be able to use the usual keys (up,
+         * down, etc.). So we do `widget_select (lst)`.
+         *
+         * (2) Refresh the hotlist.
+         *
+         * We may have run a command that changed the contents of the list.
+         * We therefore need to refresh it. So we do `widget_draw (lst)`.
+         */
+        {
+            Widget *lst;
+
+            lst = WIDGET (h == hotlist_dlg ? l_hotlist : l_movelist);
+
+            /* widget_select() already redraws the widget, but since it's a
+             * no-op if the widget is already selected ("focused"), we have
+             * to call widget_draw() separately. */
+            if (!widget_get_state (lst, WST_FOCUSED))
+                widget_select (lst);
+            else
+                widget_draw (lst);
+        }
+        return MSG_HANDLED;
+
+    case MSG_RESIZE:
+        {
+            WRect r = w->rect;
+
+            r.lines = LINES - (h == hotlist_dlg ? 2 : 6);
+            r.cols = COLS - 6;
+
+            return dlg_default_callback (w, NULL, MSG_RESIZE, 0, &r);
+        }
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static lcback_ret_t
+hotlist_listbox_callback (WListbox * list)
+{
+    WDialog *dlg = DIALOG (WIDGET (list)->owner);
+
+    if (!listbox_is_empty (list))
+    {
+        void *data = NULL;
+
+        listbox_get_current (list, NULL, &data);
+
+        if (data != NULL)
+        {
+            struct hotlist *hlp = (struct hotlist *) data;
+
+            if (hlp->type == HL_TYPE_ENTRY)
+            {
+                dlg->ret_value = B_ENTER;
+                dlg_close (dlg);
+                return LISTBOX_DONE;
+            }
+            else
+            {
+                hotlist_button_callback (NULL, B_ENTER);
+                send_message (dlg, NULL, MSG_POST_KEY, '\n', NULL);
+                return LISTBOX_CONT;
+            }
+        }
+        else
+        {
+            dlg->ret_value = B_ENTER;
+            dlg_close (dlg);
+            return LISTBOX_DONE;
+        }
+    }
+
+    hotlist_button_callback (NULL, B_UP_GROUP);
+    send_message (dlg, NULL, MSG_POST_KEY, 'u', NULL);
+    return LISTBOX_CONT;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Expands all button names (once) and recalculates button positions.
+ * returns number of columns in the dialog box, which is 10 chars longer
+ * then buttonbar.
+ *
+ * If common width of the window (i.e. in xterm) is less than returned
+ * width - sorry :)  (anyway this did not handled in previous version too)
+ */
+
+static int
+init_i18n_stuff (int list_type, int cols)
+{
+    size_t i;
+
+    static gboolean i18n_flag = FALSE;
+
+    if (!i18n_flag)
+    {
+        for (i = 0; i < hotlist_but_num; i++)
+        {
+#ifdef ENABLE_NLS
+            hotlist_but[i].text = _(hotlist_but[i].text);
+#endif /* ENABLE_NLS */
+            hotlist_but[i].len = str_term_width1 (hotlist_but[i].text) + 3;
+            if (hotlist_but[i].flags == DEFPUSH_BUTTON)
+                hotlist_but[i].len += 2;
+        }
+
+        i18n_flag = TRUE;
+    }
+
+    /* Dynamic resizing of buttonbars */
+    {
+        int len[2], count[2];   /* at most two lines of buttons */
+        int cur_x[2];
+
+        len[0] = len[1] = 0;
+        count[0] = count[1] = 0;
+        cur_x[0] = cur_x[1] = 0;
+
+        /* Count len of buttonbars, assuming 1 extra space between buttons */
+        for (i = 0; i < hotlist_but_num; i++)
+            if ((hotlist_but[i].type & list_type) != 0)
+            {
+                int row;
+
+                row = hotlist_but[i].y;
+                ++count[row];
+                len[row] += hotlist_but[i].len + 1;
+            }
+
+        (len[0])--;
+        (len[1])--;
+
+        cols = MAX (cols, MAX (len[0], len[1]));
+
+        /* arrange buttons */
+        for (i = 0; i < hotlist_but_num; i++)
+            if ((hotlist_but[i].type & list_type) != 0)
+            {
+                int row;
+
+                row = hotlist_but[i].y;
+
+                if (hotlist_but[i].x != 0)
+                {
+                    /* not first int the row */
+                    if (hotlist_but[i].ret_cmd == B_CANCEL)
+                        hotlist_but[i].x = cols - hotlist_but[i].len - 6;
+                    else
+                        hotlist_but[i].x = cur_x[row];
+                }
+
+                cur_x[row] += hotlist_but[i].len + 1;
+            }
+    }
+
+    return cols;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+init_hotlist (hotlist_t list_type)
+{
+    size_t i;
+    const char *title, *help_node;
+    int lines, cols;
+    int y;
+    int dh = 0;
+    WGroup *g;
+    WGroupbox *path_box;
+    Widget *hotlist_widget;
+
+    do_refresh ();
+
+    lines = LINES - 2;
+    cols = init_i18n_stuff (list_type, COLS - 6);
+
+#ifdef ENABLE_VFS
+    if (list_type == LIST_VFSLIST)
+    {
+        title = _("Active VFS directories");
+        help_node = "[vfshot]"; /* FIXME - no such node */
+        dh = 1;
+    }
+    else
+#endif /* !ENABLE_VFS */
+    {
+        title = _("Directory hotlist");
+        help_node = "[Hotlist]";
+    }
+
+    hotlist_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, hotlist_callback,
+                    NULL, help_node, title);
+    g = GROUP (hotlist_dlg);
+
+    y = UY;
+    hotlist_group = groupbox_new (y, UX, lines - 10 + dh, cols - 2 * UX, _("Top level group"));
+    hotlist_widget = WIDGET (hotlist_group);
+    group_add_widget_autopos (g, hotlist_widget, WPOS_KEEP_ALL, NULL);
+
+    l_hotlist =
+        listbox_new (y + 1, UX + 1, hotlist_widget->rect.lines - 2, hotlist_widget->rect.cols - 2,
+                     FALSE, hotlist_listbox_callback);
+
+    /* Fill the hotlist with the active VFS or the hotlist */
+#ifdef ENABLE_VFS
+    if (list_type == LIST_VFSLIST)
+    {
+        listbox_add_item (l_hotlist, LISTBOX_APPEND_AT_END, 0, mc_config_get_home_dir (), NULL,
+                          FALSE);
+        vfs_fill_names (add_name_to_list);
+    }
+    else
+#endif /* !ENABLE_VFS */
+        fill_listbox (l_hotlist);
+
+    /* insert before groupbox to view scrollbar */
+    group_add_widget_autopos (g, l_hotlist, WPOS_KEEP_ALL, NULL);
+
+    y += hotlist_widget->rect.lines;
+
+    path_box = groupbox_new (y, UX, 3, hotlist_widget->rect.cols, _("Directory path"));
+    group_add_widget_autopos (g, path_box, WPOS_KEEP_BOTTOM | WPOS_KEEP_HORZ, NULL);
+
+    pname = label_new (y + 1, UX + 2, NULL);
+    group_add_widget_autopos (g, pname, WPOS_KEEP_BOTTOM | WPOS_KEEP_LEFT, NULL);
+    y += WIDGET (path_box)->rect.lines;
+
+    group_add_widget_autopos (g, hline_new (y++, -1, -1), WPOS_KEEP_BOTTOM, NULL);
+
+    for (i = 0; i < hotlist_but_num; i++)
+        if ((hotlist_but[i].type & list_type) != 0)
+            group_add_widget_autopos (g,
+                                      button_new (y + hotlist_but[i].y, UX + hotlist_but[i].x,
+                                                  hotlist_but[i].ret_cmd, hotlist_but[i].flags,
+                                                  hotlist_but[i].text, hotlist_button_callback),
+                                      hotlist_but[i].pos_flags, NULL);
+
+    widget_select (WIDGET (l_hotlist));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+init_movelist (struct hotlist *item)
+{
+    size_t i;
+    char *hdr;
+    int lines, cols;
+    int y;
+    WGroup *g;
+    Widget *movelist_widget;
+
+    do_refresh ();
+
+    lines = LINES - 6;
+    cols = init_i18n_stuff (LIST_MOVELIST, COLS - 6);
+
+    hdr = g_strdup_printf (_("Moving %s"), item->label);
+
+    movelist_dlg =
+        dlg_create (TRUE, 0, 0, lines, cols, WPOS_CENTER, FALSE, dialog_colors, hotlist_callback,
+                    NULL, "[Hotlist]", hdr);
+    g = GROUP (movelist_dlg);
+
+    g_free (hdr);
+
+    y = UY;
+    movelist_group = groupbox_new (y, UX, lines - 7, cols - 2 * UX, _("Directory label"));
+    movelist_widget = WIDGET (movelist_group);
+    group_add_widget_autopos (g, movelist_widget, WPOS_KEEP_ALL, NULL);
+
+    l_movelist =
+        listbox_new (y + 1, UX + 1, movelist_widget->rect.lines - 2, movelist_widget->rect.cols - 2,
+                     FALSE, hotlist_listbox_callback);
+    fill_listbox (l_movelist);
+    /* insert before groupbox to view scrollbar */
+    group_add_widget_autopos (g, l_movelist, WPOS_KEEP_ALL, NULL);
+
+    y += movelist_widget->rect.lines;
+
+    group_add_widget_autopos (g, hline_new (y++, -1, -1), WPOS_KEEP_BOTTOM, NULL);
+
+    for (i = 0; i < hotlist_but_num; i++)
+        if ((hotlist_but[i].type & LIST_MOVELIST) != 0)
+            group_add_widget_autopos (g,
+                                      button_new (y + hotlist_but[i].y, UX + hotlist_but[i].x,
+                                                  hotlist_but[i].ret_cmd, hotlist_but[i].flags,
+                                                  hotlist_but[i].text, hotlist_button_callback),
+                                      hotlist_but[i].pos_flags, NULL);
+
+    widget_select (WIDGET (l_movelist));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Destroy the list dialog.
+ * Don't confuse with done_hotlist() for the list in memory.
+ */
+
+static void
+hotlist_done (void)
+{
+    widget_destroy (WIDGET (hotlist_dlg));
+    l_hotlist = NULL;
+#if 0
+    update_panels (UP_OPTIMIZE, UP_KEEPSEL);
+#endif
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline char *
+find_group_section (struct hotlist *grp)
+{
+    return g_strconcat (grp->directory, ".Group", (char *) NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static struct hotlist *
+add2hotlist (char *label, char *directory, enum HotListType type, listbox_append_t pos)
+{
+    struct hotlist *new;
+    struct hotlist *current = NULL;
+
+    /*
+     * Hotlist is neither loaded nor loading.
+     * Must be called by "Ctrl-x a" before using hotlist.
+     */
+    if (current_group == NULL)
+        load_hotlist ();
+
+    listbox_get_current (l_hotlist, NULL, (void **) &current);
+
+    /* Make sure '..' stays at the top of the list. */
+    if ((current != NULL) && (current->type == HL_TYPE_DOTDOT))
+        pos = LISTBOX_APPEND_AFTER;
+
+    new = g_new0 (struct hotlist, 1);
+
+    new->type = type;
+    new->label = label;
+    new->directory = directory;
+    new->up = current_group;
+
+    if (type == HL_TYPE_GROUP)
+    {
+        current_group = new;
+        add_dotdot_to_list ();
+        current_group = new->up;
+    }
+
+    if (current_group->head == NULL)
+    {
+        /* first element in group */
+        current_group->head = new;
+    }
+    else if (pos == LISTBOX_APPEND_AFTER)
+    {
+        new->next = current->next;
+        current->next = new;
+    }
+    else if (pos == LISTBOX_APPEND_BEFORE && current == current_group->head)
+    {
+        /* should be inserted before first item */
+        new->next = current;
+        current_group->head = new;
+    }
+    else if (pos == LISTBOX_APPEND_BEFORE)
+    {
+        struct hotlist *p = current_group->head;
+
+        while (p->next != current)
+            p = p->next;
+
+        new->next = current;
+        p->next = new;
+    }
+    else
+    {                           /* append at the end */
+        struct hotlist *p = current_group->head;
+
+        while (p->next != NULL)
+            p = p->next;
+
+        p->next = new;
+    }
+
+    if (hotlist_state.running && type != HL_TYPE_COMMENT && type != HL_TYPE_DOTDOT)
+    {
+        if (type == HL_TYPE_GROUP)
+        {
+            char *lbl;
+
+            lbl = g_strconcat ("->", new->label, (char *) NULL);
+            listbox_add_item (l_hotlist, pos, 0, lbl, new, FALSE);
+            g_free (lbl);
+        }
+        else
+            listbox_add_item (l_hotlist, pos, 0, new->label, new, FALSE);
+        listbox_set_current (l_hotlist, l_hotlist->current);
+    }
+
+    return new;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+add_new_entry_input (const char *header, const char *text1, const char *text2,
+                     const char *help, char **r1, char **r2)
+{
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        QUICK_LABELED_INPUT (text1, input_label_above, *r1, "input-lbl", r1, NULL,
+                             FALSE, FALSE, INPUT_COMPLETE_NONE),
+        QUICK_SEPARATOR (FALSE),
+        QUICK_LABELED_INPUT (text2, input_label_above, *r2, "input-lbl", r2, NULL,
+                             FALSE, FALSE, INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD),
+        QUICK_START_BUTTONS (TRUE, TRUE),
+            QUICK_BUTTON (N_("&Append"), B_APPEND, NULL, NULL),
+            QUICK_BUTTON (N_("&Insert"), B_INSERT, NULL, NULL),
+            QUICK_BUTTON (N_("&Cancel"), B_CANCEL, NULL, NULL),
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 64 };
+
+    quick_dialog_t qdlg = {
+        r, header, help,
+        quick_widgets, NULL, NULL
+    };
+
+    int ret;
+
+    ret = quick_dialog (&qdlg);
+
+    return (ret != B_CANCEL) ? ret : 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+add_new_entry_cmd (WPanel * panel)
+{
+    char *title, *url, *to_free;
+    int ret;
+
+    /* Take current directory as default value for input fields */
+    to_free = title = url = vfs_path_to_str_flags (panel->cwd_vpath, 0, VPF_STRIP_PASSWORD);
+
+    ret = add_new_entry_input (_("New hotlist entry"), _("Directory label:"),
+                               _("Directory path:"), "[Hotlist]", &title, &url);
+    g_free (to_free);
+
+    if (ret == 0)
+        return;
+    if (title == NULL || *title == '\0' || url == NULL || *url == '\0')
+    {
+        g_free (title);
+        g_free (url);
+        return;
+    }
+
+    if (ret == B_ENTER || ret == B_APPEND)
+        add2hotlist (title, url, HL_TYPE_ENTRY, LISTBOX_APPEND_AFTER);
+    else
+        add2hotlist (title, url, HL_TYPE_ENTRY, LISTBOX_APPEND_BEFORE);
+
+    hotlist_state.modified = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+add_new_group_input (const char *header, const char *label, char **result)
+{
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        QUICK_LABELED_INPUT (label, input_label_above, "", "input", result, NULL,
+                             FALSE, FALSE, INPUT_COMPLETE_NONE),
+        QUICK_START_BUTTONS (TRUE, TRUE),
+            QUICK_BUTTON (N_("&Append"), B_APPEND, NULL, NULL),
+            QUICK_BUTTON (N_("&Insert"), B_INSERT, NULL, NULL),
+            QUICK_BUTTON (N_("&Cancel"), B_CANCEL, NULL, NULL),
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 64 };
+
+    quick_dialog_t qdlg = {
+        r, header, "[Hotlist]",
+        quick_widgets, NULL, NULL
+    };
+
+    int ret;
+
+    ret = quick_dialog (&qdlg);
+
+    return (ret != B_CANCEL) ? ret : 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+add_new_group_cmd (void)
+{
+    char *label;
+    int ret;
+
+    ret = add_new_group_input (_("New hotlist group"), _("Name of new group:"), &label);
+    if (ret == 0 || label == NULL || *label == '\0')
+        return;
+
+    if (ret == B_ENTER || ret == B_APPEND)
+        add2hotlist (label, 0, HL_TYPE_GROUP, LISTBOX_APPEND_AFTER);
+    else
+        add2hotlist (label, 0, HL_TYPE_GROUP, LISTBOX_APPEND_BEFORE);
+
+    hotlist_state.modified = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+remove_group (struct hotlist *grp)
+{
+    struct hotlist *current = grp->head;
+
+    while (current != NULL)
+    {
+        struct hotlist *next = current->next;
+
+        if (current->type == HL_TYPE_GROUP)
+            remove_group (current);
+
+        g_free (current->label);
+        g_free (current->directory);
+        g_free (current);
+
+        current = next;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+remove_from_hotlist (struct hotlist *entry)
+{
+    if (entry == NULL)
+        return;
+
+    if (entry->type == HL_TYPE_DOTDOT)
+        return;
+
+    if (confirm_directory_hotlist_delete)
+    {
+        char text[BUF_MEDIUM];
+        int result;
+
+        if (safe_delete)
+            query_set_sel (1);
+
+        g_snprintf (text, sizeof (text), _("Are you sure you want to remove entry \"%s\"?"),
+                    str_trunc (entry->label, 30));
+        result = query_dialog (Q_ ("DialogTitle|Delete"), text, D_ERROR | D_CENTER, 2,
+                               _("&Yes"), _("&No"));
+        if (result != 0)
+            return;
+    }
+
+    if (entry->type == HL_TYPE_GROUP)
+    {
+        struct hotlist *head = entry->head;
+
+        if (head != NULL && (head->type != HL_TYPE_DOTDOT || head->next != NULL))
+        {
+            char text[BUF_MEDIUM];
+            int result;
+
+            g_snprintf (text, sizeof (text), _("Group \"%s\" is not empty.\nRemove it?"),
+                        str_trunc (entry->label, 30));
+            result = query_dialog (Q_ ("DialogTitle|Delete"), text, D_ERROR | D_CENTER, 2,
+                                   _("&Yes"), _("&No"));
+            if (result != 0)
+                return;
+        }
+
+        remove_group (entry);
+    }
+
+    unlink_entry (entry);
+
+    g_free (entry->label);
+    g_free (entry->directory);
+    g_free (entry);
+    /* now remove list entry from screen */
+    listbox_remove_current (l_hotlist);
+    hotlist_state.modified = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+load_group (struct hotlist *grp)
+{
+    gchar **profile_keys, **keys;
+    char *group_section;
+    struct hotlist *current = 0;
+
+    group_section = find_group_section (grp);
+
+    keys = mc_config_get_keys (mc_global.main_config, group_section, NULL);
+
+    current_group = grp;
+
+    for (profile_keys = keys; *profile_keys != NULL; profile_keys++)
+        add2hotlist (mc_config_get_string (mc_global.main_config, group_section, *profile_keys, ""),
+                     g_strdup (*profile_keys), HL_TYPE_GROUP, LISTBOX_APPEND_AT_END);
+
+    g_strfreev (keys);
+
+    keys = mc_config_get_keys (mc_global.main_config, grp->directory, NULL);
+
+    for (profile_keys = keys; *profile_keys != NULL; profile_keys++)
+        add2hotlist (mc_config_get_string (mc_global.main_config, group_section, *profile_keys, ""),
+                     g_strdup (*profile_keys), HL_TYPE_ENTRY, LISTBOX_APPEND_AT_END);
+
+    g_free (group_section);
+    g_strfreev (keys);
+
+    for (current = grp->head; current; current = current->next)
+        load_group (current);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+hot_skip_blanks (void)
+{
+    int c;
+
+    while ((c = getc (hotlist_file)) != EOF && c != '\n' && g_ascii_isspace (c))
+        ;
+    return c;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+hot_next_token (void)
+{
+    int c, ret = 0;
+    size_t l;
+
+    if (tkn_buf == NULL)
+        tkn_buf = g_string_new ("");
+    g_string_set_size (tkn_buf, 0);
+
+  again:
+    c = hot_skip_blanks ();
+    switch (c)
+    {
+    case EOF:
+        ret = TKN_EOF;
+        break;
+    case '\n':
+        ret = TKN_EOL;
+        break;
+    case '#':
+        while ((c = getc (hotlist_file)) != EOF && c != '\n')
+            g_string_append_c (tkn_buf, c);
+        ret = TKN_COMMENT;
+        break;
+    case '"':
+        while ((c = getc (hotlist_file)) != EOF && c != '"')
+        {
+            if (c == '\\')
+            {
+                c = getc (hotlist_file);
+                if (c == EOF)
+                {
+                    g_string_free (tkn_buf, TRUE);
+                    return TKN_EOF;
+                }
+            }
+            g_string_append_c (tkn_buf, c == '\n' ? ' ' : c);
+        }
+        ret = (c == EOF) ? TKN_EOF : TKN_STRING;
+        break;
+    case '\\':
+        c = getc (hotlist_file);
+        if (c == EOF)
+        {
+            g_string_free (tkn_buf, TRUE);
+            return TKN_EOF;
+        }
+        if (c == '\n')
+            goto again;
+
+        MC_FALLTHROUGH;         /* it is taken as normal character */
+
+    default:
+        do
+        {
+            g_string_append_c (tkn_buf, g_ascii_toupper (c));
+        }
+        while ((c = fgetc (hotlist_file)) != EOF && (g_ascii_isalnum (c) || !isascii (c)));
+        if (c != EOF)
+            ungetc (c, hotlist_file);
+        l = tkn_buf->len;
+        if (strncmp (tkn_buf->str, "GROUP", l) == 0)
+            ret = TKN_GROUP;
+        else if (strncmp (tkn_buf->str, "ENTRY", l) == 0)
+            ret = TKN_ENTRY;
+        else if (strncmp (tkn_buf->str, "ENDGROUP", l) == 0)
+            ret = TKN_ENDGROUP;
+        else if (strncmp (tkn_buf->str, "URL", l) == 0)
+            ret = TKN_URL;
+        else
+            ret = TKN_UNKNOWN;
+        break;
+    }
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+hot_load_group (struct hotlist *grp)
+{
+    int tkn;
+    struct hotlist *new_grp;
+    char *label, *url;
+
+    current_group = grp;
+
+    while ((tkn = hot_next_token ()) != TKN_ENDGROUP)
+        switch (tkn)
+        {
+        case TKN_GROUP:
+            CHECK_TOKEN (TKN_STRING);
+            new_grp =
+                add2hotlist (g_strndup (tkn_buf->str, tkn_buf->len), 0, HL_TYPE_GROUP,
+                             LISTBOX_APPEND_AT_END);
+            SKIP_TO_EOL;
+            hot_load_group (new_grp);
+            current_group = grp;
+            break;
+        case TKN_ENTRY:
+            {
+                CHECK_TOKEN (TKN_STRING);
+                label = g_strndup (tkn_buf->str, tkn_buf->len);
+                CHECK_TOKEN (TKN_URL);
+                CHECK_TOKEN (TKN_STRING);
+                url = tilde_expand (tkn_buf->str);
+                add2hotlist (label, url, HL_TYPE_ENTRY, LISTBOX_APPEND_AT_END);
+                SKIP_TO_EOL;
+            }
+            break;
+        case TKN_COMMENT:
+            label = g_strndup (tkn_buf->str, tkn_buf->len);
+            add2hotlist (label, 0, HL_TYPE_COMMENT, LISTBOX_APPEND_AT_END);
+            break;
+        case TKN_EOF:
+            hotlist_state.readonly = TRUE;
+            hotlist_state.file_error = TRUE;
+            return;
+        case TKN_EOL:
+            /* skip empty lines */
+            break;
+        default:
+            hotlist_state.readonly = TRUE;
+            hotlist_state.file_error = TRUE;
+            SKIP_TO_EOL;
+            break;
+        }
+    SKIP_TO_EOL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+hot_load_file (struct hotlist *grp)
+{
+    int tkn;
+    struct hotlist *new_grp;
+    char *label, *url;
+
+    current_group = grp;
+
+    while ((tkn = hot_next_token ()) != TKN_EOF)
+        switch (tkn)
+        {
+        case TKN_GROUP:
+            CHECK_TOKEN (TKN_STRING);
+            new_grp =
+                add2hotlist (g_strndup (tkn_buf->str, tkn_buf->len), 0, HL_TYPE_GROUP,
+                             LISTBOX_APPEND_AT_END);
+            SKIP_TO_EOL;
+            hot_load_group (new_grp);
+            current_group = grp;
+            break;
+        case TKN_ENTRY:
+            {
+                CHECK_TOKEN (TKN_STRING);
+                label = g_strndup (tkn_buf->str, tkn_buf->len);
+                CHECK_TOKEN (TKN_URL);
+                CHECK_TOKEN (TKN_STRING);
+                url = tilde_expand (tkn_buf->str);
+                add2hotlist (label, url, HL_TYPE_ENTRY, LISTBOX_APPEND_AT_END);
+                SKIP_TO_EOL;
+            }
+            break;
+        case TKN_COMMENT:
+            label = g_strndup (tkn_buf->str, tkn_buf->len);
+            add2hotlist (label, 0, HL_TYPE_COMMENT, LISTBOX_APPEND_AT_END);
+            break;
+        case TKN_EOL:
+            /* skip empty lines */
+            break;
+        default:
+            hotlist_state.readonly = TRUE;
+            hotlist_state.file_error = TRUE;
+            SKIP_TO_EOL;
+            break;
+        }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+clean_up_hotlist_groups (const char *section)
+{
+    char *grp_section;
+
+    grp_section = g_strconcat (section, ".Group", (char *) NULL);
+    if (mc_config_has_group (mc_global.main_config, section))
+        mc_config_del_group (mc_global.main_config, section);
+
+    if (mc_config_has_group (mc_global.main_config, grp_section))
+    {
+        char **profile_keys, **keys;
+
+        keys = mc_config_get_keys (mc_global.main_config, grp_section, NULL);
+
+        for (profile_keys = keys; *profile_keys != NULL; profile_keys++)
+            clean_up_hotlist_groups (*profile_keys);
+
+        g_strfreev (keys);
+        mc_config_del_group (mc_global.main_config, grp_section);
+    }
+    g_free (grp_section);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+load_hotlist (void)
+{
+    gboolean remove_old_list = FALSE;
+    struct stat stat_buf;
+
+    if (hotlist_state.loaded)
+    {
+        stat (hotlist_file_name, &stat_buf);
+        if (hotlist_file_mtime < stat_buf.st_mtime)
+            done_hotlist ();
+        else
+            return;
+    }
+
+    if (hotlist_file_name == NULL)
+        hotlist_file_name = mc_config_get_full_path (MC_HOTLIST_FILE);
+
+    hotlist = g_new0 (struct hotlist, 1);
+    hotlist->type = HL_TYPE_GROUP;
+    hotlist->label = g_strdup (_("Top level group"));
+    hotlist->up = hotlist;
+    /*
+     * compatibility :-(
+     */
+    hotlist->directory = g_strdup ("Hotlist");
+
+    hotlist_file = fopen (hotlist_file_name, "r");
+    if (hotlist_file == NULL)
+    {
+        int result;
+
+        load_group (hotlist);
+        hotlist_state.loaded = TRUE;
+        /*
+         * just to be sure we got copy
+         */
+        hotlist_state.modified = TRUE;
+        result = save_hotlist ();
+        hotlist_state.modified = FALSE;
+        if (result != 0)
+            remove_old_list = TRUE;
+        else
+            message (D_ERROR, _("Hotlist Load"),
+                     _
+                     ("MC was unable to write %s file,\nyour old hotlist entries were not deleted"),
+                     MC_USERCONF_DIR PATH_SEP_STR MC_HOTLIST_FILE);
+    }
+    else
+    {
+        hot_load_file (hotlist);
+        fclose (hotlist_file);
+        hotlist_state.loaded = TRUE;
+    }
+
+    if (remove_old_list)
+    {
+        GError *mcerror = NULL;
+
+        clean_up_hotlist_groups ("Hotlist");
+        if (!mc_config_save_file (mc_global.main_config, &mcerror))
+            setup_save_config_show_error (mc_global.main_config->ini_path, &mcerror);
+
+        mc_error_message (&mcerror, NULL);
+    }
+
+    stat (hotlist_file_name, &stat_buf);
+    hotlist_file_mtime = stat_buf.st_mtime;
+    current_group = hotlist;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+hot_save_group (struct hotlist *grp)
+{
+    struct hotlist *current;
+    int i;
+    char *s;
+
+#define INDENT(n) \
+do { \
+    for (i = 0; i < n; i++) \
+        putc (' ', hotlist_file); \
+} while (0)
+
+    for (current = grp->head; current != NULL; current = current->next)
+        switch (current->type)
+        {
+        case HL_TYPE_GROUP:
+            INDENT (list_level);
+            fputs ("GROUP \"", hotlist_file);
+            for (s = current->label; *s != '\0'; s++)
+            {
+                if (*s == '"' || *s == '\\')
+                    putc ('\\', hotlist_file);
+                putc (*s, hotlist_file);
+            }
+            fputs ("\"\n", hotlist_file);
+            list_level += 2;
+            hot_save_group (current);
+            list_level -= 2;
+            INDENT (list_level);
+            fputs ("ENDGROUP\n", hotlist_file);
+            break;
+        case HL_TYPE_ENTRY:
+            INDENT (list_level);
+            fputs ("ENTRY \"", hotlist_file);
+            for (s = current->label; *s != '\0'; s++)
+            {
+                if (*s == '"' || *s == '\\')
+                    putc ('\\', hotlist_file);
+                putc (*s, hotlist_file);
+            }
+            fputs ("\" URL \"", hotlist_file);
+            for (s = current->directory; *s != '\0'; s++)
+            {
+                if (*s == '"' || *s == '\\')
+                    putc ('\\', hotlist_file);
+                putc (*s, hotlist_file);
+            }
+            fputs ("\"\n", hotlist_file);
+            break;
+        case HL_TYPE_COMMENT:
+            fprintf (hotlist_file, "#%s\n", current->label);
+            break;
+        case HL_TYPE_DOTDOT:
+            /* do nothing */
+            break;
+        default:
+            break;
+        }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+add_dotdot_to_list (void)
+{
+    if (current_group != hotlist && hotlist_has_dot_dot)
+        add2hotlist (g_strdup (".."), g_strdup (".."), HL_TYPE_DOTDOT, LISTBOX_APPEND_AT_END);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+add2hotlist_cmd (WPanel * panel)
+{
+    char *lc_prompt;
+    const char *cp = N_("Label for \"%s\":");
+    int l;
+    char *label_string, *label;
+
+#ifdef ENABLE_NLS
+    cp = _(cp);
+#endif
+
+    /* extra variable to use it in the button callback */
+    our_panel = panel;
+
+    l = str_term_width1 (cp);
+    label_string = vfs_path_to_str_flags (panel->cwd_vpath, 0, VPF_STRIP_PASSWORD);
+    lc_prompt = g_strdup_printf (cp, str_trunc (label_string, COLS - 2 * UX - (l + 8)));
+    label =
+        input_dialog (_("Add to hotlist"), lc_prompt, MC_HISTORY_HOTLIST_ADD, label_string,
+                      INPUT_COMPLETE_NONE);
+    g_free (lc_prompt);
+
+    if (label == NULL || *label == '\0')
+    {
+        g_free (label_string);
+        g_free (label);
+    }
+    else
+    {
+        add2hotlist (label, label_string, HL_TYPE_ENTRY, LISTBOX_APPEND_AT_END);
+        hotlist_state.modified = TRUE;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+char *
+hotlist_show (hotlist_t list_type, WPanel * panel)
+{
+    char *target = NULL;
+    int res;
+
+    /* extra variable to use it in the button callback */
+    our_panel = panel;
+
+    hotlist_state.type = list_type;
+    load_hotlist ();
+
+    init_hotlist (list_type);
+
+    /* display file info */
+    tty_setcolor (SELECTED_COLOR);
+
+    hotlist_state.running = TRUE;
+    res = dlg_run (hotlist_dlg);
+    hotlist_state.running = FALSE;
+    save_hotlist ();
+
+    if (res == B_ENTER)
+    {
+        char *text = NULL;
+        struct hotlist *hlp = NULL;
+
+        listbox_get_current (l_hotlist, &text, (void **) &hlp);
+        target = g_strdup (hlp != NULL ? hlp->directory : text);
+    }
+
+    hotlist_done ();
+    return target;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+save_hotlist (void)
+{
+    gboolean saved = FALSE;
+    struct stat stat_buf;
+
+    if (!hotlist_state.readonly && hotlist_state.modified && hotlist_file_name != NULL)
+    {
+        mc_util_make_backup_if_possible (hotlist_file_name, ".bak");
+
+        hotlist_file = fopen (hotlist_file_name, "w");
+        if (hotlist_file == NULL)
+            mc_util_restore_from_backup_if_possible (hotlist_file_name, ".bak");
+        else
+        {
+            hot_save_group (hotlist);
+            fclose (hotlist_file);
+            stat (hotlist_file_name, &stat_buf);
+            hotlist_file_mtime = stat_buf.st_mtime;
+            hotlist_state.modified = FALSE;
+            saved = TRUE;
+        }
+    }
+
+    return saved;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Unload list from memory.
+ * Don't confuse with hotlist_done() for GUI.
+ */
+
+void
+done_hotlist (void)
+{
+    if (hotlist != NULL)
+    {
+        remove_group (hotlist);
+        g_free (hotlist->label);
+        g_free (hotlist->directory);
+        MC_PTR_FREE (hotlist);
+    }
+
+    hotlist_state.loaded = FALSE;
+
+    MC_PTR_FREE (hotlist_file_name);
+    l_hotlist = NULL;
+    current_group = NULL;
+
+    if (tkn_buf != NULL)
+    {
+        g_string_free (tkn_buf, TRUE);
+        tkn_buf = NULL;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/hotlist.h b/src/filemanager/hotlist.h
new file mode 100644
index 0000000..94bc305
--- /dev/null
+++ b/src/filemanager/hotlist.h
@@ -0,0 +1,33 @@
+/** \file hotlist.h
+ *  \brief Header: directory hotlist
+ */
+
+#ifndef MC__HOTLIST_H
+#define MC__HOTLIST_H
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+#include "panel.h"
+
+/*** enums ***************************************************************************************/
+
+typedef enum
+{
+    LIST_VFSLIST = 0x01,
+    LIST_HOTLIST = 0x02,
+    LIST_MOVELIST = 0x04
+} hotlist_t;
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void add2hotlist_cmd (WPanel * panel);
+char *hotlist_show (hotlist_t list_type, WPanel * panel);
+gboolean save_hotlist (void);
+void done_hotlist (void);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__HOTLIST_H */
diff --git a/src/filemanager/info.c b/src/filemanager/info.c
new file mode 100644
index 0000000..790f820
--- /dev/null
+++ b/src/filemanager/info.c
@@ -0,0 +1,377 @@
+/*
+   Panel managing.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2023
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file info.c
+ *  \brief Source: panel managing
+ */
+
+#include <config.h>
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <sys/stat.h>
+#include <inttypes.h>           /* PRIuMAX */
+
+#include "lib/global.h"
+#include "lib/unixcompat.h"
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"        /* is_idle() */
+#include "lib/skin.h"
+#include "lib/strutil.h"
+#include "lib/timefmt.h"        /* file_date() */
+#include "lib/util.h"
+#include "lib/widget.h"
+
+#include "src/setup.h"          /* panels_options */
+
+#include "filemanager.h"        /* the_menubar */
+#include "layout.h"
+#include "mountlist.h"
+#ifdef ENABLE_EXT2FS_ATTR
+#include "cmd.h"                /* chattr_get_as_str() */
+#endif
+
+#include "info.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+/*** file scope type declarations ****************************************************************/
+
+struct WInfo
+{
+    Widget widget;
+    gboolean ready;
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct my_statfs myfs_stats;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+info_box (WInfo * info)
+{
+    Widget *w = WIDGET (info);
+
+    const char *title = _("Information");
+    const int len = str_term_width1 (title);
+
+    tty_set_normal_attrs ();
+    tty_setcolor (NORMAL_COLOR);
+    widget_erase (w);
+    tty_draw_box (w->rect.y, w->rect.x, w->rect.lines, w->rect.cols, FALSE);
+
+    widget_gotoyx (w, 0, (w->rect.cols - len - 2) / 2);
+    tty_printf (" %s ", title);
+
+    widget_gotoyx (w, 2, 0);
+    tty_print_alt_char (ACS_LTEE, FALSE);
+    widget_gotoyx (w, 2, w->rect.cols - 1);
+    tty_print_alt_char (ACS_RTEE, FALSE);
+    tty_draw_hline (w->rect.y + 2, w->rect.x + 1, ACS_HLINE, w->rect.cols - 2);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+info_show_info (WInfo * info)
+{
+    const WRect *w = &CONST_WIDGET (info)->rect;
+    const file_entry_t *fe;
+    static int i18n_adjust = 0;
+    static const char *file_label;
+    GString *buff;
+    struct stat st;
+    char rp_cwd[PATH_MAX];
+    const char *p_rp_cwd;
+
+    if (!is_idle ())
+        return;
+
+    info_box (info);
+
+    tty_setcolor (MARKED_COLOR);
+    widget_gotoyx (w, 1, 3);
+    tty_printf (_("Midnight Commander %s"), mc_global.mc_version);
+
+    if (!info->ready)
+        return;
+
+    if (get_current_type () != view_listing)
+        return;
+
+    /* don't rely on vpath CWD when cd_symlinks enabled */
+    p_rp_cwd = mc_realpath (vfs_path_as_str (current_panel->cwd_vpath), rp_cwd);
+    if (p_rp_cwd == NULL)
+        p_rp_cwd = vfs_path_as_str (current_panel->cwd_vpath);
+
+    my_statfs (&myfs_stats, p_rp_cwd);
+
+    fe = panel_current_entry (current_panel);
+
+    st = fe->st;
+
+    /* Print only lines which fit */
+
+    if (i18n_adjust == 0)
+    {
+        /* This printf pattern string is used as a reference for size */
+        file_label = _("File: %s");
+        i18n_adjust = str_term_width1 (file_label) + 2;
+    }
+
+    tty_setcolor (NORMAL_COLOR);
+
+    buff = g_string_new ("");
+
+    switch (w->lines - 2)
+    {
+        /* Note: all cases are fall-throughs */
+
+    default:
+        MC_FALLTHROUGH;
+    case 17:
+        widget_gotoyx (w, 17, 3);
+        if ((myfs_stats.nfree == 0 && myfs_stats.nodes == 0) ||
+            (myfs_stats.nfree == (uintmax_t) (-1) && myfs_stats.nodes == (uintmax_t) (-1)))
+            tty_print_string (_("No node information"));
+        else if (myfs_stats.nfree == (uintmax_t) (-1))
+            tty_printf ("%s - / %" PRIuMAX, _("Free nodes:"), myfs_stats.nodes);
+        else if (myfs_stats.nodes == (uintmax_t) (-1))
+            tty_printf ("%s %" PRIuMAX " / -", _("Free nodes:"), myfs_stats.nfree);
+        else
+            tty_printf ("%s %" PRIuMAX " / %" PRIuMAX " (%d%%)",
+                        _("Free nodes:"),
+                        myfs_stats.nfree, myfs_stats.nodes,
+                        myfs_stats.nodes == 0 ? 0 :
+                        (int) (100 * (long double) myfs_stats.nfree / myfs_stats.nodes));
+        MC_FALLTHROUGH;
+    case 16:
+        widget_gotoyx (w, 16, 3);
+        if (myfs_stats.avail == 0 && myfs_stats.total == 0)
+            tty_print_string (_("No space information"));
+        else
+        {
+            char buffer1[6], buffer2[6];
+
+            size_trunc_len (buffer1, 5, myfs_stats.avail, 1, panels_options.kilobyte_si);
+            size_trunc_len (buffer2, 5, myfs_stats.total, 1, panels_options.kilobyte_si);
+            tty_printf (_("Free space: %s / %s (%d%%)"), buffer1, buffer2,
+                        myfs_stats.total == 0 ? 0 :
+                        (int) (100 * (long double) myfs_stats.avail / myfs_stats.total));
+        }
+        MC_FALLTHROUGH;
+    case 15:
+        widget_gotoyx (w, 15, 3);
+        tty_printf (_("Type:       %s"),
+                    myfs_stats.typename ? myfs_stats.typename : _("non-local vfs"));
+        if (myfs_stats.type != 0xffff && myfs_stats.type != -1)
+            tty_printf (" (%Xh)", (unsigned int) myfs_stats.type);
+        MC_FALLTHROUGH;
+    case 14:
+        widget_gotoyx (w, 14, 3);
+        str_printf (buff, _("Device:     %s"),
+                    str_trunc (myfs_stats.device, w->cols - i18n_adjust));
+        tty_print_string (buff->str);
+        g_string_set_size (buff, 0);
+        MC_FALLTHROUGH;
+    case 13:
+        widget_gotoyx (w, 13, 3);
+        str_printf (buff, _("Filesystem: %s"),
+                    str_trunc (myfs_stats.mpoint, w->cols - i18n_adjust));
+        tty_print_string (buff->str);
+        g_string_set_size (buff, 0);
+        MC_FALLTHROUGH;
+    case 12:
+        widget_gotoyx (w, 12, 3);
+        str_printf (buff, _("Accessed:   %s"), file_date (st.st_atime));
+        tty_print_string (buff->str);
+        g_string_set_size (buff, 0);
+        MC_FALLTHROUGH;
+    case 11:
+        widget_gotoyx (w, 11, 3);
+        str_printf (buff, _("Modified:   %s"), file_date (st.st_mtime));
+        tty_print_string (buff->str);
+        g_string_set_size (buff, 0);
+        MC_FALLTHROUGH;
+    case 10:
+        widget_gotoyx (w, 10, 3);
+        /* The field st_ctime is changed by writing or by setting inode
+           information (i.e., owner, group, link count, mode, etc.).  */
+        /* TRANSLATORS: Time of last status change as in stat(2) man. */
+        str_printf (buff, _("Changed:    %s"), file_date (st.st_ctime));
+        tty_print_string (buff->str);
+        g_string_set_size (buff, 0);
+        MC_FALLTHROUGH;
+    case 9:
+        widget_gotoyx (w, 9, 3);
+#ifdef HAVE_STRUCT_STAT_ST_RDEV
+        if (S_ISCHR (st.st_mode) || S_ISBLK (st.st_mode))
+            tty_printf (_("Dev. type: major %lu, minor %lu"),
+                        (unsigned long) major (st.st_rdev), (unsigned long) minor (st.st_rdev));
+        else
+#endif
+        {
+            char buffer[10];
+            size_trunc_len (buffer, 9, st.st_size, 0, panels_options.kilobyte_si);
+            tty_printf (_("Size:       %s"), buffer);
+#ifdef HAVE_STRUCT_STAT_ST_BLOCKS
+            tty_printf (ngettext (" (%lu block)", " (%lu blocks)",
+                                  (unsigned long) st.st_blocks), (unsigned long) st.st_blocks);
+#endif
+        }
+        MC_FALLTHROUGH;
+    case 8:
+        widget_gotoyx (w, 8, 3);
+        tty_printf (_("Owner:      %s/%s"), get_owner (st.st_uid), get_group (st.st_gid));
+        MC_FALLTHROUGH;
+    case 7:
+        widget_gotoyx (w, 7, 3);
+        tty_printf (_("Links:      %d"), (int) st.st_nlink);
+        MC_FALLTHROUGH;
+    case 6:
+        widget_gotoyx (w, 6, 3);
+
+        {
+            vfs_path_t *vpath;
+#ifdef ENABLE_EXT2FS_ATTR
+            unsigned long attr;
+#endif
+
+            vpath = vfs_path_from_str (fe->fname->str);
+
+#ifdef ENABLE_EXT2FS_ATTR
+            if (mc_fgetflags (vpath, &attr) == 0)
+                tty_printf (_("Attributes: %s"), chattr_get_as_str (attr));
+            else
+#endif
+                tty_print_string (_("Attributes: unavailable"));
+
+            vfs_path_free (vpath, TRUE);
+        }
+        MC_FALLTHROUGH;
+    case 5:
+        widget_gotoyx (w, 5, 3);
+        tty_printf (_("Mode:       %s (%04o)"),
+                    string_perm (st.st_mode), (unsigned) st.st_mode & 07777);
+        MC_FALLTHROUGH;
+    case 4:
+        widget_gotoyx (w, 4, 3);
+        tty_printf (_("Location:   %Xh:%Xh"), (unsigned int) st.st_dev, (unsigned int) st.st_ino);
+        MC_FALLTHROUGH;
+    case 3:
+        {
+            const char *fname;
+
+            widget_gotoyx (w, 3, 2);
+            fname = fe->fname->str;
+            str_printf (buff, file_label, str_trunc (fname, w->cols - i18n_adjust));
+            tty_print_string (buff->str);
+        }
+        MC_FALLTHROUGH;
+    case 2:
+        MC_FALLTHROUGH;
+    case 1:
+        MC_FALLTHROUGH;
+    case 0:
+        ;
+    }                           /* switch */
+    g_string_free (buff, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+info_hook (void *data)
+{
+    WInfo *info = (WInfo *) data;
+    Widget *other_widget;
+
+    other_widget = get_panel_widget (get_current_index ());
+    if (!other_widget)
+        return;
+    if (widget_overlapped (WIDGET (info), other_widget))
+        return;
+
+    info->ready = TRUE;
+    info_show_info (info);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+info_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WInfo *info = (WInfo *) w;
+
+    switch (msg)
+    {
+    case MSG_INIT:
+        init_my_statfs ();
+        add_hook (&select_file_hook, info_hook, info);
+        info->ready = FALSE;
+        return MSG_HANDLED;
+
+    case MSG_DRAW:
+        info_hook (info);
+        return MSG_HANDLED;
+
+    case MSG_DESTROY:
+        delete_hook (&select_file_hook, info_hook);
+        free_my_statfs ();
+        return MSG_HANDLED;
+
+    default:
+        return widget_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+WInfo *
+info_new (int y, int x, int lines, int cols)
+{
+    WRect r = { y, x, lines, cols };
+    WInfo *info;
+    Widget *w;
+
+    info = g_new (struct WInfo, 1);
+    w = WIDGET (info);
+    widget_init (w, &r, info_callback, NULL);
+
+    return info;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/info.h b/src/filemanager/info.h
new file mode 100644
index 0000000..cba2592
--- /dev/null
+++ b/src/filemanager/info.h
@@ -0,0 +1,24 @@
+/** \file info.h
+ *  \brief Header: panel managing
+ */
+
+#ifndef MC__INFO_H
+#define MC__INFO_H
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+struct WInfo;
+typedef struct WInfo WInfo;
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+WInfo *info_new (int y, int x, int lines, int cols);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__INFO_H */
diff --git a/src/filemanager/ioblksize.h b/src/filemanager/ioblksize.h
new file mode 100644
index 0000000..91aa633
--- /dev/null
+++ b/src/filemanager/ioblksize.h
@@ -0,0 +1,86 @@
+/* I/O block size definitions for coreutils
+   Copyright (C) 1989-2016 Free Software Foundation, Inc.
+
+   This program is free software: you can redistribute it and/or modify
+   it under the terms of the GNU General Public License as published by
+   the Free Software Foundation, either version 3 of the License, or
+   (at your option) any later version.
+
+   This program is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
+
+/* Include this file _after_ system headers if possible.  */
+
+/* sys/stat.h will already have been included by system.h. */
+#include "lib/stat-size.h"
+
+/* *INDENT-OFF* */
+
+/* As of May 2014, 128KiB is determined to be the minimum
+   blksize to best minimize system call overhead.
+   This can be tested with this script:
+
+   for i in $(seq 0 10); do
+     bs=$((1024*2**$i))
+     printf "%7s=" $bs
+     timeout --foreground -sINT 2 \
+       dd bs=$bs if=/dev/zero of=/dev/null 2>&1 \
+         | sed -n 's/.* \([0-9.]* [GM]B\/s\)/\1/p'
+   done
+
+   With the results shown for these systems:
+   system #1: 1.7GHz pentium-m with 400MHz DDR2 RAM, arch=i686
+   system #2: 2.1GHz i3-2310M with 1333MHz DDR3 RAM, arch=x86_64
+   system #3: 3.2GHz i7-970 with 1333MHz DDR3, arch=x86_64
+   system #4: 2.20GHz Xeon E5-2660 with 1333MHz DDR3, arch=x86_64
+   system #5: 2.30GHz i7-3615QM with 1600MHz DDR3, arch=x86_64
+   system #6: 1.30GHz i5-4250U with 1-channel 1600MHz DDR3, arch=x86_64
+   system #7: 3.55GHz IBM,8231-E2B with 1066MHz DDR3, POWER7 revision 2.1
+
+                per-system transfer rate (GB/s)
+   blksize   #1    #2    #3    #4    #5    #6    #7
+   ------------------------------------------------------------------------
+      1024  .73   1.7   2.6   .64   1.0   2.5   1.3
+      2048  1.3   3.0   4.4   1.2   2.0   4.4   2.5
+      4096  2.4   5.1   6.5   2.3   3.7   7.4   4.8
+      8192  3.5   7.3   8.5   4.0   6.0  10.4   9.2
+     16384  3.9   9.4  10.1   6.3   8.3  13.3  16.8
+     32768  5.2   9.9  11.1   8.1  10.7  13.2  28.0
+     65536  5.3  11.2  12.0  10.6  12.8  16.1  41.4
+    131072  5.5  11.8  12.3  12.1  14.0  16.7  54.8
+    262144  5.7  11.6  12.5  12.3  14.7  16.4  40.0
+    524288  5.7  11.4  12.5  12.1  14.7  15.5  34.5
+   1048576  5.8  11.4  12.6  12.2  14.9  15.7  36.5
+
+
+   Note that this is to minimize system call overhead.
+   Other values may be appropriate to minimize file system
+   or disk overhead.  For example on my current GNU/Linux system
+   the readahead setting is 128KiB which was read using:
+
+   file="."
+   device=$(df --output=source --local "$file" | tail -n1)
+   echo $(( $(blockdev --getra $device) * 512 ))
+
+   However there isn't a portable way to get the above.
+   In the future we could use the above method if available
+   and default to io_blksize() if not.
+ */
+
+
+enum { IO_BUFSIZE = 128 * 1024 };
+
+/* *INDENT-ON* */
+
+static inline size_t
+io_blksize (struct stat sb)
+{
+    size_t blksize = ST_BLKSIZE (sb);
+
+    return MAX (IO_BUFSIZE, blksize);
+}
diff --git a/src/filemanager/layout.c b/src/filemanager/layout.c
new file mode 100644
index 0000000..c9d581f
--- /dev/null
+++ b/src/filemanager/layout.c
@@ -0,0 +1,1580 @@
+/*
+   Panel layout module for the Midnight Commander
+
+   Copyright (C) 1995-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1995
+   Miguel de Icaza, 1995
+   Andrew Borodin <aborodin@vmail.ru>, 2011-2022
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Avi Kelman <patcherton.fixesthings@gmail.com>, 2013
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file layout.c
+ *  \brief Source: panel layout module
+ */
+
+#include <config.h>
+
+#include <pwd.h>                /* for username in xterm title */
+#include <stdlib.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+#include "lib/tty/tty.h"
+#include "lib/skin.h"
+#include "lib/tty/key.h"
+#include "lib/tty/mouse.h"
+#include "lib/mcconfig.h"
+#include "lib/vfs/vfs.h"        /* vfs_get_cwd () */
+#include "lib/strutil.h"
+#include "lib/widget.h"
+#include "lib/event.h"
+#include "lib/util.h"           /* mc_time_elapsed() */
+
+#include "src/consaver/cons.saver.h"
+#include "src/viewer/mcviewer.h"        /* The view widget */
+#include "src/setup.h"
+#ifdef ENABLE_SUBSHELL
+#include "src/subshell/subshell.h"
+#endif
+
+#include "command.h"
+#include "filemanager.h"
+#include "tree.h"
+/* Needed for the extern declarations of integer parameters */
+#include "dir.h"
+#include "layout.h"
+#include "info.h"               /* The Info widget */
+
+/*** global variables ****************************************************************************/
+
+panels_layout_t panels_layout = {
+    /* Set if the panels are split horizontally */
+    .horizontal_split = FALSE,
+
+    /* vertical split */
+    .vertical_equal = TRUE,
+    .left_panel_size = 0,
+
+    /* horizontal split */
+    .horizontal_equal = TRUE,
+    .top_panel_size = 0
+};
+
+/* Controls the display of the rotating dash on the verbose mode */
+gboolean nice_rotating_dash = TRUE;
+
+/* The number of output lines shown (if available) */
+int output_lines = 0;
+
+/* Set if the command prompt is to be displayed */
+gboolean command_prompt = TRUE;
+
+/* Set if the main menu is visible */
+gboolean menubar_visible = TRUE;
+
+/* Set to show current working dir in xterm window title */
+gboolean xterm_title = TRUE;
+
+/* Set to show free space on device assigned to current directory */
+gboolean free_space = TRUE;
+
+/* The starting line for the output of the subprogram */
+int output_start_y = 0;
+
+int ok_to_refresh = 1;
+
+/*** file scope macro definitions ****************************************************************/
+
+/* The maximum number of views managed by the create_panel routine */
+/* Must be at least two (for current and other).  Please note that until */
+/* Janne gets around this, we will only manage two of them :-) */
+#define MAX_VIEWS 2
+
+/* Width 12 for a wee Quick (Hex) View */
+#define MINWIDTH 12
+#define MINHEIGHT 5
+
+#define B_2LEFT B_USER
+#define B_2RIGHT (B_USER + 1)
+#define B_PLUS (B_USER + 2)
+#define B_MINUS (B_USER + 3)
+
+#define LAYOUT_OPTIONS_COUNT  G_N_ELEMENTS (check_options)
+
+/*** file scope type declarations ****************************************************************/
+
+typedef struct
+{
+    gboolean menubar_visible;
+    gboolean command_prompt;
+    gboolean keybar_visible;
+    gboolean message_visible;
+    gboolean xterm_title;
+    gboolean free_space;
+    int output_lines;
+} layout_t;
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static struct
+{
+    panel_view_mode_t type;
+    Widget *widget;
+    char *last_saved_dir;       /* last view_list working directory */
+} panels[MAX_VIEWS] =
+{
+    /* *INDENT-OFF* */
+    /* init MAX_VIEWS items */
+    { view_listing, NULL, NULL},
+    { view_listing, NULL, NULL}
+    /* *INDENT-ON* */
+};
+
+static layout_t old_layout;
+static panels_layout_t old_panels_layout;
+
+static gboolean equal_split;
+static int _output_lines;
+
+static int height;
+
+static WRadio *radio_widget;
+
+static struct
+{
+    const char *text;
+    gboolean *variable;
+    WCheck *widget;
+} check_options[] =
+{
+    /* *INDENT-OFF* */
+    { N_("&Equal split"), &equal_split, NULL },
+    { N_("&Menubar visible"), &menubar_visible, NULL },
+    { N_("Command &prompt"), &command_prompt, NULL },
+    { N_("&Keybar visible"), &mc_global.keybar_visible, NULL },
+    { N_("H&intbar visible"), &mc_global.message_visible, NULL },
+    { N_("&XTerm window title"), &xterm_title, NULL },
+    { N_("&Show free space"), &free_space, NULL }
+    /* *INDENT-ON* */
+};
+
+static const char *output_lines_label = NULL;
+static int output_lines_label_len;
+
+static WButton *bleft_widget, *bright_widget;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* don't use max() macro to avoid double call of str_term_width1() in widget width calculation */
+#undef max
+
+static int
+max (int a, int b)
+{
+    return a > b ? a : b;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+check_split (panels_layout_t * layout)
+{
+    if (layout->horizontal_split)
+    {
+        if (layout->horizontal_equal)
+            layout->top_panel_size = height / 2;
+        else if (layout->top_panel_size < MINHEIGHT)
+            layout->top_panel_size = MINHEIGHT;
+        else if (layout->top_panel_size > height - MINHEIGHT)
+            layout->top_panel_size = height - MINHEIGHT;
+    }
+    else
+    {
+        int md_cols = CONST_WIDGET (filemanager)->rect.cols;
+
+        if (layout->vertical_equal)
+            layout->left_panel_size = md_cols / 2;
+        else if (layout->left_panel_size < MINWIDTH)
+            layout->left_panel_size = MINWIDTH;
+        else if (layout->left_panel_size > md_cols - MINWIDTH)
+            layout->left_panel_size = md_cols - MINWIDTH;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_split (const WDialog * h)
+{
+    /* Check split has to be done before testing if it changed, since
+       it can change due to calling check_split() as well */
+    check_split (&panels_layout);
+
+    if (panels_layout.horizontal_split)
+        check_options[0].widget->state = panels_layout.horizontal_equal;
+    else
+        check_options[0].widget->state = panels_layout.vertical_equal;
+    widget_draw (WIDGET (check_options[0].widget));
+
+    tty_setcolor (check_options[0].widget->state ? DISABLED_COLOR : COLOR_NORMAL);
+
+    widget_gotoyx (h, 6, 5);
+    if (panels_layout.horizontal_split)
+        tty_printf ("%03d", panels_layout.top_panel_size);
+    else
+        tty_printf ("%03d", panels_layout.left_panel_size);
+
+    widget_gotoyx (h, 6, 17);
+    if (panels_layout.horizontal_split)
+        tty_printf ("%03d", height - panels_layout.top_panel_size);
+    else
+        tty_printf ("%03d", CONST_WIDGET (filemanager)->rect.cols - panels_layout.left_panel_size);
+
+    widget_gotoyx (h, 6, 12);
+    tty_print_char ('=');
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+b_left_right_cback (WButton * button, int action)
+{
+    (void) action;
+
+    if (button == bright_widget)
+    {
+        if (panels_layout.horizontal_split)
+            panels_layout.top_panel_size++;
+        else
+            panels_layout.left_panel_size++;
+    }
+    else
+    {
+        if (panels_layout.horizontal_split)
+            panels_layout.top_panel_size--;
+        else
+            panels_layout.left_panel_size--;
+    }
+
+    update_split (DIALOG (WIDGET (button)->owner));
+    layout_change ();
+    do_refresh ();
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+bplus_cback (WButton * button, int action)
+{
+    (void) button;
+    (void) action;
+
+    if (_output_lines < 99)
+        _output_lines++;
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+bminus_cback (WButton * button, int action)
+{
+    (void) button;
+    (void) action;
+
+    if (_output_lines > 0)
+        _output_lines--;
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+layout_bg_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_DRAW:
+        frame_callback (w, NULL, MSG_DRAW, 0, NULL);
+
+        old_layout.output_lines = -1;
+
+        update_split (DIALOG (w->owner));
+
+        if (old_layout.output_lines != _output_lines)
+        {
+            old_layout.output_lines = _output_lines;
+            tty_setcolor (mc_global.tty.console_flag != '\0' ? COLOR_NORMAL : DISABLED_COLOR);
+            widget_gotoyx (w, 9, 5);
+            tty_print_string (output_lines_label);
+            widget_gotoyx (w, 9, 5 + 3 + output_lines_label_len);
+            tty_printf ("%02d", _output_lines);
+        }
+        return MSG_HANDLED;
+
+    default:
+        return frame_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+layout_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WDialog *h = DIALOG (w);
+
+    switch (msg)
+    {
+    case MSG_POST_KEY:
+        {
+            const Widget *mw = CONST_WIDGET (filemanager);
+            gboolean _menubar_visible, _command_prompt, _keybar_visible, _message_visible;
+
+            _menubar_visible = check_options[1].widget->state;
+            _command_prompt = check_options[2].widget->state;
+            _keybar_visible = check_options[3].widget->state;
+            _message_visible = check_options[4].widget->state;
+
+            if (mc_global.tty.console_flag == '\0')
+                height =
+                    mw->rect.lines - (_keybar_visible ? 1 : 0) - (_command_prompt ? 1 : 0) -
+                    (_menubar_visible ? 1 : 0) - _output_lines - (_message_visible ? 1 : 0);
+            else
+            {
+                int minimum;
+
+                if (_output_lines < 0)
+                    _output_lines = 0;
+                height =
+                    mw->rect.lines - (_keybar_visible ? 1 : 0) - (_command_prompt ? 1 : 0) -
+                    (_menubar_visible ? 1 : 0) - _output_lines - (_message_visible ? 1 : 0);
+                minimum = MINHEIGHT * (1 + (panels_layout.horizontal_split ? 1 : 0));
+                if (height < minimum)
+                {
+                    _output_lines -= minimum - height;
+                    height = minimum;
+                }
+            }
+
+            if (old_layout.output_lines != _output_lines)
+            {
+                old_layout.output_lines = _output_lines;
+                tty_setcolor (mc_global.tty.console_flag != '\0' ? COLOR_NORMAL : DISABLED_COLOR);
+                widget_gotoyx (h, 9, 5 + 3 + output_lines_label_len);
+                tty_printf ("%02d", _output_lines);
+            }
+        }
+        return MSG_HANDLED;
+
+    case MSG_NOTIFY:
+        if (sender == WIDGET (radio_widget))
+        {
+            if ((panels_layout.horizontal_split ? 1 : 0) == radio_widget->sel)
+                update_split (h);
+            else
+            {
+                int eq;
+
+                panels_layout.horizontal_split = radio_widget->sel != 0;
+
+                if (panels_layout.horizontal_split)
+                {
+                    eq = panels_layout.horizontal_equal;
+                    if (eq)
+                        panels_layout.top_panel_size = height / 2;
+                }
+                else
+                {
+                    eq = panels_layout.vertical_equal;
+                    if (eq)
+                        panels_layout.left_panel_size = CONST_WIDGET (filemanager)->rect.cols / 2;
+                }
+
+                widget_disable (WIDGET (bleft_widget), eq);
+                widget_disable (WIDGET (bright_widget), eq);
+
+                update_split (h);
+                layout_change ();
+                do_refresh ();
+            }
+
+            return MSG_HANDLED;
+        }
+
+        if (sender == WIDGET (check_options[0].widget))
+        {
+            gboolean eq;
+
+            if (panels_layout.horizontal_split)
+            {
+                panels_layout.horizontal_equal = check_options[0].widget->state;
+                eq = panels_layout.horizontal_equal;
+            }
+            else
+            {
+                panels_layout.vertical_equal = check_options[0].widget->state;
+                eq = panels_layout.vertical_equal;
+            }
+
+            widget_disable (WIDGET (bleft_widget), eq);
+            widget_disable (WIDGET (bright_widget), eq);
+
+            update_split (h);
+            layout_change ();
+            do_refresh ();
+
+            return MSG_HANDLED;
+        }
+
+        {
+            gboolean ok = TRUE;
+
+            if (sender == WIDGET (check_options[1].widget))
+                menubar_visible = check_options[1].widget->state;
+            else if (sender == WIDGET (check_options[2].widget))
+                command_prompt = check_options[2].widget->state;
+            else if (sender == WIDGET (check_options[3].widget))
+                mc_global.keybar_visible = check_options[3].widget->state;
+            else if (sender == WIDGET (check_options[4].widget))
+                mc_global.message_visible = check_options[4].widget->state;
+            else if (sender == WIDGET (check_options[5].widget))
+                xterm_title = check_options[5].widget->state;
+            else if (sender == WIDGET (check_options[6].widget))
+                free_space = check_options[6].widget->state;
+            else
+                ok = FALSE;
+
+            if (ok)
+            {
+                update_split (h);
+                layout_change ();
+                do_refresh ();
+                return MSG_HANDLED;
+            }
+        }
+
+        return MSG_NOT_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static WDialog *
+layout_dlg_create (void)
+{
+    WDialog *layout_dlg;
+    WGroup *g;
+    int l1 = 0, width;
+    int b1, b2, b;
+    size_t i;
+
+    const char *title1 = N_("Panel split");
+    const char *title2 = N_("Console output");
+    const char *title3 = N_("Other options");
+
+    const char *s_split_direction[2] = {
+        N_("&Vertical"),
+        N_("&Horizontal")
+    };
+
+    const char *ok_button = N_("&OK");
+    const char *cancel_button = N_("&Cancel");
+
+    output_lines_label = _("Output lines:");
+
+#ifdef ENABLE_NLS
+    {
+        static gboolean i18n = FALSE;
+
+        title1 = _(title1);
+        title2 = _(title2);
+        title3 = _(title3);
+
+        i = G_N_ELEMENTS (s_split_direction);
+        while (i-- != 0)
+            s_split_direction[i] = _(s_split_direction[i]);
+
+        if (!i18n)
+        {
+            for (i = 0; i < (size_t) LAYOUT_OPTIONS_COUNT; i++)
+                check_options[i].text = _(check_options[i].text);
+            i18n = TRUE;
+        }
+
+        ok_button = _(ok_button);
+        cancel_button = _(cancel_button);
+    }
+#endif
+
+    /* radiobuttons */
+    i = G_N_ELEMENTS (s_split_direction);
+    while (i-- != 0)
+        l1 = max (l1, str_term_width1 (s_split_direction[i]) + 7);
+    /* checkboxes */
+    for (i = 0; i < (size_t) LAYOUT_OPTIONS_COUNT; i++)
+        l1 = max (l1, str_term_width1 (check_options[i].text) + 7);
+    /* groupboxes */
+    l1 = max (l1, str_term_width1 (title1) + 4);
+    l1 = max (l1, str_term_width1 (title2) + 4);
+    l1 = max (l1, str_term_width1 (title3) + 4);
+    /* label + "+"/"-" buttons */
+    output_lines_label_len = str_term_width1 (output_lines_label);
+    l1 = max (l1, output_lines_label_len + 12);
+    /* buttons */
+    b1 = str_term_width1 (ok_button) + 5;       /* default button */
+    b2 = str_term_width1 (cancel_button) + 3;
+    b = b1 + b2 + 1;
+    /* dialog width */
+    width = max (l1 * 2 + 7, b);
+
+    layout_dlg =
+        dlg_create (TRUE, 0, 0, 15, width, WPOS_CENTER, FALSE, dialog_colors, layout_callback, NULL,
+                    "[Layout]", _("Layout"));
+    g = GROUP (layout_dlg);
+
+    /* draw background */
+    layout_dlg->bg->callback = layout_bg_callback;
+
+#define XTRACT(i) (*check_options[i].variable != 0), check_options[i].text
+
+    /* "Panel split" groupbox */
+    group_add_widget (g, groupbox_new (2, 3, 6, l1, title1));
+
+    radio_widget = radio_new (3, 5, 2, s_split_direction);
+    radio_widget->sel = panels_layout.horizontal_split ? 1 : 0;
+    group_add_widget (g, radio_widget);
+
+    check_options[0].widget = check_new (5, 5, XTRACT (0));
+    group_add_widget (g, check_options[0].widget);
+
+    equal_split = panels_layout.horizontal_split ?
+        panels_layout.horizontal_equal : panels_layout.vertical_equal;
+
+    bleft_widget = button_new (6, 8, B_2LEFT, NARROW_BUTTON, "&<", b_left_right_cback);
+    widget_disable (WIDGET (bleft_widget), equal_split);
+    group_add_widget (g, bleft_widget);
+
+    bright_widget = button_new (6, 14, B_2RIGHT, NARROW_BUTTON, "&>", b_left_right_cback);
+    widget_disable (WIDGET (bright_widget), equal_split);
+    group_add_widget (g, bright_widget);
+
+    /* "Console output" groupbox */
+    {
+        widget_state_t disabled;
+        Widget *w;
+
+        disabled = mc_global.tty.console_flag != '\0' ? 0 : WST_DISABLED;
+
+        w = WIDGET (groupbox_new (8, 3, 3, l1, title2));
+        w->state |= disabled;
+        group_add_widget (g, w);
+
+        w = WIDGET (button_new (9, output_lines_label_len + 5, B_PLUS,
+                                NARROW_BUTTON, "&+", bplus_cback));
+        w->state |= disabled;
+        group_add_widget (g, w);
+
+        w = WIDGET (button_new (9, output_lines_label_len + 5 + 5, B_MINUS,
+                                NARROW_BUTTON, "&-", bminus_cback));
+        w->state |= disabled;
+        group_add_widget (g, w);
+    }
+
+    /* "Other options" groupbox */
+    group_add_widget (g, groupbox_new (2, 4 + l1, 9, l1, title3));
+
+    for (i = 1; i < (size_t) LAYOUT_OPTIONS_COUNT; i++)
+    {
+        check_options[i].widget = check_new (i + 2, 6 + l1, XTRACT (i));
+        group_add_widget (g, check_options[i].widget);
+    }
+
+#undef XTRACT
+
+    group_add_widget (g, hline_new (11, -1, -1));
+    /* buttons */
+    group_add_widget (g, button_new (12, (width - b) / 2, B_ENTER, DEFPUSH_BUTTON, ok_button, 0));
+    group_add_widget (g,
+                      button_new (12, (width - b) / 2 + b1 + 1, B_CANCEL, NORMAL_BUTTON,
+                                  cancel_button, 0));
+
+    widget_select (WIDGET (radio_widget));
+
+    return layout_dlg;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_do_cols (int idx)
+{
+    if (get_panel_type (idx) == view_listing)
+        set_panel_formats (PANEL (panels[idx].widget));
+    else
+        panel_update_cols (panels[idx].widget, frame_half);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Save current list_view widget directory into panel */
+
+static Widget *
+restore_into_right_dir_panel (int idx, gboolean last_was_panel, int y, int x, int lines, int cols)
+{
+    WPanel *new_widget;
+    const char *p_name;
+
+    p_name = get_nth_panel_name (idx);
+
+    if (last_was_panel)
+    {
+        vfs_path_t *saved_dir_vpath;
+
+        saved_dir_vpath = vfs_path_from_str (panels[idx].last_saved_dir);
+        new_widget = panel_sized_with_dir_new (p_name, y, x, lines, cols, saved_dir_vpath);
+        vfs_path_free (saved_dir_vpath, TRUE);
+    }
+    else
+        new_widget = panel_sized_new (p_name, y, x, lines, cols);
+
+    return WIDGET (new_widget);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+layout_save (void)
+{
+    old_layout.menubar_visible = menubar_visible;
+    old_layout.command_prompt = command_prompt;
+    old_layout.keybar_visible = mc_global.keybar_visible;
+    old_layout.message_visible = mc_global.message_visible;
+    old_layout.xterm_title = xterm_title;
+    old_layout.free_space = free_space;
+    old_layout.output_lines = -1;
+
+    _output_lines = output_lines;
+
+    old_panels_layout = panels_layout;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+layout_restore (void)
+{
+    menubar_visible = old_layout.menubar_visible;
+    command_prompt = old_layout.command_prompt;
+    mc_global.keybar_visible = old_layout.keybar_visible;
+    mc_global.message_visible = old_layout.message_visible;
+    xterm_title = old_layout.xterm_title;
+    free_space = old_layout.free_space;
+    output_lines = old_layout.output_lines;
+
+    panels_layout = old_panels_layout;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+layout_change (void)
+{
+    setup_panels ();
+    /* update the main menu, because perhaps there was a change in the way
+       how the panel are split (horizontal/vertical),
+       and a change of menu visibility. */
+    update_menu ();
+    load_hint (TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+layout_box (void)
+{
+    WDialog *layout_dlg;
+
+    layout_save ();
+
+    layout_dlg = layout_dlg_create ();
+
+    if (dlg_run (layout_dlg) == B_ENTER)
+    {
+        size_t i;
+
+        for (i = 0; i < (size_t) LAYOUT_OPTIONS_COUNT; i++)
+            if (check_options[i].widget != NULL)
+                *check_options[i].variable = check_options[i].widget->state;
+
+        output_lines = _output_lines;
+    }
+    else
+        layout_restore ();
+
+    widget_destroy (WIDGET (layout_dlg));
+    layout_change ();
+    do_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_update_cols (Widget * widget, panel_display_t frame_size)
+{
+    const Widget *mw = CONST_WIDGET (filemanager);
+    int cols, x;
+
+    /* don't touch panel if it is not in dialog yet */
+    /* if panel is not in dialog it is not in widgets list
+       and cannot be compared with get_panel_widget() result */
+    if (widget->owner == NULL)
+        return;
+
+    if (panels_layout.horizontal_split)
+    {
+        widget->rect.cols = mw->rect.cols;
+        return;
+    }
+
+    if (frame_size == frame_full)
+    {
+        cols = mw->rect.cols;
+        x = mw->rect.x;
+    }
+    else if (widget == get_panel_widget (0))
+    {
+        cols = panels_layout.left_panel_size;
+        x = mw->rect.x;
+    }
+    else
+    {
+        cols = mw->rect.cols - panels_layout.left_panel_size;
+        x = mw->rect.x + panels_layout.left_panel_size;
+    }
+
+    widget->rect.cols = cols;
+    widget->rect.x = x;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+setup_panels (void)
+{
+    /* File manager screen layout:
+     *
+     * +---------------------------------------------------------------+
+     * | Menu bar                                                      |
+     * +-------------------------------+-------------------------------+
+     * |                               |                               |
+     * |                               |                               |
+     * |                               |                               |
+     * |                               |                               |
+     * |         Left panel            |         Right panel           |
+     * |                               |                               |
+     * |                               |                               |
+     * |                               |                               |
+     * |                               |                               |
+     * +-------------------------------+-------------------------------+
+     * | Hint (message) bar                                            |
+     * +---------------------------------------------------------------+
+     * |                                                               |
+     * |                        Console content                        |
+     * |                                                               |
+     * +--------+------------------------------------------------------+
+     * | Prompt | Command line                                         |
+     * | Key (button) bar                                              |
+     * +--------+------------------------------------------------------+
+     */
+
+    Widget *mw = WIDGET (filemanager);
+    const WRect *r = &CONST_WIDGET (mw)->rect;
+    int start_y;
+    gboolean active;
+    WRect rb;
+
+    active = widget_get_state (mw, WST_ACTIVE);
+
+    /* lock the group to avoid many redraws */
+    if (active)
+        widget_set_state (mw, WST_SUSPENDED, TRUE);
+
+    /* initial height of panels */
+    height =
+        r->lines - (menubar_visible ? 1 : 0) - (mc_global.message_visible ? 1 : 0) -
+        (command_prompt ? 1 : 0) - (mc_global.keybar_visible ? 1 : 0);
+
+    if (mc_global.tty.console_flag != '\0')
+    {
+        int minimum;
+
+        if (output_lines < 0)
+            output_lines = 0;
+        else
+            height -= output_lines;
+        minimum = MINHEIGHT * (1 + (panels_layout.horizontal_split ? 1 : 0));
+        if (height < minimum)
+        {
+            output_lines -= minimum - height;
+            height = minimum;
+        }
+    }
+
+    rb = *r;
+    rb.lines = 1;
+    widget_set_size_rect (WIDGET (the_menubar), &rb);
+    widget_set_visibility (WIDGET (the_menubar), menubar_visible);
+
+    check_split (&panels_layout);
+    start_y = r->y + (menubar_visible ? 1 : 0);
+
+    /* update columns first... */
+    panel_do_cols (0);
+    panel_do_cols (1);
+
+    /* ...then rows and origin */
+    if (panels_layout.horizontal_split)
+    {
+        widget_set_size (panels[0].widget, start_y, r->x, panels_layout.top_panel_size,
+                         panels[0].widget->rect.cols);
+        widget_set_size (panels[1].widget, start_y + panels_layout.top_panel_size, r->x,
+                         height - panels_layout.top_panel_size, panels[1].widget->rect.cols);
+    }
+    else
+    {
+        widget_set_size (panels[0].widget, start_y, r->x, height, panels[0].widget->rect.cols);
+        widget_set_size (panels[1].widget, start_y, panels[1].widget->rect.x, height,
+                         panels[1].widget->rect.cols);
+    }
+
+    widget_set_size (WIDGET (the_hint), height + start_y, r->x, 1, r->cols);
+    widget_set_visibility (WIDGET (the_hint), mc_global.message_visible);
+
+    /* Output window */
+    if (mc_global.tty.console_flag != '\0' && output_lines != 0)
+    {
+        unsigned char end_line;
+
+        end_line = r->lines - (mc_global.keybar_visible ? 1 : 0) - 1;
+        output_start_y = end_line - (command_prompt ? 1 : 0) - output_lines + 1;
+        show_console_contents (output_start_y, end_line - output_lines, end_line);
+    }
+
+    if (command_prompt)
+    {
+#ifdef ENABLE_SUBSHELL
+        if (!mc_global.tty.use_subshell || !do_load_prompt ())
+#endif
+            setup_cmdline ();
+    }
+    else
+    {
+        /* make invisible */
+        widget_hide (WIDGET (cmdline));
+        widget_hide (WIDGET (the_prompt));
+    }
+
+    rb = *r;
+    rb.y = r->lines - 1;
+    rb.lines = 1;
+    widget_set_size_rect (WIDGET (the_bar), &rb);
+    widget_set_visibility (WIDGET (the_bar), mc_global.keybar_visible);
+
+    update_xterm_title_path ();
+
+    /* unlock */
+    if (active)
+    {
+        widget_set_state (mw, WST_ACTIVE, TRUE);
+        widget_draw (mw);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panels_split_equal (void)
+{
+    if (panels_layout.horizontal_split)
+        panels_layout.horizontal_equal = TRUE;
+    else
+        panels_layout.vertical_equal = TRUE;
+
+    layout_change ();
+    do_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panels_split_more (void)
+{
+    if (panels_layout.horizontal_split)
+    {
+        panels_layout.horizontal_equal = FALSE;
+        panels_layout.top_panel_size++;
+    }
+    else
+    {
+        panels_layout.vertical_equal = FALSE;
+        panels_layout.left_panel_size++;
+    }
+
+    layout_change ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panels_split_less (void)
+{
+    if (panels_layout.horizontal_split)
+    {
+        panels_layout.horizontal_equal = FALSE;
+        panels_layout.top_panel_size--;
+    }
+    else
+    {
+        panels_layout.vertical_equal = FALSE;
+        panels_layout.left_panel_size--;
+    }
+
+    layout_change ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+setup_cmdline (void)
+{
+    const Widget *mw = CONST_WIDGET (filemanager);
+    const WRect *r = &mw->rect;
+    int prompt_width;
+    int y;
+    char *tmp_prompt = (char *) mc_prompt;
+
+    if (!command_prompt)
+        return;
+
+#ifdef ENABLE_SUBSHELL
+    if (mc_global.tty.use_subshell)
+    {
+        /* Workaround: avoid crash on FreeBSD (see ticket #4213 for details)  */
+        if (subshell_prompt != NULL)
+            tmp_prompt = g_string_free (subshell_prompt, FALSE);
+        else
+            tmp_prompt = g_strdup (mc_prompt);
+        (void) strip_ctrl_codes (tmp_prompt);
+    }
+#endif
+
+    prompt_width = str_term_width1 (tmp_prompt);
+
+    /* Check for prompts too big */
+    if (r->cols > 8 && prompt_width > r->cols - 8)
+    {
+        int prompt_len;
+
+        prompt_width = r->cols - 8;
+        prompt_len = str_offset_to_pos (tmp_prompt, prompt_width);
+        tmp_prompt[prompt_len] = '\0';
+    }
+
+#ifdef ENABLE_SUBSHELL
+    if (mc_global.tty.use_subshell)
+    {
+        subshell_prompt = g_string_new (tmp_prompt);
+        g_free (tmp_prompt);
+        mc_prompt = subshell_prompt->str;
+    }
+#endif
+
+    y = r->lines - 1 - (mc_global.keybar_visible ? 1 : 0);
+
+    widget_set_size (WIDGET (the_prompt), y, r->x, 1, prompt_width);
+    label_set_text (the_prompt, mc_prompt);
+    widget_set_size (WIDGET (cmdline), y, r->x + prompt_width, 1, r->cols - prompt_width);
+
+    widget_show (WIDGET (the_prompt));
+    widget_show (WIDGET (cmdline));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+use_dash (gboolean flag)
+{
+    if (flag)
+        ok_to_refresh++;
+    else
+        ok_to_refresh--;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+set_hintbar (const char *str)
+{
+    label_set_text (the_hint, str);
+    if (ok_to_refresh > 0)
+        mc_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+rotate_dash (gboolean show)
+{
+    static gint64 timestamp = 0;
+    /* update with 10 FPS rate */
+    static const gint64 delay = G_USEC_PER_SEC / 10;
+
+    const Widget *w = CONST_WIDGET (filemanager);
+
+    if (!nice_rotating_dash || (ok_to_refresh <= 0))
+        return;
+
+    if (show && !mc_time_elapsed (&timestamp, delay))
+        return;
+
+    widget_gotoyx (w, menubar_visible ? 1 : 0, w->rect.cols - 1);
+    tty_setcolor (NORMAL_COLOR);
+
+    if (!show)
+        tty_print_alt_char (ACS_URCORNER, FALSE);
+    else
+    {
+        static const char rotating_dash[4] = "|/-\\";
+        static size_t pos = 0;
+
+        tty_print_char (rotating_dash[pos]);
+        pos = (pos + 1) % sizeof (rotating_dash);
+    }
+
+    mc_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const char *
+get_nth_panel_name (int num)
+{
+    if (num == 0)
+        return "New Left Panel";
+
+    if (num == 1)
+        return "New Right Panel";
+
+    {
+        static char buffer[BUF_SMALL];
+
+        g_snprintf (buffer, sizeof (buffer), "%ith Panel", num);
+        return buffer;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/* I wonder if I should start to use the folding mode than Dugan uses */
+/*                                                                     */
+/* This is the centralized managing of the panel display types         */
+/* This routine takes care of destroying and creating new widgets      */
+/* Please note that it could manage MAX_VIEWS, not just left and right */
+/* Currently nothing in the code takes advantage of this and has hard- */
+/* coded values for two panels only                                    */
+
+/* Set the num-th panel to the view type: type */
+/* This routine also keeps at least one WPanel object in the screen */
+/* since a lot of routines depend on the current_panel variable */
+
+void
+create_panel (int num, panel_view_mode_t type)
+{
+    WRect r = { 0, 0, 0, 0 };
+    unsigned int the_other = 0; /* Index to the other panel */
+    const char *file_name = NULL;       /* For Quick view */
+    Widget *new_widget = NULL, *old_widget = NULL;
+    panel_view_mode_t old_type = view_listing;
+    WPanel *the_other_panel = NULL;
+
+    if (num >= MAX_VIEWS)
+    {
+        fprintf (stderr, "Cannot allocate more that %d views\n", MAX_VIEWS);
+        abort ();
+    }
+    /* Check that we will have a WPanel * at least */
+    if (type != view_listing)
+    {
+        the_other = num == 0 ? 1 : 0;
+
+        if (panels[the_other].type != view_listing)
+            return;
+    }
+
+    /* Get rid of it */
+    if (panels[num].widget != NULL)
+    {
+        Widget *w = panels[num].widget;
+        WPanel *panel = PANEL (w);
+
+        r = w->rect;
+        old_widget = w;
+        old_type = panels[num].type;
+
+        if (old_type == view_listing && panel->frame_size == frame_full && type != view_listing)
+        {
+            int md_cols = CONST_WIDGET (filemanager)->rect.cols;
+
+            if (panels_layout.horizontal_split)
+            {
+                r.cols = md_cols;
+                r.x = 0;
+            }
+            else
+            {
+                r.cols = md_cols - panels_layout.left_panel_size;
+                if (num == 1)
+                    r.x = panels_layout.left_panel_size;
+            }
+        }
+    }
+
+    /* Restoring saved path from panels.ini for nonlist panel */
+    /* when it's first creation (for example view_info) */
+    if (old_widget == NULL && type != view_listing)
+        panels[num].last_saved_dir = vfs_get_cwd ();
+
+    switch (type)
+    {
+    case view_nothing:
+    case view_listing:
+        {
+            gboolean last_was_panel;
+
+            last_was_panel = old_widget != NULL && get_panel_type (num) != view_listing;
+            new_widget =
+                restore_into_right_dir_panel (num, last_was_panel, r.y, r.x, r.lines, r.cols);
+            break;
+        }
+
+    case view_info:
+        new_widget = WIDGET (info_new (r.y, r.x, r.lines, r.cols));
+        break;
+
+    case view_tree:
+        new_widget = WIDGET (tree_new (r.y, r.x, r.lines, r.cols, TRUE));
+        break;
+
+    case view_quick:
+        new_widget = WIDGET (mcview_new (r.y, r.x, r.lines, r.cols, TRUE));
+        the_other_panel = PANEL (panels[the_other].widget);
+        if (the_other_panel != NULL)
+            file_name = panel_current_entry (the_other_panel)->fname->str;
+        else
+            file_name = "";
+
+        mcview_load ((WView *) new_widget, 0, file_name, 0, 0, 0);
+        break;
+
+    default:
+        break;
+    }
+
+    if (type != view_listing)
+        /* Must save dir, for restoring after change type to */
+        /* view_listing */
+        save_panel_dir (num);
+
+    panels[num].type = type;
+    panels[num].widget = new_widget;
+
+    /* We use replace to keep the circular list of the dialog in the */
+    /* same state.  Maybe we could just kill it and then replace it  */
+    if (old_widget != NULL)
+    {
+        if (old_type == view_listing)
+        {
+            /* save and write directory history of panel
+             * ... and other histories of filemanager  */
+            dlg_save_history (filemanager);
+        }
+
+        widget_replace (old_widget, new_widget);
+    }
+
+    if (type == view_listing)
+    {
+        WPanel *panel = PANEL (new_widget);
+
+        /* if existing panel changed type to view_listing, then load history */
+        if (old_widget != NULL)
+        {
+            ev_history_load_save_t event_data = { NULL, new_widget };
+
+            mc_event_raise (filemanager->event_group, MCEVENT_HISTORY_LOAD, &event_data);
+        }
+
+        if (num == 0)
+            left_panel = panel;
+        else
+            right_panel = panel;
+
+        /* forced update format after set new sizes */
+        set_panel_formats (panel);
+    }
+
+    if (type == view_tree)
+        the_tree = (WTree *) new_widget;
+
+    /* Prevent current_panel's value from becoming invalid.
+     * It's just a quick hack to prevent segfaults. Comment out and
+     * try following:
+     * - select left panel
+     * - invoke menu left/tree
+     * - as long as you stay in the left panel almost everything that uses
+     *   current_panel causes segfault, e.g. C-Enter, C-x c, ...
+     */
+    if ((type != view_listing) && (current_panel == PANEL (old_widget)))
+        current_panel = num == 0 ? right_panel : left_panel;
+
+    g_free (old_widget);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** This routine is deeply sticked to the two panels idea.
+   What should it do in more panels. ANSWER - don't use it
+   in any multiple panels environment. */
+
+void
+swap_panels (void)
+{
+    WPanel *panel1, *panel2;
+    Widget *tmp_widget;
+
+    panel1 = PANEL (panels[0].widget);
+    panel2 = PANEL (panels[1].widget);
+
+    if (panels[0].type == view_listing && panels[1].type == view_listing &&
+        !mc_config_get_bool (mc_global.main_config, CONFIG_PANELS_SECTION, "simple_swap", FALSE))
+    {
+        WPanel panel;
+
+#define panelswap(x) panel.x = panel1->x; panel1->x = panel2->x; panel2->x = panel.x;
+        /* Change content and related stuff */
+        panelswap (dir);
+        panelswap (active);
+        panelswap (cwd_vpath);
+        panelswap (lwd_vpath);
+        panelswap (marked);
+        panelswap (dirs_marked);
+        panelswap (total);
+        panelswap (top);
+        panelswap (current);
+        panelswap (is_panelized);
+        panelswap (panelized_descr);
+        panelswap (dir_stat);
+#undef panelswap
+
+        panel1->quick_search.active = FALSE;
+        panel2->quick_search.active = FALSE;
+
+        if (current_panel == panel1)
+            current_panel = panel2;
+        else
+            current_panel = panel1;
+
+        /* if sort options are different -> resort panels */
+        if (memcmp (&panel1->sort_info, &panel2->sort_info, sizeof (dir_sort_options_t)) != 0)
+        {
+            panel_re_sort (other_panel);
+            panel_re_sort (current_panel);
+        }
+
+        if (widget_is_active (panels[0].widget))
+            widget_select (panels[1].widget);
+        else if (widget_is_active (panels[1].widget))
+            widget_select (panels[0].widget);
+    }
+    else
+    {
+        WPanel *tmp_panel;
+        WRect r;
+        int tmp_type;
+
+        tmp_panel = right_panel;
+        right_panel = left_panel;
+        left_panel = tmp_panel;
+
+        if (panels[0].type == view_listing)
+        {
+            if (strcmp (panel1->name, get_nth_panel_name (0)) == 0)
+            {
+                g_free (panel1->name);
+                panel1->name = g_strdup (get_nth_panel_name (1));
+            }
+        }
+        if (panels[1].type == view_listing)
+        {
+            if (strcmp (panel2->name, get_nth_panel_name (1)) == 0)
+            {
+                g_free (panel2->name);
+                panel2->name = g_strdup (get_nth_panel_name (0));
+            }
+        }
+
+        r = panels[0].widget->rect;
+        panels[0].widget->rect = panels[1].widget->rect;
+        panels[1].widget->rect = r;
+
+        tmp_widget = panels[0].widget;
+        panels[0].widget = panels[1].widget;
+        panels[1].widget = tmp_widget;
+        tmp_type = panels[0].type;
+        panels[0].type = panels[1].type;
+        panels[1].type = tmp_type;
+
+        /* force update formats because of possible changed sizes */
+        if (panels[0].type == view_listing)
+            set_panel_formats (PANEL (panels[0].widget));
+        if (panels[1].type == view_listing)
+            set_panel_formats (PANEL (panels[1].widget));
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+panel_view_mode_t
+get_panel_type (int idx)
+{
+    return panels[idx].type;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+Widget *
+get_panel_widget (int idx)
+{
+    return panels[idx].widget;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+get_current_index (void)
+{
+    return (panels[0].widget == WIDGET (current_panel) ? 0 : 1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+get_other_index (void)
+{
+    return (get_current_index () == 0 ? 1 : 0);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+WPanel *
+get_other_panel (void)
+{
+    return PANEL (get_panel_widget (get_other_index ()));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Returns the view type for the current panel/view */
+
+panel_view_mode_t
+get_current_type (void)
+{
+    return (panels[0].widget == WIDGET (current_panel) ? panels[0].type : panels[1].type);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Returns the view type of the unselected panel */
+
+panel_view_mode_t
+get_other_type (void)
+{
+    return (panels[0].widget == WIDGET (current_panel) ? panels[1].type : panels[0].type);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Save current list_view widget directory into panel */
+
+void
+save_panel_dir (int idx)
+{
+    panel_view_mode_t type;
+
+    type = get_panel_type (idx);
+    if (type == view_listing)
+    {
+        WPanel *p;
+
+        p = PANEL (get_panel_widget (idx));
+        if (p != NULL)
+        {
+            g_free (panels[idx].last_saved_dir);        /* last path no needed */
+            /* Because path can be nonlocal */
+            panels[idx].last_saved_dir = g_strdup (vfs_path_as_str (p->cwd_vpath));
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Return working dir, if it's view_listing - cwd,
+   but for other types - last_saved_dir */
+
+char *
+get_panel_dir_for (const WPanel * widget)
+{
+    int i;
+
+    for (i = 0; i < MAX_VIEWS; i++)
+        if (PANEL (get_panel_widget (i)) == widget)
+            break;
+
+    if (i >= MAX_VIEWS)
+        return g_strdup (".");
+
+    if (get_panel_type (i) == view_listing)
+    {
+        vfs_path_t *cwd_vpath;
+
+        cwd_vpath = PANEL (get_panel_widget (i))->cwd_vpath;
+        return g_strdup (vfs_path_as_str (cwd_vpath));
+    }
+
+    return g_strdup (panels[i].last_saved_dir);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef ENABLE_SUBSHELL
+gboolean
+do_load_prompt (void)
+{
+    gboolean ret = FALSE;
+
+    if (!read_subshell_prompt ())
+        return ret;
+
+    /* Don't actually change the prompt if it's invisible */
+    if (top_dlg != NULL && DIALOG (top_dlg->data) == filemanager && command_prompt)
+    {
+        setup_cmdline ();
+
+        /* since the prompt has changed, and we are called from one of the
+         * tty_get_event channels, the prompt updating does not take place
+         * automatically: force a cursor update and a screen refresh
+         */
+        widget_update_cursor (WIDGET (filemanager));
+        mc_refresh ();
+        ret = TRUE;
+    }
+    update_subshell_prompt = TRUE;
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+int
+load_prompt (int fd, void *unused)
+{
+    (void) fd;
+    (void) unused;
+
+    if (should_read_new_subshell_prompt)
+        do_load_prompt ();
+    else
+        flush_subshell (0, QUIETLY);
+
+    return 0;
+}
+#endif /* ENABLE_SUBSHELL */
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+title_path_prepare (char **path, char **login)
+{
+    char host[BUF_TINY];
+    struct passwd *pw = NULL;
+    int res = 0;
+
+    *path =
+        vfs_path_to_str_flags (current_panel->cwd_vpath, 0, VPF_STRIP_HOME | VPF_STRIP_PASSWORD);
+
+    res = gethostname (host, sizeof (host));
+    if (res != 0)
+        host[0] = '\0';
+    else
+        host[sizeof (host) - 1] = '\0';
+
+    pw = getpwuid (getuid ());
+    if (pw != NULL)
+        *login = g_strdup_printf ("%s@%s", pw->pw_name, host);
+    else
+        *login = g_strdup (host);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/** Show current directory in the xterm title */
+void
+update_xterm_title_path (void)
+{
+    if (mc_global.tty.xterm_flag && xterm_title)
+    {
+        char *p;
+        char *path;
+        char *login;
+
+        title_path_prepare (&path, &login);
+
+        p = g_strdup_printf ("mc [%s]:%s", login, path);
+        g_free (login);
+        g_free (path);
+
+        fprintf (stdout, "\33]0;%s\7", str_term_form (p));
+        g_free (p);
+
+        if (!mc_global.tty.alternate_plus_minus)
+            numeric_keypad_mode ();
+        (void) fflush (stdout);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/layout.h b/src/filemanager/layout.h
new file mode 100644
index 0000000..2566cfa
--- /dev/null
+++ b/src/filemanager/layout.h
@@ -0,0 +1,98 @@
+/** \file layout.h
+ *  \brief Header: panel layout module
+ */
+
+#ifndef MC__LAYOUT_H
+#define MC__LAYOUT_H
+
+#include "lib/global.h"
+#include "lib/widget.h"
+
+#include "panel.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+typedef enum
+{
+    view_listing = 0,           /* Directory listing */
+    view_info = 1,              /* Information panel */
+    view_tree = 2,              /* Tree view */
+    view_quick = 3,             /* Quick view */
+    view_nothing = 4,           /* Undefined */
+} panel_view_mode_t;
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+typedef struct
+{
+    gboolean horizontal_split;
+
+    /* vertical split */
+    gboolean vertical_equal;
+    int left_panel_size;
+
+    /* horizontal split */
+    gboolean horizontal_equal;
+    int top_panel_size;
+} panels_layout_t;
+
+/*** global variables defined in .c file *********************************************************/
+
+extern int output_lines;
+extern gboolean command_prompt;
+extern gboolean menubar_visible;
+extern int output_start_y;
+extern gboolean xterm_title;
+extern gboolean free_space;
+extern gboolean nice_rotating_dash;
+
+extern int ok_to_refresh;
+
+extern panels_layout_t panels_layout;
+
+/*** declarations of public functions ************************************************************/
+void layout_change (void);
+void layout_box (void);
+void panel_update_cols (Widget * widget, panel_display_t frame_size);
+void setup_panels (void);
+void panels_split_equal (void);
+void panels_split_more (void);
+void panels_split_less (void);
+void destroy_panels (void);
+void setup_cmdline (void);
+void create_panel (int num, panel_view_mode_t type);
+void swap_panels (void);
+panel_view_mode_t get_panel_type (int idx);
+panel_view_mode_t get_current_type (void);
+panel_view_mode_t get_other_type (void);
+int get_current_index (void);
+int get_other_index (void);
+const char *get_nth_panel_name (int num);
+
+Widget *get_panel_widget (int idx);
+
+WPanel *get_other_panel (void);
+
+void save_panel_dir (int idx);
+char *get_panel_dir_for (const WPanel * widget);
+
+void set_hintbar (const char *str);
+
+/* Rotating dash routines */
+void use_dash (gboolean flag);  /* Disable/Enable rotate_dash routines */
+void rotate_dash (gboolean show);
+
+#ifdef ENABLE_SUBSHELL
+gboolean do_load_prompt (void);
+int load_prompt (int fd, void *unused);
+#endif
+
+void update_xterm_title_path (void);
+
+void title_path_prepare (char **path, char **login);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__LAYOUT_H */
diff --git a/src/filemanager/mountlist.c b/src/filemanager/mountlist.c
new file mode 100644
index 0000000..d7fd734
--- /dev/null
+++ b/src/filemanager/mountlist.c
@@ -0,0 +1,1575 @@
+/*
+   Return a list of mounted file systems
+
+   Copyright (C) 1991-2023
+   Free Software Foundation, Inc.
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file mountlist.c
+ *  \brief Source: list of mounted filesystems
+ */
+
+#include <config.h>
+
+#include <limits.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <stdint.h>             /* SIZE_MAX */
+#include <sys/types.h>
+
+#include <errno.h>
+
+/* This header needs to be included before sys/mount.h on *BSD */
+#ifdef HAVE_SYS_PARAM_H
+#include <sys/param.h>
+#endif
+
+#if defined STAT_STATVFS || defined STAT_STATVFS64      /* POSIX 1003.1-2001 (and later) with XSI */
+#include <sys/statvfs.h>
+#else
+/* Don't include backward-compatibility files unless they're needed.
+   Eventually we'd like to remove all this cruft.  */
+#include <fcntl.h>
+#include <unistd.h>
+#include <sys/stat.h>
+
+#ifdef MOUNTED_GETFSSTAT        /* OSF_1, also (obsolete) Apple Darwin 1.3 */
+#ifdef HAVE_SYS_UCRED_H
+#include <grp.h>                /* needed on OSF V4.0 for definition of NGROUPS,
+                                   NGROUPS is used as an array dimension in ucred.h */
+#include <sys/ucred.h>          /* needed by powerpc-apple-darwin1.3.7 */
+#endif
+#ifdef HAVE_SYS_MOUNT_H
+#include <sys/mount.h>
+#endif
+#ifdef HAVE_SYS_FS_TYPES_H
+#include <sys/fs_types.h>       /* needed by powerpc-apple-darwin1.3.7 */
+#endif
+#ifdef HAVE_STRUCT_FSSTAT_F_FSTYPENAME
+#define FS_TYPE(Ent) ((Ent).f_fstypename)
+#else
+#define FS_TYPE(Ent) mnt_names[(Ent).f_type]
+#endif
+#endif /* MOUNTED_GETFSSTAT */
+#endif /* STAT_STATVFS || STAT_STATVFS64 */
+
+#ifdef HAVE_SYS_VFS_H
+#include <sys/vfs.h>
+#endif
+#ifdef HAVE_SYS_FS_S5PARAM_H    /* Fujitsu UXP/V */
+#include <sys/fs/s5param.h>
+#endif
+#ifdef HAVE_SYS_STATFS_H
+#include <sys/statfs.h>
+#endif
+
+#ifdef MOUNTED_GETMNTENT1       /* glibc, HP-UX, IRIX, Cygwin, Android,
+                                   also (obsolete) 4.3BSD, SunOS */
+#include <mntent.h>
+#include <sys/types.h>
+#if defined __ANDROID__         /* Android */
+   /* Bionic versions from between 2014-01-09 and 2015-01-08 define MOUNTED to
+      an incorrect value; older Bionic versions don't define it at all.  */
+#undef MOUNTED
+#define MOUNTED "/proc/mounts"
+#elif !defined  MOUNTED
+#ifdef _PATH_MOUNTED            /* GNU libc  */
+#define MOUNTED _PATH_MOUNTED
+#endif
+#ifdef MNT_MNTTAB               /* HP-UX.  */
+#define MOUNTED MNT_MNTTAB
+#endif
+#endif
+#endif
+
+#ifdef MOUNTED_GETMNTINFO       /* Mac OS X, FreeBSD, OpenBSD, also (obsolete) 4.4BSD  */
+#include <sys/mount.h>
+#endif
+
+#ifdef MOUNTED_GETMNTINFO2      /* NetBSD, Minix */
+#include <sys/statvfs.h>
+#endif
+
+#ifdef MOUNTED_FS_STAT_DEV      /* Haiku, also (obsolete) BeOS */
+#include <fs_info.h>
+#include <dirent.h>
+#endif
+
+#ifdef MOUNTED_FREAD_FSTYP      /* (obsolete) SVR3 */
+#include <mnttab.h>
+#include <sys/fstyp.h>
+#include <sys/statfs.h>
+#endif
+
+#ifdef MOUNTED_GETEXTMNTENT     /* Solaris >= 8 */
+#include <sys/mnttab.h>
+#endif
+
+#ifdef MOUNTED_GETMNTENT2       /* Solaris < 8, also (obsolete) SVR4 */
+#include <sys/mnttab.h>
+#endif
+
+#ifdef MOUNTED_VMOUNT           /* AIX */
+#include <fshelp.h>
+#include <sys/vfs.h>
+#endif
+
+#ifdef MOUNTED_INTERIX_STATVFS  /* Interix */
+#include <sys/statvfs.h>
+#include <dirent.h>
+#endif
+
+#ifdef HAVE_SYS_MNTENT_H
+/* This is to get MNTOPT_IGNORE on e.g. SVR4.  */
+#include <sys/mntent.h>
+#endif
+
+#ifdef MOUNTED_GETMNTENT1
+#if !HAVE_SETMNTENT             /* Android <= 4.4 */
+#define setmntent(fp,mode) fopen (fp, mode)
+#endif
+#if !HAVE_ENDMNTENT             /* Android <= 4.4 */
+#define endmntent(fp) fclose (fp)
+#endif
+#endif
+
+#ifndef HAVE_HASMNTOPT
+#define hasmntopt(mnt, opt) ((char *) 0)
+#endif
+
+#undef MNT_IGNORE
+#ifdef MNTOPT_IGNORE
+#if defined __sun && defined __SVR4
+/* Solaris defines hasmntopt(struct mnttab *, char *)
+   while it is otherwise hasmntopt(struct mnttab *, const char *).  */
+#define MNT_IGNORE(M) hasmntopt (M, (char *) MNTOPT_IGNORE)
+#else
+#define MNT_IGNORE(M) hasmntopt (M, MNTOPT_IGNORE)
+#endif
+#else
+#define MNT_IGNORE(M) 0
+#endif
+
+#ifdef HAVE_INFOMOUNT_QNX
+#include <sys/disk.h>
+#include <sys/fsys.h>
+#endif
+
+#ifdef HAVE_SYS_STATVFS_H       /* SVR4.  */
+#include <sys/statvfs.h>
+#endif
+
+#include "lib/global.h"
+#include "lib/strutil.h"        /* str_verscmp() */
+#include "lib/unixcompat.h"     /* makedev */
+#include "mountlist.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#if defined (__QNX__) && !defined(__QNXNTO__) && !defined (HAVE_INFOMOUNT_LIST)
+#define HAVE_INFOMOUNT_QNX
+#endif
+
+#if defined(HAVE_INFOMOUNT_LIST) || defined(HAVE_INFOMOUNT_QNX)
+#define HAVE_INFOMOUNT
+#endif
+
+/* The results of opendir() in this file are not used with dirfd and fchdir,
+   therefore save some unnecessary work in fchdir.c.  */
+#undef opendir
+#undef closedir
+
+#define ME_DUMMY_0(Fs_name, Fs_type)            \
+  (strcmp (Fs_type, "autofs") == 0              \
+   || strcmp (Fs_type, "proc") == 0             \
+   || strcmp (Fs_type, "subfs") == 0            \
+   /* for Linux 2.6/3.x */                      \
+   || strcmp (Fs_type, "debugfs") == 0          \
+   || strcmp (Fs_type, "devpts") == 0           \
+   || strcmp (Fs_type, "fusectl") == 0          \
+   || strcmp (Fs_type, "fuse.portal") == 0      \
+   || strcmp (Fs_type, "mqueue") == 0           \
+   || strcmp (Fs_type, "rpc_pipefs") == 0       \
+   || strcmp (Fs_type, "sysfs") == 0            \
+   /* FreeBSD, Linux 2.4 */                     \
+   || strcmp (Fs_type, "devfs") == 0            \
+   /* for NetBSD 3.0 */                         \
+   || strcmp (Fs_type, "kernfs") == 0           \
+   /* for Irix 6.5 */                           \
+   || strcmp (Fs_type, "ignore") == 0)
+
+/* Historically, we have marked as "dummy" any file system of type "none",
+   but now that programs like du need to know about bind-mounted directories,
+   we grant an exception to any with "bind" in its list of mount options.
+   I.e., those are *not* dummy entries.  */
+#ifdef MOUNTED_GETMNTENT1
+#define ME_DUMMY(Fs_name, Fs_type, Bind)        \
+  (ME_DUMMY_0 (Fs_name, Fs_type)                \
+   || (strcmp (Fs_type, "none") == 0 && !Bind))
+#else
+#define ME_DUMMY(Fs_name, Fs_type)              \
+  (ME_DUMMY_0 (Fs_name, Fs_type) || strcmp (Fs_type, "none") == 0)
+#endif
+
+#ifdef __CYGWIN__
+#include <windows.h>
+#define ME_REMOTE me_remote
+/* All cygwin mount points include ':' or start with '//'; so it
+   requires a native Windows call to determine remote disks.  */
+static int
+me_remote (char const *fs_name, char const *fs_type)
+{
+    (void) fs_type;
+
+    if (fs_name[0] && fs_name[1] == ':')
+    {
+        char drive[4];
+        sprintf (drive, "%c:\\", fs_name[0]);
+        switch (GetDriveType (drive))
+        {
+        case DRIVE_REMOVABLE:
+        case DRIVE_FIXED:
+        case DRIVE_CDROM:
+        case DRIVE_RAMDISK:
+            return 0;
+        }
+    }
+    return 1;
+}
+#endif
+#ifndef ME_REMOTE
+/* A file system is 'remote' if its Fs_name contains a ':'
+   or if (it is of type (smbfs or smb3 or cifs) and its Fs_name starts with '//')
+   or if it is of any other of the listed types
+   or Fs_name is equal to "-hosts" (used by autofs to mount remote fs).
+   "VM" file systems like prl_fs or vboxsf are not considered remote here. */
+#define ME_REMOTE(Fs_name, Fs_type) \
+    (strchr (Fs_name, ':') != NULL \
+     || ((Fs_name)[0] == '/' \
+         && (Fs_name)[1] == '/' \
+         && (strcmp (Fs_type, "smbfs") == 0 \
+             || strcmp (Fs_type, "smb3") == 0 \
+             || strcmp (Fs_type, "cifs") == 0)) \
+     || strcmp (Fs_type, "acfs") == 0 \
+     || strcmp (Fs_type, "afs") == 0 \
+     || strcmp (Fs_type, "coda") == 0 \
+     || strcmp (Fs_type, "auristorfs") == 0 \
+     || strcmp (Fs_type, "fhgfs") == 0 \
+     || strcmp (Fs_type, "gpfs") == 0 \
+     || strcmp (Fs_type, "ibrix") == 0 \
+     || strcmp (Fs_type, "ocfs2") == 0 \
+     || strcmp (Fs_type, "vxfs") == 0 \
+     || strcmp ("-hosts", Fs_name) == 0)
+#endif
+
+/* Many space usage primitives use all 1 bits to denote a value that is
+   not applicable or unknown.  Propagate this information by returning
+   a uintmax_t value that is all 1 bits if X is all 1 bits, even if X
+   is unsigned and narrower than uintmax_t.  */
+#define PROPAGATE_ALL_ONES(x) \
+  ((sizeof (x) < sizeof (uintmax_t) \
+    && (~ (x) == (sizeof (x) < sizeof (int) \
+          ? - (1 << (sizeof (x) * CHAR_BIT)) \
+          : 0))) \
+   ? UINTMAX_MAX : (uintmax_t) (x))
+
+/* Extract the top bit of X as an uintmax_t value.  */
+#define EXTRACT_TOP_BIT(x) ((x) & ((uintmax_t) 1 << (sizeof (x) * CHAR_BIT - 1)))
+
+/* If a value is negative, many space usage primitives store it into an
+   integer variable by assignment, even if the variable's type is unsigned.
+   So, if a space usage variable X's top bit is set, convert X to the
+   uintmax_t value V such that (- (uintmax_t) V) is the negative of
+   the original value.  If X's top bit is clear, just yield X.
+   Use PROPAGATE_TOP_BIT if the original value might be negative;
+   otherwise, use PROPAGATE_ALL_ONES.  */
+#define PROPAGATE_TOP_BIT(x) ((x) | ~ (EXTRACT_TOP_BIT (x) - 1))
+
+#ifdef STAT_STATVFS
+#if ! (defined __linux__ && (defined __GLIBC__ || defined __UCLIBC__))
+/* The FRSIZE fallback is not required in this case.  */
+#undef STAT_STATFS2_FRSIZE
+#else
+#include <sys/utsname.h>
+#include <sys/statfs.h>
+#define STAT_STATFS2_BSIZE 1
+#endif
+#endif
+
+/*** file scope type declarations ****************************************************************/
+
+/* A mount table entry. */
+struct mount_entry
+{
+    char *me_devname;           /* Device node name, including "/dev/". */
+    char *me_mountdir;          /* Mount point directory name. */
+    char *me_mntroot;           /* Directory on filesystem of device used
+                                   as root for the (bind) mount. */
+    char *me_type;              /* "nfs", "4.2", etc. */
+    dev_t me_dev;               /* Device number of me_mountdir. */
+    unsigned int me_dummy:1;    /* Nonzero for dummy file systems. */
+    unsigned int me_remote:1;   /* Nonzero for remote filesystems. */
+    unsigned int me_type_malloced:1;    /* Nonzero if me_type was malloced. */
+};
+
+struct fs_usage
+{
+    uintmax_t fsu_blocksize;    /* Size of a block.  */
+    uintmax_t fsu_blocks;       /* Total blocks. */
+    uintmax_t fsu_bfree;        /* Free blocks available to superuser. */
+    uintmax_t fsu_bavail;       /* Free blocks available to non-superuser. */
+    int fsu_bavail_top_bit_set; /* 1 if fsu_bavail represents a value < 0.  */
+    uintmax_t fsu_files;        /* Total file nodes. */
+    uintmax_t fsu_ffree;        /* Free file nodes. */
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+#ifdef HAVE_INFOMOUNT_LIST
+static GSList *mc_mount_list = NULL;
+#endif /* HAVE_INFOMOUNT_LIST */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef STAT_STATVFS
+/* Return true if statvfs works.  This is false for statvfs on systems
+   with GNU libc on Linux kernels before 2.6.36, which stats all
+   preceding entries in /proc/mounts; that makes df hang if even one
+   of the corresponding file systems is hard-mounted but not available.  */
+static int
+statvfs_works (void)
+{
+#if ! (defined __linux__ && (defined __GLIBC__ || defined __UCLIBC__))
+    return 1;
+#else
+    static int statvfs_works_cache = -1;
+    struct utsname name;
+
+    if (statvfs_works_cache < 0)
+        statvfs_works_cache = (uname (&name) == 0 && 0 <= str_verscmp (name.release, "2.6.36"));
+    return statvfs_works_cache;
+#endif
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_INFOMOUNT_LIST
+static void
+free_mount_entry (struct mount_entry *me)
+{
+    if (me == NULL)
+        return;
+    g_free (me->me_devname);
+    g_free (me->me_mountdir);
+    g_free (me->me_mntroot);
+    if (me->me_type_malloced)
+        g_free (me->me_type);
+    g_free (me);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef MOUNTED_GETMNTINFO       /* Mac OS X, FreeBSD, OpenBSD, also (obsolete) 4.4BSD */
+
+#ifndef HAVE_STRUCT_STATFS_F_FSTYPENAME
+static char *
+fstype_to_string (short int t)
+{
+    switch (t)
+    {
+#ifdef MOUNT_PC
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_PC:
+        return "pc";
+#endif
+#ifdef MOUNT_MFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_MFS:
+        return "mfs";
+#endif
+#ifdef MOUNT_LO
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_LO:
+        return "lo";
+#endif
+#ifdef MOUNT_TFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_TFS:
+        return "tfs";
+#endif
+#ifdef MOUNT_TMP
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_TMP:
+        return "tmp";
+#endif
+#ifdef MOUNT_UFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_UFS:
+        return "ufs";
+#endif
+#ifdef MOUNT_NFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_NFS:
+        return "nfs";
+#endif
+#ifdef MOUNT_MSDOS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_MSDOS:
+        return "msdos";
+#endif
+#ifdef MOUNT_LFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_LFS:
+        return "lfs";
+#endif
+#ifdef MOUNT_LOFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_LOFS:
+        return "lofs";
+#endif
+#ifdef MOUNT_FDESC
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_FDESC:
+        return "fdesc";
+#endif
+#ifdef MOUNT_PORTAL
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_PORTAL:
+        return "portal";
+#endif
+#ifdef MOUNT_NULL
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_NULL:
+        return "null";
+#endif
+#ifdef MOUNT_UMAP
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_UMAP:
+        return "umap";
+#endif
+#ifdef MOUNT_KERNFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_KERNFS:
+        return "kernfs";
+#endif
+#ifdef MOUNT_PROCFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_PROCFS:
+        return "procfs";
+#endif
+#ifdef MOUNT_AFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_AFS:
+        return "afs";
+#endif
+#ifdef MOUNT_CD9660
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_CD9660:
+        return "cd9660";
+#endif
+#ifdef MOUNT_UNION
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_UNION:
+        return "union";
+#endif
+#ifdef MOUNT_DEVFS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_DEVFS:
+        return "devfs";
+#endif
+#ifdef MOUNT_EXT2FS
+        /* cppcheck-suppress syntaxError */
+    case MOUNT_EXT2FS:
+        return "ext2fs";
+#endif
+    default:
+        return "?";
+    }
+}
+#endif /* ! HAVE_STRUCT_STATFS_F_FSTYPENAME */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+fsp_to_string (const struct statfs *fsp)
+{
+#ifdef HAVE_STRUCT_STATFS_F_FSTYPENAME
+    return (char *) (fsp->f_fstypename);
+#else
+    return fstype_to_string (fsp->f_type);
+#endif
+}
+#endif /* MOUNTED_GETMNTINFO */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef MOUNTED_VMOUNT           /* AIX */
+static char *
+fstype_to_string (int t)
+{
+    struct vfs_ent *e;
+
+    e = getvfsbytype (t);
+    if (!e || !e->vfsent_name)
+        return "none";
+    else
+        return e->vfsent_name;
+}
+#endif /* MOUNTED_VMOUNT */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#if defined MOUNTED_GETMNTENT1 || defined MOUNTED_GETMNTENT2
+
+/* Return the device number from MOUNT_OPTIONS, if possible.
+   Otherwise return (dev_t) -1.  */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static dev_t
+dev_from_mount_options (char const *mount_options)
+{
+    /* GNU/Linux allows file system implementations to define their own
+       meaning for "dev=" mount options, so don't trust the meaning
+       here.  */
+#ifndef __linux__
+    static char const dev_pattern[] = ",dev=";
+    char const *devopt = strstr (mount_options, dev_pattern);
+
+    if (devopt)
+    {
+        char const *optval = devopt + sizeof (dev_pattern) - 1;
+        char *optvalend;
+        unsigned long int dev;
+        errno = 0;
+        dev = strtoul (optval, &optvalend, 16);
+        if (optval != optvalend
+            && (*optvalend == '\0' || *optvalend == ',')
+            && !(dev == ULONG_MAX && errno == ERANGE) && dev == (dev_t) dev)
+            return dev;
+    }
+#endif
+
+    (void) mount_options;
+    return -1;
+}
+
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+#if defined MOUNTED_GETMNTENT1 && (defined __linux__ || defined __ANDROID__)    /* GNU/Linux, Android */
+
+/* Unescape the paths in mount tables.
+   STR is updated in place.  */
+static void
+unescape_tab (char *str)
+{
+    size_t i, j = 0;
+    size_t len;
+
+    len = strlen (str) + 1;
+
+    for (i = 0; i < len; i++)
+    {
+        if (str[i] == '\\' && (i + 4 < len)
+            && str[i + 1] >= '0' && str[i + 1] <= '3'
+            && str[i + 2] >= '0' && str[i + 2] <= '7' && str[i + 3] >= '0' && str[i + 3] <= '7')
+        {
+            str[j++] = (str[i + 1] - '0') * 64 + (str[i + 2] - '0') * 8 + (str[i + 3] - '0');
+            i += 3;
+        }
+        else
+            str[j++] = str[i];
+    }
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* Return a list of the currently mounted file systems, or NULL on error.
+   Add each entry to the tail of the list so that they stay in order. */
+
+static GSList *
+read_file_system_list (void)
+{
+    GSList *mount_list = NULL;
+    struct mount_entry *me;
+
+#ifdef MOUNTED_GETMNTENT1       /* glibc, HP-UX, IRIX, Cygwin, Android,
+                                   also (obsolete) 4.3BSD, SunOS */
+    {
+        FILE *fp;
+
+#if defined __linux__ || defined __ANDROID__
+        /* Try parsing mountinfo first, as that make device IDs available.
+           Note we could use libmount routines to simplify this parsing a little
+           (and that code is in previous versions of this function), however
+           libmount depends on libselinux which pulls in many dependencies.  */
+        char const *mountinfo = "/proc/self/mountinfo";
+
+        fp = fopen (mountinfo, "r");
+        if (fp != NULL)
+        {
+            char *line = NULL;
+            size_t buf_size = 0;
+
+            while (getline (&line, &buf_size, fp) != -1)
+            {
+                unsigned int devmaj, devmin;
+                int target_s, target_e, type_s, type_e;
+                int source_s, source_e, mntroot_s, mntroot_e;
+                char test;
+                char *dash;
+                int rc;
+
+                rc = sscanf (line, "%*u "       /* id - discarded  */
+                             "%*u "     /* parent - discarded */
+                             "%u:%u "   /* dev major:minor  */
+                             "%n%*s%n " /* mountroot */
+                             "%n%*s%n"  /* target, start and end  */
+                             "%c",      /* more data...  */
+                             &devmaj, &devmin, &mntroot_s, &mntroot_e, &target_s, &target_e, &test);
+
+                if (rc != 3 && rc != 7) /* 7 if %n included in count.  */
+                    continue;
+
+                /* skip optional fields, terminated by " - "  */
+                dash = strstr (line + target_e, " - ");
+                if (dash == NULL)
+                    continue;
+
+                rc = sscanf (dash, " - "        /* */
+                             "%n%*s%n " /* FS type, start and end  */
+                             "%n%*s%n " /* source, start and end  */
+                             "%c",      /* more data...  */
+                             &type_s, &type_e, &source_s, &source_e, &test);
+                if (rc != 1 && rc != 5) /* 5 if %n included in count.  */
+                    continue;
+
+                /* manipulate the sub-strings in place.  */
+                line[mntroot_e] = '\0';
+                line[target_e] = '\0';
+                dash[type_e] = '\0';
+                dash[source_e] = '\0';
+                unescape_tab (dash + source_s);
+                unescape_tab (line + target_s);
+                unescape_tab (line + mntroot_s);
+
+                me = g_malloc (sizeof *me);
+
+                me->me_devname = g_strdup (dash + source_s);
+                me->me_mountdir = g_strdup (line + target_s);
+                me->me_mntroot = g_strdup (line + mntroot_s);
+                me->me_type = g_strdup (dash + type_s);
+                me->me_type_malloced = 1;
+                me->me_dev = makedev (devmaj, devmin);
+                /* we pass "false" for the "Bind" option as that's only
+                   significant when the Fs_type is "none" which will not be
+                   the case when parsing "/proc/self/mountinfo", and only
+                   applies for static /etc/mtab files.  */
+                me->me_dummy = ME_DUMMY (me->me_devname, me->me_type, FALSE);
+                me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+
+            free (line);
+
+            if (ferror (fp) != 0)
+            {
+                int saved_errno = errno;
+
+                fclose (fp);
+                errno = saved_errno;
+                goto free_then_fail;
+            }
+
+            if (fclose (fp) == EOF)
+                goto free_then_fail;
+        }
+        else                    /* fallback to /proc/self/mounts (/etc/mtab).  */
+#endif /* __linux __ || __ANDROID__ */
+        {
+            struct mntent *mnt;
+            const char *table = MOUNTED;
+
+            fp = setmntent (table, "r");
+            if (fp == NULL)
+                return NULL;
+
+            while ((mnt = getmntent (fp)) != NULL)
+            {
+                gboolean bind;
+
+                bind = hasmntopt (mnt, "bind") != NULL;
+
+                me = g_malloc (sizeof (*me));
+                me->me_devname = g_strdup (mnt->mnt_fsname);
+                me->me_mountdir = g_strdup (mnt->mnt_dir);
+                me->me_mntroot = NULL;
+                me->me_type = g_strdup (mnt->mnt_type);
+                me->me_type_malloced = 1;
+                me->me_dummy = ME_DUMMY (me->me_devname, me->me_type, bind);
+                me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+                me->me_dev = dev_from_mount_options (mnt->mnt_opts);
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+
+            if (endmntent (fp) == 0)
+                goto free_then_fail;
+        }
+    }
+#endif /* MOUNTED_GETMNTENT1. */
+
+#ifdef MOUNTED_GETMNTINFO       /* Mac OS X, FreeBSD, OpenBSD, also (obsolete) 4.4BSD */
+    {
+        struct statfs *fsp;
+        int entries;
+
+        entries = getmntinfo (&fsp, MNT_NOWAIT);
+        if (entries < 0)
+            return NULL;
+        for (; entries-- > 0; fsp++)
+        {
+            char *fs_type = fsp_to_string (fsp);
+
+            me = g_malloc (sizeof (*me));
+            me->me_devname = g_strdup (fsp->f_mntfromname);
+            me->me_mountdir = g_strdup (fsp->f_mntonname);
+            me->me_mntroot = NULL;
+            me->me_type = fs_type;
+            me->me_type_malloced = 0;
+            me->me_dummy = ME_DUMMY (me->me_devname, me->me_type);
+            me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+            me->me_dev = (dev_t) (-1);  /* Magic; means not known yet. */
+
+            mount_list = g_slist_prepend (mount_list, me);
+        }
+    }
+#endif /* MOUNTED_GETMNTINFO */
+
+#ifdef MOUNTED_GETMNTINFO2      /* NetBSD, Minix */
+    {
+        struct statvfs *fsp;
+        int entries;
+
+        entries = getmntinfo (&fsp, MNT_NOWAIT);
+        if (entries < 0)
+            return NULL;
+        for (; entries-- > 0; fsp++)
+        {
+            me = g_malloc (sizeof (*me));
+            me->me_devname = g_strdup (fsp->f_mntfromname);
+            me->me_mountdir = g_strdup (fsp->f_mntonname);
+            me->me_mntroot = NULL;
+            me->me_type = g_strdup (fsp->f_fstypename);
+            me->me_type_malloced = 1;
+            me->me_dummy = ME_DUMMY (me->me_devname, me->me_type);
+            me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+            me->me_dev = (dev_t) (-1);  /* Magic; means not known yet. */
+
+            mount_list = g_slist_prepend (mount_list, me);
+        }
+    }
+#endif /* MOUNTED_GETMNTINFO2 */
+
+#if defined MOUNTED_FS_STAT_DEV /* Haiku, also (obsolete) BeOS */
+    {
+        /* The next_dev() and fs_stat_dev() system calls give the list of
+           all file systems, including the information returned by statvfs()
+           (fs type, total blocks, free blocks etc.), but without the mount
+           point. But on BeOS all file systems except / are mounted in the
+           rootfs, directly under /.
+           The directory name of the mount point is often, but not always,
+           identical to the volume name of the device.
+           We therefore get the list of subdirectories of /, and the list
+           of all file systems, and match the two lists.  */
+
+        DIR *dirp;
+        struct rootdir_entry
+        {
+            char *name;
+            dev_t dev;
+            ino_t ino;
+            struct rootdir_entry *next;
+        };
+        struct rootdir_entry *rootdir_list;
+        struct rootdir_entry **rootdir_tail;
+        int32 pos;
+        dev_t dev;
+        fs_info fi;
+
+        /* All volumes are mounted in the rootfs, directly under /. */
+        rootdir_list = NULL;
+        rootdir_tail = &rootdir_list;
+        dirp = opendir (PATH_SEP_STR);
+        if (dirp)
+        {
+            struct dirent *d;
+
+            while ((d = readdir (dirp)) != NULL)
+            {
+                char *name;
+                struct stat statbuf;
+
+                if (DIR_IS_DOT (d->d_name))
+                    continue;
+
+                if (DIR_IS_DOTDOT (d->d_name))
+                    name = g_strdup (PATH_SEP_STR);
+                else
+                    name = g_strconcat (PATH_SEP_STR, d->d_name, (char *) NULL);
+
+                if (lstat (name, &statbuf) >= 0 && S_ISDIR (statbuf.st_mode))
+                {
+                    struct rootdir_entry *re = g_malloc (sizeof (*re));
+                    re->name = name;
+                    re->dev = statbuf.st_dev;
+                    re->ino = statbuf.st_ino;
+
+                    /* Add to the linked list.  */
+                    *rootdir_tail = re;
+                    rootdir_tail = &re->next;
+                }
+                else
+                    g_free (name);
+            }
+            closedir (dirp);
+        }
+        *rootdir_tail = NULL;
+
+        for (pos = 0; (dev = next_dev (&pos)) >= 0;)
+            if (fs_stat_dev (dev, &fi) >= 0)
+            {
+                /* Note: fi.dev == dev. */
+                struct rootdir_entry *re;
+
+                for (re = rootdir_list; re; re = re->next)
+                    if (re->dev == fi.dev && re->ino == fi.root)
+                        break;
+
+                me = g_malloc (sizeof (*me));
+                me->me_devname =
+                    g_strdup (fi.device_name[0] != '\0' ? fi.device_name : fi.fsh_name);
+                me->me_mountdir = g_strdup (re != NULL ? re->name : fi.fsh_name);
+                me->me_mntroot = NULL;
+                me->me_type = g_strdup (fi.fsh_name);
+                me->me_type_malloced = 1;
+                me->me_dev = fi.dev;
+                me->me_dummy = 0;
+                me->me_remote = (fi.flags & B_FS_IS_SHARED) != 0;
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+
+        while (rootdir_list != NULL)
+        {
+            struct rootdir_entry *re = rootdir_list;
+
+            rootdir_list = re->next;
+            g_free (re->name);
+            g_free (re);
+        }
+    }
+#endif /* MOUNTED_FS_STAT_DEV */
+
+#ifdef MOUNTED_GETFSSTAT        /*  OSF/1, also (obsolete) Apple Darwin 1.3 */
+    {
+        int numsys, counter;
+        size_t bufsize;
+        struct statfs *stats;
+
+        numsys = getfsstat (NULL, 0L, MNT_NOWAIT);
+        if (numsys < 0)
+            return NULL;
+        if (SIZE_MAX / sizeof (*stats) <= numsys)
+        {
+            fprintf (stderr, "%s\n", _("Memory exhausted!"));
+            exit (EXIT_FAILURE);
+        }
+
+        bufsize = (1 + numsys) * sizeof (*stats);
+        stats = g_malloc (bufsize);
+        numsys = getfsstat (stats, bufsize, MNT_NOWAIT);
+
+        if (numsys < 0)
+        {
+            g_free (stats);
+            return NULL;
+        }
+
+        for (counter = 0; counter < numsys; counter++)
+        {
+            me = g_malloc (sizeof (*me));
+            me->me_devname = g_strdup (stats[counter].f_mntfromname);
+            me->me_mountdir = g_strdup (stats[counter].f_mntonname);
+            me->me_mntroot = NULL;
+            me->me_type = g_strdup (FS_TYPE (stats[counter]));
+            me->me_type_malloced = 1;
+            me->me_dummy = ME_DUMMY (me->me_devname, me->me_type);
+            me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+            me->me_dev = (dev_t) (-1);  /* Magic; means not known yet. */
+
+            mount_list = g_slist_prepend (mount_list, me);
+        }
+
+        g_free (stats);
+    }
+#endif /* MOUNTED_GETFSSTAT */
+
+#if defined MOUNTED_FREAD_FSTYP /* (obsolete) SVR3 */
+    {
+        struct mnttab mnt;
+        char *table = "/etc/mnttab";
+        FILE *fp;
+
+        fp = fopen (table, "r");
+        if (fp == NULL)
+            return NULL;
+
+        while (fread (&mnt, sizeof (mnt), 1, fp) > 0)
+        {
+            me = g_malloc (sizeof (*me));
+            me->me_devname = g_strdup (mnt.mt_dev);
+            me->me_mountdir = g_strdup (mnt.mt_filsys);
+            me->me_mntroot = NULL;
+            me->me_dev = (dev_t) (-1);  /* Magic; means not known yet. */
+            me->me_type = "";
+            me->me_type_malloced = 0;
+            {
+                struct statfs fsd;
+                char typebuf[FSTYPSZ];
+
+                if (statfs (me->me_mountdir, &fsd, sizeof (fsd), 0) != -1
+                    && sysfs (GETFSTYP, fsd.f_fstyp, typebuf) != -1)
+                {
+                    me->me_type = g_strdup (typebuf);
+                    me->me_type_malloced = 1;
+                }
+            }
+            me->me_dummy = ME_DUMMY (me->me_devname, me->me_type);
+            me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+
+            mount_list = g_slist_prepend (mount_list, me);
+        }
+
+        if (ferror (fp))
+        {
+            /* The last fread() call must have failed.  */
+            int saved_errno = errno;
+
+            fclose (fp);
+            errno = saved_errno;
+            goto free_then_fail;
+        }
+
+        if (fclose (fp) == EOF)
+            goto free_then_fail;
+    }
+#endif /* MOUNTED_FREAD_FSTYP */
+
+#ifdef MOUNTED_GETEXTMNTENT     /* Solaris >= 8 */
+    {
+        struct extmnttab mnt;
+        const char *table = MNTTAB;
+        FILE *fp;
+        int ret;
+
+        /* No locking is needed, because the contents of /etc/mnttab is generated by the kernel. */
+
+        errno = 0;
+        fp = fopen (table, "r");
+        if (fp == NULL)
+            ret = errno;
+        else
+        {
+            while ((ret = getextmntent (fp, &mnt, 1)) == 0)
+            {
+                me = g_malloc (sizeof *me);
+                me->me_devname = g_strdup (mnt.mnt_special);
+                me->me_mountdir = g_strdup (mnt.mnt_mountp);
+                me->me_mntroot = NULL;
+                me->me_type = g_strdup (mnt.mnt_fstype);
+                me->me_type_malloced = 1;
+                me->me_dummy = MNT_IGNORE (&mnt) != 0;
+                me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+                me->me_dev = makedev (mnt.mnt_major, mnt.mnt_minor);
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+
+            ret = fclose (fp) == EOF ? errno : 0 < ret ? 0 : -1;
+            /* Here ret = -1 means success, ret >= 0 means failure. */
+        }
+
+        if (ret >= 0)
+        {
+            errno = ret;
+            goto free_then_fail;
+        }
+    }
+#endif /* MOUNTED_GETEXTMNTENT */
+
+#ifdef MOUNTED_GETMNTENT2       /* Solaris < 8, also (obsolete) SVR4 */
+    {
+        struct mnttab mnt;
+        const char *table = MNTTAB;
+        FILE *fp;
+        int ret;
+        int lockfd = -1;
+
+#if defined F_RDLCK && defined F_SETLKW
+        /* MNTTAB_LOCK is a macro name of our own invention; it's not present in
+           e.g. Solaris 2.6.  If the SVR4 folks ever define a macro
+           for this file name, we should use their macro name instead.
+           (Why not just lock MNTTAB directly?  We don't know.)  */
+#ifndef MNTTAB_LOCK
+#define MNTTAB_LOCK "/etc/.mnttab.lock"
+#endif
+        lockfd = open (MNTTAB_LOCK, O_RDONLY);
+        if (lockfd >= 0)
+        {
+            struct flock flock;
+
+            flock.l_type = F_RDLCK;
+            flock.l_whence = SEEK_SET;
+            flock.l_start = 0;
+            flock.l_len = 0;
+            while (fcntl (lockfd, F_SETLKW, &flock) == -1)
+                if (errno != EINTR)
+                {
+                    int saved_errno = errno;
+                    close (lockfd);
+                    errno = saved_errno;
+                    return NULL;
+                }
+        }
+        else if (errno != ENOENT)
+            return NULL;
+#endif
+
+        errno = 0;
+        fp = fopen (table, "r");
+        if (fp == NULL)
+            ret = errno;
+        else
+        {
+            while ((ret = getmntent (fp, &mnt)) == 0)
+            {
+                me = g_malloc (sizeof (*me));
+                me->me_devname = g_strdup (mnt.mnt_special);
+                me->me_mountdir = g_strdup (mnt.mnt_mountp);
+                me->me_mntroot = NULL;
+                me->me_type = g_strdup (mnt.mnt_fstype);
+                me->me_type_malloced = 1;
+                me->me_dummy = MNT_IGNORE (&mnt) != 0;
+                me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+                me->me_dev = dev_from_mount_options (mnt.mnt_mntopts);
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+
+            ret = fclose (fp) == EOF ? errno : 0 < ret ? 0 : -1;
+            /* Here ret = -1 means success, ret >= 0 means failure. */
+        }
+
+        if (lockfd >= 0 && close (lockfd) != 0)
+            ret = errno;
+
+        if (ret >= 0)
+        {
+            errno = ret;
+            goto free_then_fail;
+        }
+    }
+#endif /* MOUNTED_GETMNTENT2.  */
+
+#ifdef MOUNTED_VMOUNT           /* AIX */
+    {
+        int bufsize;
+        void *entries;
+        char *thisent;
+        struct vmount *vmp;
+        int n_entries;
+        int i;
+
+        /* Ask how many bytes to allocate for the mounted file system info.  */
+        entries = &bufsize;
+        if (mntctl (MCTL_QUERY, sizeof (bufsize), entries) != 0)
+            return NULL;
+        entries = g_malloc (bufsize);
+
+        /* Get the list of mounted file systems.  */
+        n_entries = mntctl (MCTL_QUERY, bufsize, entries);
+        if (n_entries < 0)
+        {
+            int saved_errno = errno;
+
+            g_free (entries);
+            errno = saved_errno;
+            return NULL;
+        }
+
+        for (i = 0, thisent = entries; i < n_entries; i++, thisent += vmp->vmt_length)
+        {
+            char *options, *ignore;
+
+            vmp = (struct vmount *) thisent;
+            me = g_malloc (sizeof (*me));
+            if (vmp->vmt_flags & MNT_REMOTE)
+            {
+                char *host, *dir;
+
+                me->me_remote = 1;
+                /* Prepend the remote dirname.  */
+                host = thisent + vmp->vmt_data[VMT_HOSTNAME].vmt_off;
+                dir = thisent + vmp->vmt_data[VMT_OBJECT].vmt_off;
+                me->me_devname = g_strconcat (host, ":", dir, (char *) NULL);
+            }
+            else
+            {
+                me->me_remote = 0;
+                me->me_devname = g_strdup (thisent + vmp->vmt_data[VMT_OBJECT].vmt_off);
+            }
+            me->me_mountdir = g_strdup (thisent + vmp->vmt_data[VMT_STUB].vmt_off);
+            me->me_mntroot = NULL;
+            me->me_type = g_strdup (fstype_to_string (vmp->vmt_gfstype));
+            me->me_type_malloced = 1;
+            options = thisent + vmp->vmt_data[VMT_ARGS].vmt_off;
+            ignore = strstr (options, "ignore");
+            me->me_dummy = (ignore
+                            && (ignore == options || ignore[-1] == ',')
+                            && (ignore[sizeof ("ignore") - 1] == ','
+                                || ignore[sizeof ("ignore") - 1] == '\0'));
+            me->me_dev = (dev_t) (-1);  /* vmt_fsid might be the info we want.  */
+
+            mount_list = g_slist_prepend (mount_list, me);
+        }
+        g_free (entries);
+    }
+#endif /* MOUNTED_VMOUNT. */
+
+#ifdef MOUNTED_INTERIX_STATVFS  /* Interix */
+    {
+        DIR *dirp = opendir ("/dev/fs");
+        char node[9 + NAME_MAX];
+
+        if (!dirp)
+            goto free_then_fail;
+
+        while (1)
+        {
+            struct statvfs dev;
+            struct dirent entry;
+            struct dirent *result;
+
+            if (readdir_r (dirp, &entry, &result) || result == NULL)
+                break;
+
+            strcpy (node, "/dev/fs/");
+            strcat (node, entry.d_name);
+
+            if (statvfs (node, &dev) == 0)
+            {
+                me = g_malloc (sizeof *me);
+                me->me_devname = g_strdup (dev.f_mntfromname);
+                me->me_mountdir = g_strdup (dev.f_mntonname);
+                me->me_mntroot = NULL;
+                me->me_type = g_strdup (dev.f_fstypename);
+                me->me_type_malloced = 1;
+                me->me_dummy = ME_DUMMY (me->me_devname, me->me_type);
+                me->me_remote = ME_REMOTE (me->me_devname, me->me_type);
+                me->me_dev = (dev_t) (-1);      /* Magic; means not known yet. */
+
+                mount_list = g_slist_prepend (mount_list, me);
+            }
+        }
+        closedir (dirp);
+    }
+#endif /* MOUNTED_INTERIX_STATVFS */
+
+    return g_slist_reverse (mount_list);
+
+  free_then_fail:
+    {
+        int saved_errno = errno;
+
+        g_slist_free_full (mount_list, (GDestroyNotify) free_mount_entry);
+
+        errno = saved_errno;
+        return NULL;
+    }
+}
+#endif /* HAVE_INFOMOUNT_LIST */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_INFOMOUNT_QNX
+/**
+ ** QNX has no [gs]etmnt*(), [gs]etfs*(), or /etc/mnttab, but can do
+ ** this via the following code.
+ ** Note that, as this is based on CWD, it only fills one mount_entry
+ ** structure. See my_statfs() below for the "other side" of this hack.
+ */
+
+static GSList *
+read_file_system_list (void)
+{
+    struct _disk_entry de;
+    struct statfs fs;
+    int i, fd;
+    char *tp, dev[_POSIX_NAME_MAX], dir[_POSIX_PATH_MAX];
+    struct mount_entry *me = NULL;
+    static GSList *list = NULL;
+
+    if (list != NULL)
+    {
+        me = (struct mount_entry *) list->data;
+
+        g_free (me->me_devname);
+        g_free (me->me_mountdir);
+        g_free (me->me_mntroot);
+        g_free (me->me_type);
+    }
+    else
+    {
+        me = (struct mount_entry *) g_malloc (sizeof (struct mount_entry));
+        list = g_slist_prepend (list, me);
+    }
+
+    if (!getcwd (dir, _POSIX_PATH_MAX))
+        return (NULL);
+
+    fd = open (dir, O_RDONLY);
+    if (fd == -1)
+        return (NULL);
+
+    i = disk_get_entry (fd, &de);
+
+    close (fd);
+
+    if (i == -1)
+        return (NULL);
+
+    switch (de.disk_type)
+    {
+    case _UNMOUNTED:
+        tp = "unmounted";
+        break;
+    case _FLOPPY:
+        tp = "Floppy";
+        break;
+    case _HARD:
+        tp = "Hard";
+        break;
+    case _RAMDISK:
+        tp = "Ram";
+        break;
+    case _REMOVABLE:
+        tp = "Removable";
+        break;
+    case _TAPE:
+        tp = "Tape";
+        break;
+    case _CDROM:
+        tp = "CDROM";
+        break;
+    default:
+        tp = "unknown";
+    }
+
+    if (fsys_get_mount_dev (dir, &dev) == -1)
+        return (NULL);
+
+    if (fsys_get_mount_pt (dev, &dir) == -1)
+        return (NULL);
+
+    me->me_devname = g_strdup (dev);
+    me->me_mountdir = g_strdup (dir);
+    me->me_mntroot = NULL;
+    me->me_type = g_strdup (tp);
+    me->me_dev = de.disk_type;
+
+#ifdef DEBUG
+    fprintf (stderr,
+             "disk_get_entry():\n\tdisk_type=%d (%s)\n\tdriver_name='%-*.*s'\n\tdisk_drv=%d\n",
+             de.disk_type, tp, _DRIVER_NAME_LEN, _DRIVER_NAME_LEN, de.driver_name, de.disk_drv);
+    fprintf (stderr, "fsys_get_mount_dev():\n\tdevice='%s'\n", dev);
+    fprintf (stderr, "fsys_get_mount_pt():\n\tmount point='%s'\n", dir);
+#endif /* DEBUG */
+
+    return (list);
+}
+#endif /* HAVE_INFOMOUNT_QNX */
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_INFOMOUNT
+/* Fill in the fields of FSP with information about space usage for
+   the file system on which FILE resides.
+   DISK is the device on which FILE is mounted, for space-getting
+   methods that need to know it.
+   Return 0 if successful, -1 if not.  When returning -1, ensure that
+   ERRNO is either a system error value, or zero if DISK is NULL
+   on a system that requires a non-NULL value.  */
+static int
+get_fs_usage (char const *file, char const *disk, struct fs_usage *fsp)
+{
+#ifdef STAT_STATVFS             /* POSIX, except pre-2.6.36 glibc/Linux */
+
+    if (statvfs_works ())
+    {
+        struct statvfs vfsd;
+
+        if (statvfs (file, &vfsd) < 0)
+            return -1;
+
+        /* f_frsize isn't guaranteed to be supported.  */
+        fsp->fsu_blocksize = (vfsd.f_frsize
+                              ? PROPAGATE_ALL_ONES (vfsd.f_frsize)
+                              : PROPAGATE_ALL_ONES (vfsd.f_bsize));
+
+        fsp->fsu_blocks = PROPAGATE_ALL_ONES (vfsd.f_blocks);
+        fsp->fsu_bfree = PROPAGATE_ALL_ONES (vfsd.f_bfree);
+        fsp->fsu_bavail = PROPAGATE_TOP_BIT (vfsd.f_bavail);
+        fsp->fsu_bavail_top_bit_set = EXTRACT_TOP_BIT (vfsd.f_bavail) != 0;
+        fsp->fsu_files = PROPAGATE_ALL_ONES (vfsd.f_files);
+        fsp->fsu_ffree = PROPAGATE_ALL_ONES (vfsd.f_ffree);
+    }
+    else
+#endif
+
+    {
+#if defined STAT_STATVFS64      /* AIX */
+
+        struct statvfs64 fsd;
+
+        if (statvfs64 (file, &fsd) < 0)
+            return -1;
+
+        /* f_frsize isn't guaranteed to be supported.  */
+        /* *INDENT-OFF* */
+        fsp->fsu_blocksize = fsd.f_frsize
+            ? PROPAGATE_ALL_ONES (fsd.f_frsize)
+            : PROPAGATE_ALL_ONES (fsd.f_bsize);
+        /* *INDENT-ON* */
+
+#elif defined STAT_STATFS3_OSF1 /* OSF/1 */
+
+        struct statfs fsd;
+
+        if (statfs (file, &fsd, sizeof (struct statfs)) != 0)
+            return -1;
+
+        fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_fsize);
+
+#elif defined STAT_STATFS2_FRSIZE       /* 2.6 < glibc/Linux < 2.6.36 */
+
+        struct statfs fsd;
+
+        if (statfs (file, &fsd) < 0)
+            return -1;
+
+        fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_frsize);
+
+#elif defined STAT_STATFS2_BSIZE        /* glibc/Linux < 2.6, 4.3BSD, SunOS 4, \
+                                           Mac OS X < 10.4, FreeBSD < 5.0, \
+                                           NetBSD < 3.0, OpenBSD < 4.4 */
+
+        struct statfs fsd;
+
+        if (statfs (file, &fsd) < 0)
+            return -1;
+
+        fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_bsize);
+
+#ifdef STATFS_TRUNCATES_BLOCK_COUNTS
+
+        /* In SunOS 4.1.2, 4.1.3, and 4.1.3_U1, the block counts in the
+           struct statfs are truncated to 2GB.  These conditions detect that
+           truncation, presumably without botching the 4.1.1 case, in which
+           the values are not truncated.  The correct counts are stored in
+           undocumented spare fields.  */
+        if (fsd.f_blocks == 0x7fffffff / fsd.f_bsize && fsd.f_spare[0] > 0)
+        {
+            fsd.f_blocks = fsd.f_spare[0];
+            fsd.f_bfree = fsd.f_spare[1];
+            fsd.f_bavail = fsd.f_spare[2];
+        }
+#endif /* STATFS_TRUNCATES_BLOCK_COUNTS */
+
+#elif defined STAT_STATFS2_FSIZE        /* 4.4BSD and older NetBSD */
+
+        struct statfs fsd;
+
+        if (statfs (file, &fsd) < 0)
+            return -1;
+
+        fsp->fsu_blocksize = PROPAGATE_ALL_ONES (fsd.f_fsize);
+
+#elif defined STAT_STATFS4      /* SVR3, old Irix */
+
+        struct statfs fsd;
+
+        if (statfs (file, &fsd, sizeof (fsd), 0) < 0)
+            return -1;
+
+        /* Empirically, the block counts on most SVR3 and SVR3-derived
+           systems seem to always be in terms of 512-byte blocks,
+           no matter what value f_bsize has.  */
+        fsp->fsu_blocksize = 512;
+#endif
+
+#if (defined STAT_STATVFS64 || defined STAT_STATFS3_OSF1 \
+     || defined STAT_STATFS2_FRSIZE || defined STAT_STATFS2_BSIZE \
+     || defined STAT_STATFS2_FSIZE || defined STAT_STATFS4)
+
+        fsp->fsu_blocks = PROPAGATE_ALL_ONES (fsd.f_blocks);
+        fsp->fsu_bfree = PROPAGATE_ALL_ONES (fsd.f_bfree);
+        fsp->fsu_bavail = PROPAGATE_TOP_BIT (fsd.f_bavail);
+        fsp->fsu_bavail_top_bit_set = EXTRACT_TOP_BIT (fsd.f_bavail) != 0;
+        fsp->fsu_files = PROPAGATE_ALL_ONES (fsd.f_files);
+        fsp->fsu_ffree = PROPAGATE_ALL_ONES (fsd.f_ffree);
+
+#endif
+    }
+
+    (void) disk;                /* avoid argument-unused warning */
+
+    return 0;
+}
+#endif /* HAVE_INFOMOUNT */
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+free_my_statfs (void)
+{
+#ifdef HAVE_INFOMOUNT_LIST
+    g_clear_slist (&mc_mount_list, (GDestroyNotify) free_mount_entry);
+#endif /* HAVE_INFOMOUNT_LIST */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+init_my_statfs (void)
+{
+#ifdef HAVE_INFOMOUNT_LIST
+    free_my_statfs ();
+    mc_mount_list = read_file_system_list ();
+#endif /* HAVE_INFOMOUNT_LIST */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+my_statfs (struct my_statfs *myfs_stats, const char *path)
+{
+#ifdef HAVE_INFOMOUNT_LIST
+    size_t len = 0;
+    struct mount_entry *entry = NULL;
+    GSList *temp;
+    struct fs_usage fs_use;
+
+    for (temp = mc_mount_list; temp != NULL; temp = g_slist_next (temp))
+    {
+        struct mount_entry *me;
+        size_t i;
+
+        me = (struct mount_entry *) temp->data;
+        i = strlen (me->me_mountdir);
+        if (i > len && (strncmp (path, me->me_mountdir, i) == 0) &&
+            (entry == NULL || IS_PATH_SEP (path[i]) || path[i] == '\0'))
+        {
+            len = i;
+            entry = me;
+        }
+    }
+
+    if (entry != NULL)
+    {
+        memset (&fs_use, 0, sizeof (fs_use));
+        get_fs_usage (entry->me_mountdir, NULL, &fs_use);
+
+        myfs_stats->type = entry->me_dev;
+        myfs_stats->typename = entry->me_type;
+        myfs_stats->mpoint = entry->me_mountdir;
+        myfs_stats->mroot = entry->me_mntroot;
+        myfs_stats->device = entry->me_devname;
+        myfs_stats->avail =
+            ((uintmax_t) (getuid ()? fs_use.fsu_bavail : fs_use.fsu_bfree) *
+             fs_use.fsu_blocksize) >> 10;
+        myfs_stats->total = ((uintmax_t) fs_use.fsu_blocks * fs_use.fsu_blocksize) >> 10;
+        myfs_stats->nfree = (uintmax_t) fs_use.fsu_ffree;
+        myfs_stats->nodes = (uintmax_t) fs_use.fsu_files;
+    }
+    else
+#endif /* HAVE_INFOMOUNT_LIST */
+
+#ifdef HAVE_INFOMOUNT_QNX
+        /*
+         ** This is the "other side" of the hack to read_file_system_list() above.
+         ** It's not the most efficient approach, but consumes less memory. It
+         ** also accommodates QNX's ability to mount filesystems on the fly.
+         */
+        struct mount_entry *entry;
+    struct fs_usage fs_use;
+
+    entry = read_file_system_list ();
+    if (entry != NULL)
+    {
+        get_fs_usage (entry->me_mountdir, NULL, &fs_use);
+
+        myfs_stats->type = entry->me_dev;
+        myfs_stats->typename = entry->me_type;
+        myfs_stats->mpoint = entry->me_mountdir;
+        myfs_stats->mroot = entry->me_mntroot;
+        myfs_stats->device = entry->me_devname;
+
+        myfs_stats->avail = ((uintmax_t) fs_use.fsu_bfree * fs_use.fsu_blocksize) >> 10;
+        myfs_stats->total = ((uintmax_t) fs_use.fsu_blocks * fs_use.fsu_blocksize) >> 10;
+        myfs_stats->nfree = (uintmax_t) fs_use.fsu_ffree;
+        myfs_stats->nodes = (uintmax_t) fs_use.fsu_files;
+    }
+    else
+#endif /* HAVE_INFOMOUNT_QNX */
+    {
+        myfs_stats->type = 0;
+        myfs_stats->mpoint = "unknown";
+        myfs_stats->device = "unknown";
+        myfs_stats->avail = 0;
+        myfs_stats->total = 0;
+        myfs_stats->nfree = 0;
+        myfs_stats->nodes = 0;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/mountlist.h b/src/filemanager/mountlist.h
new file mode 100644
index 0000000..f506488
--- /dev/null
+++ b/src/filemanager/mountlist.h
@@ -0,0 +1,44 @@
+/*
+   Declarations for list of mounted filesystems
+ */
+
+/** \file mountlist.h
+ *  \brief Header: list of mounted filesystems
+ */
+
+#ifndef MC__MOUNTLIST_H
+#define MC__MOUNTLIST_H
+
+#include <stdint.h>             /* uintmax_t */
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/* Filesystem status */
+struct my_statfs
+{
+    int type;
+    char *typename;
+    const char *mpoint;
+    const char *mroot;
+    const char *device;
+    uintmax_t avail;            /* in kB */
+    uintmax_t total;            /* in kB */
+    uintmax_t nfree;
+    uintmax_t nodes;
+};
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void init_my_statfs (void);
+void my_statfs (struct my_statfs *myfs_stats, const char *path);
+void free_my_statfs (void);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__MOUNTLIST_H */
diff --git a/src/filemanager/panel.c b/src/filemanager/panel.c
new file mode 100644
index 0000000..ec1dbc3
--- /dev/null
+++ b/src/filemanager/panel.c
@@ -0,0 +1,5428 @@
+/*
+   Panel managing.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Miguel de Icaza, 1995
+   Timur Bakeyev, 1997, 1999
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2023
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file panel.c
+ *  \brief Source: panel managin module
+ */
+
+#include <config.h>
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"        /* XCTRL and ALT macros  */
+#include "lib/skin.h"
+#include "lib/strescape.h"
+#include "lib/mcconfig.h"
+#include "lib/vfs/vfs.h"
+#include "lib/unixcompat.h"
+#include "lib/search.h"
+#include "lib/timefmt.h"        /* file_date() */
+#include "lib/util.h"
+#include "lib/widget.h"
+#ifdef HAVE_CHARSET
+#include "lib/charsets.h"       /* get_codepage_id () */
+#endif
+#include "lib/event.h"
+
+#include "src/setup.h"          /* For loading/saving panel options */
+#include "src/execute.h"
+#ifdef HAVE_CHARSET
+#include "src/selcodepage.h"    /* select_charset (), SELECT_CHARSET_NO_TRANSLATE */
+#endif
+#include "src/keymap.h"         /* global_keymap_t */
+#include "src/history.h"
+#ifdef ENABLE_SUBSHELL
+#include "src/subshell/subshell.h"      /* do_subshell_chdir() */
+#endif
+
+#include "src/usermenu.h"
+
+#include "dir.h"
+#include "boxes.h"
+#include "tree.h"
+#include "ext.h"                /* regexp_command */
+#include "layout.h"             /* Most layout variables are here */
+#include "cmd.h"
+#include "command.h"            /* cmdline */
+#include "filemanager.h"
+#include "mountlist.h"          /* my_statfs */
+#include "cd.h"                 /* cd_error_message() */
+
+#include "panel.h"
+
+/*** global variables ****************************************************************************/
+
+/* The hook list for the select file function */
+hook_t *select_file_hook = NULL;
+
+mc_fhl_t *mc_filehighlight = NULL;
+
+/*** file scope macro definitions ****************************************************************/
+
+typedef enum
+{
+    FATTR_NORMAL = 0,
+    FATTR_CURRENT,
+    FATTR_MARKED,
+    FATTR_MARKED_CURRENT,
+    FATTR_STATUS
+} file_attr_t;
+
+/* select/unselect dialog results */
+#define SELECT_RESET ((mc_search_t *)(-1))
+#define SELECT_ERROR ((mc_search_t *)(-2))
+
+/* mouse position relative to file list */
+#define MOUSE_UPPER_FILE_LIST (-1)
+#define MOUSE_BELOW_FILE_LIST (-2)
+#define MOUSE_AFTER_LAST_FILE (-3)
+
+/*** file scope type declarations ****************************************************************/
+
+typedef enum
+{
+    MARK_DONT_MOVE = 0,
+    MARK_DOWN = 1,
+    MARK_FORCE_DOWN = 2,
+    MARK_FORCE_UP = 3
+} mark_act_t;
+
+/*
+ * This describes a format item.  The parse_display_format routine parses
+ * the user specified format and creates a linked list of format_item_t structures.
+ */
+typedef struct format_item_t
+{
+    int requested_field_len;
+    int field_len;
+    align_crt_t just_mode;
+    gboolean expand;
+    const char *(*string_fn) (file_entry_t *, int len);
+    char *title;
+    const char *id;
+} format_item_t;
+
+/* File name scroll states */
+typedef enum
+{
+    FILENAME_NOSCROLL = 1,
+    FILENAME_SCROLL_LEFT = 2,
+    FILENAME_SCROLL_RIGHT = 4
+} filename_scroll_flag_t;
+
+/*** forward declarations (file scope functions) *************************************************/
+
+static const char *string_file_name (file_entry_t * fe, int len);
+static const char *string_file_size (file_entry_t * fe, int len);
+static const char *string_file_size_brief (file_entry_t * fe, int len);
+static const char *string_file_type (file_entry_t * fe, int len);
+static const char *string_file_mtime (file_entry_t * fe, int len);
+static const char *string_file_atime (file_entry_t * fe, int len);
+static const char *string_file_ctime (file_entry_t * fe, int len);
+static const char *string_file_permission (file_entry_t * fe, int len);
+static const char *string_file_perm_octal (file_entry_t * fe, int len);
+static const char *string_file_nlinks (file_entry_t * fe, int len);
+static const char *string_inode (file_entry_t * fe, int len);
+static const char *string_file_nuid (file_entry_t * fe, int len);
+static const char *string_file_ngid (file_entry_t * fe, int len);
+static const char *string_file_owner (file_entry_t * fe, int len);
+static const char *string_file_group (file_entry_t * fe, int len);
+static const char *string_marked (file_entry_t * fe, int len);
+static const char *string_space (file_entry_t * fe, int len);
+static const char *string_dot (file_entry_t * fe, int len);
+
+/*** file scope variables ************************************************************************/
+
+/* *INDENT-OFF* */
+static panel_field_t panel_fields[] = {
+    {
+     "unsorted", 12, TRUE, J_LEFT_FIT,
+     /* TRANSLATORS: one single character to represent 'unsorted' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|u"),
+     N_("&Unsorted"), TRUE, FALSE,
+     string_file_name,
+     (GCompareFunc) unsorted
+    }
+    ,
+    {
+     "name", 12, TRUE, J_LEFT_FIT,
+     /* TRANSLATORS: one single character to represent 'name' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|n"),
+     N_("&Name"), TRUE, TRUE,
+     string_file_name,
+     (GCompareFunc) sort_name
+    }
+    ,
+    {
+     "version", 12, TRUE, J_LEFT_FIT,
+     /* TRANSLATORS: one single character to represent 'version' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|v"),
+     N_("&Version"), TRUE, FALSE,
+     string_file_name,
+     (GCompareFunc) sort_vers
+    }
+    ,
+    {
+     "extension", 12, TRUE, J_LEFT_FIT,
+     /* TRANSLATORS: one single character to represent 'extension' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|e"),
+     N_("E&xtension"), TRUE, FALSE,
+     string_file_name,          /* TODO: string_file_ext */
+     (GCompareFunc) sort_ext
+    }
+    ,
+    {
+     "size", 7, FALSE, J_RIGHT,
+     /* TRANSLATORS: one single character to represent 'size' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|s"),
+     N_("&Size"), TRUE, TRUE,
+     string_file_size,
+     (GCompareFunc) sort_size
+    }
+    ,
+    {
+     "bsize", 7, FALSE, J_RIGHT,
+     "",
+     N_("Block Size"), FALSE, FALSE,
+     string_file_size_brief,
+     (GCompareFunc) sort_size
+    }
+    ,
+    {
+     "type", 1, FALSE, J_LEFT,
+     "",
+     "", FALSE, TRUE,
+     string_file_type,
+     NULL
+    }
+    ,
+    {
+     "mtime", 12, FALSE, J_RIGHT,
+     /* TRANSLATORS: one single character to represent 'Modify time' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|m"),
+     N_("&Modify time"), TRUE, TRUE,
+     string_file_mtime,
+     (GCompareFunc) sort_time
+    }
+    ,
+    {
+     "atime", 12, FALSE, J_RIGHT,
+     /* TRANSLATORS: one single character to represent 'Access time' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|a"),
+     N_("&Access time"), TRUE, TRUE,
+     string_file_atime,
+     (GCompareFunc) sort_atime
+    }
+    ,
+    {
+     "ctime", 12, FALSE, J_RIGHT,
+     /* TRANSLATORS: one single character to represent 'Change time' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|h"),
+     N_("C&hange time"), TRUE, TRUE,
+     string_file_ctime,
+     (GCompareFunc) sort_ctime
+    }
+    ,
+    {
+     "perm", 10, FALSE, J_LEFT,
+     "",
+     N_("Permission"), FALSE, TRUE,
+     string_file_permission,
+     NULL
+    }
+    ,
+    {
+     "mode", 6, FALSE, J_RIGHT,
+     "",
+     N_("Perm"), FALSE, TRUE,
+     string_file_perm_octal,
+     NULL
+    }
+    ,
+    {
+     "nlink", 2, FALSE, J_RIGHT,
+     "",
+     N_("Nl"), FALSE, TRUE,
+     string_file_nlinks, NULL
+    }
+    ,
+    {
+     "inode", 5, FALSE, J_RIGHT,
+     /* TRANSLATORS: one single character to represent 'inode' sort mode  */
+     /* TRANSLATORS: no need to translate 'sort', it's just a context prefix  */
+     N_("sort|i"),
+     N_("&Inode"), TRUE, TRUE,
+     string_inode,
+     (GCompareFunc) sort_inode
+    }
+    ,
+    {
+     "nuid", 5, FALSE, J_RIGHT,
+     "",
+     N_("UID"), FALSE, FALSE,
+     string_file_nuid,
+     NULL
+    }
+    ,
+    {
+     "ngid", 5, FALSE, J_RIGHT,
+     "",
+     N_("GID"), FALSE, FALSE,
+     string_file_ngid,
+     NULL
+    }
+    ,
+    {
+     "owner", 8, FALSE, J_LEFT_FIT,
+     "",
+     N_("Owner"), FALSE, TRUE,
+     string_file_owner,
+     NULL
+    }
+    ,
+    {
+     "group", 8, FALSE, J_LEFT_FIT,
+     "",
+     N_("Group"), FALSE, TRUE,
+     string_file_group,
+     NULL
+    }
+    ,
+    {
+     "mark", 1, FALSE, J_RIGHT,
+     "",
+     " ", FALSE, TRUE,
+     string_marked,
+     NULL
+    }
+    ,
+    {
+     "|", 1, FALSE, J_RIGHT,
+     "",
+     " ", FALSE, TRUE,
+     NULL,
+     NULL
+    }
+    ,
+    {
+     "space", 1, FALSE, J_RIGHT,
+     "",
+     " ", FALSE, TRUE,
+     string_space,
+     NULL
+    }
+    ,
+    {
+     "dot", 1, FALSE, J_RIGHT,
+     "",
+     " ", FALSE, FALSE,
+     string_dot,
+     NULL
+    }
+    ,
+    {
+     NULL, 0, FALSE, J_RIGHT, NULL, NULL, FALSE, FALSE, NULL, NULL
+    }
+};
+/* *INDENT-ON* */
+
+static char *panel_sort_up_char = NULL;
+static char *panel_sort_down_char = NULL;
+
+static char *panel_hiddenfiles_show_char = NULL;
+static char *panel_hiddenfiles_hide_char = NULL;
+static char *panel_history_prev_item_char = NULL;
+static char *panel_history_next_item_char = NULL;
+static char *panel_history_show_list_char = NULL;
+static char *panel_filename_scroll_left_char = NULL;
+static char *panel_filename_scroll_right_char = NULL;
+
+/* Panel that selection started */
+static WPanel *mouse_mark_panel = NULL;
+
+static gboolean mouse_marking = FALSE;
+static int state_mark = 0;
+
+static GString *string_file_name_buffer;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static panelized_descr_t *
+panelized_descr_new (void)
+{
+    panelized_descr_t *p;
+
+    p = g_new0 (panelized_descr_t, 1);
+    p->list.len = -1;
+
+    return p;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panelized_descr_free (panelized_descr_t * p)
+{
+    if (p != NULL)
+    {
+        dir_list_free_list (&p->list);
+        vfs_path_free (p->root_vpath, TRUE);
+        g_free (p);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+set_colors (const WPanel * panel)
+{
+    (void) panel;
+
+    tty_set_normal_attrs ();
+    tty_setcolor (NORMAL_COLOR);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Delete format_item_t object */
+
+static void
+format_item_free (format_item_t * format)
+{
+    g_free (format->title);
+    g_free (format);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Extract the number of available lines in a panel */
+
+static int
+panel_lines (const WPanel * p)
+{
+    /* 3 lines are: top frame, column header, button frame */
+    return (CONST_WIDGET (p)->rect.lines - 3 - (panels_options.show_mini_info ? 2 : 0));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** This code relies on the default justification!!! */
+
+static void
+add_permission_string (const char *dest, int width, file_entry_t * fe, file_attr_t attr, int color,
+                       gboolean is_octal)
+{
+    int i, r, l;
+
+    l = get_user_permissions (&fe->st);
+
+    if (is_octal)
+    {
+        /* Place of the access bit in octal mode */
+        l = width + l - 3;
+        r = l + 1;
+    }
+    else
+    {
+        /* The same to the triplet in string mode */
+        l = l * 3 + 1;
+        r = l + 3;
+    }
+
+    for (i = 0; i < width; i++)
+    {
+        if (i >= l && i < r)
+        {
+            if (attr == FATTR_CURRENT || attr == FATTR_MARKED_CURRENT)
+                tty_setcolor (MARKED_SELECTED_COLOR);
+            else
+                tty_setcolor (MARKED_COLOR);
+        }
+        else if (color >= 0)
+            tty_setcolor (color);
+        else
+            tty_lowlevel_setcolor (-color);
+
+        tty_print_char (dest[i]);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** String representations of various file attributes name */
+
+static const char *
+string_file_name (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    mc_g_string_copy (string_file_name_buffer, fe->fname);
+
+    return string_file_name_buffer->str;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static unsigned int
+ilog10 (dev_t n)
+{
+    unsigned int digits = 0;
+
+    do
+    {
+        digits++;
+        n /= 10;
+    }
+    while (n != 0);
+
+    return digits;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+format_device_number (char *buf, size_t bufsize, dev_t dev)
+{
+    dev_t major_dev, minor_dev;
+    unsigned int major_digits, minor_digits;
+
+    major_dev = major (dev);
+    major_digits = ilog10 (major_dev);
+
+    minor_dev = minor (dev);
+    minor_digits = ilog10 (minor_dev);
+
+    g_assert (bufsize >= 1);
+
+    if (major_digits + 1 + minor_digits + 1 <= bufsize)
+        g_snprintf (buf, bufsize, "%lu,%lu", (unsigned long) major_dev, (unsigned long) minor_dev);
+    else
+        g_strlcpy (buf, _("[dev]"), bufsize);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** size */
+
+static const char *
+string_file_size (file_entry_t * fe, int len)
+{
+    static char buffer[BUF_TINY];
+
+    /* Don't ever show size of ".." since we don't calculate it */
+    if (DIR_IS_DOTDOT (fe->fname->str))
+        return _("UP--DIR");
+
+#ifdef HAVE_STRUCT_STAT_ST_RDEV
+    if (S_ISBLK (fe->st.st_mode) || S_ISCHR (fe->st.st_mode))
+        format_device_number (buffer, len + 1, fe->st.st_rdev);
+    else
+#endif
+        size_trunc_len (buffer, (unsigned int) len, fe->st.st_size, 0, panels_options.kilobyte_si);
+
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** bsize */
+
+static const char *
+string_file_size_brief (file_entry_t * fe, int len)
+{
+    if (S_ISLNK (fe->st.st_mode) && !link_isdir (fe))
+        return _("SYMLINK");
+
+    if ((S_ISDIR (fe->st.st_mode) || link_isdir (fe)) && !DIR_IS_DOTDOT (fe->fname->str))
+        return _("SUB-DIR");
+
+    return string_file_size (fe, len);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** This functions return a string representation of a file entry type */
+
+static const char *
+string_file_type (file_entry_t * fe, int len)
+{
+    static char buffer[2];
+
+    (void) len;
+
+    if (S_ISDIR (fe->st.st_mode))
+        buffer[0] = PATH_SEP;
+    else if (S_ISLNK (fe->st.st_mode))
+    {
+        if (link_isdir (fe))
+            buffer[0] = '~';
+        else if (fe->f.stale_link != 0)
+            buffer[0] = '!';
+        else
+            buffer[0] = '@';
+    }
+    else if (S_ISCHR (fe->st.st_mode))
+        buffer[0] = '-';
+    else if (S_ISSOCK (fe->st.st_mode))
+        buffer[0] = '=';
+    else if (S_ISDOOR (fe->st.st_mode))
+        buffer[0] = '>';
+    else if (S_ISBLK (fe->st.st_mode))
+        buffer[0] = '+';
+    else if (S_ISFIFO (fe->st.st_mode))
+        buffer[0] = '|';
+    else if (S_ISNAM (fe->st.st_mode))
+        buffer[0] = '#';
+    else if (!S_ISREG (fe->st.st_mode))
+        buffer[0] = '?';        /* non-regular of unknown kind */
+    else if (is_exe (fe->st.st_mode))
+        buffer[0] = '*';
+    else
+        buffer[0] = ' ';
+    buffer[1] = '\0';
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** mtime */
+
+static const char *
+string_file_mtime (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return file_date (fe->st.st_mtime);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** atime */
+
+static const char *
+string_file_atime (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return file_date (fe->st.st_atime);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** ctime */
+
+static const char *
+string_file_ctime (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return file_date (fe->st.st_ctime);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** perm */
+
+static const char *
+string_file_permission (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return string_perm (fe->st.st_mode);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** mode */
+
+static const char *
+string_file_perm_octal (file_entry_t * fe, int len)
+{
+    static char buffer[10];
+
+    (void) len;
+
+    g_snprintf (buffer, sizeof (buffer), "0%06lo", (unsigned long) fe->st.st_mode);
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** nlink */
+
+static const char *
+string_file_nlinks (file_entry_t * fe, int len)
+{
+    static char buffer[BUF_TINY];
+
+    (void) len;
+
+    g_snprintf (buffer, sizeof (buffer), "%16d", (int) fe->st.st_nlink);
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** inode */
+
+static const char *
+string_inode (file_entry_t * fe, int len)
+{
+    static char buffer[10];
+
+    (void) len;
+
+    g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_ino);
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** nuid */
+
+static const char *
+string_file_nuid (file_entry_t * fe, int len)
+{
+    static char buffer[10];
+
+    (void) len;
+
+    g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_uid);
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** ngid */
+
+static const char *
+string_file_ngid (file_entry_t * fe, int len)
+{
+    static char buffer[10];
+
+    (void) len;
+
+    g_snprintf (buffer, sizeof (buffer), "%lu", (unsigned long) fe->st.st_gid);
+    return buffer;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** owner */
+
+static const char *
+string_file_owner (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return get_owner (fe->st.st_uid);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** group */
+
+static const char *
+string_file_group (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return get_group (fe->st.st_gid);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** mark */
+
+static const char *
+string_marked (file_entry_t * fe, int len)
+{
+    (void) len;
+
+    return fe->f.marked != 0 ? "*" : " ";
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** space */
+
+static const char *
+string_space (file_entry_t * fe, int len)
+{
+    (void) fe;
+    (void) len;
+
+    return " ";
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** dot */
+
+static const char *
+string_dot (file_entry_t * fe, int len)
+{
+    (void) fe;
+    (void) len;
+
+    return ".";
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+file_compute_color (file_attr_t attr, file_entry_t * fe)
+{
+    switch (attr)
+    {
+    case FATTR_CURRENT:
+        return (SELECTED_COLOR);
+    case FATTR_MARKED:
+        return (MARKED_COLOR);
+    case FATTR_MARKED_CURRENT:
+        return (MARKED_SELECTED_COLOR);
+    case FATTR_STATUS:
+        return (NORMAL_COLOR);
+    case FATTR_NORMAL:
+    default:
+        if (!panels_options.filetype_mode)
+            return (NORMAL_COLOR);
+    }
+
+    return mc_fhl_get_color (mc_filehighlight, fe);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Returns the number of items in the given panel */
+
+static int
+panel_items (const WPanel * p)
+{
+    return panel_lines (p) * p->list_cols;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Formats the file number file_index of panel in the buffer dest */
+
+static filename_scroll_flag_t
+format_file (WPanel * panel, int file_index, int width, file_attr_t attr, gboolean isstatus,
+             int *field_length)
+{
+    int color = NORMAL_COLOR;
+    int length = 0;
+    GSList *format, *home;
+    file_entry_t *fe = NULL;
+    filename_scroll_flag_t res = FILENAME_NOSCROLL;
+
+    *field_length = 0;
+
+    if (file_index < panel->dir.len)
+    {
+        fe = &panel->dir.list[file_index];
+        color = file_compute_color (attr, fe);
+    }
+
+    home = isstatus ? panel->status_format : panel->format;
+
+    for (format = home; format != NULL && length != width; format = g_slist_next (format))
+    {
+        format_item_t *fi = (format_item_t *) format->data;
+
+        if (fi->string_fn != NULL)
+        {
+            const char *txt = " ";
+            int len, perm = 0;
+            const char *prepared_text;
+            int name_offset = 0;
+
+            if (fe != NULL)
+                txt = fi->string_fn (fe, fi->field_len);
+
+            len = fi->field_len;
+            if (len + length > width)
+                len = width - length;
+            if (len <= 0)
+                break;
+
+            if (!isstatus && panel->content_shift > -1 && strcmp (fi->id, "name") == 0)
+            {
+                int str_len;
+                int i;
+
+                *field_length = len + 1;
+
+                str_len = str_length (txt);
+                i = MAX (0, str_len - len);
+                panel->max_shift = MAX (panel->max_shift, i);
+                i = MIN (panel->content_shift, i);
+
+                if (i > -1)
+                {
+                    name_offset = str_offset_to_pos (txt, i);
+                    if (str_len > len)
+                    {
+                        res = FILENAME_SCROLL_LEFT;
+                        if (str_length (txt + name_offset) > len)
+                            res |= FILENAME_SCROLL_RIGHT;
+                    }
+                }
+            }
+
+            if (panels_options.permission_mode)
+            {
+                if (strcmp (fi->id, "perm") == 0)
+                    perm = 1;
+                else if (strcmp (fi->id, "mode") == 0)
+                    perm = 2;
+            }
+
+            if (color >= 0)
+                tty_setcolor (color);
+            else
+                tty_lowlevel_setcolor (-color);
+
+            if (!isstatus && panel->content_shift > -1)
+                prepared_text = str_fit_to_term (txt + name_offset, len, HIDE_FIT (fi->just_mode));
+            else
+                prepared_text = str_fit_to_term (txt, len, fi->just_mode);
+
+            if (perm != 0 && fe != NULL)
+                add_permission_string (prepared_text, fi->field_len, fe, attr, color, perm != 1);
+            else
+                tty_print_string (prepared_text);
+
+            length += len;
+        }
+        else
+        {
+            if (attr == FATTR_CURRENT || attr == FATTR_MARKED_CURRENT)
+                tty_setcolor (SELECTED_COLOR);
+            else
+                tty_setcolor (NORMAL_COLOR);
+            tty_print_one_vline (TRUE);
+            length++;
+        }
+    }
+
+    if (length < width)
+    {
+        int y, x;
+
+        tty_getyx (&y, &x);
+        tty_draw_hline (y, x, ' ', width - length);
+    }
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+repaint_file (WPanel * panel, int file_index, file_attr_t attr)
+{
+    Widget *w = WIDGET (panel);
+
+    int nth_column = 0;
+    int width;
+    int offset = 0;
+    filename_scroll_flag_t ret_frm;
+    int ypos = 0;
+    gboolean panel_is_split;
+    int fln = 0;
+
+    panel_is_split = panel->list_cols > 1;
+    width = w->rect.cols - 2;
+
+    if (panel_is_split)
+    {
+        nth_column = (file_index - panel->top) / panel_lines (panel);
+        width /= panel->list_cols;
+
+        offset = width * nth_column;
+
+        if (nth_column + 1 >= panel->list_cols)
+            width = w->rect.cols - offset - 2;
+    }
+
+    /* Nothing to paint */
+    if (width <= 0)
+        return;
+
+    ypos = file_index - panel->top;
+
+    if (panel_is_split)
+        ypos %= panel_lines (panel);
+
+    ypos += 2;                  /* top frame and header */
+    widget_gotoyx (w, ypos, offset + 1);
+
+    ret_frm = format_file (panel, file_index, width, attr, FALSE, &fln);
+
+    if (panel_is_split && nth_column + 1 < panel->list_cols)
+    {
+        tty_setcolor (NORMAL_COLOR);
+        tty_print_one_vline (TRUE);
+    }
+
+    if (ret_frm != FILENAME_NOSCROLL)
+    {
+        if (!panel_is_split && fln > 0)
+        {
+            if (panel->list_format != list_long)
+                width = fln;
+            else
+            {
+                offset = width - fln + 1;
+                width = fln - 1;
+            }
+        }
+
+        widget_gotoyx (w, ypos, offset);
+        tty_setcolor (NORMAL_COLOR);
+        tty_print_string (panel_filename_scroll_left_char);
+
+        if ((ret_frm & FILENAME_SCROLL_RIGHT) != 0)
+        {
+            offset += width;
+            if (nth_column + 1 >= panel->list_cols)
+                offset++;
+
+            widget_gotoyx (w, ypos, offset);
+            tty_setcolor (NORMAL_COLOR);
+            tty_print_string (panel_filename_scroll_right_char);
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+repaint_status (WPanel * panel)
+{
+    int width;
+
+    width = WIDGET (panel)->rect.cols - 2;
+    if (width > 0)
+    {
+        int fln = 0;
+
+        (void) format_file (panel, panel->current, width, FATTR_STATUS, TRUE, &fln);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+display_mini_info (WPanel * panel)
+{
+    Widget *w = WIDGET (panel);
+    const file_entry_t *fe;
+
+    if (!panels_options.show_mini_info || panel->current < 0)
+        return;
+
+    widget_gotoyx (w, panel_lines (panel) + 3, 1);
+
+    if (panel->quick_search.active)
+    {
+        tty_setcolor (INPUT_COLOR);
+        tty_print_char ('/');
+        tty_print_string (str_fit_to_term
+                          (panel->quick_search.buffer->str, w->rect.cols - 3, J_LEFT));
+        return;
+    }
+
+    /* Status resolves links and show them */
+    set_colors (panel);
+
+    fe = panel_current_entry (panel);
+
+    if (S_ISLNK (fe->st.st_mode))
+    {
+        char link_target[MC_MAXPATHLEN];
+        vfs_path_t *lc_link_vpath;
+        int len;
+
+        lc_link_vpath = vfs_path_append_new (panel->cwd_vpath, fe->fname->str, (char *) NULL);
+        len = mc_readlink (lc_link_vpath, link_target, MC_MAXPATHLEN - 1);
+        vfs_path_free (lc_link_vpath, TRUE);
+        if (len > 0)
+        {
+            link_target[len] = 0;
+            tty_print_string ("-> ");
+            tty_print_string (str_fit_to_term (link_target, w->rect.cols - 5, J_LEFT_FIT));
+        }
+        else
+            tty_print_string (str_fit_to_term (_("<readlink failed>"), w->rect.cols - 2, J_LEFT));
+    }
+    else if (DIR_IS_DOTDOT (fe->fname->str))
+    {
+        /* FIXME:
+         * while loading directory (dir_list_load() and dir_list_reload()),
+         * the actual stat info about ".." directory isn't got;
+         * so just don't display incorrect info about ".." directory */
+        tty_print_string (str_fit_to_term (_("UP--DIR"), w->rect.cols - 2, J_LEFT));
+    }
+    else
+        /* Default behavior */
+        repaint_status (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+paint_dir (WPanel * panel)
+{
+    int i;
+    int items;                  /* Number of items */
+
+    items = panel_items (panel);
+    /* reset max len of filename because we have the new max length for the new file list */
+    panel->max_shift = -1;
+
+    for (i = 0; i < items; i++)
+    {
+        file_attr_t attr = FATTR_NORMAL;        /* Color value of the line */
+        int n;
+        gboolean marked;
+
+        n = i + panel->top;
+        marked = (panel->dir.list[n].f.marked != 0);
+
+        if (n < panel->dir.len)
+        {
+            if (panel->current == n && panel->active)
+                attr = marked ? FATTR_MARKED_CURRENT : FATTR_CURRENT;
+            else if (marked)
+                attr = FATTR_MARKED;
+        }
+
+        repaint_file (panel, n, attr);
+    }
+
+    tty_set_normal_attrs ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+display_total_marked_size (const WPanel * panel, int y, int x, gboolean size_only)
+{
+    const Widget *w = CONST_WIDGET (panel);
+
+    char buffer[BUF_SMALL], b_bytes[BUF_SMALL];
+    const char *buf;
+    int cols;
+
+    if (panel->marked <= 0)
+        return;
+
+    buf = size_only ? b_bytes : buffer;
+    cols = w->rect.cols - 2;
+
+    g_strlcpy (b_bytes, size_trunc_sep (panel->total, panels_options.kilobyte_si),
+               sizeof (b_bytes));
+
+    if (!size_only)
+        g_snprintf (buffer, sizeof (buffer),
+                    ngettext ("%s in %d file", "%s in %d files", panel->marked),
+                    b_bytes, panel->marked);
+
+    /* don't forget spaces around buffer content */
+    buf = str_trunc (buf, cols - 4);
+
+    if (x < 0)
+        /* center in panel */
+        x = (w->rect.cols - str_term_width1 (buf)) / 2 - 1;
+
+    /*
+     * y == panel_lines (panel) + 2  for mini_info_separator
+     * y == w->lines - 1             for panel bottom frame
+     */
+    widget_gotoyx (w, y, x);
+    tty_setcolor (MARKED_COLOR);
+    tty_printf (" %s ", buf);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+mini_info_separator (const WPanel * panel)
+{
+    if (panels_options.show_mini_info)
+    {
+        const Widget *w = CONST_WIDGET (panel);
+        int y;
+
+        y = panel_lines (panel) + 2;
+
+        tty_setcolor (NORMAL_COLOR);
+        tty_draw_hline (w->rect.y + y, w->rect.x + 1, ACS_HLINE, w->rect.cols - 2);
+        /* Status displays total marked size.
+         * Centered in panel, full format. */
+        display_total_marked_size (panel, y, -1, FALSE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+show_free_space (const WPanel * panel)
+{
+    /* Used to figure out how many free space we have */
+    static struct my_statfs myfs_stats;
+    /* Old current working directory for displaying free space */
+    static char *old_cwd = NULL;
+
+    /* Don't try to stat non-local fs */
+    if (!vfs_file_is_local (panel->cwd_vpath) || !free_space)
+        return;
+
+    if (old_cwd == NULL || strcmp (old_cwd, vfs_path_as_str (panel->cwd_vpath)) != 0)
+    {
+        char rpath[PATH_MAX];
+
+        init_my_statfs ();
+        g_free (old_cwd);
+        old_cwd = g_strdup (vfs_path_as_str (panel->cwd_vpath));
+
+        if (mc_realpath (old_cwd, rpath) == NULL)
+            return;
+
+        my_statfs (&myfs_stats, rpath);
+    }
+
+    if (myfs_stats.avail != 0 || myfs_stats.total != 0)
+    {
+        const Widget *w = CONST_WIDGET (panel);
+        char buffer1[6], buffer2[6], tmp[BUF_SMALL];
+
+        size_trunc_len (buffer1, sizeof (buffer1) - 1, myfs_stats.avail, 1,
+                        panels_options.kilobyte_si);
+        size_trunc_len (buffer2, sizeof (buffer2) - 1, myfs_stats.total, 1,
+                        panels_options.kilobyte_si);
+        g_snprintf (tmp, sizeof (tmp), " %s / %s (%d%%) ", buffer1, buffer2,
+                    myfs_stats.total == 0 ? 0 :
+                    (int) (100 * (long double) myfs_stats.avail / myfs_stats.total));
+        widget_gotoyx (w, w->rect.lines - 1, w->rect.cols - 2 - (int) strlen (tmp));
+        tty_setcolor (NORMAL_COLOR);
+        tty_print_string (tmp);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Prepare path string for showing in panel's header.
+ * Passwords will removed, also home dir will replaced by ~
+ *
+ * @param panel WPanel object
+ *
+ * @return newly allocated string.
+ */
+
+static char *
+panel_correct_path_to_show (const WPanel * panel)
+{
+    vfs_path_t *last_vpath;
+    const vfs_path_element_t *path_element;
+    char *return_path;
+    int elements_count;
+
+    elements_count = vfs_path_elements_count (panel->cwd_vpath);
+
+    /* get last path element */
+    path_element = vfs_path_element_clone (vfs_path_get_by_index (panel->cwd_vpath, -1));
+
+    if (elements_count > 1 && (strcmp (path_element->class->name, "cpiofs") == 0 ||
+                               strcmp (path_element->class->name, "extfs") == 0 ||
+                               strcmp (path_element->class->name, "tarfs") == 0))
+    {
+        const char *archive_name;
+        const vfs_path_element_t *prev_path_element;
+
+        /* get previous path element for catching archive name */
+        prev_path_element = vfs_path_get_by_index (panel->cwd_vpath, -2);
+        archive_name = strrchr (prev_path_element->path, PATH_SEP);
+        if (archive_name != NULL)
+            last_vpath = vfs_path_from_str_flags (archive_name + 1, VPF_NO_CANON);
+        else
+        {
+            last_vpath = vfs_path_from_str_flags (prev_path_element->path, VPF_NO_CANON);
+            last_vpath->relative = TRUE;
+        }
+    }
+    else
+        last_vpath = vfs_path_new (TRUE);
+
+    vfs_path_add_element (last_vpath, path_element);
+    return_path =
+        vfs_path_to_str_flags (last_vpath, 0,
+                               VPF_STRIP_HOME | VPF_STRIP_PASSWORD | VPF_HIDE_CHARSET);
+    vfs_path_free (last_vpath, TRUE);
+
+    return return_path;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Get Current path element encoding
+ *
+ * @param panel WPanel object
+ *
+ * @return newly allocated string or NULL if path charset is same as system charset
+ */
+
+#ifdef HAVE_CHARSET
+static char *
+panel_get_encoding_info_str (const WPanel * panel)
+{
+    char *ret_str = NULL;
+    const vfs_path_element_t *path_element;
+
+    path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
+    if (path_element->encoding != NULL)
+        ret_str = g_strdup_printf ("[%s]", path_element->encoding);
+
+    return ret_str;
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+show_dir (const WPanel * panel)
+{
+    const Widget *w = CONST_WIDGET (panel);
+    gchar *tmp;
+
+    set_colors (panel);
+    tty_draw_box (w->rect.y, w->rect.x, w->rect.lines, w->rect.cols, FALSE);
+
+    if (panels_options.show_mini_info)
+    {
+        int y;
+
+        y = panel_lines (panel) + 2;
+
+        widget_gotoyx (w, y, 0);
+        tty_print_alt_char (ACS_LTEE, FALSE);
+        widget_gotoyx (w, y, w->rect.cols - 1);
+        tty_print_alt_char (ACS_RTEE, FALSE);
+    }
+
+    widget_gotoyx (w, 0, 1);
+    tty_print_string (panel_history_prev_item_char);
+
+    tmp = panels_options.show_dot_files ? panel_hiddenfiles_show_char : panel_hiddenfiles_hide_char;
+    tmp = g_strdup_printf ("%s[%s]%s", tmp, panel_history_show_list_char,
+                           panel_history_next_item_char);
+
+    widget_gotoyx (w, 0, w->rect.cols - 6);
+    tty_print_string (tmp);
+
+    g_free (tmp);
+
+    widget_gotoyx (w, 0, 3);
+
+    if (panel->is_panelized)
+        tty_printf (" %s ", _("Panelize"));
+#ifdef HAVE_CHARSET
+    else
+    {
+        tmp = panel_get_encoding_info_str (panel);
+        if (tmp != NULL)
+        {
+            tty_printf ("%s", tmp);
+            widget_gotoyx (w, 0, 3 + strlen (tmp));
+            g_free (tmp);
+        }
+    }
+#endif
+
+    if (panel->active)
+        tty_setcolor (REVERSE_COLOR);
+
+    tmp = panel_correct_path_to_show (panel);
+    tty_printf (" %s ", str_term_trim (tmp, MIN (MAX (w->rect.cols - 12, 0), w->rect.cols)));
+    g_free (tmp);
+
+    if (!panels_options.show_mini_info)
+    {
+        if (panel->marked == 0)
+        {
+            const file_entry_t *fe;
+
+            fe = panel_current_entry (panel);
+
+            /* Show size of curret file in the bottom of panel */
+            if (S_ISREG (fe->st.st_mode))
+            {
+                char buffer[BUF_SMALL];
+
+                g_snprintf (buffer, sizeof (buffer), " %s ",
+                            size_trunc_sep (fe->st.st_size, panels_options.kilobyte_si));
+                tty_setcolor (NORMAL_COLOR);
+                widget_gotoyx (w, w->rect.lines - 1, 4);
+                tty_print_string (buffer);
+            }
+        }
+        else
+        {
+            /* Show total size of marked files
+             * In the bottom of panel, display size only. */
+            display_total_marked_size (panel, w->rect.lines - 1, 2, TRUE);
+        }
+    }
+
+    show_free_space (panel);
+
+    if (panel->active)
+        tty_set_normal_attrs ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+adjust_top_file (WPanel * panel)
+{
+    int items;
+
+    /* Update panel->current to avoid out of range in panel->dir.list[panel->current]
+     * when panel is redrawing when directory is reloading, for example in path:
+     * dir_list_reload() -> mc_refresh() -> dialog_change_screen_size() ->
+     * midnight_callback (MSG_RESIZE) -> setup_panels() -> panel_callback(MSG_DRAW) ->
+     * display_mini_info()
+     */
+    panel->current = CLAMP (panel->current, 0, panel->dir.len - 1);
+
+    items = panel_items (panel);
+
+    if (panel->dir.len <= items)
+    {
+        /* If all files fit, show them all. */
+        panel->top = 0;
+    }
+    else
+    {
+        int i;
+
+        /* top_file has to be in the range [current-items+1, current] so that
+           the current file is visible.
+           top_file should be in the range [0, count-items] so that there's
+           no empty space wasted.
+           Within these ranges, adjust it by as little as possible. */
+
+        if (panel->top < 0)
+            panel->top = 0;
+
+        i = panel->current - items + 1;
+        if (panel->top < i)
+            panel->top = i;
+
+        i = panel->dir.len - items;
+        if (panel->top > i)
+            panel->top = i;
+
+        if (panel->top > panel->current)
+            panel->top = panel->current;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** add "#enc:encoding" to end of path */
+/* if path ends width a previous #enc:, only encoding is changed no additional
+ * #enc: is appended
+ * return new string
+ */
+
+static char *
+panel_save_name (WPanel * panel)
+{
+    /* If the program is shutting down */
+    if ((mc_global.midnight_shutdown && auto_save_setup) || saving_setup)
+        return g_strdup (panel->name);
+
+    return g_strconcat ("Temporal:", panel->name, (char *) NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+directory_history_add (WPanel * panel, const vfs_path_t * vpath)
+{
+    char *tmp;
+
+    tmp = vfs_path_to_str_flags (vpath, 0, VPF_STRIP_PASSWORD);
+    panel->dir_history.list = list_append_unique (panel->dir_history.list, tmp);
+    panel->dir_history.current = panel->dir_history.list;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* "history_load" event handler */
+static gboolean
+panel_load_history (const gchar * event_group_name, const gchar * event_name,
+                    gpointer init_data, gpointer data)
+{
+    WPanel *p = PANEL (init_data);
+    ev_history_load_save_t *ev = (ev_history_load_save_t *) data;
+
+    (void) event_group_name;
+    (void) event_name;
+
+    if (ev->receiver == NULL || ev->receiver == WIDGET (p))
+    {
+        if (ev->cfg != NULL)
+            p->dir_history.list = mc_config_history_load (ev->cfg, p->dir_history.name);
+        else
+            p->dir_history.list = mc_config_history_get (p->dir_history.name);
+
+        directory_history_add (p, p->cwd_vpath);
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* "history_save" event handler */
+static gboolean
+panel_save_history (const gchar * event_group_name, const gchar * event_name,
+                    gpointer init_data, gpointer data)
+{
+    WPanel *p = PANEL (init_data);
+
+    (void) event_group_name;
+    (void) event_name;
+
+    if (p->dir_history.list != NULL)
+    {
+        ev_history_load_save_t *ev = (ev_history_load_save_t *) data;
+
+        mc_config_history_save (ev->cfg, p->dir_history.name, p->dir_history.list);
+    }
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_destroy (WPanel * p)
+{
+    size_t i;
+
+    if (panels_options.auto_save_setup)
+    {
+        char *name;
+
+        name = panel_save_name (p);
+        panel_save_setup (p, name);
+        g_free (name);
+    }
+
+    panel_clean_dir (p);
+
+    /* clean history */
+    if (p->dir_history.list != NULL)
+    {
+        /* directory history is already saved before this moment */
+        p->dir_history.list = g_list_first (p->dir_history.list);
+        g_list_free_full (p->dir_history.list, g_free);
+    }
+    g_free (p->dir_history.name);
+
+    file_filter_clear (&p->filter);
+
+    g_slist_free_full (p->format, (GDestroyNotify) format_item_free);
+    g_slist_free_full (p->status_format, (GDestroyNotify) format_item_free);
+
+    g_free (p->user_format);
+    for (i = 0; i < LIST_FORMATS; i++)
+        g_free (p->user_status_format[i]);
+
+    g_free (p->name);
+
+    panelized_descr_free (p->panelized_descr);
+
+    g_string_free (p->quick_search.buffer, TRUE);
+    g_string_free (p->quick_search.prev_buffer, TRUE);
+
+    vfs_path_free (p->lwd_vpath, TRUE);
+    vfs_path_free (p->cwd_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_paint_sort_info (const WPanel * panel)
+{
+    if (*panel->sort_field->hotkey != '\0')
+    {
+        const char *sort_sign =
+            panel->sort_info.reverse ? panel_sort_up_char : panel_sort_down_char;
+        char *str;
+
+        str = g_strdup_printf ("%s%s", sort_sign, Q_ (panel->sort_field->hotkey));
+        widget_gotoyx (panel, 1, 1);
+        tty_print_string (str);
+        g_free (str);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const char *
+panel_get_title_without_hotkey (const char *title)
+{
+    static char translated_title[BUF_TINY];
+
+    if (title == NULL || title[0] == '\0')
+        translated_title[0] = '\0';
+    else
+    {
+        char *hkey;
+
+        g_snprintf (translated_title, sizeof (translated_title), "%s", _(title));
+
+        hkey = strchr (translated_title, '&');
+        if (hkey != NULL && hkey[1] != '\0')
+            memmove (hkey, hkey + 1, strlen (hkey));
+    }
+
+    return translated_title;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_print_header (const WPanel * panel)
+{
+    const Widget *w = CONST_WIDGET (panel);
+
+    int y, x;
+    int i;
+    GString *format_txt;
+
+    widget_gotoyx (w, 1, 1);
+    tty_getyx (&y, &x);
+    tty_setcolor (NORMAL_COLOR);
+    tty_draw_hline (y, x, ' ', w->rect.cols - 2);
+
+    format_txt = g_string_new ("");
+
+    for (i = 0; i < panel->list_cols; i++)
+    {
+        GSList *format;
+
+        for (format = panel->format; format != NULL; format = g_slist_next (format))
+        {
+            format_item_t *fi = (format_item_t *) format->data;
+
+            if (fi->string_fn != NULL)
+            {
+                g_string_set_size (format_txt, 0);
+
+                if (panel->list_format == list_long && strcmp (fi->id, panel->sort_field->id) == 0)
+                    g_string_append (format_txt,
+                                     panel->sort_info.reverse
+                                     ? panel_sort_up_char : panel_sort_down_char);
+
+                g_string_append (format_txt, fi->title);
+
+                if (panel->filter.handler != NULL && strcmp (fi->id, "name") == 0)
+                {
+                    g_string_append (format_txt, " [");
+                    g_string_append (format_txt, panel->filter.value);
+                    g_string_append (format_txt, "]");
+                }
+
+                tty_setcolor (HEADER_COLOR);
+                tty_print_string (str_fit_to_term (format_txt->str, fi->field_len, J_CENTER_LEFT));
+            }
+            else
+            {
+                tty_setcolor (NORMAL_COLOR);
+                tty_print_one_vline (TRUE);
+            }
+        }
+
+        if (i < panel->list_cols - 1)
+        {
+            tty_setcolor (NORMAL_COLOR);
+            tty_print_one_vline (TRUE);
+        }
+    }
+
+    g_string_free (format_txt, TRUE);
+
+    if (panel->list_format != list_long)
+        panel_paint_sort_info (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const char *
+parse_panel_size (WPanel * panel, const char *format, gboolean isstatus)
+{
+    panel_display_t frame = frame_half;
+
+    format = skip_separators (format);
+
+    if (strncmp (format, "full", 4) == 0)
+    {
+        frame = frame_full;
+        format += 4;
+    }
+    else if (strncmp (format, "half", 4) == 0)
+    {
+        frame = frame_half;
+        format += 4;
+    }
+
+    if (!isstatus)
+    {
+        panel->frame_size = frame;
+        panel->list_cols = 1;
+    }
+
+    /* Now, the optional column specifier */
+    format = skip_separators (format);
+
+    if (g_ascii_isdigit (*format))
+    {
+        if (!isstatus)
+        {
+            panel->list_cols = g_ascii_digit_value (*format);
+            if (panel->list_cols < 1)
+                panel->list_cols = 1;
+        }
+
+        format++;
+    }
+
+    if (!isstatus)
+        panel_update_cols (WIDGET (panel), panel->frame_size);
+
+    return skip_separators (format);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* *INDENT-OFF* */
+/* Format is:
+
+   all              := panel_format? format
+   panel_format     := [full|half] [1-9]
+   format           := one_format_item_t
+                     | format , one_format_item_t
+
+   one_format_item_t := just format.id [opt_size]
+   just              := [<=>]
+   opt_size          := : size [opt_expand]
+   size              := [0-9]+
+   opt_expand        := +
+
+ */
+/* *INDENT-ON* */
+
+static GSList *
+parse_display_format (WPanel * panel, const char *format, char **error, gboolean isstatus,
+                      int *res_total_cols)
+{
+    GSList *home = NULL;        /* The formats we return */
+    int total_cols = 0;         /* Used columns by the format */
+    size_t i;
+
+    static size_t i18n_timelength = 0;  /* flag: check ?Time length at startup */
+
+    *error = NULL;
+
+    if (i18n_timelength == 0)
+    {
+        i18n_timelength = i18n_checktimelength ();      /* Mustn't be 0 */
+
+        for (i = 0; panel_fields[i].id != NULL; i++)
+            if (strcmp ("time", panel_fields[i].id + 1) == 0)
+                panel_fields[i].min_size = i18n_timelength;
+    }
+
+    /*
+     * This makes sure that the panel and mini status full/half mode
+     * setting is equal
+     */
+    format = parse_panel_size (panel, format, isstatus);
+
+    while (*format != '\0')
+    {                           /* format can be an empty string */
+        format_item_t *darr;
+        align_crt_t justify;    /* Which mode. */
+        gboolean set_justify = TRUE;    /* flag: set justification mode? */
+        gboolean found = FALSE;
+        size_t klen = 0;
+
+        darr = g_new0 (format_item_t, 1);
+        home = g_slist_append (home, darr);
+
+        format = skip_separators (format);
+
+        switch (*format)
+        {
+        case '<':
+            justify = J_LEFT;
+            format = skip_separators (format + 1);
+            break;
+        case '=':
+            justify = J_CENTER;
+            format = skip_separators (format + 1);
+            break;
+        case '>':
+            justify = J_RIGHT;
+            format = skip_separators (format + 1);
+            break;
+        default:
+            justify = J_LEFT;
+            set_justify = FALSE;
+            break;
+        }
+
+        for (i = 0; !found && panel_fields[i].id != NULL; i++)
+        {
+            klen = strlen (panel_fields[i].id);
+            found = strncmp (format, panel_fields[i].id, klen) == 0;
+        }
+
+        if (found)
+        {
+            i--;
+            format += klen;
+
+            darr->requested_field_len = panel_fields[i].min_size;
+            darr->string_fn = panel_fields[i].string_fn;
+            darr->title = g_strdup (panel_get_title_without_hotkey (panel_fields[i].title_hotkey));
+            darr->id = panel_fields[i].id;
+            darr->expand = panel_fields[i].expands;
+            darr->just_mode = panel_fields[i].default_just;
+
+            if (set_justify)
+            {
+                if (IS_FIT (darr->just_mode))
+                    darr->just_mode = MAKE_FIT (justify);
+                else
+                    darr->just_mode = justify;
+            }
+
+            format = skip_separators (format);
+
+            /* If we have a size specifier */
+            if (*format == ':')
+            {
+                int req_length;
+
+                /* If the size was specified, we don't want
+                 * auto-expansion by default
+                 */
+                darr->expand = FALSE;
+                format++;
+                req_length = atoi (format);
+                darr->requested_field_len = req_length;
+
+                format = skip_numbers (format);
+
+                /* Now, if they insist on expansion */
+                if (*format == '+')
+                {
+                    darr->expand = TRUE;
+                    format++;
+                }
+            }
+        }
+        else
+        {
+            size_t pos;
+            char *tmp_format;
+
+            pos = strlen (format);
+            if (pos > 8)
+                pos = 8;
+
+            tmp_format = g_strndup (format, pos);
+            g_slist_free_full (home, (GDestroyNotify) format_item_free);
+            *error =
+                g_strconcat (_("Unknown tag on display format:"), " ", tmp_format, (char *) NULL);
+            g_free (tmp_format);
+
+            return NULL;
+        }
+
+        total_cols += darr->requested_field_len;
+    }
+
+    *res_total_cols = total_cols;
+    return home;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static GSList *
+use_display_format (WPanel * panel, const char *format, char **error, gboolean isstatus)
+{
+#define MAX_EXPAND 4
+    int expand_top = 0;         /* Max used element in expand */
+    int usable_columns;         /* Usable columns in the panel */
+    int total_cols = 0;
+    GSList *darr, *home;
+
+    if (format == NULL)
+        format = DEFAULT_USER_FORMAT;
+
+    home = parse_display_format (panel, format, error, isstatus, &total_cols);
+
+    if (*error != NULL)
+        return NULL;
+
+    panel->dirty = TRUE;
+
+    usable_columns = WIDGET (panel)->rect.cols - 2;
+    /* Status needn't to be split */
+    if (!isstatus)
+    {
+        usable_columns /= panel->list_cols;
+        if (panel->list_cols > 1)
+            usable_columns--;
+    }
+
+    /* Look for the expandable fields and set field_len based on the requested field len */
+    for (darr = home; darr != NULL && expand_top < MAX_EXPAND; darr = g_slist_next (darr))
+    {
+        format_item_t *fi = (format_item_t *) darr->data;
+
+        fi->field_len = fi->requested_field_len;
+        if (fi->expand)
+            expand_top++;
+    }
+
+    /* If we used more columns than the available columns, adjust that */
+    if (total_cols > usable_columns)
+    {
+        int dif;
+        int pdif = 0;
+
+        dif = total_cols - usable_columns;
+
+        while (dif != 0 && pdif != dif)
+        {
+            pdif = dif;
+
+            for (darr = home; darr != NULL; darr = g_slist_next (darr))
+            {
+                format_item_t *fi = (format_item_t *) darr->data;
+
+                if (dif != 0 && fi->field_len != 1)
+                {
+                    fi->field_len--;
+                    dif--;
+                }
+            }
+        }
+
+        total_cols = usable_columns;    /* give up, the rest should be truncated */
+    }
+
+    /* Expand the available space */
+    if (usable_columns > total_cols && expand_top != 0)
+    {
+        int i;
+        int spaces;
+
+        spaces = (usable_columns - total_cols) / expand_top;
+
+        for (i = 0, darr = home; darr != NULL && i < expand_top; darr = g_slist_next (darr))
+        {
+            format_item_t *fi = (format_item_t *) darr->data;
+
+            if (fi->expand)
+            {
+                fi->field_len += spaces;
+                if (i == 0)
+                    fi->field_len += (usable_columns - total_cols) % expand_top;
+                i++;
+            }
+        }
+    }
+
+    return home;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Given the panel->view_type returns the format string to be parsed */
+
+static const char *
+panel_format (WPanel * panel)
+{
+    switch (panel->list_format)
+    {
+    case list_long:
+        return "full perm space nlink space owner space group space size space mtime space name";
+
+    case list_brief:
+        {
+            static char format[BUF_TINY];
+            int brief_cols = panel->brief_cols;
+
+            if (brief_cols < 1)
+                brief_cols = 2;
+
+            if (brief_cols > 9)
+                brief_cols = 9;
+
+            g_snprintf (format, sizeof (format), "half %d type name", brief_cols);
+            return format;
+        }
+
+    case list_user:
+        return panel->user_format;
+
+    default:
+    case list_full:
+        return "half type name | size | mtime";
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const char *
+mini_status_format (WPanel * panel)
+{
+    if (panel->user_mini_status)
+        return panel->user_status_format[panel->list_format];
+
+    switch (panel->list_format)
+    {
+    case list_long:
+        return "full perm space nlink space owner space group space size space mtime space name";
+
+    case list_brief:
+        return "half type name space bsize space perm space";
+
+    case list_full:
+        return "half type name";
+
+    default:
+    case list_user:
+        return panel->user_format;
+    }
+}
+
+/*                          */
+/* Panel operation commands */
+/*                          */
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+cd_up_dir (WPanel * panel)
+{
+    vfs_path_t *up_dir;
+
+    up_dir = vfs_path_from_str ("..");
+    panel_cd (panel, up_dir, cd_exact);
+    vfs_path_free (up_dir, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Used to emulate Lynx's entering leaving a directory with the arrow keys */
+
+static cb_ret_t
+maybe_cd (WPanel * panel, gboolean move_up_dir)
+{
+    if (panels_options.navigate_with_arrows && input_is_empty (cmdline))
+    {
+        const file_entry_t *fe;
+
+        if (move_up_dir)
+        {
+            cd_up_dir (panel);
+            return MSG_HANDLED;
+        }
+
+        fe = panel_current_entry (panel);
+
+        if (S_ISDIR (fe->st.st_mode) || link_isdir (fe))
+        {
+            vfs_path_t *vpath;
+
+            vpath = vfs_path_from_str (fe->fname->str);
+            panel_cd (panel, vpath, cd_exact);
+            vfs_path_free (vpath, TRUE);
+            return MSG_HANDLED;
+        }
+    }
+
+    return MSG_NOT_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* if command line is empty then do 'cd ..' */
+static cb_ret_t
+force_maybe_cd (WPanel * panel)
+{
+    if (input_is_empty (cmdline))
+    {
+        cd_up_dir (panel);
+        return MSG_HANDLED;
+    }
+
+    return MSG_NOT_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+unselect_item (WPanel * panel)
+{
+    repaint_file (panel, panel->current,
+                  panel_current_entry (panel)->f.marked != 0 ? FATTR_MARKED : FATTR_NORMAL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Select/unselect all the files like a current file by extension */
+
+static void
+panel_select_ext_cmd (WPanel * panel)
+{
+    const file_entry_t *fe;
+    GString *filename;
+    gboolean do_select;
+    char *reg_exp, *cur_file_ext;
+    mc_search_t *search;
+    int i;
+
+    fe = panel_current_entry (panel);
+
+    filename = fe->fname;
+    if (filename == NULL)
+        return;
+
+    do_select = (fe->f.marked == 0);
+
+    cur_file_ext = strutils_regex_escape (extension (filename->str));
+    if (cur_file_ext[0] != '\0')
+        reg_exp = g_strconcat ("^.*\\.", cur_file_ext, "$", (char *) NULL);
+    else
+        reg_exp = g_strdup ("^[^\\.]+$");
+
+    g_free (cur_file_ext);
+
+    search = mc_search_new (reg_exp, NULL);
+    search->search_type = MC_SEARCH_T_REGEX;
+    search->is_case_sensitive = FALSE;
+
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        fe = &panel->dir.list[i];
+
+        if (DIR_IS_DOTDOT (fe->fname->str) || S_ISDIR (fe->st.st_mode))
+            continue;
+
+        if (!mc_search_run (search, fe->fname->str, 0, fe->fname->len, NULL))
+            continue;
+
+        do_file_mark (panel, i, do_select ? 1 : 0);
+    }
+
+    mc_search_free (search);
+    g_free (reg_exp);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+panel_current_at_half (const WPanel * panel)
+{
+    int lines, top;
+
+    lines = panel_lines (panel);
+
+    /* define top file of column */
+    top = panel->top;
+    if (panel->list_cols > 1)
+        top += lines * ((panel->current - top) / lines);
+
+    return (panel->current - top - lines / 2);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+move_down (WPanel * panel)
+{
+    int items;
+
+    if (panel->current + 1 == panel->dir.len)
+        return;
+
+    unselect_item (panel);
+    panel->current++;
+
+    items = panel_items (panel);
+
+    if (panels_options.scroll_pages && panel->current - panel->top == items)
+    {
+        /* Scroll window half screen */
+        panel->top += items / 2;
+        if (panel->top > panel->dir.len - items)
+            panel->top = panel->dir.len - items;
+        paint_dir (panel);
+    }
+    else if (panels_options.scroll_center && panel_current_at_half (panel) > 0)
+    {
+        /* Scroll window when cursor is halfway down */
+        panel->top++;
+        if (panel->top > panel->dir.len - items)
+            panel->top = panel->dir.len - items;
+    }
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+move_up (WPanel * panel)
+{
+    if (panel->current == 0)
+        return;
+
+    unselect_item (panel);
+    panel->current--;
+
+    if (panels_options.scroll_pages && panel->current < panel->top)
+    {
+        /* Scroll window half screen */
+        panel->top -= panel_items (panel) / 2;
+        if (panel->top < 0)
+            panel->top = 0;
+        paint_dir (panel);
+    }
+    else if (panels_options.scroll_center && panel_current_at_half (panel) < 0)
+    {
+        /* Scroll window when cursor is halfway up */
+        panel->top--;
+        if (panel->top < 0)
+            panel->top = 0;
+    }
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Changes the current by lines (may be negative) */
+
+static void
+panel_move_current (WPanel * panel, int lines)
+{
+    int new_pos;
+    gboolean adjust = FALSE;
+
+    new_pos = panel->current + lines;
+    if (new_pos >= panel->dir.len)
+        new_pos = panel->dir.len - 1;
+
+    if (new_pos < 0)
+        new_pos = 0;
+
+    unselect_item (panel);
+    panel->current = new_pos;
+
+    if (panel->current - panel->top >= panel_items (panel))
+    {
+        panel->top += lines;
+        adjust = TRUE;
+    }
+
+    if (panel->current - panel->top < 0)
+    {
+        panel->top += lines;
+        adjust = TRUE;
+    }
+
+    if (adjust)
+    {
+        if (panel->top > panel->current)
+            panel->top = panel->current;
+        if (panel->top < 0)
+            panel->top = 0;
+        paint_dir (panel);
+    }
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+move_left (WPanel * panel)
+{
+    if (panel->list_cols > 1)
+    {
+        panel_move_current (panel, -panel_lines (panel));
+        return MSG_HANDLED;
+    }
+
+    return maybe_cd (panel, TRUE);      /* cd .. */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+move_right (WPanel * panel)
+{
+    if (panel->list_cols > 1)
+    {
+        panel_move_current (panel, panel_lines (panel));
+        return MSG_HANDLED;
+    }
+
+    return maybe_cd (panel, FALSE);     /* cd (current) */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+prev_page (WPanel * panel)
+{
+    int items;
+
+    if (panel->current == 0 && panel->top == 0)
+        return;
+
+    unselect_item (panel);
+    items = panel_items (panel);
+    if (panel->top < items)
+        items = panel->top;
+    if (items == 0)
+        panel->current = 0;
+    else
+        panel->current -= items;
+    panel->top -= items;
+
+    select_item (panel);
+    paint_dir (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+goto_parent_dir (WPanel * panel)
+{
+    if (!panel->is_panelized)
+        cd_up_dir (panel);
+    else
+    {
+        GString *fname;
+        const char *bname;
+        vfs_path_t *dname_vpath;
+
+        fname = panel_current_entry (panel)->fname;
+
+        if (g_path_is_absolute (fname->str))
+            fname = mc_g_string_dup (fname);
+        else
+        {
+            char *fname2;
+
+            fname2 =
+                mc_build_filename (vfs_path_as_str (panel->panelized_descr->root_vpath), fname->str,
+                                   (char *) NULL);
+
+            fname = g_string_new (fname2);
+            g_free (fname2);
+        }
+
+        bname = x_basename (fname->str);
+
+        if (bname == fname->str)
+            dname_vpath = vfs_path_from_str (".");
+        else
+        {
+            g_string_truncate (fname, bname - fname->str);
+            dname_vpath = vfs_path_from_str (fname->str);
+        }
+
+        panel_cd (panel, dname_vpath, cd_exact);
+        panel_set_current_by_name (panel, bname);
+
+        vfs_path_free (dname_vpath, TRUE);
+        g_string_free (fname, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+next_page (WPanel * panel)
+{
+    int items;
+
+    if (panel->current == panel->dir.len - 1)
+        return;
+
+    unselect_item (panel);
+    items = panel_items (panel);
+    if (panel->top > panel->dir.len - 2 * items)
+        items = panel->dir.len - items - panel->top;
+    if (panel->top + items < 0)
+        items = -panel->top;
+    if (items == 0)
+        panel->current = panel->dir.len - 1;
+    else
+        panel->current += items;
+    panel->top += items;
+
+    select_item (panel);
+    paint_dir (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+goto_child_dir (WPanel * panel)
+{
+    const file_entry_t *fe;
+
+    fe = panel_current_entry (panel);
+
+    if (S_ISDIR (fe->st.st_mode) || link_isdir (fe))
+    {
+        vfs_path_t *vpath;
+
+        vpath = vfs_path_from_str (fe->fname->str);
+        panel_cd (panel, vpath, cd_exact);
+        vfs_path_free (vpath, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+goto_top_file (WPanel * panel)
+{
+    unselect_item (panel);
+    panel->current = panel->top;
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+goto_middle_file (WPanel * panel)
+{
+    unselect_item (panel);
+    panel->current = panel->top + panel_items (panel) / 2;
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+goto_bottom_file (WPanel * panel)
+{
+    unselect_item (panel);
+    panel->current = panel->top + panel_items (panel) - 1;
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+move_home (WPanel * panel)
+{
+    if (panel->current == 0)
+        return;
+
+    unselect_item (panel);
+
+    if (panels_options.torben_fj_mode)
+    {
+        int middle_pos;
+
+        middle_pos = panel->top + panel_items (panel) / 2;
+
+        if (panel->current > middle_pos)
+        {
+            goto_middle_file (panel);
+            return;
+        }
+        if (panel->current != panel->top)
+        {
+            goto_top_file (panel);
+            return;
+        }
+    }
+
+    panel->top = 0;
+    panel->current = 0;
+
+    paint_dir (panel);
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+move_end (WPanel * panel)
+{
+    if (panel->current == panel->dir.len - 1)
+        return;
+
+    unselect_item (panel);
+
+    if (panels_options.torben_fj_mode)
+    {
+        int items, middle_pos;
+
+        items = panel_items (panel);
+        middle_pos = panel->top + items / 2;
+
+        if (panel->current < middle_pos)
+        {
+            goto_middle_file (panel);
+            return;
+        }
+        if (panel->current != panel->top + items - 1)
+        {
+            goto_bottom_file (panel);
+            return;
+        }
+    }
+
+    panel->current = panel->dir.len - 1;
+    paint_dir (panel);
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+do_mark_file (WPanel * panel, mark_act_t do_move)
+{
+    do_file_mark (panel, panel->current, panel_current_entry (panel)->f.marked ? 0 : 1);
+
+    if ((panels_options.mark_moves_down && do_move == MARK_DOWN) || do_move == MARK_FORCE_DOWN)
+        move_down (panel);
+    else if (do_move == MARK_FORCE_UP)
+        move_up (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+mark_file (WPanel * panel)
+{
+    do_mark_file (panel, MARK_DOWN);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+mark_file_up (WPanel * panel)
+{
+    do_mark_file (panel, MARK_FORCE_UP);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+mark_file_down (WPanel * panel)
+{
+    do_mark_file (panel, MARK_FORCE_DOWN);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+mark_file_right (WPanel * panel)
+{
+    int lines;
+
+    if (state_mark < 0)
+        state_mark = panel_current_entry (panel)->f.marked ? 0 : 1;
+
+    lines = panel_lines (panel);
+    lines = MIN (lines, panel->dir.len - panel->current - 1);
+    for (; lines != 0; lines--)
+    {
+        do_file_mark (panel, panel->current, state_mark);
+        move_down (panel);
+    }
+    do_file_mark (panel, panel->current, state_mark);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+mark_file_left (WPanel * panel)
+{
+    int lines;
+
+    if (state_mark < 0)
+        state_mark = panel_current_entry (panel)->f.marked ? 0 : 1;
+
+    lines = panel_lines (panel);
+    lines = MIN (lines, panel->current + 1);
+    for (; lines != 0; lines--)
+    {
+        do_file_mark (panel, panel->current, state_mark);
+        move_up (panel);
+    }
+    do_file_mark (panel, panel->current, state_mark);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static mc_search_t *
+panel_select_unselect_files_dialog (select_flags_t * flags, const char *title,
+                                    const char *history_name, const char *help_section, char **str)
+{
+    gboolean files_only = (*flags & SELECT_FILES_ONLY) != 0;
+    gboolean case_sens = (*flags & SELECT_MATCH_CASE) != 0;
+    gboolean shell_patterns = (*flags & SELECT_SHELL_PATTERNS) != 0;
+
+    char *reg_exp;
+    mc_search_t *search;
+
+    quick_widget_t quick_widgets[] = {
+        /* *INDENT-OFF* */
+        QUICK_INPUT (INPUT_LAST_TEXT, history_name, &reg_exp, NULL,
+                     FALSE, FALSE, INPUT_COMPLETE_FILENAMES),
+        QUICK_START_COLUMNS,
+            QUICK_CHECKBOX (N_("&Files only"), &files_only, NULL),
+            QUICK_CHECKBOX (N_("&Using shell patterns"), &shell_patterns, NULL),
+        QUICK_NEXT_COLUMN,
+            QUICK_CHECKBOX (N_("&Case sensitive"), &case_sens, NULL),
+        QUICK_STOP_COLUMNS,
+        QUICK_END
+        /* *INDENT-ON* */
+    };
+
+    WRect r = { -1, -1, 0, 50 };
+
+    quick_dialog_t qdlg = {
+        r, title, help_section,
+        quick_widgets, NULL, NULL
+    };
+
+    if (quick_dialog (&qdlg) == B_CANCEL)
+        return NULL;
+
+    if (*reg_exp == '\0')
+    {
+        g_free (reg_exp);
+        if (str != NULL)
+            *str = NULL;
+        return SELECT_RESET;
+    }
+
+    search = mc_search_new (reg_exp, NULL);
+    search->search_type = shell_patterns ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
+    search->is_entire_line = TRUE;
+    search->is_case_sensitive = case_sens;
+
+    if (str != NULL)
+        *str = reg_exp;
+    else
+        g_free (reg_exp);
+
+    if (!mc_search_prepare (search))
+    {
+        message (D_ERROR, MSG_ERROR, _("Malformed regular expression"));
+        mc_search_free (search);
+        return SELECT_ERROR;
+    }
+
+    /* result flags */
+    *flags = 0;
+    if (case_sens)
+        *flags |= SELECT_MATCH_CASE;
+    if (files_only)
+        *flags |= SELECT_FILES_ONLY;
+    if (shell_patterns)
+        *flags |= SELECT_SHELL_PATTERNS;
+
+    return search;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_select_unselect_files (WPanel * panel, const char *title, const char *history_name,
+                             const char *help_section, gboolean do_select)
+{
+    mc_search_t *search;
+    gboolean files_only;
+    int i;
+
+    search = panel_select_unselect_files_dialog (&panels_options.select_flags, title, history_name,
+                                                 help_section, NULL);
+    if (search == NULL || search == SELECT_RESET || search == SELECT_ERROR)
+        return;
+
+    files_only = (panels_options.select_flags & SELECT_FILES_ONLY) != 0;
+
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        if (DIR_IS_DOTDOT (panel->dir.list[i].fname->str))
+            continue;
+        if (S_ISDIR (panel->dir.list[i].st.st_mode) && files_only)
+            continue;
+
+        if (mc_search_run
+            (search, panel->dir.list[i].fname->str, 0, panel->dir.list[i].fname->len, NULL))
+            do_file_mark (panel, i, do_select ? 1 : 0);
+    }
+
+    mc_search_free (search);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_select_files (WPanel * panel)
+{
+    panel_select_unselect_files (panel, _("Select"), MC_HISTORY_FM_PANEL_SELECT,
+                                 "[Select/Unselect Files]", TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_unselect_files (WPanel * panel)
+{
+    panel_select_unselect_files (panel, _("Unselect"), MC_HISTORY_FM_PANEL_UNSELECT,
+                                 "[Select/Unselect Files]", FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_select_invert_files (WPanel * panel)
+{
+    int i;
+
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        file_entry_t *file = &panel->dir.list[i];
+
+        if (!panels_options.reverse_files_only || !S_ISDIR (file->st.st_mode))
+            do_file_mark (panel, i, file->f.marked ? 0 : 1);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_do_set_filter (WPanel * panel)
+{
+    /* *INDENT-OFF* */
+    file_filter_t ff = { .value = NULL, .handler = NULL, .flags = panel->filter.flags };
+    /* *INDENT-ON* */
+
+    ff.handler =
+        panel_select_unselect_files_dialog (&ff.flags, _("Filter"), MC_HISTORY_FM_PANEL_FILTER,
+                                            "[Filter...]", &ff.value);
+
+    if (ff.handler == NULL || ff.handler == SELECT_ERROR)
+        return;
+
+    if (ff.handler == SELECT_RESET)
+        ff.handler = NULL;
+
+    panel_set_filter (panel, &ff);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Incremental search of a file name in the panel.
+  * @param panel instance of WPanel structure
+  * @param c_code key code
+  */
+
+static void
+do_search (WPanel * panel, int c_code)
+{
+    int curr;
+    int i;
+    gboolean wrapped = FALSE;
+    char *act;
+    mc_search_t *search;
+    char *reg_exp, *esc_str;
+    gboolean is_found = FALSE;
+
+    if (c_code == KEY_BACKSPACE)
+    {
+        if (panel->quick_search.buffer->len != 0)
+        {
+            act = panel->quick_search.buffer->str + panel->quick_search.buffer->len;
+            str_prev_noncomb_char (&act, panel->quick_search.buffer->str);
+            g_string_set_size (panel->quick_search.buffer, act - panel->quick_search.buffer->str);
+        }
+        panel->quick_search.chpoint = 0;
+    }
+    else
+    {
+        if (c_code != 0 && (gsize) panel->quick_search.chpoint < sizeof (panel->quick_search.ch))
+        {
+            panel->quick_search.ch[panel->quick_search.chpoint] = c_code;
+            panel->quick_search.chpoint++;
+        }
+
+        if (panel->quick_search.chpoint > 0)
+        {
+            switch (str_is_valid_char (panel->quick_search.ch, panel->quick_search.chpoint))
+            {
+            case -2:
+                return;
+            case -1:
+                panel->quick_search.chpoint = 0;
+                return;
+            default:
+                g_string_append_len (panel->quick_search.buffer, panel->quick_search.ch,
+                                     panel->quick_search.chpoint);
+                panel->quick_search.chpoint = 0;
+            }
+        }
+    }
+
+    reg_exp = g_strdup_printf ("%s*", panel->quick_search.buffer->str);
+    esc_str = strutils_escape (reg_exp, -1, ",|\\{}[]", TRUE);
+    search = mc_search_new (esc_str, NULL);
+    search->search_type = MC_SEARCH_T_GLOB;
+    search->is_entire_line = TRUE;
+
+    switch (panels_options.qsearch_mode)
+    {
+    case QSEARCH_CASE_SENSITIVE:
+        search->is_case_sensitive = TRUE;
+        break;
+    case QSEARCH_CASE_INSENSITIVE:
+        search->is_case_sensitive = FALSE;
+        break;
+    default:
+        search->is_case_sensitive = panel->sort_info.case_sensitive;
+        break;
+    }
+
+    curr = panel->current;
+
+    for (i = panel->current; !wrapped || i != panel->current; i++)
+    {
+        if (i >= panel->dir.len)
+        {
+            i = 0;
+            if (wrapped)
+                break;
+            wrapped = TRUE;
+        }
+        if (mc_search_run
+            (search, panel->dir.list[i].fname->str, 0, panel->dir.list[i].fname->len, NULL))
+        {
+            curr = i;
+            is_found = TRUE;
+            break;
+        }
+    }
+    if (is_found)
+    {
+        unselect_item (panel);
+        panel->current = curr;
+        select_item (panel);
+        widget_draw (WIDGET (panel));
+    }
+    else if (c_code != KEY_BACKSPACE)
+    {
+        act = panel->quick_search.buffer->str + panel->quick_search.buffer->len;
+        str_prev_noncomb_char (&act, panel->quick_search.buffer->str);
+        g_string_set_size (panel->quick_search.buffer, act - panel->quick_search.buffer->str);
+    }
+    mc_search_free (search);
+    g_free (reg_exp);
+    g_free (esc_str);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Start new search.
+  * @param panel instance of WPanel structure
+  */
+
+static void
+start_search (WPanel * panel)
+{
+    if (panel->quick_search.active)
+    {
+        if (panel->current == panel->dir.len - 1)
+            panel->current = 0;
+        else
+            move_down (panel);
+
+        /* in case if there was no search string we need to recall
+           previous string, with which we ended previous searching */
+        if (panel->quick_search.buffer->len == 0)
+            mc_g_string_copy (panel->quick_search.buffer, panel->quick_search.prev_buffer);
+
+        do_search (panel, 0);
+    }
+    else
+    {
+        panel->quick_search.active = TRUE;
+        g_string_set_size (panel->quick_search.buffer, 0);
+        panel->quick_search.ch[0] = '\0';
+        panel->quick_search.chpoint = 0;
+        display_mini_info (panel);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+stop_search (WPanel * panel)
+{
+    if (!panel->quick_search.active)
+        return;
+
+    panel->quick_search.active = FALSE;
+
+    /* if user overrdied search string, we need to store it
+       to the quick_search.prev_buffer */
+    if (panel->quick_search.buffer->len != 0)
+        mc_g_string_copy (panel->quick_search.prev_buffer, panel->quick_search.buffer);
+
+    display_mini_info (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Return TRUE if the Enter key has been processed, FALSE otherwise */
+
+static gboolean
+do_enter_on_file_entry (WPanel * panel, file_entry_t * fe)
+{
+    const char *fname = fe->fname->str;
+    vfs_path_t *full_name_vpath;
+    gboolean ok;
+
+    /*
+     * Directory or link to directory - change directory.
+     * Try the same for the entries on which mc_lstat() has failed.
+     */
+    if (S_ISDIR (fe->st.st_mode) || link_isdir (fe) || (fe->st.st_mode == 0))
+    {
+        vfs_path_t *fname_vpath;
+
+        fname_vpath = vfs_path_from_str (fname);
+        if (!panel_cd (panel, fname_vpath, cd_exact))
+            cd_error_message (fname);
+        vfs_path_free (fname_vpath, TRUE);
+        return TRUE;
+    }
+
+    full_name_vpath = vfs_path_append_new (panel->cwd_vpath, fname, (char *) NULL);
+
+    /* Try associated command */
+    ok = regex_command (full_name_vpath, "Open") != 0;
+    vfs_path_free (full_name_vpath, TRUE);
+    if (ok)
+        return TRUE;
+
+    /* Check if the file is executable */
+    full_name_vpath = vfs_path_append_new (panel->cwd_vpath, fname, (char *) NULL);
+    ok = (is_exe (fe->st.st_mode) && if_link_is_exe (full_name_vpath, fe));
+    vfs_path_free (full_name_vpath, TRUE);
+    if (!ok)
+        return FALSE;
+
+    if (confirm_execute
+        && query_dialog (_("The Midnight Commander"), _("Do you really want to execute?"), D_NORMAL,
+                         2, _("&Yes"), _("&No")) != 0)
+        return TRUE;
+
+    if (!vfs_current_is_local ())
+    {
+        int ret;
+        vfs_path_t *tmp_vpath;
+
+        tmp_vpath = vfs_path_append_new (vfs_get_raw_current_dir (), fname, (char *) NULL);
+        ret = mc_setctl (tmp_vpath, VFS_SETCTL_RUN, NULL);
+        vfs_path_free (tmp_vpath, TRUE);
+        /* We took action only if the dialog was shown or the execution was successful */
+        return confirm_execute || (ret == 0);
+    }
+
+    {
+        char *tmp, *cmd;
+
+        tmp = name_quote (fname, FALSE);
+        cmd = g_strconcat (".", PATH_SEP_STR, tmp, (char *) NULL);
+        g_free (tmp);
+        shell_execute (cmd, 0);
+        g_free (cmd);
+    }
+
+#ifdef HAVE_CHARSET
+    mc_global.source_codepage = default_source_codepage;
+#endif
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline gboolean
+do_enter (WPanel * panel)
+{
+    return do_enter_on_file_entry (panel, panel_current_entry (panel));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_cycle_listing_format (WPanel * panel)
+{
+    panel->list_format = (panel->list_format + 1) % LIST_FORMATS;
+
+    if (set_panel_formats (panel) == 0)
+        do_refresh ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chdir_other_panel (WPanel * panel)
+{
+    const file_entry_t *entry;
+    vfs_path_t *new_dir_vpath;
+    char *curr_entry = NULL;
+    WPanel *p;
+
+    entry = panel_current_entry (panel);
+
+    if (get_other_type () != view_listing)
+        create_panel (get_other_index (), view_listing);
+
+    if (S_ISDIR (entry->st.st_mode) || link_isdir (entry))
+        new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, entry->fname->str, (char *) NULL);
+    else
+    {
+        new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, "..", (char *) NULL);
+        curr_entry = strrchr (vfs_path_get_last_path_str (panel->cwd_vpath), PATH_SEP);
+    }
+
+    p = change_panel ();
+    panel_cd (p, new_dir_vpath, cd_exact);
+    vfs_path_free (new_dir_vpath, TRUE);
+
+    if (curr_entry != NULL)
+        panel_set_current_by_name (p, curr_entry);
+    (void) change_panel ();
+
+    move_down (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Make the current directory of the current panel also the current
+ * directory of the other panel.  Put the other panel to the listing
+ * mode if needed.  If the current panel is panelized, the other panel
+ * doesn't become panelized.
+ */
+
+static void
+panel_sync_other (const WPanel * panel)
+{
+    if (get_other_type () != view_listing)
+        create_panel (get_other_index (), view_listing);
+
+    panel_do_cd (other_panel, panel->cwd_vpath, cd_exact);
+
+    /* try to set current filename on the other panel */
+    if (!panel->is_panelized)
+        panel_set_current_by_name (other_panel, panel_current_entry (panel)->fname->str);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+chdir_to_readlink (WPanel * panel)
+{
+    const file_entry_t *fe;
+    vfs_path_t *new_dir_vpath;
+    char buffer[MC_MAXPATHLEN];
+    int i;
+    struct stat st;
+    vfs_path_t *panel_fname_vpath;
+    gboolean ok;
+    WPanel *cpanel;
+
+    if (get_other_type () != view_listing)
+        return;
+
+    fe = panel_current_entry (panel);
+
+    if (!S_ISLNK (fe->st.st_mode))
+        return;
+
+    i = readlink (fe->fname->str, buffer, MC_MAXPATHLEN - 1);
+    if (i < 0)
+        return;
+
+    panel_fname_vpath = vfs_path_from_str (fe->fname->str);
+    ok = (mc_stat (panel_fname_vpath, &st) >= 0);
+    vfs_path_free (panel_fname_vpath, TRUE);
+    if (!ok)
+        return;
+
+    buffer[i] = '\0';
+    if (!S_ISDIR (st.st_mode))
+    {
+        char *p;
+
+        p = strrchr (buffer, PATH_SEP);
+        if (p != NULL && p[1] == '\0')
+        {
+            *p = '\0';
+            p = strrchr (buffer, PATH_SEP);
+        }
+        if (p == NULL)
+            return;
+
+        p[1] = '\0';
+    }
+    if (IS_PATH_SEP (*buffer))
+        new_dir_vpath = vfs_path_from_str (buffer);
+    else
+        new_dir_vpath = vfs_path_append_new (panel->cwd_vpath, buffer, (char *) NULL);
+
+    cpanel = change_panel ();
+    panel_cd (cpanel, new_dir_vpath, cd_exact);
+    vfs_path_free (new_dir_vpath, TRUE);
+    (void) change_panel ();
+
+    move_down (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+   function return 0 if not found and REAL_INDEX+1 if found
+ */
+
+static gsize
+panel_get_format_field_index_by_name (const WPanel * panel, const char *name)
+{
+    GSList *format;
+    gsize lc_index;
+
+    for (lc_index = 1, format = panel->format;
+         format != NULL && strcmp (((format_item_t *) format->data)->title, name) != 0;
+         format = g_slist_next (format), lc_index++)
+        ;
+
+    if (format == NULL)
+        lc_index = 0;
+
+    return lc_index;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static const panel_field_t *
+panel_get_sortable_field_by_format (const WPanel * panel, gsize lc_index)
+{
+    const panel_field_t *pfield;
+    const format_item_t *format;
+
+    format = (const format_item_t *) g_slist_nth_data (panel->format, lc_index);
+    if (format == NULL)
+        return NULL;
+
+    pfield = panel_get_field_by_title (format->title);
+    if (pfield == NULL)
+        return NULL;
+    if (pfield->sort_routine == NULL)
+        return NULL;
+    return pfield;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_toggle_sort_order_prev (WPanel * panel)
+{
+    gsize lc_index, i;
+    const char *title;
+    const panel_field_t *pfield = NULL;
+
+    title = panel_get_title_without_hotkey (panel->sort_field->title_hotkey);
+    lc_index = panel_get_format_field_index_by_name (panel, title);
+
+    if (lc_index > 1)
+    {
+        /* search for prev sortable column in panel format */
+        for (i = lc_index - 1;
+             i != 0 && (pfield = panel_get_sortable_field_by_format (panel, i - 1)) == NULL; i--)
+            ;
+    }
+
+    if (pfield == NULL)
+    {
+        /* Sortable field not found. Try to search in each array */
+        for (i = g_slist_length (panel->format);
+             i != 0 && (pfield = panel_get_sortable_field_by_format (panel, i - 1)) == NULL; i--)
+            ;
+    }
+
+    if (pfield != NULL)
+    {
+        panel->sort_field = pfield;
+        panel_set_sort_order (panel, pfield);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_toggle_sort_order_next (WPanel * panel)
+{
+    gsize lc_index, i;
+    const panel_field_t *pfield = NULL;
+    gsize format_field_count;
+    const char *title;
+
+    format_field_count = g_slist_length (panel->format);
+    title = panel_get_title_without_hotkey (panel->sort_field->title_hotkey);
+    lc_index = panel_get_format_field_index_by_name (panel, title);
+
+    if (lc_index != 0 && lc_index != format_field_count)
+    {
+        /* search for prev sortable column in panel format */
+        for (i = lc_index;
+             i != format_field_count
+             && (pfield = panel_get_sortable_field_by_format (panel, i)) == NULL; i++)
+            ;
+    }
+
+    if (pfield == NULL)
+    {
+        /* Sortable field not found. Try to search in each array */
+        for (i = 0;
+             i != format_field_count
+             && (pfield = panel_get_sortable_field_by_format (panel, i)) == NULL; i++)
+            ;
+    }
+
+    if (pfield != NULL)
+    {
+        panel->sort_field = pfield;
+        panel_set_sort_order (panel, pfield);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_select_sort_order (WPanel * panel)
+{
+    const panel_field_t *sort_order;
+
+    sort_order = sort_box (&panel->sort_info, panel->sort_field);
+    if (sort_order != NULL)
+    {
+        panel->sort_field = sort_order;
+        panel_set_sort_order (panel, sort_order);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * panel_content_scroll_left:
+ * @param panel the pointer to the panel on which we operate
+ *
+ * scroll long filename to the left (decrement scroll pointer)
+ *
+ */
+
+static void
+panel_content_scroll_left (WPanel * panel)
+{
+    if (panel->content_shift > -1)
+    {
+        if (panel->content_shift > panel->max_shift)
+            panel->content_shift = panel->max_shift;
+
+        panel->content_shift--;
+        show_dir (panel);
+        paint_dir (panel);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * panel_content_scroll_right:
+ * @param panel the pointer to the panel on which we operate
+ *
+ * scroll long filename to the right (increment scroll pointer)
+ *
+ */
+
+static void
+panel_content_scroll_right (WPanel * panel)
+{
+    if (panel->content_shift < 0 || panel->content_shift < panel->max_shift)
+    {
+        panel->content_shift++;
+        show_dir (panel);
+        paint_dir (panel);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_set_sort_type_by_id (WPanel * panel, const char *name)
+{
+    if (strcmp (panel->sort_field->id, name) == 0)
+        panel->sort_info.reverse = !panel->sort_info.reverse;
+    else
+    {
+        const panel_field_t *sort_order;
+
+        sort_order = panel_get_field_by_id (name);
+        if (sort_order == NULL)
+            return;
+
+        panel->sort_field = sort_order;
+    }
+
+    panel_set_sort_order (panel, panel->sort_field);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ *  If we moved to the parent directory move the 'current' pointer to
+ *  the old directory name; If we leave VFS dir, remove FS specificator.
+ *
+ *  You do _NOT_ want to add any vfs aware code here. <pavel@ucw.cz>
+ */
+
+static const char *
+get_parent_dir_name (const vfs_path_t * cwd_vpath, const vfs_path_t * lwd_vpath)
+{
+    size_t llen, clen;
+    const char *p, *lwd;
+
+    llen = vfs_path_len (lwd_vpath);
+    clen = vfs_path_len (cwd_vpath);
+
+    if (llen <= clen)
+        return NULL;
+
+    lwd = vfs_path_as_str (lwd_vpath);
+
+    p = g_strrstr (lwd, VFS_PATH_URL_DELIMITER);
+
+    if (p == NULL)
+    {
+        const char *cwd;
+
+        cwd = vfs_path_as_str (cwd_vpath);
+
+        p = strrchr (lwd, PATH_SEP);
+
+        if (p != NULL && strncmp (cwd, lwd, (size_t) (p - lwd)) == 0
+            && (clen == (size_t) (p - lwd) || (p == lwd && IS_PATH_SEP (cwd[0]) && cwd[1] == '\0')))
+            return (p + 1);
+
+        return NULL;
+    }
+
+    /* skip VFS prefix */
+    while (--p > lwd && !IS_PATH_SEP (*p))
+        ;
+    /* get last component */
+    while (--p > lwd && !IS_PATH_SEP (*p))
+        ;
+
+    /* return last component */
+    return (p != lwd || IS_PATH_SEP (*p)) ? p + 1 : p;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Wrapper for do_subshell_chdir, check for availability of subshell */
+
+static void
+subshell_chdir (const vfs_path_t * vpath)
+{
+#ifdef ENABLE_SUBSHELL
+    if (mc_global.tty.use_subshell && vfs_current_is_local ())
+        do_subshell_chdir (vpath, FALSE);
+#else /* ENABLE_SUBSHELL */
+    (void) vpath;
+#endif /* ENABLE_SUBSHELL */
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Changes the current directory of the panel.
+ * Don't record change in the directory history.
+ */
+
+static gboolean
+panel_do_cd_int (WPanel * panel, const vfs_path_t * new_dir_vpath, enum cd_enum cd_type)
+{
+    vfs_path_t *olddir_vpath;
+
+    /* Convert *new_path to a suitable pathname, handle ~user */
+    if (cd_type == cd_parse_command)
+    {
+        const vfs_path_element_t *element;
+
+        element = vfs_path_get_by_index (new_dir_vpath, 0);
+        if (strcmp (element->path, "-") == 0)
+            new_dir_vpath = panel->lwd_vpath;
+    }
+
+    if (mc_chdir (new_dir_vpath) == -1)
+        return FALSE;
+
+    /* Success: save previous directory, shutdown status of previous dir */
+    olddir_vpath = vfs_path_clone (panel->cwd_vpath);
+    panel_set_lwd (panel, panel->cwd_vpath);
+    input_complete_free (cmdline);
+
+    vfs_path_free (panel->cwd_vpath, TRUE);
+    vfs_setup_cwd ();
+    panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
+
+    vfs_release_path (olddir_vpath);
+
+    subshell_chdir (panel->cwd_vpath);
+
+    /* Reload current panel */
+    panel_clean_dir (panel);
+
+    if (!dir_list_load (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
+                        &panel->sort_info, &panel->filter))
+        message (D_ERROR, MSG_ERROR, _("Cannot read directory contents"));
+
+    panel_set_current_by_name (panel, get_parent_dir_name (panel->cwd_vpath, olddir_vpath));
+
+    load_hint (FALSE);
+    panel->dirty = TRUE;
+    update_xterm_title_path ();
+
+    vfs_path_free (olddir_vpath, TRUE);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+directory_history_next (WPanel * panel)
+{
+    gboolean ok;
+
+    do
+    {
+        GList *next;
+
+        ok = TRUE;
+        next = g_list_next (panel->dir_history.current);
+        if (next != NULL)
+        {
+            vfs_path_t *data_vpath;
+
+            data_vpath = vfs_path_from_str ((char *) next->data);
+            ok = panel_do_cd_int (panel, data_vpath, cd_exact);
+            vfs_path_free (data_vpath, TRUE);
+            panel->dir_history.current = next;
+        }
+        /* skip directories that present in history but absent in file system */
+    }
+    while (!ok);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+directory_history_prev (WPanel * panel)
+{
+    gboolean ok;
+
+    do
+    {
+        GList *prev;
+
+        ok = TRUE;
+        prev = g_list_previous (panel->dir_history.current);
+        if (prev != NULL)
+        {
+            vfs_path_t *data_vpath;
+
+            data_vpath = vfs_path_from_str ((char *) prev->data);
+            ok = panel_do_cd_int (panel, data_vpath, cd_exact);
+            vfs_path_free (data_vpath, TRUE);
+            panel->dir_history.current = prev;
+        }
+        /* skip directories that present in history but absent in file system */
+    }
+    while (!ok);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+directory_history_list (WPanel * panel)
+{
+    history_descriptor_t hd;
+    gboolean ok = FALSE;
+    size_t pos;
+
+    pos = g_list_position (panel->dir_history.current, panel->dir_history.list);
+
+    history_descriptor_init (&hd, WIDGET (panel)->rect.y, WIDGET (panel)->rect.x,
+                             panel->dir_history.list, (int) pos);
+    history_show (&hd);
+
+    panel->dir_history.list = hd.list;
+    if (hd.text != NULL)
+    {
+        vfs_path_t *s_vpath;
+
+        s_vpath = vfs_path_from_str (hd.text);
+        ok = panel_do_cd_int (panel, s_vpath, cd_exact);
+        if (ok)
+            directory_history_add (panel, panel->cwd_vpath);
+        else
+            cd_error_message (hd.text);
+        vfs_path_free (s_vpath, TRUE);
+        g_free (hd.text);
+    }
+
+    if (!ok)
+    {
+        /* Since history is fully modified in history_show(), panel->dir_history actually
+         * points to the invalid place. Try restore current position here. */
+
+        size_t i;
+
+        panel->dir_history.current = panel->dir_history.list;
+
+        for (i = 0; i <= pos; i++)
+        {
+            GList *prev;
+
+            prev = g_list_previous (panel->dir_history.current);
+            if (prev == NULL)
+                break;
+
+            panel->dir_history.current = prev;
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+panel_execute_cmd (WPanel * panel, long command)
+{
+    int res = MSG_HANDLED;
+
+    if (command != CK_Search)
+        stop_search (panel);
+
+    switch (command)
+    {
+    case CK_Up:
+    case CK_Down:
+    case CK_Left:
+    case CK_Right:
+    case CK_Bottom:
+    case CK_Top:
+    case CK_PageDown:
+    case CK_PageUp:
+        /* reset state of marks flag */
+        state_mark = -1;
+        break;
+    default:
+        break;
+    }
+
+    switch (command)
+    {
+    case CK_CycleListingFormat:
+        panel_cycle_listing_format (panel);
+        break;
+    case CK_PanelOtherCd:
+        chdir_other_panel (panel);
+        break;
+    case CK_PanelOtherCdLink:
+        chdir_to_readlink (panel);
+        break;
+    case CK_CopySingle:
+        copy_cmd_local (panel);
+        break;
+    case CK_DeleteSingle:
+        delete_cmd_local (panel);
+        break;
+    case CK_Enter:
+        do_enter (panel);
+        break;
+    case CK_ViewRaw:
+        view_raw_cmd (panel);
+        break;
+    case CK_EditNew:
+        edit_cmd_new ();
+        break;
+    case CK_MoveSingle:
+        rename_cmd_local (panel);
+        break;
+    case CK_SelectInvert:
+        panel_select_invert_files (panel);
+        break;
+    case CK_Select:
+        panel_select_files (panel);
+        break;
+    case CK_SelectExt:
+        panel_select_ext_cmd (panel);
+        break;
+    case CK_Unselect:
+        panel_unselect_files (panel);
+        break;
+    case CK_Filter:
+        panel_do_set_filter (panel);
+        break;
+    case CK_PageDown:
+        next_page (panel);
+        break;
+    case CK_PageUp:
+        prev_page (panel);
+        break;
+    case CK_CdChild:
+        goto_child_dir (panel);
+        break;
+    case CK_CdParent:
+        goto_parent_dir (panel);
+        break;
+    case CK_History:
+        directory_history_list (panel);
+        break;
+    case CK_HistoryNext:
+        directory_history_next (panel);
+        break;
+    case CK_HistoryPrev:
+        directory_history_prev (panel);
+        break;
+    case CK_BottomOnScreen:
+        goto_bottom_file (panel);
+        break;
+    case CK_MiddleOnScreen:
+        goto_middle_file (panel);
+        break;
+    case CK_TopOnScreen:
+        goto_top_file (panel);
+        break;
+    case CK_Mark:
+        mark_file (panel);
+        break;
+    case CK_MarkUp:
+        mark_file_up (panel);
+        break;
+    case CK_MarkDown:
+        mark_file_down (panel);
+        break;
+    case CK_MarkLeft:
+        mark_file_left (panel);
+        break;
+    case CK_MarkRight:
+        mark_file_right (panel);
+        break;
+    case CK_CdParentSmart:
+        res = force_maybe_cd (panel);
+        break;
+    case CK_Up:
+        move_up (panel);
+        break;
+    case CK_Down:
+        move_down (panel);
+        break;
+    case CK_Left:
+        res = move_left (panel);
+        break;
+    case CK_Right:
+        res = move_right (panel);
+        break;
+    case CK_Bottom:
+        move_end (panel);
+        break;
+    case CK_Top:
+        move_home (panel);
+        break;
+#ifdef HAVE_CHARSET
+    case CK_SelectCodepage:
+        panel_change_encoding (panel);
+        break;
+#endif
+    case CK_ScrollLeft:
+        panel_content_scroll_left (panel);
+        break;
+    case CK_ScrollRight:
+        panel_content_scroll_right (panel);
+        break;
+    case CK_Search:
+        start_search (panel);
+        break;
+    case CK_SearchStop:
+        break;
+    case CK_PanelOtherSync:
+        panel_sync_other (panel);
+        break;
+    case CK_Sort:
+        panel_select_sort_order (panel);
+        break;
+    case CK_SortPrev:
+        panel_toggle_sort_order_prev (panel);
+        break;
+    case CK_SortNext:
+        panel_toggle_sort_order_next (panel);
+        break;
+    case CK_SortReverse:
+        panel->sort_info.reverse = !panel->sort_info.reverse;
+        panel_set_sort_order (panel, panel->sort_field);
+        break;
+    case CK_SortByName:
+        panel_set_sort_type_by_id (panel, "name");
+        break;
+    case CK_SortByExt:
+        panel_set_sort_type_by_id (panel, "extension");
+        break;
+    case CK_SortBySize:
+        panel_set_sort_type_by_id (panel, "size");
+        break;
+    case CK_SortByMTime:
+        panel_set_sort_type_by_id (panel, "mtime");
+        break;
+    default:
+        res = MSG_NOT_HANDLED;
+        break;
+    }
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+panel_key (WPanel * panel, int key)
+{
+    long command;
+
+    if (is_abort_char (key))
+    {
+        stop_search (panel);
+        return MSG_HANDLED;
+    }
+
+    if (panel->quick_search.active && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
+    {
+        do_search (panel, key);
+        return MSG_HANDLED;
+    }
+
+    command = widget_lookup_key (WIDGET (panel), key);
+    if (command != CK_IgnoreKey)
+        return panel_execute_cmd (panel, command);
+
+    if (panels_options.torben_fj_mode && key == ALT ('h'))
+    {
+        goto_middle_file (panel);
+        return MSG_HANDLED;
+    }
+
+    if (!command_prompt && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
+    {
+        start_search (panel);
+        do_search (panel, key);
+        return MSG_HANDLED;
+    }
+
+    return MSG_NOT_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+panel_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WPanel *panel = PANEL (w);
+    WDialog *h = DIALOG (w->owner);
+    WButtonBar *bb;
+
+    switch (msg)
+    {
+    case MSG_INIT:
+        /* subscribe to "history_load" event */
+        mc_event_add (h->event_group, MCEVENT_HISTORY_LOAD, panel_load_history, w, NULL);
+        /* subscribe to "history_save" event */
+        mc_event_add (h->event_group, MCEVENT_HISTORY_SAVE, panel_save_history, w, NULL);
+        return MSG_HANDLED;
+
+    case MSG_DRAW:
+        /* Repaint everything, including frame and separator */
+        widget_erase (w);
+        show_dir (panel);
+        panel_print_header (panel);
+        adjust_top_file (panel);
+        paint_dir (panel);
+        mini_info_separator (panel);
+        display_mini_info (panel);
+        panel->dirty = FALSE;
+        return MSG_HANDLED;
+
+    case MSG_FOCUS:
+        state_mark = -1;
+        current_panel = panel;
+        panel->active = TRUE;
+
+        if (mc_chdir (panel->cwd_vpath) != 0)
+        {
+            char *cwd;
+
+            cwd = vfs_path_to_str_flags (panel->cwd_vpath, 0, VPF_STRIP_PASSWORD);
+            cd_error_message (cwd);
+            g_free (cwd);
+        }
+        else
+            subshell_chdir (panel->cwd_vpath);
+
+        update_xterm_title_path ();
+        select_item (panel);
+
+        bb = buttonbar_find (h);
+        midnight_set_buttonbar (bb);
+        widget_draw (WIDGET (bb));
+        return MSG_HANDLED;
+
+    case MSG_UNFOCUS:
+        /* Janne: look at this for the multiple panel options */
+        stop_search (panel);
+        panel->active = FALSE;
+        unselect_item (panel);
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        return panel_key (panel, parm);
+
+    case MSG_ACTION:
+        return panel_execute_cmd (panel, parm);
+
+    case MSG_DESTROY:
+        vfs_stamp_path (panel->cwd_vpath);
+        /* unsubscribe from "history_load" event */
+        mc_event_del (h->event_group, MCEVENT_HISTORY_LOAD, panel_load_history, w);
+        /* unsubscribe from "history_save" event */
+        mc_event_del (h->event_group, MCEVENT_HISTORY_SAVE, panel_save_history, w);
+        panel_destroy (panel);
+        free_my_statfs ();
+        return MSG_HANDLED;
+
+    default:
+        return widget_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*                                     */
+/* Panel mouse events support routines */
+/*                                     */
+
+static void
+mouse_toggle_mark (WPanel * panel)
+{
+    do_mark_file (panel, MARK_DONT_MOVE);
+    mouse_marking = (panel_current_entry (panel)->f.marked != 0);
+    mouse_mark_panel = current_panel;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+mouse_set_mark (WPanel * panel)
+{
+    if (mouse_mark_panel == panel)
+    {
+        const file_entry_t *fe;
+
+        fe = panel_current_entry (panel);
+
+        if (mouse_marking && fe->f.marked == 0)
+            do_mark_file (panel, MARK_DONT_MOVE);
+        else if (!mouse_marking && fe->f.marked != 0)
+            do_mark_file (panel, MARK_DONT_MOVE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+mark_if_marking (WPanel * panel, const mouse_event_t * event, int previous_current)
+{
+    if ((event->buttons & GPM_B_RIGHT) == 0)
+        return;
+
+    if (event->msg == MSG_MOUSE_DOWN)
+        mouse_toggle_mark (panel);
+    else
+    {
+        int pcurr, curr1, curr2;
+
+        pcurr = panel->current;
+        curr1 = MIN (previous_current, panel->current);
+        curr2 = MAX (previous_current, panel->current);
+
+        for (; curr1 <= curr2; curr1++)
+        {
+            panel->current = curr1;
+            mouse_set_mark (panel);
+        }
+
+        panel->current = pcurr;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Determine which column was clicked, and sort the panel on
+ * that column, or reverse sort on that column if already
+ * sorted on that column.
+ */
+
+static void
+mouse_sort_col (WPanel * panel, int x)
+{
+    int i = 0;
+    GSList *format;
+    const char *lc_sort_name = NULL;
+    panel_field_t *col_sort_format = NULL;
+
+    for (format = panel->format; format != NULL; format = g_slist_next (format))
+    {
+        format_item_t *fi = (format_item_t *) format->data;
+
+        i += fi->field_len;
+        if (x < i + 1)
+        {
+            /* found column */
+            lc_sort_name = fi->title;
+            break;
+        }
+    }
+
+    if (lc_sort_name == NULL)
+        return;
+
+    for (i = 0; panel_fields[i].id != NULL; i++)
+    {
+        const char *title;
+
+        title = panel_get_title_without_hotkey (panel_fields[i].title_hotkey);
+        if (panel_fields[i].sort_routine != NULL && strcmp (title, lc_sort_name) == 0)
+        {
+            col_sort_format = &panel_fields[i];
+            break;
+        }
+    }
+
+    if (col_sort_format != NULL)
+    {
+        if (panel->sort_field == col_sort_format)
+            /* reverse the sort if clicked column is already the sorted column */
+            panel->sort_info.reverse = !panel->sort_info.reverse;
+        else
+            /* new sort is forced to be ascending */
+            panel->sort_info.reverse = FALSE;
+
+        panel_set_sort_order (panel, col_sort_format);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+panel_mouse_is_on_item (const WPanel * panel, int y, int x)
+{
+    int lines, col_width, col;
+
+    if (y < 0)
+        return MOUSE_UPPER_FILE_LIST;
+
+    lines = panel_lines (panel);
+    if (y >= lines)
+        return MOUSE_BELOW_FILE_LIST;
+
+    col_width = (CONST_WIDGET (panel)->rect.cols - 2) / panel->list_cols;
+    /* column where mouse is */
+    col = x / col_width;
+
+    y += panel->top + lines * col;
+
+    /* are we below or in the next column of last file? */
+    if (y > panel->dir.len)
+        return MOUSE_AFTER_LAST_FILE;
+
+    /* we are on item of the file file; return an index to select a file */
+    return y;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_mouse_callback (Widget * w, mouse_msg_t msg, mouse_event_t * event)
+{
+    WPanel *panel = PANEL (w);
+    gboolean is_active;
+
+    is_active = widget_is_active (w);
+
+    switch (msg)
+    {
+    case MSG_MOUSE_DOWN:
+        if (event->y == 0)
+        {
+            /* top frame */
+            if (event->x == 1)
+                /* "<" button */
+                directory_history_prev (panel);
+            else if (event->x == w->rect.cols - 2)
+                /* ">" button */
+                directory_history_next (panel);
+            else if (event->x >= w->rect.cols - 5 && event->x <= w->rect.cols - 3)
+                /* "^" button */
+                directory_history_list (panel);
+            else if (event->x == w->rect.cols - 6)
+                /* "." button show/hide hidden files */
+                send_message (filemanager, NULL, MSG_ACTION, CK_ShowHidden, NULL);
+            else
+            {
+                /* no other events on 1st line, return MOU_UNHANDLED */
+                event->result.abort = TRUE;
+                /* avoid extra panel redraw */
+                panel->dirty = FALSE;
+            }
+            break;
+        }
+
+        if (event->y == 1)
+        {
+            /* sort on clicked column */
+            mouse_sort_col (panel, event->x + 1);
+            break;
+        }
+
+        if (!is_active)
+            (void) change_panel ();
+        MC_FALLTHROUGH;
+
+    case MSG_MOUSE_DRAG:
+        {
+            int my_index;
+            int previous_current;
+
+            my_index = panel_mouse_is_on_item (panel, event->y - 2, event->x);
+            previous_current = panel->current;
+
+            switch (my_index)
+            {
+            case MOUSE_UPPER_FILE_LIST:
+                move_up (panel);
+                mark_if_marking (panel, event, previous_current);
+                break;
+
+            case MOUSE_BELOW_FILE_LIST:
+                move_down (panel);
+                mark_if_marking (panel, event, previous_current);
+                break;
+
+            case MOUSE_AFTER_LAST_FILE:
+                break;          /* do nothing */
+
+            default:
+                if (my_index != panel->current)
+                {
+                    unselect_item (panel);
+                    panel->current = my_index;
+                    select_item (panel);
+                }
+
+                mark_if_marking (panel, event, previous_current);
+                break;
+            }
+        }
+        break;
+
+    case MSG_MOUSE_UP:
+        break;
+
+    case MSG_MOUSE_CLICK:
+        if ((event->count & GPM_DOUBLE) != 0 && (event->buttons & GPM_B_LEFT) != 0 &&
+            panel_mouse_is_on_item (panel, event->y - 2, event->x) >= 0)
+            do_enter (panel);
+        break;
+
+    case MSG_MOUSE_MOVE:
+        break;
+
+    case MSG_MOUSE_SCROLL_UP:
+        if (is_active)
+        {
+            if (panels_options.mouse_move_pages && panel->top > 0)
+                prev_page (panel);
+            else                /* We are in first page */
+                move_up (panel);
+        }
+        break;
+
+    case MSG_MOUSE_SCROLL_DOWN:
+        if (is_active)
+        {
+            if (panels_options.mouse_move_pages
+                && panel->top + panel_items (panel) < panel->dir.len)
+                next_page (panel);
+            else                /* We are in last page */
+                move_down (panel);
+        }
+        break;
+
+    default:
+        break;
+    }
+
+    if (panel->dirty)
+        widget_draw (w);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+reload_panelized (WPanel * panel)
+{
+    int i, j;
+    dir_list *list = &panel->dir;
+
+    /* refresh current VFS directory required for vfs_path_from_str() */
+    (void) mc_chdir (panel->cwd_vpath);
+
+    for (i = 0, j = 0; i < list->len; i++)
+    {
+        vfs_path_t *vpath;
+
+        vpath = vfs_path_from_str (list->list[i].fname->str);
+        if (mc_lstat (vpath, &list->list[i].st) != 0)
+            g_string_free (list->list[i].fname, TRUE);
+        else
+        {
+            if (j != i)
+                list->list[j] = list->list[i];
+            j++;
+        }
+        vfs_path_free (vpath, TRUE);
+    }
+    if (j == 0)
+        dir_list_init (list);
+    else
+        list->len = j;
+
+    recalculate_panel_summary (panel);
+
+    if (panel != current_panel)
+        (void) mc_chdir (current_panel->cwd_vpath);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_one_panel_widget (WPanel * panel, panel_update_flags_t flags, const char *current_file)
+{
+    gboolean free_pointer;
+    char *my_current_file = NULL;
+
+    if ((flags & UP_RELOAD) != 0)
+    {
+        panel->is_panelized = FALSE;
+        mc_setctl (panel->cwd_vpath, VFS_SETCTL_FLUSH, NULL);
+        memset (&(panel->dir_stat), 0, sizeof (panel->dir_stat));
+    }
+
+    /* If current_file == -1 (an invalid pointer) then preserve current */
+    free_pointer = current_file == UP_KEEPSEL;
+
+    if (free_pointer)
+    {
+        const GString *fname;
+
+        fname = panel_current_entry (panel)->fname;
+        my_current_file = g_strndup (fname->str, fname->len);
+        current_file = my_current_file;
+    }
+
+    if (panel->is_panelized)
+        reload_panelized (panel);
+    else
+        panel_reload (panel);
+
+    panel_set_current_by_name (panel, current_file);
+    panel->dirty = TRUE;
+
+    if (free_pointer)
+        g_free (my_current_file);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_one_panel (int which, panel_update_flags_t flags, const char *current_file)
+{
+    if (get_panel_type (which) == view_listing)
+    {
+        WPanel *panel;
+
+        panel = PANEL (get_panel_widget (which));
+        if (panel->is_panelized)
+            flags &= ~UP_RELOAD;
+        update_one_panel_widget (panel, flags, current_file);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_set_current (WPanel * panel, int i)
+{
+    if (i != panel->current)
+    {
+        panel->dirty = TRUE;
+        panel->current = i;
+        panel->top = panel->current - (WIDGET (panel)->rect.lines - 2) / 2;
+        if (panel->top < 0)
+            panel->top = 0;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* event callback */
+static gboolean
+event_update_panels (const gchar * event_group_name, const gchar * event_name,
+                     gpointer init_data, gpointer data)
+{
+    (void) event_group_name;
+    (void) event_name;
+    (void) init_data;
+    (void) data;
+
+    update_panels (UP_RELOAD, UP_KEEPSEL);
+
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* event callback */
+static gboolean
+panel_save_current_file_to_clip_file (const gchar * event_group_name, const gchar * event_name,
+                                      gpointer init_data, gpointer data)
+{
+    (void) event_group_name;
+    (void) event_name;
+    (void) init_data;
+    (void) data;
+
+    if (current_panel->marked == 0)
+        mc_event_raise (MCEVENT_GROUP_CORE, "clipboard_text_to_file",
+                        (gpointer) panel_current_entry (current_panel)->fname->str);
+    else
+    {
+        int i;
+        gboolean first = TRUE;
+        char *flist = NULL;
+
+        for (i = 0; i < current_panel->dir.len; i++)
+        {
+            const file_entry_t *fe = &current_panel->dir.list[i];
+
+            if (fe->f.marked != 0)
+            {                   /* Skip the unmarked ones */
+                if (first)
+                {
+                    flist = g_strndup (fe->fname->str, fe->fname->len);
+                    first = FALSE;
+                }
+                else
+                {
+                    /* Add empty lines after the file */
+                    char *tmp;
+
+                    tmp = g_strconcat (flist, "\n", fe->fname->str, (char *) NULL);
+                    g_free (flist);
+                    flist = tmp;
+                }
+            }
+        }
+
+        mc_event_raise (MCEVENT_GROUP_CORE, "clipboard_text_to_file", (gpointer) flist);
+        g_free (flist);
+    }
+    return TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static vfs_path_t *
+panel_recursive_cd_to_parent (const vfs_path_t * vpath)
+{
+    vfs_path_t *cwd_vpath;
+
+    cwd_vpath = vfs_path_clone (vpath);
+
+    while (mc_chdir (cwd_vpath) < 0)
+    {
+        const char *panel_cwd_path;
+        vfs_path_t *tmp_vpath;
+
+        /* check if path contains only '/' */
+        panel_cwd_path = vfs_path_as_str (cwd_vpath);
+        if (panel_cwd_path != NULL && IS_PATH_SEP (panel_cwd_path[0]) && panel_cwd_path[1] == '\0')
+        {
+            vfs_path_free (cwd_vpath, TRUE);
+            return NULL;
+        }
+
+        tmp_vpath = vfs_path_vtokens_get (cwd_vpath, 0, -1);
+        vfs_path_free (cwd_vpath, TRUE);
+        cwd_vpath =
+            vfs_path_build_filename (PATH_SEP_STR, vfs_path_as_str (tmp_vpath), (char *) NULL);
+        vfs_path_free (tmp_vpath, TRUE);
+    }
+
+    return cwd_vpath;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panel_dir_list_callback (dir_list_cb_state_t state, void *data)
+{
+    static int count = 0;
+
+    (void) data;
+
+    switch (state)
+    {
+    case DIR_OPEN:
+        count = 0;
+        break;
+
+    case DIR_READ:
+        count++;
+        if ((count & 15) == 0)
+            rotate_dash (TRUE);
+        break;
+
+    case DIR_CLOSE:
+        rotate_dash (FALSE);
+        break;
+
+    default:
+        g_assert_not_reached ();
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_set_current_by_name (WPanel * panel, const char *name)
+{
+    int i;
+    char *subdir;
+
+    if (name == NULL)
+    {
+        panel_set_current (panel, 0);
+        return;
+    }
+
+    /* We only want the last component of the directory,
+     * and from this only the name without suffix.
+     * Cut prefix if the panel is not panelized */
+    if (panel->is_panelized)
+        subdir = vfs_strip_suffix_from_filename (name);
+    else
+        subdir = vfs_strip_suffix_from_filename (x_basename (name));
+
+    /* Search that subdir or filename without prefix (if not panelized panel),
+       make it current if found */
+    for (i = 0; i < panel->dir.len; i++)
+        if (strcmp (subdir, panel->dir.list[i].fname->str) == 0)
+        {
+            panel_set_current (panel, i);
+            g_free (subdir);
+            return;
+        }
+
+    /* Make current near the filee that is missing */
+    if (panel->current >= panel->dir.len)
+        panel_set_current (panel, panel->dir.len - 1);
+    g_free (subdir);
+
+    select_item (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_clean_dir (WPanel * panel)
+{
+    panel->top = 0;
+    panel->current = 0;
+    panel->marked = 0;
+    panel->dirs_marked = 0;
+    panel->total = 0;
+    panel->quick_search.active = FALSE;
+    panel->is_panelized = FALSE;
+    panel->dirty = TRUE;
+    panel->content_shift = -1;
+    panel->max_shift = -1;
+
+    dir_list_free_list (&panel->dir);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Set Up panel's current dir object
+ *
+ * @param panel panel object
+ * @param path_str string contain path
+ */
+
+void
+panel_set_cwd (WPanel * panel, const vfs_path_t * vpath)
+{
+    if (vpath != panel->cwd_vpath)      /* check if new vpath is not the panel->cwd_vpath object */
+    {
+        vfs_path_free (panel->cwd_vpath, TRUE);
+        panel->cwd_vpath = vfs_path_clone (vpath);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Set Up panel's last working dir object
+ *
+ * @param panel panel object
+ * @param path_str string contain path
+ */
+
+void
+panel_set_lwd (WPanel * panel, const vfs_path_t * vpath)
+{
+    if (vpath != panel->lwd_vpath)      /* check if new vpath is not the panel->lwd_vpath object */
+    {
+        vfs_path_free (panel->lwd_vpath, TRUE);
+        panel->lwd_vpath = vfs_path_clone (vpath);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Creatie an empty panel with specified size.
+ *
+ * @param panel_name name of panel for setup receiving
+ *
+ * @return new instance of WPanel
+ */
+
+WPanel *
+panel_sized_empty_new (const char *panel_name, int y, int x, int lines, int cols)
+{
+    WRect r = { y, x, lines, cols };
+    WPanel *panel;
+    Widget *w;
+    char *section;
+    int i, err;
+
+    panel = g_new0 (WPanel, 1);
+    w = WIDGET (panel);
+    widget_init (w, &r, panel_callback, panel_mouse_callback);
+    w->options |= WOP_SELECTABLE | WOP_TOP_SELECT;
+    w->keymap = panel_map;
+
+    panel->dir.size = DIR_LIST_MIN_SIZE;
+    panel->dir.list = g_new (file_entry_t, panel->dir.size);
+    panel->dir.len = 0;
+    panel->dir.callback = panel_dir_list_callback;
+
+    panel->list_cols = 1;
+    panel->brief_cols = 2;
+    panel->dirty = TRUE;
+    panel->content_shift = -1;
+    panel->max_shift = -1;
+
+    panel->list_format = list_full;
+    panel->user_format = g_strdup (DEFAULT_USER_FORMAT);
+
+    panel->filter.flags = FILE_FILTER_DEFAULT_FLAGS;
+
+    for (i = 0; i < LIST_FORMATS; i++)
+        panel->user_status_format[i] = g_strdup (DEFAULT_USER_FORMAT);
+
+#ifdef HAVE_CHARSET
+    panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
+#endif
+
+    panel->frame_size = frame_half;
+
+    panel->quick_search.buffer = g_string_sized_new (MC_MAXFILENAMELEN);
+    panel->quick_search.prev_buffer = g_string_sized_new (MC_MAXFILENAMELEN);
+
+    panel->name = g_strdup (panel_name);
+    panel->dir_history.name = g_strconcat ("Dir Hist ", panel->name, (char *) NULL);
+    /* directories history will be get later */
+
+    section = g_strconcat ("Temporal:", panel->name, (char *) NULL);
+    if (!mc_config_has_group (mc_global.main_config, section))
+    {
+        g_free (section);
+        section = g_strdup (panel->name);
+    }
+    panel_load_setup (panel, section);
+    g_free (section);
+
+    if (panel->filter.value != NULL)
+    {
+        gboolean case_sens = (panel->filter.flags & SELECT_MATCH_CASE) != 0;
+        gboolean shell_patterns = (panel->filter.flags & SELECT_SHELL_PATTERNS) != 0;
+
+        panel->filter.handler = mc_search_new (panel->filter.value, NULL);
+        panel->filter.handler->search_type = shell_patterns ? MC_SEARCH_T_GLOB : MC_SEARCH_T_REGEX;
+        panel->filter.handler->is_entire_line = TRUE;
+        panel->filter.handler->is_case_sensitive = case_sens;
+
+        /* FIXME: silent check -- do not display an error message */
+        if (!mc_search_prepare (panel->filter.handler))
+            file_filter_clear (&panel->filter);
+    }
+
+    /* Load format strings */
+    err = set_panel_formats (panel);
+    if (err != 0)
+        set_panel_formats (panel);
+
+    return panel;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Panel creation for specified size and directory.
+ *
+ * @param panel_name name of panel for setup retrieving
+ * @param y y coordinate of top-left corner
+ * @param x x coordinate of top-left corner
+ * @param lines vertical size
+ * @param cols horizontal size
+ * @param vpath working panel directory. If NULL then current directory is used
+ *
+ * @return new instance of WPanel
+ */
+
+WPanel *
+panel_sized_with_dir_new (const char *panel_name, int y, int x, int lines, int cols,
+                          const vfs_path_t * vpath)
+{
+    WPanel *panel;
+    char *curdir = NULL;
+#ifdef HAVE_CHARSET
+    const vfs_path_element_t *path_element;
+#endif
+
+    panel = panel_sized_empty_new (panel_name, y, x, lines, cols);
+
+    if (vpath != NULL)
+    {
+        curdir = vfs_get_cwd ();
+        panel_set_cwd (panel, vpath);
+    }
+    else
+    {
+        vfs_setup_cwd ();
+        panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
+    }
+
+    panel_set_lwd (panel, vfs_get_raw_current_dir ());
+
+#ifdef HAVE_CHARSET
+    path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
+    if (path_element->encoding != NULL)
+        panel->codepage = get_codepage_index (path_element->encoding);
+#endif
+
+    if (mc_chdir (panel->cwd_vpath) != 0)
+    {
+#ifdef HAVE_CHARSET
+        panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
+#endif
+        vfs_setup_cwd ();
+        vfs_path_free (panel->cwd_vpath, TRUE);
+        panel->cwd_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
+    }
+
+    /* Load the default format */
+    if (!dir_list_load (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
+                        &panel->sort_info, &panel->filter))
+        message (D_ERROR, MSG_ERROR, _("Cannot read directory contents"));
+
+    /* Restore old right path */
+    if (curdir != NULL)
+    {
+        vfs_path_t *tmp_vpath;
+        int err;
+
+        tmp_vpath = vfs_path_from_str (curdir);
+        mc_chdir (tmp_vpath);
+        vfs_path_free (tmp_vpath, TRUE);
+        (void) err;
+    }
+    g_free (curdir);
+
+    return panel;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_reload (WPanel * panel)
+{
+    struct stat current_stat;
+    vfs_path_t *cwd_vpath;
+
+    if (panels_options.fast_reload && stat (vfs_path_as_str (panel->cwd_vpath), &current_stat) == 0
+        && current_stat.st_ctime == panel->dir_stat.st_ctime
+        && current_stat.st_mtime == panel->dir_stat.st_mtime)
+        return;
+
+    cwd_vpath = panel_recursive_cd_to_parent (panel->cwd_vpath);
+    vfs_path_free (panel->cwd_vpath, TRUE);
+
+    if (cwd_vpath == NULL)
+    {
+        panel->cwd_vpath = vfs_path_from_str (PATH_SEP_STR);
+        panel_clean_dir (panel);
+        dir_list_init (&panel->dir);
+        return;
+    }
+
+    panel->cwd_vpath = cwd_vpath;
+    memset (&(panel->dir_stat), 0, sizeof (panel->dir_stat));
+    show_dir (panel);
+
+    if (!dir_list_reload (&panel->dir, panel->cwd_vpath, panel->sort_field->sort_routine,
+                          &panel->sort_info, &panel->filter))
+        message (D_ERROR, MSG_ERROR, _("Cannot read directory contents"));
+
+    panel->dirty = TRUE;
+    if (panel->current >= panel->dir.len)
+        panel_set_current (panel, panel->dir.len - 1);
+
+    recalculate_panel_summary (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/* Switches the panel to the mode specified in the format           */
+/* Setting up both format and status string. Return: 0 - on success; */
+/* 1 - format error; 2 - status error; 3 - errors in both formats.  */
+
+int
+set_panel_formats (WPanel * p)
+{
+    GSList *form;
+    char *err = NULL;
+    int retcode = 0;
+
+    form = use_display_format (p, panel_format (p), &err, FALSE);
+
+    if (err != NULL)
+    {
+        g_free (err);
+        retcode = 1;
+    }
+    else
+    {
+        g_slist_free_full (p->format, (GDestroyNotify) format_item_free);
+        p->format = form;
+    }
+
+    if (panels_options.show_mini_info)
+    {
+        form = use_display_format (p, mini_status_format (p), &err, TRUE);
+
+        if (err != NULL)
+        {
+            g_free (err);
+            retcode += 2;
+        }
+        else
+        {
+            g_slist_free_full (p->status_format, (GDestroyNotify) format_item_free);
+            p->status_format = form;
+        }
+    }
+
+    panel_update_cols (WIDGET (p), p->frame_size);
+
+    if (retcode)
+        message (D_ERROR, _("Warning"),
+                 _("User supplied format looks invalid, reverting to default."));
+    if (retcode & 0x01)
+    {
+        g_free (p->user_format);
+        p->user_format = g_strdup (DEFAULT_USER_FORMAT);
+    }
+    if (retcode & 0x02)
+    {
+        g_free (p->user_status_format[p->list_format]);
+        p->user_status_format[p->list_format] = g_strdup (DEFAULT_USER_FORMAT);
+    }
+
+    return retcode;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_set_filter (WPanel * panel, const file_filter_t * filter)
+{
+    MC_PTR_FREE (panel->filter.value);
+    mc_search_free (panel->filter.handler);
+    panel->filter.handler = NULL;
+
+    /* NULL to clear filter */
+    if (filter != NULL)
+        panel->filter = *filter;
+
+    reread_cmd ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/* Select current item and readjust the panel */
+void
+select_item (WPanel * panel)
+{
+    adjust_top_file (panel);
+
+    panel->dirty = TRUE;
+
+    execute_hooks (select_file_hook);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Clears all files in the panel, used only when one file was marked */
+void
+unmark_files (WPanel * panel)
+{
+    if (panel->marked != 0)
+    {
+        int i;
+
+        for (i = 0; i < panel->dir.len; i++)
+            file_mark (panel, i, 0);
+
+        panel->dirs_marked = 0;
+        panel->marked = 0;
+        panel->total = 0;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Recalculate the panels summary information, used e.g. when marked
+   files might have been removed by an external command */
+
+void
+recalculate_panel_summary (WPanel * panel)
+{
+    int i;
+
+    panel->marked = 0;
+    panel->dirs_marked = 0;
+    panel->total = 0;
+
+    for (i = 0; i < panel->dir.len; i++)
+        if (panel->dir.list[i].f.marked != 0)
+        {
+            /* do_file_mark will return immediately if newmark == oldmark.
+               So we have to first unmark it to get panel's summary information
+               updated. (Norbert) */
+            panel->dir.list[i].f.marked = 0;
+            do_file_mark (panel, i, 1);
+        }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** This routine marks a file or a directory */
+
+void
+do_file_mark (WPanel * panel, int idx, int mark)
+{
+    if (panel->dir.list[idx].f.marked == mark)
+        return;
+
+    /* Only '..' can't be marked, '.' isn't visible */
+    if (DIR_IS_DOTDOT (panel->dir.list[idx].fname->str))
+        return;
+
+    file_mark (panel, idx, mark);
+    if (panel->dir.list[idx].f.marked != 0)
+    {
+        panel->marked++;
+
+        if (S_ISDIR (panel->dir.list[idx].st.st_mode))
+        {
+            if (panel->dir.list[idx].f.dir_size_computed != 0)
+                panel->total += (uintmax_t) panel->dir.list[idx].st.st_size;
+            panel->dirs_marked++;
+        }
+        else
+            panel->total += (uintmax_t) panel->dir.list[idx].st.st_size;
+
+        set_colors (panel);
+    }
+    else
+    {
+        if (S_ISDIR (panel->dir.list[idx].st.st_mode))
+        {
+            if (panel->dir.list[idx].f.dir_size_computed != 0)
+                panel->total -= (uintmax_t) panel->dir.list[idx].st.st_size;
+            panel->dirs_marked--;
+        }
+        else
+            panel->total -= (uintmax_t) panel->dir.list[idx].st.st_size;
+
+        panel->marked--;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Changes the current directory of the panel.
+ * Record change in the directory history.
+ */
+gboolean
+panel_do_cd (WPanel * panel, const vfs_path_t * new_dir_vpath, enum cd_enum cd_type)
+{
+    gboolean r;
+
+    r = panel_do_cd_int (panel, new_dir_vpath, cd_type);
+    if (r)
+        directory_history_add (panel, panel->cwd_vpath);
+    return r;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+file_mark (WPanel * panel, int lc_index, int val)
+{
+    if (panel->dir.list[lc_index].f.marked != val)
+    {
+        panel->dir.list[lc_index].f.marked = val;
+        panel->dirty = TRUE;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_re_sort (WPanel * panel)
+{
+    char *filename;
+    const file_entry_t *fe;
+    int i;
+
+    if (panel == NULL)
+        return;
+
+    fe = panel_current_entry (panel);
+    filename = g_strndup (fe->fname->str, fe->fname->len);
+    unselect_item (panel);
+    dir_list_sort (&panel->dir, panel->sort_field->sort_routine, &panel->sort_info);
+    panel->current = -1;
+
+    for (i = panel->dir.len; i != 0; i--)
+        if (strcmp (panel->dir.list[i - 1].fname->str, filename) == 0)
+        {
+            panel->current = i - 1;
+            break;
+        }
+
+    g_free (filename);
+    panel->top = panel->current - panel_items (panel) / 2;
+    select_item (panel);
+    panel->dirty = TRUE;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_set_sort_order (WPanel * panel, const panel_field_t * sort_order)
+{
+    if (sort_order == NULL)
+        return;
+
+    panel->sort_field = sort_order;
+
+    /* The directory is already sorted, we have to load the unsorted stuff */
+    if (sort_order->sort_routine == (GCompareFunc) unsorted)
+    {
+        char *current_file;
+        const GString *fname;
+
+        fname = panel_current_entry (panel)->fname;
+        current_file = g_strndup (fname->str, fname->len);
+        panel_reload (panel);
+        panel_set_current_by_name (panel, current_file);
+        g_free (current_file);
+    }
+    panel_re_sort (panel);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#ifdef HAVE_CHARSET
+
+/**
+ * Change panel encoding.
+ * @param panel WPanel object
+ */
+
+void
+panel_change_encoding (WPanel * panel)
+{
+    const char *encoding = NULL;
+    char *errmsg;
+    int r;
+
+    r = select_charset (-1, -1, panel->codepage, FALSE);
+
+    if (r == SELECT_CHARSET_CANCEL)
+        return;                 /* Cancel */
+
+    panel->codepage = r;
+
+    if (panel->codepage == SELECT_CHARSET_NO_TRANSLATE)
+    {
+        /* No translation */
+        vfs_path_t *cd_path_vpath;
+
+        g_free (init_translation_table (mc_global.display_codepage, mc_global.display_codepage));
+        cd_path_vpath = remove_encoding_from_path (panel->cwd_vpath);
+        panel_do_cd (panel, cd_path_vpath, cd_parse_command);
+        show_dir (panel);
+        vfs_path_free (cd_path_vpath, TRUE);
+        return;
+    }
+
+    errmsg = init_translation_table (panel->codepage, mc_global.display_codepage);
+    if (errmsg != NULL)
+    {
+        message (D_ERROR, MSG_ERROR, "%s", errmsg);
+        g_free (errmsg);
+        return;
+    }
+
+    encoding = get_codepage_id (panel->codepage);
+    if (encoding != NULL)
+    {
+        vfs_path_change_encoding (panel->cwd_vpath, encoding);
+
+        if (!panel_do_cd (panel, panel->cwd_vpath, cd_parse_command))
+            cd_error_message (vfs_path_as_str (panel->cwd_vpath));
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Remove encode info from last path element.
+ *
+ */
+vfs_path_t *
+remove_encoding_from_path (const vfs_path_t * vpath)
+{
+    vfs_path_t *ret_vpath;
+    GString *tmp_conv;
+    int indx;
+
+    ret_vpath = vfs_path_new (FALSE);
+
+    tmp_conv = g_string_new ("");
+
+    for (indx = 0; indx < vfs_path_elements_count (vpath); indx++)
+    {
+        GIConv converter;
+        vfs_path_element_t *path_element;
+
+        path_element = vfs_path_element_clone (vfs_path_get_by_index (vpath, indx));
+
+        if (path_element->encoding == NULL)
+        {
+            vfs_path_add_element (ret_vpath, path_element);
+            continue;
+        }
+
+        converter = str_crt_conv_to (path_element->encoding);
+        if (converter == INVALID_CONV)
+        {
+            vfs_path_add_element (ret_vpath, path_element);
+            continue;
+        }
+
+        MC_PTR_FREE (path_element->encoding);
+
+        str_vfs_convert_from (converter, path_element->path, tmp_conv);
+
+        g_free (path_element->path);
+        path_element->path = g_strndup (tmp_conv->str, tmp_conv->len);
+
+        g_string_set_size (tmp_conv, 0);
+
+        str_close_conv (converter);
+        str_close_conv (path_element->dir.converter);
+        path_element->dir.converter = INVALID_CONV;
+        vfs_path_add_element (ret_vpath, path_element);
+    }
+    g_string_free (tmp_conv, TRUE);
+    return ret_vpath;
+}
+#endif /* HAVE_CHARSET */
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * This routine reloads the directory in both panels. It tries to
+ * select current_file in current_panel and other_file in other_panel.
+ * If current_file == -1 then it automatically sets current_file and
+ * other_file to the current files in the panels.
+ *
+ * If flags has the UP_ONLY_CURRENT bit toggled on, then it
+ * will not reload the other panel.
+ *
+ * @param flags for reload panel
+ * @param current_file name of the current file
+ */
+
+void
+update_panels (panel_update_flags_t flags, const char *current_file)
+{
+    WPanel *panel;
+
+    /* first, update other panel... */
+    if ((flags & UP_ONLY_CURRENT) == 0)
+        update_one_panel (get_other_index (), flags, UP_KEEPSEL);
+    /* ...then current one */
+    update_one_panel (get_current_index (), flags, current_file);
+
+    if (get_current_type () == view_listing)
+        panel = PANEL (get_panel_widget (get_current_index ()));
+    else
+        panel = PANEL (get_panel_widget (get_other_index ()));
+
+    if (!panel->is_panelized)
+        (void) mc_chdir (panel->cwd_vpath);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gsize
+panel_get_num_of_sortable_fields (void)
+{
+    gsize ret = 0, lc_index;
+
+    for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
+        if (panel_fields[lc_index].is_user_choice)
+            ret++;
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+char **
+panel_get_sortable_fields (gsize * array_size)
+{
+    char **ret;
+    gsize lc_index, i;
+
+    lc_index = panel_get_num_of_sortable_fields ();
+
+    ret = g_try_new0 (char *, lc_index + 1);
+    if (ret == NULL)
+        return NULL;
+
+    if (array_size != NULL)
+        *array_size = lc_index;
+
+    lc_index = 0;
+
+    for (i = 0; panel_fields[i].id != NULL; i++)
+        if (panel_fields[i].is_user_choice)
+            ret[lc_index++] = g_strdup (_(panel_fields[i].title_hotkey));
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const panel_field_t *
+panel_get_field_by_id (const char *name)
+{
+    gsize lc_index;
+
+    for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
+        if (panel_fields[lc_index].id != NULL && strcmp (name, panel_fields[lc_index].id) == 0)
+            return &panel_fields[lc_index];
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const panel_field_t *
+panel_get_field_by_title_hotkey (const char *name)
+{
+    gsize lc_index;
+
+    for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
+        if (panel_fields[lc_index].title_hotkey != NULL &&
+            strcmp (name, _(panel_fields[lc_index].title_hotkey)) == 0)
+            return &panel_fields[lc_index];
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+const panel_field_t *
+panel_get_field_by_title (const char *name)
+{
+    gsize lc_index;
+
+    for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
+    {
+        const char *title;
+
+        title = panel_get_title_without_hotkey (panel_fields[lc_index].title_hotkey);
+        if (strcmp (title, name) == 0)
+            return &panel_fields[lc_index];
+    }
+
+    return NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gsize
+panel_get_num_of_user_possible_fields (void)
+{
+    gsize ret = 0, lc_index;
+
+    for (lc_index = 0; panel_fields[lc_index].id != NULL; lc_index++)
+        if (panel_fields[lc_index].use_in_user_format)
+            ret++;
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+char **
+panel_get_user_possible_fields (gsize * array_size)
+{
+    char **ret;
+    gsize lc_index, i;
+
+    lc_index = panel_get_num_of_user_possible_fields ();
+
+    ret = g_try_new0 (char *, lc_index + 1);
+    if (ret == NULL)
+        return NULL;
+
+    if (array_size != NULL)
+        *array_size = lc_index;
+
+    lc_index = 0;
+
+    for (i = 0; panel_fields[i].id != NULL; i++)
+        if (panel_fields[i].use_in_user_format)
+            ret[lc_index++] = g_strdup (_(panel_fields[i].title_hotkey));
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_panelize_cd (void)
+{
+    WPanel *panel;
+    int i;
+    dir_list *list;
+    panelized_descr_t *pdescr;
+    dir_list *plist;
+    gboolean panelized_same;
+
+    if (!SELECTED_IS_PANEL)
+        create_panel (MENU_PANEL_IDX, view_listing);
+
+    panel = PANEL (get_panel_widget (MENU_PANEL_IDX));
+
+    dir_list_clean (&panel->dir);
+
+    if (panel->panelized_descr == NULL)
+        panel->panelized_descr = panelized_descr_new ();
+
+    pdescr = panel->panelized_descr;
+    plist = &pdescr->list;
+
+    if (pdescr->root_vpath == NULL)
+        panel_panelize_change_root (panel, panel->cwd_vpath);
+
+    if (plist->len < 1)
+        dir_list_init (plist);
+    else if (plist->len > panel->dir.size)
+        dir_list_grow (&panel->dir, plist->len - panel->dir.size);
+
+    list = &panel->dir;
+    list->len = plist->len;
+
+    panelized_same = vfs_path_equal (pdescr->root_vpath, panel->cwd_vpath);
+
+    for (i = 0; i < plist->len; i++)
+    {
+        if (panelized_same || DIR_IS_DOTDOT (plist->list[i].fname->str))
+            list->list[i].fname = mc_g_string_dup (plist->list[i].fname);
+        else
+        {
+            vfs_path_t *tmp_vpath;
+
+            tmp_vpath =
+                vfs_path_append_new (pdescr->root_vpath, plist->list[i].fname->str, (char *) NULL);
+            list->list[i].fname = g_string_new (vfs_path_as_str (tmp_vpath));
+            vfs_path_free (tmp_vpath, TRUE);
+        }
+        list->list[i].f.link_to_dir = plist->list[i].f.link_to_dir;
+        list->list[i].f.stale_link = plist->list[i].f.stale_link;
+        list->list[i].f.dir_size_computed = plist->list[i].f.dir_size_computed;
+        list->list[i].f.marked = plist->list[i].f.marked;
+        list->list[i].st = plist->list[i].st;
+        list->list[i].name_sort_key = plist->list[i].name_sort_key;
+        list->list[i].extension_sort_key = plist->list[i].extension_sort_key;
+    }
+
+    panel->is_panelized = TRUE;
+    panel_panelize_absolutize_if_needed (panel);
+
+    panel_set_current_by_name (panel, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Change root directory of panelized content.
+ * @param panel file panel
+ * @param new_root new path
+ */
+void
+panel_panelize_change_root (WPanel * panel, const vfs_path_t * new_root)
+{
+    if (panel->panelized_descr == NULL)
+        panel->panelized_descr = panelized_descr_new ();
+    else
+        vfs_path_free (panel->panelized_descr->root_vpath, TRUE);
+
+    panel->panelized_descr->root_vpath = vfs_path_clone (new_root);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+ * Conditionally switches a panel's directory to "/" (root).
+ *
+ * If a panelized panel's listing contain absolute paths, this function
+ * sets the panel's directory to "/". Otherwise it does nothing.
+ *
+ * Rationale:
+ *
+ * This makes tokenized strings like "%d/%p" work. This also makes other
+ * places work where such naive concatenation is done in code (e.g., when
+ * pressing ctrl+shift+enter, for CK_PutCurrentFullSelected).
+ *
+ * When to call:
+ *
+ * You should always call this function after you populate the listing
+ * of a panelized panel.
+ */
+void
+panel_panelize_absolutize_if_needed (WPanel * panel)
+{
+    const dir_list *const list = &panel->dir;
+
+    /* Note: We don't support mixing of absolute and relative paths, which is
+     * why it's ok for us to check only the 1st entry. */
+    if (list->len > 1 && g_path_is_absolute (list->list[1].fname->str))
+    {
+        vfs_path_t *root;
+
+        root = vfs_path_from_str (PATH_SEP_STR);
+        panel_set_cwd (panel, root);
+        if (panel == current_panel)
+            mc_chdir (root);
+        vfs_path_free (root, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_panelize_save (WPanel * panel)
+{
+    int i;
+    dir_list *list = &panel->dir;
+    dir_list *plist;
+
+    panel_panelize_change_root (panel, panel->cwd_vpath);
+
+    plist = &panel->panelized_descr->list;
+
+    if (plist->len > 0)
+        dir_list_clean (plist);
+    if (panel->dir.len == 0)
+        return;
+
+    if (panel->dir.len > plist->size)
+        dir_list_grow (plist, panel->dir.len - plist->size);
+    plist->len = panel->dir.len;
+
+    for (i = 0; i < panel->dir.len; i++)
+    {
+        plist->list[i].fname = mc_g_string_dup (list->list[i].fname);
+        plist->list[i].f.link_to_dir = list->list[i].f.link_to_dir;
+        plist->list[i].f.stale_link = list->list[i].f.stale_link;
+        plist->list[i].f.dir_size_computed = list->list[i].f.dir_size_computed;
+        plist->list[i].f.marked = list->list[i].f.marked;
+        plist->list[i].st = list->list[i].st;
+        plist->list[i].name_sort_key = list->list[i].name_sort_key;
+        plist->list[i].extension_sort_key = list->list[i].extension_sort_key;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_init (void)
+{
+    panel_sort_up_char = mc_skin_get ("widget-panel", "sort-up-char", "'");
+    panel_sort_down_char = mc_skin_get ("widget-panel", "sort-down-char", ".");
+    panel_hiddenfiles_show_char = mc_skin_get ("widget-panel", "hiddenfiles-show-char", ".");
+    panel_hiddenfiles_hide_char = mc_skin_get ("widget-panel", "hiddenfiles-hide-char", ".");
+    panel_history_prev_item_char = mc_skin_get ("widget-panel", "history-prev-item-char", "<");
+    panel_history_next_item_char = mc_skin_get ("widget-panel", "history-next-item-char", ">");
+    panel_history_show_list_char = mc_skin_get ("widget-panel", "history-show-list-char", "^");
+    panel_filename_scroll_left_char =
+        mc_skin_get ("widget-panel", "filename-scroll-left-char", "{");
+    panel_filename_scroll_right_char =
+        mc_skin_get ("widget-panel", "filename-scroll-right-char", "}");
+
+    string_file_name_buffer = g_string_sized_new (MC_MAXFILENAMELEN);
+
+    mc_event_add (MCEVENT_GROUP_FILEMANAGER, "update_panels", event_update_panels, NULL, NULL);
+    mc_event_add (MCEVENT_GROUP_FILEMANAGER, "panel_save_current_file_to_clip_file",
+                  panel_save_current_file_to_clip_file, NULL, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+panel_deinit (void)
+{
+    g_free (panel_sort_up_char);
+    g_free (panel_sort_down_char);
+    g_free (panel_hiddenfiles_show_char);
+    g_free (panel_hiddenfiles_hide_char);
+    g_free (panel_history_prev_item_char);
+    g_free (panel_history_next_item_char);
+    g_free (panel_history_show_list_char);
+    g_free (panel_filename_scroll_left_char);
+    g_free (panel_filename_scroll_right_char);
+    g_string_free (string_file_name_buffer, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+gboolean
+panel_cd (WPanel * panel, const vfs_path_t * new_dir_vpath, enum cd_enum exact)
+{
+    gboolean res;
+    const vfs_path_t *_new_dir_vpath = new_dir_vpath;
+
+    if (panel->is_panelized)
+    {
+        size_t new_vpath_len;
+
+        new_vpath_len = vfs_path_len (new_dir_vpath);
+        if (vfs_path_equal_len (new_dir_vpath, panel->panelized_descr->root_vpath, new_vpath_len))
+            _new_dir_vpath = panel->panelized_descr->root_vpath;
+    }
+
+    res = panel_do_cd (panel, _new_dir_vpath, exact);
+
+#ifdef HAVE_CHARSET
+    if (res)
+    {
+        const vfs_path_element_t *path_element;
+
+        path_element = vfs_path_get_by_index (panel->cwd_vpath, -1);
+        if (path_element->encoding != NULL)
+            panel->codepage = get_codepage_index (path_element->encoding);
+        else
+            panel->codepage = SELECT_CHARSET_NO_TRANSLATE;
+    }
+#endif /* HAVE_CHARSET */
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/panel.h b/src/filemanager/panel.h
new file mode 100644
index 0000000..5bfc36c
--- /dev/null
+++ b/src/filemanager/panel.h
@@ -0,0 +1,285 @@
+/** \file panel.h
+ *  \brief Header: defines WPanel structure
+ */
+
+#ifndef MC__PANEL_H
+#define MC__PANEL_H
+
+#include <inttypes.h>           /* uintmax_t */
+#include <limits.h>             /* MB_LEN_MAX */
+
+#include "lib/global.h"         /* gboolean */
+#include "lib/fs.h"             /* MC_MAXPATHLEN */
+#include "lib/strutil.h"
+#include "lib/widget.h"         /* Widget */
+#include "lib/filehighlight.h"
+#include "lib/file-entry.h"
+
+#include "dir.h"                /* dir_list */
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+#define PANEL(x) ((WPanel *)(x))
+#define DEFAULT_USER_FORMAT "half type name | size | perm"
+
+#define LIST_FORMATS 4
+
+#define UP_KEEPSEL ((char *) -1)
+
+/*** enums ***************************************************************************************/
+
+typedef enum
+{
+    list_full,                  /* Name, size, perm/date */
+    list_brief,                 /* Name */
+    list_long,                  /* Like ls -l */
+    list_user                   /* User defined */
+} list_format_t;
+
+typedef enum
+{
+    frame_full,                 /* full screen frame */
+    frame_half                  /* half screen frame */
+} panel_display_t;
+
+typedef enum
+{
+    UP_OPTIMIZE = 0,
+    UP_RELOAD = 1,
+    UP_ONLY_CURRENT = 2
+} panel_update_flags_t;
+
+/* run mode and params */
+enum cd_enum
+{
+    cd_parse_command,
+    cd_exact
+};
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+typedef struct panel_field_struct
+{
+    const char *id;
+    int min_size;
+    gboolean expands;
+    align_crt_t default_just;
+    const char *hotkey;
+    const char *title_hotkey;
+    gboolean is_user_choice;
+    gboolean use_in_user_format;
+    const char *(*string_fn) (file_entry_t *, int);
+    GCompareFunc sort_routine;  /* used by mouse_sort_col() */
+} panel_field_t;
+
+typedef struct
+{
+    dir_list list;
+    vfs_path_t *root_vpath;
+} panelized_descr_t;
+
+typedef struct
+{
+    Widget widget;
+
+    char *name;                 /* The panel name */
+
+    panel_display_t frame_size; /* half or full frame */
+
+    gboolean active;            /* If panel is currently selected */
+    gboolean dirty;             /* Should we redisplay the panel? */
+
+    gboolean is_panelized;      /* Panelization: special mode, can't reload the file list */
+    panelized_descr_t *panelized_descr; /* Panelization descriptor */
+
+#ifdef HAVE_CHARSET
+    int codepage;               /* Panel codepage */
+#endif
+
+    dir_list dir;               /* Directory contents */
+    struct stat dir_stat;       /* Stat of current dir: used by execute () */
+
+    vfs_path_t *cwd_vpath;      /* Current Working Directory */
+    vfs_path_t *lwd_vpath;      /* Last Working Directory */
+
+    list_format_t list_format;  /* Listing type */
+    GSList *format;             /* Display format */
+    char *user_format;          /* User format */
+    int list_cols;              /* Number of file list columns */
+    int brief_cols;             /* Number of columns in case of list_brief format */
+    /* sort */
+    dir_sort_options_t sort_info;
+    const panel_field_t *sort_field;
+
+    int marked;                 /* Count of marked files */
+    int dirs_marked;            /* Count of marked directories */
+    uintmax_t total;            /* Bytes in marked files */
+
+    int top;                    /* The file shown on the top of the panel */
+    int current;                /* Index to the currently selected file */
+
+    GSList *status_format;      /* Mini status format */
+    gboolean user_mini_status;  /* Is user_status_format used */
+    char *user_status_format[LIST_FORMATS];     /* User format for status line */
+
+    file_filter_t filter;       /* File name filter */
+
+    struct
+    {
+        char *name;             /* Directory history name for history file */
+        GList *list;            /* Directory history */
+        GList *current;         /* Pointer to the current history item */
+    } dir_history;
+
+    struct
+    {
+        gboolean active;
+        GString *buffer;
+        GString *prev_buffer;
+        char ch[MB_LEN_MAX];    /* Buffer for multi-byte character */
+        int chpoint;            /* Point after last characters in @ch */
+    } quick_search;
+
+    int content_shift;          /* Number of characters of filename need to skip from left side. */
+    int max_shift;              /* Max shift for visible part of current panel */
+} WPanel;
+
+/*** global variables defined in .c file *********************************************************/
+
+extern hook_t *select_file_hook;
+
+extern mc_fhl_t *mc_filehighlight;
+
+/*** declarations of public functions ************************************************************/
+
+WPanel *panel_sized_empty_new (const char *panel_name, int y, int x, int lines, int cols);
+WPanel *panel_sized_with_dir_new (const char *panel_name, int y, int x, int lines, int cols,
+                                  const vfs_path_t * vpath);
+
+void panel_clean_dir (WPanel * panel);
+
+void panel_reload (WPanel * panel);
+void panel_set_sort_order (WPanel * panel, const panel_field_t * sort_order);
+void panel_re_sort (WPanel * panel);
+
+#ifdef HAVE_CHARSET
+void panel_change_encoding (WPanel * panel);
+vfs_path_t *remove_encoding_from_path (const vfs_path_t * vpath);
+#endif
+
+void update_panels (panel_update_flags_t flags, const char *current_file);
+int set_panel_formats (WPanel * p);
+
+void panel_set_filter (WPanel * panel, const file_filter_t * filter);
+
+void panel_set_current_by_name (WPanel * panel, const char *name);
+
+void unmark_files (WPanel * panel);
+void select_item (WPanel * panel);
+
+void recalculate_panel_summary (WPanel * panel);
+void file_mark (WPanel * panel, int idx, int val);
+void do_file_mark (WPanel * panel, int idx, int val);
+
+gboolean panel_do_cd (WPanel * panel, const vfs_path_t * new_dir_vpath, enum cd_enum cd_type);
+gboolean panel_cd (WPanel * panel, const vfs_path_t * new_dir_vpath, enum cd_enum cd_type);
+
+gsize panel_get_num_of_sortable_fields (void);
+char **panel_get_sortable_fields (gsize * array_size);
+const panel_field_t *panel_get_field_by_id (const char *name);
+const panel_field_t *panel_get_field_by_title (const char *name);
+const panel_field_t *panel_get_field_by_title_hotkey (const char *name);
+gsize panel_get_num_of_user_possible_fields (void);
+char **panel_get_user_possible_fields (gsize * array_size);
+void panel_set_cwd (WPanel * panel, const vfs_path_t * vpath);
+void panel_set_lwd (WPanel * panel, const vfs_path_t * vpath);
+
+void panel_panelize_cd (void);
+void panel_panelize_change_root (WPanel * panel, const vfs_path_t * new_root);
+void panel_panelize_absolutize_if_needed (WPanel * panel);
+void panel_panelize_save (WPanel * panel);
+
+void panel_init (void);
+void panel_deinit (void);
+
+/* --------------------------------------------------------------------------------------------- */
+/*** inline functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Empty panel creation.
+ *
+ * @param panel_name name of panel for setup retrieving
+ *
+ * @return new instance of WPanel
+ */
+
+static inline WPanel *
+panel_empty_new (const char *panel_name)
+{
+    /* Unknown sizes of the panel at startup */
+    return panel_sized_empty_new (panel_name, 0, 0, 1, 1);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Panel creation for specified directory.
+ *
+ * @param panel_name name of panel for setup retrieving
+ * @param vpath working panel directory. If NULL then current directory is used
+ *
+ * @return new instance of WPanel
+ */
+
+static inline WPanel *
+panel_with_dir_new (const char *panel_name, const vfs_path_t * vpath)
+{
+    /* Unknown sizes of the panel at startup */
+    return panel_sized_with_dir_new (panel_name, 0, 0, 1, 1, vpath);
+}
+
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Panel creation.
+ *
+ * @param panel_name name of panel for setup retrieving
+ *
+ * @return new instance of WPanel
+ */
+
+static inline WPanel *
+panel_new (const char *panel_name)
+{
+    return panel_with_dir_new (panel_name, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * Panel creation with specified size.
+ *
+ * @param panel_name name of panel for setup retrieving
+ * @param y y coordinate of top-left corner
+ * @param x x coordinate of top-left corner
+ * @param lines vertical size
+ * @param cols horizontal size
+ *
+ * @return new instance of WPanel
+ */
+
+static inline WPanel *
+panel_sized_new (const char *panel_name, int y, int x, int lines, int cols)
+{
+    return panel_sized_with_dir_new (panel_name, y, x, lines, cols, NULL);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline file_entry_t *
+panel_current_entry (const WPanel * panel)
+{
+    return &(panel->dir.list[panel->current]);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#endif /* MC__PANEL_H */
diff --git a/src/filemanager/panelize.c b/src/filemanager/panelize.c
new file mode 100644
index 0000000..e90076c
--- /dev/null
+++ b/src/filemanager/panelize.c
@@ -0,0 +1,573 @@
+/*
+   External panelize
+
+   Copyright (C) 1995-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1995
+   Jakub Jelinek, 1995
+   Andrew Borodin <aborodin@vmail.ru> 2011-2023
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file panelize.c
+ *  \brief Source: External panelization module
+ */
+
+#include <config.h>
+
+#include "lib/global.h"
+
+#include "lib/skin.h"
+#include "lib/tty/tty.h"
+#include "lib/vfs/vfs.h"
+#include "lib/mcconfig.h"       /* Load/save directories panelize */
+#include "lib/strutil.h"
+#include "lib/widget.h"
+#include "lib/util.h"           /* mc_pipe_t */
+
+#include "src/history.h"
+
+#include "filemanager.h"        /* current_panel */
+#include "layout.h"             /* rotate_dash() */
+#include "panel.h"              /* WPanel, dir.h */
+
+#include "panelize.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define UX 3
+#define UY 2
+
+#define B_ADD    B_USER
+#define B_REMOVE (B_USER + 1)
+
+/*** file scope type declarations ****************************************************************/
+
+typedef struct
+{
+    char *command;
+    char *label;
+} panelize_entry_t;
+
+/*** forward declarations (file scope functions) *************************************************/
+
+/*** file scope variables ************************************************************************/
+
+static WListbox *l_panelize;
+static WDialog *panelize_dlg;
+static int last_listitem;
+static WInput *pname;
+static GSList *panelize = NULL;
+
+static const char *panelize_section = "Panelize";
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panelize_entry_free (gpointer data)
+{
+    panelize_entry_t *entry = (panelize_entry_t *) data;
+
+    g_free (entry->command);
+    g_free (entry->label);
+    g_free (entry);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static int
+panelize_entry_cmp_by_label (gconstpointer a, gconstpointer b)
+{
+    const panelize_entry_t *entry = (const panelize_entry_t *) a;
+    const char *label = (const char *) b;
+
+    return strcmp (entry->label, label);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+panelize_entry_add_to_listbox (gpointer data, gpointer user_data)
+{
+    panelize_entry_t *entry = (panelize_entry_t *) data;
+
+    (void) user_data;
+
+    listbox_add_item (l_panelize, LISTBOX_APPEND_AT_END, 0, entry->label, entry, FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+update_command (void)
+{
+    if (l_panelize->current != last_listitem)
+    {
+        panelize_entry_t *data = NULL;
+
+        last_listitem = l_panelize->current;
+        listbox_get_current (l_panelize, NULL, (void **) &data);
+        input_assign_text (pname, data->command);
+        pname->point = 0;
+        input_update (pname, TRUE);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+panelize_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    switch (msg)
+    {
+    case MSG_INIT:
+        group_default_callback (w, NULL, MSG_INIT, 0, NULL);
+        MC_FALLTHROUGH;
+
+    case MSG_NOTIFY:           /* MSG_NOTIFY is fired by the listbox to tell us the item has changed. */
+        update_command ();
+        return MSG_HANDLED;
+
+    default:
+        return dlg_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+external_panelize_init (void)
+{
+    struct
+    {
+        int ret_cmd;
+        button_flags_t flags;
+        const char *text;
+    } panelize_but[] =
+    {
+        /* *INDENT-OFF* */
+        { B_ENTER, DEFPUSH_BUTTON, N_("Pane&lize") },
+        { B_REMOVE, NORMAL_BUTTON, N_("&Remove") },
+        { B_ADD, NORMAL_BUTTON, N_("&Add new") },
+        { B_CANCEL, NORMAL_BUTTON, N_("&Cancel") }
+        /* *INDENT-ON* */
+    };
+
+    WGroup *g;
+
+    size_t i;
+    int blen;
+    int panelize_cols;
+    int x, y;
+
+    last_listitem = 0;
+
+    do_refresh ();
+
+    i = G_N_ELEMENTS (panelize_but);
+    blen = i - 1;               /* gaps between buttons */
+    while (i-- != 0)
+    {
+#ifdef ENABLE_NLS
+        panelize_but[i].text = _(panelize_but[i].text);
+#endif
+        blen += str_term_width1 (panelize_but[i].text) + 3 + 1;
+        if (panelize_but[i].flags == DEFPUSH_BUTTON)
+            blen += 2;
+    }
+
+    panelize_cols = COLS - 6;
+    panelize_cols = MAX (panelize_cols, blen + 4);
+
+    panelize_dlg =
+        dlg_create (TRUE, 0, 0, 20, panelize_cols, WPOS_CENTER, FALSE, dialog_colors,
+                    panelize_callback, NULL, "[External panelize]", _("External panelize"));
+    g = GROUP (panelize_dlg);
+
+    /* add listbox to the dialogs */
+    y = UY;
+    group_add_widget (g, groupbox_new (y++, UX, 12, panelize_cols - UX * 2, ""));
+
+    l_panelize = listbox_new (y, UX + 1, 10, panelize_cols - UX * 2 - 2, FALSE, NULL);
+    g_slist_foreach (panelize, panelize_entry_add_to_listbox, NULL);
+    listbox_set_current (l_panelize, listbox_search_text (l_panelize, _("Other command")));
+    group_add_widget (g, l_panelize);
+
+    y += WIDGET (l_panelize)->rect.lines + 1;
+    group_add_widget (g, label_new (y++, UX, _("Command")));
+    pname =
+        input_new (y++, UX, input_colors, panelize_cols - UX * 2, "", "in",
+                   INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_HOSTNAMES | INPUT_COMPLETE_COMMANDS |
+                   INPUT_COMPLETE_VARIABLES | INPUT_COMPLETE_USERNAMES | INPUT_COMPLETE_CD |
+                   INPUT_COMPLETE_SHELL_ESC);
+    group_add_widget (g, pname);
+
+    group_add_widget (g, hline_new (y++, -1, -1));
+
+    x = (panelize_cols - blen) / 2;
+    for (i = 0; i < G_N_ELEMENTS (panelize_but); i++)
+    {
+        WButton *b;
+
+        b = button_new (y, x,
+                        panelize_but[i].ret_cmd, panelize_but[i].flags, panelize_but[i].text, NULL);
+        group_add_widget (g, b);
+
+        x += button_get_len (b) + 1;
+    }
+
+    widget_select (WIDGET (l_panelize));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+external_panelize_done (void)
+{
+    widget_destroy (WIDGET (panelize_dlg));
+    repaint_screen ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+add2panelize (char *label, char *command)
+{
+    panelize_entry_t *entry;
+
+    entry = g_try_new (panelize_entry_t, 1);
+    if (entry != NULL)
+    {
+        entry->label = label;
+        entry->command = command;
+
+        panelize = g_slist_insert_sorted (panelize, entry, panelize_entry_cmp_by_label);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+add2panelize_cmd (void)
+{
+    if (!input_is_empty (pname))
+    {
+        char *label;
+
+        label = input_dialog (_("Add to external panelize"),
+                              _("Enter command label:"), MC_HISTORY_FM_PANELIZE_ADD, "",
+                              INPUT_COMPLETE_NONE);
+        if (label == NULL || *label == '\0')
+            g_free (label);
+        else
+            add2panelize (label, input_get_text (pname));
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+remove_from_panelize (panelize_entry_t * entry)
+{
+    if (strcmp (entry->label, _("Other command")) != 0)
+    {
+        panelize = g_slist_remove (panelize, entry);
+        panelize_entry_free (entry);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+do_external_panelize (const char *command)
+{
+    dir_list *list = &current_panel->dir;
+    mc_pipe_t *external;
+    GError *error = NULL;
+    GString *remain_file_name = NULL;
+
+    external = mc_popen (command, TRUE, TRUE, &error);
+    if (external == NULL)
+    {
+        message (D_ERROR, _("External panelize"), "%s", error->message);
+        g_error_free (error);
+        return;
+    }
+
+    /* Clear the counters and the directory list */
+    panel_clean_dir (current_panel);
+
+    panel_panelize_change_root (current_panel, current_panel->cwd_vpath);
+
+    dir_list_init (list);
+
+    while (TRUE)
+    {
+        GString *line;
+        gboolean ok;
+
+        /* init buffers before call of mc_pread() */
+        external->out.len = MC_PIPE_BUFSIZE;
+        external->err.len = MC_PIPE_BUFSIZE;
+        external->err.null_term = TRUE;
+
+        mc_pread (external, &error);
+
+        if (error != NULL)
+        {
+            message (D_ERROR, MSG_ERROR, _("External panelize:\n%s"), error->message);
+            g_error_free (error);
+            break;
+        }
+
+        if (external->err.len > 0)
+            message (D_ERROR, MSG_ERROR, _("External panelize:\n%s"), external->err.buf);
+
+        if (external->out.len == MC_PIPE_STREAM_EOF)
+            break;
+
+        if (external->out.len == 0)
+            continue;
+
+        if (external->out.len == MC_PIPE_ERROR_READ)
+        {
+            message (D_ERROR, MSG_ERROR,
+                     _("External panelize:\nfailed to read data from child stdout:\n%s"),
+                     unix_error_string (external->out.error));
+            break;
+        }
+
+        ok = TRUE;
+
+        while (ok && (line = mc_pstream_get_string (&external->out)) != NULL)
+        {
+            char *name;
+            gboolean link_to_dir, stale_link;
+            struct stat st;
+
+            /* handle a \n-separated file list */
+
+            if (line->str[line->len - 1] == '\n')
+            {
+                /* entire file name or last chunk */
+
+                g_string_truncate (line, line->len - 1);
+
+                /* join filename chunks */
+                if (remain_file_name != NULL)
+                {
+                    g_string_append_len (remain_file_name, line->str, line->len);
+                    g_string_free (line, TRUE);
+                    line = remain_file_name;
+                    remain_file_name = NULL;
+                }
+            }
+            else
+            {
+                /* first or middle chunk of file name */
+
+                if (remain_file_name == NULL)
+                    remain_file_name = line;
+                else
+                {
+                    g_string_append_len (remain_file_name, line->str, line->len);
+                    g_string_free (line, TRUE);
+                }
+
+                continue;
+            }
+
+            name = line->str;
+
+            if (name[0] == '.' && IS_PATH_SEP (name[1]))
+                name += 2;
+
+            if (handle_path (name, &st, &link_to_dir, &stale_link))
+            {
+                ok = dir_list_append (list, name, &st, link_to_dir, stale_link);
+
+                if (ok)
+                {
+                    file_mark (current_panel, list->len - 1, 0);
+
+                    if ((list->len & 31) == 0)
+                        rotate_dash (TRUE);
+                }
+            }
+
+            g_string_free (line, TRUE);
+        }
+    }
+
+    if (remain_file_name != NULL)
+        g_string_free (remain_file_name, TRUE);
+
+    mc_pclose (external, NULL);
+
+    current_panel->is_panelized = TRUE;
+    panel_panelize_absolutize_if_needed (current_panel);
+
+    panel_set_current_by_name (current_panel, NULL);
+    panel_re_sort (current_panel);
+    rotate_dash (FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+void
+external_panelize_cmd (void)
+{
+    if (!vfs_current_is_local ())
+    {
+        message (D_ERROR, MSG_ERROR, _("Cannot run external panelize in a non-local directory"));
+        return;
+    }
+
+    external_panelize_init ();
+
+    /* display file info */
+    tty_setcolor (SELECTED_COLOR);
+
+    switch (dlg_run (panelize_dlg))
+    {
+    case B_CANCEL:
+        break;
+
+    case B_ADD:
+        add2panelize_cmd ();
+        break;
+
+    case B_REMOVE:
+        {
+            panelize_entry_t *entry;
+
+            listbox_get_current (l_panelize, NULL, (void **) &entry);
+            remove_from_panelize (entry);
+            break;
+        }
+
+    case B_ENTER:
+        if (!input_is_empty (pname))
+        {
+            char *cmd;
+
+            cmd = input_get_text (pname);
+            widget_destroy (WIDGET (panelize_dlg));
+            do_external_panelize (cmd);
+            g_free (cmd);
+            repaint_screen ();
+            return;
+        }
+        break;
+
+    default:
+        break;
+    }
+
+    external_panelize_done ();
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+external_panelize_load (void)
+{
+    char **keys;
+
+    keys = mc_config_get_keys (mc_global.main_config, panelize_section, NULL);
+
+    add2panelize (g_strdup (_("Other command")), g_strdup (""));
+
+    if (*keys == NULL)
+    {
+        add2panelize (g_strdup (_("Modified git files")), g_strdup ("git ls-files --modified"));
+        add2panelize (g_strdup (_("Find rejects after patching")),
+                      g_strdup ("find . -name \\*.rej -print"));
+        add2panelize (g_strdup (_("Find *.orig after patching")),
+                      g_strdup ("find . -name \\*.orig -print"));
+        add2panelize (g_strdup (_("Find SUID and SGID programs")),
+                      g_strdup
+                      ("find . \\( \\( -perm -04000 -a -perm /011 \\) -o \\( -perm -02000 -a -perm /01 \\) \\) -print"));
+    }
+    else
+    {
+        GIConv conv;
+        char **profile_keys;
+
+        conv = str_crt_conv_from ("UTF-8");
+
+        for (profile_keys = keys; *profile_keys != NULL; profile_keys++)
+        {
+            GString *buffer;
+
+            if (mc_global.utf8_display || conv == INVALID_CONV)
+                buffer = g_string_new (*profile_keys);
+            else
+            {
+                buffer = g_string_new ("");
+                if (str_convert (conv, *profile_keys, buffer) == ESTR_FAILURE)
+                    g_string_assign (buffer, *profile_keys);
+            }
+
+            add2panelize (g_string_free (buffer, FALSE),
+                          mc_config_get_string (mc_global.main_config, panelize_section,
+                                                *profile_keys, ""));
+        }
+
+        str_close_conv (conv);
+    }
+
+    g_strfreev (keys);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+external_panelize_save (void)
+{
+    GSList *l;
+
+    mc_config_del_group (mc_global.main_config, panelize_section);
+
+    for (l = panelize; l != NULL; l = g_slist_next (l))
+    {
+        panelize_entry_t *current = (panelize_entry_t *) l->data;
+
+        if (strcmp (current->label, _("Other command")) != 0)
+            mc_config_set_string (mc_global.main_config,
+                                  panelize_section, current->label, current->command);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+external_panelize_free (void)
+{
+    g_clear_slist (&panelize, panelize_entry_free);
+    panelize = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/panelize.h b/src/filemanager/panelize.h
new file mode 100644
index 0000000..eacf976
--- /dev/null
+++ b/src/filemanager/panelize.h
@@ -0,0 +1,25 @@
+/** \file panelize.h
+ *  \brief Header: External panelization module
+ */
+
+#ifndef MC__PANELIZE_H
+#define MC__PANELIZE_H
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+void external_panelize_cmd (void);
+void external_panelize_load (void);
+void external_panelize_save (void);
+void external_panelize_free (void);
+
+/*** inline functions ****************************************************************************/
+
+#endif /* MC__PANELIZE_H */
diff --git a/src/filemanager/tree.c b/src/filemanager/tree.c
new file mode 100644
index 0000000..fd50407
--- /dev/null
+++ b/src/filemanager/tree.c
@@ -0,0 +1,1345 @@
+/*
+   Directory tree browser for the Midnight Commander
+   This module has been converted to be a widget.
+
+   The program load and saves the tree each time the tree widget is
+   created and destroyed.  This is required for the future vfs layer,
+   it will be possible to have tree views over virtual file systems.
+
+   Copyright (C) 1994-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1994, 1996
+   Norbert Warmuth, 1997
+   Miguel de Icaza, 1996, 1999
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013-2022
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file tree.c
+ *  \brief Source: directory tree browser
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdio.h>
+#include <string.h>
+#include <sys/types.h>
+
+#include "lib/global.h"
+
+#include "lib/tty/tty.h"
+#include "lib/tty/key.h"
+#include "lib/skin.h"
+#include "lib/vfs/vfs.h"
+#include "lib/fileloc.h"
+#include "lib/strutil.h"
+#include "lib/util.h"
+#include "lib/widget.h"
+#include "lib/event.h"          /* mc_event_raise() */
+
+#include "src/setup.h"          /* confirm_delete, panels_options */
+#include "src/keymap.h"
+#include "src/history.h"
+
+#include "dir.h"
+#include "filemanager.h"        /* the_menubar */
+#include "file.h"               /* copy_dir_dir(), move_dir_dir(), erase_dir() */
+#include "layout.h"             /* command_prompt */
+#include "treestore.h"
+#include "cmd.h"
+#include "filegui.h"
+#include "cd.h"                 /* cd_error_message() */
+
+#include "tree.h"
+
+/*** global variables ****************************************************************************/
+
+/* The pointer to the tree */
+WTree *the_tree = NULL;
+
+/* If this is true, then when browsing the tree the other window will
+ * automatically reload it's directory with the contents of the currently
+ * selected directory.
+ */
+gboolean xtree_mode = FALSE;
+
+/*** file scope macro definitions ****************************************************************/
+
+#define tlines(t) (t->is_panel ? WIDGET (t)->rect.lines - 2 - \
+                    (panels_options.show_mini_info ? 2 : 0) : WIDGET (t)->rect.lines)
+
+/*** file scope type declarations ****************************************************************/
+
+struct WTree
+{
+    Widget widget;
+    struct TreeStore *store;
+    tree_entry *selected_ptr;   /* The selected directory */
+    GString *search_buffer;     /* Current search string */
+    tree_entry **tree_shown;    /* Entries currently on screen */
+    gboolean is_panel;          /* panel or plain widget flag */
+    gboolean searching;         /* Are we on searching mode? */
+    int topdiff;                /* The difference between the topmost
+                                   shown and the selected */
+};
+
+/*** forward declarations (file scope functions) *************************************************/
+
+static void tree_rescan (void *data);
+
+/*** file scope variables ************************************************************************/
+
+/* Specifies the display mode: 1d or 2d */
+static gboolean tree_navigation_flag = FALSE;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static tree_entry *
+back_ptr (tree_entry * ptr, int *count)
+{
+    int i;
+
+    for (i = 0; ptr != NULL && ptr->prev != NULL && i < *count; ptr = ptr->prev, i++)
+        ;
+
+    *count = i;
+    return ptr;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static tree_entry *
+forw_ptr (tree_entry * ptr, int *count)
+{
+    int i;
+
+    for (i = 0; ptr != NULL && ptr->next != NULL && i < *count; ptr = ptr->next, i++)
+        ;
+
+    *count = i;
+    return ptr;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+remove_callback (tree_entry * entry, void *data)
+{
+    WTree *tree = data;
+
+    if (tree->selected_ptr == entry)
+    {
+        if (tree->selected_ptr->next != NULL)
+            tree->selected_ptr = tree->selected_ptr->next;
+        else
+            tree->selected_ptr = tree->selected_ptr->prev;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Save the ${XDG_CACHE_HOME}/mc/Tree file */
+
+static void
+save_tree (WTree * tree)
+{
+    int error;
+
+    (void) tree;
+
+    error = tree_store_save ();
+    if (error != 0)
+    {
+        char *tree_name;
+
+        tree_name = mc_config_get_full_path (MC_TREESTORE_FILE);
+        fprintf (stderr, _("Cannot open the %s file for writing:\n%s\n"), tree_name,
+                 unix_error_string (error));
+        g_free (tree_name);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_remove_entry (WTree * tree, const vfs_path_t * name_vpath)
+{
+    (void) tree;
+    tree_store_remove_entry (name_vpath);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_destroy (WTree * tree)
+{
+    tree_store_remove_entry_remove_hook (remove_callback);
+    save_tree (tree);
+
+    MC_PTR_FREE (tree->tree_shown);
+    g_string_free (tree->search_buffer, TRUE);
+    tree->selected_ptr = NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Loads the .mc.tree file */
+
+static void
+load_tree (WTree * tree)
+{
+    vfs_path_t *vpath;
+
+    tree_store_load ();
+
+    tree->selected_ptr = tree->store->tree_first;
+    vpath = vfs_path_from_str (mc_config_get_home_dir ());
+    tree_chdir (tree, vpath);
+    vfs_path_free (vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_show_mini_info (WTree * tree, int tree_lines, int tree_cols)
+{
+    Widget *w = WIDGET (tree);
+    int line;
+
+    /* Show mini info */
+    if (tree->is_panel)
+    {
+        if (!panels_options.show_mini_info)
+            return;
+        line = tree_lines + 2;
+    }
+    else
+        line = tree_lines + 1;
+
+    if (tree->searching)
+    {
+        /* Show search string */
+        tty_setcolor (INPUT_COLOR);
+        tty_draw_hline (w->rect.y + line, w->rect.x + 1, ' ', tree_cols);
+        widget_gotoyx (w, line, 1);
+        tty_print_char (PATH_SEP);
+        tty_print_string (str_fit_to_term (tree->search_buffer->str, tree_cols - 2, J_LEFT_FIT));
+        tty_print_char (' ');
+    }
+    else
+    {
+        /* Show full name of selected directory */
+
+        const int *colors;
+
+        colors = widget_get_colors (w);
+        tty_setcolor (tree->is_panel ? NORMAL_COLOR : colors[DLG_COLOR_NORMAL]);
+        tty_draw_hline (w->rect.y + line, w->rect.x + 1, ' ', tree_cols);
+        widget_gotoyx (w, line, 1);
+        tty_print_string (str_fit_to_term
+                          (vfs_path_as_str (tree->selected_ptr->name), tree_cols, J_LEFT_FIT));
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+show_tree (WTree * tree)
+{
+    Widget *w = WIDGET (tree);
+    tree_entry *current;
+    int i, j;
+    int topsublevel = 0;
+    int x = 0, y = 0;
+    int tree_lines, tree_cols;
+
+    /* Initialize */
+    tree_lines = tlines (tree);
+    tree_cols = w->rect.cols;
+
+    widget_gotoyx (w, y, x);
+    if (tree->is_panel)
+    {
+        tree_cols -= 2;
+        x = y = 1;
+    }
+
+    g_free (tree->tree_shown);
+    tree->tree_shown = g_new0 (tree_entry *, tree_lines);
+
+    if (tree->store->tree_first != NULL)
+        topsublevel = tree->store->tree_first->sublevel;
+
+    if (tree->selected_ptr == NULL)
+    {
+        tree->selected_ptr = tree->store->tree_first;
+        tree->topdiff = 0;
+    }
+    current = tree->selected_ptr;
+
+    /* Calculate the directory which is to be shown on the topmost line */
+    if (!tree_navigation_flag)
+        current = back_ptr (current, &tree->topdiff);
+    else
+    {
+        i = 0;
+
+        while (current->prev != NULL && i < tree->topdiff)
+        {
+            current = current->prev;
+
+            if (current->sublevel < tree->selected_ptr->sublevel)
+            {
+                if (vfs_path_equal (current->name, tree->selected_ptr->name))
+                    i++;
+            }
+            else if (current->sublevel == tree->selected_ptr->sublevel)
+            {
+                const char *cname;
+
+                cname = vfs_path_as_str (current->name);
+                for (j = strlen (cname) - 1; !IS_PATH_SEP (cname[j]); j--)
+                    ;
+                if (vfs_path_equal_len (current->name, tree->selected_ptr->name, j))
+                    i++;
+            }
+            else if (current->sublevel == tree->selected_ptr->sublevel + 1)
+            {
+                j = vfs_path_len (tree->selected_ptr->name);
+                if (j > 1 && vfs_path_equal_len (current->name, tree->selected_ptr->name, j))
+                    i++;
+            }
+        }
+        tree->topdiff = i;
+    }
+
+    /* Loop for every line */
+    for (i = 0; i < tree_lines; i++)
+    {
+        const int *colors;
+
+        colors = widget_get_colors (w);
+        tty_setcolor (tree->is_panel ? NORMAL_COLOR : colors[DLG_COLOR_NORMAL]);
+
+        /* Move to the beginning of the line */
+        tty_draw_hline (w->rect.y + y + i, w->rect.x + x, ' ', tree_cols);
+
+        if (current == NULL)
+            continue;
+
+        if (tree->is_panel)
+        {
+            gboolean selected;
+
+            selected = widget_get_state (w, WST_FOCUSED) && current == tree->selected_ptr;
+            tty_setcolor (selected ? SELECTED_COLOR : NORMAL_COLOR);
+        }
+        else
+        {
+            int idx = current == tree->selected_ptr ? DLG_COLOR_FOCUS : DLG_COLOR_NORMAL;
+
+            tty_setcolor (colors[idx]);
+        }
+
+        tree->tree_shown[i] = current;
+        if (current->sublevel == topsublevel)
+            /* Show full name */
+            tty_print_string (str_fit_to_term
+                              (vfs_path_as_str (current->name),
+                               tree_cols + (tree->is_panel ? 0 : 1), J_LEFT_FIT));
+        else
+        {
+            /* Sub level directory */
+            tty_set_alt_charset (TRUE);
+
+            /* Output branch parts */
+            for (j = 0; j < current->sublevel - topsublevel - 1; j++)
+            {
+                if (tree_cols - 8 - 3 * j < 9)
+                    break;
+                tty_print_char (' ');
+                if ((current->submask & (1 << (j + topsublevel + 1))) != 0)
+                    tty_print_char (ACS_VLINE);
+                else
+                    tty_print_char (' ');
+                tty_print_char (' ');
+            }
+            tty_print_char (' ');
+            j++;
+            if (current->next == NULL || (current->next->submask & (1 << current->sublevel)) == 0)
+                tty_print_char (ACS_LLCORNER);
+            else
+                tty_print_char (ACS_LTEE);
+            tty_print_char (ACS_HLINE);
+            tty_set_alt_charset (FALSE);
+
+            /* Show sub-name */
+            tty_print_char (' ');
+            tty_print_string (str_fit_to_term
+                              (current->subname, tree_cols - x - 3 * j, J_LEFT_FIT));
+        }
+
+        /* Calculate the next value for current */
+        current = current->next;
+        if (tree_navigation_flag)
+            for (; current != NULL; current = current->next)
+            {
+                if (current->sublevel < tree->selected_ptr->sublevel)
+                {
+                    if (vfs_path_equal_len (current->name, tree->selected_ptr->name,
+                                            vfs_path_len (current->name)))
+                        break;
+                }
+                else if (current->sublevel == tree->selected_ptr->sublevel)
+                {
+                    const char *cname;
+
+                    cname = vfs_path_as_str (current->name);
+                    for (j = strlen (cname) - 1; !IS_PATH_SEP (cname[j]); j--)
+                        ;
+                    if (vfs_path_equal_len (current->name, tree->selected_ptr->name, j))
+                        break;
+                }
+                else if (current->sublevel == tree->selected_ptr->sublevel + 1
+                         && vfs_path_len (tree->selected_ptr->name) > 1)
+                {
+                    if (vfs_path_equal_len (current->name, tree->selected_ptr->name,
+                                            vfs_path_len (tree->selected_ptr->name)))
+                        break;
+                }
+            }
+    }
+
+    tree_show_mini_info (tree, tree_lines, tree_cols);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_check_focus (WTree * tree)
+{
+    if (tree->topdiff < 3)
+        tree->topdiff = 3;
+    else if (tree->topdiff >= tlines (tree) - 3)
+        tree->topdiff = tlines (tree) - 3 - 1;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_backward (WTree * tree, int i)
+{
+    if (!tree_navigation_flag)
+        tree->selected_ptr = back_ptr (tree->selected_ptr, &i);
+    else
+    {
+        tree_entry *current;
+        int j = 0;
+
+        current = tree->selected_ptr;
+        while (j < i && current->prev != NULL
+               && current->prev->sublevel >= tree->selected_ptr->sublevel)
+        {
+            current = current->prev;
+            if (current->sublevel == tree->selected_ptr->sublevel)
+            {
+                tree->selected_ptr = current;
+                j++;
+            }
+        }
+        i = j;
+    }
+
+    tree->topdiff -= i;
+    tree_check_focus (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_forward (WTree * tree, int i)
+{
+    if (!tree_navigation_flag)
+        tree->selected_ptr = forw_ptr (tree->selected_ptr, &i);
+    else
+    {
+        tree_entry *current;
+        int j = 0;
+
+        current = tree->selected_ptr;
+        while (j < i && current->next != NULL
+               && current->next->sublevel >= tree->selected_ptr->sublevel)
+        {
+            current = current->next;
+            if (current->sublevel == tree->selected_ptr->sublevel)
+            {
+                tree->selected_ptr = current;
+                j++;
+            }
+        }
+        i = j;
+    }
+
+    tree->topdiff += i;
+    tree_check_focus (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_to_child (WTree * tree)
+{
+    tree_entry *current;
+
+    /* Do we have a starting point? */
+    if (tree->selected_ptr == NULL)
+        return;
+
+    /* Take the next entry */
+    current = tree->selected_ptr->next;
+    /* Is it the child of the selected entry */
+    if (current != NULL && current->sublevel > tree->selected_ptr->sublevel)
+    {
+        /* Yes -> select this entry */
+        tree->selected_ptr = current;
+        tree->topdiff++;
+        tree_check_focus (tree);
+    }
+    else
+    {
+        /* No -> rescan and try again */
+        tree_rescan (tree);
+        current = tree->selected_ptr->next;
+        if (current != NULL && current->sublevel > tree->selected_ptr->sublevel)
+        {
+            tree->selected_ptr = current;
+            tree->topdiff++;
+            tree_check_focus (tree);
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+tree_move_to_parent (WTree * tree)
+{
+    tree_entry *current;
+    tree_entry *old;
+
+    if (tree->selected_ptr == NULL)
+        return FALSE;
+
+    old = tree->selected_ptr;
+
+    for (current = tree->selected_ptr->prev;
+         current != NULL && current->sublevel >= tree->selected_ptr->sublevel;
+         current = current->prev)
+        tree->topdiff--;
+
+    if (current == NULL)
+        current = tree->store->tree_first;
+    tree->selected_ptr = current;
+    tree_check_focus (tree);
+    return tree->selected_ptr != old;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_to_top (WTree * tree)
+{
+    tree->selected_ptr = tree->store->tree_first;
+    tree->topdiff = 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_to_bottom (WTree * tree)
+{
+    tree->selected_ptr = tree->store->tree_last;
+    tree->topdiff = tlines (tree) - 3 - 1;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_chdir_sel (WTree * tree)
+{
+    if (tree->is_panel)
+    {
+        WPanel *p;
+
+        p = change_panel ();
+
+        if (panel_cd (p, tree->selected_ptr->name, cd_exact))
+            select_item (p);
+        else
+            cd_error_message (vfs_path_as_str (tree->selected_ptr->name));
+
+        widget_draw (WIDGET (p));
+        (void) change_panel ();
+        show_tree (tree);
+    }
+    else
+    {
+        WDialog *h = DIALOG (WIDGET (tree)->owner);
+
+        h->ret_value = B_ENTER;
+        dlg_close (h);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+maybe_chdir (WTree * tree)
+{
+    if (xtree_mode && tree->is_panel && is_idle ())
+        tree_chdir_sel (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Search tree for text */
+
+static gboolean
+search_tree (WTree * tree, const GString * text)
+{
+    tree_entry *current = tree->selected_ptr;
+    gboolean wrapped = FALSE;
+    gboolean found = FALSE;
+
+    while (!found && (!wrapped || current != tree->selected_ptr))
+        if (strncmp (current->subname, text->str, text->len) == 0)
+        {
+            tree->selected_ptr = current;
+            found = TRUE;
+        }
+        else
+        {
+            current = current->next;
+            if (current == NULL)
+            {
+                current = tree->store->tree_first;
+                wrapped = TRUE;
+            }
+
+            tree->topdiff++;
+        }
+
+    tree_check_focus (tree);
+    return found;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_do_search (WTree * tree, int key)
+{
+    /* TODO: support multi-byte characters, see do_search() in panel.c */
+
+    if (tree->search_buffer->len != 0 && key == KEY_BACKSPACE)
+        g_string_set_size (tree->search_buffer, tree->search_buffer->len - 1);
+    else if (key != 0)
+        g_string_append_c (tree->search_buffer, (gchar) key);
+
+    if (!search_tree (tree, tree->search_buffer))
+        g_string_set_size (tree->search_buffer, tree->search_buffer->len - 1);
+
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_rescan (void *data)
+{
+    WTree *tree = data;
+    vfs_path_t *old_vpath;
+
+    old_vpath = vfs_path_clone (vfs_get_raw_current_dir ());
+    if (old_vpath == NULL)
+        return;
+
+    if (tree->selected_ptr != NULL && mc_chdir (tree->selected_ptr->name) == 0)
+    {
+        int ret;
+
+        tree_store_rescan (tree->selected_ptr->name);
+        ret = mc_chdir (old_vpath);
+        (void) ret;
+    }
+    vfs_path_free (old_vpath, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_forget (void *data)
+{
+    WTree *tree = data;
+
+    if (tree->selected_ptr != NULL)
+        tree_remove_entry (tree, tree->selected_ptr->name);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_copy (WTree * tree, const char *default_dest)
+{
+    char msg[BUF_MEDIUM];
+    char *dest;
+
+    if (tree->selected_ptr == NULL)
+        return;
+
+    g_snprintf (msg, sizeof (msg), _("Copy \"%s\" directory to:"),
+                str_trunc (vfs_path_as_str (tree->selected_ptr->name), 50));
+    dest = input_expand_dialog (Q_ ("DialogTitle|Copy"),
+                                msg, MC_HISTORY_FM_TREE_COPY, default_dest,
+                                INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD);
+
+    if (dest != NULL && *dest != '\0')
+    {
+        file_op_context_t *ctx;
+        file_op_total_context_t *tctx;
+
+        ctx = file_op_context_new (OP_COPY);
+        tctx = file_op_total_context_new ();
+        file_op_context_create_ui (ctx, FALSE, FILEGUI_DIALOG_MULTI_ITEM);
+        tctx->ask_overwrite = FALSE;
+        copy_dir_dir (tctx, ctx, vfs_path_as_str (tree->selected_ptr->name), dest, TRUE, FALSE,
+                      FALSE, NULL);
+        file_op_total_context_destroy (tctx);
+        file_op_context_destroy (ctx);
+    }
+
+    g_free (dest);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move (WTree * tree, const char *default_dest)
+{
+    char msg[BUF_MEDIUM];
+    char *dest;
+
+    if (tree->selected_ptr == NULL)
+        return;
+
+    g_snprintf (msg, sizeof (msg), _("Move \"%s\" directory to:"),
+                str_trunc (vfs_path_as_str (tree->selected_ptr->name), 50));
+    dest =
+        input_expand_dialog (Q_ ("DialogTitle|Move"), msg, MC_HISTORY_FM_TREE_MOVE, default_dest,
+                             INPUT_COMPLETE_FILENAMES | INPUT_COMPLETE_CD);
+
+    if (dest != NULL && *dest != '\0')
+    {
+        vfs_path_t *dest_vpath;
+        struct stat buf;
+
+        dest_vpath = vfs_path_from_str (dest);
+
+        if (mc_stat (dest_vpath, &buf))
+            message (D_ERROR, MSG_ERROR, _("Cannot stat the destination\n%s"),
+                     unix_error_string (errno));
+        else if (!S_ISDIR (buf.st_mode))
+            file_error (TRUE, _("Destination \"%s\" must be a directory\n%s"), dest);
+        else
+        {
+            file_op_context_t *ctx;
+            file_op_total_context_t *tctx;
+
+            ctx = file_op_context_new (OP_MOVE);
+            tctx = file_op_total_context_new ();
+            file_op_context_create_ui (ctx, FALSE, FILEGUI_DIALOG_ONE_ITEM);
+            move_dir_dir (tctx, ctx, vfs_path_as_str (tree->selected_ptr->name), dest);
+            file_op_total_context_destroy (tctx);
+            file_op_context_destroy (ctx);
+        }
+
+        vfs_path_free (dest_vpath, TRUE);
+    }
+
+    g_free (dest);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+#if 0
+static void
+tree_mkdir (WTree * tree)
+{
+    char old_dir[MC_MAXPATHLEN];
+
+    if (tree->selected_ptr == NULL || chdir (tree->selected_ptr->name) != 0)
+        return;
+    /* FIXME
+       mkdir_cmd (tree);
+     */
+    tree_rescan (tree);
+    chdir (old_dir);
+}
+#endif
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_rmdir (void *data)
+{
+    WTree *tree = data;
+    file_op_context_t *ctx;
+    file_op_total_context_t *tctx;
+
+    if (tree->selected_ptr == NULL)
+        return;
+
+    if (confirm_delete)
+    {
+        char *buf;
+        int result;
+
+        buf = g_strdup_printf (_("Delete %s?"), vfs_path_as_str (tree->selected_ptr->name));
+
+        result = query_dialog (Q_ ("DialogTitle|Delete"), buf, D_ERROR, 2, _("&Yes"), _("&No"));
+        g_free (buf);
+        if (result != 0)
+            return;
+    }
+
+    ctx = file_op_context_new (OP_DELETE);
+    tctx = file_op_total_context_new ();
+
+    file_op_context_create_ui (ctx, FALSE, FILEGUI_DIALOG_ONE_ITEM);
+    if (erase_dir (tctx, ctx, tree->selected_ptr->name) == FILE_CONT)
+        tree_forget (tree);
+    file_op_total_context_destroy (tctx);
+    file_op_context_destroy (ctx);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+tree_move_up (WTree * tree)
+{
+    tree_move_backward (tree, 1);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+tree_move_down (WTree * tree)
+{
+    tree_move_forward (tree, 1);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+tree_move_home (WTree * tree)
+{
+    tree_move_to_top (tree);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+tree_move_end (WTree * tree)
+{
+    tree_move_to_bottom (tree);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_pgup (WTree * tree)
+{
+    tree_move_backward (tree, tlines (tree) - 1);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_move_pgdn (WTree * tree)
+{
+    tree_move_forward (tree, tlines (tree) - 1);
+    show_tree (tree);
+    maybe_chdir (tree);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+tree_move_left (WTree * tree)
+{
+    gboolean v = FALSE;
+
+    if (tree_navigation_flag)
+    {
+        v = tree_move_to_parent (tree);
+        show_tree (tree);
+        maybe_chdir (tree);
+    }
+
+    return v;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+tree_move_right (WTree * tree)
+{
+    gboolean v = FALSE;
+
+    if (tree_navigation_flag)
+    {
+        tree_move_to_child (tree);
+        show_tree (tree);
+        maybe_chdir (tree);
+        v = TRUE;
+    }
+
+    return v;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_start_search (WTree * tree)
+{
+    if (tree->searching)
+    {
+        if (tree->selected_ptr == tree->store->tree_last)
+            tree_move_to_top (tree);
+        else
+        {
+            gboolean i;
+
+            /* set navigation mode temporarily to 'Static' because in
+             * dynamic navigation mode tree_move_forward will not move
+             * to a lower sublevel if necessary (sequent searches must
+             * start with the directory followed the last found directory)
+             */
+            i = tree_navigation_flag;
+            tree_navigation_flag = FALSE;
+            tree_move_forward (tree, 1);
+            tree_navigation_flag = i;
+        }
+        tree_do_search (tree, 0);
+    }
+    else
+    {
+        tree->searching = TRUE;
+        g_string_set_size (tree->search_buffer, 0);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_toggle_navig (WTree * tree)
+{
+    Widget *w = WIDGET (tree);
+    WButtonBar *b;
+
+    tree_navigation_flag = !tree_navigation_flag;
+
+    b = buttonbar_find (DIALOG (w->owner));
+    buttonbar_set_label (b, 4,
+                         tree_navigation_flag ? Q_ ("ButtonBar|Static") : Q_ ("ButtonBar|Dynamc"),
+                         w->keymap, w);
+    widget_draw (WIDGET (b));
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+tree_execute_cmd (WTree * tree, long command)
+{
+    cb_ret_t res = MSG_HANDLED;
+
+    if (command != CK_Search)
+        tree->searching = FALSE;
+
+    switch (command)
+    {
+    case CK_Help:
+        {
+            ev_help_t event_data = { NULL, "[Directory Tree]" };
+            mc_event_raise (MCEVENT_GROUP_CORE, "help", &event_data);
+        }
+        break;
+    case CK_Forget:
+        tree_forget (tree);
+        break;
+    case CK_ToggleNavigation:
+        tree_toggle_navig (tree);
+        break;
+    case CK_Copy:
+        tree_copy (tree, "");
+        break;
+    case CK_Move:
+        tree_move (tree, "");
+        break;
+    case CK_Up:
+        tree_move_up (tree);
+        break;
+    case CK_Down:
+        tree_move_down (tree);
+        break;
+    case CK_Top:
+        tree_move_home (tree);
+        break;
+    case CK_Bottom:
+        tree_move_end (tree);
+        break;
+    case CK_PageUp:
+        tree_move_pgup (tree);
+        break;
+    case CK_PageDown:
+        tree_move_pgdn (tree);
+        break;
+    case CK_Enter:
+        tree_chdir_sel (tree);
+        break;
+    case CK_Reread:
+        tree_rescan (tree);
+        break;
+    case CK_Search:
+        tree_start_search (tree);
+        break;
+    case CK_Delete:
+        tree_rmdir (tree);
+        break;
+    case CK_Quit:
+        if (!tree->is_panel)
+            dlg_close (DIALOG (WIDGET (tree)->owner));
+        return res;
+    default:
+        res = MSG_NOT_HANDLED;
+    }
+
+    show_tree (tree);
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+tree_key (WTree * tree, int key)
+{
+    long command;
+
+    if (is_abort_char (key))
+    {
+        if (tree->is_panel)
+        {
+            tree->searching = FALSE;
+            show_tree (tree);
+            return MSG_HANDLED; /* eat abort char */
+        }
+        /* modal tree dialog: let upper layer see the
+           abort character and close the dialog */
+        return MSG_NOT_HANDLED;
+    }
+
+    if (tree->searching && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
+    {
+        tree_do_search (tree, key);
+        show_tree (tree);
+        return MSG_HANDLED;
+    }
+
+    command = widget_lookup_key (WIDGET (tree), key);
+    switch (command)
+    {
+    case CK_IgnoreKey:
+        break;
+    case CK_Left:
+        return tree_move_left (tree) ? MSG_HANDLED : MSG_NOT_HANDLED;
+    case CK_Right:
+        return tree_move_right (tree) ? MSG_HANDLED : MSG_NOT_HANDLED;
+    default:
+        tree_execute_cmd (tree, command);
+        return MSG_HANDLED;
+    }
+
+    /* Do not eat characters not meant for the tree below ' ' (e.g. C-l). */
+    if (!command_prompt && ((key >= ' ' && key <= 255) || key == KEY_BACKSPACE))
+    {
+        tree_start_search (tree);
+        tree_do_search (tree, key);
+        return MSG_HANDLED;
+    }
+
+    return MSG_NOT_HANDLED;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_frame (WDialog * h, WTree * tree)
+{
+    Widget *w = WIDGET (tree);
+
+    (void) h;
+
+    tty_setcolor (NORMAL_COLOR);
+    widget_erase (w);
+    if (tree->is_panel)
+    {
+        const char *title = _("Directory tree");
+        const int len = str_term_width1 (title);
+
+        tty_draw_box (w->rect.y, w->rect.x, w->rect.lines, w->rect.cols, FALSE);
+
+        widget_gotoyx (w, 0, (w->rect.cols - len - 2) / 2);
+        tty_printf (" %s ", title);
+
+        if (panels_options.show_mini_info)
+        {
+            int y;
+
+            y = w->rect.lines - 3;
+            widget_gotoyx (w, y, 0);
+            tty_print_alt_char (ACS_LTEE, FALSE);
+            widget_gotoyx (w, y, w->rect.cols - 1);
+            tty_print_alt_char (ACS_RTEE, FALSE);
+            tty_draw_hline (w->rect.y + y, w->rect.x + 1, ACS_HLINE, w->rect.cols - 2);
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static cb_ret_t
+tree_callback (Widget * w, Widget * sender, widget_msg_t msg, int parm, void *data)
+{
+    WTree *tree = (WTree *) w;
+    WDialog *h = DIALOG (w->owner);
+    WButtonBar *b;
+
+    switch (msg)
+    {
+    case MSG_DRAW:
+        tree_frame (h, tree);
+        show_tree (tree);
+        if (widget_get_state (w, WST_FOCUSED))
+        {
+            b = buttonbar_find (h);
+            widget_draw (WIDGET (b));
+        }
+        return MSG_HANDLED;
+
+    case MSG_FOCUS:
+        b = buttonbar_find (h);
+        buttonbar_set_label (b, 1, Q_ ("ButtonBar|Help"), w->keymap, w);
+        buttonbar_set_label (b, 2, Q_ ("ButtonBar|Rescan"), w->keymap, w);
+        buttonbar_set_label (b, 3, Q_ ("ButtonBar|Forget"), w->keymap, w);
+        buttonbar_set_label (b, 4, tree_navigation_flag ? Q_ ("ButtonBar|Static")
+                             : Q_ ("ButtonBar|Dynamc"), w->keymap, w);
+        buttonbar_set_label (b, 5, Q_ ("ButtonBar|Copy"), w->keymap, w);
+        buttonbar_set_label (b, 6, Q_ ("ButtonBar|RenMov"), w->keymap, w);
+#if 0
+        /* FIXME: mkdir is currently defunct */
+        buttonbar_set_label (b, 7, Q_ ("ButtonBar|Mkdir"), w->keymap, w);
+#else
+        buttonbar_clear_label (b, 7, w);
+#endif
+        buttonbar_set_label (b, 8, Q_ ("ButtonBar|Rmdir"), w->keymap, w);
+
+        return MSG_HANDLED;
+
+    case MSG_UNFOCUS:
+        tree->searching = FALSE;
+        return MSG_HANDLED;
+
+    case MSG_KEY:
+        return tree_key (tree, parm);
+
+    case MSG_ACTION:
+        /* command from buttonbar */
+        return tree_execute_cmd (tree, parm);
+
+    case MSG_DESTROY:
+        tree_destroy (tree);
+        return MSG_HANDLED;
+
+    default:
+        return widget_default_callback (w, sender, msg, parm, data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+/**
+  * Mouse callback
+  */
+static void
+tree_mouse_callback (Widget * w, mouse_msg_t msg, mouse_event_t * event)
+{
+    WTree *tree = (WTree *) w;
+    int y;
+
+    y = event->y;
+    if (tree->is_panel)
+        y--;
+
+    switch (msg)
+    {
+    case MSG_MOUSE_DOWN:
+        /* rest of the upper frame - call menu */
+        if (tree->is_panel && event->y == WIDGET (w->owner)->rect.y)
+        {
+            /* return MOU_UNHANDLED */
+            event->result.abort = TRUE;
+        }
+        else if (!widget_get_state (w, WST_FOCUSED))
+            (void) change_panel ();
+        break;
+
+    case MSG_MOUSE_CLICK:
+        {
+            int lines;
+
+            lines = tlines (tree);
+
+            if (y < 0)
+            {
+                tree_move_backward (tree, lines - 1);
+                show_tree (tree);
+            }
+            else if (y >= lines)
+            {
+                tree_move_forward (tree, lines - 1);
+                show_tree (tree);
+            }
+            else if ((event->count & GPM_DOUBLE) != 0)
+            {
+                if (tree->tree_shown[y] != NULL)
+                {
+                    tree->selected_ptr = tree->tree_shown[y];
+                    tree->topdiff = y;
+                }
+
+                tree_chdir_sel (tree);
+            }
+        }
+        break;
+
+    case MSG_MOUSE_SCROLL_UP:
+    case MSG_MOUSE_SCROLL_DOWN:
+        /* TODO: Ticket #2218 */
+        break;
+
+    default:
+        break;
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+WTree *
+tree_new (int y, int x, int lines, int cols, gboolean is_panel)
+{
+    WRect r = { y, x, lines, cols };
+    WTree *tree;
+    Widget *w;
+
+    tree = g_new (WTree, 1);
+
+    w = WIDGET (tree);
+    widget_init (w, &r, tree_callback, tree_mouse_callback);
+    w->options |= WOP_SELECTABLE | WOP_TOP_SELECT;
+    w->keymap = tree_map;
+
+    tree->is_panel = is_panel;
+    tree->selected_ptr = NULL;
+
+    tree->store = tree_store_get ();
+    tree_store_add_entry_remove_hook (remove_callback, tree);
+    tree->tree_shown = NULL;
+    tree->search_buffer = g_string_sized_new (MC_MAXPATHLEN);
+    tree->topdiff = w->rect.lines / 2;
+    tree->searching = FALSE;
+
+    load_tree (tree);
+    return tree;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+tree_chdir (WTree * tree, const vfs_path_t * dir)
+{
+    tree_entry *current;
+
+    current = tree_store_whereis (dir);
+    if (current != NULL)
+    {
+        tree->selected_ptr = current;
+        tree_check_focus (tree);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Return name of the currently selected entry */
+
+const vfs_path_t *
+tree_selected_name (const WTree * tree)
+{
+    return tree->selected_ptr->name;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+sync_tree (const vfs_path_t * vpath)
+{
+    tree_chdir (the_tree, vpath);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+WTree *
+find_tree (const WDialog * h)
+{
+    return (WTree *) widget_find_by_type (CONST_WIDGET (h), tree_callback);
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/tree.h b/src/filemanager/tree.h
new file mode 100644
index 0000000..f1dbba6
--- /dev/null
+++ b/src/filemanager/tree.h
@@ -0,0 +1,35 @@
+/** \file tree.h
+ *  \brief Header: directory tree browser
+ */
+
+#ifndef MC__TREE_H
+#define MC__TREE_H
+
+#include "lib/global.h"
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+typedef struct WTree WTree;
+
+/*** global variables defined in .c file *********************************************************/
+
+extern WTree *the_tree;
+extern gboolean xtree_mode;
+
+/*** declarations of public functions ************************************************************/
+
+WTree *tree_new (int y, int x, int lines, int cols, gboolean is_panel);
+
+void tree_chdir (WTree * tree, const vfs_path_t * dir);
+const vfs_path_t *tree_selected_name (const WTree * tree);
+
+void sync_tree (const vfs_path_t * vpath);
+
+WTree *find_tree (const WDialog * h);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__TREE_H */
diff --git a/src/filemanager/treestore.c b/src/filemanager/treestore.c
new file mode 100644
index 0000000..2d23c93
--- /dev/null
+++ b/src/filemanager/treestore.c
@@ -0,0 +1,941 @@
+/*
+   Tree Store
+   Contains a storage of the file system tree representation
+
+   This module has been converted to be a widget.
+
+   The program load and saves the tree each time the tree widget is
+   created and destroyed.  This is required for the future vfs layer,
+   it will be possible to have tree views over virtual file systems.
+
+   Copyright (C) 1999-2023
+   Free Software Foundation, Inc.
+
+   Written by:
+   Janne Kukonlehto, 1994, 1996
+   Norbert Warmuth, 1997
+   Miguel de Icaza, 1996, 1999
+   Slava Zanko <slavazanko@gmail.com>, 2013
+   Andrew Borodin <aborodin@vmail.ru>, 2013
+
+   This file is part of the Midnight Commander.
+
+   The Midnight Commander is free software: you can redistribute it
+   and/or modify it under the terms of the GNU General Public License as
+   published by the Free Software Foundation, either version 3 of the License,
+   or (at your option) any later version.
+
+   The Midnight Commander is distributed in the hope that it will be useful,
+   but WITHOUT ANY WARRANTY; without even the implied warranty of
+   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+   GNU General Public License for more details.
+
+   You should have received a copy of the GNU General Public License
+   along with this program.  If not, see <http://www.gnu.org/licenses/>.
+ */
+
+/** \file treestore.c
+ *  \brief Source: tree store
+ *
+ *  Contains a storage of the file system tree representation.
+ */
+
+#include <config.h>
+
+#include <errno.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <string.h>
+#include <sys/types.h>
+#include <sys/stat.h>
+#include <unistd.h>
+
+#include "lib/global.h"
+#include "lib/mcconfig.h"
+#include "lib/vfs/vfs.h"
+#include "lib/fileloc.h"
+#include "lib/strescape.h"
+#include "lib/hook.h"
+#include "lib/util.h"
+
+#include "src/setup.h"          /* setup_init() */
+
+#include "treestore.h"
+
+/*** global variables ****************************************************************************/
+
+/*** file scope macro definitions ****************************************************************/
+
+#define TREE_SIGNATURE "Midnight Commander TreeStore v 2.0"
+
+/*** file scope type declarations ****************************************************************/
+
+/*** forward declarations (file scope functions) *************************************************/
+
+static tree_entry *tree_store_add_entry (const vfs_path_t * name);
+
+/*** file scope variables ************************************************************************/
+
+static struct TreeStore ts;
+
+static hook_t *remove_entry_hooks;
+
+/* --------------------------------------------------------------------------------------------- */
+/*** file scope functions ************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+static inline void
+tree_store_dirty (gboolean dirty)
+{
+    ts.dirty = dirty;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+  *
+  * @return the number of common bytes in the strings.
+  */
+
+static size_t
+str_common (const vfs_path_t * s1_vpath, const vfs_path_t * s2_vpath)
+{
+    size_t result = 0;
+    const char *s1, *s2;
+
+    s1 = vfs_path_as_str (s1_vpath);
+    s2 = vfs_path_as_str (s2_vpath);
+
+    while (*s1 != '\0' && *s2 != '\0' && *s1++ == *s2++)
+        result++;
+
+    return result;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** The directory names are arranged in a single linked list in the same
+  * order as they are displayed. When the tree is displayed the expected
+  * order is like this:
+  * /
+  * /bin
+  * /etc
+  * /etc/X11
+  * /etc/rc.d
+  * /etc.old/X11
+  * /etc.old/rc.d
+  * /usr
+  *
+  * i.e. the required collating sequence when comparing two directory names is 
+  * '\0' < PATH_SEP < all-other-characters-in-encoding-order
+  *
+  * Since strcmp doesn't fulfil this requirement we use pathcmp when
+  * inserting directory names into the list. The meaning of the return value 
+  * of pathcmp and strcmp are the same (an integer less than, equal to, or 
+  * greater than zero if p1 is found to be less than, to match, or be greater 
+  * than p2.
+ */
+
+static int
+pathcmp (const vfs_path_t * p1_vpath, const vfs_path_t * p2_vpath)
+{
+    int ret_val;
+    const char *p1, *p2;
+
+    p1 = vfs_path_as_str (p1_vpath);
+    p2 = vfs_path_as_str (p2_vpath);
+
+    for (; *p1 == *p2; p1++, p2++)
+        if (*p1 == '\0')
+            return 0;
+
+    if (*p1 == '\0')
+        ret_val = -1;
+    else if (*p2 == '\0')
+        ret_val = 1;
+    else if (IS_PATH_SEP (*p1))
+        ret_val = -1;
+    else if (IS_PATH_SEP (*p2))
+        ret_val = 1;
+    else
+        ret_val = (*p1 - *p2);
+
+    return ret_val;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+decode (char *buffer)
+{
+    char *res, *p, *q;
+
+    res = g_strdup (buffer);
+
+    for (p = q = res; *p != '\0'; p++, q++)
+    {
+        if (*p == '\n')
+        {
+            *q = '\0';
+            return res;
+        }
+
+        if (*p != '\\')
+        {
+            *q = *p;
+            continue;
+        }
+
+        p++;
+
+        switch (*p)
+        {
+        case 'n':
+            *q = '\n';
+            break;
+        case '\\':
+            *q = '\\';
+            break;
+        default:
+            break;
+        }
+    }
+
+    *q = *p;
+
+    return res;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Loads the tree store from the specified filename */
+
+static int
+tree_store_load_from (const char *name)
+{
+    FILE *file;
+    char buffer[MC_MAXPATHLEN + 20];
+
+    g_return_val_if_fail (name != NULL, 0);
+
+    if (ts.loaded)
+        return 1;
+
+    file = fopen (name, "r");
+
+    if (file != NULL
+        && (fgets (buffer, sizeof (buffer), file) == NULL
+            || strncmp (buffer, TREE_SIGNATURE, strlen (TREE_SIGNATURE)) != 0))
+    {
+        fclose (file);
+        file = NULL;
+    }
+
+    if (file != NULL)
+    {
+        char oldname[MC_MAXPATHLEN] = "\0";
+
+        ts.loaded = TRUE;
+
+        /* File open -> read contents */
+        while (fgets (buffer, MC_MAXPATHLEN, file))
+        {
+            tree_entry *e;
+            gboolean scanned;
+            char *lc_name;
+
+            /* Skip invalid records */
+            if (buffer[0] != '0' && buffer[0] != '1')
+                continue;
+
+            if (buffer[1] != ':')
+                continue;
+
+            scanned = buffer[0] == '1';
+
+            lc_name = decode (buffer + 2);
+            if (!IS_PATH_SEP (lc_name[0]))
+            {
+                /* Clear-text decompression */
+                char *s;
+
+                s = strtok (lc_name, " ");
+                if (s != NULL)
+                {
+                    char *different;
+                    int common;
+
+                    common = atoi (s);
+                    different = strtok (NULL, "");
+                    if (different != NULL)
+                    {
+                        vfs_path_t *vpath;
+
+                        vpath = vfs_path_from_str (oldname);
+                        g_strlcpy (oldname + common, different, sizeof (oldname) - (size_t) common);
+                        if (vfs_file_is_local (vpath))
+                        {
+                            vfs_path_t *tmp_vpath;
+
+                            tmp_vpath = vfs_path_from_str (oldname);
+                            e = tree_store_add_entry (tmp_vpath);
+                            vfs_path_free (tmp_vpath, TRUE);
+                            e->scanned = scanned;
+                        }
+                        vfs_path_free (vpath, TRUE);
+                    }
+                }
+            }
+            else
+            {
+                vfs_path_t *vpath;
+
+                vpath = vfs_path_from_str (lc_name);
+                if (vfs_file_is_local (vpath))
+                {
+                    e = tree_store_add_entry (vpath);
+                    e->scanned = scanned;
+                }
+                vfs_path_free (vpath, TRUE);
+                g_strlcpy (oldname, lc_name, sizeof (oldname));
+            }
+            g_free (lc_name);
+        }
+
+        fclose (file);
+    }
+
+    /* Nothing loaded, we add some standard directories */
+    if (!ts.tree_first)
+    {
+        vfs_path_t *tmp_vpath;
+
+        tmp_vpath = vfs_path_from_str (PATH_SEP_STR);
+        tree_store_add_entry (tmp_vpath);
+        tree_store_rescan (tmp_vpath);
+        vfs_path_free (tmp_vpath, TRUE);
+        ts.loaded = TRUE;
+    }
+
+    return 1;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static char *
+encode (const vfs_path_t * vpath, size_t offset)
+{
+    return strutils_escape (vfs_path_as_str (vpath) + offset, -1, "\n\\", FALSE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Saves the tree to the specified filename */
+
+static int
+tree_store_save_to (char *name)
+{
+    tree_entry *current;
+    FILE *file;
+
+    file = fopen (name, "w");
+    if (file == NULL)
+        return errno;
+
+    fprintf (file, "%s\n", TREE_SIGNATURE);
+
+    for (current = ts.tree_first; current != NULL; current = current->next)
+        if (vfs_file_is_local (current->name))
+        {
+            int i, common;
+
+            /* Clear-text compression */
+            if (current->prev != NULL
+                && (common = str_common (current->prev->name, current->name)) > 2)
+            {
+                char *encoded;
+
+                encoded = encode (current->name, common);
+                i = fprintf (file, "%d:%d %s\n", current->scanned ? 1 : 0, common, encoded);
+                g_free (encoded);
+            }
+            else
+            {
+                char *encoded;
+
+                encoded = encode (current->name, 0);
+                i = fprintf (file, "%d:%s\n", current->scanned ? 1 : 0, encoded);
+                g_free (encoded);
+            }
+
+            if (i == EOF)
+            {
+                fprintf (stderr, _("Cannot write to the %s file:\n%s\n"),
+                         name, unix_error_string (errno));
+                break;
+            }
+        }
+
+    tree_store_dirty (FALSE);
+    fclose (file);
+
+    return 0;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static tree_entry *
+tree_store_add_entry (const vfs_path_t * name)
+{
+    int flag = -1;
+    tree_entry *current;
+    tree_entry *old = NULL;
+    tree_entry *new;
+    int submask = 0;
+
+    if (ts.tree_last != NULL && ts.tree_last->next != NULL)
+        abort ();
+
+    /* Search for the correct place */
+    for (current = ts.tree_first;
+         current != NULL && (flag = pathcmp (current->name, name)) < 0; current = current->next)
+        old = current;
+
+    if (flag == 0)
+        return current;         /* Already in the list */
+
+    /* Not in the list -> add it */
+    new = g_new0 (tree_entry, 1);
+    if (current == NULL)
+    {
+        /* Append to the end of the list */
+        if (ts.tree_first == NULL)
+        {
+            /* Empty list */
+            ts.tree_first = new;
+            new->prev = NULL;
+        }
+        else
+        {
+            if (old != NULL)
+                old->next = new;
+            new->prev = old;
+        }
+        new->next = NULL;
+        ts.tree_last = new;
+    }
+    else
+    {
+        /* Insert in to the middle of the list */
+        new->prev = old;
+        if (old != NULL)
+        {
+            /* Yes, in the middle */
+            new->next = old->next;
+            old->next = new;
+        }
+        else
+        {
+            /* Nope, in the beginning of the list */
+            new->next = ts.tree_first;
+            ts.tree_first = new;
+        }
+        new->next->prev = new;
+    }
+
+    /* Calculate attributes */
+    new->name = vfs_path_clone (name);
+    new->sublevel = vfs_path_tokens_count (new->name);
+
+    {
+        const char *new_name;
+
+        new_name = vfs_path_get_last_path_str (new->name);
+        new->subname = strrchr (new_name, PATH_SEP);
+        if (new->subname == NULL)
+            new->subname = new_name;
+        else
+            new->subname++;
+    }
+
+    if (new->next != NULL)
+        submask = new->next->submask;
+
+    submask |= 1 << new->sublevel;
+    submask &= (2 << new->sublevel) - 1;
+    new->submask = submask;
+    new->mark = FALSE;
+
+    /* Correct the submasks of the previous entries */
+    for (current = new->prev;
+         current != NULL && current->sublevel > new->sublevel; current = current->prev)
+        current->submask |= 1 << new->sublevel;
+
+    tree_store_dirty (TRUE);
+    return new;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+tree_store_notify_remove (tree_entry * entry)
+{
+    hook_t *p;
+
+    for (p = remove_entry_hooks; p != NULL; p = p->next)
+    {
+        tree_store_remove_fn r = (tree_store_remove_fn) p->hook_fn;
+
+        r (entry, p->hook_data);
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static tree_entry *
+remove_entry (tree_entry * entry)
+{
+    tree_entry *current = entry->prev;
+    long submask = 0;
+    tree_entry *ret = NULL;
+
+    tree_store_notify_remove (entry);
+
+    /* Correct the submasks of the previous entries */
+    if (entry->next != NULL)
+        submask = entry->next->submask;
+
+    for (; current != NULL && current->sublevel > entry->sublevel; current = current->prev)
+    {
+        submask |= 1 << current->sublevel;
+        submask &= (2 << current->sublevel) - 1;
+        current->submask = submask;
+    }
+
+    /* Unlink the entry from the list */
+    if (entry->prev != NULL)
+        entry->prev->next = entry->next;
+    else
+        ts.tree_first = entry->next;
+
+    if (entry->next != NULL)
+        entry->next->prev = entry->prev;
+    else
+        ts.tree_last = entry->prev;
+
+    /* Free the memory used by the entry */
+    vfs_path_free (entry->name, TRUE);
+    g_free (entry);
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+process_special_dirs (GList ** special_dirs, const char *file)
+{
+    gchar **start_buff;
+    mc_config_t *cfg;
+
+    cfg = mc_config_init (file, TRUE);
+    if (cfg == NULL)
+        return;
+
+    start_buff = mc_config_get_string_list (cfg, "Special dirs", "list", NULL);
+    if (start_buff != NULL)
+    {
+        gchar **buffers;
+
+        for (buffers = start_buff; *buffers != NULL; buffers++)
+        {
+            *special_dirs = g_list_prepend (*special_dirs, *buffers);
+            *buffers = NULL;
+        }
+
+        g_strfreev (start_buff);
+    }
+    mc_config_deinit (cfg);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static gboolean
+should_skip_directory (const vfs_path_t * vpath)
+{
+    static GList *special_dirs = NULL;
+    GList *l;
+    static gboolean loaded = FALSE;
+    gboolean ret = FALSE;
+
+    if (!loaded)
+    {
+        const char *profile_name;
+
+        profile_name = setup_init ();
+        process_special_dirs (&special_dirs, profile_name);
+        process_special_dirs (&special_dirs, mc_global.profile_name);
+
+        loaded = TRUE;
+    }
+
+    for (l = special_dirs; l != NULL; l = g_list_next (l))
+        if (strncmp (vfs_path_as_str (vpath), l->data, strlen (l->data)) == 0)
+        {
+            ret = TRUE;
+            break;
+        }
+
+    return ret;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+static void
+queue_vpath_free (gpointer data)
+{
+    vfs_path_free ((vfs_path_t *) data, TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/*** public functions ****************************************************************************/
+/* --------------------------------------------------------------------------------------------- */
+
+/* Searches for specified directory */
+tree_entry *
+tree_store_whereis (const vfs_path_t * name)
+{
+    tree_entry *current;
+    int flag = -1;
+
+    for (current = ts.tree_first;
+         current != NULL && (flag = pathcmp (current->name, name)) < 0; current = current->next)
+        ;
+
+    return flag == 0 ? current : NULL;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+struct TreeStore *
+tree_store_get (void)
+{
+    return &ts;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * \fn int tree_store_load(void)
+ * \brief Loads the tree from the default location
+ * \return 1 if success (true), 0 otherwise (false)
+ */
+
+int
+tree_store_load (void)
+{
+    char *name;
+    int retval;
+
+    name = mc_config_get_full_path (MC_TREESTORE_FILE);
+    retval = tree_store_load_from (name);
+    g_free (name);
+
+    return retval;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/**
+ * \fn int tree_store_save(void)
+ * \brief Saves the tree to the default file in an atomic fashion
+ * \return 0 if success, errno on error
+ */
+
+int
+tree_store_save (void)
+{
+    char *name;
+    int retval;
+
+    name = mc_config_get_full_path (MC_TREESTORE_FILE);
+    mc_util_make_backup_if_possible (name, ".tmp");
+
+    retval = tree_store_save_to (name);
+    if (retval != 0)
+        mc_util_restore_from_backup_if_possible (name, ".tmp");
+    else
+        mc_util_unlink_backup_if_possible (name, ".tmp");
+
+    g_free (name);
+    return retval;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+tree_store_add_entry_remove_hook (tree_store_remove_fn callback, void *data)
+{
+    add_hook (&remove_entry_hooks, (void (*)(void *)) callback, data);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+tree_store_remove_entry_remove_hook (tree_store_remove_fn callback)
+{
+    delete_hook (&remove_entry_hooks, (void (*)(void *)) callback);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+void
+tree_store_remove_entry (const vfs_path_t * name_vpath)
+{
+    tree_entry *current, *base;
+    size_t len;
+
+    g_return_if_fail (name_vpath != NULL);
+
+    /* Miguel Ugly hack */
+    {
+        gboolean is_root;
+        const char *name_vpath_str;
+
+        name_vpath_str = vfs_path_as_str (name_vpath);
+        is_root = (IS_PATH_SEP (name_vpath_str[0]) && name_vpath_str[1] == '\0');
+        if (is_root)
+            return;
+    }
+    /* Miguel Ugly hack end */
+
+    base = tree_store_whereis (name_vpath);
+    if (base == NULL)
+        return;                 /* Doesn't exist */
+
+    len = vfs_path_len (base->name);
+    current = base->next;
+    while (current != NULL && vfs_path_equal_len (current->name, base->name, len))
+    {
+        gboolean ok;
+        tree_entry *old;
+        const char *cname;
+
+        cname = vfs_path_as_str (current->name);
+        ok = (cname[len] == '\0' || IS_PATH_SEP (cname[len]));
+        if (!ok)
+            break;
+
+        old = current;
+        current = current->next;
+        remove_entry (old);
+    }
+    remove_entry (base);
+    tree_store_dirty (TRUE);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** This subdirectory exists -> clear deletion mark */
+
+void
+tree_store_mark_checked (const char *subname)
+{
+    vfs_path_t *name;
+    tree_entry *current, *base;
+    int flag = 1;
+    const char *cname;
+
+    if (!ts.loaded)
+        return;
+
+    if (ts.check_name == NULL)
+        return;
+
+    /* Calculate the full name of the subdirectory */
+    if (DIR_IS_DOT (subname) || DIR_IS_DOTDOT (subname))
+        return;
+
+    cname = vfs_path_as_str (ts.check_name);
+    if (IS_PATH_SEP (cname[0]) && cname[1] == '\0')
+        name = vfs_path_build_filename (PATH_SEP_STR, subname, (char *) NULL);
+    else
+        name = vfs_path_append_new (ts.check_name, subname, (char *) NULL);
+
+    /* Search for the subdirectory */
+    for (current = ts.check_start;
+         current != NULL && (flag = pathcmp (current->name, name)) < 0; current = current->next)
+        ;
+
+    if (flag != 0)
+    {
+        /* Doesn't exist -> add it */
+        current = tree_store_add_entry (name);
+        ts.add_queue_vpath = g_list_prepend (ts.add_queue_vpath, name);
+    }
+    else
+        vfs_path_free (name, TRUE);
+
+    /* Clear the deletion mark from the subdirectory and its children */
+    base = current;
+    if (base != NULL)
+    {
+        size_t len;
+
+        len = vfs_path_len (base->name);
+        base->mark = FALSE;
+        for (current = base->next;
+             current != NULL && vfs_path_equal_len (current->name, base->name, len);
+             current = current->next)
+        {
+            gboolean ok;
+
+            cname = vfs_path_as_str (current->name);
+            ok = (cname[len] == '\0' || IS_PATH_SEP (cname[len]) || len == 1);
+            if (!ok)
+                break;
+
+            current->mark = FALSE;
+        }
+    }
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Mark the subdirectories of the current directory for delete */
+
+tree_entry *
+tree_store_start_check (const vfs_path_t * vpath)
+{
+    tree_entry *current, *retval;
+    size_t len;
+
+    if (!ts.loaded)
+        return NULL;
+
+    g_return_val_if_fail (ts.check_name == NULL, NULL);
+    ts.check_start = NULL;
+
+    /* Search for the start of subdirectories */
+    current = tree_store_whereis (vpath);
+    if (current == NULL)
+    {
+        struct stat s;
+
+        if (mc_stat (vpath, &s) == -1 || !S_ISDIR (s.st_mode))
+            return NULL;
+
+        current = tree_store_add_entry (vpath);
+        ts.check_name = vfs_path_clone (vpath);
+
+        return current;
+    }
+
+    ts.check_name = vfs_path_clone (vpath);
+
+    retval = current;
+
+    /* Mark old subdirectories for delete */
+    ts.check_start = current->next;
+    len = vfs_path_len (ts.check_name);
+
+    for (current = ts.check_start;
+         current != NULL && vfs_path_equal_len (current->name, ts.check_name, len);
+         current = current->next)
+    {
+        gboolean ok;
+        const char *cname;
+
+        cname = vfs_path_as_str (current->name);
+        ok = (cname[len] == '\0' || IS_PATH_SEP (cname[len]) || len == 1);
+        if (!ok)
+            break;
+
+        current->mark = TRUE;
+    }
+
+    return retval;
+}
+
+/* --------------------------------------------------------------------------------------------- */
+/** Delete subdirectories which still have the deletion mark */
+
+void
+tree_store_end_check (void)
+{
+    tree_entry *current;
+    size_t len;
+    GList *the_queue;
+
+    if (!ts.loaded)
+        return;
+
+    g_return_if_fail (ts.check_name != NULL);
+
+    /* Check delete marks and delete if found */
+    len = vfs_path_len (ts.check_name);
+
+    current = ts.check_start;
+    while (current != NULL && vfs_path_equal_len (current->name, ts.check_name, len))
+    {
+        gboolean ok;
+        tree_entry *old;
+        const char *cname;
+
+        cname = vfs_path_as_str (current->name);
+        ok = (cname[len] == '\0' || IS_PATH_SEP (cname[len]) || len == 1);
+        if (!ok)
+            break;
+
+        old = current;
+        current = current->next;
+        if (old->mark)
+            remove_entry (old);
+    }
+
+    /* get the stuff in the scan order */
+    the_queue = g_list_reverse (ts.add_queue_vpath);
+    ts.add_queue_vpath = NULL;
+    vfs_path_free (ts.check_name, TRUE);
+    ts.check_name = NULL;
+
+    g_list_free_full (the_queue, queue_vpath_free);
+}
+
+/* --------------------------------------------------------------------------------------------- */
+
+tree_entry *
+tree_store_rescan (const vfs_path_t * vpath)
+{
+    DIR *dirp;
+    struct stat buf;
+    tree_entry *entry;
+
+    if (should_skip_directory (vpath))
+    {
+        entry = tree_store_add_entry (vpath);
+        entry->scanned = TRUE;
+        return entry;
+    }
+
+    entry = tree_store_start_check (vpath);
+    if (entry == NULL)
+        return NULL;
+
+    dirp = mc_opendir (vpath);
+    if (dirp != NULL)
+    {
+        struct vfs_dirent *dp;
+
+        for (dp = mc_readdir (dirp); dp != NULL; dp = mc_readdir (dirp))
+            if (!DIR_IS_DOT (dp->d_name) && !DIR_IS_DOTDOT (dp->d_name))
+            {
+                vfs_path_t *tmp_vpath;
+
+                tmp_vpath = vfs_path_append_new (vpath, dp->d_name, (char *) NULL);
+                if (mc_lstat (tmp_vpath, &buf) != -1 && S_ISDIR (buf.st_mode))
+                    tree_store_mark_checked (dp->d_name);
+                vfs_path_free (tmp_vpath, TRUE);
+            }
+
+        mc_closedir (dirp);
+    }
+    tree_store_end_check ();
+    entry->scanned = TRUE;
+
+    return entry;
+}
+
+/* --------------------------------------------------------------------------------------------- */
diff --git a/src/filemanager/treestore.h b/src/filemanager/treestore.h
new file mode 100644
index 0000000..34e15a9
--- /dev/null
+++ b/src/filemanager/treestore.h
@@ -0,0 +1,63 @@
+/** \file treestore.h
+ *  \brief Header: tree store
+ *
+ *  Contains a storage of the file system tree representation.
+ */
+
+#ifndef MC__TREE_STORE_H
+#define MC__TREE_STORE_H
+
+/*** typedefs(not structures) and defined constants **********************************************/
+
+/*
+ * Register/unregister notification functions for "entry_remove"
+ */
+struct tree_entry;
+typedef void (*tree_store_remove_fn) (struct tree_entry * tree, void *data);
+
+/*** enums ***************************************************************************************/
+
+/*** structures declarations (and typedefs of structures)*****************************************/
+
+typedef struct tree_entry
+{
+    vfs_path_t *name;           /* The full path of directory */
+    int sublevel;               /* Number of parent directories (slashes) */
+    long submask;               /* Bitmask of existing sublevels after this entry */
+    const char *subname;        /* The last part of name (the actual name) */
+    gboolean mark;              /* Flag: Is this entry marked (e. g. for delete)? */
+    gboolean scanned;           /* Flag: childs scanned or not */
+    struct tree_entry *next;    /* Next item in the list */
+    struct tree_entry *prev;    /* Previous item in the list */
+} tree_entry;
+
+struct TreeStore
+{
+    tree_entry *tree_first;     /* First entry in the list */
+    tree_entry *tree_last;      /* Last entry in the list */
+    tree_entry *check_start;    /* Start of checked subdirectories */
+    vfs_path_t *check_name;
+    GList *add_queue_vpath;     /* List of vfs_path_t objects of added directories */
+    gboolean loaded;
+    gboolean dirty;
+};
+
+/*** global variables defined in .c file *********************************************************/
+
+/*** declarations of public functions ************************************************************/
+
+struct TreeStore *tree_store_get (void);
+int tree_store_load (void);
+int tree_store_save (void);
+void tree_store_remove_entry (const vfs_path_t * name_vpath);
+tree_entry *tree_store_start_check (const vfs_path_t * vpath);
+void tree_store_mark_checked (const char *subname);
+void tree_store_end_check (void);
+tree_entry *tree_store_whereis (const vfs_path_t * name);
+tree_entry *tree_store_rescan (const vfs_path_t * vpath);
+
+void tree_store_add_entry_remove_hook (tree_store_remove_fn callback, void *data);
+void tree_store_remove_entry_remove_hook (tree_store_remove_fn callback);
+
+/*** inline functions ****************************************************************************/
+#endif /* MC__TREE_STORE_H */