|
DataMuseum.dkPresents historical artifacts from the history of: ICL Comet 32 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about ICL Comet 32 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 716 (0x2cc)
Types: TextFile
Notes: UNIX file
Names: »list«
└─⟦26887b7e0⟧ Bits:30009717 Comet 32 harddisk image
└─⟦28c352965⟧ »/a« UNIX Filesystem
└─⟦this⟧ »sys/vers/list«
#! /bin/sh
if test $1; then dir=$1; else dir="/"; fi
if test $2; then ign=$2; else ign=/dev/null; fi
case $dir in
"/")
dirp="/"
;;
*)
dirp="$dir/"
;;
esac
awkcmd="
BEGIN { dirp = \"$dirp\" }
NF==1 { dirp = sprintf(\"%s/\", substr(\$0, 1, length-1)) }
NF>2 && /^-/ \
{ printf(\"%s %3s %-8s %7s %s%s\\n\", \$1,\$2,\$3,\$4,dirp,\$8) }
NF>2 && /^d/ \
{ printf(\"%s %3s %-8s %7s %s%s\\n\", \$1,\"-\",\$3,\"-\",dirp,\$8) }
NF>2 && /^(b|c)/ \
{ printf(\"%s %3s %-8s %4s%3s %s%s\\n\", \$1,\$2,\$3,\$4,\$5,dirp,\$9) }
"
sed -e '/^#/d' -e '/^[ ]*$/d' \
-e 's#/#\\/#g' -e 's#\.#\\.#g' -e 's#\*#.*#g' \
-e 's#\?#.#g' -e 's#^#/ #' -e 's#$#/d#' $ign > /tmp/ign$$
ls -lRW $dir | awk "$awkcmd" | sed -f /tmp/ign$$