Commit | Line | Data |
---|---|---|
fdc7d56f | 1 | /* |
86164080 KB |
2 | * Copyright (c) 1983, 1993 |
3 | * The Regents of the University of California. All rights reserved. | |
e95fc82a | 4 | * |
a6547b1d | 5 | * %sccs.include.redist.c% |
fdc7d56f EW |
6 | */ |
7 | ||
e1b932c3 | 8 | #ifndef lint |
86164080 | 9 | static char sccsid[] = "@(#)save.c 8.1 (Berkeley) %G%"; |
e95fc82a | 10 | #endif /* not lint */ |
e1b932c3 EW |
11 | |
12 | #include "externs.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); | |
d0c74d25 JB |
33 | fread(&tmp, sizeof tmp, 1, fp); |
34 | location = tmp ? dayfile : nightfile; | |
e1b932c3 EW |
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); | |
e1b932c3 EW |
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); | |
a7c71d1e EW |
84 | fwrite(&WEIGHT, sizeof WEIGHT, 1, fp); |
85 | fwrite(&CUMBER, sizeof CUMBER, 1, fp); | |
86 | fwrite(&clock, sizeof clock, 1, fp); | |
d0c74d25 JB |
87 | tmp = location == dayfile; |
88 | fwrite(&tmp, sizeof tmp, 1, fp); | |
e1b932c3 | 89 | for (n = 1; n <= NUMOFROOMS; n++) { |
a7c71d1e EW |
90 | fwrite(location[n].link, sizeof location[n].link, 1, fp); |
91 | fwrite(location[n].objects, sizeof location[n].objects, 1, fp); | |
e1b932c3 EW |
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); | |
e1b932c3 EW |
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 | } |