server/socket/init.C

/*
    CrossFire, A Multiplayer game for X-windows

    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>

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

  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 I/O is low priority
  // we prefer to have the server run instead of handling client requests
  socket_ev.prio (PE_PRIO_NORMAL + 1);
  socket_ev.fd (fd);
  socket_ev.poll (PE_R);

  // command handling is even lower priority
  // that way no client can monopolise the server
  cmd_ev.prio (PE_PRIO_NORMAL + 2);

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

#if 0//TODO
  socket_info.nconns++;
  if (socket_info.nconns > cst_tot.max_conn) cst_tot.max_conn = socket_info.nconns;
  if (socket_info.nconns > cst_lst.max_conn) cst_lst.max_conn = socket_info.nconns;
#endif
}

client::~client ()
{
  if (pl)
    pl->socket = 0;

  if (fd >= 0)
    close (fd);

  sfree<uint8> (faces_sent, nrofpixmaps);
  free (stats.range);
  free (stats.title);
  free (host);
}

void
client::destroy ()
{
  destroyed = true;

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

/** 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 ();
}

/** Sends the 'goodbye' command to the player, and closes connection. */
void
final_free_player (player *pl)
{
  free_player (pl);
}

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);
      clients.push_back (ns);

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

      INVOKE_CLIENT (CONNECT, ns);

      return ns;
    }
}

