hack.rip.c revision 1.7 1 1.7 jsm /* $NetBSD: hack.rip.c,v 1.7 2003/04/02 18:36:39 jsm 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 jsm __RCSID("$NetBSD: hack.rip.c,v 1.7 2003/04/02 18:36:39 jsm 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.1 cgd (void) sprintf(buf, "%ld AU", u.ugold);
98 1.1 cgd center(7, buf);
99 1.1 cgd (void) sprintf(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.1 cgd (void) strcpy(buf, killer);
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.1 cgd (void) sprintf(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