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 <netdb.h>

#ifdef HAVE_UNISTD_H
# include <unistd.h>
#endif

#ifdef HAVE_ARPA_INET_H
# include <arpa/inet.h>
#endif
#include <newserver.h>

Socket_Info socket_info;
NewSocket *init_sockets;

/**
 * Initializes a connection. Really, it just sets up the data structure,
 * socket setup is handled elsewhere.  We do send a version to the
 * client.
 */
void
InitConnection (NewSocket *ns, const char *from_ip)
{
  SockList sl;
  char buf[256];
  int bufsize = 65535;          /*Supposed absolute upper limit */
  int oldbufsize;
  int buflen = sizeof (int);

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

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

  if (oldbufsize < bufsize)
    if (setsockopt (ns->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 (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen);
#ifdef ESRV_DEBUG
  LOG (llevDebug, "Socket buffer size now %d bytes\n", oldbufsize);
#endif

  ns->faceset = 0;
  ns->facecache = 0;
  ns->image2 = 0;
  ns->sound = 0;
  ns->exp64 = 0;
  ns->monitor_spells = 0;
  ns->mapmode = Map0Cmd;
  ns->darkness = 1;
  ns->status = Ns_Add;
  ns->mapx = 11;
  ns->mapy = 11;
  ns->newmapcmd = 0;
  ns->itemcmd = 1;              /* Default is version item1 command */
  ns->ext_mapinfos = 0;         /*extendedmapinfo datas */
  ns->EMI_smooth = 0;
  ns->look_position = 0;
  ns->update_look = 0;
  ns->has_readable_type = 0;
  ns->supported_readables = 0;
  ns->monitor_spells = 0;
  ns->mapinfocmd = 0;
  ns->extcmd = 0;
  ns->extmap = 0;

  /* we should really do some checking here - if total clients overflows
   * we need to do something more intelligent, because client id's will start
   * duplicating (not likely in normal cases, but malicous attacks that
   * just open and close connections could get this total up.
   */
  ns->inbuf.len = 0;
  ns->inbuf.buf = (unsigned char *) malloc (sizeof (unsigned char) * MAXSOCKBUF);
  /* Basic initialization. Needed because we do a check in
   * HandleClient for oldsocketmode without checking the
   * length of data.
   */
  memset (ns->inbuf.buf, 0, sizeof (unsigned char) * MAXSOCKBUF);
  memset (&ns->lastmap, 0, sizeof (struct Map));
  memset (ns->faces_sent, 0, ns->faces_sent_len * sizeof (*ns->faces_sent));
  memset (&ns->anims_sent, 0, sizeof (ns->anims_sent));
  memset (&ns->stats, 0, sizeof (struct statsinfo));
  /* 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.
   */
  ns->faces_sent[0] = NS_FACESENT_FACE;

  ns->outputbuffer.start = 0;
  ns->outputbuffer.len = 0;
  ns->can_write = 1;
  ns->password_fails = 0;

  ns->current_map = 0;
  ns->current_x = 0;
  ns->current_y = 0;
  ns->client[0] = 0;
  ns->buggy_mapscroll = 0;

  ns->sent_scroll = 0;
  ns->host = strdup_local (from_ip);
  sprintf ((char *) buf, "version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
  sl.buf = (unsigned char *) buf;
  sl.len = strlen ((char *) buf);
  Send_With_Handling (ns, &sl);
#ifdef CS_LOGSTATS
  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
}


/** This sets up the socket and reads all the image information into memory. */
void
init_ericserver (void)
{
  struct sockaddr_in insock;
  struct protoent *protox;
  struct linger linger_opt;

  socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX);

  socket_info.timeout.tv_sec = 0;
  socket_info.timeout.tv_usec = 0;
  socket_info.nconns = 0;

#ifdef CS_LOGSTATS
  memset (&cst_tot, 0, sizeof (CS_Stats));
  memset (&cst_lst, 0, sizeof (CS_Stats));
  cst_tot.time_start = time (NULL);
  cst_lst.time_start = time (NULL);
#endif

  LOG (llevDebug, "Initialize new client/server data\n");
  socket_info.nconns = 1;
  init_sockets = (NewSocket *) malloc (sizeof (NewSocket));
  init_sockets[0].faces_sent = NULL;    /* unused */
  socket_info.allocated_sockets = 1;

  protox = getprotobyname ("tcp");
  if (protox == NULL)
    {
      LOG (llevError, "init_ericserver: Error getting protox\n");
      return;
    }

  init_sockets[0].fd = socket (PF_INET, SOCK_STREAM, protox->p_proto);
  if (init_sockets[0].fd == -1)
    {
      LOG (llevError, "Cannot create socket: %s\n", strerror (errno));
      exit (-1);
    }

  insock.sin_family = AF_INET;
  insock.sin_port = htons (settings.csport);
  insock.sin_addr.s_addr = htonl (INADDR_ANY);

  linger_opt.l_onoff = 0;
  linger_opt.l_linger = 0;
  if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_LINGER, (char *) &linger_opt, sizeof (struct linger)))
    LOG (llevError, "Cannot setsockopt(SO_LINGER): %s\n", strerror (errno));

  {
    int tmp = 1;

    if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof (tmp)))
      LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno));
  }

  if (bind (init_sockets[0].fd, (struct sockaddr *) &insock, sizeof (insock)) == (-1))
    {
      LOG (llevError, "Cannot bind socket to port %d: %s\n", ntohs (insock.sin_port), strerror (errno));
      close (init_sockets[0].fd);
      exit (-1);
    }

  if (listen (init_sockets[0].fd, 5) == (-1))
    {
      LOG (llevError, "Cannot listen on socket: %s\n", strerror (errno));
      close (init_sockets[0].fd);
      exit (-1);
    }

  init_sockets[0].status = Ns_Add;
  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 ();
  free (init_sockets);
}

