git.pond.sub.org Git - empserver/blob - src/lib/subs/sect.c

   1 /*
   2  *  Empire - A multi-player, client/server Internet based war game.
   3  *  Copyright (C) 1986-2008, Dave Pare, Jeff Bailey, Thomas Ruschak,
   4  *                           Ken Stevens, Steve McClure
   5  *
   6  *  This program is free software; you can redistribute it and/or modify
   7  *  it under the terms of the GNU General Public License as published by
   8  *  the Free Software Foundation; either version 2 of the License, or
   9  *  (at your option) any later version.
  10  *
  11  *  This program is distributed in the hope that it will be useful,
  12  *  but WITHOUT ANY WARRANTY; without even the implied warranty of
  13  *  MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  14  *  GNU General Public License for more details.
  15  *
  16  *  You should have received a copy of the GNU General Public License
  17  *  along with this program; if not, write to the Free Software
  18  *  Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
  19  *
  20  *  ---
  21  *
  22  *  See files README, COPYING and CREDITS in the root of the source
  23  *  tree for related information and legal notices.  It is expected
  24  *  that future projects/authors will amend these files as needed.
  25  *
  26  *  ---
  27  *
  28  *  sect.c: Sector pre-write and post-read data massage
  29  *
  30  *  Known contributors to this file:
  31  *     Dave Pare, 1989
  32  *     Steve McClure, 1996
  33  */
  34
  35 #include <config.h>
  36
  37 #include <ctype.h>
  38 #include "file.h"
  39 #include "land.h"
  40 #include "lost.h"
  41 #include "misc.h"
  42 #include "nat.h"
  43 #include "nsc.h"
  44 #include "optlist.h"
  45 #include "plane.h"
  46 #include "player.h"
  47 #include "prototypes.h"
  48 #include "sect.h"
  49 #include "xy.h"
  50
  51 static int checksect(struct sctstr *);
  52
  53 int
  54 sct_postread(int id, void *ptr)
  55 {
  56     struct sctstr *sp = ptr;
  57
  58     checksect(sp);
  59     player->owner = (player->god || sp->sct_own == player->cnum);
  60     if (opt_MOB_ACCESS)
  61         sct_do_upd_mob(sp);
  62     return 1;
  63 }
  64
  65 int
  66 sct_prewrite(int id, void *ptr)
  67 {
  68     struct sctstr *sp = ptr;
  69     struct sctstr sect;
  70
  71     time(&sp->sct_timestamp);
  72
  73     checksect(sp);
  74     getsect(sp->sct_x, sp->sct_y, &sect);
  75     return 1;
  76 }
  77
  78 void
  79 item_prewrite(short *item)
  80 {
  81     i_type i;
  82
  83     for (i = I_NONE + 1; i <= I_MAX; ++i) {
  84         if (CANT_HAPPEN(item[i] < 0))
  85             item[i] = 0;
  86         else if (CANT_HAPPEN(item[i] > ITEM_MAX))
  87             item[i] = ITEM_MAX;
  88     }
  89 }
  90
  91 static int
  92 checksect(struct sctstr *sp)
  93 {
  94     int mil, civs, loyalcivs;
  95
  96     item_prewrite(sp->sct_item);
  97
  98     /* shouldn't happen, but... */
  99     if (sp->sct_mobil > 127)
 100         sp->sct_mobil = 0;
 101
 102     mil = sp->sct_item[I_MILIT];
 103     civs = sp->sct_item[I_CIVIL];
 104     if (sp->sct_own == sp->sct_oldown)
 105         loyalcivs = civs;
 106     else
 107         loyalcivs = 0;
 108
 109     if (sp->sct_effic < SCT_MINEFF) {
 110         if (sp->sct_type == SCT_BSPAN)
 111             knockdown(sp, 0);
 112         else if (sp->sct_type == SCT_BTOWER) {
 113             knockdown(sp, 0);
 114             bridgefall(sp, 0);
 115         }
 116     }
 117     if (sp->sct_own != 0 && !civs) {
 118         sp->sct_work = 100;
 119         sp->sct_oldown = sp->sct_own;
 120     }
 121     /* If they have a military unit there, they still own it */
 122     if (sp->sct_own && !loyalcivs && !(sp->sct_flags & MOVE_IN_PROGRESS)) {
 123         if (!mil && !has_units(sp->sct_x, sp->sct_y, sp->sct_own, 0)) {
 124             /* more cruft! */
 125             if (sp->sct_type == SCT_CAPIT || sp->sct_type == SCT_MOUNT)
 126                 caploss(sp, sp->sct_own, "");
 127
 128             if (sp->sct_oldown == sp->sct_own) {
 129                 makelost(EF_SECTOR, sp->sct_own, 0, sp->sct_x, sp->sct_y);
 130                 sp->sct_own = 0;
 131                 sp->sct_oldown = 0;
 132             } else
 133                 takeover(sp, sp->sct_oldown);
 134             sp->sct_mobil = 0;
 135         }
 136     }
 137     return 1;
 138 }
 139
 140 int
 141 issector(char *arg)
 142 {
 143     char c;
 144
 145     while (0 != (c = *arg++))
 146         if (!isdigit(c) && !isspace(c) && (c != '/'))
 147             return 1;
 148
 149     return 0;
 150 }