server/socket/init.C


/*
 * static char *rcsid_init_c =
 *    "$Id: init.C,v 1.6 2006-08-30 16:30:37 root Exp $";
 */

/*
    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-devel@real-time.com
*/

/**
 * \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
#ifndef WIN32                   /* ---win32 exclude include files */
# include <sys/types.h>
# include <sys/time.h>
# include <sys/socket.h>
# include <netinet/in.h>
# include <netdb.h>
#endif /* win32 */

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

#ifdef WIN32                    /* ***WIN32 SOCKET: init win32 non blocking socket */
  int temp = 1;

  if (ioctlsocket (ns->fd, FIONBIO, &temp) == -1)
    LOG (llevError, "InitConnection:  Error on ioctlsocket.\n");
#else
  if (fcntl (ns->fd, F_SETFL, O_NONBLOCK) == -1)
    {
      LOG (llevError, "InitConnection:  Error on fcntl.\n");
    }
#endif /* end win32 */

  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->comment = NULL;
  ns->old_mode = (Old_Mode) 0;
  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 WIN32                    /* ***win32  -  we init a windows socket */
  WSADATA w;

  socket_info.max_filedescriptor = 1;   /* used in select, ignored in winsockets */
  WSAStartup (0x0101, &w);      /* this setup all socket stuff */
  /* ill include no error tests here, winsocket 1.1 should always work */
  /* except some old win95 versions without tcp/ip stack */
#else /* non windows */

# 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
#endif /* win32 */

  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 */
  {
# ifdef WIN32
    char tmp = 1;
# else
    int tmp = 1;
# endif

    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));
#ifdef WIN32                    /* ***win32: close() -> closesocket() */
      shutdown (init_sockets[0].fd, SD_BOTH);
      closesocket (init_sockets[0].fd);
#else
      close (init_sockets[0].fd);
