Home | History | Annotate | Line # | Download | only in hack
hack.rip.c revision 1.7.16.2
      1  1.7.16.2       snj /*	$NetBSD: hack.rip.c,v 1.7.16.2 2009/06/29 23:55:23 snj Exp $	*/
      2       1.5  christos 
      3       1.3   mycroft /*
      4       1.7       jsm  * Copyright (c) 1985, Stichting Centrum voor Wiskunde en Informatica,
      5       1.7       jsm  * Amsterdam
      6       1.7       jsm  * All rights reserved.
      7       1.7       jsm  *
      8       1.7       jsm  * Redistribution and use in source and binary forms, with or without
      9       1.7       jsm  * modification, are permitted provided that the following conditions are
     10       1.7       jsm  * met:
     11       1.7       jsm  *
     12       1.7       jsm  * - Redistributions of source code must retain the above copyright notice,
     13       1.7       jsm  * this list of conditions and the following disclaimer.
     14       1.7       jsm  *
     15       1.7       jsm  * - Redistributions in binary form must reproduce the above copyright
     16       1.7       jsm  * notice, this list of conditions and the following disclaimer in the
     17       1.7       jsm  * documentation and/or other materials provided with the distribution.
     18       1.7       jsm  *
     19       1.7       jsm  * - Neither the name of the Stichting Centrum voor Wiskunde en
     20       1.7       jsm  * Informatica, nor the names of its contributors may be used to endorse or
     21       1.7       jsm  * promote products derived from this software without specific prior
     22       1.7       jsm  * written permission.
     23       1.7       jsm  *
     24       1.7       jsm  * THIS SOFTWARE IS PROVIDED BY THE COPYRIGHT HOLDERS AND CONTRIBUTORS "AS
     25       1.7       jsm  * IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED
     26       1.7       jsm  * TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A
     27       1.7       jsm  * PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE COPYRIGHT OWNER
     28       1.7       jsm  * OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
     29       1.7       jsm  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     30       1.7       jsm  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR
     31       1.7       jsm  * PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF
     32       1.7       jsm  * LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING
     33       1.7       jsm  * NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
     34       1.7       jsm  * SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     35       1.7       jsm  */
     36       1.7       jsm 
     37       1.7       jsm /*
     38       1.7       jsm  * Copyright (c) 1982 Jay Fenlason <hack (at) gnu.org>
     39       1.7       jsm  * All rights reserved.
     40       1.7       jsm  *
     41       1.7       jsm  * Redistribution and use in source and binary forms, with or without
     42       1.7       jsm  * modification, are permitted provided that the following conditions
     43       1.7       jsm  * are met:
     44       1.7       jsm  * 1. Redistributions of source code must retain the above copyright
     45       1.7       jsm  *    notice, this list of conditions and the following disclaimer.
     46       1.7       jsm  * 2. Redistributions in binary form must reproduce the above copyright
     47       1.7       jsm  *    notice, this list of conditions and the following disclaimer in the
     48       1.7       jsm  *    documentation and/or other materials provided with the distribution.
     49       1.7       jsm  * 3. The name of the author may not be used to endorse or promote products
     50       1.7       jsm  *    derived from this software without specific prior written permission.
     51       1.7       jsm  *
     52       1.7       jsm  * THIS SOFTWARE IS PROVIDED ``AS IS'' AND ANY EXPRESS OR IMPLIED WARRANTIES,
     53       1.7       jsm  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
     54       1.7       jsm  * AND FITNESS FOR A PARTICULAR PURPOSE ARE DISCLAIMED.  IN NO EVENT SHALL
     55       1.7       jsm  * THE AUTHOR BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL,
     56       1.7       jsm  * EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT LIMITED TO,
     57       1.7       jsm  * PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA, OR PROFITS;
     58       1.7       jsm  * OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY,
     59       1.7       jsm  * WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR
     60       1.7       jsm  * OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS SOFTWARE, EVEN IF
     61       1.7       jsm  * ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
     62       1.3   mycroft  */
     63       1.3   mycroft 
     64       1.5  christos #include <sys/cdefs.h>
     65       1.3   mycroft #ifndef lint
     66  1.7.16.2       snj __RCSID("$NetBSD: hack.rip.c,v 1.7.16.2 2009/06/29 23:55:23 snj Exp $");
     67       1.5  christos #endif				/* not lint */
     68       1.1       cgd 
     69       1.1       cgd #include "hack.h"
     70       1.5  christos #include "extern.h"
     71       1.1       cgd 
     72       1.6       jsm static const char    *riptop = "\
     73       1.2   mycroft                        ----------\n\
     74       1.2   mycroft                       /          \\\n\
     75       1.2   mycroft                      /    REST    \\\n\
     76       1.2   mycroft                     /      IN      \\\n\
     77       1.2   mycroft                    /     PEACE      \\\n\
     78       1.2   mycroft                   /                  \\";
     79       1.1       cgd 
     80       1.6       jsm static const char    *ripmid = "                  | %*s%*s |\n";
     81       1.2   mycroft 
     82       1.6       jsm static const char    *ripbot = "\
     83       1.2   mycroft                  *|     *  *  *      | *\n\
     84       1.2   mycroft         _________)/\\\\_//(\\/(/\\)/\\//\\/|_)_______";
     85       1.2   mycroft 
     86       1.5  christos void
     87       1.5  christos outrip()
     88       1.5  christos {
     89       1.5  christos 	char            buf[BUFSZ];
     90       1.1       cgd 
     91       1.1       cgd 	cls();
     92       1.2   mycroft 	curs(1, 8);
     93       1.2   mycroft 	puts(riptop);
     94       1.1       cgd 	(void) strcpy(buf, plname);
     95       1.1       cgd 	buf[16] = 0;
     96       1.1       cgd 	center(6, buf);
     97  1.7.16.1       snj 	(void) snprintf(buf, sizeof(buf), "%ld AU", u.ugold);
     98       1.1       cgd 	center(7, buf);
     99  1.7.16.1       snj 	(void) snprintf(buf, sizeof(buf), "killed by%s",
    100       1.5  christos 		       !strncmp(killer, "the ", 4) ? "" :
    101       1.5  christos 		       !strcmp(killer, "starvation") ? "" :
    102       1.5  christos 		       strchr(vowels, *killer) ? " an" : " a");
    103       1.1       cgd 	center(8, buf);
    104  1.7.16.2       snj 	(void) strlcpy(buf, killer, sizeof(buf));
    105       1.5  christos 	{
    106       1.5  christos 		int             i1;
    107       1.5  christos 		if ((i1 = strlen(buf)) > 16) {
    108       1.5  christos 			int             i, i0;
    109       1.2   mycroft 			i0 = i1 = 0;
    110       1.5  christos 			for (i = 0; i <= 16; i++)
    111       1.5  christos 				if (buf[i] == ' ')
    112       1.5  christos 					i0 = i, i1 = i + 1;
    113       1.5  christos 			if (!i0)
    114       1.5  christos 				i0 = i1 = 16;
    115       1.2   mycroft 			buf[i1 + 16] = 0;
    116       1.2   mycroft 			buf[i0] = 0;
    117       1.2   mycroft 		}
    118       1.2   mycroft 		center(9, buf);
    119       1.5  christos 		center(10, buf + i1);
    120       1.1       cgd 	}
    121  1.7.16.1       snj 	(void) snprintf(buf, sizeof(buf), "%4d", getyear());
    122       1.1       cgd 	center(11, buf);
    123       1.2   mycroft 	puts(ripbot);
    124       1.1       cgd 	getret();
    125       1.1       cgd }
    126       1.1       cgd 
    127       1.5  christos void
    128       1.5  christos center(line, text)
    129       1.6       jsm 	int             line __attribute__((__unused__));
    130       1.5  christos 	char           *text;
    131       1.5  christos {
    132       1.5  christos 	int             n = strlen(text) / 2;
    133       1.5  christos 	printf(ripmid, 8 + n, text, 8 - n, "");
    134       1.1       cgd }
    135