#!/bin/bash
# I, Ian Kelling, follow the GNU license recommendations at
# https://www.gnu.org/licenses/license-recommendations.en.html. They
# recommend that small programs, < 300 lines, be licensed under the
# Apache License 2.0. This file contains or is part of one or more small
# programs. If a small program grows beyond 300 lines, I plan to switch
# its license to GPL.

# Copyright 2024 Ian Kelling

# Licensed under the Apache License, Version 2.0 (the "License");
# you may not use this file except in compliance with the License.
# You may obtain a copy of the License at

#     http://www.apache.org/licenses/LICENSE-2.0

# Unless required by applicable law or agreed to in writing, software
# distributed under the License is distributed on an "AS IS" BASIS,
# WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
# See the License for the specific language governing permissions and
# limitations under the License.

set -e; . /usr/local/lib/bash-bear; set +e

type=$1

cd /a/bin/data/clips/$type

pregex='^mpv --profile=a [^/]+$'
if pgrep -fc "$pregex" >/dev/null; then
  pkill -f "$pregex"
  exit 0
fi

case $type in
  up)
    if [[ ! -s /tmp/last-up ]]; then
      find . -type f -printf '%f\n' | shuf > /tmp/last-up
    fi
    clip=$(head -n1 /tmp/last-up)
    tail -n+2 /tmp/last-up | sponge /tmp/last-up
    ;;
  *)
    # don't listen to the very last clip, but otherwise we don't mind
    # recent repeats.
    count=$(find . -type f -printf '%f\n' | wc -l)
    if (( count > 1 )); then
      clip=$(find . -type f -printf '%f\n' | \
               { if [[ -e /tmp/last-$type ]]; then
                   sed "/^$(cat /tmp/last-$type)\$/d"
                 else
                   cat
                 fi ; } | \
                   shuf | head -n1)
      echo $clip >/tmp/last-$type
    else
      clip=./*
    fi
    ;;
esac

found=false

# When I was using obs. Incorporate if I try it again.
# unmute() {
#   p=$(cat /p/obs-ws-pass)
#   # note, if the desktop audio is already on, this will do the wrong thing.
#   # obs-cmd needs more commands. But, I don't use desktop audio for anything
#   # else atm.
#   if pgrep '^obs$' &>/dev/null; then
#     # this is so the script keeps working when obs is not running, but
#     # also doesn't ignore errors.
#     found=true
#     obs-cmd -w obsws://localhost:4455/$p toggle-mute 'Desktop Audio'
#   fi
# }
# mute() {
#   if $found; then
#     obs-cmd -w obsws://localhost:4455/$p toggle-mute 'Desktop Audio'
#   fi
# }


# note: condition duplicated in stream-clip, myi3status
if pgrep -fc '^ffmpeg.*icecast://source.*/fsf' >/dev/null; then
  found=true
  toggle-mute mute
  echo Parsed_volume_3 volume 1 | zmqsend -b tcp://127.0.0.1:5556
fi

mpv --profile=a $clip ||:

if $found; then
  # I dunno if this is needed, but I think it is theoretically possible
  # for us to mute ffmpeg before it finishes processing the mpv
  # output. It would probably only need a few miliseconds, but whatever.
  sleep 1
  echo Parsed_volume_3 volume 0 | zmqsend -b tcp://127.0.0.1:5556
fi