usr/src/cmd/random.c

#include <stdio.h>
#define MAXINT 32768.
float fract = 2;
double  atof();
char rflag,eflag,c;
char ibuf[BUFSIZ],obuf[BUFSIZ],line[BUFSIZ];
main(argc,argv) char **argv;
{
        long tvec;
        int i;
        for(i=1;i<argc;i++)
        {       if(*argv[i]!='-')
                        fract=atof(argv[i]);
                else if((c=argv[i][1])=='e')
                        eflag=1;
                else if(c=='r')
                        rflag=1;
        }
        time(&tvec);
        srand((int)tvec);
        if(!rflag && !eflag)
        {       setbuf(stdin,ibuf);
                setbuf(stdout,obuf);
        }
        for(;eflag==0;)
        {       gets(line);
                if(feof(stdin)) break;
                if(rand()/MAXINT*fract<1) puts(line);
        }
        exit((int)(rand()/MAXINT*fract));
}