~sourcemage/sorcery

754fc978a7470f7292a68cd345d5b0f48edcf619 — Ismael Luceno 13 years ago b87a93b devel-banish
Import banish
1 files changed, 81 insertions(+), 0 deletions(-)

A usr/sbin/banish
A usr/sbin/banish => usr/sbin/banish +81 -0
@@ 0,0 1,81 @@
#!/bin/bash
function get_new_orphans() {
  local each

  compute_reverse_installed_depends my_hash
  {
    get_all_spells_with_status 'installed'
    get_all_spells_with_status 'held'
  } | while read each; do
    [ -z "$(hash_get my_hash $each)" ] &&
    echo "$each"
  done | filter_kept | sort
}

function generate_items() {
  local spell status

  while read spell; do
    codex_set_current_spell_by_name "$spell" && {
      #query_spell_status "$spell" status
      #[[ "$status" == auto-installed ]] &&
      #status=off ||
      status=on

      echo "\"$spell\" \"${SHORT//\"/\\\\\\\"}\" $status"
      # prevent the use of SHORT's value in the next cycle.
      unset SHORT
    }
  done
}

function filter_kept() {
  while read spell; do
    grep -q "^$spell\$" "$SUSTAINED" ||
    grep -q "^$spell\$" "$KEEPFILE" ||
    echo "$spell"
  done
}

. /etc/sorcery/config

KEEPFILE="$LOG_DIRECTORY/banish/keep"
LOGFILE="$LOG_DIRECTORY/banish/log"

if [[ "$UID" > 0 ]]; then
  echo 'Enter the root password, please.'
  PARAMS=$(consolidate_params "$@")
  exec su -c "$0 $PARAMS" root
fi

if [ ! -f "$KEEPFILE" ]; then
  libdir="$(dirname "$KEEPFILE")"
  [ -d "$libdir" ] || mkdir -p "$libdir"
  touch "$KEEPFILE"
  unset libdir
fi  

echo "--- $(date --rfc-3339=seconds)" >> "$LOGFILE"

while orphans="$(get_new_orphans)"; [ -n "$orphans" ]; do
  eval "$DIALOGPROG" --title Spellfoster --separate-output \
              --checklist '"Select spells to keep"' 0 0 0 \
              $(echo "$orphans" | generate_items) 2>> "$KEEPFILE" || exit

  todispel="$(echo "$orphans" | filter_kept)"
  todispel_num="$(echo "$todispel" | wc -w)"
  [[ "$todispel_num" == 0 ]] && break

  $DIALOGPROG --yesno \
         "Do you really want to dispel the $todispel_num unselected spells?" \
         0 0 || exit

  i=0
  echo "$todispel" | while read spell; do
    dispel "$spell" >> "$LOGFILE" 2>&1
    echo $((++i * 100 / todispel_num))
  done | $DIALOGPROG --gauge 'Dispelling unselected spells' 8 46
done

# TODO:
# - implement keeplist edit feature