-list_browse(){
- meta="$_DATA/$ITEM/.index/meta"
- meta_dir "$_DATA/$ITEM"
- (cd "$_DATA/$ITEM";
- find ./ -type d \! -name .index -mindepth 1 -maxdepth 1 \
- ) | cut -d/ -f2- | sort
- sort -n "$meta" | cut -f6- \
- | while f="$(line)"; do
- [ -e "$_DATA/$ITEM/$f" ] && printf '%s\n' "$f"
- done
+list_order(){
+ local fm fn fn al length ln h w t c name buffer l
+
+ if [ $ORDER = Name ]; then
+ sort -k6 |sed 's;^;metashort\t;;'
+ elif [ $ORDER = Group ]; then
+ sed -E '
+ :X
+ s;^([^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^ 0-9]*)-([0-9a-zA-Z_-]{11}\r|ph[0-9a-f]{13}\r|[0-9]{8}\r)(.*)$;\1-\r\3 \2\n;;
+ t;
+ s;^([^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^ 0-9]*)([0-9]+)(.*)$;\1\r\3 \2;;
+ tX;' \
+ | { sort -n -k7 -k8 -k9 -k10 -k11 |sort -s -k6,6 ; echo '0 0 0 tags= comment= _'; } \
+ | while read -r length h w t c name; do
+ if [ "${ln%% *}" = "${name%% *}" ]; then
+ al=$((al + length))
+ buffer="${buffer}${BR}$length $h $w $t $c $name"
+ else
+ printf '%s\n' "$buffer" |while read -r l; do
+ [ "$l" ] && printf '%s %s\n' "$al" "$l"
+ done
+ al="$length"
+ buffer="$length $h $w $t $c $name"
+ fi
+ ln="$name"
+ done \
+ | sort -s -n -k1,1 |sed -E 's;^[0-9]+\t;metashort\t;;' \
+ | sed -E ':X s;^([^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^\t]+\t[^\r]*)\r([^ ]*) ([^ ]+)( .*)?$;\1\3\2\4;; tX'
+ elif [ $ORDER = Length ]; then
+ sort -sn -k1 |sed 's;^;metashort\t;;'
+ elif [ $ORDER = Date ]; then
+ while read -r fm; do
+ sn="${fm##* }"
+ fn="$(list_fullname "$(UNSTRING "${sn%${CR}}")")"
+ printf '%i %s %s\n' \
+ "$(stat -c %Y "$fn")" "${fm% *}" "$fn"
+ done \
+ | sort -srn -k1 |sed -E 's;^[0-9]+\t;metalong\t;;'
+ fi