#!/bin/sh
#
# dpkg-unused-kernels - lists and optionally removes all unused kernels
#
# $Id$

Die() {  echo "$@" >&2; exit; }

remove=0

case "$1" in
-r) remove=1;;
'') :;;
*) Die "Usage: $0 [-r] to list or (with -r) remove all unused kernels" ;;
esac

# from https://help.ubuntu.com/community/Lubuntu/Documentation/RemoveOldKernels#Safely_removing_old_kernels

ListUnusedKernels()
{
  dpkg -l |
  tail -n +6 |
  awk '$1 == "ii" && /linux-image-[0-9]+/ {print $2}' |
  fgrep -v `uname -r`
}

if [ "$remove" = 1 ]
then
  ListUnusedKernels |
  xargs sudo apt-get -y remove --purge
else
  ListUnusedKernels
fi