games/ppt/ppt.c

   1 /*      $NetBSD: ppt.c,v 1.17 2008/07/20 01:03:22 lukem Exp $   */
   2
   3 /*
   4  * Copyright (c) 1988, 1993
   5  *      The Regents of the University of California.  All rights reserved.
   6  *
   7  * Redistribution and use in source and binary forms, with or without
   8  * modification, are permitted provided that the following conditions
   9  * are met:
  10  * 1. Redistributions of source code must retain the above copyright
  11  *    notice, this list of conditions and the following disclaimer.
  12  * 2. Redistributions in binary form must reproduce the above copyright
  13  *    notice, this list of conditions and the following disclaimer in the
  14  *    documentation and/or other materials provided with the distribution.
  15  * 3. Neither the name of the University nor the names of its contributors
  16  *    may be used to endorse or promote products derived from this software
  17  *    without specific prior written permission.
  18  *
  19  * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND
  20  * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE
  21  * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE
  22  * ARE DISCLAIMED.  IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE
  23  * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL
  24  * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS
  25  * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION)
  26  * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT
  27  * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY
  28  * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF
  29  * SUCH DAMAGE.
  30  */
  31
  32 #include <sys/cdefs.h>
  33 #ifndef lint
  34 __COPYRIGHT("@(#) Copyright (c) 1988, 1993\
  35  The Regents of the University of California.  All rights reserved.");
  36 #endif /* not lint */
  37
  38 #ifndef lint
  39 #if 0
  40 static char sccsid[] = "@(#)ppt.c       8.1 (Berkeley) 5/31/93";
  41 #else
  42 __RCSID("$NetBSD: ppt.c,v 1.17 2008/07/20 01:03:22 lukem Exp $");
  43 #endif
  44 #endif /* not lint */
  45
  46 #include <err.h>
  47 #include <stdio.h>
  48 #include <stdlib.h>
  49 #include <string.h>
  50 #include <unistd.h>
  51
  52 #define EDGE    "___________"
  53
  54 static void putppt(int);
  55 static int getppt(const char *);
  56
  57 static void
  58 usage(void)
  59 {
  60         extern char *__progname;
  61         fprintf(stderr, "usage: %s [-d] [string ...]\n", __progname);
  62         exit(1);
  63 }
  64
  65 int
  66 main(int argc, char **argv)
  67 {
  68         char *p, buf[132];
  69         int c, start, neednl, dflag;
  70
  71         /* Revoke setgid privileges */
  72         setgid(getgid());
  73
  74         dflag = 0;
  75         while ((c = getopt(argc, argv, "dh")) != -1)
  76                 switch(c) {
  77                 case 'd':
  78                         dflag = 1;
  79                         break;
  80                 case 'h':
  81                 case '?':
  82                 default:
  83                         usage();
  84                 }
  85         argc -= optind;
  86         argv += optind;
  87
  88         if (dflag) {
  89                 if (argc > 0)
  90                         usage();
  91
  92                 start = 0;
  93                 neednl = 0;
  94                 while (fgets(buf, sizeof(buf), stdin) != NULL) {
  95                         c = getppt(buf);
  96                         if (c < 0) {
  97                                 if (start) {
  98                                         /* lost sync? */
  99                                         if (neednl)
 100                                                 putchar('\n');
 101                                         exit(0);
 102                                 } else
 103                                         continue;
 104                         }
 105                         start = 1;
 106                         putchar(c);
 107                         neednl = (c != '\n');
 108                 }
 109                 if (!feof(stdin))
 110                         err(1, "fgets");
 111                 if (neednl)
 112                         putchar('\n');
 113         } else {
 114                 (void) puts(EDGE);
 115                 if (argc > 0)
 116                         while ((p = *argv++)) {
 117                                 for (; *p; ++p)
 118                                         putppt((int)*p);
 119                                 if ((*(argv)))
 120                                         putppt((int)' ');
 121                         }
 122                 else while ((c = getchar()) != EOF)
 123                         putppt(c);
 124                 (void) puts(EDGE);
 125         }
 126         exit(0);
 127 }
 128
 129 static void
 130 putppt(c)
 131         int c;
 132 {
 133         int i;
 134
 135         (void) putchar('|');
 136         for (i = 7; i >= 0; i--) {
 137                 if (i == 2)
 138                         (void) putchar('.');    /* feed hole */
 139                 if ((c&(1<<i)) != 0)
 140                         (void) putchar('o');
 141                 else
 142                         (void) putchar(' ');
 143         }
 144         (void) putchar('|');
 145         (void) putchar('\n');
 146 }
 147
 148 static int
 149 getppt(const char *buf)
 150 {
 151         const char *p = strchr(buf, '.');
 152         int c;
 153
 154         if (p == NULL)
 155                 return (-1);
 156
 157         c = 0;
 158         if (p[ 3] != ' ')
 159                 c |= 0001;
 160         if (p[ 2] != ' ')
 161                 c |= 0002;
 162         if (p[ 1] != ' ')
 163                 c |= 0004;
 164         if (p[-1] != ' ')
 165                 c |= 0010;
 166         if (p[-2] != ' ')
 167                 c |= 0020;
 168         if (p[-3] != ' ')
 169                 c |= 0040;
 170         if (p[-4] != ' ')
 171                 c |= 0100;
 172         if (p[-5] != ' ')
 173                 c |= 0200;
 174
 175         return (c);
 176 }