setup.c revision 1.11 1 1.11 jmc /* $NetBSD: setup.c,v 1.11 2005/07/01 00:03:36 jmc 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.11 jmc static char rcsid[] = "$NetBSD: setup.c,v 1.11 2005/07/01 00:03:36 jmc 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.11 jmc 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