xref: /original-bsd/games/battlestar/save.c (revision 0842ddeb)
1 /*
2  * Copyright (c) 1983, 1993
3  *	The Regents of the University of California.  All rights reserved.
4  *
5  * %sccs.include.redist.c%
6  */
7 
8 #ifndef lint
9 static char sccsid[] = "@(#)save.c	8.2 (Berkeley) 04/28/95";
10 #endif /* not lint */
11 
12 #include "extern.h"
13 
14 restore()
15 {
16 	char *getenv();
17 	char *home;
18 	char home1[100];
19 	register int n;
20 	int tmp;
21 	register FILE *fp;
22 
23 	home = getenv("HOME");
24 	strcpy(home1, home);
25 	strcat(home1, "/Bstar");
26 	if ((fp = fopen(home1, "r")) == 0) {
27 		perror(home1);
28 		return;
29 	}
30 	fread(&WEIGHT, sizeof WEIGHT, 1, fp);
31 	fread(&CUMBER, sizeof CUMBER, 1, fp);
32 	fread(&clock, sizeof clock, 1, fp);
33 	fread(&tmp, sizeof tmp, 1, fp);
34 	location = tmp ? dayfile : nightfile;
35 	for (n = 1; n <= NUMOFROOMS; n++) {
36 		fread(location[n].link, sizeof location[n].link, 1, fp);
37 		fread(location[n].objects, sizeof location[n].objects, 1, fp);
38 	}
39 	fread(inven, sizeof inven, 1, fp);
40 	fread(wear, sizeof wear, 1, fp);
41 	fread(injuries, sizeof injuries, 1, fp);
42 	fread(notes, sizeof notes, 1, fp);
43 	fread(&direction, sizeof direction, 1, fp);
44 	fread(&position, sizeof position, 1, fp);
45 	fread(&time, sizeof time, 1, fp);
46 	fread(&fuel, sizeof fuel, 1, fp);
47 	fread(&torps, sizeof torps, 1, fp);
48 	fread(&carrying, sizeof carrying, 1, fp);
49 	fread(&encumber, sizeof encumber, 1, fp);
50 	fread(&rythmn, sizeof rythmn, 1, fp);
51 	fread(&followfight, sizeof followfight, 1, fp);
52 	fread(&ate, sizeof ate, 1, fp);
53 	fread(&snooze, sizeof snooze, 1, fp);
54 	fread(&meetgirl, sizeof meetgirl, 1, fp);
55 	fread(&followgod, sizeof followgod, 1, fp);
56 	fread(&godready, sizeof godready, 1, fp);
57 	fread(&win, sizeof win, 1, fp);
58 	fread(&wintime, sizeof wintime, 1, fp);
59 	fread(&matchlight, sizeof matchlight, 1, fp);
60 	fread(&matchcount, sizeof matchcount, 1, fp);
61 	fread(&loved, sizeof loved, 1, fp);
62 	fread(&pleasure, sizeof pleasure, 1, fp);
63 	fread(&power, sizeof power, 1, fp);
64 	fread(&ego, sizeof ego, 1, fp);
65 }
66 
67 save()
68 {
69 	char *getenv();
70 	char *home;
71 	char home1[100];
72 	register int n;
73 	int tmp;
74 	FILE *fp;
75 
76 	home = getenv("HOME");
77 	strcpy(home1, home);
78 	strcat(home1, "/Bstar");
79 	if ((fp = fopen(home1, "w")) == 0) {
80 		perror(home1);
81 		return;
82 	}
83 	printf("Saved in %s.\n", home1);
84 	fwrite(&WEIGHT, sizeof WEIGHT, 1, fp);
85 	fwrite(&CUMBER, sizeof CUMBER, 1, fp);
86 	fwrite(&clock, sizeof clock, 1, fp);
87 	tmp = location == dayfile;
88 	fwrite(&tmp, sizeof tmp, 1, fp);
89 	for (n = 1; n <= NUMOFROOMS; n++) {
90 		fwrite(location[n].link, sizeof location[n].link, 1, fp);
91 		fwrite(location[n].objects, sizeof location[n].objects, 1, fp);
92 	}
93 	fwrite(inven, sizeof inven, 1, fp);
94 	fwrite(wear, sizeof wear, 1, fp);
95 	fwrite(injuries, sizeof injuries, 1, fp);
96 	fwrite(notes, sizeof notes, 1, fp);
97 	fwrite(&direction, sizeof direction, 1, fp);
98 	fwrite(&position, sizeof position, 1, fp);
99 	fwrite(&time, sizeof time, 1, fp);
100 	fwrite(&fuel, sizeof fuel, 1, fp);
101 	fwrite(&torps, sizeof torps, 1, fp);
102 	fwrite(&carrying, sizeof carrying, 1, fp);
103 	fwrite(&encumber, sizeof encumber, 1, fp);
104 	fwrite(&rythmn, sizeof rythmn, 1, fp);
105 	fwrite(&followfight, sizeof followfight, 1, fp);
106 	fwrite(&ate, sizeof ate, 1, fp);
107 	fwrite(&snooze, sizeof snooze, 1, fp);
108 	fwrite(&meetgirl, sizeof meetgirl, 1, fp);
109 	fwrite(&followgod, sizeof followgod, 1, fp);
110 	fwrite(&godready, sizeof godready, 1, fp);
111 	fwrite(&win, sizeof win, 1, fp);
112 	fwrite(&wintime, sizeof wintime, 1, fp);
113 	fwrite(&matchlight, sizeof matchlight, 1, fp);
114 	fwrite(&matchcount, sizeof matchcount, 1, fp);
115 	fwrite(&loved, sizeof loved, 1, fp);
116 	fwrite(&pleasure, sizeof pleasure, 1, fp);
117 	fwrite(&power, sizeof power, 1, fp);
118 	fwrite(&ego, sizeof ego, 1, fp);
119 }
120