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.5 by root, Tue Aug 29 08:01:38 2006 UTC vs.
Revision 1.50 by root, Tue Jul 24 04:55:35 2007 UTC

1/* 1/*
2 * static char *rcsid_init_c = 2 * This file is part of Crossfire TRT, the Roguelike Realtime MORPG.
3 * "$Id: init.C,v 1.5 2006/08/29 08:01:38 root Exp $"; 3 *
4 * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team
5 * Copyright (©) 2001,2007 Mark Wedel
6 * Copyright (©) 1992,2007 Frank Tore Johansen
7 *
8 * Crossfire TRT is free software: you can redistribute it and/or modify
9 * it under the terms of the GNU General Public License as published by
10 * the Free Software Foundation, either version 3 of the License, or
11 * (at your option) any later version.
12 *
13 * This program is distributed in the hope that it will be useful,
14 * but WITHOUT ANY WARRANTY; without even the implied warranty of
15 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16 * GNU General Public License for more details.
17 *
18 * You should have received a copy of the GNU General Public License
19 * along with this program. If not, see <http://www.gnu.org/licenses/>.
20 *
21 * The authors can be reached via e-mail to <crossfire@schmorp.de>
4 */ 22 */
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 23
29/** 24/**
30 * \file 25 * \file
31 * Socket general functions 26 * Socket general functions
32 * 27 *
… …
35 * Mainly deals with initialization and higher level socket 30 * Mainly deals with initialization and higher level socket
36 * maintenance (checking for lost connections and if data has arrived.) 31 * maintenance (checking for lost connections and if data has arrived.)
37 * The reading of data is handled in ericserver.c 32 * The reading of data is handled in ericserver.c
38 */ 33 */
39 34
40
41#include <global.h> 35#include <global.h>
42#ifndef __CEXTRACT__
43#include <sproto.h> 36#include <sproto.h>
44#endif
45#ifndef WIN32 /* ---win32 exclude include files */
46#include <sys/types.h> 37#include <sys/types.h>
47#include <sys/time.h> 38#include <sys/time.h>
48#include <sys/socket.h> 39#include <sys/socket.h>
49#include <netinet/in.h> 40#include <netinet/in.h>
41#include <netinet/tcp.h>
42#include <netinet/ip.h>
50#include <netdb.h> 43#include <netdb.h>
51#endif /* win32 */
52 44
53#ifdef HAVE_UNISTD_H
54#include <unistd.h> 45#include <unistd.h>
55#endif
56
57#ifdef HAVE_ARPA_INET_H
58#include <arpa/inet.h> 46#include <arpa/inet.h>
59#endif
60#include <newserver.h>
61 47
62Socket_Info socket_info; 48#include <algorithm>
63NewSocket *init_sockets; 49
50// use relatively small values, as we do not expect to receive much,
51// and we do userspace write buffering
52// 8kb limits throughput to roughly 66kb/s
53#define SOCKET_RCVBUF 8192
54#define SOCKET_SNDBUF 16384
55
56sockvec clients;
64 57
65/** 58/**
66 * Initializes a connection. Really, it just sets up the data structure, 59 * Initializes a connection. Really, it just sets up the data structure,
67 * socket setup is handled elsewhere. We do send a version to the 60 * socket setup is handled elsewhere. We do send a version to the
68 * client. 61 * client.
69 */ 62 */
70void InitConnection(NewSocket *ns, const char *from_ip) 63client::client (int fd, const char *peername)
64: fd (fd), host (strdup (peername)),
65 socket_ev (this, &client::socket_cb),
66 cmd_ev (this, &client::cmd_cb)
71{ 67{
72 SockList sl; 68 refcnt_inc (); // the socket is an external reference
73 char buf[256]; 69
70 mss = 1500 - 52; // 1500 typical ethernet frame, 66 typical tcp header overhead
71
72 {
73 struct linger linger_opt;
74
75 linger_opt.l_onoff = 0;
76 linger_opt.l_linger = 0;
77
78 if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
79 LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
80 }
81
82 {
83 int val;
84
85#ifdef SO_RCVBUF
86 val = SOCKET_RCVBUF;
87 if (setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &val, sizeof (val)))
88 LOG (llevError, "SO_RCVBUF: %s\n", strerror (errno));
89#endif
90
91#ifdef SO_SNDBUF
92 val = SOCKET_SNDBUF;
93 if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &val, sizeof (val)))
94 LOG (llevError, "SO_SNDBUF: %s\n", strerror (errno));
95#endif
96
97#ifdef IP_TOS
98 val = IPTOS_LOWDELAY;
99 if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
100 LOG (llevError, "IP_TOS: %s\n", strerror (errno));
101#endif
102
103#ifdef TCP_NODELAY
104 val = 1;
105 if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
106 LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
107#endif
108
109 // set some very aggressive keepalive parameters
110#ifdef TCP_KEEPIDLE
111 val = 1;
112 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
113 LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
114#endif
115
116#ifdef TCP_KEEPCNT
117 val = 3;
118 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
119 LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
120#endif
121
122#ifdef TCP_KEEPINTVL
123 val = 1;
124 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
125 LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
126#endif
127
128 // try to find the mss value in use
129#ifdef TCP_MAXSEG
130 socklen_t sl = sizeof (val);
131 if (!getsockopt (fd, IPPROTO_TCP, TCP_MAXSEG, &val, &sl) && sl == sizeof (val))
132 mss = val;
133#endif
134 }
135
136 {
74 int bufsize=65535; /*Supposed absolute upper limit */ 137 int bufsize = 65535; /*Supposed absolute upper limit */
75 int oldbufsize; 138 int oldbufsize;
76 int buflen=sizeof(int); 139 int buflen = sizeof (int);
77 140
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) { 141 if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
85 LOG(llevError,"InitConnection: Error on fcntl.\n"); 142 LOG (llevError, "InitConnection: Error on fcntl.\n");
143
144 if (getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1)
145 oldbufsize = 0;
146
147 if (oldbufsize < bufsize)
148 if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &bufsize, sizeof (&bufsize)))
149 LOG (llevError, "InitConnection: setsockopt unable to set output buf size to %d\n", bufsize);
150
151 buflen = sizeof (oldbufsize);
152 getsockopt (fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen);
153 }
154
155 state = ST_SETUP;
156 mapmode = Map0Cmd;
157 darkness = 1;
158 mapx = 11;
159 mapy = 11;
160 itemcmd = 1; /* Default is version item1 command */
161 max_rate = 100000 / (1000000 / MAX_TIME); // ~1mbit is assumed per default
162
163 /* Do this so we don't send a face command for the client for
164 * this face. Face 0 is sent to the client to say clear
165 * face information.
166 */
167 faces_sent[0] = true;
168 fx_want [FT_FACE] = true; // all clients must support image faces
169
170 socket_ev.prio (PE_PRIO_NORMAL);
171 socket_ev.fd (fd);
172 socket_ev.poll (PE_R);
173
174 cmd_ev.prio (PE_PRIO_NORMAL);
175
176 // initialisation done, kick it!
177 send_packet_printf ("version %d %d %s\n", VERSION_CS, VERSION_SC, VERSION_INFO);
178 flush ();
179
180 reset_stats ();
181
182 clients.insert (this);
183}
184
185client::~client ()
186{
187 clients.erase (this);
188
189 free (stats.range);
190 free (stats.title);
191 free (host);
192}
193
194void
195client::do_destroy ()
196{
197 attachable::do_destroy ();
198
199 if (pl)
200 pl->disconnect ();
201
202 if (fd >= 0)
203 {
204 send_packet ("goodbye");
205 flush ();
206
207 close (fd);
86 } 208 }
87#endif /* end win32 */
88 209
89 if (getsockopt(ns->fd,SOL_SOCKET,SO_SNDBUF, (char*)&oldbufsize, (socklen_t*) &buflen)==-1) 210 state = ST_DEAD;
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 211
105 ns->faceset = 0; 212 socket_ev.suspend ();
106 ns->facecache = 0; 213 cmd_ev.suspend ();
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 ns->extmap = 0;
130 214
131 /* we should really do some checking here - if total clients overflows 215 refcnt_dec (); // socket no longer open
132 * we need to do something more intelligent, because client id's will start 216}
133 * duplicating (not likely in normal cases, but malicous attacks that 217
134 * just open and close connections could get this total up. 218void
219client::reset_stats ()
220{
221 /* we need to clear these to -1 and not zero - otherwise,
222 * if a player quits and starts a new character, we wont
223 * send new values to the client, as things like exp start
224 * at zero.
135 */ 225 */
136 ns->inbuf.len=0; 226 for (int i = 0; i < NUM_SKILLS; i++)
137 ns->inbuf.buf= (unsigned char*) malloc( sizeof( unsigned char ) * MAXSOCKBUF ); 227 last_skill_exp[i] = -1;
138 /* Basic initialization. Needed because we do a check in
139 * HandleClient for oldsocketmode without checking the
140 * length of data.
141 */
142 memset( ns->inbuf.buf, 0, sizeof( unsigned char ) * MAXSOCKBUF );
143 memset(&ns->lastmap,0,sizeof(struct Map));
144 memset(ns->faces_sent, 0, ns->faces_sent_len*sizeof(*ns->faces_sent));
145 memset(&ns->anims_sent,0,sizeof(ns->anims_sent));
146 memset(&ns->stats,0,sizeof(struct statsinfo));
147 /* Do this so we don't send a face command for the client for
148 * this face. Face 0 is sent to the client to say clear
149 * face information.
150 */
151 ns->faces_sent[0] = NS_FACESENT_FACE;
152 228
153 ns->outputbuffer.start=0; 229 for (int i = 0; i < NROFATTACKS; i++)
154 ns->outputbuffer.len=0; 230 last_resist[i] = -1;
155 ns->can_write=1;
156 ns->password_fails = 0;
157 231
158 ns->current_map = 0; 232 last_weapon_sp = -1;
159 ns->current_x = 0; 233 last_level = -1;
160 ns->current_y = 0; 234 last_stats.exp = -1;
161 ns->client[0] = 0; 235 last_weight = (uint32) - 1;
162 ns->buggy_mapscroll = 0; 236 last_flags = 0;
237 last_weight = 0;
238 last_weight_limit = 0;
239 last_path_attuned = 0;
240 last_path_repelled = 0;
241 last_path_denied = 0;
242 last_speed = 0;
243 last_flags = 0;
163 244
164 ns->sent_scroll=0; 245 static living zero_living;
165 ns->host=strdup_local(from_ip); 246 last_stats = zero_living;
166 sprintf((char*)buf, "version %d %d %s\n", VERSION_CS,VERSION_SC, VERSION_INFO);
167 sl.buf=(unsigned char*)buf;
168 sl.len=strlen((char*)buf);
169 Send_With_Handling(ns, &sl);
170#ifdef CS_LOGSTATS
171 if (socket_info.nconns>cst_tot.max_conn)
172 cst_tot.max_conn = socket_info.nconns;
173 if (socket_info.nconns>cst_lst.max_conn)
174 cst_lst.max_conn = socket_info.nconns;
175#endif
176} 247}
177 248
178 249client *
179/** This sets up the socket and reads all the image information into memory. */ 250client::create (int fd, const char *peername)
180void init_ericserver(void)
181{ 251{
182 struct sockaddr_in insock; 252 client *ns = new client (dup (fd), peername);
183 struct protoent *protox; 253 ns->instantiate (); // effectively a nop right now
184 struct linger linger_opt; 254 INVOKE_CLIENT (CONNECT, ns);
185 255 return ns;
186#ifdef WIN32 /* ***win32 - we init a windows socket */
187 WSADATA w;
188
189 socket_info.max_filedescriptor = 1; /* used in select, ignored in winsockets */
190 WSAStartup (0x0101,&w); /* this setup all socket stuff */
191 /* ill include no error tests here, winsocket 1.1 should always work */
192 /* except some old win95 versions without tcp/ip stack */
193#else /* non windows */
194
195#ifdef HAVE_SYSCONF
196 socket_info.max_filedescriptor = sysconf(_SC_OPEN_MAX);
197#else
198# ifdef HAVE_GETDTABLESIZE
199 socket_info.max_filedescriptor = getdtablesize();
200# else
201 "Unable to find usable function to get max filedescriptors";
202# endif
203#endif
204#endif /* win32 */
205
206 socket_info.timeout.tv_sec = 0;
207 socket_info.timeout.tv_usec = 0;
208 socket_info.nconns=0;
209
210#ifdef CS_LOGSTATS
211 memset(&cst_tot, 0, sizeof(CS_Stats));
212 memset(&cst_lst, 0, sizeof(CS_Stats));
213 cst_tot.time_start=time(NULL);
214 cst_lst.time_start=time(NULL);
215#endif
216
217 LOG(llevDebug,"Initialize new client/server data\n");
218 socket_info.nconns = 1;
219 init_sockets = (NewSocket *) malloc(sizeof(NewSocket));
220 init_sockets[0].faces_sent = NULL; /* unused */
221 socket_info.allocated_sockets=1;
222
223 protox = getprotobyname("tcp");
224 if (protox==NULL) {
225 LOG(llevError,"init_ericserver: Error getting protox\n");
226 return;
227 }
228 init_sockets[0].fd = socket(PF_INET, SOCK_STREAM, protox->p_proto);
229 if (init_sockets[0].fd == -1) {
230 LOG(llevError, "Cannot create socket: %s\n", strerror_local(errno));
231 exit(-1);
232 }
233 insock.sin_family = AF_INET;
234 insock.sin_port = htons(settings.csport);
235 insock.sin_addr.s_addr = htonl(INADDR_ANY);
236
237 linger_opt.l_onoff = 0;
238 linger_opt.l_linger = 0;
239 if(setsockopt(init_sockets[0].fd,SOL_SOCKET,SO_LINGER,(char *) &linger_opt,
240 sizeof(struct linger))) {
241 LOG(llevError, "Cannot setsockopt(SO_LINGER): %s\n", strerror_local(errno));
242 }
243/* Would be nice to have an autoconf check for this. It appears that
244 * these functions are both using the same calling syntax, just one
245 * of them needs extra valus passed.
246 */
247#if defined(__osf__) || defined(hpux) || defined(sgi) || defined(NeXT) || \
248 defined(__sun__) || defined(__linux__) || defined(SVR4) || \
249 defined(__FreeBSD__) || defined(__OpenBSD__) || \
250 defined(WIN32) /* ---win32 add this here */ || \
251 defined(__GNU__) /* HURD */
252 {
253#ifdef WIN32
254 char tmp = 1;
255#else
256 int tmp =1;
257#endif
258
259 if(setsockopt(init_sockets[0].fd,SOL_SOCKET,SO_REUSEADDR, &tmp, sizeof(tmp))) {
260 LOG(llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror_local(errno));
261 }
262 }
263#else
264 if(setsockopt(init_sockets[0].fd,SOL_SOCKET,SO_REUSEADDR,(char *)NULL,0)) {
265 LOG(llevError, "Cannot setsockopt(SO_REUSEADDR): %s\n", strerror_local(errno));
266 }
267#endif
268
269 if (bind(init_sockets[0].fd,(struct sockaddr *)&insock,sizeof(insock)) == (-1)) {
270 LOG(llevError, "Cannot bind socket to port %d: %s\n", ntohs(insock.sin_port), strerror_local(errno));
271#ifdef WIN32 /* ***win32: close() -> closesocket() */
272 shutdown(init_sockets[0].fd,SD_BOTH);
273 closesocket(init_sockets[0].fd);
274#else
275 close(init_sockets[0].fd);
276#endif /* win32 */
277 exit(-1);
278 }
279 if (listen(init_sockets[0].fd,5) == (-1)) {
280 LOG(llevError, "Cannot listen on socket: %s\n", strerror_local(errno));
281#ifdef WIN32 /* ***win32: close() -> closesocket() */
282 shutdown(init_sockets[0].fd,SD_BOTH);
283 closesocket(init_sockets[0].fd);
284#else
285 close(init_sockets[0].fd);
286#endif /* win32 */
287 exit(-1);
288 }
289 init_sockets[0].status=Ns_Add;
290 read_client_images();
291} 256}
292 257
293
294/*******************************************************************************
295 *
296 * Start of functions dealing with freeing of the data.
297 *
298 ******************************************************************************/
299
300/** Free's all the memory that ericserver allocates. */
301void free_all_newserver(void)
302{
303 LOG(llevDebug,"Freeing all new client/server information.\n");
304 free_socket_images();
305 free(init_sockets);
306}
307
308/**
309 * Frees a socket.
310 * Basically, all we need to do here is free all data structures that
311 * might be associated with the socket. It is up to the caller to
312 * update the list
313 */
314
315void free_newsocket(NewSocket *ns)
316{
317#ifdef WIN32 /* ***win32: closesocket in windows style */
318 shutdown(ns->fd,SD_BOTH);
319 if (closesocket(ns->fd)) {
320#else
321 if (close(ns->fd)) {
322#endif /* win32 */
323
324#ifdef ESRV_DEBUG
325 LOG(llevDebug,"Error closing socket %d\n", ns->fd);
326#endif
327 }
328 if (ns->stats.range)
329 free(ns->stats.range);
330 if (ns->stats.title)
331 free(ns->stats.title);
332 if (ns->comment)
333 free(ns->comment);
334 free(ns->host);
335 free(ns->inbuf.buf);
336}
337
338/** Sends the 'goodbye' command to the player, and closes connection. */
339void final_free_player(player *pl)
340{
341 cs_write_string(&pl->socket, "goodbye", 8);
342 free_newsocket(&pl->socket);
343 free_player(pl);
344}
345

Diff Legend

– Removed lines
+ Added lines
< Changed lines
> Changed lines