void-packages/srcpkgs/base-files/files/vkpurge

116 lines
2.2 KiB
Bash

#!/bin/sh
#
# A simple script to remove old kernel files/modules.
# Brought to you by yours truly Juan RP in the Public Domain.
#
: ${progname:=$(basename $0)}
usage()
{
cat <<_EOF
Usage: $progname <target> [<version>]
Targets:
list Lists old installed kernels.
rm <version|all> Remove kernel <version> or all old kernels.
Example:
$ $progname list
$ $progname rm 2.6.39.2
_EOF
exit 1
}
list_kernels()
{
local k kpkg installed kver kvertmp skip
for k in /var/lib/initramfs-tools/*; do
kver=$(basename $k)
kvertmp=$(basename $k|sed -e 's|-rc|rc|')
for kpkg in kernel kernel-snapshot; do
installed=$(xbps-uhelper -r / version $kpkg)
if [ "$installed" = "$kvertmp" ]; then
skip=1
break
fi
done
if [ -n "$skip" ]; then
unset skip
continue
fi
echo "$kver"
done
}
run_hooks()
{
local dir="$1"
local kver="$2"
local d
for d in /etc/kernel.d/${dir}/*; do
[ ! -x "$d" ] && continue
echo "Running ${dir} kernel hook: $(basename $d)..."
$d kernel $kver
done
}
remove_kernel()
{
local rmkver="$1"
local installed f kfile
if [ ! -f /boot/vmlinuz-${rmkver} -a ! -d /lib/modules/${rmkver} ]; then
echo "Kernel ${rmkver} not installed."
exit 0
fi
installed=$(xbps-uhelper -r / version $rmkver)
if [ -n "$installed" ]; then
echo "Kernel $rmkver is currently installed."
exit 0
fi
# Execute pre-remove kernel hooks.
run_hooks pre-remove $rmkver
# Remove kernel files in /boot.
for f in config System.map vmlinuz; do
kfile="/boot/${f}-${rmkver}"
[ ! -f "${kfile}" ] && continue
echo "Removing ${kfile}..."
rm -f ${kfile}
done
# Remove kernel modules
if [ -d "/lib/modules/${rmkver}" ]; then
echo "Removing /lib/modules/${rmkver}..."
rm -rf /lib/modules/${rmkver}
fi
# Execute post-remove kernel hooks.
run_hooks post-remove $rmkver
# Make sure there are no stale files.
if [ -f /var/lib/initramfs-tools/${rmkver} ]; then
rm -f /var/lib/initramfs-tools/${rmkver}
fi
}
if [ "$1" = "list" ]; then
list_kernels
elif [ "$1" = "rm" ]; then
if [ -z "$2" ]; then
usage
elif [ "$2" = "all" ]; then
kernels=$(list_kernels)
for k in ${kernels}; do
remove_kernel "$k"
done
else
remove_kernel "$2"
fi
else
usage
fi
exit 0