1 1.12 dholland /* $NetBSD: hack.rip.c,v 1.12 2009/08/12 07:28:41 dholland 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.12 dholland __RCSID("$NetBSD: hack.rip.c,v 1.12 2009/08/12 07:28:41 dholland 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.12 dholland static void center(int, char *); 87 1.12 dholland 88 1.5 christos void 89 1.9 dholland outrip(void) 90 1.5 christos { 91 1.5 christos char buf[BUFSZ]; 92 1.1 cgd 93 1.1 cgd cls(); 94 1.2 mycroft curs(1, 8); 95 1.2 mycroft puts(riptop); 96 1.1 cgd (void) strcpy(buf, plname); 97 1.1 cgd buf[16] = 0; 98 1.1 cgd center(6, buf); 99 1.10 dholland (void) snprintf(buf, sizeof(buf), "%ld AU", u.ugold); 100 1.1 cgd center(7, buf); 101 1.10 dholland (void) snprintf(buf, sizeof(buf), "killed by%s", 102 1.5 christos !strncmp(killer, "the ", 4) ? "" : 103 1.5 christos !strcmp(killer, "starvation") ? "" : 104 1.5 christos strchr(vowels, *killer) ? " an" : " a"); 105 1.1 cgd center(8, buf); 106 1.11 dholland (void) strlcpy(buf, killer, sizeof(buf)); 107 1.5 christos { 108 1.5 christos int i1; 109 1.5 christos if ((i1 = strlen(buf)) > 16) { 110 1.5 christos int i, i0; 111 1.2 mycroft i0 = i1 = 0; 112 1.5 christos for (i = 0; i <= 16; i++) 113 1.5 christos if (buf[i] == ' ') 114 1.5 christos i0 = i, i1 = i + 1; 115 1.5 christos if (!i0) 116 1.5 christos i0 = i1 = 16; 117 1.2 mycroft buf[i1 + 16] = 0; 118 1.2 mycroft buf[i0] = 0; 119 1.2 mycroft } 120 1.2 mycroft center(9, buf); 121 1.5 christos center(10, buf + i1); 122 1.1 cgd } 123 1.10 dholland (void) snprintf(buf, sizeof(buf), "%4d", getyear()); 124 1.1 cgd center(11, buf); 125 1.2 mycroft puts(ripbot); 126 1.1 cgd getret(); 127 1.1 cgd } 128 1.1 cgd 129 1.12 dholland static void 130 1.9 dholland center(int line __unused, 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