server/socket/init.C

/*
 * This file is part of Crossfire TRT, the Multiplayer Online Role Playing Game.
 * 
 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
 * Copyright (©) 2001,2007 Mark Wedel
 * Copyright (©) 1992,2007 Frank Tore Johansen
 * 
 * Crossfire TRT 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 (at your option)
 * any later version.
 * 
 * This program is distributed in the hope that it will be useful, but
 * WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
 * or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
 * for more details.
 * 
 * You should have received a copy of the GNU General Public License along
 * with Crossfire TRT; if not, write to the Free Software Foundation, Inc. 51
 * Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
 * 
 * The authors can be reached via e-mail to <crossfire@schmorp.de>
 */

/**
 * \file
 * Socket general functions
 *
 * \date 2003-12-02
 *
 * Mainly deals with initialization and higher level socket
 * maintenance (checking for lost connections and if data has arrived.)
 * The reading of data is handled in ericserver.c
 */

#include <global.h>
#include <sproto.h>
#include <sys/types.h>
#include <sys/time.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <netinet/tcp.h>
#include <netinet/ip.h>
#include <netdb.h>

#include <unistd.h>
#include <arpa/inet.h>

#include <algorithm>

// use relatively small values, as we do not expect to receive much,
// and we do userspace write buffering
// 8kb limits throughput to roughly 66kb/s
#define SOCKET_RCVBUF  8192
#define SOCKET_SNDBUF 16384

sockvec clients;

/**
 * Initializes a connection. Really, it just sets up the data structure,
 * socket setup is handled elsewhere.  We do send a version to the
 * client.
 */
client::client (int fd, const char *peername)
: fd (fd), host (strdup (peername)),
  socket_ev (this, &client::socket_cb),
  cmd_ev    (this, &client::cmd_cb)
{
  refcnt_inc (); // the socket is an external reference

  mss = 1500 - 52; // 1500 typical ethernet frame, 66 typical tcp header overhead

  {
    struct linger linger_opt;

    linger_opt.l_onoff  = 0;
    linger_opt.l_linger = 0;

    if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
      LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
  }

  {
    int val;

#ifdef SO_RCVBUF
    val = SOCKET_RCVBUF;
    if (setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &val, sizeof (val)))
      LOG (llevError, "SO_RCVBUF: %s\n", strerror (errno));
#endif

#ifdef SO_SNDBUF
    val = SOCKET_SNDBUF;
    if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &val, sizeof (val)))
      LOG (llevError, "SO_SNDBUF: %s\n", strerror (errno));
#endif

#ifdef IP_TOS
    val = IPTOS_LOWDELAY;
    if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
      LOG (llevError, "IP_TOS: %s\n", strerror (errno));
#endif

#ifdef TCP_NODELAY
    val = 1;
    if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
      LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
#endif

    // set some very aggressive keepalive parameters
#ifdef TCP_KEEPIDLE
    val = 1;
    if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
      LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
#endif

#ifdef TCP_KEEPCNT
    val = 3;
    if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
      LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
#endif

#ifdef TCP_KEEPINTVL
    val = 1;
    if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
      LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
#endif

    // try to find the mss value in use
#ifdef TCP_MAXSEG
    socklen_t sl = sizeof (val);
    if (!getsockopt (fd, IPPROTO_TCP, TCP_MAXSEG, &val, &sl) && sl == sizeof (val))
      mss = val;
#endif
  }

  {
    int bufsize = 65535;          /*Supposed absolute upper limit */
    int oldbufsize;
    int buflen = sizeof (int);

    if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
      LOG (llevError, "InitConnection:  Error on fcntl.\n");

    if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1)
      oldbufsize = 0;

    if (oldbufsize < bufsize)
      if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
        LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);

    buflen = sizeof (oldbufsize);
    getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen);
  }

  state = ST_SETUP;
  mapmode = Map0Cmd;
  darkness = 1;
  mapx = 11;
  mapy = 11;
  itemcmd = 1;              /* Default is version item1 command */
  max_rate = 100000 / (1000000 / MAX_TIME); // ~1mbit is assumed per default

  /* Do this so we don't send a face command for the client for
   * this face.  Face 0 is sent to the client to say clear
   * face information.
   */
  faces_sent[0] = true;

  socket_ev.prio (PE_PRIO_NORMAL);
  socket_ev.fd (fd);
  socket_ev.poll (PE_R);

  cmd_ev.prio (PE_PRIO_NORMAL);

  // initialisation done, kick it!
  send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
  flush ();

  reset_stats ();

  clients.insert (this);
}

