]> git.pond.sub.org Git - empserver/blob - src/lib/subs/nuke.c
Include config.h.
[empserver] / src / lib / subs / nuke.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2005, 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 the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
23  *  related information and legal notices. It is expected that any future
24  *  projects/authors will amend these files as needed.
25  *
26  *  ---
27  *
28  *  nuke.c: Nuke post-read and pre-write 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 "misc.h"
38 #include "player.h"
39 #include "nuke.h"
40 #include "sect.h"
41 #include "xy.h"
42 #include "nsc.h"
43 #include "file.h"
44 #include "nat.h"
45 #include "prototypes.h"
46
47 /*ARGSUSED*/
48 int
49 nuk_postread(int n, s_char *ptr)
50 {
51     struct nukstr *np = (struct nukstr *)ptr;
52
53     if (np->nuk_uid != n) {
54         logerror("nuk_postread: Error - %d != %d, zeroing.\n", np->nuk_uid,
55                  n);
56         memset(np, 0, sizeof(struct nukstr));
57     }
58     player->owner = (player->god || np->nuk_own == player->cnum);
59     return 1;
60 }
61
62 /*ARGSUSED*/
63 int
64 nuk_prewrite(int n, s_char *ptr)
65 {
66     struct nukstr *np = (struct nukstr *)ptr;
67     struct nukstr nuke;
68
69     np->ef_type = EF_NUKE;
70     np->nuk_uid = n;
71
72     time(&np->nuk_timestamp);
73
74     getnuke(n, &nuke);
75
76     return 1;
77 }
78
79 void
80 nuk_init(int n, s_char *ptr)
81 {
82     struct nukstr *np = (struct nukstr *)ptr;
83
84     np->ef_type = EF_NUKE;
85     np->nuk_uid = n;
86     np->nuk_own = 0;
87 }
88
89 void
90 nuk_add(coord x, coord y, int type, int num)
91 {
92     struct nukstr nuke;
93     struct sctstr sect;
94     int nuk_uid;
95     natid own;
96     int n;
97
98     /* getsect in case of world wraparound */
99     getsect(x, y, &sect);
100     if (!(own = sect.sct_own))
101         return;
102     x = sect.sct_x;
103     y = sect.sct_y;
104
105     /*
106      * either find a stockpile in x,y or add a new one
107      */
108     nuk_uid = -1;
109     for (n = 0; getnuke(n, &nuke); n++) {
110         if (nuke.nuk_own == own) {
111             if (nuke.nuk_x == x && nuke.nuk_y == y) {
112                 nuk_uid = n;
113                 break;
114             }
115         } else if (nuke.nuk_own == 0 && nuk_uid == -1)
116             nuk_uid = n;
117     }
118     if (nuk_uid == -1)
119         nuk_uid = n;
120     if (getnuke(nuk_uid, &nuke) == 0) {
121         ef_extend(EF_NUKE, 10);
122         memset(&nuke, 0, sizeof(struct nukstr));
123         nuke.nuk_uid = nuk_uid;
124     }
125     if (nuke.nuk_own == 0) {
126         nuke.nuk_ship = -1;
127         nuke.nuk_x = x;
128         nuke.nuk_y = y;
129         nuke.nuk_own = own;
130         makenotlost(EF_NUKE, nuke.nuk_own, nuke.nuk_uid, nuke.nuk_x,
131                     nuke.nuk_y);
132     }
133     nuke.nuk_types[type] += num;
134     nuke.nuk_n += num;
135
136     if (!putnuke(nuke.nuk_uid, &nuke))
137         pr("Problem with the nuclear stockpiles, tell the deity.\n");
138
139 }
140
141 void
142 nuk_delete(struct nukstr *np, int type, int num)
143 {
144     if (np->nuk_types[type] < num)
145         num = np->nuk_types[type];
146     np->nuk_types[type] -= num;
147     np->nuk_n -= num;
148     if (np->nuk_n <= 0) {
149         makelost(EF_NUKE, np->nuk_own, np->nuk_uid, np->nuk_x, np->nuk_y);
150         np->nuk_own = 0;
151     }
152     putnuke(np->nuk_uid, np);
153 }