/* $NetBSD: rain.c,v 1.6 1995/04/22 10:26:09 cgd Exp $ */ /* * Copyright (c) 1980, 1993 * The Regents of the University of California. All rights reserved. * * Redistribution and use in source and binary forms, with or without * modification, are permitted provided that the following conditions * are met: * 1. Redistributions of source code must retain the above copyright * notice, this list of conditions and the following disclaimer. * 2. Redistributions in binary form must reproduce the above copyright * notice, this list of conditions and the following disclaimer in the * documentation and/or other materials provided with the distribution. * 3. All advertising materials mentioning features or use of this software * must display the following acknowledgement: * This product includes software developed by the University of * California, Berkeley and its contributors. * 4. Neither the name of the University nor the names of its contributors * may be used to endorse or promote products derived from this software * without specific prior written permission. * * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF * SUCH DAMAGE. */ #ifndef lint static char copyright[] = "@(#) Copyright (c) 1980, 1993\n\ The Regents of the University of California. All rights reserved.\n"; #endif /* not lint */ #ifndef lint #if 0 static char sccsid[] = "@(#)rain.c 8.1 (Berkeley) 5/31/93"; #else static char rcsid[] = "$NetBSD: rain.c,v 1.6 1995/04/22 10:26:09 cgd Exp $"; #endif #endif /* not lint */ /* * rain 11/3/1980 EPS/CITHEP * cc rain.c -o rain -O -ltermlib */ #include #include #ifdef USG #include #else #include #endif #include #define cursor(c, r) tputs(tgoto(CM, c, r), 1, fputchar) #ifdef USG static struct termio sg, old_tty; #else static struct sgttyb sg, old_tty; #endif void fputchar __P((int)); char *LL, *TE, *tgoto(); main(argc, argv) int argc; char **argv; { extern short ospeed; extern char *UP; register int x, y, j; register char *CM, *BC, *DN, *ND, *term; char *TI, *tcp, *mp, tcb[100], *malloc(), *getenv(), *strcpy(), *tgetstr(); long cols, lines, random(); int xpos[5], ypos[5]; static void onsig(); #ifdef TIOCGWINSZ struct winsize ws; #endif if (!(term = getenv("TERM"))) { fprintf(stderr, "%s: TERM: parameter not set\n", *argv); exit(1); } if (!(mp = malloc((u_int)1024))) { fprintf(stderr, "%s: out of space.\n", *argv); exit(1); } if (tgetent(mp, term) <= 0) { fprintf(stderr, "%s: %s: unknown terminal type\n", *argv, term); exit(1); } tcp = tcb; if (!(CM = tgetstr("cm", &tcp))) { fprintf(stderr, "%s: terminal not capable of cursor motion\n", *argv); exit(1); } if (!(BC = tgetstr("bc", &tcp))) BC = "\b"; if (!(DN = tgetstr("dn", &tcp))) DN = "\n"; if (!(ND = tgetstr("nd", &tcp))) ND = " "; #ifdef TIOCGWINSZ if (ioctl(fileno(stdout), TIOCGWINSZ, &ws) != -1 && ws.ws_col && ws.ws_row) { cols = ws.ws_col; lines = ws.ws_row; } else #endif { if ((cols = tgetnum("co")) == -1) cols = 80; if ((lines = tgetnum("li")) == -1) lines = 24; } cols -= 4; lines -= 4; TE = tgetstr("te", &tcp); TI = tgetstr("ti", &tcp); UP = tgetstr("up", &tcp); if (!(LL = tgetstr("ll", &tcp))) { if (!(LL = malloc((u_int)10))) { fprintf(stderr, "%s: out of space.\n", *argv); exit(1); } (void)strcpy(LL, tgoto(CM, 0, 23)); } #ifdef USG ioctl(1, TCGETA, &sg); ospeed = sg.c_cflag&CBAUD; #else gtty(1, &sg); ospeed = sg.sg_ospeed; #endif (void)signal(SIGHUP, onsig); (void)signal(SIGINT, onsig); (void)signal(SIGQUIT, onsig); (void)signal(SIGSTOP, onsig); (void)signal(SIGTSTP, onsig); (void)signal(SIGTERM, onsig); #ifdef USG ioctl(1, TCGETA, &old_tty); /* save tty bits for exit */ ioctl(1, TCGETA, &sg); sg.c_iflag &= ~ICRNL; sg.c_oflag &= ~ONLCR; sg.c_lflag &= ~ECHO; ioctl(1, TCSETAW, &sg); #else gtty(1, &old_tty); /* save tty bits for exit */ gtty(1, &sg); sg.sg_flags &= ~(CRMOD|ECHO); stty(1, &sg); #endif if (TI) tputs(TI, 1, fputchar); tputs(tgetstr("cl", &tcp), 1, fputchar); (void)fflush(stdout); for (j = 4; j >= 0; --j) { xpos[j] = random() % cols + 2; ypos[j] = random() % lines + 2; } for (j = 0;;) { x = random() % cols + 2; y = random() % lines + 2; cursor(x, y); fputchar('.'); cursor(xpos[j], ypos[j]); fputchar('o'); if (!j--) j = 4; cursor(xpos[j], ypos[j]); fputchar('O'); if (!j--) j = 4; cursor(xpos[j], ypos[j] - 1); fputchar('-'); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputs("|.|", stdout); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputchar('-'); if (!j--) j = 4; cursor(xpos[j], ypos[j] - 2); fputchar('-'); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputs("/ \\", stdout); cursor(xpos[j] - 2, ypos[j]); fputs("| O |", stdout); cursor(xpos[j] - 1, ypos[j] + 1); fputs("\\ /", stdout); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputchar('-'); if (!j--) j = 4; cursor(xpos[j], ypos[j] - 2); fputchar(' '); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputchar(' '); tputs(ND, 1, fputchar); fputchar(' '); cursor(xpos[j] - 2, ypos[j]); fputchar(' '); tputs(ND, 1, fputchar); fputchar(' '); tputs(ND, 1, fputchar); fputchar(' '); cursor(xpos[j] - 1, ypos[j] + 1); fputchar(' '); tputs(ND, 1, fputchar); fputchar(' '); tputs(DN, 1, fputchar); tputs(BC, 1, fputchar); tputs(BC, 1, fputchar); fputchar(' '); xpos[j] = x; ypos[j] = y; (void)fflush(stdout); } } static void onsig() { tputs(LL, 1, fputchar); if (TE) tputs(TE, 1, fputchar); (void)fflush(stdout); #ifdef USG ioctl(1, TCSETAW, &old_tty); #else stty(1, &old_tty); #endif exit(0); } void fputchar(c) int c; { (void)putchar(c); }