client::~client ()
{
  clients.erase (this);

  free (stats.range);
  free (stats.title);
  free (host);
}

void
client::do_destroy ()
{
  attachable::do_destroy ();

  if (pl)
    pl->disconnect ();

  if (fd >= 0)
    {
      send_packet ("goodbye");
      flush ();

      close (fd);
    }

  state = ST_DEAD;

  socket_ev.suspend ();
  cmd_ev.suspend ();

  refcnt_dec (); // socket no longer open
}

void
client::reset_stats ()
{
  /* we need to clear these to -1 and not zero - otherwise,
   * if a player quits and starts a new character, we wont
   * send new values to the client, as things like exp start
   * at zero.
   */
  for (int i = 0; i < NUM_SKILLS; i++)
    last_skill_exp[i] = -1;

  for (int i = 0; i < NROFATTACKS; i++)
    last_resist[i] = -1;

  last_weapon_sp = -1;
  last_level = -1;
  last_stats.exp = -1;
  last_weight = (uint32) - 1;
  last_flags = 0;
  last_weight = 0;
  last_weight_limit = 0;
  last_path_attuned = 0;
  last_path_repelled = 0;
  last_path_denied = 0;
  last_speed = 0;
  last_flags = 0;

  static living zero_living;
  last_stats = zero_living;
}

/*******************************************************************************
 *
 * Start of functions dealing with freeing of the data.
 *
 ******************************************************************************/

/** Free's all the memory that ericserver allocates. */
void
free_all_newserver (void)
{
  LOG (llevDebug, "Freeing all new client/server information.\n");
  free_socket_images ();
}

client *
client::create (int fd, const char *peername)
{
  client *ns = new client (dup (fd), peername);
  ns->instantiate (); // effectively a nop right now
  INVOKE_CLIENT (CONNECT, ns);
  return ns;
}

