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>
#ifndef __CEXTRACT__
# include <sproto.h>
#endif
#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)
    {
#ifdef ESRV_DEBUG
      LOG (llevDebug, "Default buffer size was %d bytes, will reset it to %d\n", oldbufsize, bufsize);
#endif
      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;

#ifdef HAVE_SYSCONF
  socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX);
#else
# ifdef HAVE_GETDTABLESIZE
  socket_info.max_filedescriptor = getdtablesize ();
# else
  "Unable to find usable function to get max filedescriptors";
# endif
#endif

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

/* Would be nice to have an autoconf check for this.  It appears that
 * these functions are both using the same calling syntax, just one
 * of them needs extra valus passed.
 */
#if defined(__osf__) || defined(hpux) || defined(sgi) || defined(NeXT) || \
        defined(__sun__) || defined(__linux__) || defined(SVR4) || \
        defined(__FreeBSD__) || defined(__OpenBSD__) || \
        defined(WIN32) /* ---win32 add this here */  || \
        defined(__GNU__)        /* HURD */
  {
    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));
      }
  }
#else
  if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, (char *) NULL, 0))
    {
      LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno));
    }
#endif

  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)
{
  if (close (ns->fd))
    {

#ifdef ESRV_DEBUG
      LOG (llevDebug, "Error closing socket %d\n", ns->fd);
#endif
    }

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