#!/sbin/runscript

# This script invalidates any stale swsusp and TuxOnIce images. It
# searches all swap partitions on your machine, as well as TuxOnIce's
# filewriter files (by way of the hibernate script telling it where to find
# it).
#
# It should be called on boot, after mounting filesystems, but before enabling
# swap or clearing out /var/run. Copy this into /etc/init.d/ (or the appropriate
# place on your system), then add a symlink at the appropriate point on boot.
# On a Debian system, you would do this:
#   update-rc.d hibernate-cleanup.sh start 31 S .
#
# On other SysV-based systems, you would do something like:
#   ln -s ../init.d/hibernate-cleanup.sh /etc/rcS.d/S31hibernate-cleanup.sh
#
### BEGIN INIT INFO
# Provides:          hibernate-cleanup
# Default-Start:     S
# Default-Stop:
# Required-Start:
# Required-Stop:
# Short-Description: invalidates stale swsusp and TuxOnIce image
# Description:       This script invalidates any stale swsusp and TuxOnIce images. It
#                    searches all swap partitions on your machine, as well as
#                    TuxOnIce's filewriter files (by way of the hibernate
#                    script telling it where to find it).
### END INIT INFO

HIBERNATE_FILEWRITER_TRAIL="/var/run/TuxOnIce_filewriter_image_exists"

clear_swap() {
	local where wason
	where=$1
	wason=
	swapoff $where 2>/dev/null && wason=yes
	mkswap $where > /dev/null || msg_status " (failed: $?)"
	[ -n "$wason" ] && swapon $where
}

check_swap_sig() {
	local where what type rest p c
	while read  where what type rest ; do
		test "$type" = "swap" || continue
		case "$(dd if=$where bs=1 count=6 skip=4086 2>/dev/null)" in
			S1SUSP|S2SUSP|ULSUSP|pmdisk|[zZ]*)
				msg_status "$where"
				clear_swap $where
				msg_status ", "
		esac
	done < /etc/fstab
}

check_filewriter_sig() {
	local target
	[ -f "$HIBERNATE_FILEWRITER_TRAIL" ] || return 0
	read target < $HIBERNATE_FILEWRITER_TRAIL
	[ -f "$target" ] || return
	case "`dd \"if=$target\" bs=8 count=1 2>/dev/null`" in
		HaveImag)
			/bin/echo -ne "TuxOnIce\n\0\0" | dd "of=$target" bs=11 count=1 conv=notrunc 2>/dev/null
			msg_status -n "$target, "
			rm -f $HIBERNATE_FILEWRITER_TRAIL
	esac
}

do_start() {
	check_swap_sig
	check_filewriter_sig
}

do_stop() {
	:
}

do_reload() {
	:
}














msg_status() {
	einfon "$1"
}

msg() {
	einfo "$1"
}

extra_started_commands="reload"

depend() {
	after modules
	before localmount
}

start() {
	ebegin "Invalidating stale software suspend images"
	do_start
	eend $?
}

stop() {
	do_stop
}

reload() {
	do_reload
}