Revision:	1.48
Committed:	Sat Jun 9 23:18:17 2007 UTC (16 years, 11 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.47:	+18 -0 lines
Log Message:	- use less stackspace for logging - do not copy logging message. - less overhead for stderr logging (should really log asynchronously). - force a trailing \n on log messages. - log in 0.1ms granularity (might be overkill).
#	User	Rev	Content
1	elmex	1.1	/*
2	root	1.46	* This file is part of Crossfire TRT, the Multiplayer Online Role Playing Game.
3	pippijn	1.36	*
4	root	1.46	* Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
5			* Copyright (©) 2001,2007 Mark Wedel
6			* Copyright (©) 1992,2007 Frank Tore Johansen
7	pippijn	1.36	*
8	root	1.46	* Crossfire TRT is free software; you can redistribute it and/or modify it
9			* under the terms of the GNU General Public License as published by the Free
10			* Software Foundation; either version 2 of the License, or (at your option)
11			* any later version.
12	pippijn	1.36	*
13	root	1.46	* This program is distributed in the hope that it will be useful, but
14			* WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY
15			* or FITNESS FOR A PARTICULAR PURPOSE. See the GNU General Public License
16			* for more details.
17	pippijn	1.36	*
18	root	1.46	* You should have received a copy of the GNU General Public License along
19			* with Crossfire TRT; if not, write to the Free Software Foundation, Inc. 51
20			* Franklin Street, Fifth Floor, Boston, MA 02110-1301 USA
21			*
22			* The authors can be reached via e-mail to <crossfire@schmorp.de>
23	pippijn	1.36	*/
24	elmex	1.1
25			/**
26			* \file
27			* Socket general functions
28			*
29			* \date 2003-12-02
30			*
31			* Mainly deals with initialization and higher level socket
32			* maintenance (checking for lost connections and if data has arrived.)
33			* The reading of data is handled in ericserver.c
34			*/
35
36			#include <global.h>
37	root	1.11	#include <sproto.h>
38	pippijn	1.10	#include <sys/types.h>
39			#include <sys/time.h>
40			#include <sys/socket.h>
41			#include <netinet/in.h>
42	root	1.23	#include <netinet/tcp.h>
43			#include <netinet/ip.h>
44	pippijn	1.10	#include <netdb.h>
45	elmex	1.1
46	root	1.19	#include <unistd.h>
47			#include <arpa/inet.h>
48	elmex	1.1
49	root	1.31	#include <algorithm>
50
51	root	1.48	// use relatively small values, as we do not expect to receive much,
52			// and we do userspace write buffering
53			// 8kb limits throughput to roughly 66kb/s
54			#define SOCKET_RCVBUF 8192
55			#define SOCKET_SNDBUF 16384
56
57	root	1.20	sockvec clients;
58	elmex	1.1
59			/**
60			* Initializes a connection. Really, it just sets up the data structure,
61			* socket setup is handled elsewhere. We do send a version to the
62			* client.
63			*/
64	root	1.20	client::client (int fd, const char *peername)
65	root	1.17	: fd (fd), host (strdup (peername)),
66	root	1.21	socket_ev (this, &client::socket_cb),
67	root	1.44	cmd_ev (this, &client::cmd_cb)
68	elmex	1.1	{
69	root	1.34	refcnt_inc (); // the socket is an external reference
70
71	root	1.43	mss = 1500 - 52; // 1500 typical ethernet frame, 66 typical tcp header overhead
72	root	1.42
73	root	1.16	{
74			struct linger linger_opt;
75
76	root	1.44	linger_opt.l_onoff = 0;
77	root	1.16	linger_opt.l_linger = 0;
78
79			if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
80	root	1.23	LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
81	root	1.16	}
82
83			{
84	root	1.42	int val;
85	root	1.23
86	root	1.48	#ifdef SO_RCVBUF
87			val = SOCKET_RCVBUF;
88			if (setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &val, sizeof (val)))
89			LOG (llevError, "SO_RCVBUF: %s\n", strerror (errno));
90			#endif
91
92			#ifdef SO_SNDBUF
93			val = SOCKET_SNDBUF;
94			if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &val, sizeof (val)))
95			LOG (llevError, "SO_SNDBUF: %s\n", strerror (errno));
96			#endif
97
98	root	1.42	#ifdef IP_TOS
99			val = IPTOS_LOWDELAY;
100	root	1.23	if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
101			LOG (llevError, "IP_TOS: %s\n", strerror (errno));
102	root	1.42	#endif
103	root	1.23
104	root	1.42	#ifdef TCP_NODELAY
105			val = 1;
106	root	1.23	if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
107			LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
108	root	1.42	#endif
109
110			// set some very aggressive keepalive parameters
111			#ifdef TCP_KEEPIDLE
112	root	1.44	val = 1;
113	root	1.42	if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
114			LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
115			#endif
116
117			#ifdef TCP_KEEPCNT
118	root	1.44	val = 3;
119	root	1.42	if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
120			LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
121			#endif
122	root	1.23
123	root	1.42	#ifdef TCP_KEEPINTVL
124			val = 1;
125			if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
126			LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
127			#endif
128	root	1.23
129	root	1.42	// try to find the mss value in use
130			#ifdef TCP_MAXSEG
131			socklen_t sl = sizeof (val);
132			if (!getsockopt (fd, IPPROTO_TCP, TCP_MAXSEG, &val, &sl) && sl == sizeof (val))
133			mss = val;
134			#endif
135	root	1.23	}
136
137			{
138	root	1.16	int bufsize = 65535; /Supposed absolute upper limit /
139			int oldbufsize;
140			int buflen = sizeof (int);
141
142			if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
143			LOG (llevError, "InitConnection: Error on fcntl.\n");
144
145			if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen) == -1)
146			oldbufsize = 0;
147
148			if (oldbufsize < bufsize)
149			if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
150			LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
151
152			buflen = sizeof (oldbufsize);
153			getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen);
154			}
155	elmex	1.1
156	root	1.28	state = ST_SETUP;
157	root	1.15	mapmode = Map0Cmd;
158			darkness = 1;
159			mapx = 11;
160			mapy = 11;
161			itemcmd = 1; /* Default is version item1 command */
162	root	1.41	max_rate = 100000 / (1000000 / MAX_TIME); // ~1mbit is assumed per default
163	root	1.12
164	root	1.7	/* Do this so we don't send a face command for the client for
165			* this face. Face 0 is sent to the client to say clear
166			* face information.
167			*/
168	root	1.40	faces_sent[0] = true;
169	root	1.7
170	root	1.37	socket_ev.prio (PE_PRIO_NORMAL);
171	root	1.18	socket_ev.fd (fd);
172	root	1.21	socket_ev.poll (PE_R);
173
174	root	1.37	cmd_ev.prio (PE_PRIO_NORMAL);
175	root	1.15
176	root	1.16	// initialisation done, kick it!
177	root	1.21	send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
178			flush ();
179	root	1.13
180	root	1.35	reset_stats ();
181
182	root	1.34	clients.insert (this);
183	elmex	1.1	}
184
185	root	1.20	client::~client ()
186	root	1.16	{
187	root	1.34	clients.erase (this);
188	root	1.32
189	root	1.22	free (stats.range);
190			free (stats.title);
191			free (host);
192	root	1.21	}
193
194			void
195	root	1.31	client::do_destroy ()
196	root	1.21	{
197	root	1.31	attachable::do_destroy ();
198
199			if (pl)
200			pl->disconnect ();
201
202			if (fd >= 0)
203	root	1.34	{
204			send_packet ("goodbye");
205			flush ();
206
207			close (fd);
208			}
209	root	1.29
210	root	1.28	state = ST_DEAD;
211	root	1.27
212	root	1.21	socket_ev.suspend ();
213			cmd_ev.suspend ();
214	root	1.31
215	root	1.34	refcnt_dec (); // socket no longer open
216	root	1.16	}
217	elmex	1.1
218	root	1.35	void
219			client::reset_stats ()
220			{
221			/* we need to clear these to -1 and not zero - otherwise,
222			* if a player quits and starts a new character, we wont
223			* send new values to the client, as things like exp start
224			* at zero.
225			*/
226			for (int i = 0; i < NUM_SKILLS; i++)
227			last_skill_exp[i] = -1;
228
229			for (int i = 0; i < NROFATTACKS; i++)
230			last_resist[i] = -1;
231
232			last_weapon_sp = -1;
233			last_level = -1;
234			last_stats.exp = -1;
235			last_weight = (uint32) - 1;
236			last_flags = 0;
237			last_weight = 0;
238			last_weight_limit = 0;
239			last_path_attuned = 0;
240			last_path_repelled = 0;
241			last_path_denied = 0;
242			last_speed = 0;
243	root	1.45	last_flags = 0;
244	root	1.35
245			static living zero_living;
246			last_stats = zero_living;
247			}
248
249	elmex	1.1	/*******************************************************************************
250			*
251			* Start of functions dealing with freeing of the data.
252			*
253			******************************************************************************/
254
255			/** Free's all the memory that ericserver allocates. */
256	root	1.7	void
257			free_all_newserver (void)
258			{
259			LOG (llevDebug, "Freeing all new client/server information.\n");
260			free_socket_images ();
261	elmex	1.1	}
262
263	root	1.27	client *
264			client::create (int fd, const char *peername)
265	root	1.16	{
266	root	1.38	client *ns = new client (dup (fd), peername);
267			ns->instantiate (); // effectively a nop right now
268			INVOKE_CLIENT (CONNECT, ns);
269			return ns;
270	root	1.16	}
271