]> git.pond.sub.org Git - empserver/blob - src/lib/subs/actofgod.c
actofgod: Factor divine_sct_change() out of edit.c
[empserver] / src / lib / subs / actofgod.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2013, Dave Pare, Jeff Bailey, Thomas Ruschak,
4  *                Ken Stevens, Steve McClure, Markus Armbruster
5  *
6  *  Empire 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 3 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, see <http://www.gnu.org/licenses/>.
18  *
19  *  ---
20  *
21  *  See files README, COPYING and CREDITS in the root of the source
22  *  tree for related information and legal notices.  It is expected
23  *  that future projects/authors will amend these files as needed.
24  *
25  *  ---
26  *
27  *  actofgod.c: Deity meddling subroutines
28  *
29  *  Known contributors to this file:
30  *     Markus Armbruster, 2013
31  */
32
33 #include <config.h>
34
35 #include <stdarg.h>
36 #include "actofgod.h"
37 #include "file.h"
38 #include "news.h"
39 #include "optlist.h"
40 #include "player.h"
41 #include "prototypes.h"
42 #include "sect.h"
43
44 static void
45 nreport_divine_aid(natid whom, int goodness)
46 {
47     if (opt_GODNEWS && getnatp(whom)->nat_stat != STAT_GOD && goodness)
48         nreport(player->cnum, goodness > 0 ? N_AIDS : N_HURTS, whom, 1);
49 }
50
51 void
52 report_god_takes(char *prefix, char *what, natid from)
53 {
54     if (from && from != player->cnum) {
55         wu(0, from, "%s%s taken from you by an act of %s!\n",
56            prefix, what, cname(player->cnum));
57         nreport_divine_aid(from, -1);
58     }
59 }
60
61 void
62 report_god_gives(char *prefix, char *what, natid to)
63 {
64     if (to && to != player->cnum) {
65         wu(0, to, "%s%s given to you by an act of %s!\n",
66            prefix, what, cname(player->cnum));
67         nreport_divine_aid(to, 1);
68     }
69 }
70
71 /*
72  * Report deity meddling with sector SP.
73  * Print a message (always), send a bulletin to the sector owner and
74  * report news (sometimes).
75  * NAME names what is being changed in the sector.
76  * If CHANGE is zero, the meddling is a no-op (bulletin suppressed).
77  * If a bulletin is sent, report N_AIDS news for positive GOODNESS,
78  * N_HURTS news for negative GOODNESS
79  * The bulletin's text is like "NAME of sector X,Y changed <how> by an
80  * act of <deity>, where <deity> is the deity's name, and <how> comes
81  * from formatting printf-style FMT with optional arguments.
82  */
83 void
84 divine_sct_change(struct sctstr *sp, char *name,
85                   int change, int goodness, char *fmt, ...)
86 {
87     va_list ap;
88     char buf[4096];
89
90     va_start(ap, fmt);
91     vsnprintf(buf, sizeof(buf), fmt, ap);
92     va_end(ap);
93
94     pr("%s of %s changed %s\n",
95        name, xyas(sp->sct_x, sp->sct_y, player->cnum), buf);
96     if (change && sp->sct_own && sp->sct_own != player->cnum) {
97         wu(0, sp->sct_own, "%s of %s changed %s by an act of %s\n",
98            name, xyas(sp->sct_x, sp->sct_y, sp->sct_own),
99            buf, cname(player->cnum));
100         nreport_divine_aid(sp->sct_own, goodness);
101     }
102 }