/**
 * Frees a socket.
 * Basically, all we need to do here is free all data structures that
 * might be associated with the socket.  It is up to the caller to
 * update the list
 */

void
free_newsocket (NewSocket *ns)
{
  close (ns->fd);

  if (ns->stats.range)
    free (ns->stats.range);

  if (ns->stats.title)
    free (ns->stats.title);

  free (ns->host);
  free (ns->inbuf.buf);
}

/** Sends the 'goodbye' command to the player, and closes connection. */
void
final_free_player (player *pl)
{
  cs_write_string (&pl->socket, "goodbye", 8);
  free_newsocket (&pl->socket);
  free_player (pl);
}
Revision:	1.11
Committed:	Wed Dec 13 02:55:51 2006 UTC (19 years, 9 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.10:	+15 -53 lines
Log Message:	- medium decruftification - medium cleanups - make settings accessible to perl using cf::settings->mutator (completely untested)
#	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
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			#include <netdb.h>
43	elmex	1.1
44			#ifdef HAVE_UNISTD_H
45	root	1.7	# include <unistd.h>
46	elmex	1.1	#endif
47
48			#ifdef HAVE_ARPA_INET_H
49	root	1.7	# include <arpa/inet.h>
50	elmex	1.1	#endif
51			#include <newserver.h>
52
53			Socket_Info socket_info;
54			NewSocket *init_sockets;
55
56			/**
57			* Initializes a connection. Really, it just sets up the data structure,
58			* socket setup is handled elsewhere. We do send a version to the
59			* client.
60			*/
61	root	1.7	void
62	root	1.11	InitConnection (NewSocket ns, const char from_ip)
63	elmex	1.1	{
64	root	1.7	SockList sl;
65			char buf[256];
66			int bufsize = 65535; /Supposed absolute upper limit /
67			int oldbufsize;
68			int buflen = sizeof (int);
69
70			if (fcntl (ns->fd, F_SETFL, O_NONBLOCK) == -1)
71	root	1.11	LOG (llevError, "InitConnection: Error on fcntl.\n");
72	elmex	1.1
73	root	1.7	if (getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen) == -1)
74			oldbufsize = 0;
75	root	1.11
76	root	1.7	if (oldbufsize < bufsize)
77	root	1.11	if (setsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
78			LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
79
80	root	1.7	buflen = sizeof (oldbufsize);
81			getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen);
82	elmex	1.1	#ifdef ESRV_DEBUG
83	root	1.7	LOG (llevDebug, "Socket buffer size now %d bytes\n", oldbufsize);
84	elmex	1.1	#endif
85
86	root	1.7	ns->faceset = 0;
87			ns->facecache = 0;
88			ns->image2 = 0;
89			ns->sound = 0;
90			ns->exp64 = 0;
91			ns->monitor_spells = 0;
92			ns->mapmode = Map0Cmd;
93			ns->darkness = 1;
94			ns->status = Ns_Add;
95			ns->mapx = 11;
96			ns->mapy = 11;
97			ns->newmapcmd = 0;
98			ns->itemcmd = 1; /* Default is version item1 command */
99			ns->ext_mapinfos = 0; /extendedmapinfo datas /
100			ns->EMI_smooth = 0;
101			ns->look_position = 0;
102			ns->update_look = 0;
103			ns->has_readable_type = 0;
104			ns->supported_readables = 0;
105			ns->monitor_spells = 0;
106			ns->mapinfocmd = 0;
107			ns->extcmd = 0;
108			ns->extmap = 0;
109
110			/* we should really do some checking here - if total clients overflows
111			* we need to do something more intelligent, because client id's will start
112			* duplicating (not likely in normal cases, but malicous attacks that
113			* just open and close connections could get this total up.
114			*/
115			ns->inbuf.len = 0;
116			ns->inbuf.buf = (unsigned char ) malloc (sizeof (unsigned char) MAXSOCKBUF);
117			/* Basic initialization. Needed because we do a check in
118			* HandleClient for oldsocketmode without checking the
119			* length of data.
120			*/
121			memset (ns->inbuf.buf, 0, sizeof (unsigned char) * MAXSOCKBUF);
122			memset (&ns->lastmap, 0, sizeof (struct Map));
123			memset (ns->faces_sent, 0, ns->faces_sent_len * sizeof (*ns->faces_sent));
124			memset (&ns->anims_sent, 0, sizeof (ns->anims_sent));
125			memset (&ns->stats, 0, sizeof (struct statsinfo));
126			/* Do this so we don't send a face command for the client for
127			* this face. Face 0 is sent to the client to say clear
128			* face information.
129			*/
130			ns->faces_sent[0] = NS_FACESENT_FACE;
131
132			ns->outputbuffer.start = 0;
133			ns->outputbuffer.len = 0;
134			ns->can_write = 1;
135			ns->password_fails = 0;
136
137			ns->current_map = 0;
138			ns->current_x = 0;
139			ns->current_y = 0;
140			ns->client[0] = 0;
141			ns->buggy_mapscroll = 0;
142
143			ns->sent_scroll = 0;
144			ns->host = strdup_local (from_ip);
145			sprintf ((char *) buf, "version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
146			sl.buf = (unsigned char *) buf;
147			sl.len = strlen ((char *) buf);
148			Send_With_Handling (ns, &sl);
149	elmex	1.1	#ifdef CS_LOGSTATS
150	root	1.7	if (socket_info.nconns > cst_tot.max_conn)
151			cst_tot.max_conn = socket_info.nconns;
152			if (socket_info.nconns > cst_lst.max_conn)
153			cst_lst.max_conn = socket_info.nconns;
154	elmex	1.1	#endif
155			}
156
157
158			/** This sets up the socket and reads all the image information into memory. */
159	root	1.7	void
160			init_ericserver (void)
161	elmex	1.1	{
162	root	1.7	struct sockaddr_in insock;
163			struct protoent *protox;
164			struct linger linger_opt;
165
166			socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX);
167	elmex	1.1
168	root	1.7	socket_info.timeout.tv_sec = 0;
169			socket_info.timeout.tv_usec = 0;
170			socket_info.nconns = 0;
171	elmex	1.1
172			#ifdef CS_LOGSTATS
173	root	1.7	memset (&cst_tot, 0, sizeof (CS_Stats));
174			memset (&cst_lst, 0, sizeof (CS_Stats));
175			cst_tot.time_start = time (NULL);
176			cst_lst.time_start = time (NULL);
177	elmex	1.1	#endif
178
179	root	1.7	LOG (llevDebug, "Initialize new client/server data\n");
180			socket_info.nconns = 1;
181			init_sockets = (NewSocket *) malloc (sizeof (NewSocket));
182			init_sockets[0].faces_sent = NULL; /* unused */
183			socket_info.allocated_sockets = 1;
184
185			protox = getprotobyname ("tcp");
186			if (protox == NULL)
187			{
188			LOG (llevError, "init_ericserver: Error getting protox\n");
189			return;
190	elmex	1.1	}
191	root	1.11
192	root	1.7	init_sockets[0].fd = socket (PF_INET, SOCK_STREAM, protox->p_proto);
193			if (init_sockets[0].fd == -1)
194			{
195			LOG (llevError, "Cannot create socket: %s\n", strerror (errno));
196			exit (-1);
197	elmex	1.1	}
198	root	1.11
199	root	1.7	insock.sin_family = AF_INET;
200			insock.sin_port = htons (settings.csport);
201			insock.sin_addr.s_addr = htonl (INADDR_ANY);
202
203			linger_opt.l_onoff = 0;
204			linger_opt.l_linger = 0;
205			if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_LINGER, (char *) &linger_opt, sizeof (struct linger)))
206	root	1.11	LOG (llevError, "Cannot setsockopt(SO_LINGER): %s\n", strerror (errno));
207	root	1.7
208			{
209			int tmp = 1;
210
211			if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof (tmp)))
212	root	1.11	LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno));
213	root	1.7	}
214	elmex	1.1
215	root	1.7	if (bind (init_sockets[0].fd, (struct sockaddr *) &insock, sizeof (insock)) == (-1))
216			{
217			LOG (llevError, "Cannot bind socket to port %d: %s\n", ntohs (insock.sin_port), strerror (errno));
218			close (init_sockets[0].fd);
219			exit (-1);
220	elmex	1.1	}
221	root	1.11
222	root	1.7	if (listen (init_sockets[0].fd, 5) == (-1))
223			{
224			LOG (llevError, "Cannot listen on socket: %s\n", strerror (errno));
225			close (init_sockets[0].fd);
226			exit (-1);
227	elmex	1.1	}
228	root	1.11
229	root	1.7	init_sockets[0].status = Ns_Add;
230			read_client_images ();
231	elmex	1.1	}
232
233
234			/*******************************************************************************
235			*
236			* Start of functions dealing with freeing of the data.
237			*
238			******************************************************************************/
239
240			/** Free's all the memory that ericserver allocates. */
241	root	1.7	void
242			free_all_newserver (void)
243			{
244			LOG (llevDebug, "Freeing all new client/server information.\n");
245			free_socket_images ();
246			free (init_sockets);
247	elmex	1.1	}
248
249			/**
250			* Frees a socket.
251			* Basically, all we need to do here is free all data structures that
252			* might be associated with the socket. It is up to the caller to
253			* update the list
254			*/
255
256	root	1.7	void
257	root	1.11	free_newsocket (NewSocket *ns)
258	elmex	1.1	{
259	root	1.11	close (ns->fd);
260	root	1.9
261	root	1.7	if (ns->stats.range)
262			free (ns->stats.range);
263	root	1.9
264	root	1.7	if (ns->stats.title)
265			free (ns->stats.title);
266	root	1.9
267	root	1.7	free (ns->host);
268			free (ns->inbuf.buf);
269	elmex	1.1	}
270
271			/** Sends the 'goodbye' command to the player, and closes connection. */
272	root	1.7	void
273			final_free_player (player *pl)
274	elmex	1.1	{
275	root	1.7	cs_write_string (&pl->socket, "goodbye", 8);
276			free_newsocket (&pl->socket);
277			free_player (pl);
278	elmex	1.1	}