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.10 by pippijn, Mon Dec 11 19:46:47 2006 UTC vs.
Revision 1.67 by root, Mon Apr 12 05:22:38 2010 UTC

1/* 1/*
2 CrossFire, A Multiplayer game for X-windows 2 * This file is part of Deliantra, the Roguelike Realtime MMORPG.
3 3 *
4 Copyright (C) 2001 Mark Wedel 4 * Copyright (©) 2005,2006,2007,2008,2009,2010 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5 Copyright (C) 1992 Frank Tore Johansen 5 *
6 6 * Deliantra is free software: you can redistribute it and/or modify it under
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 7 * the terms of the Affero GNU General Public License as published by the
9 the Free Software Foundation; either version 2 of the License, or 8 * Free Software Foundation, either version 3 of the License, or (at your
10 (at your option) any later version. 9 * option) any later version.
11 10 *
12 This program is distributed in the hope that it will be useful, 11 * This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of 12 * but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 13 * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details. 14 * GNU General Public License for more details.
16 15 *
17 You should have received a copy of the GNU General Public License 16 * You should have received a copy of the Affero GNU General Public License
18 along with this program; if not, write to the Free Software 17 * and the GNU General Public License along with this program. If not, see
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 18 * <http://www.gnu.org/licenses/>.
20 19 *
21 The author can be reached via e-mail to <crossfire@schmorp.de> 20 * The authors can be reached via e-mail to <support@deliantra.net>
22*/ 21 */
23 22
24/** 23/*
25 * \file
26 * Socket general functions 24 * 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 */ 25 */
34 26
35
36#include <global.h> 27#include <global.h>
37#ifndef __CEXTRACT__
38# include <sproto.h> 28#include <sproto.h>
39#endif
40#include <sys/types.h> 29#include <sys/types.h>
41#include <sys/time.h> 30#include <sys/time.h>
42#include <sys/socket.h> 31#include <sys/socket.h>
43#include <netinet/in.h> 32#include <netinet/in.h>
33#include <netinet/tcp.h>
34#include <netinet/ip.h>
44#include <netdb.h> 35#include <netdb.h>
45 36
46#ifdef HAVE_UNISTD_H
47# include <unistd.h> 37#include <unistd.h>
48#endif
49
50#ifdef HAVE_ARPA_INET_H
51# include <arpa/inet.h> 38#include <arpa/inet.h>
52#endif
53#include <newserver.h>
54 39
55Socket_Info socket_info; 40#include <algorithm>
56NewSocket *init_sockets; 41
42// use relatively small values, as we do not expect to receive much,
43// and we do userspace write buffering
44// 8kb limits throughput to roughly 66kb/s
45#define SOCKET_RCVBUF 8192
46#define SOCKET_SNDBUF 16384
47
48sockvec clients;
57 49
58/** 50/**
59 * Initializes a connection. Really, it just sets up the data structure, 51 * Initializes a connection. Really, it just sets up the data structure,
60 * socket setup is handled elsewhere. We do send a version to the 52 * socket setup is handled elsewhere. We do send a version to the
61 * client. 53 * client.
62 */ 54 */
63void 55client::client (int fd, const char *peername)
64InitConnection (NewSocket * ns, const char *from_ip) 56: fd (fd), host (strdup (peername)),
57 socket_ev (this, &client::socket_cb)
65{ 58{
66 SockList sl; 59 refcnt_inc (); // the socket is an external reference
67 char buf[256];
68 int bufsize = 65535; /*Supposed absolute upper limit */
69 int oldbufsize;
70 int buflen = sizeof (int);
71 60
61 mss = 1500 - 52; // 1500 typical ethernet frame, 66 typical tcp header overhead
62
63 socket_timeout = 16.;
64
65 {
66 struct linger linger_opt;
67
68 linger_opt.l_onoff = 0;
69 linger_opt.l_linger = 0;
70
71 if (setsockopt (fd, SOL_SOCKET, SO_LINGER, &linger_opt, sizeof (struct linger)))
72 LOG (llevError, "SO_LINGER: %s\n", strerror (errno));
73 }
74
75 {
76 int val;
77
78#ifdef SO_RCVBUF
79 val = SOCKET_RCVBUF;
80 if (setsockopt (fd, SOL_SOCKET, SO_RCVBUF, &val, sizeof (val)))
81 LOG (llevError, "SO_RCVBUF: %s\n", strerror (errno));
82#endif
83
84#ifdef SO_SNDBUF
85 val = SOCKET_SNDBUF;
86 if (setsockopt (fd, SOL_SOCKET, SO_SNDBUF, &val, sizeof (val)))
87 LOG (llevError, "SO_SNDBUF: %s\n", strerror (errno));
88#endif
89
90#ifdef IP_TOS
91 val = IPTOS_LOWDELAY;
92 if (setsockopt (fd, IPPROTO_IP, IP_TOS, &val, sizeof (val)))
93 LOG (llevError, "IP_TOS: %s\n", strerror (errno));
94#endif
95
96#ifdef TCP_NODELAY
97 val = 1;
98 if (setsockopt (fd, IPPROTO_TCP, TCP_NODELAY, &val, sizeof (val)))
99 LOG (llevError, "TCP_NODELAY: %s\n", strerror (errno));
100#endif
101
102 // set some very aggressive keepalive parameters
103#ifdef TCP_KEEPIDLE
104 val = 1;
105 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPIDLE, &val, sizeof (val)))
106 LOG (llevError, "TCP_KEEPIDLE: %s\n", strerror (errno));
107#endif
108
109#ifdef TCP_KEEPCNT
110 val = 3;
111 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPCNT, &val, sizeof (val)))
112 LOG (llevError, "TCP_KEEPCNT: %s\n", strerror (errno));
113#endif
114
115#ifdef TCP_KEEPINTVL
116 val = 1;
117 if (setsockopt (fd, IPPROTO_TCP, TCP_KEEPINTVL, &val, sizeof (val)))
118 LOG (llevError, "TCP_KEEPINTVL: %s\n", strerror (errno));
119#endif
120
121 // try to find the mss value in use
122#ifdef TCP_MAXSEG
123 socklen_t sl = sizeof (val);
124 if (!getsockopt (fd, IPPROTO_TCP, TCP_MAXSEG, &val, &sl) && sl == sizeof (val))
125 mss = val;
126#endif
127 }
128
72 if (fcntl (ns->fd, F_SETFL, O_NONBLOCK) == -1) 129 if (fcntl (fd, F_SETFL, O_NONBLOCK) == -1)
73 {
74 LOG (llevError, "InitConnection: Error on fcntl.\n"); 130 LOG (llevError, "InitConnection: Error on fcntl.\n");
75 }
76 131
77 if (getsockopt (ns->fd, SOL_SOCKET, SO_SNDBUF, (char *) &oldbufsize, (socklen_t *) & buflen) == -1) 132 state = ST_SETUP;
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; 133 mapmode = Map1aCmd;
102 ns->darkness = 1;
103 ns->status = Ns_Add;
104 ns->mapx = 11; 134 mapx = 11;
105 ns->mapy = 11; 135 mapy = 11;
106 ns->newmapcmd = 0;
107 ns->itemcmd = 1; /* Default is version item1 command */ 136 itemcmd = 1; /* Default is version item1 command */
108 ns->ext_mapinfos = 0; /*extendedmapinfo datas */ 137 max_rate = 100000 / (1000000 / MAX_TIME); // ~1mbit is assumed per default
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 138
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 139 /* 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 140 * this face. Face 0 is sent to the client to say clear
137 * face information. 141 * face information.
138 */ 142 */
139 ns->faces_sent[0] = NS_FACESENT_FACE; 143 faces_sent[0] = true;
144 fx_want [FT_FACE] = true; // all clients must support image faces
140 145
141 ns->outputbuffer.start = 0; 146 socket_ev.set (fd, EV_READ);
142 ns->outputbuffer.len = 0; 147 socket_ev.prio (2); // one higher than the ticker priority
143 ns->can_write = 1; 148 socket_ev.start ();
144 ns->password_fails = 0;
145 149
146 ns->current_map = 0; 150 // initialisation done, kick it!
147 ns->current_x = 0; 151 INVOKE_CLIENT (CONNECT, this);
148 ns->current_y = 0;
149 ns->client[0] = 0;
150 ns->buggy_mapscroll = 0;
151 152
152 ns->sent_scroll = 0; 153 flush ();
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 154
155 reset_stats ();
166 156
167/** This sets up the socket and reads all the image information into memory. */ 157 clients.insert (this);
158}
159
160client::~client ()
161{
162 clients.erase (this);
163
164 mapinfo_queue_clear ();
165 free (stats.range);
166 free (stats.title);
167 free (host);
168}
169
168void 170void
169init_ericserver (void) 171client::do_destroy ()
170{ 172{
171 struct sockaddr_in insock; 173 INVOKE_CLIENT (CLIENT_DESTROY, this);
172 struct protoent *protox; 174 attachable::do_destroy ();
173 struct linger linger_opt;
174 175
175#ifdef HAVE_SYSCONF 176 if (pl)
176 socket_info.max_filedescriptor = sysconf (_SC_OPEN_MAX); 177 pl->disconnect ();
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 178
185 socket_info.timeout.tv_sec = 0; 179 if (fd >= 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 { 180 {
205 LOG (llevError, "init_ericserver: Error getting protox\n"); 181 send_packet ("goodbye");
206 return; 182 flush ();
183
184 close (fd);
207 } 185 }
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 186
218 linger_opt.l_onoff = 0; 187 state = ST_DEAD;
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 188
225/* Would be nice to have an autoconf check for this. It appears that 189 socket_ev.stop ();
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 190
237 if (setsockopt (init_sockets[0].fd, SOL_SOCKET, SO_REUSEADDR, &tmp, sizeof (tmp))) 191 refcnt_dec (); // socket no longer open
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} 192}
264 193
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. */
273void 194void
274free_all_newserver (void) 195client::reset_stats ()
275{ 196{
276 LOG (llevDebug, "Freeing all new client/server information.\n"); 197 /* we need to clear these to -1 and not zero - otherwise,
277 free_socket_images (); 198 * if a player quits and starts a new character, we wont
278 free (init_sockets); 199 * send new values to the client, as things like exp start
279} 200 * at zero.
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 */ 201 */
202 for (int i = 0; i < NUM_SKILLS; i++)
203 last_skill_exp[i] = -1;
287 204
288void 205 for (int i = 0; i < NROFATTACKS; i++)
289free_newsocket (NewSocket * ns) 206 last_resist[i] = -1;
290{
291 if (close (ns->fd))
292 {
293 207
294#ifdef ESRV_DEBUG 208 last_weapon_sp = -1;
295 LOG (llevDebug, "Error closing socket %d\n", ns->fd); 209 last_level = -1;
296#endif 210 last_stats.exp = -1;
297 } 211 last_flags = 0;
212 last_weight = -1;
213 last_weight_limit = 0;
214 last_path_attuned = 0;
215 last_path_repelled = 0;
216 last_path_denied = 0;
217 last_speed = 0;
218 last_flags = 0;
298 219
299 if (ns->stats.range) 220 static living zero_living;
300 free (ns->stats.range); 221 last_stats = zero_living;
301
302 if (ns->stats.title)
303 free (ns->stats.title);
304
305 free (ns->host);
306 free (ns->inbuf.buf);
307} 222}
308 223
309/** Sends the 'goodbye' command to the player, and closes connection. */ 224client *
310void 225client::create (int fd, const char *peername)
311final_free_player (player *pl)
312{ 226{
313 cs_write_string (&pl->socket, "goodbye", 8); 227 client *ns = new client (dup (fd), peername);
314 free_newsocket (&pl->socket); 228
315 free_player (pl); 229 ns->instantiate (); // effectively a nop right now
230
231 return ns;
316} 232}
233

Diff Legend

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