spk annotate spk-rm @ rev 10

Add a Makefile and imrove spk-rm skeleton
author Christophe Lincoln <pankso@slitaz.org>
date Sat May 12 02:38:21 2012 +0200 (2012-05-12)
parents 7cd8650b22ae
children 8517989e8588
rev   line source
pankso@8 1 #!/bin/sh
pankso@8 2 #
pankso@8 3 # Spk-rm - Remove SliTaz packages. Read the README before adding or
pankso@8 4 # modifing any code in spk!
pankso@8 5 #
pankso@8 6 # Copyright (C) SliTaz GNU/Linux - BSD License
pankso@8 7 # Author: See AUTHORS files
pankso@8 8 #
pankso@8 9 #. /usr/lib/slitaz/libspk.sh
pankso@8 10 . lib/libspk.sh
pankso@8 11
pankso@8 12 #
pankso@8 13 # Functions
pankso@8 14 #
pankso@8 15
pankso@8 16 # Help and usage
pankso@8 17 usage() {
pankso@8 18 name=$(basename $0)
pankso@8 19 cat << EOT
pankso@8 20
pankso@10 21 $(boldify $(gettext "Usage:")) $name [packages|--options]
pankso@8 22
pankso@8 23 $(boldify $(gettext "Options:"))
pankso@8 24
pankso@8 25 $(boldify $(gettext "Examples:"))
pankso@10 26 $name nano clex leafpad
pankso@10 27 $name nano clex --confirm
pankso@8 28
pankso@8 29 EOT
pankso@8 30 exit 0
pankso@8 31 }
pankso@8 32
pankso@8 33 #
pankso@10 34 # Commands and exit
pankso@8 35 #
pankso@8 36
pankso@8 37 case "$1" in
pankso@10 38 ""|usage|help) usage && exit 0 ;;
pankso@8 39 esac
pankso@10 40
pankso@10 41 #
pankso@10 42 # Handle packages
pankso@10 43 #
pankso@10 44
pankso@10 45 count=0
pankso@10 46 check_root
pankso@10 47
pankso@10 48 for pkg in $@
pankso@10 49 do
pankso@10 50 [ -d "$installed/$pkg" ] || continue
pankso@10 51 count=$(($count + 1))
pankso@10 52 [ "$count" == 1 ] && echo ""
pankso@10 53 gettext "Removing"; echo " $pkg"
pankso@10 54 separator
pankso@10 55 # Handle --confirm
pankso@10 56 if [ "$confirm" ]; then
pankso@10 57 gettext "Confirm uninstallation of"; echo -n " $pkg:"
pankso@10 58 if ! confirm; then
pankso@10 59 gettext "Uninstallation canceled"
pankso@10 60 echo -e "\n" && exit 0
pankso@10 61 fi
pankso@10 62 fi
pankso@10 63 gettext "TODO"; echo
pankso@10 64 done
pankso@10 65
pankso@8 66 exit 0