Home | History | Annotate | Line # | Download | only in 9994 
      1 /*	$NetBSD: 9994_f.c,v 1.3 2008/04/28 20:23:06 martin Exp $	*/
      2 
      3 /*-
      4  * Copyright (c) 2002 The NetBSD Foundation, Inc.
      5  * All rights reserved.
      6  *
      7  * This code is derived from software contributed to The NetBSD Foundation
      8  * by IWAMOTO Toshihiro <iwamoto (at) sat.t.u-tokyo.ac.jp> and Konrad E. Schroder
      9  * <perseant (at) hhhh.org>.
     10  *
     11  * Redistribution and use in source and binary forms, with or without
     12  * modification, are permitted provided that the following conditions
     13  * are met:
     14  * 1. Redistributions of source code must retain the above copyright
     15  *    notice, this list of conditions and the following disclaimer.
     16  * 2. Redistributions in binary form must reproduce the above copyright
     17  *    notice, this list of conditions and the following disclaimer in the
     18  *    documentation and/or other materials provided with the distribution.
     19  *
     20  * THIS SOFTWARE IS PROVIDED BY THE NETBSD FOUNDATION, INC. AND CONTRIBUTORS
     21  * ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     22  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
     23  * PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL THE FOUNDATION OR CONTRIBUTORS
     24  * BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR
     25  * CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF
     26  * SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS
     27  * INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN
     28  * CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE)
     29  * ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE
     30  * POSSIBILITY OF SUCH DAMAGE.
     31  */
     32 
     33 /*
     34  * Regression test based on test program submutted with NetBSD PR #9994.
     35  * Two files are opened, one in the current directory and another in a
     36  * control directory (in another filesystem).  Random read, write, and
     37  * truncate operations are performed on both files.
     38  *
     39  * An error return indicates that an operation failed on one of the files
     40  * (control *or* test, either one).
     41  *
     42  * A zero return indicates success; the two files should be identical.
     43  * (This program does not test to make sure that they are identical.)
     44  */
     45 
     46 #include <fcntl.h>
     47 #include <stdio.h>
     48 #include <stdlib.h>
     49 #include <time.h>
     50 #include <sys/types.h>
     51 #include <unistd.h>
     52 
     53 #define CONTROL_ERROR 1
     54 #define TEST_ERROR    2
     55 
     56 int main(int argc, char **argv)
     57 {
     58 	int bsize, quiet, usepid;
     59 	char *hoge, *buf;
     60 	char prop[] = "/\b-\b\\\b|\b";
     61 	int testfd, controlfd;
     62 	int c, i, j, k, n, p;
     63 	char *ctldir;
     64 	unsigned long rseed;
     65 	const char *prog = getprogname();
     66 
     67 	bsize = 8192;
     68 	n = 10000;
     69 	ctldir = "/var/tmp";
     70 	quiet = 0;
     71 	usepid = 0;
     72 	rseed = time(0);
     73 
     74 	while ((c = getopt(argc, argv, "b:c:n:pqs:")) != -1) {
     75 		switch(c) {
     76 		    case 'b':
     77 			    bsize = atoi(optarg);
     78 			    break;
     79 		    case 'c':
     80 			    ctldir = optarg;
     81 			    break;
     82 		    case 'n':
     83 			    n = atoi(optarg);
     84 			    break;
     85 		    case 'p':
     86 			    ++usepid;
     87 			    break;
     88 		    case 'q':
     89 			    ++quiet;
     90 			    break;
     91 		    case 's':
     92 			    rseed = strtoul(optarg, NULL, 0);
     93 			    break;
     94 		    default:
     95 			    errx(1, "usage: %s [-b bsize] [-c control-dir] [-n count] [-pq] [-s randseed]", prog);
     96 			    /* NOTREACHED */
     97 		}
     98 	}
     99 
    100 	srandom(rseed);
    101 	hoge = (char *)malloc(bsize);
    102 	buf = (char *)malloc(bsize);
    103 
    104 	for(i = 0; i < bsize; i++)
    105 		hoge[i] = random() & 0xff;
    106 
    107 	/* Set up test and control file descriptors */
    108 
    109 	if (usepid)
    110 		sprintf(buf, "test.%d", getpid());
    111 	else
    112 		sprintf(buf, "test");
    113 	unlink(buf);
    114 	testfd = open(buf, O_RDWR | O_CREAT, 0644);
    115 	if (testfd < 0) {
    116 		perror("open");
    117 		exit(TEST_ERROR);
    118 	}
    119 
    120 	if (usepid)
    121 		sprintf(buf, "%s/control.%d", ctldir, getpid());
    122 	else
    123 		sprintf(buf, "%s/control", ctldir);
    124 	unlink(buf);
    125 	controlfd = open(buf, O_RDWR | O_CREAT, 0644);
    126 	if (controlfd < 0) {
    127 		perror("open");
    128 		exit(CONTROL_ERROR);
    129 	}
    130 
    131 	for(i = 0, p = 0; i < n; i++) {
    132 		if (!quiet) {
    133 			/* Draw propeller */
    134 			p = (p + 1) % 4;
    135 			write(1, prop + 2 * p, 2);
    136 		}
    137 
    138 		j = random() % 3;
    139 		k = random() & 0x3fffff;
    140 		if (j != 2) {
    141 			if (lseek(testfd, k, SEEK_SET) < 0) {
    142 				perror("read");
    143 				exit(TEST_ERROR);
    144 			}
    145 			if (lseek(controlfd, k, SEEK_SET) < 0) {
    146 				perror("read");
    147 				exit(CONTROL_ERROR);
    148 			}
    149 		}
    150 
    151 		switch(j) {
    152 		    case 0:
    153 			    if (read(testfd, buf, bsize) < 0) {
    154 				    perror("read");
    155 				    exit(TEST_ERROR);
    156 			    }
    157 			    if (read(controlfd, buf, bsize) < 0) {
    158 				    perror("read");
    159 				    exit(CONTROL_ERROR);
    160 			    }
    161 			    break;
    162 		    case 1:
    163 			    if (write(testfd, hoge, bsize) < 0) {
    164 				    perror("write");
    165 				    exit(TEST_ERROR);
    166 			    }
    167 			    if (write(controlfd, hoge, bsize) < 0) {
    168 				    perror("write");
    169 				    exit(CONTROL_ERROR);
    170 			    }
    171 			    break;
    172 		    case 2:
    173 			    if (ftruncate(testfd, k) < 0) {
    174 				    perror("write");
    175 				    exit(TEST_ERROR);
    176 			    }
    177 			    if (ftruncate(controlfd, k) < 0) {
    178 				    perror("write");
    179 				    exit(CONTROL_ERROR);
    180 			    }
    181 			    break;
    182 		}
    183 		j = random() % (100 * 1000);
    184 		usleep(j);
    185 	}
    186 	exit(0);
    187 }
    188 
    189