#!/bin/sh

# shellcheck disable=SC2119,SC2120

# shellcheck source=../lib/load-configuration
. "${0%/*}/../lib/load-configuration"

usage() {
  >&2 echo ''
  >&2 echo 'find-obsolete-packages: find packages which are no longer available upstream.'
  >&2 echo ''
  >&2 echo 'possible options:'
  >&2 echo '  -h|--help:'
  >&2 echo '    Show this help and exit.'
  >&2 echo '  -m|--mirror https://mirror.example.com/archlinux'
  >&2 echo '    Mirror url to take upstream'"'"'s packages from.'
  >&2 echo '  -n|--no-action:'
  >&2 echo '    Do not mark packages as to_be_deleted.'
  >&2 echo '  -w|--wait:'
  >&2 echo '    Wait for lock if necessary.'
  [ -z "$1" ] && exit 1 || exit "$1"
}

eval set -- "$(
  getopt -o hm:nw \
    --long help \
    --long mirror: \
    --long no-action \
    --long wait \
    -n "$(basename "$0")" -- "$@" || \
  echo usage
)"

mirror=''
no_action=false
wait_for_lock='-n'

while true
do
  case "$1" in
    -h|--help)
      usage 0
    ;;
    -m|--mirror)
      if [ -n "${mirror}" ]; then
        >&2 echo 'Already have one -m flag.'
        usage
      fi
      shift
      mirror="$1"
    ;;
    -n|--no-action)
      no_action=true
    ;;
    -w|--wait)
      wait_for_lock=''
    ;;
    --)
      shift
      break
    ;;
    *)
      >&2 echo 'Whoops, forgot to implement option "'"$1"'" internally.'
      exit 42
    ;;
  esac
  shift
done

if [ $# -ne 0 ]; then
  >&2 echo 'Too many arguments.'
  usage
fi

if [ -z "${mirror}" ]; then
  >&2 echo 'Flag -m missing'
  usage
fi

if ! ${no_action}; then
  exec 9> "${sanity_check_lock_file}"
  if ! verbose_flock -s ${wait_for_lock} 9; then
    >&2 echo 'Cannot get sanity-check lock.'
    exit 1
  fi

  exec 8> "${build_list_lock_file}"
  if ! verbose_flock ${wait_for_lock} 8; then
    >&2 echo 'Cannot get build-list lock.'
    exit 1
  fi
fi

{
  for repo in core extra community multilib; do
    curl -Ss "${mirror}/${repo}/os/x86_64/${repo}.db.tar.gz" | \
      tar -tz
  done | \
    sed -n '
      s,\(-[^-]*\)\{2\}/desc$,,
      T
      p
      p
    '
  # shellcheck disable=SC2016
  {
    printf 'SELECT DISTINCT `binary_packages`.`pkgname`'
    printf ' FROM `binary_packages`'
    mysql_join_binary_packages_binary_packages_in_repositories
    mysql_join_binary_packages_in_repositories_repositories
    mysql_join_binary_packages_build_assignments
    mysql_join_build_assignments_package_sources
    printf ' WHERE `repositories`.`is_on_master_mirror`'
    printf ' AND NOT `binary_packages_in_repositories`.`is_to_be_deleted`'
    printf ' AND `package_sources`.`uses_upstream`'
  } | \
    mysql_run_query
} | \
  sort | \
  uniq -u | \
  if ${no_action}; then
    cat
  else
    # shellcheck disable=SC2016
    base64_encode_each | \
      sed '
        s/^/from_base64("/
        s/$/"),/
        1 s/^/UPDATE `binary_packages_in_repositories` '"$(
          mysql_join_binary_packages_in_repositories_binary_packages
        )"' SET `binary_packages_in_repositories`.`is_to_be_deleted`=1 WHERE `binary_packages`.`pkgname` IN (/
        $ s/,$/);/
      ' | \
      mysql_run_query
  fi