/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2004, Dave Pare, Jeff Bailey, Thomas Ruschak,
- * Ken Stevens, Steve McClure
+ * Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Ken Stevens, Steve McClure, Markus Armbruster
*
- * This program is free software; you can redistribute it and/or modify
+ * Empire is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* ---
*
- * 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.
*
* ---
*
* land.c: Land unit post-read and pre-write
- *
+ *
* Known contributors to this file:
* Steve McClure, 1996
+ * Markus Armbruster, 2004-2011
*/
-#include "misc.h"
-#include "player.h"
-#include "var.h"
+#include <config.h>
+
#include "file.h"
#include "land.h"
-#include "ship.h"
-#include "xy.h"
-#include "nat.h"
-#include "nsc.h"
-#include "plane.h"
-#include "prototypes.h"
+#include "lost.h"
+#include "misc.h"
#include "optlist.h"
+#include "player.h"
+#include "prototypes.h"
+#include "unit.h"
-int
-lnd_postread(int n, s_char *ptr)
+void
+lnd_postread(int n, void *ptr)
{
- struct lndstr *llp = (struct lndstr *)ptr;
- struct shpstr theship;
- struct lndstr theland;
+ struct lndstr *lp = ptr;
- if (llp->lnd_uid != n) {
+ if (lp->lnd_uid != n) {
logerror("lnd_postread: Error - %d != %d, zeroing.\n",
- llp->lnd_uid, n);
- memset(llp, 0, sizeof(struct lndstr));
- }
- if (llp->lnd_ship >= 0 && llp->lnd_own
- && llp->lnd_effic >= LAND_MINEFF) {
- if (getship(llp->lnd_ship, &theship)
- && (theship.shp_effic >= SHIP_MINEFF)) {
- /* wooof! Carriers are a pain */
- if (llp->lnd_mission) {
- /*
- * If the unit is on a mission centered
- * on it's loc, the op-area travels with
- * the unit.
- */
- if ((llp->lnd_opx == llp->lnd_x) &&
- (llp->lnd_opy == llp->lnd_y)) {
- llp->lnd_opx = theship.shp_x;
- llp->lnd_opy = theship.shp_y;
- }
- }
- if (llp->lnd_x != theship.shp_x || llp->lnd_y != theship.shp_y)
- time(&llp->lnd_timestamp);
- llp->lnd_x = theship.shp_x;
- llp->lnd_y = theship.shp_y;
- }
- }
- if (llp->lnd_land >= 0 && llp->lnd_own
- && llp->lnd_effic >= LAND_MINEFF) {
- if (getland(llp->lnd_land, &theland)
- && (theland.lnd_effic >= LAND_MINEFF)) {
- /* wooof! Carriers are a pain */
- if (llp->lnd_mission) {
- /*
- * If the unit is on a mission centered
- * on it's loc, the op-area travels with
- * the unit.
- */
- if ((llp->lnd_opx == llp->lnd_x) &&
- (llp->lnd_opy == llp->lnd_y)) {
- llp->lnd_opx = theland.lnd_x;
- llp->lnd_opy = theland.lnd_y;
- }
- }
- if (llp->lnd_x != theland.lnd_x || llp->lnd_y != theland.lnd_y)
- time(&llp->lnd_timestamp);
- llp->lnd_x = theland.lnd_x;
- llp->lnd_y = theland.lnd_y;
- }
+ lp->lnd_uid, n);
+ memset(lp, 0, sizeof(struct lndstr));
}
- if (opt_MOB_ACCESS)
- lnd_do_upd_mob(llp);
- player->owner = (player->god || llp->lnd_own == player->cnum);
- return 1;
+ if (opt_MOB_ACCESS)
+ lnd_do_upd_mob(lp);
+ player->owner = (player->god || lp->lnd_own == player->cnum);
}
-/*ARGSUSED*/
-int
-lnd_prewrite(int n, s_char *ptr)
+void
+lnd_prewrite(int n, void *old, void *new)
{
- struct lndstr *llp = (struct lndstr *)ptr;
- struct lndstr land;
- struct lndstr *lp;
- struct plnstr *pp;
- int i;
-
- llp->ef_type = EF_LAND;
- llp->lnd_uid = n;
-
- time(&llp->lnd_timestamp);
-
- if (llp->lnd_own && llp->lnd_effic < LAND_MINEFF) {
- makelost(EF_LAND, llp->lnd_own, llp->lnd_uid, llp->lnd_x,
- llp->lnd_y);
- llp->lnd_own = 0;
+ struct lndstr *oldlp = old;
+ struct lndstr *lp = new;
+ natid own = lp->lnd_effic < LAND_MINEFF ? 0 : lp->lnd_own;
+ int ship = lp->lnd_ship;
+ int land = lp->lnd_land;
- getland(n, &land);
+ /* Be careful with writing to *lp, in case oldlp == lp */
- for (i = 0; NULL != (lp = getlandp(i)); i++) {
- if (lp->lnd_own && lp->lnd_land == n) {
- mpr(lp->lnd_own, "%s MIA!\n", prland(lp));
- makelost(EF_LAND, lp->lnd_own, lp->lnd_uid, lp->lnd_x,
- lp->lnd_y);
- lp->lnd_own = 0;
- lp->lnd_effic = 0;
- lp->lnd_ship = -1;
- lp->lnd_land = -1;
- putland(lp->lnd_uid, lp);
- }
- }
- for (i = 0; NULL != (pp = getplanep(i)); i++) {
- if (pp->pln_own && pp->pln_land == n) {
- mpr(pp->pln_own, "%s MIA!\n", prplane(pp));
- makelost(EF_PLANE, pp->pln_own, pp->pln_uid, pp->pln_x,
- pp->pln_y);
- pp->pln_own = 0;
- pp->pln_effic = 0;
- pp->pln_ship = -1;
- pp->pln_land = -1;
- putplane(pp->pln_uid, pp);
- }
- }
- } else
- getland(n, &land);
+ if (!own) {
+ lp->lnd_effic = 0;
+ ship = land = -1;
+ }
+ item_prewrite(lp->lnd_item);
- return 1;
-}
+ if (CANT_HAPPEN(ship >= 0 && land >= 0))
+ land = -1;
+ if (oldlp->lnd_ship != ship)
+ lnd_carrier_change(lp, EF_SHIP, oldlp->lnd_ship, ship);
+ if (oldlp->lnd_land != land)
+ lnd_carrier_change(lp, EF_LAND, oldlp->lnd_land, land);
-void
-lnd_init(int n, s_char *ptr)
-{
- struct lndstr *lp = (struct lndstr *)ptr;
+ if (oldlp->lnd_own != own) {
+ lost_and_found(EF_LAND, oldlp->lnd_own, own,
+ lp->lnd_uid, lp->lnd_x, lp->lnd_y);
+ CANT_HAPPEN(!oldlp->lnd_own
+ && unit_update_cargo((struct empobj *)oldlp));
+ }
- lp->ef_type = EF_LAND;
- lp->lnd_uid = n;
- lp->lnd_own = 0;
+ lp->lnd_own = own;
+ lp->lnd_ship = ship;
+ lp->lnd_land = land;
+ if (!own || lp->lnd_x != oldlp->lnd_x || lp->lnd_y != oldlp->lnd_y)
+ unit_update_cargo((struct empobj *)lp);
}
-s_char *
+char *
prland(struct lndstr *lp)
{
return prbuf("%s #%d", lchr[(int)lp->lnd_type].l_name, lp->lnd_uid);