]> git.pond.sub.org Git - empserver/blob - src/lib/subs/rej.c
Make setrel() refuse to change relations to self
[empserver] / src / lib / subs / rej.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2010, 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  *  rej.c: Various relations setting routines
29  *
30  *  Known contributors to this file:
31  *     Dave Pare, 1994
32  */
33
34 #include <config.h>
35
36 #include "file.h"
37 #include "nat.h"
38 #include "news.h"
39 #include "optlist.h"
40 #include "player.h"
41 #include "prototypes.h"
42 #include "server.h"
43
44 void
45 setrel(natid us, natid them, int rel)
46 {
47     struct natstr *mynp = getnatp(us);
48     struct natstr *themnp = getnatp(them);
49     char *myname = cname(us);
50     char *themname;
51     int oldrel;
52     char *whichway;
53     int n_up = 0;
54     int n_down = 0;
55     char *addendum = NULL;
56
57     if (CANT_HAPPEN(rel < AT_WAR))
58         rel = AT_WAR;
59     if (CANT_HAPPEN(rel > ALLIED))
60         rel = ALLIED;
61     if (CANT_HAPPEN(!mynp || !themnp))
62         return;
63     if (us == them)
64         return;
65     oldrel = getrel(mynp, them);
66     if (oldrel == rel)
67         return;
68     themname = cname(them);
69     if (rel > oldrel)
70         whichway = "upgraded";
71     else
72         whichway = "downgraded";
73     if (rel == ALLIED) {
74         addendum = "Congratulations!";
75         n_up = N_DECL_ALLY;
76     } else if (rel == FRIENDLY) {
77         n_up = N_UP_FRIENDLY;
78         n_down = N_DOWN_FRIENDLY;
79     } else if (rel == NEUTRAL) {
80         n_up = N_UP_NEUTRAL;
81         n_down = N_DOWN_NEUTRAL;
82     } else if (rel == HOSTILE) {
83         addendum = "Another cold war...";
84         n_up = N_UP_HOSTILE;
85         n_down = N_DOWN_HOSTILE;
86     } else if (rel < HOSTILE) {
87         addendum = "Declaration made (give 'em hell).";
88         n_down = N_DECL_WAR;
89     }
90
91     if (addendum && us == player->cnum && !update_running)
92         pr("%s\n", addendum);
93     mpr(us, "Diplomatic relations with %s %s to \"%s\".\n",
94         themname, whichway, relates[rel]);
95     if (!(getrejects(us, themnp) & REJ_TELE))
96         mpr(them,
97             "Country %s (#%d) has %s their relations with you to \"%s\"!\n",
98             myname, us, whichway, relates[rel]);
99
100     putrel(mynp, them, rel);
101     putnat(mynp);
102
103     if (!player->god) {
104         if (oldrel == ALLIED)
105             nreport(us, N_DIS_ALLY, them, 1);
106         else if (oldrel < HOSTILE && rel >= HOSTILE)
107             nreport(us, N_DIS_WAR, them, 1);
108         if (rel > oldrel)
109             nreport(us, n_up, them, 1);
110         else
111             nreport(us, n_down, them, 1);
112     }
113     if (opt_HIDDEN)
114         setcont(them, us, FOUND_TELE);
115 }
116
117 void
118 setcont(natid us, natid them, int contact)
119 {
120     struct natstr *np = getnatp(us);
121
122     if (CANT_HAPPEN(!np))
123         return;
124     putcontact(np, them, contact);
125     putnat(np);
126 }
127
128 void
129 setrej(natid us, natid them, int how, int what)
130 {
131     struct natstr *np = getnatp(us);
132
133     if (CANT_HAPPEN(!np))
134         return;
135     putreject(np, them, how, what);
136     putnat(np);
137 }