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

  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 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->save ();
      leave (pl, 1);
      pl->ns = 0;

      delete pl;
    }

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

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

void
client::destroy ()
{
  INVOKE_CLIENT (DESTROY, this);

  state = ST_DEAD;

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

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.30
Committed:	Fri Dec 22 16:34:00 2006 UTC (17 years, 5 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.29:	+7 -8 lines
Log Message:	- preliminary check in, stuff is rudimentarily working - moved most of the player creation process into a perl coroutine - changed internal design of player management to not reuse and morph the object in funny ways. should be safer and much nicer to handle. - got rid of some annoying hacks, such as clear() (TODO: get rid of player_pod and other stuff now unnecessary?)
#	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.28	state = ST_SETUP;
124	root	1.15	mapmode = Map0Cmd;
125			darkness = 1;
126			mapx = 11;
127			mapy = 11;
128			itemcmd = 1; /* Default is version item1 command */
129	root	1.12
130	root	1.27	faces_sent = salloc0<uint8> (nrofpixmaps);
131	root	1.16
132	root	1.7	/* Do this so we don't send a face command for the client for
133			* this face. Face 0 is sent to the client to say clear
134			* face information.
135			*/
136	root	1.15	faces_sent[0] = NS_FACESENT_FACE;
137	root	1.7
138	root	1.21	// socket I/O is low priority
139			// we prefer to have the server run instead of handling client requests
140			socket_ev.prio (PE_PRIO_NORMAL + 1);
141	root	1.18	socket_ev.fd (fd);
142	root	1.21	socket_ev.poll (PE_R);
143
144			// command handling is even lower priority
145			// that way no client can monopolise the server
146			cmd_ev.prio (PE_PRIO_NORMAL + 2);
147	root	1.15
148	root	1.16	// initialisation done, kick it!
149	root	1.21	send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
150			flush ();
151	root	1.13
152	root	1.16	#if 0//TODO
153			socket_info.nconns++;
154			if (socket_info.nconns > cst_tot.max_conn) cst_tot.max_conn = socket_info.nconns;
155			if (socket_info.nconns > cst_lst.max_conn) cst_lst.max_conn = socket_info.nconns;
156			#endif
157	elmex	1.1	}
158
159	root	1.20	client::~client ()
160	root	1.16	{
161	root	1.21	if (pl)
162	root	1.30	{
163			pl->save ();
164			leave (pl, 1);
165			pl->ns = 0;
166
167			delete pl;
168			}
169	root	1.21
170			if (fd >= 0)
171	root	1.22	close (fd);
172	root	1.21
173	root	1.25	sfree<uint8> (faces_sent, nrofpixmaps);
174	root	1.22	free (stats.range);
175			free (stats.title);
176			free (host);
177	root	1.21	}
178
179			void
180			client::destroy ()
181			{
182	root	1.29	INVOKE_CLIENT (DESTROY, this);
183
184	root	1.28	state = ST_DEAD;
185	root	1.27
186	root	1.21	socket_ev.suspend ();
187			cmd_ev.suspend ();
188	root	1.16	}
189	elmex	1.1
190			/** This sets up the socket and reads all the image information into memory. */
191	root	1.7	void
192			init_ericserver (void)
193	elmex	1.1	{
194	root	1.7	cst_tot.time_start = time (NULL);
195			cst_lst.time_start = time (NULL);
196	elmex	1.1
197	root	1.7	LOG (llevDebug, "Initialize new client/server data\n");
198	root	1.11
199	root	1.7	read_client_images ();
200	elmex	1.1	}
201
202
203			/*******************************************************************************
204			*
205			* Start of functions dealing with freeing of the data.
206			*
207			******************************************************************************/
208
209			/** Free's all the memory that ericserver allocates. */
210	root	1.7	void
211			free_all_newserver (void)
212			{
213			LOG (llevDebug, "Freeing all new client/server information.\n");
214			free_socket_images ();
215	elmex	1.1	}
216
217	root	1.27	client *
218			client::create (int fd, const char *peername)
219	root	1.16	{
220			if (checkbanned (NULL, peername))
221			{
222			LOG (llevInfo, "Banned host tried to connect: [%s]\n", peername);
223	root	1.27	return 0;
224	root	1.16	}
225			else
226			{
227	root	1.20	client *ns = new client (dup (fd), peername);
228			clients.push_back (ns);
229	root	1.27
230			ns->instantiate (); // effectively a nop right now
231
232			INVOKE_CLIENT (CONNECT, ns);
233
234			return ns;
235	root	1.16	}
236			}
237