Update default make.conf and its manpage:
[dragonfly.git] / games / phantasia / setup.c
1 /*
2  * setup.c - set up all files for Phantasia
3  *
4  * $FreeBSD: src/games/phantasia/setup.c,v 1.11 1999/11/16 02:57:34 billf Exp $
5  * $DragonFly: src/games/phantasia/setup.c,v 1.3 2005/05/31 00:06:26 swildner Exp $
6  */
7 #include "include.h"
8 #include <sys/types.h>
9 #include <sys/stat.h>
10 #include <unistd.h>
11
12 /* functions which we need to know about */
13 /* phantglobs.c */
14 extern  double  drandom(void);
15
16 void    Error(const char *, const char *);
17
18 static const char *files[] = {          /* all files to create */
19         _SPATH_MONST,
20         _SPATH_PEOPLE,
21         _SPATH_MESS,
22         _SPATH_LASTDEAD,
23         _SPATH_MOTD,
24         _SPATH_GOLD,
25         _SPATH_VOID,
26         _SPATH_SCORE,
27         NULL,
28 };
29
30 const char *monsterfile="monsters.asc";
31
32 /*\f*/
33 /************************************************************************
34 /
35 / FUNCTION NAME: main()
36 /
37 / FUNCTION: setup files for Phantasia 3.3.2
38 /
39 / AUTHOR: E. A. Estes, 12/4/85
40 /
41 / ARGUMENTS: none
42 /
43 / RETURN VALUE: none
44 /
45 / MODULES CALLED: time(), exit(), stat(), Error(), creat(), close(), fopen(),
46 /       fgets(), floor(), srandom(), umask(), drandom(), strcpy(), getuid(),
47 /       unlink(), fwrite(), fclose(), sscanf(), printf(), strlen(), fprintf()
48 /
49 / GLOBAL INPUTS: Curmonster, _iob[], Databuf[], *Monstfp, Enrgyvoid
50 /
51 / GLOBAL OUTPUTS: Curmonster, Databuf[], *Monstfp, Enrgyvoid
52 /
53 / DESCRIPTION:
54 /
55 /       This program tries to verify the parameters specified in
56 /       the Makefile.
57 /
58 /       Create all necessary files.  Note that nothing needs to be
59 /       put in these files.
60 /       Also, the monster binary data base is created here.
61 /
62 *************************************************************************/
63
64 int
65 main(int argc, char **argv)
66 {
67         const   char    **filename;     /* for pointing to file names */
68         int     fd;             /* file descriptor */
69         FILE    *fp;                    /* for opening files */
70         struct stat     fbuf;           /* for getting files statistics */
71         int ch;
72
73         while ((ch = getopt(argc, argv, "m:")) != -1)
74                 switch(ch) {
75                 case 'm':
76                         monsterfile = optarg;
77                         break;
78                 case '?':
79                 default:
80                         break;
81                 }
82         argc -= optind;
83         argv += optind;
84
85     srandomdev();
86
87 #if 0
88     umask(0117);                /* only owner can read/write created files */
89 #endif
90
91     /* try to create data files */
92     filename = &files[0];
93     while (*filename != NULL)
94         /* create each file */
95         {
96         if (stat(*filename, &fbuf) == 0)
97             /* file exists; remove it */
98             {
99             if (!strcmp(*filename, _SPATH_PEOPLE))
100                 /* do not reset character file if it already exists */
101                 {
102                 ++filename;
103                 continue;
104                 }
105
106             if (unlink(*filename) < 0)
107                 Error("Cannot unlink %s.\n", *filename);
108                 /*NOTREACHED*/
109             }
110
111         if ((fd = creat(*filename, 0666)) < 0)
112             Error("Cannot create %s.\n", *filename);
113             /*NOTREACHED*/
114
115         close(fd);                      /* close newly created file */
116
117         ++filename;                     /* process next file */
118         }
119
120     /* put holy grail info into energy void file */
121     Enrgyvoid.ev_active = TRUE;
122     Enrgyvoid.ev_x = ROLL(-1.0e6, 2.0e6);
123     Enrgyvoid.ev_y = ROLL(-1.0e6, 2.0e6);
124     if ((fp = fopen(_SPATH_VOID, "w")) == NULL)
125         Error("Cannot update %s.\n", _SPATH_VOID);
126     else
127         {
128         fwrite(&Enrgyvoid, SZ_VOIDSTRUCT, 1, fp);
129         fclose(fp);
130         }
131
132     /* create binary monster data base */
133     if ((Monstfp = fopen(_SPATH_MONST, "w")) == NULL)
134         Error("Cannot update %s.\n", _SPATH_MONST);
135     else
136         {
137         if ((fp = fopen(monsterfile, "r")) == NULL)
138             {
139             fclose(Monstfp);
140             Error("cannot open %s to create monster database.\n", "monsters.asc");
141             }
142         else
143             {
144             Curmonster.m_o_strength =
145             Curmonster.m_o_speed =
146             Curmonster.m_maxspeed =
147             Curmonster.m_o_energy =
148             Curmonster.m_melee =
149             Curmonster.m_skirmish = 0.0;
150
151             while (fgets(Databuf, SZ_DATABUF, fp) != NULL)
152                 /* read in text file, convert to binary */
153                 {
154                 sscanf(&Databuf[24], "%lf%lf%lf%lf%lf%d%d%lf",
155                     &Curmonster.m_strength, &Curmonster.m_brains,
156                     &Curmonster.m_speed, &Curmonster.m_energy,
157                     &Curmonster.m_experience, &Curmonster.m_treasuretype,
158                     &Curmonster.m_type, &Curmonster.m_flock);
159                 Databuf[24] = '\0';
160                 strcpy(Curmonster.m_name, Databuf);
161                 fwrite((char *) &Curmonster, SZ_MONSTERSTRUCT, 1, Monstfp);
162                 }
163             fclose(fp);
164             fclose(Monstfp);
165             }
166         }
167
168 #ifdef MAKE_INSTALLS_THIS_AND_DOESNT_WANT_TO_HEAR_ABOUT_IT
169     /* write to motd file */
170     printf("One line 'motd' ? ");
171     if (fgets(Databuf, SZ_DATABUF, stdin) == NULL)
172         Databuf[0] = '\0';
173     if ((fp = fopen(_SPATH_MOTD, "w")) == NULL)
174         Error("Cannot update %s.\n", _SPATH_MOTD);
175     else
176         {
177         fwrite(Databuf, sizeof(char), strlen(Databuf), fp);
178         fclose(fp);
179         }
180
181     /* report compile-time options */
182     printf("Compiled options:\n\n");
183     printf("Phantasia destination directory:  %s\n", _SPATH_PHANTDIR);
184     printf("Wizard: root UID: 0\n");
185
186 #ifdef BSD41
187     printf("Compiled for BSD 4.1\n");
188 #endif
189
190 #ifdef BSD42
191     printf("Compiled for BSD 4.2\n");
192 #endif
193
194 #ifdef SYS3
195     printf("Compiled for System III\n");
196 #endif
197
198 #ifdef SYS5
199     printf("Compiled for System V\n");
200 #endif
201 #endif
202
203     exit(0);
204     /*NOTREACHED*/
205 }
206 /*\f*/
207 /************************************************************************
208 /
209 / FUNCTION NAME: Error()
210 /
211 / FUNCTION: print an error message, and exit
212 /
213 / AUTHOR: E. A. Estes, 12/4/85
214 /
215 / ARGUMENTS:
216 /       char *str - format string for printf()
217 /       char *file - file which caused error
218 /
219 / RETURN VALUE: none
220 /
221 / MODULES CALLED: exit(), perror(), fprintf()
222 /
223 / GLOBAL INPUTS: _iob[]
224 /
225 / GLOBAL OUTPUTS: none
226 /
227 / DESCRIPTION:
228 /       Print an error message, then exit.
229 /
230 *************************************************************************/
231
232 void
233 Error(const char *str, const char *file)
234 {
235     fprintf(stderr, "Error: ");
236     fprintf(stderr, str, file);
237     perror(file);
238     exit(1);
239     /*NOTREACHED*/
240 }