ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/socket/init.C
(Generate patch)

Comparing deliantra/server/socket/init.C (file contents):
Revision 1.7 by root, Sun Sep 10 13:43:33 2006 UTC vs.
Revision 1.33 by pippijn, Sat Jan 6 14:42:31 2007 UTC

1
2/*
3 * static char *rcsid_init_c =
4 * "$Id: init.C,v 1.7 2006/09/10 13:43:33 root Exp $";
5 */
6
7/* 1/*
8 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
9 3
4 Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team
10 Copyright (C) 2001 Mark Wedel 5 Copyright (C) 2001 Mark Wedel
11 Copyright (C) 1992 Frank Tore Johansen 6 Copyright (C) 1992 Frank Tore Johansen
12 7
13 This program is free software; you can redistribute it and/or modify 8 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 9 it under the terms of the GNU General Public License as published by
22 17
23 You should have received a copy of the GNU General Public License 18 You should have received a copy of the GNU General Public License
24 along with this program; if not, write to the Free Software 19 along with this program; if not, write to the Free Software
25 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 20 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 21
27 The author can be reached via e-mail to crossfire-devel@real-time.com 22 The author can be reached via e-mail to <crossfire@schmorp.de>
28*/ 23*/
29 24
30/** 25/**
31 * \file 26 * \file
32 * Socket general functions 27 * Socket general functions
36 * Mainly deals with initialization and higher level socket 31 * Mainly deals with initialization and higher level socket
37 * maintenance (checking for lost connections and if data has arrived.) 32 * maintenance (checking for lost connections and if data has arrived.)
38 * The reading of data is handled in ericserver.c 33 * The reading of data is handled in ericserver.c
39 */ 34 */
40 35
41
42#include <global.h> 36#include <global.h>
43#ifndef __CEXTRACT__
44# include <sproto.h> 37#include <sproto.h>
45#endif
46#ifndef WIN32 /* ---win32 exclude include files */
47# include <sys/types.h> 38#include <sys/types.h>
48# include <sys/time.h> 39#include <sys/time.h>
49# include <sys/socket.h> 40#include <sys/socket.h>
50# include <netinet/in.h> 41#include <netinet/in.h>
42#include <netinet/tcp.h>
43#include <netinet/ip.h>
51# include <netdb.h> 44#include <netdb.h>
52#endif /* win32 */
53 45
54#ifdef HAVE_UNISTD_H
55# include <unistd.h> 46#include <unistd.h>
56#endif
57
58#ifdef HAVE_ARPA_INET_H
59# include <arpa/inet.h> 47#include <arpa/inet.h>
60#endif
61#include <newserver.h>
62 48
63Socket_Info socket_info; 49#include <algorithm>
64NewSocket *init_sockets; 50
51sockvec clients;
65 52
66/** 53/**
67 * Initializes a connection. Really, it just sets up the data structure, 54 * Initializes a connection. Really, it just sets up the data structure,
68 * socket setup is handled elsewhere. We do send a version to the 55 * socket setup is handled elsewhere. We do send a version to the
69 * client. 56 * client.
70 */ 57 */
71void 58client::client (int fd, const char *peername)
72InitConnection (NewSocket * ns, const char *from_ip) 59: fd (fd), host (strdup (peername)),
60 socket_ev (this, &client::socket_cb),
61 cmd_ev (this, &client::cmd_cb),
62 cc_inv (this), cc_other (this)
73{ 63{
74 SockList sl; 64 {
75 char buf[256]; 65 struct linger linger_opt;
66
67 linger_opt.l_onoff = 0;
68 linger_opt.l_linger = 0;
69
70 if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
71 LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
72 }
73
74 {
75 int val = IPTOS_LOWDELAY;
76
77 if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
78 LOG (llevError, "IP_TOS: %s\n", strerror (errno));
79 }
80
81 {
82 int val = 1;
83
84 if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
85 LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
86 }
87
88#ifdef __linux__
89 {
90 int val;
91
92 // set some very aggressive keepalive parameters
93 val = 10;
94 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
95 LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
96
97 val = 5;
98 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
99 LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
100
101 val = 1;
102 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
103 LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
104 }
105#endif
106
107 {
76 int bufsize = 65535; /*Supposed absolute upper limit */ 108 int bufsize = 65535; /*Supposed absolute upper limit */
77 int oldbufsize; 109 int oldbufsize;
78 int buflen = sizeof (int); 110 int buflen = sizeof (int);
79 111
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) 112 if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
87 {
88 LOG (llevError, "InitConnection: Error on fcntl.\n"); 113 LOG (llevError, "InitConnection: Error on fcntl.\n");
89 }
90#endif /* end win32 */
91 114
92 if (getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1) 115 if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1)
93 oldbufsize = 0; 116 oldbufsize = 0;
117
94 if (oldbufsize < bufsize) 118 if (oldbufsize < bufsize)
95 {
96#ifdef ESRV_DEBUG
97 LOG (llevDebug, "Default buffer size was %d bytes, will reset it to %d\n", oldbufsize, bufsize);
98#endif
99 if (setsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize))) 119 if (setsockopt (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); 120 LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
102 } 121
103 }
104 buflen = sizeof (oldbufsize); 122 buflen = sizeof (oldbufsize);
105 getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen); 123 getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen);
106#ifdef ESRV_DEBUG 124 }
107 LOG (llevDebug, "Socket buffer size now %d bytes\n", oldbufsize);
108#endif
109 125
110 ns->faceset = 0; 126 state = ST_SETUP;
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; 127 mapmode = Map0Cmd;
117 ns->darkness = 1; 128 darkness = 1;
118 ns->status = Ns_Add;
119 ns->comment = NULL;
120 ns->old_mode = (Old_Mode) 0;
121 ns->mapx = 11; 129 mapx = 11;
122 ns->mapy = 11; 130 mapy = 11;
123 ns->newmapcmd = 0;
124 ns->itemcmd = 1; /* Default is version item1 command */ 131 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 132
136 /* we should really do some checking here - if total clients overflows 133 faces_sent = salloc0<uint8> (nrofpixmaps);
137 * we need to do something more intelligent, because client id's will start 134
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 135 /* 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 136 * this face. Face 0 is sent to the client to say clear
154 * face information. 137 * face information.
155 */ 138 */
156 ns->faces_sent[0] = NS_FACESENT_FACE; 139 faces_sent[0] = NS_FACESENT_FACE;
157 140
158 ns->outputbuffer.start = 0; 141 // socket I/O is low priority
159 ns->outputbuffer.len = 0; 142 // we prefer to have the server run instead of handling client requests
160 ns->can_write = 1; 143 socket_ev.prio (PE_PRIO_NORMAL + 1);
161 ns->password_fails = 0; 144 socket_ev.fd (fd);
145 socket_ev.poll (PE_R);
162 146
163 ns->current_map = 0; 147 // command handling is even lower priority
164 ns->current_x = 0; 148 // that way no client can monopolise the server
165 ns->current_y = 0; 149 cmd_ev.prio (PE_PRIO_NORMAL + 2);
166 ns->client[0] = 0;
167 ns->buggy_mapscroll = 0;
168 150
169 ns->sent_scroll = 0; 151 // initialisation done, kick it!
170 ns->host = strdup_local (from_ip);
171 sprintf ((char *) buf, "version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO); 152 send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
172 sl.buf = (unsigned char *) buf; 153 flush ();
173 sl.len = strlen ((char *) buf); 154
174 Send_With_Handling (ns, &sl); 155 // clients are externally referenced by the socket
175#ifdef CS_LOGSTATS 156 refcnt_inc ();
176 if (socket_info.nconns > cst_tot.max_conn) 157 clients.push_back (this);
177 cst_tot.max_conn = socket_info.nconns; 158
178 if (socket_info.nconns > cst_lst.max_conn) 159#if 0//TODO
179 cst_lst.max_conn = socket_info.nconns; 160 socket_info.nconns++;
161 if (socket_info.nconns > cst_tot.max_conn) cst_tot.max_conn = socket_info.nconns;
162 if (socket_info.nconns > cst_lst.max_conn) cst_lst.max_conn = socket_info.nconns;
180#endif 163#endif
181} 164}
182 165
166client::~client ()
167{
168 sockvec::iterator i = find (clients.begin (), clients.end (), this);
169 if (i != clients.end ())
170 clients.erase (i);
171
172 sfree<uint8> (faces_sent, nrofpixmaps);
173 free (stats.range);
174 free (stats.title);
175 free (host);
176}
177
178void
179client::do_destroy ()
180{
181 attachable::do_destroy ();
182
183 if (pl)
184 pl->disconnect ();
185
186 if (fd >= 0)
187 close (fd);
188
189 state = ST_DEAD;
190
191 socket_ev.suspend ();
192 cmd_ev.suspend ();
193
194 // socket now longer references us
195 refcnt_dec ();
196}
183 197
184/** This sets up the socket and reads all the image information into memory. */ 198/** This sets up the socket and reads all the image information into memory. */
185void 199void
186init_ericserver (void) 200init_ericserver (void)
187{ 201{
188 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# ifdef HAVE_GETDTABLESIZE
205 socket_info.max_filedescriptor = getdtablesize ();
206# else
207 "Unable to find usable function to get max filedescriptors";
208# endif
209# endif
210#endif /* win32 */
211
212 socket_info.timeout.tv_sec = 0;
213 socket_info.timeout.tv_usec = 0;
214 socket_info.nconns = 0;
215
216#ifdef CS_LOGSTATS
217 memset (&cst_tot, 0, sizeof (CS_Stats));
218 memset (&cst_lst, 0, sizeof (CS_Stats));
219 cst_tot.time_start = time (NULL); 202 cst_tot.time_start = time (NULL);
220 cst_lst.time_start = time (NULL); 203 cst_lst.time_start = time (NULL);
221#endif
222 204
223 LOG (llevDebug, "Initialize new client/server data\n"); 205 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 206
229 protox = getprotobyname ("tcp");
230 if (protox == NULL)
231 {
232 LOG (llevError, "init_ericserver: Error getting protox\n");
233 return;
234 }
235 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 }
241 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 }
251
252/* 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 defined(__GNU__) /* HURD */
261 {
262# ifdef WIN32
263 char tmp = 1;
264# 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#else
274 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 }
278#endif
279
280 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#else
287 close (init_sockets[0].fd);
288#endif /* win32 */
289 exit (-1);
290 }
291 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#else
298 close (init_sockets[0].fd);
299#endif /* win32 */
300 exit (-1);
301 }
302 init_sockets[0].status = Ns_Add;
303 read_client_images (); 207 read_client_images ();
304} 208}
305 209
306 210
307/******************************************************************************* 211/*******************************************************************************
314void 218void
315free_all_newserver (void) 219free_all_newserver (void)
316{ 220{
317 LOG (llevDebug, "Freeing all new client/server information.\n"); 221 LOG (llevDebug, "Freeing all new client/server information.\n");
318 free_socket_images (); 222 free_socket_images ();
319 free (init_sockets);
320} 223}
321 224
322/** 225client *
323 * Frees a socket. 226client::create (int fd, const char *peername)
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
329void
330free_newsocket (NewSocket * ns)
331{ 227{
332#ifdef WIN32 /* ***win32: closesocket in windows style */ 228 if (checkbanned (NULL, peername))
333 shutdown (ns->fd, SD_BOTH);
334 if (closesocket (ns->fd))
335 { 229 {
336#else 230 LOG (llevInfo, "Banned host tried to connect: [%s]\n", peername);
337 if (close (ns->fd)) 231 return 0;
232 }
233 else
338 { 234 {
339#endif /* win32 */ 235 client *ns = new client (dup (fd), peername);
340 236
341#ifdef ESRV_DEBUG 237 ns->instantiate (); // effectively a nop right now
342 LOG (llevDebug, "Error closing socket %d\n", ns->fd); 238
343#endif 239 INVOKE_CLIENT (CONNECT, ns);
240
241 return ns;
344 } 242 }
345 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} 243}
354 244
355/** Sends the 'goodbye' command to the player, and closes connection. */
356void
357final_free_player (player *pl)
358{
359 cs_write_string (&pl->socket, "goodbye", 8);
360 free_newsocket (&pl->socket);
361 free_player (pl);
362}

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines