server/socket/init.C

/*
 * CrossFire, A Multiplayer game for X-windows
 * 
 * Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
 * Copyright (C) 2001 Mark Wedel
 * Copyright (C) 1992 Frank Tore Johansen
 * 
 * This program 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 this program; if not, write to the Free Software
 * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
 *
 * The author 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>

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),
  cc_inv (this), cc_other (this)
{
  refcnt_inc (); // the socket is an external reference

  {
    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 = IPTOS_LOWDELAY;

    if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
      LOG (llevError, "IP_TOS: %s\n", strerror (errno));
  }

  {
    int val = 1;

    if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
      LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
  }

#ifdef __linux__
  {
     int val;

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

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

     val = 1;
     if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
       LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
  }
#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 */

  faces_sent = salloc0<uint8> (nrofpixmaps);

  /* 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] = NS_FACESENT_FACE;

  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);

  sfree<uint8> (faces_sent, nrofpixmaps);
  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;
  flags = 0;

  static living zero_living;
  last_stats = zero_living;
}

/** This sets up the socket and reads all the image information into memory. */
void
init_ericserver (void)
{
  cst_tot.time_start = time (NULL);
  cst_lst.time_start = time (NULL);

  LOG (llevDebug, "Initialize new client/server data\n");

  read_client_images ();
}


/*******************************************************************************
 *
 * 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)
{
  if (checkbanned (NULL, peername))
    {
      LOG (llevInfo, "Banned host tried to connect: [%s]\n", peername);
      return 0;
    }
  else
    {
      client *ns = new client (dup (fd), peername);

      ns->instantiate (); // effectively a nop right now

      INVOKE_CLIENT (CONNECT, ns);

      return ns;
    }
}

Revision:	1.37
Committed:	Tue Jan 23 01:05:18 2007 UTC (17 years, 4 months ago) by root
Content type:	text/plain
Branch:	MAIN
CVS Tags:	rel-2_0
Changes since 1.36:	+2 -6 lines
Log Message:	- avoid negative event priorities like the plague. they are actually worse because they introduce random memory corruption and endless loops and worse, if worse exists. - aggressively swap out maps when #actives exceeds threshold - sweep and cede after server tick - increase player command handling priorities, just in case. - fix a bug in mortal checking, this was the reason for the enourmous memory leaks in map-world.ext - mark c++-side watchers as non-reentrant
#	Content
1	/*
2	* CrossFire, A Multiplayer game for X-windows
3	*
4	* Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
5	* Copyright (C) 2001 Mark Wedel
6	* Copyright (C) 1992 Frank Tore Johansen
7	*
8	* This program is free software; you can redistribute it and/or modify
9	* it under the terms of the GNU General Public License as published by
10	* the Free Software Foundation; either version 2 of the License, or
11	* (at your option) any later version.
12	*
13	* This program is distributed in the hope that it will be useful,
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16	* GNU General Public License for more details.
17	*
18	* You should have received a copy of the GNU General Public License
19	* along with this program; if not, write to the Free Software
20	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
21	*
22	* The author can be reached via e-mail to <crossfire@schmorp.de>
23	*/
24
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	#include <sproto.h>
38	#include <sys/types.h>
39	#include <sys/time.h>
40	#include <sys/socket.h>
41	#include <netinet/in.h>
42	#include <netinet/tcp.h>
43	#include <netinet/ip.h>
44	#include <netdb.h>
45
46	#include <unistd.h>
47	#include <arpa/inet.h>
48
49	#include <algorithm>
50
51	sockvec clients;
52
53	/**
54	* Initializes a connection. Really, it just sets up the data structure,
55	* socket setup is handled elsewhere. We do send a version to the
56	* client.
57	*/
58	client::client (int fd, const char *peername)
59	: fd (fd), host (strdup (peername)),
60	socket_ev (this, &client::socket_cb),
61	cmd_ev (this, &client::cmd_cb),
62	cc_inv (this), cc_other (this)
63	{
64	refcnt_inc (); // the socket is an external reference
65
66	{
67	struct linger linger_opt;
68
69	linger_opt.l_onoff = 0;
70	linger_opt.l_linger = 0;
71
72	if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
73	LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
74	}
75
76	{
77	int val = IPTOS_LOWDELAY;
78
79	if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
80	LOG (llevError, "IP_TOS: %s\n", strerror (errno));
81	}
82
83	{
84	int val = 1;
85
86	if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
87	LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
88	}
89
90	#ifdef __linux__
91	{
92	int val;
93
94	// set some very aggressive keepalive parameters
95	val = 10;
96	if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
97	LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
98
99	val = 5;
100	if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
101	LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
102
103	val = 1;
104	if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
105	LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
106	}
107	#endif
108
109	{
110	int bufsize = 65535; /Supposed absolute upper limit /
111	int oldbufsize;
112	int buflen = sizeof (int);
113
114	if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
115	LOG (llevError, "InitConnection: Error on fcntl.\n");
116
117	if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen) == -1)
118	oldbufsize = 0;
119
120	if (oldbufsize < bufsize)
121	if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
122	LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
123
124	buflen = sizeof (oldbufsize);
125	getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen);
126	}
127
128	state = ST_SETUP;
129	mapmode = Map0Cmd;
130	darkness = 1;
131	mapx = 11;
132	mapy = 11;
133	itemcmd = 1; /* Default is version item1 command */
134
135	faces_sent = salloc0<uint8> (nrofpixmaps);
136
137	/* Do this so we don't send a face command for the client for
138	* this face. Face 0 is sent to the client to say clear
139	* face information.
140	*/
141	faces_sent[0] = NS_FACESENT_FACE;
142
143	socket_ev.prio (PE_PRIO_NORMAL);
144	socket_ev.fd (fd);
145	socket_ev.poll (PE_R);
146
147	cmd_ev.prio (PE_PRIO_NORMAL);
148
149	// initialisation done, kick it!
150	send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
151	flush ();
152
153	reset_stats ();
154
155	clients.insert (this);
156	}
157
158	client::~client ()
159	{
160	clients.erase (this);
161
162	sfree<uint8> (faces_sent, nrofpixmaps);
163	free (stats.range);
164	free (stats.title);
165	free (host);
166	}
167
168	void
169	client::do_destroy ()
170	{
171	attachable::do_destroy ();
172
173	if (pl)
174	pl->disconnect ();
175
176	if (fd >= 0)
177	{
178	send_packet ("goodbye");
179	flush ();
180
181	close (fd);
182	}
183
184	state = ST_DEAD;
185
186	socket_ev.suspend ();
187	cmd_ev.suspend ();
188
189	refcnt_dec (); // socket no longer open
190	}
191
192	void
193	client::reset_stats ()
194	{
195	/* we need to clear these to -1 and not zero - otherwise,
196	* if a player quits and starts a new character, we wont
197	* send new values to the client, as things like exp start
198	* at zero.
199	*/
200	for (int i = 0; i < NUM_SKILLS; i++)
201	last_skill_exp[i] = -1;
202
203	for (int i = 0; i < NROFATTACKS; i++)
204	last_resist[i] = -1;
205
206	last_weapon_sp = -1;
207	last_level = -1;
208	last_stats.exp = -1;
209	last_weight = (uint32) - 1;
210	last_flags = 0;
211	last_weight = 0;
212	last_weight_limit = 0;
213	last_path_attuned = 0;
214	last_path_repelled = 0;
215	last_path_denied = 0;
216	last_speed = 0;
217	flags = 0;
218
219	static living zero_living;
220	last_stats = zero_living;
221	}
222
223	/** This sets up the socket and reads all the image information into memory. */
224	void
225	init_ericserver (void)
226	{
227	cst_tot.time_start = time (NULL);
228	cst_lst.time_start = time (NULL);
229
230	LOG (llevDebug, "Initialize new client/server data\n");
231
232	read_client_images ();
233	}
234
235
236	/*******************************************************************************
237	*
238	* Start of functions dealing with freeing of the data.
239	*
240	******************************************************************************/
241
242	/** Free's all the memory that ericserver allocates. */
243	void
244	free_all_newserver (void)
245	{
246	LOG (llevDebug, "Freeing all new client/server information.\n");
247	free_socket_images ();
248	}
249
250	client *
251	client::create (int fd, const char *peername)
252	{
253	if (checkbanned (NULL, peername))
254	{
255	LOG (llevInfo, "Banned host tried to connect: [%s]\n", peername);
256	return 0;
257	}
258	else
259	{
260	client *ns = new client (dup (fd), peername);
261
262	ns->instantiate (); // effectively a nop right now
263
264	INVOKE_CLIENT (CONNECT, ns);
265
266	return ns;
267	}
268	}
269