-#!/bin/sh
+#!/bin/bash
isnum() {
grep -xq '[0-9]\+' <<<"$1"
}
+scorefile() {
+ if [ "${1##*.}" = mkv ]; then
+ echo 10
+ elif [ "${1##*.}" = ogm ]; then
+ echo 5
+ else
+ echo 0
+ fi
+}
+
+findbase() {
+ if [ -r aliases ]; then
+ while read alias rest; do
+ if [ "$alias" = "$1" ]; then
+ echo "$rest"
+ return
+ fi
+ done <aliases
+ fi
+ echo "$1"
+}
+
findfile() {
- local file tail eq eqt m
- for file in "$1"*; do
- tail="${file#$1}"
+ if [ -n "$debug" ]; then echo "finding base='$1', ep='$2', qual='$3'" >&2; fi
+ local base file tail eq eqt m matches max score
+ matches=()
+ base="$(findbase "$1")"
+ for file in "$base"*; do
+ tail="${file#"$base"}"
eq="${tail%.*}"
m=n
if [ "${eq%% *}" -eq "$2" ] 2>/dev/null; then
fi
fi
if [ "$m" = y ]; then
- if [ "$eqt" = "$3" -o "$eqt" = "($3)" ]; then
- echo "$file"
- return 0
+ if [ "$eqt" = "$3" -o "$eqt" = "($3)" -o "${eqt:0:2}" = "- " ]; then
+ matches=("${matches[@]}" "$file")
fi
fi
done
- return 1
+ if [ ${#matches[@]} -lt 1 ]; then return 1; fi
+ max=
+ for m in "${matches[@]}"; do
+ score="$(scorefile "$m")"
+ if [ -n "$debug" ]; then echo "found \`$m': score $score" >&2; fi
+ if [ -z "$max" ] || [ "$score" -gt "$max" ]; then
+ max="$score"
+ file="$m"
+ fi
+ done
+ if [ -n "$debug" ]; then echo "using \`$file'" >&2; fi
+ echo "$file"
+ return 0
}
origargs=("$0" "$@")
-cmdline=(mplayer -fs)
+cmdline=(mpv -fs)
+debug=
+log=y
+unset pretend printfile
while [ "${1:0:1}" = - ]; do
a="$1"
shift
case "$a" in
-h)
- echo "usage: planime [-ht] [-s PAR VAL] [NAME-QUAL] [EP|.] [TYPE-QUAL]" >&2
+ echo "usage: planime [-fdhtCL] [-A PLAYER-ARGS... ;] [-s PAR VAL] [--] [NAME-QUAL] [EP|.] [TYPE-QUAL]" >&2
exit 0
;;
+ -d)
+ debug=y
+ ;;
-t)
- cmdline=("${cmdline[@]}" -ao oss:/dev/dsp1)
+ cmdline=("${cmdline[@]}" -ao 'alsa:device=[hw:3,7]')
+ DISPLAY=:1
+ chwp=y
+ ;;
+ -C)
+ pretend=y
+ ;;
+ -L)
+ log=
+ ;;
+ -A)
+ while :; do
+ if [ $# -lt 1 ]; then
+ echo "planime: unterminated argument list" >&2
+ exit 1
+ fi
+ a="$1"
+ shift
+ if [ "$a" = \; ]; then
+ break;
+ fi
+ cmdline=("${cmdline[@]}" "$a")
+ done
;;
-s)
savepar="$1"
saveval="$1"
shift
;;
+ -f)
+ printfile=y
+ ;;
+ -v)
+ cmdline=("${cmdline[@]}" -v)
+ ;;
+ --)
+ break
+ ;;
+ *)
+ echo "planime: unknown option \`$a'"
+ exit 1
+ ;;
esac
done
-base="$(basename "$(pwd)")"
+dirbase="$(basename "$(pwd)")"
+base=.
nextep=n
file=
tqual=
if [ -r "$1" ]; then
file="$1"
else
- if findfile "$base - " "$1" >/dev/null; then
- ep="$1"
- else
- nextep=y
- base="$base $1"
- fi
+ base=
+ ep="$1"
fi
elif [ $# -eq 2 ]; then
- if findfile "$base - " "$1" "$2" >/dev/null; then
+ if findfile "$dirbase - " "$1" "$2" >/dev/null; then
+ base=""
ep="$1"
tqual="$2"
else
- base="$base $1"
+ base="$1"
ep="$2"
fi
else
- base="$base $1"
+ base="$1"
ep="$2"
tqual="$3"
fi
exit 1
fi
fi
-file="$(findfile "$base - " "$ep" "$qual")"
+if [ -z "$file" ]; then
+ if [ "$base" = . ]; then
+ if [ -r curser ]; then
+ curser="$(<curser)"
+ else
+ curser=
+ fi
+ else
+ curser="$(findbase "$base")"
+ fi
+ if [ -n "$curser" ]; then
+ file="$(findfile "$dirbase $curser - " "$ep" "$tqual")" || \
+ file="$(findfile "$curser - " "$ep" "$tqual")"
+ else
+ file="$(findfile "$dirbase - " "$ep" "$tqual")"
+ fi
+fi
if [ -z "$file" -o ! -r "$file" ]; then
echo "planime: no matching file found" >&2
case "${file##*.}" in
ogm)
- defopts=(-aid 1 -sid 0)
+ aid=1
+ sid=0
;;
mkv)
- defopts=(-slang eng -alang jpn)
+ alang=jpn
+ slang=eng
;;
esac
-ifile=".${ep}.info"
+ifile=".${file}.info"
if [ -n "$savepar" ]; then
if [ -r "$ifile" ]; then
- egrep -v "^${savepar}:" "$ifile" >"$ifile.new"
+ egrep -v "^${savepar} " "$ifile" >"$ifile.new"
mv -f "$ifile.new" "$ifile"
fi
- echo "$savepar: $saveval" >>"$ifile"
+ echo "$savepar $saveval" >>"$ifile"
exit 0
fi
unset delay
if [ -r "$ifile" ]; then
- delay="$(sed -n 's/delay *: *\([^ ]*\)$/\1/p' <"$ifile")"
- cmdline=("${cmdline[@]}" -delay "$delay")
-else
- cmdline=("${cmdline[@]}" "${defopts[@]}")
+ exec 3<&0
+ exec 0<"$ifile"
+ while read par arg; do
+ if [ "$par" = delay ]; then
+ cmdline=("${cmdline[@]}" -delay "$arg")
+ elif [ "$par" = aspect ]; then
+ cmdline=("${cmdline[@]}" -aspect "$arg")
+ elif [ "$par" = volmod ]; then
+ cmdline=("${cmdline[@]}" -af volume="$arg")
+ elif [ "$par" = alang ]; then
+ unset alang aid
+ alang="$arg"
+ elif [ "$par" = aid ]; then
+ unset alang aid
+ aid="$arg"
+ elif [ "$par" = slang ]; then
+ unset slang sid
+ slang="$arg"
+ elif [ "$par" = sid ]; then
+ unset slang sid
+ sid="$arg"
+ fi
+ done
+ exec 0<&3
+ exec 3<&-
fi
-if [ "`hostname`" = pc6 ]; then chwp=y; fi
-
-if [ "$chwp" = y ]; then (sleep 2; randomwp) & fi
-"${cmdline[@]}" "$file"
+if [ -n "$alang" ]; then
+ cmdline=("${cmdline[@]}" -alang "$alang")
+elif [ -n "$aid" ]; then
+ cmdline=("${cmdline[@]}" -aid "$((aid + 1))")
+fi
+if [ -n "$slang" ]; then
+ cmdline=("${cmdline[@]}" -slang "$slang")
+elif [ -n "$sid" ]; then
+ cmdline=("${cmdline[@]}" -sid "$((sid + 1))")
+fi
-if [ "$nextep" = y ]; then
- echo "0. Save and continue"
- echo "1. Continue without saving"
- echo "2. Save and exit"
- echo "3. Exit without saving"
- IFS= read -sn1 c
- save=n
- cont=n
- case "$c" in
- 0|" ")
- save=y
- cont=y
- ;;
- 1)
- cont=y
- ;;
- 2|"")
- save=y
- ;;
- esac
- if [ "$save" = y ]; then
- echo "$(($ep + 1))" >nextep
+if [ -n "$pretend" ]; then
+ echo "${cmdline[@]}" "$file"
+elif [ -n "$printfile" ]; then
+ echo "$file"
+else
+ if [ "$chwp" = y ]; then (sleep 2; randomwp) & fi
+ if [ "$log" = y ]; then
+ if [ -d $HOME/.anime ]; then
+ echo "$(date) $(basename "$file")" >>$HOME/.anime/plog
+ fi
fi
- if [ "$cont" = y ]; then
- exec "${origargs[@]}"
+ "${cmdline[@]}" "$file"
+
+ if [ "$nextep" = y ]; then
+ echo "0. Save and continue (or Space)"
+ echo "1. Continue without saving"
+ echo "2. Save and exit (or Enter)"
+ echo "3. Exit without saving (or any key)"
+ IFS= read -sn1 c
+ save=n
+ cont=n
+ case "$c" in
+ 0|" ")
+ save=y
+ cont=y
+ ;;
+ 1)
+ cont=y
+ ;;
+ 2|"")
+ save=y
+ ;;
+ esac
+ if [ "$save" = y ]; then
+ let ep++
+ echo "$ep" >nextep
+ fi
+ if [ "$cont" = y ]; then
+ exec "${origargs[@]}"
+ else
+ echo "nextep is $ep"
+ fi
fi
fi