summaryrefslogtreecommitdiff
path: root/contrib/pacsysclean.sh.in
blob: 3631921556116e3e1bb4632eb75a3a982ca270b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
#!/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} (pacman) v${myver}"
  echo
  echo "Sort installed packages by increasing installed size. Useful for"
  echo "system clean-up."
  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="-$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);
}'

# vim: set ts=2 sw=2 noet: