Send patches - preferably formatted by git format-patch - to patches at archlinux32 dot org.
summaryrefslogtreecommitdiff
path: root/contrib/pacsysclean.sh.in
diff options
context:
space:
mode:
authorDave Reisner <dreisner@archlinux.org>2012-04-19 12:55:20 -0400
committerDave Reisner <dreisner@archlinux.org>2012-04-24 09:54:06 -0400
commit1b494ab77198a6cbb9c06a13435159641e2dc0c5 (patch)
tree6daca2567d4705e4d7ce6b284b91a34b4f1ce376 /contrib/pacsysclean.sh.in
parent71fcb69028d6e02bc7f24459918e504d261f86cd (diff)
contrib: rename bash scripts: .in -> .sh.in
For consistency with the scripts/ directory, ensure that all bash scripts use the same pre-build suffix. Signed-off-by: Dave Reisner <dreisner@archlinux.org>
Diffstat (limited to 'contrib/pacsysclean.sh.in')
-rwxr-xr-xcontrib/pacsysclean.sh.in62
1 files changed, 62 insertions, 0 deletions
diff --git a/contrib/pacsysclean.sh.in b/contrib/pacsysclean.sh.in
new file mode 100755
index 00000000..162530ef
--- /dev/null
+++ b/contrib/pacsysclean.sh.in
@@ -0,0 +1,62 @@
+#!/bin/bash
+
+# pacsysclean - Sort installed packages by increasing installed size. Useful for system clean-up.
+
+declare -r myname='pacsysclean'
+declare -r myver='@PACKAGE_VERSION@'
+
+PACMAN_OPTS=
+
+usage() {
+ echo "$myname - Sort installed packages by increasing installed size."
+ echo
+ echo "Usage: $myname [options]"
+ echo
+ echo "Options:"
+ echo " -o <options> Specify custom pacman query options (e.g., dt)"
+ echo " -h, --help Show this help message and exit"
+}
+
+version() {
+ printf "%s %s\n" "$myname" "$myver"
+ echo 'Copyright (C) 2011 Eric BĂ©langer <snowmaniscool@gmail.com>'
+}
+
+
+if [ -n "$1" ]; then
+ case "$1" in
+ -o) PACMAN_OPTS="${2}" ;;
+ -h|--help) usage; exit 0 ;;
+ -V|--version) version; exit 0 ;;
+ *) usage; exit 1 ;;
+ esac
+fi
+
+IFS=$'\n'
+name="^Name.*: (.*)$"
+size="^Installed Size.*: (.*) KiB$"
+
+[[ $PACMAN_OPTS != -* ]] && PACMAN_OPTS="-$PACMAN_OPTS"
+
+for line in $(LANG=C pacman -Qi $PACMAN_OPTS); do
+ if [[ $line =~ $name ]]; then
+ printf "%s\t" ${BASH_REMATCH[1]}
+ elif [[ $line =~ $size ]]; then
+ printf "%s\n" ${BASH_REMATCH[1]}
+ fi
+done | sort -g -k2 | awk '
+BEGIN {
+ split("KiB MiB GiB TiB PiB EiB ZiB YiB", suffix)
+}
+function format_size(size) {
+ count = 1
+ while (size + 0 > 1024) {
+ size /= 1024
+ count++
+ }
+ sizestr = sprintf("%.2f %s", size, suffix[count])
+ return sizestr
+}
+{
+ printf("%s\t%s\n", format_size($2), $1);
+}'