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

Comparing deliantra/server/common/loader.C (file contents):
Revision 1.177 by root, Wed Nov 16 23:41:59 2016 UTC vs.
Revision 1.186 by root, Sun Jan 27 11:04:33 2019 UTC

1/* 1/*
2 * This file is part of Deliantra, the Roguelike Realtime MMORPG. 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 * 3 *
4 * Copyright (©) 2018 Marc Alexander Lehmann / the Deliantra team
4 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team 5 * Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012,2013,2014,2015,2016 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team 6 * Copyright (©) 2002 Mark Wedel & Crossfire Development Team
6 * Copyright (©) 1992 Frank Tore Johansen 7 * Copyright (©) 1992 Frank Tore Johansen
7 * 8 *
8 * Deliantra is free software: you can redistribute it and/or modify it under 9 * Deliantra is free software: you can redistribute it and/or modify it under
250 "spell_glyph", /* 205 */ 251 "spell_glyph", /* 205 */
251 NULL 252 NULL
252}; 253};
253 254
254/* This function checks the object after it has been loaded (when we 255/* This function checks the object after it has been loaded (when we
255 * get the 'end' in the input stream). This function can be used to 256 * get the 'end' in the input stream). This function can be used to
256 * deal with legacy objects where fields may have changed. It can also be used 257 * deal with legacy objects where fields may have changed. It can also be used
257 * to check for objects to make sure there are no common errors. 258 * to check for objects to make sure there are no common errors.
258 */ 259 */
259void 260void
260object::post_load_check () 261object::post_load_check ()
293 LOG (llevError, "ITEMBUG: %s: body_shield %d != -1\n", debug_desc (), slot [body_shield].info); 294 LOG (llevError, "ITEMBUG: %s: body_shield %d != -1\n", debug_desc (), slot [body_shield].info);
294 slot [body_shield].info = -1; 295 slot [body_shield].info = -1;
295 } 296 }
296 break; 297 break;
297 298
299 case CONTAINER:
300 if (nrof)
301 {
302 LOG (llevError, "ITEMBUG: %s: stackable container (nrof %d)\n", debug_desc (), (int)nrof);
303 nrof = 0;
304 }
305 break;
306
298 case PLAYER: 307 case PLAYER:
299 if (slot [body_shield].info != 1) 308 if (slot [body_shield].info != 1)
300 { 309 {
301 LOG (llevError, "ITEMBUG: %s: body_shield %d != 1\n", debug_desc (), slot [body_shield].info); 310 LOG (llevError, "ITEMBUG: %s: body_shield %d != 1\n", debug_desc (), slot [body_shield].info);
302 slot [body_shield].info = 1; 311 slot [body_shield].info = 1;
321 * this isn't perfect (things won't be properly pluralised), but works to 330 * this isn't perfect (things won't be properly pluralised), but works to
322 * that degree (5 heart is still quite understandable). But the case we 331 * that degree (5 heart is still quite understandable). But the case we
323 * also have to catch is if this object is not using the normal name for 332 * also have to catch is if this object is not using the normal name for
324 * the object. In that case, we also want to use the loaded name. 333 * the object. In that case, we also want to use the loaded name.
325 * Otherwise, what happens is that the the plural name will lose 334 * Otherwise, what happens is that the the plural name will lose
326 * information (appear as just 'hearts' and not 'goblins heart') 335 * information (appear as just 'hearts' and not 'goblins heart')
327 */ 336 */
328 if (arch && name != arch->object::name && name_pl == arch->object::name_pl) 337 if (arch && name != arch->object::name && name_pl == arch->object::name_pl)
329 name_pl = 0; 338 name_pl = 0;
330 339
331 if (!name_pl) 340 if (!name_pl)
521 { 530 {
522 negate = 1; 531 negate = 1;
523 str++; 532 str++;
524 } 533 }
525 534
526 for (const flagstr *f = move_flags; f < move_flags + array_length (move_flags); ++f) 535 for (const flagstr *f = move_flags; f < move_flags + ecb_array_length (move_flags); ++f)
527 { 536 {
528 if (!strcmp (f->name, str)) 537 if (!strcmp (f->name, str))
529 { 538 {
530 if (negate) 539 if (negate)
531 mt &= ~f->flags; 540 mt &= ~f->flags;
1018 { 1027 {
1019 op->destroy (); 1028 op->destroy ();
1020 return 0; 1029 return 0;
1021 } 1030 }
1022 1031
1023 // the loader reverses the ordering of kv-pairs, so we reverse it again after loading 1032 // The loader reverses the ordering of kv-pairs, so we reverse it again after loading.
1024 // that greatly simplifies the loading code. 1033 // This greatly simplifies the loading code.
1025 op->kv.reverse (); 1034 op->kv.reverse ();
1026 1035
1027 op->post_load_check (); 1036 op->post_load_check ();
1028 return op; 1037 return op;
1029} 1038}
1215 *ptr++ = '\n'; 1224 *ptr++ = '\n';
1216 1225
1217 f.alloc (ptr - cur); 1226 f.alloc (ptr - cur);
1218 } 1227 }
1219 1228
1220#define CMP_OUT(v) if (expect_false (op->v != arch->v)) f.put (KW (v), op->v) 1229#define CMP_OUT(v) if (ecb_expect_false (op->v != arch->v)) f.put (KW (v), op->v)
1221#define CMP_OUT2(k,v) if (expect_false (op->v != arch->v)) f.put (KW (k), op->v) 1230#define CMP_OUT2(k,v) if (ecb_expect_false (op->v != arch->v)) f.put (KW (k), op->v)
1222 1231
1223 CMP_OUT (x); 1232 CMP_OUT (x);
1224 CMP_OUT (y); 1233 CMP_OUT (y);
1225 1234
1226 CMP_OUT (type); 1235 CMP_OUT (type);
1240 static int last_speed_left_len = sizeof ("sl 0\n") - 1; 1249 static int last_speed_left_len = sizeof ("sl 0\n") - 1;
1241 1250
1242 if (last_speed_left != op->speed_left) 1251 if (last_speed_left != op->speed_left)
1243 { 1252 {
1244 last_speed_left = op->speed_left; 1253 last_speed_left = op->speed_left;
1254 // .7g loses precision even for float, but gives nice round numbers and smaller files
1255 // maybe hex format or a raw binary dump of the float is good enough, more exact, and much faster?
1256 // (printf is typically very slow)
1245 last_speed_left_len = sizeof ("sl ") - 1 1257 last_speed_left_len = sizeof ("sl ") - 1
1246 + sprintf (last_speed_left_str + sizeof ("sl ") - 1, "%.7g\n", last_speed_left); 1258 + sprintf (last_speed_left_str + sizeof ("sl ") - 1, "%.7g\n", last_speed_left);
1247 } 1259 }
1248 1260
1249 f.add (last_speed_left_str, last_speed_left_len); 1261 f.add (last_speed_left_str, last_speed_left_len);
1312 CMP_OUT (level); 1324 CMP_OUT (level);
1313 CMP_OUT (attacktype); 1325 CMP_OUT (attacktype);
1314 1326
1315 // using memcmp here seems to be a loss - is gcc vectorising? 1327 // using memcmp here seems to be a loss - is gcc vectorising?
1316 for (int i = 0; i < NROFATTACKS; i++) 1328 for (int i = 0; i < NROFATTACKS; i++)
1317 if (expect_false (op->resist[i] != arch->resist[i])) 1329 if (ecb_expect_false (op->resist[i] != arch->resist[i]))
1318 f.put (resist_save[i], op->resist[i]); 1330 f.put (resist_save[i], op->resist[i]);
1319 1331
1320 CMP_OUT (path_attuned); 1332 CMP_OUT (path_attuned);
1321 CMP_OUT (path_repelled); 1333 CMP_OUT (path_repelled);
1322 CMP_OUT (path_denied); 1334 CMP_OUT (path_denied);
1336 CMP_OUT (last_grace); 1348 CMP_OUT (last_grace);
1337 CMP_OUT (last_eat); 1349 CMP_OUT (last_eat);
1338 CMP_OUT (glow_radius); 1350 CMP_OUT (glow_radius);
1339 1351
1340 if (op->flag [FLAG_IS_LINKED]) 1352 if (op->flag [FLAG_IS_LINKED])
1341 if (auto (ol, op->find_link ())) 1353 if (auto ol = op->find_link ())
1342 f.put (KW(connected), ol->id); 1354 f.put (KW(connected), ol->id);
1343 1355
1344 CMP_OUT (randomitems); 1356 CMP_OUT (randomitems);
1345 1357
1346 CMP_OUT2 (container, weight_limit); 1358 CMP_OUT2 (container, weight_limit);
1374 f.put (flag_names [FLAG_OBJ_ORIGINAL], op->flag [FLAG_OBJ_ORIGINAL] ? CS(1) : CS(0)); 1386 f.put (flag_names [FLAG_OBJ_ORIGINAL], op->flag [FLAG_OBJ_ORIGINAL] ? CS(1) : CS(0));
1375 1387
1376 diff.reset (FLAG_OBJ_ORIGINAL); 1388 diff.reset (FLAG_OBJ_ORIGINAL);
1377 1389
1378 // quickly test whether any other flags differ 1390 // quickly test whether any other flags differ
1379 if (expect_true (diff.any ())) 1391 if (ecb_expect_true (diff.any ()))
1380 for (int i = 0; i < NUM_FLAGS; i++) 1392 for (int i = 0; i < NUM_FLAGS; i++)
1381 if (expect_false (diff [i])) 1393 if (ecb_expect_false (diff [i]))
1382 f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0)); 1394 f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0));
1383#else 1395#else
1384 // use sgi extensions 1396 // use sgi extensions
1385 for (int i = diff._Find_first (); i < diff.size (); i = diff._Find_next (i)) 1397 for (int i = diff._Find_first (); i < diff.size (); i = diff._Find_next (i))
1386 f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0)); 1398 f.put (flag_names [i], op->flag [i] ? CS(1) : CS(0));
1387#endif 1399#endif
1388 1400
1389 // save body locations. gcc's memcmp does an abysmal job when used 1401 // save body locations. gcc's memcmp does an abysmal job when used
1390 for (int i = 0; i < NUM_BODY_LOCATIONS; i++) 1402 for (int i = 0; i < NUM_BODY_LOCATIONS; ++i)
1391 if (expect_false (op->slot[i].info != arch->slot[i].info)) 1403 if (ecb_expect_false (op->slot[i].info != arch->slot[i].info))
1392 f.put (body_locations[i].kw, op->slot[i].info); 1404 f.put (body_locations[i].kw, op->slot[i].info);
1393} 1405}
1394 1406
1395/* 1407/*
1396 * Dumps all variables in an object to a file. 1408 * Dumps all variables in an object to a file.
1398 * the only place this is not set is when saving the player. 1410 * the only place this is not set is when saving the player.
1399 */ 1411 */
1400bool 1412bool
1401object::write (object_freezer &f) 1413object::write (object_freezer &f)
1402{ 1414{
1403 if (expect_false (is_arch ())) 1415 if (ecb_expect_false (is_arch ()))
1404 { 1416 {
1405 f.put (KW(object), arch->archname); 1417 f.put (KW(object), arch->archname);
1406 write_diff (f, this, archetype::empty); 1418 write_diff (f, this, archetype::empty);
1407 } 1419 }
1408 else 1420 else

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines