ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/common/time.C
(Generate patch)

Comparing deliantra/server/common/time.C (file contents):
Revision 1.1 by elmex, Sun Aug 13 17:16:01 2006 UTC vs.
Revision 1.4 by root, Sun Sep 10 16:00:23 2006 UTC

1
1/* 2/*
2 * static char *rcsid_time_c = 3 * static char *rcsid_time_c =
3 * "$Id: time.C,v 1.1 2006/08/13 17:16:01 elmex Exp $"; 4 * "$Id: time.C,v 1.4 2006/09/10 16:00:23 root Exp $";
4 */ 5 */
5 6
6/* 7/*
7 CrossFire, A Multiplayer game for X-windows 8 CrossFire, A Multiplayer game for X-windows
8 9
… …
28 29
29#include <global.h> 30#include <global.h>
30#include <funcpoint.h> 31#include <funcpoint.h>
31#include <tod.h> 32#include <tod.h>
32 33
33#ifndef WIN32 /* ---win32 exclude header */ 34#ifndef WIN32 /* ---win32 exclude header */
34#include <stdio.h> 35# include <stdio.h>
35#include <sys/types.h> 36# include <sys/types.h>
36#include <sys/time.h> 37# include <sys/time.h>
37#endif /* win32 */ 38#endif /* win32 */
38 39
39/* 40/*
40 * Gloabal variables: 41 * Gloabal variables:
41 */ 42 */
42long max_time = MAX_TIME;
43struct timeval last_time;
44 43
45#define PBUFLEN 100
46long process_utime_save[PBUFLEN];
47long psaveind; 44long psaveind;
48long process_max_utime = 0;
49long process_min_utime = 999999999;
50long process_tot_mtime;
51long pticks; 45long pticks;
52long process_utime_long_count;
53 46
54const char *season_name[] = 47const char *season_name[] = {
55{
56 "The Season of New Year", 48 "The Season of New Year",
57 "The Season of Growth", 49 "The Season of Growth",
58 "The Season of Harvest", 50 "The Season of Harvest",
59 "The Season of Decay", 51 "The Season of Decay",
60 "The Season of the Blizzard", 52 "The Season of the Blizzard",
61 "\n" 53 "\n"
62}; 54};
63 55
64const char *weekdays[DAYS_PER_WEEK] = { 56const char *weekdays[DAYS_PER_WEEK] = {
65 "the Day of the Moon", 57 "the Day of the Moon",
66 "the Day of the Bull", 58 "the Day of the Bull",
67 "the Day of the Deception", 59 "the Day of the Deception",
68 "the Day of Thunder", 60 "the Day of Thunder",
69 "the Day of Freedom", 61 "the Day of Freedom",
70 "the Day of the Great Gods", 62 "the Day of the Great Gods",
71 "the Day of the Sun" 63 "the Day of the Sun"
72}; 64};
73 65
74const char *month_name[MONTHS_PER_YEAR] = { 66const char *month_name[MONTHS_PER_YEAR] = {
75 "Month of Winter", /* 0 */ 67 "Month of Winter", /* 0 */
76 "Month of the Ice Dragon", 68 "Month of the Ice Dragon",
77 "Month of the Frost Giant", 69 "Month of the Frost Giant",
78 "Month of Valriel", 70 "Month of Valriel",
79 "Month of Lythander", 71 "Month of Lythander",
80 "Month of the Harvest", 72 "Month of the Harvest",
81 "Month of Gaea", 73 "Month of Gaea",
82 "Month of Futility", 74 "Month of Futility",
83 "Month of the Dragon", 75 "Month of the Dragon",
84 "Month of the Sun", 76 "Month of the Sun",
85 "Month of the Great Infernus", 77 "Month of the Great Infernus",
86 "Month of Ruggilli", 78 "Month of Ruggilli",
87 "Month of the Dark Shades", 79 "Month of the Dark Shades",
88 "Month of the Devourers", 80 "Month of the Devourers",
89 "Month of Sorig", 81 "Month of Sorig",
90 "Month of the Ancient Darkness", 82 "Month of the Ancient Darkness",
91 "Month of Gorokh" 83 "Month of Gorokh"
92}; 84};
93
94/*
95 * Initialise all variables used in the timing routines.
96 */
97
98void
99reset_sleep(void)
100{
101 int i;
102 for(i = 0; i < PBUFLEN; i++)
103 process_utime_save[i] = 0;
104 psaveind = 0;
105 process_max_utime = 0;
106 process_min_utime = 999999999;
107 process_tot_mtime = 0;
108 pticks = 0;
109
110 (void) GETTIMEOFDAY(&last_time);
111}
112
113void
114log_time(long process_utime)
115{
116 pticks++;
117 if (++psaveind >= PBUFLEN)
118 psaveind = 0;
119 process_utime_save[psaveind] = process_utime;
120 if (process_utime > process_max_utime)
121 process_max_utime = process_utime;
122 if (process_utime < process_min_utime)
123 process_min_utime = process_utime;
124 process_tot_mtime += process_utime/1000;
125}
126
127/*
128 * enough_elapsed_time will return true if the time passed since
129 * last tick is more than max-time.
130 */
131
132int
133enough_elapsed_time(void)
134{
135 static struct timeval new_time;
136 long elapsed_utime;
137
138 (void) GETTIMEOFDAY(&new_time);
139
140 elapsed_utime = (new_time.tv_sec - last_time.tv_sec) * 1000000 +
141 new_time.tv_usec - last_time.tv_usec;
142 if (elapsed_utime > max_time) {
143 log_time(elapsed_utime);
144 last_time.tv_sec = new_time.tv_sec;
145 last_time.tv_usec = new_time.tv_usec;
146 return 1;
147 }
148 return 0;
149}
150
151/*
152 * sleep_delta checks how much time has elapsed since last tick.
153 * If it is less than max_time, the remaining time is slept with select().
154 */
155
156void
157sleep_delta(void)
158{
159 static struct timeval new_time;
160 long sleep_sec, sleep_usec;
161
162 (void) GETTIMEOFDAY(&new_time);
163
164 sleep_sec = last_time.tv_sec - new_time.tv_sec;
165 sleep_usec = max_time - (new_time.tv_usec - last_time.tv_usec);
166
167 /* This is very ugly, but probably the fastest for our use: */
168 while (sleep_usec < 0) {
169 sleep_usec += 1000000;
170 sleep_sec -= 1;
171 }
172 while (sleep_usec > 1000000) {
173 sleep_usec -= 1000000;
174 sleep_sec +=1;
175 }
176
177 log_time((new_time.tv_sec - last_time.tv_sec)*1000000
178 + new_time.tv_usec - last_time.tv_usec);
179
180 if (sleep_sec >= 0 && sleep_usec > 0) {
181 static struct timeval sleep_time;
182 sleep_time.tv_sec = sleep_sec;
183 sleep_time.tv_usec = sleep_usec;
184
185#ifndef WIN32 /* 'select' doesn't work on Windows, 'Sleep' is used instead */
186 select(0, NULL, NULL, NULL, &sleep_time);
187#else
188 if (sleep_time.tv_sec) Sleep(sleep_time.tv_sec*1000);
189 Sleep((int)(sleep_time.tv_usec/1000.));
190#endif
191 }
192 else
193 process_utime_long_count++;
194 /*
195 * Set last_time to when we're expected to wake up:
196 */
197 last_time.tv_usec += max_time;
198 while (last_time.tv_usec > 1000000) {
199 last_time.tv_usec -= 1000000;
200 last_time.tv_sec++;
201 }
202 /*
203 * Don't do too much catching up:
204 * (Things can still get jerky on a slow/loaded computer)
205 */
206 if (last_time.tv_sec * 1000000 + last_time.tv_usec <
207 new_time.tv_sec * 1000000 + new_time.tv_usec)
208 {
209 last_time.tv_sec = new_time.tv_sec;
210 last_time.tv_usec = new_time.tv_usec;
211 }
212}
213
214void
215set_max_time(long t) {
216 max_time = t;
217}
218 85
219extern unsigned long todtick; 86extern unsigned long todtick;
220 87
221void 88void
222get_tod(timeofday_t *tod) 89get_tod (timeofday_t * tod)
223{ 90{
224 tod->year = todtick/HOURS_PER_YEAR; 91 tod->year = todtick / HOURS_PER_YEAR;
225 tod->month = (todtick/HOURS_PER_MONTH)%MONTHS_PER_YEAR; 92 tod->month = (todtick / HOURS_PER_MONTH) % MONTHS_PER_YEAR;
226 tod->day = (todtick%HOURS_PER_MONTH)/DAYS_PER_MONTH; 93 tod->day = (todtick % HOURS_PER_MONTH) / DAYS_PER_MONTH;
227 tod->dayofweek = tod->day%DAYS_PER_WEEK; 94 tod->dayofweek = tod->day % DAYS_PER_WEEK;
228 tod->hour = todtick%HOURS_PER_DAY; 95 tod->hour = todtick % HOURS_PER_DAY;
229 tod->minute = (pticks%PTICKS_PER_CLOCK)/(PTICKS_PER_CLOCK/58); 96 tod->minute = (pticks % PTICKS_PER_CLOCK) / (PTICKS_PER_CLOCK / 58);
230 if (tod->minute > 58) 97 if (tod->minute > 58)
231 tod->minute = 58; /* it's imprecise at best anyhow */ 98 tod->minute = 58; /* it's imprecise at best anyhow */
232 tod->weekofmonth = tod->day/WEEKS_PER_MONTH; 99 tod->weekofmonth = tod->day / WEEKS_PER_MONTH;
233 if (tod->month < 3) 100 if (tod->month < 3)
234 tod->season = 0; 101 tod->season = 0;
235 else if (tod->month < 6) 102 else if (tod->month < 6)
236 tod->season = 1; 103 tod->season = 1;
237 else if (tod->month < 9) 104 else if (tod->month < 9)
… …
241 else 108 else
242 tod->season = 4; 109 tod->season = 4;
243} 110}
244 111
245void 112void
246print_tod(object *op) 113print_tod (object *op)
247{ 114{
248 timeofday_t tod; 115 timeofday_t tod;
249 const char *suf; 116 const char *suf;
250 int day; 117 int day;
251 118
252 get_tod(&tod); 119 get_tod (&tod);
253 sprintf(errmsg, "It is %d minute%s past %d o'clock %s, on %s", 120 sprintf (errmsg, "It is %d minute%s past %d o'clock %s, on %s",
254 tod.minute+1, ((tod.minute+1 < 2) ? "" : "s"), 121 tod.minute + 1, ((tod.minute + 1 < 2) ? "" : "s"),
255 ((tod.hour % 14 == 0) ? 14 : ((tod.hour)%14)), 122 ((tod.hour % 14 == 0) ? 14 : ((tod.hour) % 14)), ((tod.hour >= 14) ? "pm" : "am"), weekdays[tod.dayofweek]);
256 ((tod.hour >= 14) ? "pm" : "am"),
257 weekdays[tod.dayofweek]);
258 new_draw_info(NDI_UNIQUE, 0,op,errmsg); 123 new_draw_info (NDI_UNIQUE, 0, op, errmsg);
259 124
260 day = tod.day + 1; 125 day = tod.day + 1;
261 if (day == 1 || ((day % 10) == 1 && day > 20)) 126 if (day == 1 || ((day % 10) == 1 && day > 20))
262 suf = "st"; 127 suf = "st";
263 else if (day == 2 || ((day % 10) == 2 && day > 20)) 128 else if (day == 2 || ((day % 10) == 2 && day > 20))
264 suf = "nd"; 129 suf = "nd";
265 else if (day == 3 || ((day % 10) == 3 && day > 20)) 130 else if (day == 3 || ((day % 10) == 3 && day > 20))
266 suf = "rd"; 131 suf = "rd";
267 else 132 else
268 suf = "th"; 133 suf = "th";
269 sprintf(errmsg, "The %d%s Day of the %s, Year %d", day, suf, 134 sprintf (errmsg, "The %d%s Day of the %s, Year %d", day, suf, month_name[tod.month], tod.year + 1);
270 month_name[tod.month], tod.year+1);
271 new_draw_info(NDI_UNIQUE, 0,op,errmsg); 135 new_draw_info (NDI_UNIQUE, 0, op, errmsg);
272 136
273 sprintf(errmsg, "Time of Year: %s", season_name[tod.season]); 137 sprintf (errmsg, "Time of Year: %s", season_name[tod.season]);
274 new_draw_info(NDI_UNIQUE, 0,op,errmsg);
275}
276
277void
278time_info(object *op)
279{
280 int tot = 0, maxt = 0, mint = 99999999, long_count = 0, i;
281
282 print_tod(op);
283 if (!QUERY_FLAG(op,FLAG_WIZ))
284 return;
285
286 new_draw_info (NDI_UNIQUE, 0,op,"Total time:");
287 sprintf(errmsg,"ticks=%ld time=%ld.%2ld",
288 pticks, process_tot_mtime/1000, process_tot_mtime%1000);
289 new_draw_info (NDI_UNIQUE, 0,op,errmsg); 138 new_draw_info (NDI_UNIQUE, 0, op, errmsg);
290 sprintf(errmsg,"avg time=%ldms max time=%ldms min time=%ldms",
291 process_tot_mtime/pticks, process_max_utime/1000,
292 process_min_utime/1000);
293 new_draw_info (NDI_UNIQUE, 0,op,errmsg);
294 sprintf(errmsg,"ticks longer than max time (%ldms) = %ld (%ld%%)",
295 max_time/1000,
296 process_utime_long_count, 100*process_utime_long_count/pticks);
297 new_draw_info (NDI_UNIQUE, 0,op,errmsg);
298
299 sprintf(errmsg,"Time last %ld ticks:", pticks > PBUFLEN ? PBUFLEN : pticks);
300 new_draw_info (NDI_UNIQUE, 0,op,errmsg);
301
302 for (i = 0; i < (pticks > PBUFLEN ? PBUFLEN : pticks); i++) {
303 tot += process_utime_save[i];
304 if (process_utime_save[i] > maxt) maxt = process_utime_save[i];
305 if (process_utime_save[i] < mint) mint = process_utime_save[i];
306 if (process_utime_save[i] > max_time) long_count++;
307 }
308
309 sprintf(errmsg,"avg time=%ldms max time=%dms min time=%dms",
310 tot/(pticks > PBUFLEN ? PBUFLEN : pticks)/1000, maxt/1000,
311 mint/1000);
312 new_draw_info (NDI_UNIQUE, 0,op,errmsg);
313 sprintf(errmsg,"ticks longer than max time (%ldms) = %d (%ld%%)",
314 max_time/1000, long_count,
315 100*long_count/(pticks > PBUFLEN ? PBUFLEN : pticks));
316 new_draw_info (NDI_UNIQUE, 0,op,errmsg);
317} 139}
318 140
319long 141long
320seconds(void) 142seconds (void)
321{ 143{
322 struct timeval now; 144 struct timeval now;
323 145
324 (void) GETTIMEOFDAY(&now); 146 (void) GETTIMEOFDAY (&now);
325 return now.tv_sec; 147 return now.tv_sec;
326} 148}

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines