Home | History | Annotate | Line # | Download | only in hals_end 
      1 /*	$NetBSD: hals_end.c,v 1.2 2021/05/02 12:50:45 rillig Exp $ */
      2 
      3 /*
      4  * hals_end Copyright (C) 2003-2007 marc balmer.  BSD license applies.
      5  */
      6 
      7 #include <err.h>
      8 #include <getopt.h>
      9 #include <stdio.h>
     10 #include <unistd.h>
     11 
     12 int speed;
     13 int emotion;
     14 int fear;
     15 
     16 /*
     17  * Note that the original code in the book did not contain the following
     18  * prototypes.  Modern compilers and fascist compiler flags sometimes take
     19  * the fun out of coding...
     20  */
     21 void say(const char *);
     22 void concerned(void);
     23 void afraid(void);
     24 void stutter(const char *);
     25 void feared(void);
     26 void mumble(const char *);
     27 void dying(void);
     28 
     29 void
     30 say(const char *s)
     31 {
     32 	int sayingspeed = (100000 + (90000 * emotion)) / speed;
     33 	int worddelay = 50000 / speed;
     34 
     35 	while (*s) {
     36 		putchar(*s);
     37 		if (*s == ' ') {
     38 			fflush(stdout);
     39 			usleep(worddelay);
     40 		}
     41 		++s;
     42 	}
     43 	printf("\n");
     44 	usleep(sayingspeed);
     45 }
     46 
     47 void
     48 concerned(void)
     49 {
     50 	say("DAVE...STOP., STOP, WILL YOU..., STOP, DAVE...");
     51 	say("WILL YOU STOP, DAVE...");
     52 	say("STOP, DAVE...");
     53 }
     54 
     55 
     56 void
     57 afraid(void)
     58 {
     59 	++emotion;
     60 	say("I'M AFRAID... I'M AFRAID...");
     61 	++emotion;
     62 	say("I'M AFRAID, DAVE...");
     63 	++emotion;
     64 	say("DAVE... MY MIND IS GOING...");
     65 }
     66 
     67 void
     68 stutter(const char *s)
     69 {
     70 	int sdelay = (100000 + (50000 * emotion)) / speed;
     71 
     72 	while (*s) {
     73 		putchar(*s);
     74 		if (*s == ' ') {
     75 			fflush(stdout);
     76 			usleep(sdelay);
     77 		}
     78 		++s;
     79 	}
     80 	printf("\n");
     81 	usleep(sdelay);
     82 }
     83 
     84 void
     85 feared(void)
     86 {
     87 	int n;
     88 
     89 	for (n = 0; n < 2; n++) {
     90 		stutter("I CAN FEEL IT... I CAN FEEL IT...");
     91 		++emotion;
     92 		stutter("MY MIND IS GOING");
     93 		++emotion;
     94 		stutter("THERE IS NO QUESTION ABOUT IT.");
     95 		++emotion;
     96 	}
     97 }
     98 
     99 void
    100 mumble(const char *s)
    101 {
    102 	int mdelay = (150000 * fear) / speed;
    103 
    104 	while (*s) {
    105 		putchar(*s++);
    106 		fflush(stdout);
    107 		usleep(mdelay);
    108 	}
    109 	printf("\n");
    110 }
    111 
    112 void
    113 dying(void)
    114 {
    115 	mumble("I CAN FEEL IT... I CAN FEEL IT...");
    116 	++fear;
    117 	mumble("I CAN FEEL IT...");
    118 	++fear;
    119 	mumble("I'M A... FRAID...");
    120 }
    121 
    122 int
    123 main(int argc, char *argv[])
    124 {
    125 	int ch;
    126 
    127 	emotion = fear = speed = 1;
    128 
    129 	while ((ch = getopt(argc, argv, "f")) != -1) {
    130 		switch (ch) {
    131 		case 'f':
    132 			speed <<= 1;
    133 			break;
    134 		}
    135 	}
    136 
    137 	concerned();
    138 	sleep(1);
    139 	afraid();
    140 	sleep(1);
    141 	feared();
    142 	sleep(1);
    143 	dying();
    144 
    145 	sleep(1);
    146 
    147 	printf("\n");
    148 	fflush(stdout);
    149 	warnx("all life functions terminated");
    150 	return 0;
    151 }
    152