]> git.pond.sub.org Git - empserver/blob - src/lib/common/wantupd.c
COPYING duplicates information from README. Remove. Move GPL from
[empserver] / src / lib / common / wantupd.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2006, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                           Ken Stevens, Steve McClure
5  *
6  *  This program is free software; you can redistribute it and/or modify
7  *  it under the terms of the GNU General Public License as published by
8  *  the Free Software Foundation; either version 2 of the License, or
9  *  (at your option) any later version.
10  *
11  *  This program is distributed in the hope that it will be useful,
12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
14  *  GNU General Public License for more details.
15  *
16  *  You should have received a copy of the GNU General Public License
17  *  along with this program; if not, write to the Free Software
18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
19  *
20  *  ---
21  *
22  *  See files README, COPYING and CREDITS in the root of the source
23  *  tree for related information and legal notices.  It is expected
24  *  that future projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  wantupd.c: Check to se if an update is wanted and/or allowed.
29  * 
30  *  Known contributors to this file:
31  *     Doug Hay, 1990
32  */
33
34 #include <config.h>
35
36 #include <stdio.h>
37 #if !defined(_WIN32)
38 #include <unistd.h>
39 #endif
40 #include "misc.h"
41 #include "nat.h"
42 #include "file.h"
43 #include "wantupd.h"
44 #include "optlist.h"
45 #include "common.h"
46
47 #include <sys/types.h>
48 #include <fcntl.h>
49 #include <time.h>
50
51 void
52 update_policy_check(void)
53 {
54     if (update_policy < 0)
55         update_policy = UDP_DEFAULT;
56     if (update_policy > UDP_MAX)
57         update_policy = UDP_DEFAULT;
58     if (update_demandpolicy < 0)
59         update_demandpolicy = UDDEM_DEFAULT;
60     if (update_demandpolicy > UDDEM_MAX)
61         update_demandpolicy = UDDEM_DEFAULT;
62     if (update_wantmin < 0)
63         update_wantmin = 0;
64     if (update_wantmin > MAXNOC)
65         update_wantmin = MAXNOC;
66     if (blitz_time < 0)
67         blitz_time = 0;
68 }
69
70 static int
71 demand_update_time(time_t *now)
72 {
73     struct tm *tm;
74
75     tm = localtime(now);
76     return is_daytime_allowed(60 * tm->tm_hour + tm->tm_min,
77                               update_demandtimes);
78 }
79
80 /* When is the next regularly scheduled update from now. */
81 static void
82 regular_update_time(time_t *now, time_t *tim, time_t *delta)
83 {
84     time_t tw;
85     int secs_per_update;
86
87     tw = *now + adj_update;
88     secs_per_update = etu_per_update * s_p_etu;
89     *delta = secs_per_update - (tw % secs_per_update);
90     *tim = *now + *delta;
91 }
92
93 /* Is this a valid time for a scheduled update. */
94 static int
95 scheduled_update_time(time_t *now)
96 {
97     struct tm *tm;
98
99     tm = localtime(now);
100     return is_daytime_near(60 * tm->tm_hour + tm->tm_min,
101                            update_times, hourslop);
102 }
103
104 static int
105 next_scheduled_time(time_t *now, time_t *tim, time_t *delta)
106 {
107     struct tm *tm;
108     int d;
109
110     tm = localtime(now);
111     d = min_to_next_daytime(60 * tm->tm_hour + tm->tm_min, update_times);
112     if (d < 0)
113         return 0;
114     *delta = 60 * d;
115     *tim = *now + *delta - tm->tm_sec;
116     return 1;
117 }
118
119 int
120 demand_update_want(int *want, int *pop, int which)
121 {
122     natid cn;
123     struct natstr *natp;
124     int totpop;
125     int totwant;
126     int whichwants;
127
128     whichwants = totpop = totwant = 0;
129     for (cn = 1; 0 != (natp = getnatp(cn)); cn++) {
130         /* Only countries which are normal. */
131         /* Should probably include sanctuaries ..... */
132         if (natp->nat_stat == STAT_ACTIVE) {
133             totpop++;
134             if ((natp->nat_update & WUPD_WANT) == WUPD_WANT) {
135                 totwant++;
136                 if (which == cn)
137                     whichwants++;
138             }
139         }
140     }
141     *want = totwant;
142     *pop = totpop;
143     return whichwants;
144 }
145
146 static int
147 demand_check(void)
148 {
149     struct natstr *natp;
150     int want, pop, cn, veto;
151     time_t now;
152     time_t cur;
153
154     time(&cur);
155
156     if (0 == update_wantmin) {
157         logerror("no demand update allowed, wantmin = 0");
158         return 0;
159     }
160
161     demand_update_want(&want, &pop, 0);
162     if (want < update_wantmin) {
163         logerror("no demand update, want = %d, min = %d",
164                  want, update_wantmin);
165         return 0;
166     }
167
168     time(&now);
169     if (!demand_update_time(&now)) {
170         logerror("no demand update, not within hours allowed.");
171         return 0;
172     }
173
174
175     veto = 0;
176     for (cn = 1; 0 != (natp = getnatp(cn)); cn++) {
177         if (natp->nat_stat == STAT_ACTIVE) {
178             if (natp->nat_missed >= update_missed)
179                 veto = cn;
180         }
181     }
182
183     if (veto) {
184         logerror("no demand update, %d has missed more than %d updates",
185                  veto, update_missed);
186         return 0;
187     }
188
189     return 1;
190 }
191
192 /* Check if enough countries want an update,
193  * and if demand updates are allowed now.
194  */
195 int
196 demandupdatecheck(void)
197 {
198     if (UDDEM_COMSET != update_demandpolicy) {
199         logerror("no demand update, not policy.");
200         return 0;
201     }
202
203     return demand_check();
204 }
205
206 /* Is it time for a regular or scheduled update?
207  * As well, if none of the above, check to see if
208  * a demand update can occur.
209  */
210 int
211 updatetime(time_t *now)
212 {
213     if (opt_BLITZ && update_policy == UDP_BLITZ) {
214         logerror("BLITZ Update.");
215         return 1;
216     }
217
218     if (UDP_NORMAL == update_policy) {
219         logerror("Regular update, etu type.");
220         return 1;
221     }
222
223     if (UDP_TIMES == update_policy) {
224         if (scheduled_update_time(now)) {
225             logerror("Scheduled update.");
226             return 1;
227         }
228     }
229     if (opt_DEMANDUPDATE) {
230         if (demand_check()) {
231             logerror("Demand update, at check time.");
232             return 1;
233         }
234     }
235     return 0;
236 }
237
238 /* Return the time, and delta seconds, of the next update.
239  * If the policy is no regular updates, return the time of
240  * the next possible check.
241  */
242 void
243 next_update_time(time_t *now, time_t *tim, time_t *delta)
244                         /* From when */
245                         /* Time of next update */
246                         /* Seconds till next update */
247 {
248     time_t stim, sdelta;
249
250     switch (update_policy) {
251     case UDP_NORMAL:
252         regular_update_time(now, tim, delta);
253         break;
254     case UDP_TIMES:
255         if (!next_scheduled_time(now, tim, delta))
256             regular_update_time(now, tim, delta);
257         break;
258     case UDP_BLITZ:
259         *delta = (blitz_time * 60) - (*now % (blitz_time * 60));
260         *tim = *now + *delta;
261         break;
262
263     case UDP_NOREG:
264     default:
265         regular_update_time(now, tim, delta);
266         if (next_scheduled_time(now, &stim, &sdelta)) {
267             if (*delta > sdelta) {
268                 *delta = sdelta;
269                 *tim = stim;
270             }
271         }
272         break;
273     }
274 }
275
276 void
277 next_update_check_time(time_t *now, time_t *tim, time_t *delta)
278                         /* From when */
279                         /* Time of next update */
280                         /* Seconds till next update check */
281 {
282     time_t stim, sdelta;
283
284     switch (update_policy) {
285     case UDP_NORMAL:
286         regular_update_time(now, tim, delta);
287         break;
288     case UDP_BLITZ:
289         *delta = (blitz_time * 60) - (*now % (blitz_time * 60));
290         *tim = *now + *delta;
291         break;
292     case UDP_TIMES:
293     case UDP_NOREG:
294     default:
295         regular_update_time(now, tim, delta);
296         if (next_scheduled_time(now, &stim, &sdelta)) {
297             if (*delta > sdelta) {
298                 *delta = sdelta;
299                 *tim = stim;
300             }
301         }
302     }
303 }
304
305 int
306 updates_disabled(void)
307 {
308     int fd;
309
310     if ((fd = open(disablefil, O_RDONLY, 0)) < 0)
311         return 0;
312     close(fd);
313     return 1;
314 }