svn commit: r289880 - user/pho/stress2/misc

[Peter Holm]

Author: pho
Date: Sat Oct 24 15:23:44 2015
New Revision: 289880
URL: https://svnweb.freebsd.org/changeset/base/289880

Log:
  Added one more Out of VM test scenario.
  
  Sponsored by:	EMC / Isilon storage division

Added:
  user/pho/stress2/misc/oovm2.sh   (contents, props changed)

Added: user/pho/stress2/misc/oovm2.sh
==============================================================================
--- /dev/null	00:00:00 1970	(empty, because file is newly added)
+++ user/pho/stress2/misc/oovm2.sh	Sat Oct 24 15:23:44 2015	(r289880)
@@ -0,0 +1,135 @@
+#!/bin/sh
+
+#
+# Copyright (c) 2015 EMC Corp.
+# 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 AUTHOR 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 AUTHOR 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.
+#
+# $FreeBSD$
+#
+
+# Out of VM deadlock seen. Introduced by r285808. Variation of oovm.sh
+# https://people.freebsd.org/~pho/stress/log/oovm2.txt
+
+# Test scenario suggestion by alc@
+
+. ../default.cfg
+
+[ `swapinfo | wc -l` -eq 1 ] && exit 0
+size=$((`sysctl -n hw.physmem` / 1024 / 1024))
+d1=${diskimage}.1
+d2=${diskimage}.2
+d3=${diskimage}.3
+d4=${diskimage}.4
+rm -f $d1 $d2 $d3 $d4
+[ `df -k $(dirname $diskimage) | tail -1 | awk '{print int($4 / 1024)'}` -lt \
+    $size ] && printf "Need %d MB on %s.\n" $size `dirname $diskimage` && exit
+dd if=/dev/zero of=$d1 bs=1m count=$((size / 4)) 2>&1 | \
+    egrep -v "records|transferred"
+cp $d1 $d2 || exit
+cp $d1 $d3 || exit
+cp $d1 $d4 || exit
+trap "rm -f $d1 $d2 $d3 $d4" EXIT INT
+
+dir=/tmp
+odir=`pwd`
+cd $dir
+sed '1,/^EOF/d' < $odir/$0 > $dir/oovm2.c
+mycc -o oovm2 -Wall -Wextra -g oovm2.c || exit 1
+rm -f oovm2.c
+cd $odir
+
+(cd /tmp; /tmp/oovm2 $d1) &
+(cd /tmp; /tmp/oovm2 $d2) &
+(cd /tmp; /tmp/oovm2 $d3) &
+(cd /tmp; /tmp/oovm2 $d4) &
+wait
+
+rm -f /tmp/oovm2 /tmp/oovm2.core
+exit
+
+EOF
+#include <sys/param.h>
+#include <sys/fcntl.h>
+#include <sys/mman.h>
+#include <sys/stat.h>
+
+#include <err.h>
+#include <errno.h>
+#include <stdio.h>
+#include <stdlib.h>
+#include <time.h>
+#include <unistd.h>
+
+const char *file;
+
+#define RUNTIME 600
+
+void
+test(void)
+{
+	struct stat st;
+	size_t i, olen, len;
+	time_t start;
+	int error, fd, ps;
+	char *p;
+
+	ps = getpagesize();
+	if ((fd = open(file, O_RDWR)) == -1)
+		err(1, "open(%s)", file);
+	if ((error = fstat(fd, &st)) == -1)
+		err(1, "stat(%s)", file);
+	len = olen = round_page(st.st_size);
+	do {
+		if ((p = mmap(NULL, len, PROT_READ | PROT_WRITE, MAP_SHARED,
+		    fd, 0)) == MAP_FAILED) {
+			if (errno == ENOMEM)
+				len -= ps;
+			else
+				err(1, "mmap");
+		}
+	} while (p == MAP_FAILED);
+
+	start = time(NULL);
+	/* Touch all pages of the file. */
+	for (i = 0; i < len; i += ps)
+		p[i] = 1;
+	while (time(NULL) - start < RUNTIME)
+		p[arc4random() % len] = 1;
+
+	if (munmap(p, len) == -1)
+		err(1, "unmap()");
+	close(fd);
+}
+
+int
+main(int argc, char *argv[])
+{
+	if (argc != 2)
+		errx(1, "Usage: %s <file>", argv[0]);
+	file = argv[1];
+
+	test();
+
+	return (0);
+}