From f512bda08c3be58a774b9b16cb6649f08e159898 Mon Sep 17 00:00:00 2001 From: Sven Wischnowsky Date: Mon, 2 Apr 2001 12:28:57 +0000 Subject: moved to ./Functions/Example/zls --- Functions/Misc/zls | 72 ------------------------------------------------------ 1 file changed, 72 deletions(-) delete mode 100644 Functions/Misc/zls (limited to 'Functions/Misc/zls') diff --git a/Functions/Misc/zls b/Functions/Misc/zls deleted file mode 100644 index 22138cd6c..000000000 --- a/Functions/Misc/zls +++ /dev/null @@ -1,72 +0,0 @@ -# zls () { -# simple internal ls using the stat module - -zmodload -i stat || return 1 - -emulate -R zsh -setopt localoptions - -local f opts='' L=L mod=: dirs list -typeset -A stat - -dirs=() -list=() - -while getopts ailLFdtuc f -do - opts=$opts$f - if [[ $f == '?' ]] then - echo Usage: $0 [ -ailLFd ] [ filename ... ] - return 1 - fi -done -shift OPTIND-1 - -[[ $opts == *L* ]] && L='' -[[ $opts == *F* ]] && mod=T$mod -[[ $opts == *a* ]] && setopt globdots - -local time=mtime tmod=m -[[ $opts == *u* ]] && time=atime tmod=a -[[ $opts == *c* ]] && time=ctime tmod=c - -if ((! ARGC)) then - if [[ $opts = *t* ]]; then - set *(o$tmod) - else - set * - fi - opts=d$opts -elif [[ $opts = *t* && $ARGC -gt 1 ]]; then - # another glaringly obvious zsh trick: reorder the argv list - # by time, without messing up metacharacters inside - local n='$1' - for (( f = 2; f <= $ARGC; f++ )); do - n="$n|\$$f" - done - eval "argv=(($n)(o$tmod))" -fi - -for f in $* -do - stat -s$L -H stat -F "%b %e %H:%M" - $f || continue - if [[ $opts != *d* && $stat[mode] == d* ]] then - dirs=( $dirs $f ) - elif [[ $opts == *l* ]] then - [[ $opts == *i* ]] && print -n "${(l:7:)stat[inode]} " - [[ -n $stat[link] ]] && f=( $f '->' $stat[link] ) || f=( $f($mod) ) - print -r -- "$stat[mode] ${(l:3:)stat[nlink]} ${(r:8:)stat[uid]} " \ - "${(r:8:)stat[gid]} ${(l:8:)stat[size]} $stat[$time] $f" - else - f=( $f($mod) ) - list=( "$list[@]" "${${(M)opts:%*i*}:+${(l:7:)stat[inode]} }$f" ) - fi -done -(($#list)) && print -cr -- "$list[@]" -while (($#dirs)) do - ((ARGC > $#dirs)) && echo - ((ARGC > 1)) && echo $dirs[1]: - (cd $dirs[1] && $0 -d$opts) - shift dirs -done -# } -- cgit 1.4.1