#endif /* win32 */
      exit (-1);
    }
  if (listen (init_sockets[0].fd, 5) == (-1))
    {
      LOG (llevError, "Cannot listen on socket: %s\n", strerror (errno));
#ifdef WIN32                    /* ***win32: close() -> closesocket() */
      shutdown (init_sockets[0].fd, SD_BOTH);
      closesocket (init_sockets[0].fd);
#else
      close (init_sockets[0].fd);
#endif /* win32 */
      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)
{
#ifdef WIN32                    /* ***win32: closesocket in windows style */
  shutdown (ns->fd, SD_BOTH);
  if (closesocket (ns->fd))
    {
#else
  if (close (ns->fd))
    {
#endif /* win32 */

#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);
  if (ns->comment)
    free (ns->comment);
  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.7
Committed:	Sun Sep 10 13:43:33 2006 UTC (17 years, 9 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.6:	+222 -205 lines
Log Message:	indent
#	User	Rev	Content
1	root	1.7
2	elmex	1.1	/*
3			* static char *rcsid_init_c =
4	root	1.7	* "$Id: init.C,v 1.6 2006-08-30 16:30:37 root Exp $";
5	elmex	1.1	*/
6
7			/*
8			CrossFire, A Multiplayer game for X-windows
9
10			Copyright (C) 2001 Mark Wedel
11			Copyright (C) 1992 Frank Tore Johansen
12
13			This program is free software; you can redistribute it and/or modify
14			it under the terms of the GNU General Public License as published by
15			the Free Software Foundation; either version 2 of the License, or
16			(at your option) any later version.
17
18			This program is distributed in the hope that it will be useful,
19			but WITHOUT ANY WARRANTY; without even the implied warranty of
20			MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21			GNU General Public License for more details.
22
23			You should have received a copy of the GNU General Public License
24			along with this program; if not, write to the Free Software
25			Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26
27			The author can be reached via e-mail to crossfire-devel@real-time.com
28			*/
29
30			/**
31			* \file
32			* Socket general functions
33			*
34			* \date 2003-12-02
35			*
36			* Mainly deals with initialization and higher level socket
37			* maintenance (checking for lost connections and if data has arrived.)
38			* The reading of data is handled in ericserver.c
39			*/
40
41
42			#include <global.h>
43			#ifndef __CEXTRACT__
44	root	1.7	# include <sproto.h>
45	elmex	1.1	#endif
46	root	1.7	#ifndef WIN32 /* ---win32 exclude include files */
47			# include <sys/types.h>
48			# include <sys/time.h>
49			# include <sys/socket.h>
50			# include <netinet/in.h>
51			# include <netdb.h>
52	elmex	1.1	#endif /* win32 */
53
54			#ifdef HAVE_UNISTD_H
55	root	1.7	# include <unistd.h>
56	elmex	1.1	#endif
57
58			#ifdef HAVE_ARPA_INET_H
59	root	1.7	# include <arpa/inet.h>
60	elmex	1.1	#endif
61			#include <newserver.h>
62
63			Socket_Info socket_info;
64			NewSocket *init_sockets;
65
66			/**
67			* Initializes a connection. Really, it just sets up the data structure,
68			* socket setup is handled elsewhere. We do send a version to the
69			* client.
70			*/
71	root	1.7	void
72			InitConnection (NewSocket * ns, const char *from_ip)
73	elmex	1.1	{
74	root	1.7	SockList sl;
75			char buf[256];
76			int bufsize = 65535; /Supposed absolute upper limit /
77			int oldbufsize;
78			int buflen = sizeof (int);
79
80			#ifdef WIN32 /* **WIN32 SOCKET: init win32 non blocking socket /
81			int temp = 1;
82
83			if (ioctlsocket (ns->fd, FIONBIO, &temp) == -1)
84			LOG (llevError, "InitConnection: Error on ioctlsocket.\n");
85			#else
86			if (fcntl (ns->fd, F_SETFL, O_NONBLOCK) == -1)
87			{
88			LOG (llevError, "InitConnection: Error on fcntl.\n");
89	elmex	1.1	}
90			#endif /* end win32 */
91
92	root	1.7	if (getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen) == -1)
93			oldbufsize = 0;
94			if (oldbufsize < bufsize)
95			{
96	elmex	1.1	#ifdef ESRV_DEBUG
97	root	1.7	LOG (llevDebug, "Default buffer size was %d bytes, will reset it to %d\n", oldbufsize, bufsize);
98	elmex	1.1	#endif
99	root	1.7	if (setsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
100			{
101			LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
102	root	1.5	}
103	elmex	1.1	}
104	root	1.7	buflen = sizeof (oldbufsize);
105			getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char ) &oldbufsize, (socklen_t ) & buflen);
106	elmex	1.1	#ifdef ESRV_DEBUG
107	root	1.7	LOG (llevDebug, "Socket buffer size now %d bytes\n", oldbufsize);
108	elmex	1.1	#endif
109
110	root	1.7	ns->faceset = 0;
111			ns->facecache = 0;
112			ns->image2 = 0;
113			ns->sound = 0;
114			ns->exp64 = 0;
115			ns->monitor_spells = 0;
116			ns->mapmode = Map0Cmd;
117			ns->darkness = 1;
118			ns->status = Ns_Add;
119			ns->comment = NULL;
120			ns->old_mode = (Old_Mode) 0;
121			ns->mapx = 11;
122			ns->mapy = 11;
123			ns->newmapcmd = 0;
124			ns->itemcmd = 1; /* Default is version item1 command */
125			ns->ext_mapinfos = 0; /extendedmapinfo datas /
126			ns->EMI_smooth = 0;
127			ns->look_position = 0;
128			ns->update_look = 0;
129			ns->has_readable_type = 0;
130			ns->supported_readables = 0;
131			ns->monitor_spells = 0;
132			ns->mapinfocmd = 0;
133			ns->extcmd = 0;
134			ns->extmap = 0;
135
136			/* we should really do some checking here - if total clients overflows
137			* we need to do something more intelligent, because client id's will start
138			* duplicating (not likely in normal cases, but malicous attacks that
139			* just open and close connections could get this total up.
140			*/
141			ns->inbuf.len = 0;
142			ns->inbuf.buf = (unsigned char ) malloc (sizeof (unsigned char) MAXSOCKBUF);
143			/* Basic initialization. Needed because we do a check in
144			* HandleClient for oldsocketmode without checking the
145			* length of data.
146			*/
147			memset (ns->inbuf.buf, 0, sizeof (unsigned char) * MAXSOCKBUF);
148			memset (&ns->lastmap, 0, sizeof (struct Map));
149			memset (ns->faces_sent, 0, ns->faces_sent_len * sizeof (*ns->faces_sent));
150			memset (&ns->anims_sent, 0, sizeof (ns->anims_sent));
151			memset (&ns->stats, 0, sizeof (struct statsinfo));
152			/* Do this so we don't send a face command for the client for
153			* this face. Face 0 is sent to the client to say clear
154			* face information.
155			*/
156			ns->faces_sent[0] = NS_FACESENT_FACE;
157
158			ns->outputbuffer.start = 0;
159			ns->outputbuffer.len = 0;
160			ns->can_write = 1;
161			ns->password_fails = 0;
162
163			ns->current_map = 0;
164			ns->current_x = 0;
165			ns->current_y = 0;
166			ns->client[0] = 0;
167			ns->buggy_mapscroll = 0;
168
169			ns->sent_scroll = 0;
170			ns->host = strdup_local (from_ip);
171			sprintf ((char *) buf, "version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
172			sl.buf = (unsigned char *) buf;
173			sl.len = strlen ((char *) buf);
174			Send_With_Handling (ns, &sl);
175	elmex	1.1	#ifdef CS_LOGSTATS
176	root	1.7	if (socket_info.nconns > cst_tot.max_conn)
177			cst_tot.max_conn = socket_info.nconns;
178			if (socket_info.nconns > cst_lst.max_conn)
179			cst_lst.max_conn = socket_info.nconns;
180	elmex	1.1	#endif
181			}
182
183
184			/** This sets up the socket and reads all the image information into memory. */
185	root	1.7	void
186			init_ericserver (void)
187	elmex	1.1	{
188	root	1.7	struct sockaddr_in insock;
189			struct protoent *protox;
190			struct linger linger_opt;
191
192			#ifdef WIN32 /* **win32 - we init a windows socket /
193			WSADATA w;
194
195			socket_info.max_filedescriptor = 1; /* used in select, ignored in winsockets */
196			WSAStartup (0x0101, &w); /* this setup all socket stuff */
197			/* ill include no error tests here, winsocket 1.1 should always work */
198			/* except some old win95 versions without tcp/ip stack */
199			#else /* non windows */
200
201			# ifdef HAVE_SYSCONF
202			socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX);
203			# else
204	elmex	1.1	# ifdef HAVE_GETDTABLESIZE
205	root	1.7	socket_info.max_filedescriptor = getdtablesize ();
206	elmex	1.1	# else
207			"Unable to find usable function to get max filedescriptors";
208			# endif
209	root	1.7	# endif
210	elmex	1.1	#endif /* win32 */
211
212	root	1.7	socket_info.timeout.tv_sec = 0;
213			socket_info.timeout.tv_usec = 0;
214			socket_info.nconns = 0;
215	elmex	1.1
216			#ifdef CS_LOGSTATS
217	root	1.7	memset (&cst_tot, 0, sizeof (CS_Stats));
218			memset (&cst_lst, 0, sizeof (CS_Stats));
219			cst_tot.time_start = time (NULL);
220			cst_lst.time_start = time (NULL);
221	elmex	1.1	#endif
222
223	root	1.7	LOG (llevDebug, "Initialize new client/server data\n");
224			socket_info.nconns = 1;
225			init_sockets = (NewSocket *) malloc (sizeof (NewSocket));
226			init_sockets[0].faces_sent = NULL; /* unused */
227			socket_info.allocated_sockets = 1;
228
229			protox = getprotobyname ("tcp");
230			if (protox == NULL)
231			{
232			LOG (llevError, "init_ericserver: Error getting protox\n");
233			return;
234	elmex	1.1	}
235	root	1.7	init_sockets[0].fd = socket (PF_INET, SOCK_STREAM, protox->p_proto);
236			if (init_sockets[0].fd == -1)
237			{
238			LOG (llevError, "Cannot create socket: %s\n", strerror (errno));
239			exit (-1);
240	elmex	1.1	}
241	root	1.7	insock.sin_family = AF_INET;
242			insock.sin_port = htons (settings.csport);
243			insock.sin_addr.s_addr = htonl (INADDR_ANY);
244
245			linger_opt.l_onoff = 0;
246			linger_opt.l_linger = 0;
247			if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_LINGER, (char *) &linger_opt, sizeof (struct linger)))
248			{
249			LOG (llevError, "Cannot setsockopt(SO_LINGER): %s\n", strerror (errno));
250	elmex	1.1	}
251	root	1.7
252	elmex	1.1	/* Would be nice to have an autoconf check for this. It appears that
253			* these functions are both using the same calling syntax, just one
254			* of them needs extra valus passed.
255			*/
256			#if defined(__osf__) \|\| defined(hpux) \|\| defined(sgi) \|\| defined(NeXT) \|\| \
257			defined(__sun__) \|\| defined(__linux__) \|\| defined(SVR4) \|\| \
258			defined(__FreeBSD__) \|\| defined(__OpenBSD__) \|\| \
259			defined(WIN32) /* ---win32 add this here */ \|\| \
260	root	1.7	defined(__GNU__) /* HURD */
261			{
262			# ifdef WIN32
263	elmex	1.1	char tmp = 1;
264	root	1.7	# else
265			int tmp = 1;
266			# endif
267
268			if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof (tmp)))
269			{
270			LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno));
271			}
272			}
273	elmex	1.1	#else
274	root	1.7	if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, (char *) NULL, 0))
275			{
276			LOG (llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror (errno));
277	elmex	1.1	}
278			#endif
279
280	root	1.7	if (bind (init_sockets[0].fd, (struct sockaddr *) &insock, sizeof (insock)) == (-1))
281			{
282			LOG (llevError, "Cannot bind socket to port %d: %s\n", ntohs (insock.sin_port), strerror (errno));
283			#ifdef WIN32 /* **win32: close() -> closesocket() /
284			shutdown (init_sockets[0].fd, SD_BOTH);
285			closesocket (init_sockets[0].fd);
286	elmex	1.1	#else
287	root	1.7	close (init_sockets[0].fd);
288	elmex	1.1	#endif /* win32 */
289	root	1.7	exit (-1);
290	elmex	1.1	}
291	root	1.7	if (listen (init_sockets[0].fd, 5) == (-1))
292			{
293			LOG (llevError, "Cannot listen on socket: %s\n", strerror (errno));
294			#ifdef WIN32 /* **win32: close() -> closesocket() /
295			shutdown (init_sockets[0].fd, SD_BOTH);
296			closesocket (init_sockets[0].fd);
297	elmex	1.1	#else
298	root	1.7	close (init_sockets[0].fd);
299	elmex	1.1	#endif /* win32 */
300	root	1.7	exit (-1);
301	elmex	1.1	}
302	root	1.7	init_sockets[0].status = Ns_Add;
303			read_client_images ();
304	elmex	1.1	}
305
306
307			/*******************************************************************************
308			*
309			* Start of functions dealing with freeing of the data.
310			*
311			******************************************************************************/
312
313			/** Free's all the memory that ericserver allocates. */
314	root	1.7	void
315			free_all_newserver (void)
316			{
317			LOG (llevDebug, "Freeing all new client/server information.\n");
318			free_socket_images ();
319			free (init_sockets);
320	elmex	1.1	}
321
322			/**
323			* Frees a socket.
324			* Basically, all we need to do here is free all data structures that
325			* might be associated with the socket. It is up to the caller to
326			* update the list
327			*/
328
329	root	1.7	void
330			free_newsocket (NewSocket * ns)
331	elmex	1.1	{
332	root	1.7	#ifdef WIN32 /* **win32: closesocket in windows style /
333			shutdown (ns->fd, SD_BOTH);
334			if (closesocket (ns->fd))
335			{
336	elmex	1.1	#else
337	root	1.7	if (close (ns->fd))
338			{
339	elmex	1.1	#endif /* win32 */
340
341			#ifdef ESRV_DEBUG
342	root	1.7	LOG (llevDebug, "Error closing socket %d\n", ns->fd);
343	elmex	1.1	#endif
344			}
345	root	1.7	if (ns->stats.range)
346			free (ns->stats.range);
347			if (ns->stats.title)
348			free (ns->stats.title);
349			if (ns->comment)
350			free (ns->comment);
351			free (ns->host);
352			free (ns->inbuf.buf);
353	elmex	1.1	}
354
355			/** Sends the 'goodbye' command to the player, and closes connection. */
356	root	1.7	void
357			final_free_player (player *pl)
358	elmex	1.1	{
359	root	1.7	cs_write_string (&pl->socket, "goodbye", 8);
360			free_newsocket (&pl->socket);
361			free_player (pl);
362	elmex	1.1	}