test/benchmarks/unixbench-5.1.2/src/execl.c

   1 /*******************************************************************************
   2  *  The BYTE UNIX Benchmarks - Release 3
   3  *          Module: execl.c   SID: 3.3 5/15/91 19:30:19
   4  *
   5  *******************************************************************************
   6  * Bug reports, patches, comments, suggestions should be sent to:
   7  *
   8  *      Ben Smith, Rick Grehan or Tom Yager
   9  *      ben@bytepb.byte.com   rick_g@bytepb.byte.com   tyager@bytepb.byte.com
  10  *
  11  *******************************************************************************
  12  *  Modification Log:
  13  *  $Header: execl.c,v 3.5 87/06/22 15:37:08 kjmcdonell Beta $
  14  *  August 28, 1990 - Modified timing routines
  15  *  October 22, 1997 - code cleanup to remove ANSI C compiler warnings
  16  *                     Andy Kahn <kahn@zk3.dec.com>
  17  *
  18  ******************************************************************************/
  19 /*
  20  *  Execing
  21  *
  22  */
  23 char SCCSid[] = "@(#) @(#)execl.c:3.3 -- 5/15/91 19:30:19";
  24
  25 #include <stdio.h>
  26 #include <stdlib.h>
  27 #include <unistd.h>
  28 #include <sys/types.h>
  29
  30 char    bss[8*1024];    /* something worthwhile */
  31
  32 #define main dummy
  33
  34 #include "big.c"        /* some real code */
  35
  36 #undef main
  37
  38 int main(int argc, char *argv[])        /* the real program */
  39 {
  40         unsigned long iter = 0;
  41         char *ptr;
  42         char *fullpath;
  43         int     duration;
  44         char    count_str[12], start_str[24], path_str[256], *dur_str;
  45         time_t  start_time, this_time;
  46
  47 #ifdef DEBUG
  48         int count;
  49         for(count = 0; count < argc; ++ count)
  50                 printf("%s ",argv[count]);
  51                 printf("\n");
  52 #endif
  53         if (argc < 2)
  54                 {
  55                 fprintf(stderr, "Usage: %s duration\n", argv[0]);
  56                 exit(1);
  57                 }
  58
  59
  60         duration = atoi(argv[1]);
  61         if (duration > 0)
  62                 /* the first invocation */
  63                 {
  64                 dur_str = argv[1];
  65                 if((ptr = getenv("UB_BINDIR")) != NULL)
  66                         sprintf(path_str,"%s/execl",ptr);
  67                 fullpath=path_str;
  68                 time(&start_time);
  69                 }
  70         else  /* one of those execl'd invocations */
  71                 {
  72                 /* real duration follow the phoney null duration */
  73                 duration = atoi(argv[2]);
  74                 dur_str = argv[2];
  75                 iter = (unsigned long)atoi(argv[3]); /* where are we now ? */
  76                 sscanf(argv[4], "%lu", (unsigned long *) &start_time);
  77                 fullpath = argv[0];
  78                 }
  79
  80         sprintf(count_str, "%lu", ++iter); /* increment the execl counter */
  81         sprintf(start_str, "%lu", (unsigned long) start_time);
  82         time(&this_time);
  83         if (this_time - start_time >= duration) { /* time has run out */
  84                 fprintf(stderr, "COUNT|%lu|1|lps\n", iter);
  85                 exit(0);
  86                 }
  87         execl(fullpath, fullpath, "0", dur_str, count_str, start_str, (void *) 0);
  88         fprintf(stderr, "Exec failed at iteration %lu\n", iter);
  89         perror("Reason");
  90         exit(1);
  91 }