]> git.pond.sub.org Git - empserver/blob - src/lib/subs/sect.c
Set timestamp automatically on write
[empserver] / 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     bridge_damaged(sp, NULL);
72     checksect(sp);
73     getsect(sp->sct_x, sp->sct_y, &sect);
74     return 1;
75 }
76
77 void
78 item_prewrite(short *item)
79 {
80     i_type i;
81
82     for (i = I_NONE + 1; i <= I_MAX; ++i) {
83         if (CANT_HAPPEN(item[i] < 0))
84             item[i] = 0;
85         else if (CANT_HAPPEN(item[i] > ITEM_MAX))
86             item[i] = ITEM_MAX;
87     }
88 }
89
90 static int
91 checksect(struct sctstr *sp)
92 {
93     int mil, civs, loyalcivs;
94
95     item_prewrite(sp->sct_item);
96
97     /* shouldn't happen, but... */
98     if (sp->sct_mobil > 127)
99         sp->sct_mobil = 0;
100
101     mil = sp->sct_item[I_MILIT];
102     civs = sp->sct_item[I_CIVIL];
103     if (sp->sct_own == sp->sct_oldown)
104         loyalcivs = civs;
105     else
106         loyalcivs = 0;
107
108     if (sp->sct_own != 0 && !civs) {
109         sp->sct_work = 100;
110         sp->sct_oldown = sp->sct_own;
111     }
112     /* If they have a military unit there, they still own it */
113     if (sp->sct_own && !loyalcivs && !(sp->sct_flags & MOVE_IN_PROGRESS)) {
114         if (!mil && !has_units(sp->sct_x, sp->sct_y, sp->sct_own, 0)) {
115             /* more cruft! */
116             if (sp->sct_type == SCT_CAPIT || sp->sct_type == SCT_MOUNT)
117                 caploss(sp, sp->sct_own, "");
118
119             if (sp->sct_oldown == sp->sct_own) {
120                 makelost(EF_SECTOR, sp->sct_own, 0, sp->sct_x, sp->sct_y);
121                 sp->sct_own = 0;
122                 sp->sct_oldown = 0;
123             } else
124                 takeover(sp, sp->sct_oldown);
125             sp->sct_mobil = 0;
126         }
127     }
128     return 1;
129 }
130
131 int
132 issector(char *arg)
133 {
134     char c;
135
136     while (0 != (c = *arg++))
137         if (!isdigit(c) && !isspace(c) && (c != '/'))
138             return 1;
139
140     return 0;
141 }