#!/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
cd /a/bin/data/clips/up

if pgrep mpv; then
  pkill mpv
  exit 0
fi

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

# clip=$(ls -1 . | \
  #          { if [[ -e /tmp/last-up ]]; then
#              sed "/^$(cat /tmp/last-up)\$/d"
#            else
#              cat
#            fi ; } | \
  #              shuf | head -n1)
# echo $clip >/tmp/last-up

mpv --profile=a $clip