/*
* Empire - A multi-player, client/server Internet based war game.
- * Copyright (C) 1986-2004, Dave Pare, Jeff Bailey, Thomas Ruschak,
- * Ken Stevens, Steve McClure
+ * Copyright (C) 1986-2017, Dave Pare, Jeff Bailey, Thomas Ruschak,
+ * Ken Stevens, Steve McClure, Markus Armbruster
*
- * This program is free software; you can redistribute it and/or modify
+ * Empire is free software: you can redistribute it and/or modify
* it under the terms of the GNU General Public License as published by
- * the Free Software Foundation; either version 2 of the License, or
+ * the Free Software Foundation, either version 3 of the License, or
* (at your option) any later version.
*
* This program is distributed in the hope that it will be useful,
* GNU General Public License for more details.
*
* You should have received a copy of the GNU General Public License
- * along with this program; if not, write to the Free Software
- * Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
+ * along with this program. If not, see <http://www.gnu.org/licenses/>.
*
* ---
*
- * See the "LEGAL", "LICENSE", "CREDITS" and "README" files for all the
- * related information and legal notices. It is expected that any future
- * projects/authors will amend these files as needed.
+ * See files README, COPYING and CREDITS in the root of the source
+ * tree for related information and legal notices. It is expected
+ * that future projects/authors will amend these files as needed.
*
* ---
*
* accept.c: Keep track of people logged in
- *
+ *
* Known contributors to this file:
* Dave Pare, 1994
+ * Markus Armbruster, 2005-2014
*/
-#include "prototypes.h"
-#include "misc.h"
-#include "proto.h"
-#include "empthread.h"
-#include "player.h"
-#include "file.h"
-#include "empio.h"
-#include "power.h"
-#include "gen.h"
-#include "optlist.h"
+#include <config.h>
-#if !defined(_WIN32)
-#include <arpa/inet.h>
+#include <errno.h>
+#include <stdio.h>
+#include <sys/types.h>
#include <sys/socket.h>
-#include <sys/wait.h>
-#include <sys/time.h>
-#include <netdb.h>
#include <netinet/in.h>
-#include <sys/ioctl.h>
+#include <arpa/inet.h>
+#include <netdb.h>
#include <unistd.h>
-#else
-#include <winsock2.h>
-#endif
-#include <signal.h>
-#include <errno.h>
-#include <fcntl.h>
-#include <stdlib.h>
-#include <stdio.h>
-struct emp_qelem Players;
+#include "empio.h"
+#include "empthread.h"
+#include "misc.h"
+#include "nat.h"
+#include "optlist.h"
+#include "player.h"
+#include "prototypes.h"
+
+static struct emp_qelem Players;
+static int player_socket;
+static size_t player_addrlen;
+
+static const char *sockaddr_ntop(struct sockaddr *, char *, size_t);
void
player_init(void)
{
emp_initque(&Players);
init_player_commands();
+
+ player_socket = tcp_listen(*listen_addr ? listen_addr : NULL,
+ loginport, &player_addrlen);
}
struct player *
-player_new(int s, struct sockaddr_in *sin)
+player_new(int s)
{
struct player *lp;
-#ifdef RESOLVE_IPADDRESS
- struct hostent *hostp;
-#endif
- lp = (struct player *)malloc(sizeof(struct player));
+ lp = malloc(sizeof(struct player));
if (!lp)
- return NULL;
+ return NULL;
memset(lp, 0, sizeof(struct player));
- if (sin) {
+ if (s >= 0) {
/* real player, not dummy created by update and market update */
- lp->iop = io_open(s,
- IO_READ | IO_WRITE | IO_NBLOCK,
- IO_BUFSIZE, 0, 0);
+ lp->iop = io_open(s, IO_READ | IO_WRITE, IO_BUFSIZE);
if (!lp->iop) {
free(lp);
return NULL;
}
emp_insque(&lp->queue, &Players);
- strcpy(lp->hostaddr, inet_ntoa(sin->sin_addr));
-#ifdef RESOLVE_IPADDRESS
- if (NULL !=
- (hostp =
- gethostbyaddr((char *)&sin->sin_addr, sizeof(sin->sin_addr),
- AF_INET)))
- strcpy(lp->hostname, hostp->h_name);
-#endif /* RESOLVE_IPADDRESS */
- lp->cnum = 255;
+ lp->cnum = NATID_BAD;
+ lp->may_sleep = PLAYER_SLEEP_FREELY;
lp->curid = -1;
time(&lp->curup);
}
{
struct player *back;
- back = (struct player *)lp->queue.q_back;
- if (back)
- emp_remque(&lp->queue);
if (lp->iop) {
/* it's a real player */
- io_close(lp->iop);
- lp->iop = 0;
+ io_close(lp->iop, player->curup + login_grace_time);
+ lp->iop = NULL;
}
- free((s_char *)lp);
+ back = (struct player *)lp->queue.q_back;
+ if (back)
+ emp_remque(&lp->queue);
+ free(lp);
/* XXX may need to free bigmap here */
return back;
}
struct player *
player_next(struct player *lp)
{
- if (lp == 0)
+ if (!lp)
lp = (struct player *)Players.q_forw;
else
lp = (struct player *)lp->queue.q_forw;
if (&lp->queue == &Players)
- return 0;
+ return NULL;
return lp;
}
struct player *
player_prev(struct player *lp)
{
- if (lp == 0)
+ if (!lp)
lp = (struct player *)Players.q_back;
else
lp = (struct player *)lp->queue.q_back;
if (&lp->queue == &Players)
- return 0;
+ return NULL;
return lp;
}
+/*
+ * Return player in state PS_PLAYING for @cnum.
+ */
struct player *
getplayer(natid cnum)
{
- register struct emp_qelem *qp;
+ struct emp_qelem *qp;
+ struct player *pl;
- for (qp = Players.q_forw; qp != &Players; qp = qp->q_forw)
- if (((struct player *)qp)->cnum == cnum)
- return (struct player *)qp;
-
- return 0;
-}
-
-struct player *
-player_find_other(struct player *us, register natid cnum)
-{
- register struct emp_qelem *qp;
-
- for (qp = Players.q_forw; qp != &Players; qp = qp->q_forw)
- if (((struct player *)qp)->cnum == cnum &&
- ((struct player *)qp != us) &&
- (((struct player *)qp)->state == PS_PLAYING))
- return (struct player *)qp;
-
-
- return 0;
-}
-
-void
-player_wakeup_all(natid cnum)
-{
- register struct player *lp;
+ for (qp = Players.q_forw; qp != &Players; qp = qp->q_forw) {
+ pl = (struct player *)qp;
+ if (pl->cnum == cnum && pl->state == PS_PLAYING)
+ return pl;
+ }
- if (NULL != (lp = getplayer(cnum)))
- player_wakeup(lp);
+ return NULL;
}
-void
-player_wakeup(struct player *pl)
+time_t
+player_io_deadline(struct player *pl, int write)
{
- if (pl->waiting)
- empth_wakeup(pl->proc);
+ if (pl->may_sleep < (write ? PLAYER_SLEEP_FREELY : PLAYER_SLEEP_ON_INPUT))
+ return 0;
+ if (pl->state != PS_PLAYING)
+ return pl->curup + login_grace_time;
+ return pl->curup
+ + minutes(pl->nstat & NONVIS ? max_idle: max_idle_visitor);
}
/*ARGSUSED*/
void
player_accept(void *unused)
{
- struct sockaddr_in sin;
- struct servent *sp;
- int s;
- short port;
- int val;
+ static int conn_cnt;
+ struct sockaddr *sap;
struct player *np;
- int len;
+ socklen_t len;
+ const char *p;
int ns;
int set = 1;
- int stacksize;
char buf[128];
- player_init();
- sp = getservbyname("empire", "tcp");
- if (sp == 0)
- port = htons(atoi(loginport));
- else
- port = sp->s_port;
- sin.sin_addr.s_addr = INADDR_ANY;
- sin.sin_port = port;
- sin.sin_family = AF_INET;
- if ((s = socket(AF_INET, SOCK_STREAM, 0)) < 0) {
- logerror("inet socket create");
- exit(1);
- }
- val = 1;
-#if !(defined(__linux__) && defined(__alpha__))
- if (setsockopt(s, SOL_SOCKET, SO_REUSEADDR, (char *)&val, sizeof(val))
- < 0) {
- logerror("inet socket setsockopt SO_REUSEADDR (%d)", errno);
- exit(1);
- }
-#else
- logerror("Alpha/Linux? You don't support SO_REUSEADDR yet, do you?\n");
-#endif
- if (bind(s, (struct sockaddr *)&sin, sizeof(sin)) < 0) {
- logerror("inet socket bind");
- exit(1);
- }
-#ifdef LISTENMAXCONN /* because someone in linux world didn't want to use
- * SOMAXCONN as defined in the header files... */
- if (listen(s, LISTENMAXCONN) < 0) {
- logerror("inet socket listen");
- exit(1);
+ /* auto sockaddr_storage would be simpler, but less portable */
+ sap = malloc(player_addrlen);
+ len = player_addrlen;
+ if (getsockname(player_socket, sap, &len)) {
+ logerror("getsockname() failed: %s", strerror(errno));
+ p = NULL;
+ } else {
+ p = sockaddr_ntop(sap, buf, sizeof(buf));
+ CANT_HAPPEN(!p);
}
-#else
- if (listen(s, SOMAXCONN) < 0) {
- logerror("inet socket listen");
- exit(1);
- }
-#endif
+ logerror("Listening on %s", p ? buf : "unknown address");
+
while (1) {
- empth_select(s, EMPTH_FD_READ);
- len = sizeof(sin);
- ns = accept(s, (struct sockaddr *)&sin, &len);
+ empth_select(player_socket, EMPTH_FD_READ, NULL);
+ len = player_addrlen;
+ ns = accept(player_socket, sap, &len);
+ /* FIXME accept() can block on some systems (RST after select() reports ready) */
if (ns < 0) {
logerror("new socket accept");
continue;
}
- (void)setsockopt(ns, SOL_SOCKET, SO_KEEPALIVE,
- (char *)&set, sizeof(set));
- np = player_new(ns, &sin);
+ (void)setsockopt(ns, SOL_SOCKET, SO_KEEPALIVE, &set, sizeof(set));
+ np = player_new(ns);
if (!np) {
logerror("can't create player for fd %d", ns);
- close(ns);
- continue;
- }
- /* XXX may not be big enough */
- stacksize = 100000
-/* budget */ + max(WORLD_X * WORLD_Y / 2 * sizeof(int) * 7,
-/* power */ MAXNOC * sizeof(struct powstr));
- sprintf(buf, "Player (fd #%d)", ns);
- empth_create(PP_PLAYER, player_login, stacksize,
- 0, buf, "Empire player", np);
+ close(ns);
+ continue;
+ }
+ if (!sockaddr_ntop(sap, np->hostaddr, sizeof(np->hostaddr))) {
+ CANT_REACH();
+ player_delete(np);
+ continue;
+ }
+ logerror("Connect from %s", np->hostaddr);
+ sprintf(buf, "Conn%d", conn_cnt++);
+ empth_create(player_login, 1024 * 1024, 0, buf, np);
}
}
+
+static const char *
+sockaddr_ntop(struct sockaddr *sap, char *buf, size_t bufsz)
+{
+#ifdef HAVE_GETADDRINFO
+ /* Assumes that if you got getaddrinfo(), you got inet_ntop() too */
+ sa_family_t af = sap->sa_family;
+ void *addr;
+ struct sockaddr_in6 *sap6;
+
+ if (af == AF_INET)
+ addr = &((struct sockaddr_in *)sap)->sin_addr;
+ else {
+ sap6 = (struct sockaddr_in6 *)sap;
+ addr = &sap6->sin6_addr;
+ if (IN6_IS_ADDR_V4MAPPED(&sap6->sin6_addr)) {
+ af = AF_INET;
+ addr = sap6->sin6_addr.s6_addr + 12;
+ }
+ }
+ return inet_ntop(af, addr, buf, bufsz);
+#else
+ const char *p;
+
+ p = inet_ntoa(((struct sockaddr_in *)sap)->sin_addr);
+ if (strlen(p) >= bufsz) {
+ errno = ENOSPC;
+ return NULL;
+ }
+ return strcpy(buf, p);
+#endif
+}