/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2000, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Copyright (C) 1986-2008, Dave Pare, Jeff Bailey, Thomas Ruschak,
* Ken Stevens, Steve McClure
*
* This program is free software; you can redistribute it and/or modify
*
* ---
*
- * See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
- * related information and legal notices. It is expected that any future
- * projects/authors will amend these files as needed.
+ * See files README, COPYING and CREDITS in the root of the source
+ * tree for related information and legal notices. It is expected
+ * that future projects/authors will amend these files as needed.
*
* ---
*
* sect.c: Sector pre-write and post-read data massage
- *
+ *
* Known contributors to this file:
* Dave Pare, 1989
* Steve McClure, 1996
+ * Markus Armbruster, 2004-2008
*/
-#include "misc.h"
-#include "player.h"
-#include "var.h"
-#include "sect.h"
-#include "xy.h"
-#include "nat.h"
-#include "deity.h"
+#include <config.h>
+
+#include <ctype.h>
#include "file.h"
#include "land.h"
+#include "lost.h"
+#include "misc.h"
+#include "nat.h"
#include "nsc.h"
+#include "optlist.h"
#include "plane.h"
+#include "player.h"
#include "prototypes.h"
-#include "optlist.h"
-
-static void give_back_cap(struct sctstr *sp);
+#include "sect.h"
+#include "xy.h"
-/*ARGSUSED*/
-int
-sct_postread(int id, s_char *ptr)
+void
+sct_postread(int id, void *ptr)
{
- struct sctstr *sp = (struct sctstr *) ptr;
+ struct sctstr *sp = ptr;
- checksect(sp);
- player->owner = (player->god || sp->sct_own == player->cnum);
- if (opt_MOB_ACCESS)
- sct_do_upd_mob(sp);
- return 1;
+ player->owner = (player->god || sp->sct_own == player->cnum);
+ if (opt_MOB_ACCESS)
+ sct_do_upd_mob(sp);
}
-/*ARGSUSED*/
-int
-sct_prewrite(int id, s_char *ptr)
+void
+sct_prewrite(int id, void *old, void *new)
{
- struct sctstr *sp = (struct sctstr *) ptr;
- struct sctstr sect;
-
- time(&sp->sct_timestamp);
-
- checksect(sp);
- getsect(sp->sct_x, sp->sct_y, §);
- return 1;
+ struct sctstr *oldsp = old;
+ struct sctstr *sp = new;
+ int mil, civs;
+ natid own;
+
+ bridge_damaged(sp);
+ item_prewrite(sp->sct_item);
+
+ mil = sp->sct_item[I_MILIT];
+ civs = sp->sct_item[I_CIVIL];
+ own = sp->sct_own;
+
+ if (own && !civs) {
+ sp->sct_work = 100;
+ sp->sct_oldown = own;
+ }
+
+ if (own && !civs && !mil && !has_units(sp->sct_x, sp->sct_y, own, NULL)
+ && !(sp->sct_flags & MOVE_IN_PROGRESS)) {
+ /* more cruft! */
+ own = 0;
+ sp->sct_mobil = 0;
+ if (sp->sct_type == SCT_CAPIT || sp->sct_type == SCT_MOUNT)
+ caploss(sp, own, "");
+ }
+
+ /* We've avoided assigning to sp->sct_own, in case oldsp == sp */
+ if (oldsp->sct_own != own)
+ lost_and_found(EF_SECTOR, oldsp->sct_own, own,
+ 0, sp->sct_x, sp->sct_y);
+
+ sp->sct_own = own;
}
-int
-checksect(struct sctstr *sp)
+void
+item_prewrite(short *item)
{
- int mil, civs, loyalcivs;
-
- /* shouldn't happen, but... */
- if (sp->sct_mobil > 127)
- sp->sct_mobil = 0;
-
- mil = getvar(V_MILIT, (s_char *)sp, EF_SECTOR);
- civs = getvar(V_CIVIL, (s_char *)sp, EF_SECTOR);
- if (sp->sct_own == sp->sct_oldown)
- loyalcivs = civs;
- else
- loyalcivs = 0;
-
- if (sp->sct_effic < 20) {
- if (sp->sct_type == SCT_BSPAN)
- knockdown(sp, 0);
- else if (sp->sct_type == SCT_BTOWER) {
- knockdown(sp, 0);
- bridgefall(sp, 0);
- }
- }
- if (sp->sct_own != 0 && !civs) {
- sp->sct_work = 100;
- sp->sct_oldown = sp->sct_own;
- }
- /* If they have a military unit there, they still own it */
- if (sp->sct_own && !loyalcivs && !(sp->sct_flags & MOVE_IN_PROGRESS)) {
- if (!mil && !has_units(sp->sct_x,sp->sct_y,sp->sct_own,0)) {
- /* more cruft! */
- if (sp->sct_type == SCT_CAPIT ||
- sp->sct_type == SCT_MOUNT)
- caploss(sp, sp->sct_own, "");
-
- if (sp->sct_oldown == sp->sct_own) {
- makelost(EF_SECTOR, sp->sct_own, 0, sp->sct_x, sp->sct_y);
- sp->sct_own = 0;
- sp->sct_oldown = 0;
- } else {
- /* if oldown gets his cap back make agri */
- if (sp->sct_oldown &&
- player->cnum == sp->sct_own &&
- sp->sct_type == SCT_CAPIT &&
- sp->sct_newtype == SCT_CAPIT)
- give_back_cap(sp);
- takeover(sp, sp->sct_oldown);
- }
- sp->sct_mobil = 0;
- }
- }
- if (!opt_DEFENSE_INFRA)
- sp->sct_defense = sp->sct_effic;
- return 1;
+ i_type i;
+
+ for (i = I_NONE + 1; i <= I_MAX; ++i) {
+ if (CANT_HAPPEN(item[i] < 0))
+ item[i] = 0;
+ else if (CANT_HAPPEN(item[i] > ITEM_MAX))
+ item[i] = ITEM_MAX;
+ }
}
int
-issector(s_char *arg)
-{
- s_char c;
-
- while (0 != (c = *arg++))
- if (!isdigit(c) && !isspace(c) && (c != '/'))
- return 1;
-
- return 0;
-}
-
-static void
-give_back_cap(struct sctstr *sp)
+issector(char *arg)
{
- struct natstr *natp = getnatp(sp->sct_oldown);
+ char c;
- if (xrel(natp,natp->nat_xcap) == xrel(natp,sp->sct_x) &&
- yrel(natp,natp->nat_ycap) == yrel(natp,sp->sct_y)) {
- sp->sct_newtype = SCT_AGRI;
- }
-}
-
-void
-sct_init(coord x, coord y, s_char *ptr)
-{
- struct sctstr *sp = (struct sctstr *) ptr;
+ while (0 != (c = *arg++))
+ if (!isdigit(c) && !isspace(c) && (c != '/'))
+ return 1;
- sp->ef_type = EF_SECTOR;
- sp->sct_x = x;
- sp->sct_y = y;
- sp->sct_dist_x = x;
- sp->sct_dist_y = y;
+ return 0;
}
projects / empserver / blobdiff