# $NetBSD: t_umountstress.sh,v 1.5 2013/05/31 14:40:48 gson Exp $
#
# Copyright (c) 2013 The NetBSD Foundation, Inc.
# All rights reserved.
#
# Redistribution and use in source and binary forms, with or without
# modification, are permitted provided that the following conditions
# are met:
# 1. Redistributions of source code must retain the above copyright
#    notice, this list of conditions and the following disclaimer.
# 2. Redistributions in binary form must reproduce the above copyright
#    notice, this list of conditions and the following disclaimer in the
#    documentation and/or other materials provided with the distribution.
#
# THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
# ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
# TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
# PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
# BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
# CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
# SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
# INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
# CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
# ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
# POSSIBILITY OF SUCH DAMAGE.
#

setglobal TMPMP = 'umount-stress_mount'
setglobal TMPIM = 'umount-stress.im'

setglobal VND = 'vnd0'
setglobal BVND = "/dev/$(VND)"
setglobal CVND = "/dev/r$(VND)"
setglobal MPART = 'a'

atf_test_case fileop cleanup
proc fileop_head
{
	atf_set "descr" "Checks unmounting a filesystem doing file operations"
	atf_set "require.user" "root"
}
proc fileop_body
{
	cat >disktab << """
floppy288|2.88MB 3.5in Extra High Density Floppy:\
	:ty=floppy:se#512:nt#2:rm#300:ns#36:nc#80:\
	:pa#5760:oa#0:ba#4096:fa#512:ta=4.2BSD:\
	:pb#5760:ob#0:\
	:pc#5760:oc#0:
"""

	echo "*** Creating a dummy directory tree at" \
	     "$(TMPMP) mounted on $(TMPIM)"

	atf_check -o ignore -e ignore mkdir $(TMPMP)
	atf_check -o ignore -e ignore dd if=/dev/zero of=$(TMPIM) count=5860
	atf_check -o ignore -e ignore vnconfig -v $(VND) $(TMPIM)
	atf_check -o ignore -e ignore disklabel -f disktab -rw $(VND) floppy288
	atf_check -o ignore -e ignore newfs -i 500 -b 8192 -f 1024 $(CVND)$(MPART)
	atf_check -o ignore -e ignore mount -o async $(BVND)$(MPART) $(TMPMP)

	echo "*** Testing fileops"

	touch $(TMPMP)/hold
	exec !9 9< $(TMPMP)/hold

	shell {
		for j in [0 1 2] {
		for k in [0 1 2 3 4 5 6 7 8 9] {
			if ! dd msgfmt=quiet if=/dev/zero \
				count=1 of=$(TMPMP)/test$i$j$k {
				echo 1 >result
				exit
			}
		}
		}
		echo 0 >result
	} &
	setglobal busypid = $BgPid

	while ! test -f result {
		if setglobal err = $[umount $(TMPMP) !2 > !1] {
			kill $busypid
			exec !9 9<&-
			wait
			atf_fail "Unmount succeeded while busy"
			return
		}

		match $err {
		with *:\ Device\ busy
			
		with *
			kill $busypid
			exec !9 9<&-
			wait
			atf_fail "Unmount failed: $err"
			return
			
		}
	}

	exec !9 9<&-
	wait

	setglobal rc = $[cat result]
	rm -f result

	match $rc {
	with 0 
	with * atf_fail "File operation failed"
	}
}
proc fileop_cleanup
{
	echo "*** Cleaning up $(TMPMP), $(TMPIM)."
	umount -f $(TMPMP)
	vnconfig -u $(VND)
}

atf_test_case mountlist cleanup
proc mountlist_head
{
	atf_set "descr" "Checks unmounting a filesystem using mountlist"
	atf_set "require.user" "root"
}
proc mountlist_body
{
	cat >disktab << """
floppy288|2.88MB 3.5in Extra High Density Floppy:\
	:ty=floppy:se#512:nt#2:rm#300:ns#36:nc#80:\
	:pa#5760:oa#0:ba#4096:fa#512:ta=4.2BSD:\
	:pb#5760:ob#0:\
	:pc#5760:oc#0:
"""

	echo "*** Creating a dummy directory tree at" \
	     "$(TMPMP) mounted on $(TMPIM)"

	atf_check -o ignore -e ignore mkdir $(TMPMP)
	atf_check -o ignore -e ignore dd if=/dev/zero of=$(TMPIM) count=5860
	atf_check -o ignore -e ignore vnconfig -v $(VND) $(TMPIM)
	atf_check -o ignore -e ignore disklabel -f disktab -rw $(VND) floppy288
	atf_check -o ignore -e ignore newfs -i 500 -b 8192 -f 1024 $(CVND)$(MPART)
	atf_check -o ignore -e ignore mount -o async $(BVND)$(MPART) $(TMPMP)

	echo "*** Testing mountlist"

	shell {
		for j in [0 1 2 3 4 5 6 7 8 9] {
		for k in [0 1 2 3 4 5 6 7 8 9] {
			if ! setglobal out = $[mount] {
				echo 1 >result
				exit
			}
		}
		}
		echo 0 >result
	} &
	setglobal busypid = $BgPid

	while ! test -f result {
		if setglobal err = $[umount $(TMPMP) !2 > !1] {
			if ! mount -o async $(BVND)$(MPART) $(TMPMP) {
				kill $busypid
				exec !9 9<&-
				wait
				atf_fail "Remount failed"
				return
			}
			continue
		}

		match $err {
		with *:\ Device\ busy
			
		with *
			kill $busypid
			exec !9 9<&-
			wait
			atf_fail "Unmount failed: $err"
			return
			
		}
	}

	exec !9 9<&-
	wait

	setglobal rc = $[cat result]
	rm -f result

	match $rc {
	with 0 
	with * atf_fail "Mountlist operation failed"
	}
}
proc mountlist_cleanup
{
	echo "*** Cleaning up $(TMPMP), $(TMPIM)."
	umount -f $(TMPMP)
	vnconfig -u $(VND)
}

proc atf_init_test_cases
{
	atf_add_test_case fileop
	atf_add_test_case mountlist
}