ZerethShell — File Manager

ualz

#!/bin/sh
#
# Written by Pavel Roskin <proski@gnu.org>
# (C) 2005 The Free Software Foundation.
#
#

UNALZ=unalz

mcualz_list ()
{
	$UNALZ -l "$1" | gawk -v uid=`id -nu` -v gid=`id -ng` '
{
    if ($1 ~ /[0-9][0-9][:/][0-9][0-9][:/][0-9][0-9]$/)
    {
	# Kludge for non-POSIX date format in unalz 0.50
	split($1, date, "[/:]")
	if (length(date[1]) == 4) {
	    pdate = date[2] "/" date[3] "/" date[1]
	} else {
	    pdate = date[1] "/" date[2] "/" date[3]
	}

time=$2
	perm=$3
	size=$4
	sub(/^ *[^ ]* *[^ ]* *[^ ]* *[^ ]* *[^ ]* */, "")
	file=$0
	gsub(/\\/, "/", file)
	if (perm ~ /.D../)
		perm = "drwxr-xr-x"
	else
		perm = "-rw-r--r--"
	printf "%s 1 %s %s %d %s %s %s\n", perm, uid, gid, size, pdate, time, file
    }
}
'
}

mcualz_copyout ()
{
    TMPDIR=`mktemp -d ${MC_TMPDIR:-/tmp}/mctmpdir-ualz.XXXXXX` || exit 1

# This is a workaround for a bug in unalz 0.50 - it crashes if the
    # output directory is an absolute path.
    dir=`dirname "$TMPDIR/$2"`
    mkdir -p "$dir"

$UNALZ -d "$TMPDIR" "$1" "$2" >/dev/null
    cat "$TMPDIR/$2" > "$3"
    rm -rf "$TMPDIR"
}

# override any locale for dates
LC_ALL=C
export LC_ALL
umask 077

cmd="$1"
shift

case "$cmd" in
  list)    mcualz_list    "$@" ;;
  copyout) mcualz_copyout "$@" ;;
  *) exit 1 ;;
esac

exit 0

Vazgeç