#!/bin/sh

# clean up unnecessary data

. "${0%/*}/../conf/default.conf"

# we only clean if run interactive or if no one is logged in
if ! tty -s && \
  [ -n "$(users)" ]; then
  >&2 echo 'Skipping clean up.'
  exit
fi

if ! "${base_dir}/bin/sanity-check" -r; then
  >&2 echo 'Build master is not sane.'
  exit 1
fi

# remove blocked/broken/locked markes of packages not on the buildlist anymore

(
  ls "${work_dir}/package-states" | \
    grep '\.broken$\|\.b\?locked$' | \
    sed '
      s|^\(.*\)\.\([^.]\+\)\.\([^.]\+\)\.\([^.]\+\)\.\([^.]\+\)$|state \0 \1 \2 \3 \4 \5|
    '
  awk '{
    print "order " $1 "." $2 "." $3 "." $4 " " $1 " " $2 " " $3 " " $4 " broken"
    print "order " $1 "." $2 "." $3 "." $4 " " $1 " " $2 " " $3 " " $4 " blocked"
    print "order " $1 "." $2 "." $3 "." $4 " " $1 " " $2 " " $3 " " $4 " locked"
  }' "${work_dir}/build-list"
) | \
  sort -k3 | \
  uniq -uf2 | \
  grep '^state ' | \
  awk '{print $2}' | \
  sed "s|^|${work_dir}/package-states/|" | \
  xargs -rn1 rm

# remove logs where package is not broken/locked anymore

(
  ls "${build_log_directory}" | \
    sed 's|\.[^.]\+\.build-log\.gz$||' | \
    sort -u
  ls "${work_dir}/package-states" | \
    grep '\.broken$\|\.locked$' | \
    sed '
      s|\.[^.]\+$||
      p
    '
) | \
  sort | \
  uniq -u | \
  while read -r s t; do
    rm -f "${build_log_directory}/${s}."*
  done

# only keep 10 newest logs per package

ls "${build_log_directory}" | \
  sed 's|^\(.*\)\(\.\([^.]\+\)\.build-log\.gz\)$|\1\2 \3 \1|' | \
  sort -k3,3 -k2r,2 | \
  uniq -f2 --group=prepend | \
  (
    count=0
    while read -r a b c; do
      if [ -z "${a}" ]; then
        count=0
        continue
      fi
      if [ ${count} -ge 10 ]; then
        echo "${build_log_directory}/${a}"
      fi
      count=$((${count}+1))
    done
  ) | \
  xargs -rn1 rm