server/socket/init.C

/*
 * static char *rcsid_init_c =
 *    "$Id: init.C,v 1.1 2006-08-13 17:16:05 elmex 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;

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