1 1.12 rillig /* $NetBSD: setup.c,v 1.12 2021/05/02 12:50:43 rillig Exp $ */ 2 1.2 cgd 3 1.1 jtc /*- 4 1.1 jtc * Copyright (c) 1991, 1993 5 1.1 jtc * The Regents of the University of California. All rights reserved. 6 1.1 jtc * 7 1.1 jtc * This code is derived from software contributed to Berkeley by 8 1.1 jtc * Jim Gillogly at The Rand Corporation. 9 1.1 jtc * 10 1.1 jtc * Redistribution and use in source and binary forms, with or without 11 1.1 jtc * modification, are permitted provided that the following conditions 12 1.1 jtc * are met: 13 1.1 jtc * 1. Redistributions of source code must retain the above copyright 14 1.1 jtc * notice, this list of conditions and the following disclaimer. 15 1.1 jtc * 2. Redistributions in binary form must reproduce the above copyright 16 1.1 jtc * notice, this list of conditions and the following disclaimer in the 17 1.1 jtc * documentation and/or other materials provided with the distribution. 18 1.10 agc * 3. Neither the name of the University nor the names of its contributors 19 1.1 jtc * may be used to endorse or promote products derived from this software 20 1.1 jtc * without specific prior written permission. 21 1.1 jtc * 22 1.1 jtc * THIS SOFTWARE IS PROVIDED BY THE REGENTS AND CONTRIBUTORS ``AS IS'' AND 23 1.1 jtc * ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT LIMITED TO, THE 24 1.1 jtc * IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR PURPOSE 25 1.1 jtc * ARE DISCLAIMED. IN NO EVENT SHALL THE REGENTS OR CONTRIBUTORS BE LIABLE 26 1.1 jtc * FOR ANY DIRECT, INDIRECT, INCIDENTAL, SPECIAL, EXEMPLARY, OR CONSEQUENTIAL 27 1.1 jtc * DAMAGES (INCLUDING, BUT NOT LIMITED TO, PROCUREMENT OF SUBSTITUTE GOODS 28 1.1 jtc * OR SERVICES; LOSS OF USE, DATA, OR PROFITS; OR BUSINESS INTERRUPTION) 29 1.1 jtc * HOWEVER CAUSED AND ON ANY THEORY OF LIABILITY, WHETHER IN CONTRACT, STRICT 30 1.1 jtc * LIABILITY, OR TORT (INCLUDING NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY 31 1.1 jtc * OUT OF THE USE OF THIS SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF 32 1.1 jtc * SUCH DAMAGE. 33 1.1 jtc */ 34 1.1 jtc 35 1.1 jtc #ifndef lint 36 1.8 simonb static char copyright[] = "@(#) Copyright (c) 1991, 1993\n\ 37 1.8 simonb The Regents of the University of California. All rights reserved.\n"; 38 1.1 jtc 39 1.2 cgd #if 0 40 1.1 jtc static char sccsid[] = "@(#)setup.c 8.1 (Berkeley) 5/31/93"; 41 1.2 cgd #else 42 1.12 rillig static char rcsid[] = "$NetBSD: setup.c,v 1.12 2021/05/02 12:50:43 rillig Exp $"; 43 1.2 cgd #endif 44 1.3 lukem #endif /* not lint */ 45 1.1 jtc 46 1.1 jtc /* 47 1.1 jtc * Setup: keep the structure of the original Adventure port, but use an 48 1.1 jtc * internal copy of the data file, serving as a sort of virtual disk. It's 49 1.1 jtc * lightly encrypted to prevent casual snooping of the executable. 50 1.1 jtc * 51 1.1 jtc * Also do appropriate things to tabs so that bogus editors will do the right 52 1.1 jtc * thing with the data file. 53 1.1 jtc * 54 1.1 jtc */ 55 1.1 jtc 56 1.1 jtc #define SIG1 " * Jim Gillogly" 57 1.1 jtc #define SIG2 " * Sterday, 6 Thrimidge S.R. 1993, 15:24" 58 1.1 jtc 59 1.1 jtc #include <stdio.h> 60 1.8 simonb #include <errno.h> 61 1.8 simonb #include <string.h> 62 1.6 hubertf #include <stdlib.h> 63 1.11 jmc #include "hdr.h" /* SEED lives in there; keep them coordinated. */ 64 1.1 jtc 65 1.9 jsm #define USAGE "Usage: setup file > data.c (file is typically glorkz)\n" 66 1.1 jtc 67 1.1 jtc #define YES 1 68 1.1 jtc #define NO 0 69 1.1 jtc 70 1.3 lukem #define LINE 10 /* How many values do we get on a line? */ 71 1.1 jtc 72 1.8 simonb int main(int, char *[]); 73 1.6 hubertf 74 1.4 lukem int 75 1.11 jmc main(int argc, char *argv[]) 76 1.1 jtc { 77 1.3 lukem FILE *infile; 78 1.3 lukem int c, count, linestart; 79 1.1 jtc 80 1.8 simonb if (argc != 2) { 81 1.8 simonb fprintf(stderr, USAGE); 82 1.8 simonb exit(1); 83 1.8 simonb } 84 1.1 jtc 85 1.8 simonb if ((infile = fopen(argv[1], "r")) == NULL) { 86 1.8 simonb fprintf(stderr, "Can't read file %s: %s\n", argv[1], 87 1.8 simonb strerror(errno)); 88 1.8 simonb exit(1); 89 1.8 simonb } 90 1.1 jtc puts("/*\n * data.c: created by setup from the ascii data file."); 91 1.1 jtc puts(SIG1); 92 1.1 jtc puts(SIG2); 93 1.1 jtc puts(" */"); 94 1.1 jtc printf("\n\nchar data_file[] =\n{"); 95 1.1 jtc srandom(SEED); 96 1.1 jtc count = 0; 97 1.1 jtc linestart = YES; 98 1.1 jtc 99 1.3 lukem while ((c = getc(infile)) != EOF) { 100 1.11 jmc if (linestart && c == ' ') { /* Convert first spaces to tab */ 101 1.12 rillig printf("0x%02x,", 102 1.11 jmc (unsigned int)('\t' ^ random()) & 0xFF); 103 1.1 jtc while ((c = getc(infile)) == ' ' && c != EOF); 104 1.1 jtc /* Drop the non-whitespace character through */ 105 1.1 jtc linestart = NO; 106 1.1 jtc } 107 1.3 lukem switch (c) { 108 1.3 lukem case '\t': 109 1.3 lukem linestart = NO; /* Don't need to convert spaces */ 110 1.1 jtc break; 111 1.3 lukem case '\n': 112 1.3 lukem linestart = YES; /* Ready to convert spaces 113 1.3 lukem * again */ 114 1.1 jtc break; 115 1.1 jtc } 116 1.3 lukem if (count++ % LINE == 0) /* Finished a line? */ 117 1.1 jtc printf("\n\t"); 118 1.5 hubertf printf("0x%02x,", (unsigned int)(c ^ random()) & 0xFF); 119 1.1 jtc } 120 1.1 jtc puts("\n\t0\n};"); 121 1.1 jtc fclose(infile); 122 1.7 hubertf fflush(stdout); 123 1.8 simonb if (ferror(stdout)) { 124 1.8 simonb perror("error writing standard output"); 125 1.8 simonb exit(1); 126 1.8 simonb } 127 1.1 jtc exit(0); 128 1.1 jtc } 129