Crossfire Server, Trunk  R21189
swap.c
Go to the documentation of this file.
1 /*
2  * Crossfire -- cooperative multi-player graphical RPG and adventure game
3  *
4  * Copyright (c) 1999-2014 Mark Wedel and the Crossfire Development Team
5  * Copyright (c) 1992 Frank Tore Johansen
6  *
7  * Crossfire is free software and comes with ABSOLUTELY NO WARRANTY. You are
8  * welcome to redistribute it under certain conditions. For details, please
9  * see COPYING and LICENSE.
10  *
11  * The authors can be reached via e-mail at <crossfire@metalforge.org>.
12  */
13 
19 #include "global.h"
20 
21 #include <string.h>
22 
23 #include "object.h"
24 #include "output_file.h"
25 #include "sproto.h"
26 
33 static void write_map_log(void) {
34  FILE *fp;
35  OutputFile of;
36  mapstruct *map;
37  char buf[MAX_BUF];
38  long current_time = time(NULL);
39 
40  snprintf(buf, sizeof(buf), "%s/temp.maps", settings.localdir);
41  fp = of_open(&of, buf);
42  if (fp == NULL)
43  return;
44  for (map = first_map; map != NULL; map = map->next) {
45  /* If tmpname is null, it is probably a unique player map,
46  * so don't save information on it.
47  */
48  if (map->in_memory != MAP_IN_MEMORY
49  && (map->tmpname != NULL)
50  && (strncmp(map->path, "/random", 7))) {
51  /* the 0 written out is a leftover from the lock number for
52  * unique items and second one is from encounter maps.
53  * Keep using it so that old temp files continue
54  * to work.
55  */
56  fprintf(fp, "%s:%s:%ld:0:0:%d:0:%d\n", map->path, map->tmpname,
57  (map->reset_time == (uint32_t)-1 ? -1 : map->reset_time-current_time),
58  map->difficulty,
59  map->darkness);
60  }
61  }
62  of_close(&of);
63 }
64 
70 void read_map_log(void) {
71  FILE *fp;
72  mapstruct *map;
73  char buf[MAX_BUF];
74  int do_los, darkness, lock;
75  long sec = seconds();
76 
77  snprintf(buf, sizeof(buf), "%s/temp.maps", settings.localdir);
78  if (!(fp = fopen(buf, "r"))) {
79  LOG(llevDebug, "Could not open %s for reading\n", buf);
80  return;
81  }
82  while (fgets(buf, MAX_BUF, fp) != NULL) {
83  char *tmp[3];
84 
85  map = get_linked_map();
86  /* scanf doesn't work all that great on strings, so we break
87  * out that manually. strdup is used for tmpname, since other
88  * routines will try to free that pointer.
89  */
90  if (split_string(buf, tmp, sizeof(tmp)/sizeof(*tmp), ':') != 3) {
91  LOG(llevDebug, "%s/temp.maps: ignoring invalid line: %s\n", settings.localdir, buf);
92  continue;
93  }
94 
95  safe_strncpy(map->path, tmp[0], sizeof(map->path));
96  map->tmpname = strdup_local(tmp[1]);
97 
98  /* Lock is left over from the lock items - we just toss it now.
99  * We use it twice - second one is from encounter, but as we
100  * don't care about the value, this works fine
101  */
102  sscanf(tmp[2], "%u:%d:%d:%hu:%d:%d\n", &map->reset_time, &lock, &lock, &map->difficulty, &do_los, &darkness);
103 
104  map->in_memory = MAP_SWAPPED;
105  map->darkness = darkness;
106  map->timeout = 0;
107 
108  /* When the reset time is saved out, it is adjusted so that
109  * the current time is subtracted (thus, it is saved as number
110  * of seconds from current time that it should reset). We need
111  * to add in the current seconds for this to work right.
112  * On metalforge, strange behavior was observed with really high
113  * reset times - I don't know how they got to that state,
114  * but easy enough to do some sanity checking here.
115  */
116  map->reset_time += sec;
117  if (map->reset_time > (sec+MAP_MAXRESET))
118  map->reset_time = 0;
119  }
120  fclose(fp);
121 }
122 
135 int swap_map(mapstruct *map) {
136  player *pl;
137  int res;
138 
139  if (map->in_memory != MAP_IN_MEMORY) {
140  LOG(llevError, "Tried to swap out map which was not in memory.\n");
142  }
143  for (pl = first_player; pl != NULL; pl = pl->next)
144  if (pl->ob == NULL || (!(QUERY_FLAG(pl->ob, FLAG_REMOVED)) && pl->ob->map == map))
145  break;
146 
147  if (pl != NULL) {
148  LOG(llevDebug, "Wanted to swap out map with player.\n");
149  return SAVE_ERROR_PLAYER;
150  }
151  pets_remove_all(); /* Give them a chance to follow */
152 
153  /* Update the reset time. Only do this is STAND_STILL is not set */
154  if (!map->fixed_resettime)
155  set_map_reset_time(map);
156 
157  /* If it is immediate reset time, don't bother saving it - just get
158  * rid of it right away.
159  */
160  if (map->reset_time <= seconds()) {
161  mapstruct *oldmap = map;
162 
163  LOG(llevDebug, "Resetting map %s.\n", map->path);
164  /* Lauwenmark : Here we handle the MAPRESET global event */
166  map = map->next;
167  delete_map(oldmap);
168  return SAVE_ERROR_OK;
169  }
170 
171  if ((res = save_map(map, SAVE_MODE_NORMAL)) < 0) {
172  LOG(llevError, "Failed to swap map %s.\n", map->path);
173  /* This is sufficiently critical to mandate to warn all DMs. */
175  "Failed to swap map %s!", map->path);
176  /* Map is *not *swapped. */
177  map->in_memory = MAP_IN_MEMORY;
178  return res;
179  }
180 
181  map->timeout = 0;
182  free_map(map);
183 
185  write_map_log();
186 
187  return SAVE_ERROR_OK;
188 }
189 
193 void check_active_maps(void) {
194  /* Swapping can take many tens of milliseconds. Swapping too many maps in
195  * one tick can cause enough latency for the server to skip time. */
196  int num_to_swap = 1;
197 
198  mapstruct *map, *next;
199  for (map = first_map; map != NULL; map = next) {
200  next = map->next;
201  if (map->in_memory == MAP_IN_MEMORY) {
202  // map->timeout == 0 means to never swap
203  if (map->timeout > 1) {
204  map->timeout -= 1;
205  } else if (num_to_swap > 0 && map->timeout == 1) {
206  swap_map(map);
207  num_to_swap -= 1;
208  }
209  }
210  }
211 }
212 
226 int players_on_map(mapstruct *m, int show_all) {
227  player *pl;
228  int nr = 0;
229 
230  for (pl = first_player; pl != NULL; pl = pl->next)
231  if (pl->ob != NULL
232  && !QUERY_FLAG(pl->ob, FLAG_REMOVED)
233  && pl->ob->map == m
234  && (show_all || !pl->hidden))
235  nr++;
236  return nr;
237 }
238 
244 void flush_old_maps(void) {
245  mapstruct *m, *oldmap;
246  long sec;
247  sec = seconds();
248 
249  m = first_map;
250  while (m) {
251  /* There can be cases (ie death) where a player leaves a map and the timeout
252  * is not set so it isn't swapped out.
253  */
254  if ((m->in_memory == MAP_IN_MEMORY)
255  && (m->timeout == 0)
256  && !players_on_map(m, TRUE)) {
257  set_map_timeout(m);
258  }
259 
260  /* per player unique maps are never really reset. However, we do want
261  * to perdiocially remove the entries in the list of active maps - this
262  * generates a cleaner listing if a player issues the map commands, and
263  * keeping all those swapped out per player unique maps also has some
264  * memory and cpu consumption.
265  * We do the cleanup here because there are lots of places that call
266  * swap map, and doing it within swap map may cause problems as
267  * the functions calling it may not expect the map list to change
268  * underneath them.
269  */
270  if ((m->unique || m->is_template) && m->in_memory == MAP_SWAPPED) {
271  LOG(llevDebug, "Resetting map %s.\n", m->path);
272  oldmap = m;
273  m = m->next;
274  delete_map(oldmap);
275  } else if (m->in_memory != MAP_SWAPPED
276  || m->tmpname == NULL
277  || sec < m->reset_time) {
278  m = m->next;
279  } else {
280  LOG(llevDebug, "Resetting map %s.\n", m->path);
281  /* Lauwenmark : Here we handle the MAPRESET global event */
283  clean_tmp_map(m);
284  oldmap = m;
285  m = m->next;
286  delete_map(oldmap);
287  }
288  }
289 }
void draw_ext_info_format(int flags, int pri, const object *pl, uint8_t type, uint8_t subtype, const char *format,...)
Definition: main.c:315
char path[HUGE_BUF]
Definition: map.h:365
void set_map_timeout(mapstruct *oldmap)
Definition: main.c:307
Definition: player.h:92
mapstruct * get_linked_map(void)
Definition: map.c:782
#define SAVE_ERROR_OK
Definition: map.h:143
#define strdup_local
Definition: compat.h:25
uint32_t in_memory
Definition: map.h:345
#define MAP_MAXRESET
Definition: config.h:424
uint32_t is_template
Definition: map.h:338
uint32_t reset_time
Definition: map.h:332
static void write_map_log(void)
Definition: swap.c:33
#define MSG_TYPE_ADMIN_LOADSAVE
Definition: newclient.h:477
void check_active_maps(void)
Definition: swap.c:193
#define TRUE
Definition: compat.h:10
#define SAVE_MODE_NORMAL
Definition: map.h:120
void free_map(mapstruct *m)
Definition: map.c:1706
#define safe_strncpy
Definition: compat.h:23
uint32_t hidden
Definition: player.h:132
int players_on_map(mapstruct *m, int show_all)
Definition: swap.c:226
uint8_t recycle_tmp_maps
Definition: global.h:268
#define FLAG_REMOVED
Definition: define.h:232
#define MAP_IN_MEMORY
Definition: map.h:130
#define NDI_RED
Definition: newclient.h:224
#define MAP_SWAPPED
Definition: map.h:131
uint32_t unique
Definition: map.h:337
#define NDI_ALL_DMS
Definition: newclient.h:247
struct mapdef * map
Definition: object.h:297
#define snprintf
Definition: win32.h:46
int of_close(OutputFile *of)
Definition: output_file.c:61
long seconds(void)
Definition: time.c:344
void read_map_log(void)
Definition: swap.c:70
int execute_global_event(int eventcode,...)
Definition: main.c:369
uint32_t fixed_resettime
Definition: map.h:335
void pets_remove_all(void)
Definition: pets.c:257
uint8_t darkness
Definition: map.h:346
#define QUERY_FLAG(xyz, p)
Definition: define.h:225
#define MAX_BUF
Definition: define.h:35
#define MSG_TYPE_ADMIN
Definition: newclient.h:377
#define EVENT_MAPRESET
Definition: plugin.h:92
uint16_t difficulty
Definition: map.h:343
char * tmpname
Definition: map.h:327
int save_map(mapstruct *m, int flag)
Definition: map.c:1436
object * ob
Definition: player.h:158
int32_t timeout
Definition: map.h:341
unsigned int uint32_t
Definition: win32.h:162
void set_map_reset_time(mapstruct *map)
Definition: map.c:2245
void flush_old_maps(void)
Definition: swap.c:244
const char * localdir
Definition: global.h:243
struct Settings settings
Definition: init.c:40
FILE * of_open(OutputFile *of, const char *fname)
Definition: output_file.c:30
int swap_map(mapstruct *map)
Definition: swap.c:135
void delete_map(mapstruct *m)
Definition: map.c:1753
EXTERN player * first_player
Definition: global.h:117
struct pl * next
Definition: player.h:93
size_t split_string(char *str, char *array[], size_t array_size, char sep)
Definition: utils.c:500
#define NDI_UNIQUE
Definition: newclient.h:245
void LOG(LogLevel logLevel, const char *format,...)
Definition: logger.c:51
struct mapdef * next
Definition: map.h:326
Definition: map.h:325
#define SAVE_ERROR_PLAYER
Definition: map.h:152
void clean_tmp_map(mapstruct *m)
Definition: map.c:1966
EXTERN mapstruct * first_map
Definition: global.h:118
#define SAVE_ERROR_NOT_IN_MEMORY
Definition: map.h:151