]> git.pond.sub.org Git - empserver/blob - src/lib/player/login.c
Update copyright notice.
[empserver] / src / lib / player / login.c
1 /*
2  *  Empire - A multi-player, client/server Internet based war game.
3  *  Copyright (C) 1986-2004, 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  *  login.c: Allow the player to login
29  * 
30  *  Known contributors to this file:
31  *     Dave Pare, 1994
32  *     Steve McClure, 2000
33  */
34
35 #include <string.h>
36 #include "prototypes.h"
37 #include "misc.h"
38 #include "proto.h"
39 #include "player.h"
40 #include "com.h"
41 #include "empthread.h"
42 #include "empio.h"
43 #include "nsc.h"
44 #include "nat.h"
45 #include "optlist.h"
46 #include "file.h"
47 #include "subs.h"
48 #include "common.h"
49 #include "gen.h"
50
51 #ifdef aix
52 #include <unistd.h>
53 #endif /* aix */
54 #if !defined(_WIN32)
55 #include <netinet/in.h>
56 #endif
57 #include <errno.h>
58
59 extern struct cmndstr login_coms[];
60
61
62 /*ARGSUSED*/
63 void
64 player_login(void *ud)
65 {
66     s_char buf[128];
67     s_char space[128];
68     int ac;
69     int cmd;
70
71     player->proc = empth_self();
72
73     pr_id(player, C_INIT, "Empire server ready\n");
74
75     while (!io_eof(player->iop) && !io_error(player->iop)) {
76         io_output(player->iop, IO_WAIT);
77         if (io_gets(player->iop, buf, sizeof(buf)) < 0) {
78             io_input(player->iop, IO_WAIT);
79             continue;
80         }
81         ac = parse(buf, player->argp, NULL, space, NULL);
82         cmd = comtch(player->argp[0], login_coms, 0, 0);
83         if (cmd < 0) {
84             pr_id(player, C_BADCMD, "Command %s not found\n", player->argp[0]);
85             continue;
86         }
87         switch (login_coms[cmd].c_addr()) {
88         case RET_OK:
89             break;
90         case RET_FAIL:
91             break;
92         case RET_SYN:
93             pr_id(player, C_BADCMD, "Usage %s\n", login_coms[cmd].c_form);
94             break;
95         default:
96             break;
97         }
98         if (player->state >= PS_SHUTDOWN)
99             break;
100     }
101     player->state = PS_SHUTDOWN;
102     if (!io_eof(player->iop)) {
103         pr_player(player, C_EXIT, "so long...\n");
104         io_noblocking(player->iop, 0);
105         while (io_output(player->iop, IO_WAIT) > 0) ;
106     }
107     player_delete(player);
108     empth_exit();
109     /*NOTREACHED*/
110 }
111
112 static int
113 client_cmd(void)
114 {
115     int i;
116
117     if (!player->argp[1])
118         return RET_SYN;
119
120     for (i = 1; player->argp[i]; ++i) {
121         if (i > 1)
122             strncat(player->client, " ", sizeof(player->client) - 1);
123         strncat(player->client, player->argp[i], sizeof(player->client) - 1);
124     }
125     player->client[sizeof(player->client) - 1] = '\0';
126     pr_id(player, C_CMDOK, "talking to %s\n", player->client);
127     return RET_OK;
128 }
129
130 static int
131 user_cmd(void)
132 {
133     if (!player->argp[1])
134         return RET_SYN;
135     strncpy(player->userid, player->argp[1], sizeof(player->userid) - 1);
136     player->userid[sizeof(player->userid) - 1] = '\0';
137     pr_id(player, C_CMDOK, "hello %s\n", player->userid);
138     return RET_OK;
139 }
140
141 static int
142 sanc_cmd(void)
143 {
144     struct nstr_item ni;
145     struct natstr nat;
146     int first = 1;
147
148     if (!opt_BLITZ) {
149         pr_id(player, C_BADCMD, "Command %s not found\n", player->argp[0]);
150         return RET_FAIL;
151     }
152
153     snxtitem_all(&ni, EF_NATION);
154     while (nxtitem(&ni, (s_char *)&nat)) {
155         if (nat.nat_stat != (STAT_INUSE | STAT_SANCT))
156             continue;
157         if (first) {
158             pr_id(player, C_DATA,
159                   "The following countries are still in sanctuary:\n");
160             first = 0;
161         }
162         pr_id(player, C_DATA, "%s\n", nat.nat_cnam);
163     }
164     if (first)
165         pr_id(player, C_CMDOK, "There are no countries in sanctuary\n");
166     else
167         pr_id(player, C_CMDOK, "\n");
168     return RET_OK;
169 }
170
171 static int
172 coun_cmd(void)
173 {
174     natid cnum;
175
176     if (!player->argp[1])
177         return RET_SYN;
178     if (natbyname(player->argp[1], &cnum) < 0) {
179         pr_id(player, C_CMDERR, "country %s does not exist\n", player->argp[1]);
180         return 0;
181     }
182     player->cnum = cnum;
183     player->validated = 0;
184     pr_id(player, C_CMDOK, "country name %s\n", player->argp[1]);
185     return 0;
186 }
187
188 static int
189 pass_cmd(void)
190 {
191     if (!player->argp[1])
192         return RET_SYN;
193     if (player->cnum == 255) {
194         pr_id(player, C_CMDERR, "need country first\n");
195         return RET_FAIL;
196     }
197     if (!natpass(player->cnum, player->argp[1])) {
198         pr_id(player, C_CMDERR, "password bad, logging entry\n");
199         logerror("%s tried country #%d with %s",
200                  praddr(player), player->cnum, player->argp[1]);
201         return RET_FAIL;
202     }
203     player->validated++;
204     pr_id(player, C_CMDOK, "password ok\n");
205     logerror("%s using country #%d", praddr(player), player->cnum);
206     return RET_OK;
207 }
208
209 static int
210 play_cmd(void)
211 {
212     struct player *other;
213     natid cnum;
214     struct natstr *natp;
215     char **ap;
216
217     ap = player->argp;
218     if (*++ap) {
219         strncpy(player->userid, *ap, sizeof(player->userid) - 1);
220         player->userid[sizeof(player->userid) - 1] = '\0';
221         player->validated = 0;
222     }
223     if (*++ap) {
224         if (natbyname(*ap, &cnum) < 0) {
225             pr_id(player, C_CMDERR, "country %s does not exist\n", *ap);
226             return 0;
227         }
228     }
229     if (*++ap) {
230         if (!natpass(cnum, *ap)) {
231             pr_id(player, C_CMDERR, "password bad, logging entry\n");
232             logerror("%s tried country #%d with %s",
233                      praddr(player), cnum, *ap);
234             return RET_FAIL;
235         }
236         player->cnum = cnum;
237         player->validated++;
238     }
239     if (player->cnum == 255 || !player->validated) {
240         pr_id(player, C_CMDERR, "need country and password\n");
241         return RET_FAIL;
242     }
243     if ((other = player_find_other(player, (natid)player->cnum)) != 0) {
244         natp = getnatp(player->cnum);
245         if (natp->nat_stat != VIS) {
246             pr_id(player, C_EXIT, "country in use by %s\n", praddr(other));
247         } else {
248             pr_id(player, C_EXIT, "country in use\n");
249         }
250         return RET_FAIL;
251     }
252     if (match_user(banfil, player)) {
253         logerror("Attempted login by BANNED host %s", praddr(player));
254         pr("Your login has been banned from this game\n");
255         io_shutdown(player->iop, IO_READ);
256         return RET_FAIL;
257     }
258     player_main(player);
259     player->state = PS_SHUTDOWN;
260     return RET_OK;
261 }
262
263 static int
264 kill_cmd(void)
265 {
266     struct player *other;
267
268     if (player->cnum == 255 || !player->validated) {
269         pr_id(player, C_CMDERR, "need country and password\n");
270         return RET_FAIL;
271     }
272     /* XXX find cnum other than us */
273     if ((other = player_find_other(player, player->cnum)) == 0) {
274         pr_id(player, C_EXIT, "country not in use\n");
275         return RET_FAIL;
276     }
277     io_shutdown(other->iop, IO_READ | IO_WRITE);
278     pr_id(player, C_EXIT, "closed socket of offending job\n");
279     return RET_OK;
280 }
281
282 static int
283 list_cmd(void)
284 {
285     struct player *lp;
286     int first = 1;
287
288     if (player->cnum != 0 || !player->validated) {
289         pr_id(player, C_CMDERR, "Permission denied\n");
290         return 0;
291     }
292     for (lp = player_next(0); lp != 0; lp = player_next(lp)) {
293         if (first) {
294             pr_id(player, C_DATA, "user@host\tcountry\tpid\n");
295             first = 0;
296         }
297         pr_id(player, C_DATA, "%s\t%d\n", praddr(lp), lp->cnum);
298     }
299     if (first == 0)
300         pr_id(player, C_DATA, "\n");
301     return 0;
302 }
303
304 static int
305 quit_cmd(void)
306 {
307     pr_id(player, C_EXIT, "so long\n");
308     io_shutdown(player->iop, IO_READ);
309     return RET_OK;
310 }
311
312 struct cmndstr login_coms[] = {
313     {"list", 0, list_cmd, 0, 0},
314     {"client clientname [version info]", 0, client_cmd, 0, 0},
315     {"user username", 0, user_cmd, 0, 0},
316     {"sanc", 0, sanc_cmd, 0, 0},
317     {"coun countryname", 0, coun_cmd, 0, 0},
318     {"pass password", 0, pass_cmd, 0, 0},
319     {"play [user country pass]", 0, play_cmd, 0, 0},
320     {"quit ", 0, quit_cmd, 0, 0},
321     {"kill {self}", 0, kill_cmd, 0, 0},
322     {0, 0, 0, 0, 0}
323 };