Revision:	1.27
Committed:	Thu Dec 21 06:12:37 2006 UTC (17 years, 5 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.26:	+12 -8 lines
Log Message:	- made client a first-class crossfire-perl object (its attachable), but perl support is missing. - added some client events - fixed reply not working after logout
#	User	Rev	Content
1	elmex	1.1	/*
2			CrossFire, A Multiplayer game for X-windows
3
4			Copyright (C) 2001 Mark Wedel
5			Copyright (C) 1992 Frank Tore Johansen
6
7			This program is free software; you can redistribute it and/or modify
8			it under the terms of the GNU General Public License as published by
9			the Free Software Foundation; either version 2 of the License, or
10			(at your option) any later version.
11
12			This program is distributed in the hope that it will be useful,
13			but WITHOUT ANY WARRANTY; without even the implied warranty of
14			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15			GNU General Public License for more details.
16
17			You should have received a copy of the GNU General Public License
18			along with this program; if not, write to the Free Software
19			Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20
21	root	1.8	The author can be reached via e-mail to <crossfire@schmorp.de>
22	elmex	1.1	*/
23
24			/**
25			* \file
26			* Socket general functions
27			*
28			* \date 2003-12-02
29			*
30			* Mainly deals with initialization and higher level socket
31			* maintenance (checking for lost connections and if data has arrived.)
32			* The reading of data is handled in ericserver.c
33			*/
34
35			#include <global.h>
36	root	1.11	#include <sproto.h>
37	pippijn	1.10	#include <sys/types.h>
38			#include <sys/time.h>
39			#include <sys/socket.h>
40			#include <netinet/in.h>
41	root	1.23	#include <netinet/tcp.h>
42			#include <netinet/ip.h>
43	pippijn	1.10	#include <netdb.h>
44	elmex	1.1
45	root	1.19	#include <unistd.h>
46			#include <arpa/inet.h>
47	elmex	1.1
48	root	1.20	sockvec clients;
49	elmex	1.1
50			/**
51			* Initializes a connection. Really, it just sets up the data structure,
52			* socket setup is handled elsewhere. We do send a version to the
53			* client.
54			*/
55	root	1.20	client::client (int fd, const char *peername)
56	root	1.17	: fd (fd), host (strdup (peername)),
57	root	1.21	socket_ev (this, &client::socket_cb),
58	root	1.26	cmd_ev (this, &client::cmd_cb),
59			cc_inv (this), cc_other (this)
60	elmex	1.1	{
61	root	1.16	{
62			struct linger linger_opt;
63
64			linger_opt.l_onoff = 0;
65			linger_opt.l_linger = 0;
66
67			if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
68	root	1.23	LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
69	root	1.16	}
70
71			{
72	root	1.23	int val = IPTOS_LOWDELAY;
73
74			if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
75			LOG (llevError, "IP_TOS: %s\n", strerror (errno));
76			}
77
78			{
79			int val = 1;
80
81			if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
82			LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
83			}
84
85			#ifdef __linux__
86			{
87			int val;
88
89			// set some very aggressive keepalive parameters
90			val = 10;
91			if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
92			LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
93
94			val = 5;
95			if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
96			LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
97
98			val = 1;
99			if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
100			LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
101			}
102			#endif
103
104			{
105	root	1.16	int bufsize = 65535; /Supposed absolute upper limit /
106			int oldbufsize;
107			int buflen = sizeof (int);
108
109			if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
110			LOG (llevError, "InitConnection: Error on fcntl.\n");
111
112			if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen) == -1)
113			oldbufsize = 0;
114
115			if (oldbufsize < bufsize)
116			if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
117			LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
118
119			buflen = sizeof (oldbufsize);
120			getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen);
121			}
122	elmex	1.1
123	root	1.15	mapmode = Map0Cmd;
124			darkness = 1;
125			mapx = 11;
126			mapy = 11;
127			itemcmd = 1; /* Default is version item1 command */
128	root	1.12
129	root	1.27	faces_sent = salloc0<uint8> (nrofpixmaps);
130	root	1.16
131	root	1.7	/* Do this so we don't send a face command for the client for
132			* this face. Face 0 is sent to the client to say clear
133			* face information.
134			*/
135	root	1.15	faces_sent[0] = NS_FACESENT_FACE;
136	root	1.7
137	root	1.21	// socket I/O is low priority
138			// we prefer to have the server run instead of handling client requests
139			socket_ev.prio (PE_PRIO_NORMAL + 1);
140	root	1.18	socket_ev.fd (fd);
141	root	1.21	socket_ev.poll (PE_R);
142
143			// command handling is even lower priority
144			// that way no client can monopolise the server
145			cmd_ev.prio (PE_PRIO_NORMAL + 2);
146	root	1.15
147	root	1.16	// initialisation done, kick it!
148	root	1.21	send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
149			flush ();
150	root	1.13
151	root	1.16	#if 0//TODO
152			socket_info.nconns++;
153			if (socket_info.nconns > cst_tot.max_conn) cst_tot.max_conn = socket_info.nconns;
154			if (socket_info.nconns > cst_lst.max_conn) cst_lst.max_conn = socket_info.nconns;
155			#endif
156	elmex	1.1	}
157
158	root	1.20	client::~client ()
159	root	1.16	{
160	root	1.21	if (pl)
161			pl->socket = 0;
162
163			if (fd >= 0)
164	root	1.22	close (fd);
165	root	1.21
166	root	1.25	sfree<uint8> (faces_sent, nrofpixmaps);
167	root	1.22	free (stats.range);
168			free (stats.title);
169			free (host);
170	root	1.21	}
171
172			void
173			client::destroy ()
174			{
175	root	1.27	destroyed = true;
176
177	root	1.21	socket_ev.suspend ();
178			cmd_ev.suspend ();
179	root	1.16	}
180	elmex	1.1
181			/** This sets up the socket and reads all the image information into memory. */
182	root	1.7	void
183			init_ericserver (void)
184	elmex	1.1	{
185	root	1.7	cst_tot.time_start = time (NULL);
186			cst_lst.time_start = time (NULL);
187	elmex	1.1
188	root	1.7	LOG (llevDebug, "Initialize new client/server data\n");
189	root	1.11
190	root	1.7	read_client_images ();
191	elmex	1.1	}
192
193
194			/*******************************************************************************
195			*
196			* Start of functions dealing with freeing of the data.
197			*
198			******************************************************************************/
199
200			/** Free's all the memory that ericserver allocates. */
201	root	1.7	void
202			free_all_newserver (void)
203			{
204			LOG (llevDebug, "Freeing all new client/server information.\n");
205			free_socket_images ();
206	elmex	1.1	}
207
208			/** Sends the 'goodbye' command to the player, and closes connection. */
209	root	1.7	void
210			final_free_player (player *pl)
211	elmex	1.1	{
212	root	1.7	free_player (pl);
213	elmex	1.1	}
214	root	1.13
215	root	1.27	client *
216			client::create (int fd, const char *peername)
217	root	1.16	{
218			if (checkbanned (NULL, peername))
219			{
220			LOG (llevInfo, "Banned host tried to connect: [%s]\n", peername);
221	root	1.27	return 0;
222	root	1.16	}
223			else
224			{
225	root	1.20	client *ns = new client (dup (fd), peername);
226			clients.push_back (ns);
227	root	1.27
228			ns->instantiate (); // effectively a nop right now
229
230			INVOKE_CLIENT (CONNECT, ns);
231
232			return ns;
233	root	1.16	}
234			}
235