planime

   1 #!/bin/bash
   2
   3 isnum() {
   4     grep -xq '[0-9]\+' <<<"$1"
   5 }
   6
   7 scorefile() {
   8     if [ "${1##*.}" = mkv ]; then
   9         echo 10
  10     elif [ "${1##*.}" = ogm ]; then
  11         echo 5
  12     else
  13         echo 0
  14     fi
  15 }
  16
  17 findfile() {
  18     if [ -n "$debug" ]; then echo "finding base='$1', ep='$2', qual='$3'" >&2; fi
  19     local file tail eq eqt m matches max score
  20     matches=()
  21     for file in "$1"*; do
  22         tail="${file#$1}"
  23         eq="${tail%.*}"
  24         m=n
  25         if [ "${eq%% *}" -eq "$2" ] 2>/dev/null; then
  26             if [[ "$eq" == *\ * ]]; then
  27                 eqt="${eq#* }"
  28             else
  29                 eqt=
  30             fi
  31             m=y
  32         elif [ "${eq:0:${#2}}" = "$2" ]; then
  33             eqt="${eq:${#2}}"
  34             if [ "${eqt:0:1}" = " " -o -z "$eqt" ]; then
  35                 eqt="${eqt# }"
  36                 m=y
  37             fi
  38         fi
  39         if [ "$m" = y ]; then
  40             if [ "$eqt" = "$3" -o "$eqt" = "($3)" ]; then
  41                 matches=("${matches[@]}" "$file")
  42             fi
  43         fi
  44     done
  45     if [ ${#matches[@]} -lt 1 ]; then return 1; fi
  46     max=
  47     for m in "${matches[@]}"; do
  48         score="$(scorefile "$m")"
  49         if [ -n "$debug" ]; then echo "found \`$m': score $score" >&2; fi
  50         if [ -z "$max" ] || [ "$score" -gt "$max" ]; then
  51             max="$score"
  52             file="$m"
  53         fi
  54     done
  55     if [ -n "$debug" ]; then echo "using \`$file'" >&2; fi
  56     echo "$file"
  57     return 0
  58 }
  59
  60 origargs=("$0" "$@")
  61 cmdline=(mplayer -fs -ass)
  62 debug=
  63 unset pretend printfile
  64
  65 while [ "${1:0:1}" = - ]; do
  66     a="$1"
  67     shift
  68     case "$a" in
  69         -h)
  70             echo "usage: planime [-fdhtC] [-A PLAYER-ARGS... ;] [-s PAR VAL] [--] [NAME-QUAL] [EP|.] [TYPE-QUAL]" >&2
  71             exit 0
  72             ;;
  73         -d)
  74             debug=y
  75             ;;
  76         -t)
  77             cmdline=("${cmdline[@]}" -ao oss:/dev/dsp1)
  78             ;;
  79         -C)
  80             pretend=y
  81             ;;
  82         -A)
  83             while :; do
  84                 a="$1"
  85                 shift
  86                 if [ "$a" = \; ]; then
  87                     break;
  88                 fi
  89                 cmdline=("${cmdline[@]}" "$a")
  90             done
  91             ;;
  92         -s)
  93             savepar="$1"
  94             shift
  95             saveval="$1"
  96             shift
  97             ;;
  98         -f)
  99             printfile=y
 100             ;;
 101         --)
 102             break
 103             ;;
 104         *)
 105             echo "planime: unknown option \`$a'"
 106             exit 1
 107             ;;
 108     esac
 109 done
 110
 111 dirbase="$(basename "$(pwd)")"
 112 base=.
 113 nextep=n
 114 file=
 115 tqual=
 116 if [ $# -eq 0 ]; then
 117     nextep=y
 118 elif [ $# -eq 1 ]; then
 119     if [ -r "$1" ]; then
 120         file="$1"
 121     else
 122         base=
 123         ep="$1"
 124     fi
 125 elif [ $# -eq 2 ]; then
 126     if findfile "$dirbase - " "$1" "$2" >/dev/null; then
 127         base=""
 128         ep="$1"
 129         tqual="$2"
 130     else
 131         base="$1"
 132         ep="$2"
 133     fi
 134 else
 135     base="$1"
 136     ep="$2"
 137     tqual="$3"
 138 fi
 139 if [ "$ep" = . ]; then nextep=y; fi
 140 if [ "$nextep" = y -a -r nextep ]; then
 141     ep="$(<nextep)"
 142     if ! isnum "$ep"; then
 143         echo "planime: nextep is non-numeric" >&2
 144         exit 1
 145     fi
 146 fi
 147 if [ -z "$file" ]; then
 148     if [ "$base" = . ]; then
 149         if [ -r curser ]; then
 150             curser="$(<curser)"
 151         else
 152             curser=
 153         fi
 154     else
 155         curser="$base"
 156     fi
 157     if [ -n "$curser" ]; then
 158         file="$(findfile "$dirbase $curser - " "$ep" "$tqual")" || \
 159             file="$(findfile "$curser - " "$ep" "$tqual")"
 160     else
 161         file="$(findfile "$dirbase - " "$ep" "$tqual")"
 162     fi
 163 fi
 164
 165 if [ -z "$file" -o ! -r "$file" ]; then
 166     echo "planime: no matching file found" >&2
 167     exit 1
 168 fi
 169
 170 case "${file##*.}" in
 171     ogm)
 172         aid=1
 173         sid=0
 174         ;;
 175     mkv)
 176         alang=jpn
 177         slang=eng
 178         ;;
 179 esac
 180
 181 ifile=".${file}.info"
 182
 183 if [ -n "$savepar" ]; then
 184     if [ -r "$ifile" ]; then
 185         egrep -v "^${savepar} " "$ifile" >"$ifile.new"
 186         mv -f "$ifile.new" "$ifile"
 187     fi
 188     echo "$savepar $saveval" >>"$ifile"
 189     exit 0
 190 fi
 191
 192 unset delay
 193
 194 if [ -r "$ifile" ]; then
 195     exec 3<&0
 196     exec 0<"$ifile"
 197     while read par arg; do
 198         if [ "$par" = delay ]; then
 199             cmdline=("${cmdline[@]}" -delay "$arg")
 200         elif [ "$par" = aspect ]; then
 201             cmdline=("${cmdline[@]}" -aspect "$arg")
 202         elif [ "$par" = volmod ]; then
 203             cmdline=("${cmdline[@]}" -af volume="$arg")
 204         elif [ "$par" = alang ]; then
 205             unset alang aid
 206             alang="$arg"
 207         elif [ "$par" = aid ]; then
 208             unset alang aid
 209             aid="$arg"
 210         elif [ "$par" = slang ]; then
 211             unset slang sid
 212             slang="$arg"
 213         elif [ "$par" = sid ]; then
 214             unset slang sid
 215             sid="$arg"
 216         fi
 217     done
 218     exec 0<&3
 219     exec 3<&-
 220 fi
 221
 222 if [ -n "$alang" ]; then
 223     cmdline=("${cmdline[@]}" -alang "$alang")
 224 elif [ -n "$aid" ]; then
 225     cmdline=("${cmdline[@]}" -aid "$aid")
 226 fi
 227 if [ -n "$slang" ]; then
 228     cmdline=("${cmdline[@]}" -slang "$slang")
 229 elif [ -n "$sid" ]; then
 230     cmdline=("${cmdline[@]}" -sid "$sid")
 231 fi
 232
 233 if [ "`hostname`" = pc6 -o "`hostname`" = pc7 -a "$DISPLAY" = :1 ]; then chwp=y; fi
 234
 235 if [ -n "$pretend" ]; then
 236     echo "${cmdline[@]}" "$file"
 237 elif [ -n "$printfile" ]; then
 238     echo "$file"
 239 else
 240     if [ "$chwp" = y ]; then (sleep 2; randomwp) & fi
 241     "${cmdline[@]}" "$file"
 242
 243     if [ "$nextep" = y ]; then
 244         echo "0. Save and continue (or Space)"
 245         echo "1. Continue without saving"
 246         echo "2. Save and exit (or Enter)"
 247         echo "3. Exit without saving (or any key)"
 248         IFS= read -sn1 c
 249         save=n
 250         cont=n
 251         case "$c" in
 252             0|" ")
 253                 save=y
 254                 cont=y
 255                 ;;
 256             1)
 257                 cont=y
 258                 ;;
 259             2|"")
 260                 save=y
 261                 ;;
 262         esac
 263         if [ "$save" = y ]; then
 264             let ep++
 265             echo "$ep" >nextep
 266         fi
 267         if [ "$cont" = y ]; then
 268             exec "${origargs[@]}"
 269         else
 270             echo "nextep is $ep"
 271         fi
 272     fi
 273 fi