tools/test/stress2/misc/suj17.sh

   1 #!/bin/sh
   2
   3 #
   4 # Copyright (c) 2011 Peter Holm <pho@FreeBSD.org>
   5 # All rights reserved.
   6 #
   7 # Redistribution and use in source and binary forms, with or without
   8 # modification, are permitted provided that the following conditions
   9 # are met:
  10 # 1. Redistributions of source code must retain the above copyright
  11 #    notice, this list of conditions and the following disclaimer.
  12 # 2. Redistributions in binary form must reproduce the above copyright
  13 #    notice, this list of conditions and the following disclaimer in the
  14 #    documentation and/or other materials provided with the distribution.
  15 #
  16 # THIS SOFTWARE IS PROVIDED BY THE AUTHOR AND CONTRIBUTORS ``AS IS'' AND
  17 # ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  18 # IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  19 # ARE DISCLAIMED.  IN NO EVENT SHALL THE AUTHOR OR CONTRIBUTORS BE LIABLE
  20 # FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  21 # DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  22 # OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  23 # HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  24 # LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  25 # OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  26 # SUCH DAMAGE.
  27 #
  28
  29 [ `id -u ` -ne 0 ] && echo "Must be root!" && exit 1
  30
  31 # Truncate scenario for suj.
  32 # "panic: worklist_insert: 0xc8bc5b00 freework(0x8009) already on list"
  33 # seen.
  34
  35 . ../default.cfg
  36
  37 here=`pwd`
  38 cd /tmp
  39 sed '1,/^EOF/d' < $here/$0 > suj17.c
  40 mycc -o suj17 -Wall -Wextra -O2 suj17.c
  41 rm -f suj17.c
  42 cd $here
  43
  44 mount | grep $mntpoint | grep -q /dev/md && umount -f $mntpoint
  45 mdconfig -l | grep -q md$mdstart && mdconfig -d -u $mdstart
  46
  47 mdconfig -a -t swap -s 2g -u $mdstart || exit 1
  48 bsdlabel -w md$mdstart auto
  49 [ $# -eq 1 ] && opt="$1"
  50 [ $# -eq 0 ] && opt="-j"
  51 echo "newfs $opt md${mdstart}$part"
  52 newfs $opt md${mdstart}$part > /dev/null
  53 mount /dev/md${mdstart}$part $mntpoint
  54 chmod 777 $mntpoint
  55
  56 su $testuser -c "cd $mntpoint; /tmp/suj17"
  57 s=$?
  58
  59 while mount | grep $mntpoint | grep -q /dev/md; do
  60         umount $mntpoint || sleep 1
  61 done
  62 checkfs /dev/md${mdstart}$part || s=$?
  63 mdconfig -d -u $mdstart
  64 rm -f /tmp/suj17
  65 exit $s
  66 EOF
  67 #include <fcntl.h>
  68 #include <err.h>
  69 #include <sched.h>
  70 #include <stdio.h>
  71 #include <stdlib.h>
  72 #include <unistd.h>
  73 #include <sys/wait.h>
  74
  75 #define SIZ (1024 * 1024 - 1)
  76 char buf[SIZ];
  77
  78 void
  79 test()
  80 {
  81         int fd, i;
  82         char name[128];
  83         off_t len = 104857600LL; /* 100 Mb */
  84         off_t pos;
  85
  86         sprintf(name, "%06d", getpid());
  87         if ((fd = open(name, O_WRONLY | O_CREAT, 0666)) == -1)
  88                         err(1, "open(%s)", name);
  89         for (i = 0; i < 100; i++) {
  90                 if (write(fd, buf, sizeof(buf)) != sizeof(buf))
  91                         err(1, "write");
  92         }
  93
  94         for (;;) {
  95                 if (access("rendezvous", R_OK) == 0)
  96                         break;
  97                 sched_yield();
  98         }
  99
 100         srand48(getpid());
 101         for (i = 0; i < 50000; i++) {
 102                 pos = lrand48() % (len - sizeof(buf));
 103                 if (ftruncate(fd, pos) == -1)
 104                         err(1, "ftruncate");
 105                 pos = lrand48() % (len - sizeof(buf));
 106                 if (lseek(fd, pos, SEEK_SET) == -1)
 107                         err(1, "lseek");
 108                 if (write(fd, buf, sizeof(buf)) != sizeof(buf))
 109                         err(1, "write");
 110         }
 111         close(fd);
 112         unlink(name);
 113         _exit(0);
 114 }
 115
 116 int
 117 main()
 118 {
 119         int fd, i, j, status;
 120
 121         for (i = 0; i < 1; i++) {
 122                 for (j = 0; j < 6; j++) {
 123                         if (fork() == 0)
 124                                 test();
 125                 }
 126                 if ((fd = open("rendezvous", O_CREAT, 0644)) == -1)
 127                         err(1, "open()");
 128                 close(fd);
 129
 130                 for (j = 0; j < 6; j++)
 131                         wait(&status);
 132                 unlink("rendezvous");
 133         }
 134
 135         return (0);
 136 }