2 * Copyright (c) 2000 Silicon Graphics, Inc.
5 * This program is free software; you can redistribute it and/or
6 * modify it under the terms of the GNU General Public License as
7 * published by the Free Software Foundation.
9 * This program is distributed in the hope that it would be useful,
10 * but WITHOUT ANY WARRANTY; without even the implied warranty of
11 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 * GNU General Public License for more details.
14 * You should have received a copy of the GNU General Public License
15 * along with this program; if not, write the Free Software Foundation,
16 * Inc., 51 Franklin St, Fifth Floor, Boston, MA 02110-1301 USA
19 * This program will grow a list of files.
20 * Each file will grow by grow_incr before the same
21 * file grows twice. Each file is open and closed before next file is opened.
23 * To just verify file contents: growfiles -g 0 -c 1 filename
25 * See help and prt_examples functions below.
29 * print debug message about options used
30 * setup signal handlers
31 * return control to user (if wanted - default action)
32 * fork number of desired childern (if wanted)
33 * re-exec self (if wanted)
34 * Determine number of files
35 * malloc space or i/o buffer
36 * Loop until stop is set
37 * Determine if hit iteration, time, max errors or num bytes reached
38 * Loop through each file
40 * fstat file - to determine if file is a fifo
41 * prealloc file space (if wanted)
50 * remove all files (if wanted)
52 * Author: Richard Logan
58 #ifdef HAVE_SYS_FILE_H
62 #include "dataascii.h"
63 #include "random_range.h"
67 extern char *openflags2symbols();
69 extern int parse_open_flags();
70 extern int background();
72 extern int datapidgen();
73 extern void databingen();
74 extern int datapidchk();
75 extern int databinchk();
76 extern int file_lock();
91 static void notify_others();
97 #define NEWIO 1 /* Use the tlibio.c functions */
100 #define NEWIO 0 /* specifies to use original iowrite.c */
101 /* functions instead of tlibio.c functions */
102 /* Once it is proven tlibio.c functions work properly, */
103 /* only tlibio.c functions will be used */
109 #define PATH_MAX 1023
114 #define DEF_FILE "gf"
121 int io_type = 0; /* I/O type -sync */
122 int open_flags = O_RDWR|O_CREAT; /* open flags */
124 #define MAX_FC_READ 196608 /* 4096 * 48 - 48 blocks */
126 #define PATTERN_ASCII 1 /* repeating alphabet letter pattern */
127 /* allows multiple writers and to be checked */
128 #define PATTERN_PID 2 /* <pid><words byte offset><pid> */
129 /* Assumes 64 bit word. Only allows single */
130 /* process to write and check */
132 * 1234567890123456789012345678901234567890123456789012345678901234
133 * ________________________________________________________________
134 * < pid >< offset in file of this word >< pid >
137 #define PATTERN_OFFSET 3 /* Like PATTERN_PID but has a fixed number */
138 /* (STATIC_NUM) instead of pid. */
139 /* Allows multiple processes to write/read */
140 #define PATTERN_ALT 4 /* alternating bit pattern (i.e. 0x5555555...) */
141 #define PATTERN_CHKER 5 /* checkerboard pattern (i.e. 0xff00ff00ff00...) */
142 #define PATTERN_CNTING 6 /* counting pattern (i.e. 0 - 07, 0 - 07, ...) */
143 #define PATTERN_ONES 7 /* all bits set (i.e. 0xffffffffffffff...) */
144 #define PATTERN_ZEROS 8 /* all bits cleared (i.e. 0x000000000...) */
145 #define PATTERN_RANDOM 9 /* random integers - can not be checked */
146 #define STATIC_NUM 221849 /* used instead of pid when PATTERN_OFFSET */
148 #define MODE_RAND_SIZE 1 /* random write and trunc */
149 #define MODE_RAND_LSEEK 2 /* random lseek before write */
150 #define MODE_GROW_BY_LSEEK 4 /* lseek beyond end of file then write a byte */
151 #define RANDOM_OPEN 999876 /* if Open_flags set to this value, open flags */
152 /* will be randomly choosen from Open_flags[] */
153 #define MODE_FIFO S_IFIFO /* defined in stat.h 0010000 */
155 int num_files = 0; /* num_auto_files + cmd line files */
156 char *filenames; /* pointer to space containing filenames */
157 int remove_files = 0; /* if set, cleanup default is not to cleanup */
158 int bytes_consumed = 0; /* total bytes consumed, all files */
159 int bytes_to_consume = 0; /* non-zero if -B was specified, total bytes */
160 int Maxerrs = 100; /* Max number errors before forced exit */
161 int Errors = 0; /* number of encountered errors */
162 int Upanic_on_error = 0; /* call upanic if error and this variable set */
164 /* The *_size variables are only used when random iosize option (-r) is used */
166 int min_size=1; /* also set in option parsing */
167 int mult_size=1; /* when random iosz, iosz must be mult of mult_size */
168 /* the *_lseek variables are only used when radon lseek option (-R) is used */
169 int min_lseek=0; /* also set in option parsing */
170 int max_lseek=-1; /* -1 means size of file */
172 int Pattern=PATTERN_OFFSET; /* This pattern is 64 bit word based */
174 int Pattern=PATTERN_ASCII;
176 int Seed=-1; /* random number seed, < 0 == uninitialized */
177 int Nseeds=0; /* Number of seed specified by the user */
178 int *Seeds; /* malloc'ed arrary of ints holding user spec seeds */
180 int using_random=0; /* flag indicating randomization is being used */
181 float delaysecs=0.0; /* delay between iterations (in seconds) */
182 int delaytime; /* delay between iterations in clocks/uses */
183 int lockfile=0; /* if set, do file locking */
184 /* 1 = do file locking around write, trunc */
186 /* 2 = write lock around all file operations */
188 int Woffset=0; /* offset before last write */
189 int Grow_incr=4096; /* sz of last write */
190 int Mode=0; /* bitmask of write/trunc mode */
191 /* also knows if dealing with fifo */
192 char *Buffer = NULL; /* buffer used by write and write check */
193 int Alignment=0; /* if non word multiple, io will not be word aligned */
194 int Opid=0; /* original pid */
196 int Sync_with_others = 0; /* Flag indicating to stop other if we stop before DONE */
197 int Iter_cnt = 0; /* contains current iteration count value */
198 char TagName[40]; /* name of this growfiles (see Monster) */
208 * Define open flags that will be used when '-o random' option is used.
209 * Note: If there is more than one growfiles doing its thing to the same
210 * file, O_TRUNC will cause data mismatches. How you ask?
211 * timing of events, example:
212 * Process one Process two
213 * --------------- -------------
219 * write with wrong pattern
220 * because offset is wrong
222 * The second process truncated the file after the pattern was
223 * determined, thus the pattern is wrong for the file location.
225 * There can also be a timing problem with open flag O_APPEND if
226 * file locks are not being used (-l option). Things could happen
227 * between the fstat and the write. Thus, writing the wrong pattern.
228 * If all processes observe the file locks, O_APPEND should be ok
234 O_RDWR|O_CREAT|O_RAW,
235 O_RDWR|O_CREAT|O_BIG,
236 O_RDWR|O_CREAT|O_APPEND,
237 O_RDWR|O_CREAT|O_NDELAY,
238 O_RDWR|O_CREAT|O_PLACE,
239 O_RDWR|O_CREAT|O_SYNC,
240 O_RDWR|O_CREAT|O_RAW|O_SYNC,
241 O_RDWR|O_CREAT|O_NDELAY|O_SYNC,
242 O_RDWR|O_CREAT|O_NDELAY|O_SYNC|O_BIG,
243 O_RDWR|O_CREAT|O_RAW,
244 O_RDWR|O_CREAT|O_RAW|O_APPEND,
245 O_RDWR|O_CREAT|O_RAW|O_BIG,
246 O_RDWR|O_CREAT|O_RAW|O_APPEND|O_BIG,
248 * O_WELLFORMED makes -o random require well formed i/o
250 #if ALLOW_O_WELLFORMED
252 O_RDWR|O_CREAT|O_PARALLEL|O_WELLFORMED|O_RAW,
253 O_RDWR|O_CREAT|O_PARALLEL|O_WELLFORMED|O_RAW|O_TRUNC,
254 #endif /* O_PARALLEL */
259 O_RDWR|O_CREAT|O_APPEND,
260 O_RDWR|O_CREAT|O_NDELAY,
261 O_RDWR|O_CREAT|O_SYNC,
262 O_RDWR|O_CREAT|O_SYNC|O_NDELAY,
263 O_RDWR|O_CREAT|O_APPEND|O_NDELAY,
268 #define REXEC_INIT 0 /* don't do re-exec of childern */
269 #define REXEC_DOIT 1 /* Do re-exec of childern */
270 #define REXEC_DONE 2 /* We've already been re-exec'ed */
280 #define USECS_PER_SEC 1000000 /* microseconds per second */
283 * Define marcos used when dealing with file locks.
285 #define LKLVL0 1 /* file lock around write/read/trunc */
286 #define LKLVL1 2 /* file lock after open to before close */
289 * Define special max lseek values
291 #define LSK_EOF -1 /* set fptr up to EOF */
292 #define LSK_EOFPLUSGROW -2 /* set fptr up to EOF + grow - leave whole */
293 #define LSK_EOFMINUSGROW -3 /* set fptr up to EOF-grow - no grow */
296 /***********************************************************************
298 ***********************************************************************/
304 extern char *optarg; /* used by getopt */
309 int first_file_ind = 0;
310 int num_auto_files = 0; /* files created by tool */
311 int seq_auto_files = 0; /* auto files created by tool created by tool */
312 char *auto_dir = DEF_DIR;
313 char *auto_file = DEF_FILE;
314 int grow_incr = 4096;
315 int trunc_incr = 4096;
316 int trunc_inter = 0; /* 0 means none, */
317 int unlink_inter = 0; /* 0 means none, 1 means always unlink */
318 int unlink_inter_ran = -1; /* -1 -use unlink_inter, otherwise randomly choose */
319 /* between unlink_inter and unlink_inter_ran */
320 int file_check_inter = 0; /* 0 means never, 1 means always */
321 int write_check_inter = 1; /* 0 means never, 1 means always */
322 int iterations = 1; /* number of increments to be added */
323 int no_file_check = 0; /* if set, no whole file checking will be done */
325 int fd; /* file descriptor */
326 int stop = 0; /* loop stopper if set */
330 int pre_alloc_space = 0;
332 int total_grow_value = 0; /* used in pre-allocations */
334 int backgrnd = 1; /* return control to user */
336 int time_iterval = -1;
337 time_t start_time = 0;
338 char reason[40]; /* reason for loop termination */
341 int reexec=REXEC_INIT; /* reexec info */
342 char *exec_path=NULL;
346 char *filename; /* name of file specified by user */
347 char *cptr; /* temp char pointer */
348 extern int Forker_npids; /* num of forked pid, defined in forker.c */
351 if ( argv[0][0] == '-' )
354 * Determine name of file used to invoke this program
356 if ((Progname=strrchr(argv[0], '/')) != NULL)
366 while ((ind=getopt(argc, argv,
367 "hB:C:c:bd:D:e:Ef:g:H:I:i:lL:n:N:O:o:pP:q:wt:r:R:s:S:T:uU:W:xy")) != EOF) {
375 switch (sscanf(optarg, "%i%c",
376 &bytes_to_consume, &chr)) {
382 bytes_to_consume *= BSIZE;
385 "%s%s: --B option arg invalid\n",
393 fprintf(stderr, "%s%s: --B option arg invalid\n",
403 prt_examples(stdout);
406 case 'b' : /* batch */
411 if (sscanf(optarg, "%i", &write_check_inter) != 1 ) {
412 fprintf(stderr, "%s%s: --c option arg invalid\n",
420 if (sscanf(optarg, "%i", &file_check_inter) != 1 ) {
421 fprintf(stderr, "%s%s: --c option arg invalid\n",
432 unsetenv("TMPDIR"); /* force the use of auto_dir */
434 if ( stat(auto_dir, &statbuf) == -1 ) {
435 if ( mkdir(auto_dir, 0777) == -1 ) {
436 if ( errno != EEXIST ) {
438 "%s%s: Unable to make dir %s\n",
439 Progname, TagName, auto_dir);
445 if ( ! (statbuf.st_mode & S_IFDIR) ) {
447 "%s%s: %s already exists and is not a directory\n",
448 Progname, TagName, auto_dir);
455 if (sscanf(optarg, "%i", &Debug) != 1 ) {
456 fprintf(stderr, "%s%s: --D option arg invalid\n",
464 if (sscanf(optarg, "%i", &Maxerrs) != 1 ) {
465 fprintf(stderr, "%s%s: --e option arg invalid\n",
477 if ((ret=sscanf(optarg, "%i%c", &grow_incr, &chr)) < 1 ||
480 fprintf(stderr, "%s%s: --g option arg invalid\n",
486 if ( chr == 'b' || chr == 'B' )
490 "%s%s: --g option arg invalid\n",
499 if (sscanf(optarg, "%f", &delaysecs) != 1 || delaysecs < 0 ) {
501 fprintf(stderr, "%s%s: --H option arg invalid\n",
509 if (sscanf(optarg, "%i", &iterations) != 1 ||
512 fprintf(stderr, "%s%s: --i option arg invalid\n",
521 if((io_type=lio_parse_io_arg1(optarg)) == -1 ) {
523 "%s%s: --I arg is invalid, must be s, p, f, a, l, L or r.\n",
527 if( io_type & LIO_RANDOM )
530 if((io_type=parse_io_arg(optarg)) == -1 ) {
532 "%s%s: --I arg is invalid, must be s, p, f, a, l, L or r.\n",
536 if( io_type == 99 ) /* hold-over until tlibio.h */
544 lockfile=2; /* lockfile can only be 1 or 2 */
548 if (sscanf(optarg, "%i", &time_iterval) != 1 ||
550 fprintf(stderr, "%s%s: --L option arg invalid\n",
558 if (sscanf(optarg, "%i:%i", &num_procs, &forker_mode) < 1 ||
561 fprintf(stderr, "%s%s: --n option arg invalid\n",
570 if (sscanf(optarg, "%i", &num_auto_files) != 1 ||
571 num_auto_files < 0 ) {
573 fprintf(stderr, "%s%s: --N option arg invalid\n",
581 if (sscanf(optarg, "%i", &Alignment) != 1 ||
582 num_auto_files < 0 ) {
584 fprintf(stderr, "%s%s: --O option arg invalid\n",
592 if ( strcmp(optarg, "random") == 0 ){
593 open_flags=RANDOM_OPEN;
596 } else if ((open_flags=parse_open_flags(optarg, NULL)) == -1 ) {
597 fprintf(stderr, "%s%s: --o arg contains invalid flag\n",
604 case 'p' : /* pre allocate space */
606 printf("%s%s: --p is illegal option on this system\n",
616 if (strcmp(optarg, "PANIC") != 0 ) {
617 fprintf(stderr, "%s%s: --P arg must be PANIC\n", Progname, TagName);
621 printf("%s: Will call upanic after writes\n");
623 printf("%s%s: --P is illegal option on non-cray system\n",
629 case 'q': /* file content or pattern */
632 Pattern = PATTERN_ALT;
635 Pattern = PATTERN_ASCII;
638 Pattern = PATTERN_PID;
641 Pattern = PATTERN_OFFSET;
644 Pattern = PATTERN_CHKER;
647 Pattern = PATTERN_CNTING;
650 Pattern = PATTERN_RANDOM;
654 Pattern = PATTERN_ZEROS;
657 Pattern = PATTERN_ONES;
661 "%s%s: --C option arg invalid, A, a, p, o, c, C, r, z, or 0\n",
668 case 'R': /* random lseek before write arg: [min-]max*/
669 if (sscanf(optarg, "%i-%i", &min_lseek, &max_lseek) != 2 ) {
670 min_lseek=1; /* same as default in define */
671 if (sscanf(optarg, "%i%c", &max_lseek, &chr) != 1 ) {
672 fprintf(stderr, "%s%s: --R option arg invalid: [min-]max\n",
677 if ( max_lseek < LSK_EOFMINUSGROW ) {
678 fprintf(stderr, "%s%s: --R option, max_lseek is invalid\n",
682 Mode |= MODE_RAND_LSEEK;
686 case 'r': /* random io size arg: [min-]max[:mult] */
688 /* min-max:mult format */
689 if (sscanf(optarg, "%i-%i:%i%c", &min_size, &max_size,
690 &mult_size, &chr) != 3 ) {
692 /* max:mult format */
693 if (sscanf(optarg, "%i:%i%c", &max_size,
694 &mult_size, &chr) != 2 ) {
696 if (sscanf(optarg, "%i-%i%c", &min_size,
697 &max_size, &chr) != 2 ) {
699 if (sscanf(optarg, "%i%c", &max_size, &chr) != 1 ) {
701 "%s%s: --r option arg invalid: [min-]max[:mult]\n",
709 if ( max_size < 0 ) {
710 fprintf(stderr, "%s%s: --r option, max_size is invalid\n",
715 * If min and max are the same, no randomness
717 if ( min_size != max_size ) {
718 Mode |= MODE_RAND_SIZE;
724 if (sscanf(optarg, "%i", &seq_auto_files) != 1 ||
725 seq_auto_files < 0 ) {
727 fprintf(stderr, "%s%s: --S option arg invalid\n",
734 case 's': /* format: seed[,seed...] */
736 /* count the number of seeds */
738 for(Nseeds=1; *cptr ; Nseeds++) {
739 if ( (filename=strchr(cptr, ',')) == NULL )
744 Seeds=(int *)malloc(Nseeds*sizeof(int));
747 * check that each seed is valid and put them in
748 * the newly malloc'ed Seeds arrary.
750 filename=cptr=optarg;
751 for(Nseeds=0; *cptr; Nseeds++) {
752 if ( (filename=strchr(cptr, ',')) == NULL ) {
753 if ( sscanf(cptr, "%i", &Seeds[Nseeds]) < 1 ) {
754 fprintf(stderr, "%s%s: --s option arg %s invalid\n",
755 Progname, TagName, cptr);
764 if ( sscanf(cptr, "%i", &Seeds[Nseeds]) < 1 ) {
765 fprintf(stderr, "%s%s: --s option arg %s invalid\n",
766 Progname, TagName, cptr);
770 *filename=','; /* restore string */
777 if ((ret=sscanf(optarg, "%i%c", &trunc_incr, &chr)) < 1 ||
780 fprintf(stderr, "%s%s: --t option arg invalid\n",
786 if ( chr == 'b' || chr == 'B' )
790 "%s%s: --t option arg invalid\n",
798 case 'T': /* truncate interval */
799 if (sscanf(optarg, "%i%c", &trunc_inter, &chr) != 1 ||
802 fprintf(stderr, "%s%s: --T option arg invalid\n",
813 case 'U': /* how often to unlink file */
816 * A-B - randomly pick interval between A and B
817 * X - unlink file every X iteration
819 if (sscanf(optarg, "%i-%i", &unlink_inter,
820 &unlink_inter_ran) == 2 ) {
822 if ( unlink_inter < 0 || unlink_inter_ran < 0 ) {
823 fprintf(stderr, "%s%s: --U option arg invalid\n",
828 /* ensure unlink_inter contains smaller value */
829 if ( unlink_inter > unlink_inter_ran ) {
830 tmp=unlink_inter_ran;
831 unlink_inter_ran=unlink_inter;
836 } else if (sscanf(optarg, "%i%c", &unlink_inter, &chr) != 1 ||
839 fprintf(stderr, "%s%s: --U option arg invalid\n",
847 if ( reexec != REXEC_DONE )
852 Mode |= MODE_GROW_BY_LSEEK;
856 sprintf( TagName, "(%.39s)", optarg );
871 cptr = getenv("TOUTPUT");
872 if( (cptr != NULL) && (strcmp( cptr, "NOPASS" ) == 0) ){
877 if ( Pattern == PATTERN_RANDOM ) {
879 if ( write_check_inter || file_check_inter )
880 printf("%s%s: %d Using random pattern - no data checking will be performed!\n",
881 Progname, TagName, (int)getpid());
883 else if ( max_lseek == LSK_EOFPLUSGROW || Mode & MODE_GROW_BY_LSEEK ) {
886 if ( file_check_inter )
887 printf("%s%s: %d Using random lseek beyond EOF or lseek grow,\n\
888 no whole file checking will be performed!\n", Progname, TagName, (int)getpid());
892 if ( Mode & MODE_RAND_SIZE )
902 printf("%s: %d DEBUG2 forking, returning control to the user\n",
904 background(Progname); /* give user their prompt back */
908 if ( Sync_with_others )
914 lio_set_debug(Debug-3);
916 set_iowrite_debug(Debug-3);
921 * Print some program information here if debug is turned on to
927 if ( Mode & MODE_GROW_BY_LSEEK )
928 printf("%s: %d DEBUG lseeking past end of file, writting a \"w\"\n",
930 else if ( Pattern == PATTERN_OFFSET )
931 printf("%s: %d DEBUG3 %d<byteoffset>%d per word pattern multi-writers.\n",
932 Progname, Pid, STATIC_NUM, STATIC_NUM);
933 else if ( Pattern == PATTERN_PID )
934 printf("%s: %d DEBUG3 <pid><byteoffset><pid> per word pattern - 1 writer\n",
936 else if ( Pattern == PATTERN_ASCII )
937 printf("%s: %d DEBUG3 ascii pattern (vi'able)- allows multiple writers\n",
939 else if ( Pattern == PATTERN_ALT )
940 printf("%s: %d DEBUG3 alt bit pattern - allows multiple writers\n",
942 else if ( Pattern == PATTERN_CHKER )
943 printf("%s: %d DEBUG3 checkerboard pattern - allows multiple writers\n",
945 else if ( Pattern == PATTERN_CNTING )
946 printf("%s: %d DEBUG3 counting pattern - allows multiple writers\n",
948 else if ( Pattern == PATTERN_RANDOM )
949 printf("%s: %d DEBUG3 random integer pattern - no write/file checking\n",
951 else if ( Pattern == PATTERN_ONES )
952 printf("%s: %d DEBUG3 all ones pattern - allows multiple writers\n",
954 else if ( Pattern == PATTERN_ZEROS )
955 printf("%s: %d DEBUG3 all zeros pattern - allows multiple writers\n",
959 printf("%s: %d DEBUG3 unknown pattern\n",
961 if ( bytes_to_consume )
962 printf("%s: %d DEBUG3 bytes_to_consume = %d\n",
963 Progname, Pid, bytes_to_consume);
964 printf("%s: %d DEBUG3 Maxerrs = %d, pre_alloc_space = %d, filelocking = %d\n",
965 Progname, Pid, Maxerrs, pre_alloc_space, lockfile);
967 printf("%s: %d DEBUG3 Debug = %d, remove files in cleanup : %d\n",
968 Progname, Pid, Debug, remove_files);
970 printf("%s: %d DEBUG3 Mode = %#o\n", Progname, Pid, Mode);
972 if ( open_flags == RANDOM_OPEN )
973 printf("%s: %d DEBUG3 open_flags = (random), io_type = %#o\n", Progname,
976 printf("%s: %d DEBUG3 open_flags = %#o, io_type = %#o\n", Progname,
977 Pid, open_flags, io_type);
979 if ( Mode & MODE_RAND_SIZE ) {
980 printf("%s: %d DEBUG3 random write/trunc: min=%d, max=%d, mult = %d\n",
981 Progname, Pid, min_size, max_size, mult_size);
984 printf("%s: %d DEBUG3 grow_incr = %d\n",
985 Progname, Pid, grow_incr);
987 if ( Mode & MODE_RAND_LSEEK ) {
988 if ( max_lseek == LSK_EOF )
989 printf("%s: %d DEBUG3 random lseek: min=%d, max=<endoffile>\n",
990 Progname, Pid, min_lseek);
991 else if ( max_lseek == LSK_EOFPLUSGROW )
992 printf("%s: %d DEBUG3 random lseek: min=%d, max=<endoffile+iosize>\n",
993 Progname, Pid, min_lseek);
994 else if ( max_lseek == LSK_EOFMINUSGROW )
995 printf("%s: %d DEBUG3 random lseek: min=%d, max=<endoffile-iosize>\n",
996 Progname, Pid, min_lseek);
998 printf("%s: %d DEBUG3 random lseek: min=%d, max=%d\n",
999 Progname, Pid, min_lseek, max_lseek);
1002 printf("%s: %d DEBUG3 check write interval = %d, check file interval = %d\n",
1003 Progname, Pid, write_check_inter, file_check_inter);
1005 printf("%s: %d DEBUG3 trunc interval = %d, trunc_incr = %d\n",
1006 Progname, Pid, trunc_inter, trunc_incr);
1008 if ( no_file_check )
1009 printf("%s: %d DEBUG3 no whole file checking will be done\n",
1012 if ( unlink_inter_ran == -1 ) {
1013 printf("%s: %d DEBUG3 unlink_inter = %d\n",
1014 Progname, Pid, unlink_inter);
1016 printf("%s: %d DEBUG3 unlink_inter = %d, unlink_inter_ran = %d\n",
1017 Progname, Pid, unlink_inter, unlink_inter_ran);
1021 num=sizeof(Open_flags)/sizeof(int);
1022 printf("%s: %d DEBUG9 random open flags values:\n", Progname, Pid);
1023 for(ind=0; ind<num; ind++) {
1024 printf("\t%#o\n", Open_flags[ind]);
1027 } /* end of DEBUG > 2 */
1029 if ( Debug > 1 && num_procs > 1 ) {
1030 printf("%s: %d DEBUG2 about to fork %d more copies\n", Progname,
1034 fflush(stdout); /* ensure pending i/o is flushed before forking */
1037 forker(num_procs, forker_mode, Progname);
1039 Pid=getpid(); /* reset after the forks */
1041 * If user specified random seed(s), get that random seed value.
1042 * get random seed if it was not specified by the user.
1043 * This is done after the forks, because pid is used to get the seed.
1045 if ( Nseeds == 1 ) {
1047 * If only one seed specified, all processes will get that seed.
1050 } else if ( Nseeds > 1 ) {
1052 * More than one seed was specified.
1053 * The original process gets the first seed. Each
1054 * process will be get the next seed in the specified list.
1056 if ( Opid == Pid ) {
1060 * If user didn't specify enough seeds, use default method.
1062 if ( Forker_npids >= Nseeds )
1063 Seed=time(0) + Pid; /* default random seed */
1065 Seed=Seeds[Forker_npids];
1070 * Generate a random seed based on time and pid.
1071 * It has a good chance of being unique for each pid.
1073 Seed=time(0) + Pid; /* default random seed */
1076 random_range_seed(Seed);
1078 if ( using_random && Debug > 0 )
1079 printf("%s%s: %d DEBUG1 Using random seed of %d\n",
1080 Progname, TagName, Pid, Seed);
1082 if ( unlink_inter_ran > 0 ) {
1084 * Find unlinking file interval. This must be done after
1085 * the seed was set. This allows multiple copies to
1086 * get different intervals.
1089 unlink_inter=random_range(tmp, unlink_inter_ran, 1, NULL);
1092 printf("%s: %d DEBUG3 Unlink interval is %d (random %d - %d)\n",
1093 Progname, Pid, unlink_inter, tmp, unlink_inter_ran);
1097 * re-exec all childern if reexec is set to REXEC_DOIT.
1098 * This is useful on MPP systems to get the
1099 * child process on another PE.
1101 if ( reexec == REXEC_DOIT && Opid != Pid ) {
1102 if ( exec_path == NULL ) {
1103 exec_path = argv[0];
1104 /* Get space for cmd (2 extra, 1 for - and 1 fro NULL */
1105 argv[0] = (char *)malloc(strlen(exec_path) + 2);
1106 sprintf(argv[0], "-%s", exec_path);
1110 printf("%s: %d DEBUG3 %s/%d: execvp(%s, argv)\n",
1111 Progname, Pid, __FILE__, __LINE__, argv[0]);
1113 execvp(argv[0], argv);
1116 /*** begin filename stuff here *****/
1118 * Determine the number of files to be dealt with
1120 if ( optind == argc ) {
1122 * no cmd line files, therfore, set
1123 * the default number of auto created files
1125 if ( ! num_auto_files && ! seq_auto_files )
1129 first_file_ind=optind;
1130 num_files += argc-optind;
1133 if ( num_auto_files ) {
1134 num_files += num_auto_files;
1137 if ( seq_auto_files ) {
1138 num_files += seq_auto_files;
1142 * get space for file names
1144 if ((filenames=(char *)malloc(num_files*PATH_MAX)) == NULL) {
1145 fprintf(stderr, "%s%s: %d %s/%d: malloc(%d) failed: %s\n",
1146 Progname, TagName, Pid, __FILE__, __LINE__, num_files*PATH_MAX,
1152 * fill in filename cmd files then auto files.
1156 if ( first_file_ind ) {
1157 for(ind=first_file_ind; ind<argc; ind++, num++) {
1158 strcpy((char *)filenames+(num*PATH_MAX), argv[ind]);
1163 * construct auto filename and insert them into filenames space
1165 for(ind=0;ind<num_auto_files; ind++, num++) {
1166 sprintf((char *)filenames+(num*PATH_MAX), "%s/%s.%d",
1167 auto_dir, auto_file, ind);
1171 * construct auto seq filenames
1173 for(ind=1; ind<=seq_auto_files; ind++, num++) {
1174 sprintf((char *)filenames+(num*PATH_MAX), "%s/%s%d",
1175 auto_dir, auto_file, ind);
1178 /**** end filename stuff ****/
1180 if ( time_iterval > 0 )
1184 * get space for I/O buffer
1187 if ((Buffer=(char *)malloc(grow_incr+Alignment)) == NULL) {
1188 fprintf(stderr, "%s%s: %d %s/%d: malloc(%d) failed: %s\n",
1189 Progname, TagName, Pid, __FILE__, __LINE__, grow_incr, strerror(errno));
1193 Buffer = Buffer + Alignment;
1198 printf("%s: %d DEBUG3 num_files = %d\n",
1199 Progname, Pid, num_files);
1203 if ( pre_alloc_space ) {
1204 if ( iterations == 0 ) {
1205 fprintf(stderr, "%s%s: %d %s/%d: can NOT pre-alloc and grow forever\n",
1206 Progname, TagName, Pid, __FILE__, __LINE__);
1209 if ( Mode & MODE_RAND_SIZE ) {
1211 "%s%s: %d %s/%d: can NOT pre-alloc and do random io size\n",
1212 Progname, TagName, Pid, __FILE__, __LINE__);
1216 total_grow_value=grow_incr * iterations;
1221 if ( bytes_to_consume && bytes_to_consume < total_grow_value ) {
1222 total_grow_value=bytes_to_consume;
1228 * If delaying between iterations, get amount time to
1229 * delaysecs in clocks or usecs.
1230 * If on the CRAY, delaytime is in clocks since
1231 * _rtc() will be used, which does not have the overhead
1232 * of gettimeofday(2).
1237 hz=sysconf(_SC_CLK_TCK);
1238 delaytime=(int)((float)hz * delaysecs);
1240 delaytime=(int)((float)USECS_PER_SEC * delaysecs);
1245 * This is the main iteration loop.
1246 * Each iteration, all files can be opened, written to,
1247 * read to check the write, check the whole file,
1248 * truncated, and closed.
1250 for(Iter_cnt=1; ! stop ; Iter_cnt++) {
1252 if ( iterations && Iter_cnt >= iterations+1 ) {
1253 strcpy(reason, "Hit iteration value");
1258 if ( (time_iterval > 0) && (start_time + time_iterval < time(0)) ) {
1259 sprintf(reason, "Hit time value of %d", time_iterval);
1264 if ( bytes_to_consume && bytes_consumed >= bytes_to_consume) {
1265 sprintf(reason, "Hit bytes consumed value of %d", bytes_to_consume);
1271 * This loop will loop through all files.
1272 * Each iteration, a single file can be opened, written to,
1273 * read to check the write, check the whole file,
1274 * truncated, and closed.
1276 for(ind=0; ind<num_files; ind++) {
1281 filename=(char *)filenames+(ind*PATH_MAX);
1282 Fileinfo.filename=(char *)filenames+(ind*PATH_MAX);
1285 if ( open_flags == RANDOM_OPEN ) {
1286 ret=Open_flags[random_range(0, sizeof(Open_flags)/sizeof(int)-1, 1, NULL)];
1292 Fileinfo.openflags=ret;
1295 printf("%s: %d DEBUG3 %s/%d: %d Open filename = %s, open flags = %#o %s\n",
1296 Progname, Pid, __FILE__, __LINE__, Iter_cnt, filename, ret,
1297 openflags2symbols(ret, ",", NULL));
1298 } else if ( Debug > 2 ) {
1299 printf("%s: %d DEBUG3 %s/%d: %d filename = %s, open flags = %#o\n",
1300 Progname, Pid, __FILE__, __LINE__, Iter_cnt, filename, ret);
1304 * open file with desired flags.
1306 if ( (fd=open(filename, ret, 0777)) == -1 ) {
1308 "%s%s: %d %s/%d: open(%s, %#o, 0777) returned -1, errno:%d %s\n",
1309 Progname, TagName, Pid, __FILE__, __LINE__, filename, ret, errno, strerror(errno));
1316 lkfile(fd, LOCK_EX, LKLVL1); /* lock if lockfile is LKLVL1 */
1320 * preallocation is only done once, if specified.
1322 if ( pre_alloc_space ) {
1323 if (pre_alloc(filename, fd, total_grow_value) != 0 ) {
1328 printf("%s: %d DEBUG2 %s/%d: pre_allocated %d for file %s\n",
1329 Progname, Pid, __FILE__, __LINE__, total_grow_value, filename);
1331 lkfile(fd, LOCK_UN, LKLVL1); /* release lock */
1333 Iter_cnt=0; /* reset outside loop to restart from one */
1339 * grow file by desired amount.
1340 * growfile() will set the Grow_incr variable and
1341 * possiblly update the Mode variable indicating
1342 * if we are dealing with a FIFO file.
1345 if (growfile(fd, filename, grow_incr, Buffer) != 0 ) {
1347 lkfile(fd, LOCK_UN, LKLVL1); /* release lock */
1353 * check if last write is not corrupted
1355 if ( check_write(fd, write_check_inter, filename,
1361 * Check that whole file is not corrupted.
1363 if ( check_file(fd, file_check_inter, filename,
1364 no_file_check) != 0 ) {
1369 * shrink file by desired amount if it is time
1372 if ( shrinkfile(fd, filename, trunc_incr, trunc_inter, Mode) != 0 ) {
1376 lkfile(fd, LOCK_UN, LKLVL1); /* release lock */
1379 printf("%s: %d DEBUG5 %s/%d: %d Closing file %s fd:%d \n",
1380 Progname, Pid, __FILE__, __LINE__, Iter_cnt, filename, fd);
1384 * Unlink the file if that is desired
1386 if ( unlink_inter && (Iter_cnt % unlink_inter == 0) ) {
1389 printf("%s: %d DEBUG5 %s/%d: %d Unlinking file %s\n",
1390 Progname, Pid, __FILE__, __LINE__, Iter_cnt, filename);
1396 * delay while staying active for "delaysecs" seconds.
1404 while ( ct < end ) {
1408 struct timeval curtime;
1409 gettimeofday(&curtime, NULL);
1410 ct=curtime.tv_sec*USECS_PER_SEC + curtime.tv_usec;
1412 while ( ct < end ) {
1414 gettimeofday(&curtime, NULL);
1415 ct=curtime.tv_sec*USECS_PER_SEC + curtime.tv_usec;
1422 * if Iter_cnt == 0, then we pre allocated space to all files
1423 * and we are starting outside loop over. Set pre_alloc_space
1424 * to zero otherwise we get in infinite loop
1426 if ( Iter_cnt == 0 ) {
1432 } /* end iteration for loop */
1436 printf("%s%s: %d %s/%d: DONE %d iterations to %d files. %s\n",
1437 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, num_files, reason);
1446 printf("%s%s: %d DEBUG3 %d error(s) encountered\n",
1447 Progname, TagName, Pid, Errors);
1448 printf("%s%s: %d DEBUG3 %s/%d: exiting with value of 1\n", Progname, TagName, Pid, __FILE__, __LINE__);
1453 printf("%s%s: %d DEBUG3 %s/%d: no errors, exiting with value of 0\n", Progname, TagName, Pid, __FILE__, __LINE__);
1457 /***********************************************************************
1459 ***********************************************************************/
1467 * now loop through all signals and set the handlers
1470 for (sig = 1; sig < NSIG; sig++) {
1481 #endif /* SIGCKPT */
1484 #endif /* SIGRESTART */
1490 sigset( sig, sig_handler );
1492 /* linux and cray */
1493 signal(sig, sig_handler);
1503 /***********************************************************************
1505 ***********************************************************************/
1512 if ( sig == SIGUSR2 ) {
1513 fprintf(stdout, "%s%s: %d %s/%d: received SIGUSR2 (%d) - stopping.\n",
1514 Progname, TagName, Pid, __FILE__, __LINE__, sig);
1516 signal(sig, sig_handler); /* allow us to get this signal more than once */
1519 } else if( sig == SIGINT ){
1520 /* The user has told us to cleanup, don't pretend it's an error. */
1523 fprintf(stderr, "%s%s: %d %s/%d: received unexpected signal: %d\n", Progname, TagName,
1524 Pid, __FILE__, __LINE__, sig);
1527 fprintf(stderr, "%s%s: %d %s/%d: received unexpected signal: %d\n", Progname, TagName,
1528 Pid, __FILE__, __LINE__, sig);
1534 printf("%s%s: %d DEBUG3 %s/%d: Exiting with a value of %d\n",
1535 Progname, TagName, Pid, __FILE__, __LINE__, exit_stat);
1540 /***********************************************************************
1541 * this function attempts to send SIGUSR2 to other growfiles processes
1542 * telling them to stop.
1544 ***********************************************************************/
1548 static int send_signals = 0;
1550 extern int Forker_pids[];
1551 extern int Forker_npids;
1553 if ( Sync_with_others && send_signals == 0 ) {
1556 send_signals=1; /* only send signals once */
1558 printf("%s%s: %d DEBUG2 %s/%d: Sending SIGUSR2 to pgrp\n",
1559 Progname, TagName, Pid, __FILE__, __LINE__);
1560 killm(C_PGRP, getpgrp(), SIGUSR2);
1562 send_signals=1; /* only send signals once */
1564 for (ind=0; ind< Forker_npids; ind++) {
1565 if ( Forker_pids[ind] != Pid )
1567 printf("%s%s: %d DEBUG2 %s/%d: Sending SIGUSR2 to pid %d\n",
1568 Progname, TagName, Pid, __FILE__, __LINE__, Forker_pids[ind]);
1569 kill(Forker_pids[ind], SIGUSR2);
1576 /***********************************************************************
1577 * this function will count the number of errors encountered.
1578 * This function will call upanic if wanted or cleanup and
1579 * and exit is Maxerrs were encountered.
1580 ***********************************************************************/
1587 if ( Errors & Upanic_on_error ) {
1592 if ( Maxerrs && Errors >= Maxerrs ) {
1593 printf("%s%s: %d %s/%d: %d Hit max errors value of %d\n",
1594 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, Maxerrs);
1599 printf("%s%s: %d DEBUG3 %d error(s) encountered\n",
1600 Progname, TagName, Pid, Errors);
1601 printf("%s%s: %d DEBUG3 %s/%d: exiting with value of 1\n", Progname, TagName, Pid, __FILE__, __LINE__);
1610 /***********************************************************************
1612 ***********************************************************************/
1618 if ( remove_files ) {
1620 printf("%s: %d DEBUG3 Removing all %d files\n",
1621 Progname, Pid, num_files);
1622 for(ind=0; ind<=num_files; ind++) {
1623 unlink(filenames+(ind*PATH_MAX));
1626 if ( using_random && Debug > 1 )
1627 printf("%s%s: %d DEBUG2 Used random seed: %d\n",
1628 Progname, TagName, Pid, Seed);
1632 /***********************************************************************
1634 ***********************************************************************/
1639 "Usage: %s%s [-bhEluy][[-g grow_incr][-i num][-t trunc_incr][-T trunc_inter]\n",
1640 Progname, TagName );
1642 "[-d auto_dir][-e maxerrs][-f auto_file][-N num_files][-w][-c chk_inter][-D debug]\n");
1644 "[-s seed][-S seq_auto_files][-p][-P PANIC][-I io_type][-o open_flags][-B maxbytes]\n");
1646 "[-r iosizes][-R lseeks][-U unlk_inter][-W tagname] [files]\n");
1650 } /* end of usage */
1652 /***********************************************************************
1654 ***********************************************************************/
1661 -h Specfied to print this help and exit.\n\
1662 -b Specfied to execute in sync mode.(def async mode)\n\
1663 -B maxbytes Max bytes to consume by all files. growfiles exits when more\n\
1664 than maxbytes have been consumed. (def no chk) If maxbytes ends\n\
1665 with the letter 'b', maxbytes is multiplied by BSIZE\n\
1666 -C write_chk Specifies how often to check the last write (default 1)\n\
1667 -c file_chk Specifies how often to check whole file (default 0)\n\
1668 -d auto_dir Specifies the directory to auto created files. (default .)\n\
1669 -D debug_lvl Specifies the debug level (default 1)\n\
1670 -E Print examples and exit\n\
1671 -e errs The number errors that will terminate this program (def 100)\n\
1672 -f auto_file Specifies the base filename files created. (default \"gf\")\n\
1673 -g grow_incr Specfied to grow by incr for each num. (default 4096)\n\
1674 grow_incr may end in b for blocks\n\
1675 If -r option is used, this option is ignored and size is random\n\
1676 -H delay Amount of time to delay between each file (default 0.0)\n\
1677 -I io_type Specifies io type: s - sync, p - polled async, a - async (def s)\n\
1678 l - listio sync, L - listio async, r - random\n\
1679 -i iteration Specfied to grow each file num times. 0 means forever (default 1)\n\
1680 -l Specfied to do file locking around write/read/trunc\n\
1681 If specified twice, file locking after open to just before close\n\
1682 -L time Specfied to exit after time secs, must be used with -i.\n\
1683 -N num_files Specifies the number of files to be created.\n\
1684 The default is zero if cmd line files.\n\
1685 The default is one if no cmd line files.\n\
1686 -n num_procs Specifies the number of copies of this cmd.\n\
1687 -o op_type Specifies open flages: (def O_RDWR,O_CREAT) op_type can be 'random'\n\
1688 -O offset adjust i/o buffer alignment by offset bytes\n\
1689 -P PANIC Specifies to call upanic on error.\n\
1690 -p Specifies to pre-allocate space\n\
1691 -q pattern pattern can be a - ascii, p - pid with boff, o boff (def)\n\
1692 A - Alternating bits, r - random, O - all ones, z - all zeros,\n\
1693 c - checkboard, C - counting\n\
1694 -R [min-]max random lseek before write and trunc, max of -1 means filesz,\n\
1695 -2 means filesz+grow, -3 filesz-grow. (min def is 0)\n\
1696 -r [min-]max random io write size (min def is 1)\n\
1697 -S seq_auto_files Specifies the number of seqental auto files (default 0)\n\
1698 -s seed[,seed...] Specifies the random number seed (default time(0)+pid)\n\
1699 -t trunc_incr Specfied the amount to shrink file. (default 4096)\n\
1700 trunc_inter may end in b for blocks\n\
1701 If -R option is used, this option is ignored and trunc is random\n\
1702 -T trunc_inter Specfied the how many grows happen before shrink. (default 0)\n\
1703 -u unlink files before exit\n\
1704 -U ui[-ui2] Unlink files each ui iteration (def 0)\n\
1705 -w Specfied to grow via lseek instead of writes.\n\
1706 -W tag-name Who-am-i. My Monster tag name. (used by Monster).\n\
1707 -x Re-exec children before continuing - useful on MPP systems\n\
1708 -y Attempt to sync copies - if one fails it will send sigusr2 to others\n\
1709 Action to each file every iteration is open, write, write check\n\
1710 file check, trunc and closed.\n");
1715 /***********************************************************************
1717 ***********************************************************************/
1719 prt_examples(FILE *stream)
1721 /* This example creates 200 files in directory dir1. It writes */
1722 /* 4090 bytes 100 times then truncates 408990 bytes off the file */
1723 /* The file contents are checked every 1000 grow. */
1725 "# run forever: writes of 4090 bytes then on every 100 iterval\n\
1726 # truncate file by 408990 bytes. Done to 200 files in dir1.\n\
1727 %s -i 0 -g 4090 -T 100 -t 408990 -l -C 10 -c 1000 -d dir1 -S 200\n\n", Progname);
1729 /* same as above with 5000 byte grow and a 499990 byte tuncate */
1731 "# same as above with writes of 5000 bytes and truncs of 499990\n\
1732 %s -i 0 -g 5000 -T 100 -t 499990 -l -C 10 -c 1000 -d dir2 -S 200\n\n", Progname);
1734 /* This example beats on opens and closes */
1736 "# runs forever: beats on opens and closes of file ocfile - no io\n\
1737 %s -i 0 -g 0 -c 0 -C 0 ocfile\n\n", Progname);
1740 "# writes 4096 to files until 50 blocks are written\n\
1741 %s -i 0 -g 4096 -B 50b file1 file2\n\n", Progname);
1744 "# write one byte to 750 files in gdir then unlinks them\n\
1745 %s -g 1 -C 0 -d gdir -u -S 750\n\n", Progname);
1748 "# run 30 secs: random iosize, random lseek up to eof\n\
1749 %s -r 1-5000 -R 0--1 -i 0 -L 30 -C 1 g_rand1 g_rand2\n\n", Progname);
1752 "# run 30 secs: grow by lseek then write single byte, trunc every 10 itervals\n\
1753 %s -g 5000 -wlu -i 0 -L 30 -C 1 -T 10 g_sleek1 g_lseek2\n\n", Progname);
1756 "# run forever: 5 copies of random iosize, random lseek to beyond eof,\n\
1757 # rand io types doing a trunc every 5 iterations, with unlinks.\n\
1758 %s -i0 -r 1-50000 -R 0--2 -I r -C1 -l -n5 -u -U 100-200 gf_rana gf_ranb\n\n",
1762 "# run forever: 5 copies of random iosize, random lseek to beyond eof,\n\
1763 # random open flags, rand io types doing a trunc every 10 iterations.\n\
1764 %s -i0 -r 1-50000 -R 0--2 -o random -I r -C0 -l -T 20 -uU100-200 -n 5 gf_rand1 gf_rand2\n",
1771 /***********************************************************************
1773 * The file descriptor current offset is assumed to be the end of the
1775 * Woffset will be set to the offset before the write.
1776 * Grow_incr will be set to the size of the write or lseek write.
1777 ***********************************************************************/
1779 growfile(fd, file, grow_incr, buf)
1790 int fsize; /* current size of file */
1791 int size_grew; /* size the file grew */
1796 * Do a stat on the open file.
1797 * If the file is a fifo, set the bit in Mode variable.
1798 * This fifo check must be done prior to growfile() returning.
1799 * Also get the current size of the file.
1801 if ( fstat(fd, &stbuf) != -1 ) {
1802 if ( S_ISFIFO(stbuf.st_mode) ) {
1803 Fileinfo.mode |= MODE_FIFO;
1806 printf("%s: %d DEBUG4 %s/%d: file is a fifo - no lseek or truncs,\n",
1807 Progname, Pid, __FILE__, __LINE__);
1809 fsize = stbuf.st_size;
1812 fprintf(stderr, "%s%s: %d %s/%d: Unable to fstat(%d, &buf), errno:%d %s\n",
1813 Progname, TagName, Pid, __FILE__, __LINE__, fd, errno, strerror(errno));
1819 if ( grow_incr <= 0 ) { /* don't attempt i/o if grow_incr <= 0 */
1821 Grow_incr=grow_incr;
1823 printf("%s: %d DEBUG3 %s/%d: Not attempting to grow, growsize == %d\n",
1824 Progname, Pid, __FILE__, __LINE__, grow_incr);
1828 if ( Mode & MODE_RAND_SIZE ) {
1829 grow_incr=random_range(min_size, max_size, mult_size, &errmsg);
1830 if (errmsg != NULL) {
1831 fprintf(stderr, "%s%s: %d %s/%d: random_range() failed - %s\n", Progname, TagName, Pid, __FILE__, __LINE__, errmsg);
1834 Grow_incr=grow_incr;
1837 Grow_incr=grow_incr;
1839 if ( ! (Mode & MODE_FIFO) ) {
1840 if ((cur_offset=lseek(fd,0,SEEK_CUR)) == -1 ) {
1841 fprintf(stderr, "%s%s: %d %s/%d: tell failed: %s\n",
1842 Progname, TagName, Pid, __FILE__, __LINE__, strerror(errno));
1847 if ( Mode & MODE_GROW_BY_LSEEK ) {
1850 printf("%s: %d DEBUG3 %s/%d: Current size of file is %d\n", Progname,
1851 Pid, __FILE__, __LINE__, Woffset);
1852 printf("%s: %d DEBUG3 %s/%d: lseeking to %d byte with SEEK_END\n", Progname,
1853 Pid, __FILE__, __LINE__, grow_incr-1);
1856 if ((noffset=lseek(fd, grow_incr-1, SEEK_END)) == -1 ) {
1857 fprintf(stderr, "%s%s: %s/%d: lseek(fd, %d, SEEK_END) failed: %s\n",
1858 Progname, TagName, __FILE__, __LINE__, grow_incr-1, strerror(errno));
1862 lkfile(fd, LOCK_EX, LKLVL0); /* get exclusive lock */
1865 ret=lio_write_buffer(fd, io_type, "w", 1, SIGUSR1, &errmsg,0);
1867 ret=write_buffer(fd, io_type, "w", 1, 0, &errmsg);
1871 fprintf(stderr, "%s%s: %d %s/%d: %d %s\n",
1872 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg);
1873 if ( ret == -ENOSPC ) {
1882 lkfile(fd, LOCK_UN, LKLVL0);
1885 printf("%s: %d DEBUG3 %s/%d: %d wrote 1 byte to file\n",
1886 Progname, Pid, __FILE__, __LINE__, Iter_cnt);
1888 } else { /* end of grow by lseek */
1890 if ( Fileinfo.openflags & O_APPEND ) {
1892 * Deal with special case of the open flag containing O_APPEND.
1893 * If it does, the current offset does not matter since the write
1894 * will be done end of the file.
1897 printf("%s: %d DEBUG5 %s/%d: dealing with O_APPEND condition\n",
1898 Progname, Pid, __FILE__, __LINE__ );
1899 lkfile(fd, LOCK_EX, LKLVL0); /* get exclusive lock */
1902 * do fstat again to get size of the file.
1903 * This is done inside a file lock (if locks are being used).
1905 if ( fstat(fd, &stbuf) != -1 ) {
1906 Woffset = stbuf.st_size;
1908 fprintf(stderr, "%s%s: %d %s/%d: Unable to fstat(%d, &buf), errno:%d %s\n",
1909 Progname, TagName, Pid, __FILE__, __LINE__, fd, errno, strerror(errno));
1911 lkfile(fd, LOCK_UN, LKLVL0); /* release lock */
1915 printf("%s: %d DEBUG3 %s/%d: dealing with O_APPEND condition (offset:fsz:%d)\n",
1916 Progname, Pid, __FILE__, __LINE__, (int)stbuf.st_size);
1919 } else if ( Mode & MODE_RAND_LSEEK ) {
1920 if ( max_lseek == LSK_EOF ) { /* within file size */
1921 noffset=random_range(min_lseek, fsize, 1, NULL);
1923 else if ( max_lseek == LSK_EOFPLUSGROW ) {
1924 /* max to beyond file size */
1925 noffset=random_range(min_lseek, fsize+grow_incr, 1, NULL);
1927 else if ( max_lseek == LSK_EOFMINUSGROW ) {
1929 * Attempt to not grow the file.
1930 * If the i/o will fit from min_lseek to EOF,
1931 * pick offset to allow it to fit.
1932 * Otherwise, pick the min_lseek offset and grow
1933 * file by smallest amount.
1934 * If min_lseek is != 0, there will be a problem
1935 * with whole file checking if file is ever smaller
1938 if ( fsize <= min_lseek + grow_incr )
1939 noffset=min_lseek; /* file will still grow */
1941 noffset=random_range(min_lseek, fsize-grow_incr, 1, NULL);
1944 noffset=random_range(min_lseek, max_lseek, 1, NULL);
1947 if ((Woffset=lseek(fd, noffset, SEEK_SET)) == -1 ) {
1948 fprintf(stderr, "%s%s: %d %s/%d: lseek(%d, %d, SEEK_SET) l2 failed: %s\n",
1949 Progname, TagName, Pid, __FILE__, __LINE__, fd, noffset, strerror(errno));
1952 else if ( Debug > 2 )
1953 printf("%s: %d DEBUG3 %s/%d: lseeked to random offset %d (fsz:%d)\n",
1954 Progname, Pid, __FILE__, __LINE__, Woffset,
1955 (int)stbuf.st_size);
1960 * lseek to end of file only if not fifo
1962 else if ( ! (Mode & MODE_FIFO) ) {
1963 if ((Woffset=lseek(fd, 0, SEEK_END)) == -1 ) {
1964 fprintf(stderr, "%s%s: %d %s/%d: lseek(fd, 0, SEEK_END) failed: %s\n",
1965 Progname, TagName, Pid, __FILE__, __LINE__, strerror(errno));
1968 else if ( Debug > 2 )
1969 printf("%s: %d DEBUG3 %s/%d: lseeked to end of file, offset %d\n",
1970 Progname, Pid, __FILE__, __LINE__, Woffset);
1973 if ( Pattern == PATTERN_OFFSET )
1974 datapidgen(STATIC_NUM, buf, grow_incr, Woffset);
1975 else if ( Pattern == PATTERN_PID )
1976 datapidgen(Pid, buf, grow_incr, Woffset);
1977 else if ( Pattern == PATTERN_ASCII )
1978 dataasciigen(NULL, (char *)buf, grow_incr, Woffset);
1979 else if ( Pattern == PATTERN_RANDOM )
1980 databingen('r', buf, grow_incr, Woffset);
1981 else if ( Pattern == PATTERN_ALT )
1982 databingen('a', buf, grow_incr, Woffset);
1983 else if ( Pattern == PATTERN_CHKER )
1984 databingen('c', buf, grow_incr, Woffset);
1985 else if ( Pattern == PATTERN_CNTING )
1986 databingen('C', buf, grow_incr, Woffset);
1987 else if ( Pattern == PATTERN_ZEROS )
1988 databingen('z', buf, grow_incr, Woffset);
1989 else if ( Pattern == PATTERN_ONES )
1990 databingen('o', buf, grow_incr, Woffset);
1992 dataasciigen(NULL, (char *)buf, grow_incr, Woffset);
1995 printf("%s: %d DEBUG3 %s/%d: attempting to write %d bytes\n",
1996 Progname, Pid, __FILE__, __LINE__, grow_incr);
1998 lkfile(fd, LOCK_EX, LKLVL0); /* get exclusive lock */
2001 ret=write(fd, buf, grow_incr);
2005 lkfile(fd, LOCK_UN, LKLVL0);
2007 if ( ret != grow_incr) {
2008 fprintf(stderr, "%s: %s/%d: write failed: %s\n",
2009 Progname, __FILE__, __LINE__, strerror(errno));
2015 ret=lio_write_buffer(fd, io_type, (char *)buf, grow_incr,
2016 SIGUSR1, &errmsg,0);
2018 ret=write_buffer(fd, io_type, buf, grow_incr, 0, &errmsg);
2021 if( Mode & MODE_FIFO ){
2022 /* If it is a fifo then just pretend the file
2023 * offset is where we think it should be.
2025 tmp = Woffset + grow_incr;
2028 if( (tmp=lseek(fd,0,SEEK_CUR)) < 0 ){ /* get offset after the write */
2029 fprintf(stderr, "%s%s: %s/%d: tell(2) failed: %d %s\n",
2030 Progname, TagName, __FILE__, __LINE__, errno, strerror(errno) );
2035 /* If this is POSIX I/O and it is via aio_{read,write}
2036 * or lio_listio then after completion of the I/O the
2037 * value of the file offset for the file is
2038 * unspecified--which means we cannot trust what
2039 * tell() told us. Fudge it here.
2041 if( (io_type & LIO_IO_ASYNC_TYPES) || (io_type & LIO_RANDOM) ){
2042 if( tmp != Woffset + grow_incr ){
2044 printf("%s: %d DEBUG6 %s/%d: posix fudge, forcing tmp (%d) to match Woffset+grow_incr (%d)\n",
2045 Progname, Pid, __FILE__, __LINE__, tmp, Woffset+grow_incr);
2047 tmp = Woffset + grow_incr;
2054 lkfile(fd, LOCK_UN, LKLVL0);
2056 if ( ret != grow_incr ) {
2057 fprintf(stderr, "%s%s: %d %s/%d: %d %s\n",
2058 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg);
2059 if ( ret == -ENOSPC ) {
2067 * Check for a condition where the file was truncated just before
2070 if ( tmp != Woffset + grow_incr) {
2072 * The offset after the write was not as expected.
2073 * This could be caused by the following:
2074 * - file truncated after the lseek and before the write.
2075 * - the file was written to after fstat and before the write
2076 * and the file was opened with O_APPEND.
2078 * The pattern written to the file will be considered corrupted.
2080 if ( Debug > 0 && lockfile ) {
2081 printf("%s%s: %d DEBUG1 %s/%d: offset after write(%d) not as exp(%d+%d=%d)\n",
2082 Progname, TagName, Pid, __FILE__, __LINE__, tmp, Woffset, grow_incr, Woffset+grow_incr);
2083 printf("%s%s: %d DEBUG1 %s/%d: %d Assuming file changed by another process, resetting offset:%d (expect pattern mismatch)\n",
2084 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, tmp-grow_incr);
2087 printf("%s: %d DEBUG5 %s/%d: about to chop Woffset. tmp=%d, grow_incr=%d, Woffset was %d\n",
2088 Progname, Pid, __FILE__, __LINE__, tmp, grow_incr, Woffset);
2090 Woffset=tmp-grow_incr;
2095 } /* end of grow by write */
2099 * Woffset - holds start of grow (start of write expect in grow by lseek)
2100 * Grow_incr - holds size of grow (write).
2101 * fsize - holds size of file before write
2103 size_grew=(Woffset + Grow_incr) - fsize;
2105 if ( Mode & MODE_FIFO ) {
2106 printf("%s: %d DEBUG2 %s/%d: file is fifo, %d wrote %d bytes\n",
2107 Progname, Pid, __FILE__, __LINE__, Grow_incr, Iter_cnt);
2110 else if ( size_grew > 0 )
2111 printf("%s: %d DEBUG2 %s/%d: %d wrote %d bytes(off:%d), grew file by %d bytes\n",
2112 Progname, Pid, __FILE__, __LINE__, Iter_cnt, Grow_incr, Woffset, size_grew);
2114 printf("%s: %d DEBUG2 %s/%d: %d wrote %d bytes(off:%d), did not grow file\n",
2115 Progname, Pid, __FILE__, __LINE__, Iter_cnt, Grow_incr, Woffset);
2118 bytes_consumed += size_grew;
2121 } /* end of growfile */
2123 /***********************************************************************
2124 * shrinkfile file by trunc_incr. file can not be made smaller than
2125 * size zero. Therefore, if trunc_incr is larger than file size,
2126 * file will be truncated to zero.
2127 * The file descriptor current offset is assumed to be the end of the
2130 ***********************************************************************/
2132 shrinkfile(fd, filename, trunc_incr, trunc_inter, just_trunc)
2136 int trunc_inter; /* interval */
2137 int just_trunc; /* lseek has already been done for you */
2139 static int shrink_cnt = 0;
2149 if ( trunc_inter == 0 || (shrink_cnt % trunc_inter != 0)) {
2151 printf("%s: %d DEBUG4 %s/%d: Not shrinking file - not time, iter=%d, cnt=%d\n",
2152 Progname, Pid, __FILE__, __LINE__, trunc_inter, shrink_cnt);
2153 return 0; /* not this time */
2156 if ( Mode & MODE_FIFO ) {
2158 printf("%s: %d DEBUG5 %s/%d: Not attempting to shrink a FIFO\n",
2159 Progname, Pid, __FILE__, __LINE__);
2160 return 0; /* can not truncate fifo */
2163 lkfile(fd, LOCK_EX, LKLVL0);
2165 if ((cur_offset=lseek(fd,0,SEEK_CUR)) == -1 ) {
2166 fprintf(stderr, "%s%s: %d %s/%d: tell(%d) failed: %s\n",
2167 Progname, TagName, Pid, __FILE__, __LINE__, fd, strerror(errno));
2168 lkfile(fd, LOCK_UN, LKLVL0);
2172 if ( Mode & MODE_RAND_LSEEK ) {
2173 if ( max_lseek <= -1 ) {
2174 if ( (new_offset=file_size(fd)) == -1 ) {
2175 lkfile(fd, LOCK_UN, LKLVL0);
2179 if ( new_offset < min_lseek )
2180 new_offset=min_lseek;
2182 new_offset=random_range(min_lseek, new_offset, 1, NULL);
2185 new_offset=random_range(min_lseek, max_lseek, 1, NULL);
2189 if ((offset=lseek(fd, new_offset, SEEK_SET)) == -1 ) {
2190 fprintf(stderr, "%s%s: %d %s/%d: lseek(%d, %d, SEEK_SET) l3 failed: %s\n",
2191 Progname, TagName, Pid, __FILE__, __LINE__, fd, new_offset, strerror(errno));
2192 lkfile(fd, LOCK_UN, LKLVL0);
2195 else if ( Debug > 3 )
2196 printf("%s: %d DEBUG4 %s/%d: lseeked to random offset %d\n",
2197 Progname, Pid, __FILE__, __LINE__, offset);
2202 else { /* remove trunc_incr from file */
2204 new_offset = cur_offset-trunc_incr;
2206 if ( new_offset < 0 )
2210 if ( lseek(fd, new_offset, SEEK_SET) == -1 ) {
2211 fprintf(stderr, "%s%s: %d %s/%d: lseek(fd, %d, SEEK_SET) l4 failed: %s\n",
2212 Progname, TagName, Pid, __FILE__, __LINE__, new_offset, strerror(errno));
2213 lkfile(fd, LOCK_UN, LKLVL0);
2216 else if ( Debug > 3 )
2217 printf("%s: %d DEBUG4 %s/%d: lseeked to offset %d, %d bytes from end\n",
2218 Progname, Pid, __FILE__, __LINE__, new_offset, trunc_incr);
2226 ret=ftruncate(fd, new_offset );
2227 if( (ret == 0) && (Debug > 3) ){
2228 printf("%s: %d DEBUG4 %s/%d: ftruncated to offset %d, %d bytes from end\n",
2229 Progname, Pid, __FILE__, __LINE__, new_offset, trunc_incr);
2233 lkfile(fd, LOCK_UN, LKLVL0);
2237 fprintf(stderr, "%s%s: %d %s/%d: trunc failed: %s\n",
2238 Progname, TagName, Pid, __FILE__, __LINE__, strerror(errno));
2240 fprintf(stderr, "%s%s: %d %s/%d: ftruncate failed: %s\n",
2241 Progname, TagName, Pid, __FILE__, __LINE__, strerror(errno));
2247 printf("%s: %d DEBUG2 %s/%d: trunc file by %d bytes, to size of = %d bytes\n",
2248 Progname, Pid, __FILE__, __LINE__, cur_offset-new_offset, new_offset);
2252 bytes_consumed -= (cur_offset - new_offset);
2255 } /* end of shrinkfile */
2257 /***********************************************************************
2259 ***********************************************************************/
2261 check_write(fd, cf_inter, filename, mode)
2263 int cf_inter; /* check file interval */
2264 char *filename; /* needed for error messages */
2265 int mode; /* write mode */
2268 static int cf_count = 0;
2276 if ( cf_inter == 0 || (cf_count % cf_inter != 0)) {
2278 printf("%s: %d DEBUG5 %s/%d: no write check, not time iter=%d, cnt=%d\n",
2279 Progname, Pid, __FILE__, __LINE__, cf_inter, cf_count);
2280 return 0; /* no check done */
2283 if ( Grow_incr <= 0 ) {
2285 printf("%s: %d DEBUG4 %s/%d: No write validation, Grow_incr = %d, offset = %d\n",
2286 Progname, Pid, __FILE__, __LINE__, Grow_incr, Woffset);
2287 return 0; /* no check */
2293 * Get the shared file lock. We need to hold the lock from before
2294 * we do the stat until after the read.
2296 lkfile(fd, LOCK_SH, LKLVL0);
2298 if ((fsize=file_size(fd)) == -1 ) {
2299 lkfile(fd, LOCK_UN, LKLVL0);
2302 } else if ( fsize <= Woffset ) {
2304 * The file was truncated between write and now.
2305 * The contents of our last write is totally gone, no check.
2308 printf("%s%s: %d DEBUG2 %s/%d: %d File size (%d) smaller than where last wrote (%d)- no write validation\n",
2309 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, fsize, Woffset);
2310 lkfile(fd, LOCK_UN, LKLVL0);
2311 return 0; /* no validation, but not an error */
2313 } else if ( fsize < (Woffset + Grow_incr)) {
2315 * The file was truncated between write and now.
2316 * Part of our last write has been truncated, adjust our Grow_incr
2321 Grow_incr=fsize-Woffset;
2325 printf("%s%s: %d DEBUG2 %s/%d: %d fsz:%d, lost(%d)of wrt(off:%d, sz:%d), adj=%d\n",
2326 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, fsize, tmp-Grow_incr, Woffset, tmp, Grow_incr);
2332 printf("%s: %d DEBUG3 %s/%d: about to do write validation, offset = %d, size = %d\n",
2333 Progname, Pid, __FILE__, __LINE__, Woffset, Grow_incr);
2335 if ( ! (mode & MODE_FIFO) ) {
2337 if ( lseek(fd, Woffset, 0) == -1 ) {
2338 fprintf(stderr, "%s%s: %d %s/%d: lseek(fd, %d, 0) failed: %s\n",
2339 Progname, TagName, Pid, __FILE__, __LINE__, Woffset, strerror(errno));
2342 printf("%s: %d DEBUG4 %s/%d: lseeked to offset:%d\n",
2343 Progname, Pid, __FILE__, __LINE__, Woffset);
2347 * Read last writes data
2350 ret=lio_read_buffer(fd, io_type, Buffer, Grow_incr, SIGUSR1, &errmsg,0);
2352 ret=read_buffer(fd, io_type, Buffer, Grow_incr, 0, &errmsg);
2356 * report the error and debug information before releasing
2359 if ( ret != Grow_incr ) {
2360 fprintf(stderr, "%s%s: %d %s/%d: %d CW %s\n", Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg);
2365 printf("%s%s: %d DEBUG3 %s/%d: fd:%d, offset:%d, fsize:%d, openflags:%#o\n",
2366 Progname, TagName, Pid, __FILE__, __LINE__, fd,
2367 (int)lseek(fd,SEEK_CUR,0), /* FIXME: 64bit/LFS ? */
2369 Fileinfo.openflags);
2372 lkfile(fd, LOCK_UN, LKLVL0);
2377 lkfile(fd, LOCK_UN, LKLVL0);
2379 if ( Mode & MODE_GROW_BY_LSEEK ) {
2380 /* check that all zeros upto last character */
2381 for(ptr=Buffer; ptr < (Buffer+Grow_incr-1); ptr++) {
2382 if ( *ptr != '\0' ) {
2384 "%s%s: %d %s/%d: data mismatch at offset %d, exp:%#o(zerofilled), act:%#o in file %s\n",
2385 Progname, TagName, Pid, __FILE__, __LINE__,
2386 (int)(Woffset+(Grow_incr-(Buffer-ptr))),
2392 /* check that the last char is a 'w' */
2393 if ( *ptr != 'w' ) {
2395 "%s%s: %d %s/%d: data mismatch at offset %d, exp:%#o(zerofilled), act:%#o in file %s\n",
2396 Progname, TagName, Pid, __FILE__, __LINE__,
2397 (int)(Woffset+(Grow_incr-(Buffer-ptr))), 'w',
2402 return 0; /* all is well */
2405 else if ( Pattern == PATTERN_OFFSET )
2406 ret=datapidchk(STATIC_NUM, Buffer, Grow_incr, Woffset, &errmsg);
2407 else if ( Pattern == PATTERN_PID )
2408 ret=datapidchk(Pid, Buffer, Grow_incr, Woffset, &errmsg);
2409 else if ( Pattern == PATTERN_ASCII )
2410 ret=dataasciichk(NULL, Buffer, Grow_incr, Woffset, &errmsg);
2411 else if ( Pattern == PATTERN_RANDOM )
2412 ; /* no check for random */
2413 else if ( Pattern == PATTERN_ALT )
2414 ret=databinchk('a', Buffer, Grow_incr, Woffset, &errmsg);
2415 else if ( Pattern == PATTERN_CHKER )
2416 ret=databinchk('c', Buffer, Grow_incr, Woffset, &errmsg);
2417 else if ( Pattern == PATTERN_CNTING )
2418 ret=databinchk('C', Buffer, Grow_incr, Woffset, &errmsg);
2419 else if ( Pattern == PATTERN_ZEROS )
2420 ret=databinchk('z', Buffer, Grow_incr, Woffset, &errmsg);
2421 else if ( Pattern == PATTERN_ONES )
2422 ret=databinchk('o', Buffer, Grow_incr, Woffset, &errmsg);
2424 ret=dataasciichk(NULL, Buffer, Grow_incr, Woffset, &errmsg);
2427 fprintf(stderr, "%s%s: %d %s/%d: %d CW %s in file %s\n",
2428 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg, filename);
2431 printf("%s%s: %d DEBUG1 %s/%d: **fd:%d, lk:%d, offset:%d, sz:%d open flags:%#o %s\n",
2432 Progname, TagName, Pid, __FILE__, __LINE__, fd, lockfile,
2433 Woffset, Grow_incr, Fileinfo.openflags, openflags2symbols(Fileinfo.openflags, ",", NULL));
2440 printf("%s: %d DEBUG7 %s/%d: No corruption detected on write validation , offset = %d, size = %d\n",
2441 Progname, Pid, __FILE__, __LINE__, Woffset, Grow_incr);
2443 return 0; /* all is well */
2448 /***********************************************************************
2450 ***********************************************************************/
2452 check_file(fd, cf_inter, filename, no_file_check)
2454 int cf_inter; /* check file interval */
2455 char *filename; /* needed for error messages */
2456 int no_file_check; /* if set, do not do file content check */
2459 static int cf_count = 0;
2469 if ( cf_inter == 0 || (cf_count % cf_inter != 0)) {
2471 printf("%s: %d DEBUG5 %s/%d: No file check - not time, iter=%d, cnt=%d\n",
2472 Progname, Pid, __FILE__, __LINE__, cf_inter, cf_count);
2473 return 0; /* no check done */
2477 * if we can't determine file content, don't bother checking
2479 if ( no_file_check ) {
2481 printf("%s: %d DEBUG5 %s/%d: No file check, lseek grow or random lseeks\n",
2482 Progname, Pid, __FILE__, __LINE__);
2487 * Lock the file. We need to have the file lock before
2488 * the stat and until after the last read to prevent
2489 * a trunc/truncate from "corrupting" our data.
2491 lkfile(fd, LOCK_SH, LKLVL0);
2493 if ((fsize=file_size(fd)) == -1 ) {
2494 lkfile(fd, LOCK_UN, LKLVL0);
2500 printf("%s: %d DEBUG3 %s/%d: No file validation, file size == 0\n",
2501 Progname, Pid, __FILE__, __LINE__);
2503 lkfile(fd, LOCK_UN, LKLVL0);
2508 printf("%s: %d DEBUG3 %s/%d: about to do file validation\n",
2509 Progname, Pid, __FILE__, __LINE__);
2511 if ( fsize > MAX_FC_READ ) {
2513 * read the file in MAX_FC_READ chuncks.
2516 if ((buf=(char *)malloc(MAX_FC_READ)) == NULL ) {
2517 fprintf(stderr, "%s%s: %s/%d: malloc(%d) failed: %s\n", Progname, TagName,
2518 __FILE__, __LINE__, MAX_FC_READ, strerror(errno));
2519 lkfile(fd, LOCK_UN, LKLVL0);
2523 lseek(fd, 0, SEEK_SET);
2525 lkfile(fd, LOCK_SH, LKLVL0); /* get lock on file before getting file size */
2528 while (rd_cnt < fsize ) {
2529 if ( fsize - rd_cnt > MAX_FC_READ )
2530 rd_size=MAX_FC_READ;
2532 rd_size=fsize - rd_cnt;
2535 ret=lio_read_buffer(fd, io_type, buf, rd_size,
2536 SIGUSR1, &errmsg,0);
2538 ret=read_buffer(fd, io_type, buf, rd_size, 0, &errmsg);
2541 if (ret != rd_size ) {
2542 fprintf(stderr, "%s%s: %d %s/%d: %d CFa %s\n",
2543 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg);
2545 lkfile(fd, LOCK_UN, LKLVL0);
2549 read(fd, buf, rd_size);
2552 if ( Pattern == PATTERN_OFFSET )
2553 ret=datapidchk(STATIC_NUM, buf, rd_size, rd_cnt, &errmsg);
2554 else if ( Pattern == PATTERN_PID )
2555 ret=datapidchk(Pid, buf, rd_size, rd_cnt, &errmsg);
2556 else if ( Pattern == PATTERN_ASCII )
2557 ret=dataasciichk(NULL, buf, rd_size, rd_cnt, &errmsg);
2558 else if ( Pattern == PATTERN_RANDOM )
2559 ; /* no checks for random */
2560 else if ( Pattern == PATTERN_ALT )
2561 ret=databinchk('a', buf, rd_size, rd_cnt, &errmsg);
2562 else if ( Pattern == PATTERN_CHKER )
2563 ret=databinchk('c', buf, rd_size, rd_cnt, &errmsg);
2564 else if ( Pattern == PATTERN_CNTING )
2565 ret=databinchk('C', buf, rd_size, rd_cnt, &errmsg);
2566 else if ( Pattern == PATTERN_ZEROS )
2567 ret=databinchk('z', buf, rd_size, rd_cnt, &errmsg);
2568 else if ( Pattern == PATTERN_ONES )
2569 ret=databinchk('o', buf, rd_size, rd_cnt, &errmsg);
2571 ret=dataasciichk(NULL, buf, rd_size, rd_cnt, &errmsg);
2576 "%s%s: %d %s/%d: %d CFp %s in file %s\n",
2577 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg, filename);
2580 lkfile(fd, LOCK_UN, LKLVL0);
2586 lkfile(fd, LOCK_UN, LKLVL0);
2593 * Read the whole file in a single read
2595 if((buf=(char *)malloc(fsize)) == NULL ) {
2596 fprintf(stderr, "%s%s: %s/%d: malloc(%d) failed: %s\n", Progname, TagName,
2597 __FILE__, __LINE__, fsize, strerror(errno));
2602 lseek(fd, 0, SEEK_SET);
2605 read(fd, buf, fsize);
2608 ret=lio_read_buffer(fd, io_type, buf, fsize, SIGUSR1, &errmsg,0);
2610 ret=read_buffer(fd, io_type, buf, fsize, 0, &errmsg);
2613 /* unlock the file as soon as we can */
2614 lkfile(fd, LOCK_UN, LKLVL0);
2617 if ( ret != fsize ) {
2618 fprintf(stderr, "%s%s: %d %s/%d: %d CFw %s\n",
2619 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg);
2623 if ( Pattern == PATTERN_OFFSET )
2624 ret=datapidchk(STATIC_NUM, buf, fsize, 0, &errmsg);
2625 else if ( Pattern == PATTERN_PID )
2626 ret=datapidchk(Pid, buf, fsize, 0, &errmsg);
2627 else if ( Pattern == PATTERN_ASCII )
2628 ret=dataasciichk(NULL, buf, fsize, 0, &errmsg);
2629 else if ( Pattern == PATTERN_RANDOM )
2630 ; /* no check for random */
2631 else if ( Pattern == PATTERN_ALT )
2632 ret=databinchk('a', buf, fsize, 0, &errmsg);
2633 else if ( Pattern == PATTERN_CHKER )
2634 ret=databinchk('c', buf, fsize, 0, &errmsg);
2635 else if ( Pattern == PATTERN_CNTING )
2636 ret=databinchk('C', buf, fsize, 0, &errmsg);
2637 else if ( Pattern == PATTERN_ZEROS )
2638 ret=databinchk('z', buf, fsize, 0, &errmsg);
2639 else if ( Pattern == PATTERN_ONES )
2640 ret=databinchk('o', buf, fsize, 0, &errmsg);
2642 ret=dataasciichk(NULL, buf, fsize, 0, &errmsg);
2645 fprintf(stderr, "%s%s: %d %s/%d: %d CFw %s in file %s\n",
2646 Progname, TagName, Pid, __FILE__, __LINE__, Iter_cnt, errmsg, filename);
2656 } /* end of check_file */
2658 /***********************************************************************
2660 ***********************************************************************/
2666 if (fstat(fd, &sb) < 0) {
2667 fprintf(stderr, "%s%s: %d %s/%d: Unable to fstat(%d, &buf), errno:%d %s\n",
2668 Progname, TagName, Pid, __FILE__, __LINE__, fd, errno, strerror(errno));
2676 /***********************************************************************
2677 * do file lock/unlock action.
2678 ***********************************************************************/
2680 lkfile(int fd, int operation, int lklevel)
2685 if ( lockfile == lklevel) {
2688 switch (operation) {
2690 printf("%s: %d DEBUG6 %s/%d: Attempting to release lock on fd %d\n",
2691 Progname, Pid, __FILE__, __LINE__, fd);
2695 printf("%s: %d DEBUG6 %s/%d: Attempting to get read/shared lock on fd %d\n",
2696 Progname, Pid, __FILE__, __LINE__, fd);
2700 printf("%s: %d DEBUG6 %s/%d: Attempting to get write/exclusive lock on fd %d\n",
2701 Progname, Pid, __FILE__, __LINE__, fd);
2707 * Attempt to get/release desired lock.
2708 * file_lock will attempt to do action over and over again until
2709 * either an unretryable error or the action is completed.
2712 if ( file_lock(fd, operation, &errmsg) != 0 ) {
2713 printf("%s%s: %d %s/%d: Unable to perform lock operation. %s\n",
2714 Progname, TagName, Pid, __FILE__, __LINE__, errmsg);
2716 /* do we count this as an error? handle_error(); */
2721 switch (operation) {
2723 printf("%s: %d DEBUG3 %s/%d: Released lock on fd %d\n",
2724 Progname, Pid, __FILE__, __LINE__, fd);
2728 printf("%s: %d DEBUG3 %s/%d: Got read/shared lock on fd %d\n",
2729 Progname, Pid, __FILE__, __LINE__, fd);
2733 printf("%s: %d DEBUG3 %s/%d: Got write/exclusive lock on fd %d\n",
2734 Progname, Pid, __FILE__, __LINE__, fd);
2738 printf("%s: %d DEBUG3 %s/%d: Completed action %d on fd %d\n",
2739 Progname, Pid, __FILE__, __LINE__, operation, fd);
2749 /***********************************************************************
2751 ***********************************************************************/
2753 pre_alloc(file, fd, size)
2762 if ( ialloc(fd, size, IA_CONT, &avl) == -1 ) {
2763 fprintf(stderr, "%s%s %s/%d: Unable to pre-alloc space: ialloc failed: %d %s\n",
2765 __FILE__, __LINE__, errno, strerror(errno));
2771 #ifdef XFS_IOC_RESVSP
2772 struct xfs_flock64 f;
2778 /* non-zeroing reservation */
2779 if( xfsctl( file, fd, XFS_IOC_RESVSP, &f ) == -1 ){
2780 fprintf(stderr, "%s%s %s/%d: Unable to pre-alloc space: xfsctl(XFS_IOC_RESVSP) failed: %d %s\n",
2782 __FILE__, __LINE__, errno, strerror(errno));
2792 /* non-zeroing reservation */
2793 if( fcntl( fd, F_RESVSP64, &f ) == -1 ){
2794 fprintf(stderr, "%s%s %s/%d: Unable to pre-alloc space: fcntl(F_RESVSP) failed: %d %s\n",
2796 __FILE__, __LINE__, errno, strerror(errno));