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

Comparing deliantra/server/socket/loop.C (file contents):
Revision 1.1 by elmex, Sun Aug 13 17:16:06 2006 UTC vs.
Revision 1.10 by root, Wed Dec 13 02:55:51 2006 UTC

1
2/*
3 * static char *rcsid_loop_c =
4 * "$Id: loop.C,v 1.1 2006/08/13 17:16:06 elmex Exp $";
5 */
6
7/* 1/*
8 CrossFire, A Multiplayer game for X-windows 2 CrossFire, A Multiplayer game for X-windows
9 3
10 Copyright (C) 2002-2003 Mark Wedel & The Crossfire Development Team 4 Copyright (C) 2002-2003 Mark Wedel & The Crossfire Development Team
11 Copyright (C) 1992 Frank Tore Johansen 5 Copyright (C) 1992 Frank Tore Johansen
… …
22 16
23 You should have received a copy of the GNU General Public License 17 You should have received a copy of the GNU General Public License
24 along with this program; if not, write to the Free Software 18 along with this program; if not, write to the Free Software
25 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. 19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26 20
27 The author can be reached via e-mail to crossfire-devel@real-time.com 21 The author can be reached via e-mail to <crossfire@schmorp.de>
28*/ 22*/
29 23
30/** 24/**
31 * \file 25 * \file
32 * Main client/server loops. 26 * Main client/server loops.
… …
38 * The reading of data is handled in ericserver.c 32 * The reading of data is handled in ericserver.c
39 */ 33 */
40 34
41 35
42#include <global.h> 36#include <global.h>
43#ifndef __CEXTRACT__
44#include <sproto.h> 37#include <sproto.h>
45#include <sockproto.h> 38#include <sockproto.h>
46#endif
47 39
48#ifndef WIN32 /* ---win32 exclude unix headers */
49#include <sys/types.h> 40#include <sys/types.h>
50#include <sys/time.h> 41#include <sys/time.h>
51#include <sys/socket.h> 42#include <sys/socket.h>
52#include <netinet/in.h> 43#include <netinet/in.h>
53#include <netdb.h> 44#include <netdb.h>
54#endif /* end win32 */
55 45
56#ifdef HAVE_UNISTD_H 46#ifdef HAVE_UNISTD_H
57#include <unistd.h> 47# include <unistd.h>
58#endif 48#endif
59 49
60#ifdef HAVE_ARPA_INET_H 50#ifdef HAVE_ARPA_INET_H
61#include <arpa/inet.h> 51# include <arpa/inet.h>
62#endif 52#endif
63 53
64#include <loader.h> 54#include <loader.h>
65#include <newserver.h> 55#include <newserver.h>
66 56
… …
75 * before player joins, and those happen after the player has joined. 65 * before player joins, and those happen after the player has joined.
76 * As such, we have function types that might be called, so 66 * As such, we have function types that might be called, so
77 * we end up having 2 tables. 67 * we end up having 2 tables.
78 */ 68 */
79 69
80typedef void (*func_uint8_int_ns) (char*, int, NewSocket *); 70typedef void (*func_uint8_int_ns) (char *, int, NewSocket *);
81 71
82struct NsCmdMapping { 72struct NsCmdMapping
73{
83 const char *cmdname; 74 const char *cmdname;
84 func_uint8_int_ns cmdproc; 75 func_uint8_int_ns cmdproc;
85}; 76};
86 77
87typedef void (*func_uint8_int_pl)(char*, int, player *); 78typedef void (*func_uint8_int_pl) (char *, int, player *);
88struct PlCmdMapping { 79struct PlCmdMapping
80{
89 const char *cmdname; 81 const char *cmdname;
90 func_uint8_int_pl cmdproc; 82 func_uint8_int_pl cmdproc;
91 uint8 flag; 83 uint8 flag;
92}; 84};
93 85
94/** 86/**
95 * Dispatch table for the server. 87 * Dispatch table for the server.
96 * 88 *
… …
103 * to cast it here instead of a bunch of times in the function itself. 95 * to cast it here instead of a bunch of times in the function itself.
104 * flag is 1 if the player must be in the playing state to issue the 96 * flag is 1 if the player must be in the playing state to issue the
105 * command, 0 if they can issue it at any time. 97 * command, 0 if they can issue it at any time.
106 */ 98 */
107static struct PlCmdMapping plcommands[] = { 99static struct PlCmdMapping plcommands[] = {
108 { "examine", ExamineCmd, 1}, 100 {"examine", ExamineCmd, 1},
109 { "apply", ApplyCmd, 1}, 101 {"apply", ApplyCmd, 1},
110 { "move", MoveCmd, 1}, 102 {"move", MoveCmd, 1},
111 { "reply", ReplyCmd, 0}, 103 {"reply", ReplyCmd, 0},
112 { "command", PlayerCmd, 1}, 104 {"command", PlayerCmd, 1},
113 { "ncom", (func_uint8_int_pl)NewPlayerCmd, 1}, 105 {"ncom", (func_uint8_int_pl) NewPlayerCmd, 1},
114 { "lookat", LookAt, 1}, 106 {"lookat", LookAt, 1},
115 { "lock", (func_uint8_int_pl)LockItem, 1}, 107 {"lock", (func_uint8_int_pl) LockItem, 1},
116 { "mark", (func_uint8_int_pl)MarkItem, 1}, 108 {"mark", (func_uint8_int_pl) MarkItem, 1},
117 { "mapredraw", MapRedrawCmd, 0}, /* Added: phil */ 109 {"mapredraw", MapRedrawCmd, 0}, /* Added: phil */
118 { "mapinfo", MapInfoCmd, 2}, /* CF+ */ 110 {"mapinfo", MapInfoCmd, 2}, /* CF+ */
119 { "ext", ExtCmd, 2}, /* CF+ */ 111 {"ext", ExtCmd, 2}, /* CF+ */
120 { NULL, NULL, 0} /* terminator */ 112 {NULL, NULL, 0} /* terminator */
121}; 113};
122 114
123/** Face-related commands */ 115/** Face-related commands */
124static struct NsCmdMapping nscommands[] = { 116static struct NsCmdMapping nscommands[] = {
125 { "addme", AddMeCmd }, 117 {"addme", AddMeCmd},
126 { "askface", SendFaceCmd}, /* Added: phil */ 118 {"askface", SendFaceCmd}, /* Added: phil */
127 { "requestinfo", RequestInfo}, 119 {"requestinfo", RequestInfo},
128 { "setfacemode", SetFaceMode}, 120 {"setfacemode", SetFaceMode},
129 { "setsound", SetSound}, 121 {"setsound", SetSound},
130 { "setup", SetUp}, 122 {"setup", SetUp},
131 { "version", VersionCmd }, 123 {"version", VersionCmd},
132 { "toggleextendedinfos", ToggleExtendedInfos}, /*Added: tchize*/ 124 {"toggleextendedinfos", ToggleExtendedInfos}, /*Added: tchize */
133 { "toggleextendedtext", ToggleExtendedText}, /*Added: tchize*/ 125 {"toggleextendedtext", ToggleExtendedText}, /*Added: tchize */
134 { "asksmooth", AskSmooth}, /*Added: tchize (smoothing technologies)*/ 126 {"asksmooth", AskSmooth}, /*Added: tchize (smoothing technologies) */
135 { NULL, NULL} /* terminator (I, II & III)*/ 127 {NULL, NULL} /* terminator (I, II & III) */
136}; 128};
137 129
138/** 130/**
139 * RequestInfo is sort of a meta command. There is some specific 131 * RequestInfo is sort of a meta command. There is some specific
140 * request of information, but we call other functions to provide 132 * request of information, but we call other functions to provide
141 * that information. 133 * that information.
142 */ 134 */
135void
143void RequestInfo(char *buf, int len, NewSocket *ns) 136RequestInfo (char *buf, int len, NewSocket * ns)
144{ 137{
145 char *params=NULL, *cp; 138 char *params = NULL, *cp;
139
146 /* No match */ 140 /* No match */
147 char bigbuf[MAX_BUF]; 141 char bigbuf[MAX_BUF];
148 int slen; 142 int slen;
149 143
150 /* Set up replyinfo before we modify any of the buffers - this is used 144 /* Set up replyinfo before we modify any of the buffers - this is used
151 * if we don't find a match. 145 * if we don't find a match.
152 */ 146 */
153 strcpy(bigbuf,"replyinfo "); 147 strcpy (bigbuf, "replyinfo ");
154 slen = strlen(bigbuf); 148 slen = strlen (bigbuf);
155 safe_strcat(bigbuf, buf, &slen, MAX_BUF); 149 safe_strcat (bigbuf, buf, &slen, MAX_BUF);
156 150
157 /* find the first space, make it null, and update the 151 /* find the first space, make it null, and update the
158 * params pointer. 152 * params pointer.
159 */ 153 */
160 for (cp = buf; *cp != '\0'; cp++) 154 for (cp = buf; *cp != '\0'; cp++)
161 if (*cp==' ') { 155 if (*cp == ' ')
156 {
162 *cp = '\0'; 157 *cp = '\0';
163 params = cp + 1; 158 params = cp + 1;
164 break; 159 break;
165 } 160 }
166 if (!strcmp(buf, "image_info")) send_image_info(ns, params); 161
167 else if (!strcmp(buf,"image_sums")) send_image_sums(ns, params); 162 if (!strcmp (buf, "image_info"))
168 else if (!strcmp(buf,"skill_info")) send_skill_info(ns, params); 163 send_image_info (ns, params);
169 else if (!strcmp(buf,"spell_paths")) send_spell_paths(ns, params); 164 else if (!strcmp (buf, "image_sums"))
165 send_image_sums (ns, params);
166 else if (!strcmp (buf, "skill_info"))
167 send_skill_info (ns, params);
168 else if (!strcmp (buf, "spell_paths"))
169 send_spell_paths (ns, params);
170 else
170 else Write_String_To_Socket(ns, bigbuf, len); 171 Write_String_To_Socket (ns, bigbuf, len);
171} 172}
172
173/**
174 * Handles old socket format.
175 */
176void Handle_Oldsocket(NewSocket *ns)
177{
178 int stat,i;
179 CommFunc command;
180 char buf[MAX_BUF],*cp;
181 object ob;
182 player pl;
183
184 /* This is not the most efficient block, but keeps the code simpler -
185 * we basically read a byte at a time until we get a newline, error,
186 * or no more characters to read.
187 */
188 do {
189 /* hack to disable old socket mode without creating too many conflicts */
190 if (1 || ns->inbuf.len >= MAXSOCKBUF-1) {
191 ns->status = Ns_Dead;
192 LOG(llevDebug, "Old input socket sent too much data without newline\n");
193 return;
194 }
195#ifdef WIN32 /* ***win32: change oldsocket read() to recv() */
196 stat = recv(ns->fd, ns->inbuf.buf + ns->inbuf.len, 1,0);
197
198 if (stat==-1 && WSAGetLastError() !=WSAEWOULDBLOCK) {
199#else
200 do {
201 stat = read(ns->fd, ns->inbuf.buf + ns->inbuf.len, 1);
202 } while ((stat<0) && (errno == EINTR));
203
204 if (stat<0 && errno != EAGAIN && errno !=EWOULDBLOCK) {
205#endif
206 LOG(llevError, "Cannot read from socket: %s\n", strerror_local(errno));
207 ns->status = Ns_Dead;
208 return;
209 }
210 if (stat == 0) return;
211 } while (ns->inbuf.buf[ns->inbuf.len++]!='\n');
212
213 ns->inbuf.buf[ns->inbuf.len]=0;
214
215 cp = strchr((const char*)ns->inbuf.buf, ' ');
216 if (cp) {
217 /* Replace the space with a null, skip any more spaces */
218 *cp++=0;
219 while (isspace(*cp)) cp++;
220 }
221
222 /* Strip off all spaces and control characters from end of line */
223 for (i=ns->inbuf.len-1; i>=0; i--) {
224 if (ns->inbuf.buf[i]<=32) ns->inbuf.buf[i]=0;
225 else break;
226 }
227 ns->inbuf.len=0; /* reset for next read */
228
229 /* If just a return, don't do anything */
230 if (ns->inbuf.buf[0] == 0) return;
231 if (!strcasecmp((const char*)ns->inbuf.buf,"quit")) {
232 ns->status = Ns_Dead;
233 return;
234 }
235 if (!strcasecmp((const char*)ns->inbuf.buf, "listen")) {
236 if (cp) {
237 char *buf="Socket switched to listen mode\n";
238
239 free(ns->comment);
240 ns->comment = strdup_local(cp);
241 ns->old_mode = Old_Listen;
242 cs_write_string(ns, buf, strlen(buf));
243 } else {
244 char *buf="Need to supply a comment/url to listen\n";
245 cs_write_string(ns, buf, strlen(buf));
246 }
247 return;
248 }
249 if (!strcasecmp((const char*)ns->inbuf.buf, "name")) {
250 char *cp1=NULL;
251 if (cp) cp1= strchr(cp, ' ');
252 if (cp1) {
253 *cp1++ = 0;
254 while (isspace(*cp1)) cp1++;
255 }
256 if (!cp || !cp1) {
257 char *buf="Need to provide a name/password to name\n";
258 cs_write_string(ns, buf, strlen(buf));
259 return;
260 }
261
262 if (verify_player(cp, cp1)==0) {
263 char *buf="Welcome back\n";
264 free(ns->comment);
265 ns->comment = strdup_local(cp);
266 ns->old_mode = Old_Player;
267 cs_write_string(ns, buf, strlen(buf));
268 }
269 else if (verify_player(cp, cp1)==2) {
270 ns->password_fails++;
271 if (ns->password_fails >= MAX_PASSWORD_FAILURES) {
272 char *buf="You failed to log in too many times, you will now be kicked.\n";
273 LOG(llevInfo, "A player connecting from %s in oldsocketmode has been dropped for password failure\n",
274 ns->host);
275 cs_write_string(ns, buf, strlen(buf));
276 ns->status = Ns_Dead;
277 }
278 else {
279 char *buf="Could not login you in. Check your name and password.\n";
280 cs_write_string(ns, buf, strlen(buf));
281 }
282 }
283 else {
284 char *buf="Could not login you in. Check your name and password.\n";
285 cs_write_string(ns, buf, strlen(buf));
286 }
287 return;
288 }
289
290 command = find_oldsocket_command((char*)ns->inbuf.buf);
291 if (!command && ns->old_mode==Old_Player) {
292 command = find_oldsocket_command2((char*)ns->inbuf.buf);
293 }
294 if (!command) {
295 snprintf(buf, sizeof(buf), "Could not find command: %s\n", ns->inbuf.buf);
296 cs_write_string(ns, buf, strlen(buf));
297 return;
298 }
299
300 /* This is a bit of a hack, but works. Basically, we make some
301 * fake object and player pointers and give at it.
302 * This works as long as the functions we are calling don't need
303 * to do anything to the object structure (ie, they are only
304 * outputting information and not actually updating anything much.)
305 */
306 ob.contr = &pl;
307 pl.ob = &ob;
308 ob.type = PLAYER;
309 pl.listening = 10;
310 pl.socket = *ns;
311 pl.outputs_count = 1;
312 ob.name = ns->comment;
313
314 command(&ob, cp);
315}
316
317 173
318/** 174/**
319 * Handle client input. 175 * Handle client input.
320 * 176 *
321 * HandleClient is actually not named really well - we only get here once 177 * HandleClient is actually not named really well - we only get here once
… …
323 * sock is the output socket information. pl is the player associated 179 * sock is the output socket information. pl is the player associated
324 * with this socket, null if no player (one of the init_sockets for just 180 * with this socket, null if no player (one of the init_sockets for just
325 * starting a connection) 181 * starting a connection)
326 */ 182 */
327 183
184void
328void HandleClient(NewSocket *ns, player *pl) 185HandleClient (NewSocket * ns, player *pl)
329{ 186{
330 int len=0,i,cnt; 187 int len = 0, i, cnt;
331 char *data; 188 char *data;
332 189
333 /* Loop through this - maybe we have several complete packets here. */ 190 /* Loop through this - maybe we have several complete packets here. */
334 // limit to a few commands only, though, as to not monopolise the server 191 // limit to a few commands only, though, as to not monopolise the server
335 for (cnt = 16; cnt--; ) { 192 for (cnt = 16; cnt--;)
193 {
336 /* If it is a player, and they don't have any speed left, we 194 /* If it is a player, and they don't have any speed left, we
337 * return, and will read in the data when they do have time. 195 * return, and will read in the data when they do have time.
338 */ 196 */
339 if (pl && pl->state==ST_PLAYING && pl->ob != NULL && pl->ob->speed_left < 0) { 197 if (pl && pl->state == ST_PLAYING && pl->ob != NULL && pl->ob->speed_left < 0)
198 {
340 return; 199 return;
341 } 200 }
342 201
343 if (ns->status == Ns_Old) {
344 Handle_Oldsocket(ns);
345 return;
346 }
347 i=SockList_ReadPacket(ns->fd, &ns->inbuf, MAXSOCKBUF-1); 202 i = SockList_ReadPacket (ns->fd, &ns->inbuf, MAXSOCKBUF - 1);
348 /* Special hack - let the user switch to old mode if in the Ns_Add
349 * phase. Don't demand they add in the special length bytes
350 */
351 if (ns->status == Ns_Add) {
352 if (!strncasecmp((const char*)ns->inbuf.buf,"oldsocketmode", 13)) {
353 ns->status = Ns_Old;
354 ns->inbuf.len=0;
355 cs_write_string(ns, "Switched to old socket mode\n", 28);
356 LOG(llevDebug,"Switched socket to old socket mode\n");
357 return;
358 }
359 }
360 203
361 if (i<0) { 204 if (i < 0)
205 {
362#ifdef ESRV_DEBUG 206#ifdef ESRV_DEBUG
363 LOG(llevDebug,"HandleClient: Read error on connection player %s\n", (pl?pl->ob->name:"None")); 207 LOG (llevDebug, "HandleClient: Read error on connection player %s\n", (pl ? pl->ob->name : "None"));
364#endif 208#endif
365 /* Caller will take care of cleaning this up */ 209 /* Caller will take care of cleaning this up */
366 ns->status =Ns_Dead; 210 ns->status = Ns_Dead;
367 return; 211 return;
368 } 212 }
369 /* Still dont have a full packet */ 213 /* Still dont have a full packet */
370 if (i==0) return; 214 if (i == 0)
215 return;
371 216
372// //D//TODO//temporarily log long commands 217// //D//TODO//temporarily log long commands
373// if (ns->inbuf.len >= 40 && pl && pl->ob) 218// if (ns->inbuf.len >= 40 && pl && pl->ob)
374// LOG (llevDebug, "HandleClient: long comamnd from <%s,%s> %d<%s>\n", pl->ob->name, ns->host, ns->inbuf.len, ns->inbuf.buf + 2); 219// LOG (llevDebug, "HandleClient: long comamnd from <%s,%s> %d<%s>\n", pl->ob->name, ns->host, ns->inbuf.len, ns->inbuf.buf + 2);
375 220
376 /* First, break out beginning word. There are at least 221 /* First, break out beginning word. There are at least
377 * a few commands that do not have any paremeters. If 222 * a few commands that do not have any paremeters. If
378 * we get such a command, don't worry about trying 223 * we get such a command, don't worry about trying
379 * to break it up. 224 * to break it up.
380 */ 225 */
381 data = (char *)strchr((char*)ns->inbuf.buf +2, ' '); 226 data = (char *) strchr ((char *) ns->inbuf.buf + 2, ' ');
382 if (data) { 227 if (data)
228 {
383 *data='\0'; 229 *data = '\0';
384 data++; 230 data++;
385 len = ns->inbuf.len - (data - (char*)ns->inbuf.buf); 231 len = ns->inbuf.len - (data - (char *) ns->inbuf.buf);
386 } 232 }
387 else len=0; 233 else
234 len = 0;
388 235
389 ns->inbuf.buf[ns->inbuf.len]='\0'; /* Terminate buffer - useful for string data */ 236 ns->inbuf.buf[ns->inbuf.len] = '\0'; /* Terminate buffer - useful for string data */
390 for (i=0; nscommands[i].cmdname !=NULL; i++) { 237 for (i = 0; nscommands[i].cmdname != NULL; i++)
238 {
391 if (strcmp((char*)ns->inbuf.buf+2,nscommands[i].cmdname)==0) { 239 if (strcmp ((char *) ns->inbuf.buf + 2, nscommands[i].cmdname) == 0)
240 {
392 nscommands[i].cmdproc((char*)data,len,ns); 241 nscommands[i].cmdproc ((char *) data, len, ns);
393 ns->inbuf.len=0; 242 ns->inbuf.len = 0;
394 return;//D// not doing this causes random memory corruption 243 return; //D// not doing this causes random memory corruption
395 goto next_packet; 244 goto next_packet;
396 } 245 }
397 } 246 }
398 /* Player must be in the playing state or the flag on the 247 /* Player must be in the playing state or the flag on the
399 * the command must be zero for the user to use the command - 248 * the command must be zero for the user to use the command -
400 * otherwise, a player cam save, be in the play_again state, and 249 * otherwise, a player cam save, be in the play_again state, and
401 * the map they were on gets swapped out, yet things that try to look 250 * the map they were on gets swapped out, yet things that try to look
402 * at the map causes a crash. If the command is valid, but 251 * at the map causes a crash. If the command is valid, but
403 * one they can't use, we still swallow it up. 252 * one they can't use, we still swallow it up.
404 */ 253 */
254 if (pl)
405 if (pl) for (i=0; plcommands[i].cmdname !=NULL; i++) { 255 for (i = 0; plcommands[i].cmdname != NULL; i++)
256 {
406 if (strcmp((char*)ns->inbuf.buf+2,plcommands[i].cmdname)==0) { 257 if (strcmp ((char *) ns->inbuf.buf + 2, plcommands[i].cmdname) == 0)
258 {
407 if (pl->state == ST_PLAYING || !(plcommands[i].flag & 1)) 259 if (pl->state == ST_PLAYING || !(plcommands[i].flag & 1))
408 plcommands[i].cmdproc((char*)data,len,pl); 260 plcommands[i].cmdproc ((char *) data, len, pl);
409 ns->inbuf.len=0; 261 ns->inbuf.len = 0;
410 //D// not doing this causes random memory corruption 262 //D// not doing this causes random memory corruption
411 if (plcommands[i].flag & 2) 263 if (plcommands[i].flag & 2)
412 goto next_packet; 264 goto next_packet;
413 return; 265 return;
414 } 266 }
415 } 267 }
416 /* If we get here, we didn't find a valid command. Logging 268 /* If we get here, we didn't find a valid command. Logging
417 * this might be questionable, because a broken client/malicious 269 * this might be questionable, because a broken client/malicious
418 * user could certainly send a whole bunch of invalid commands. 270 * user could certainly send a whole bunch of invalid commands.
419 */ 271 */
420 LOG(llevDebug,"Bad command from client (%s)\n",ns->inbuf.buf+2); 272 LOG (llevDebug, "Bad command from client (%s)\n", ns->inbuf.buf + 2);
421 next_packet: 273 next_packet:
422 ; 274 ;
423 } 275 }
424} 276}
425 277
426 278
427/***************************************************************************** 279/*****************************************************************************
… …
430 * sending. 282 * sending.
431 * 283 *
432 ******************************************************************************/ 284 ******************************************************************************/
433 285
434#ifdef WATCHDOG 286#ifdef WATCHDOG
287
435/** 288/**
436 * Tell watchdog that we are still alive 289 * Tell watchdog that we are still alive
437 * 290 *
438 * I put the function here since we should hopefully already be getting 291 * I put the function here since we should hopefully already be getting
439 * all the needed include files for socket support 292 * all the needed include files for socket support
440 */ 293 */
441 294
295void
442void watchdog(void) 296watchdog (void)
443{ 297{
444 static int fd=-1; 298 static int fd = -1;
445 static struct sockaddr_in insock; 299 static struct sockaddr_in insock;
446 300
447 if (fd==-1) 301 if (fd == -1)
448 { 302 {
449 struct protoent *protoent; 303 struct protoent *protoent;
450 304
451 if ((protoent=getprotobyname("udp"))==NULL || 305 if ((protoent = getprotobyname ("udp")) == NULL || (fd = socket (PF_INET, SOCK_DGRAM, protoent->p_proto)) == -1)
452 (fd=socket(PF_INET, SOCK_DGRAM, protoent->p_proto))==-1)
453 { 306 {
454 return; 307 return;
455 } 308 }
456 insock.sin_family=AF_INET; 309 insock.sin_family = AF_INET;
457 insock.sin_port=htons((unsigned short)13325); 310 insock.sin_port = htons ((unsigned short) 13325);
458 insock.sin_addr.s_addr=inet_addr("127.0.0.1"); 311 insock.sin_addr.s_addr = inet_addr ("127.0.0.1");
459 } 312 }
460 sendto(fd,(void *)&fd,1,0,(struct sockaddr *)&insock,sizeof(insock)); 313 sendto (fd, (void *) &fd, 1, 0, (struct sockaddr *) &insock, sizeof (insock));
461} 314}
462#endif 315#endif
463 316
464extern unsigned long todtick; 317void
465
466/** Waits for new connection */
467static void block_until_new_connection(void)
468{
469
470 struct timeval Timeout;
471 fd_set readfs;
472 int cycles;
473
474 LOG(llevInfo, "Waiting for connections...\n");
475
476 cycles=1;
477 do {
478 /* Every minutes is a bit often for updates - especially if nothing is going
479 * on. This slows it down to every 6 minutes.
480 */
481 cycles++;
482 if (cycles%2 == 0)
483 tick_the_clock();
484
485 FD_ZERO(&readfs);
486 FD_SET((uint32)init_sockets[0].fd, &readfs);
487
488 /* If fastclock is set, we need to seriously slow down the updates
489 * to the metaserver as well as watchdog. Do same for flush_old_maps() -
490 * that is time sensitive, so there is no good reason to call it 2000 times
491 * a second.
492 */
493 if (settings.fastclock > 0) {
494#ifdef WATCHDOG
495 if (cycles % 120000 == 0) {
496 watchdog();
497 flush_old_maps();
498 }
499#endif
500 if (cycles == 720000) {
501 metaserver_update();
502 cycles=1;
503 }
504 Timeout.tv_sec=0;
505 Timeout.tv_usec=50;
506 } else {
507 Timeout.tv_sec=60;
508 Timeout.tv_usec=0;
509 if (cycles == 7) {
510 metaserver_update();
511 cycles=1;
512 }
513 flush_old_maps();
514 }
515 }
516 while (select(socket_info.max_filedescriptor, &readfs, NULL, NULL, &Timeout)==0);
517
518 reset_sleep(); /* Or the game would go too fast */
519}
520
521void flush_sockets(void) 318flush_sockets (void)
522{ 319{
523 player *pl; 320 player *pl;
524 321
525 for (pl = first_player; pl != NULL; pl = pl->next) 322 for (pl = first_player; pl != NULL; pl = pl->next)
526 if (pl->socket.status != Ns_Dead) 323 if (pl->socket.status != Ns_Dead)
527 Socket_Flush (&pl->socket); 324 Socket_Flush (&pl->socket);
528} 325}
529 326
530/** 327/**
531 * This checks the sockets for input and exceptions, does the right thing. 328 * This checks the sockets for input, does the right thing.
532 * 329 *
533 * A bit of this code is grabbed out of socket.c 330 * A bit of this code is grabbed out of socket.c
534 * There are 2 lists we need to look through - init_sockets is a list 331 * There are 2 lists we need to look through - init_sockets is a list
535 * 332 *
536 */ 333 */
334void
537void doeric_server(void) 335doeric_server (void)
538{ 336{
539 int i, pollret; 337 int i, pollret;
540 fd_set tmp_read, tmp_exceptions, tmp_write; 338 fd_set tmp_read, tmp_write;
541 struct sockaddr_in addr; 339 struct sockaddr_in addr;
542 socklen_t addrlen=sizeof(struct sockaddr); 340 socklen_t addrlen = sizeof (struct sockaddr);
543 player *pl, *next; 341 player *pl, *next;
544 342
545#ifdef CS_LOGSTATS 343#ifdef CS_LOGSTATS
546 if ((time(NULL)-cst_lst.time_start)>=CS_LOGTIME) 344 if ((time (NULL) - cst_lst.time_start) >= CS_LOGTIME)
547 write_cs_stats(); 345 write_cs_stats ();
548#endif 346#endif
549 347
550 FD_ZERO(&tmp_read); 348 FD_ZERO (&tmp_read);
551 FD_ZERO(&tmp_write); 349 FD_ZERO (&tmp_write);
552 FD_ZERO(&tmp_exceptions);
553 350
554 for(i=0;i<socket_info.allocated_sockets;i++) { 351 for (i = 0; i < socket_info.allocated_sockets; i++)
352 {
555 if (init_sockets[i].status == Ns_Dead) { 353 if (init_sockets[i].status == Ns_Dead)
354 {
556 free_newsocket(&init_sockets[i]); 355 free_newsocket (&init_sockets[i]);
557 init_sockets[i].status = Ns_Avail; 356 init_sockets[i].status = Ns_Avail;
558 socket_info.nconns--; 357 socket_info.nconns--;
358 }
559 } else if (init_sockets[i].status != Ns_Avail){ 359 else if (init_sockets[i].status != Ns_Avail)
360 {
560 FD_SET((uint32)init_sockets[i].fd, &tmp_read); 361 FD_SET (init_sockets[i].fd, &tmp_read);
561 FD_SET((uint32)init_sockets[i].fd, &tmp_write); 362 FD_SET (init_sockets[i].fd, &tmp_write);
562 FD_SET((uint32)init_sockets[i].fd, &tmp_exceptions); 363 }
563 }
564 } 364 }
565 365
566 /* Go through the players. Let the loop set the next pl value, 366 /* Go through the players. Let the loop set the next pl value,
567 * since we may remove some 367 * since we may remove some
568 */ 368 */
569 for (pl=first_player; pl!=NULL; ) { 369 for (pl = first_player; pl != NULL;)
370 {
570 if (pl->socket.status == Ns_Dead) { 371 if (pl->socket.status == Ns_Dead)
372 {
571 player *npl=pl->next; 373 player *npl = pl->next;
572 374
573 save_player(pl->ob, 0); 375 save_player (pl->ob, 0);
376
574 if(!QUERY_FLAG(pl->ob,FLAG_REMOVED)) { 377 if (!QUERY_FLAG (pl->ob, FLAG_REMOVED))
378 {
575 terminate_all_pets(pl->ob); 379 terminate_all_pets (pl->ob);
576 remove_ob(pl->ob); 380 pl->ob->remove ();
577 } 381 }
382
578 leave(pl,1); 383 leave (pl, 1);
579 final_free_player(pl); 384 final_free_player (pl);
580 pl=npl; 385 pl = npl;
581 } 386 }
582 else { 387 else
388 {
583 FD_SET((uint32)pl->socket.fd, &tmp_read); 389 FD_SET ((uint32) pl->socket.fd, &tmp_read);
584 FD_SET((uint32)pl->socket.fd, &tmp_write); 390 FD_SET ((uint32) pl->socket.fd, &tmp_write);
585 FD_SET((uint32)pl->socket.fd, &tmp_exceptions);
586 pl=pl->next; 391 pl = pl->next;
587 } 392 }
393 }
394
395 /* Reset timeout each time, since some OS's will change the values on
396 * the return from select.
397 */
398 socket_info.timeout.tv_sec = 0;
399 socket_info.timeout.tv_usec = 0;
400
401 pollret = select (socket_info.max_filedescriptor,
402 &tmp_read, &tmp_write, 0,
403 &socket_info.timeout);
404
405 if (pollret == -1)
406 {
407 LOG (llevError, "select failed: %s\n", strerror (errno));
408 return;
409 }
410
411 /* We need to do some of the processing below regardless */
412
413/* if (!pollret) return;*/
414
415 /* Following adds a new connection */
416 if (pollret && FD_ISSET (init_sockets[0].fd, &tmp_read))
417 {
418 int newsocknum = 0;
419
420#ifdef ESRV_DEBUG
421 LOG (llevDebug, "doeric_server: New Connection\n");
422#endif
423 /* If this is the case, all sockets currently in used */
424 if (socket_info.allocated_sockets <= socket_info.nconns)
425 {
426 init_sockets = (NewSocket *) realloc (init_sockets, sizeof (NewSocket) * (socket_info.nconns + 1));
427 if (!init_sockets)
428 fatal (OUT_OF_MEMORY);
429 newsocknum = socket_info.allocated_sockets;
430 socket_info.allocated_sockets++;
431 init_sockets[newsocknum].faces_sent_len = nrofpixmaps;
432 init_sockets[newsocknum].faces_sent = (uint8 *) malloc (nrofpixmaps * sizeof (*init_sockets[newsocknum].faces_sent));
433 if (!init_sockets[newsocknum].faces_sent)
434 fatal (OUT_OF_MEMORY);
435 init_sockets[newsocknum].status = Ns_Avail;
436 }
437 else
438 {
439 int j;
440
441 for (j = 1; j < socket_info.allocated_sockets; j++)
442 if (init_sockets[j].status == Ns_Avail)
443 {
444 newsocknum = j;
445 break;
446 }
447 }
448
449 init_sockets[newsocknum].fd = accept (init_sockets[0].fd, (struct sockaddr *) &addr, &addrlen);
450
451 if (init_sockets[newsocknum].fd == -1)
452 LOG (llevError, "accept failed: %s\n", strerror (errno));
453 else
454 {
455 char buf[MAX_BUF];
456 long ip;
457 NewSocket *ns;
458
459 ns = &init_sockets[newsocknum];
460
461 ip = ntohl (addr.sin_addr.s_addr);
462 sprintf (buf, "%ld.%ld.%ld.%ld", (ip >> 24) & 255, (ip >> 16) & 255, (ip >> 8) & 255, ip & 255);
463
464 if (checkbanned (NULL, buf))
465 {
466 LOG (llevInfo, "Banned host tried to connect: [%s]\n", buf);
467 close (init_sockets[newsocknum].fd);
468 init_sockets[newsocknum].fd = -1;
469 }
470 else
471 {
472 InitConnection (ns, buf);
473 socket_info.nconns++;
474 }
475 }
476 }
477
478 /* Check for any input on the sockets */
479 if (pollret)
480 for (i = 1; i < socket_info.allocated_sockets; i++)
481 {
482 if (init_sockets[i].status == Ns_Avail)
483 continue;
484
485 if (FD_ISSET (init_sockets[i].fd, &tmp_read))
486 HandleClient (&init_sockets[i], NULL);
487
488 if (FD_ISSET (init_sockets[i].fd, &tmp_write))
489 init_sockets[i].can_write = 1;
588 } 490 }
589 491
492 /* This does roughly the same thing, but for the players now */
493 for (pl = first_player; pl != NULL; pl = next)
494 {
495
496 next = pl->next;
497 if (pl->socket.status == Ns_Dead)
498 continue;
499
500 if (FD_ISSET (pl->socket.fd, &tmp_write))
501 {
502 if (!pl->socket.can_write)
503 {
590#if 0 504#if 0
591 // the event system and plugins require the server ti run at all times.
592 // since its primarily cf.schmorp.de we are interested in, and
593 // that is supposed to run all the time anyway, its globally disabled
594 // until we can use Event.
595 if (socket_info.nconns==1 && first_player==NULL)
596 block_until_new_connection();
597#endif
598
599 /* Reset timeout each time, since some OS's will change the values on
600 * the return from select.
601 */
602 socket_info.timeout.tv_sec = 0;
603 socket_info.timeout.tv_usec = 0;
604
605 pollret= select(socket_info.max_filedescriptor, &tmp_read, &tmp_write,
606 &tmp_exceptions, &socket_info.timeout);
607
608 if (pollret==-1) {
609 LOG(llevError, "select failed: %s\n", strerror_local(errno));
610 return;
611 }
612
613 /* We need to do some of the processing below regardless */
614/* if (!pollret) return;*/
615
616 /* Following adds a new connection */
617 if (pollret && FD_ISSET(init_sockets[0].fd, &tmp_read)) {
618 int newsocknum=0;
619
620#ifdef ESRV_DEBUG
621 LOG(llevDebug,"doeric_server: New Connection\n");
622#endif
623 /* If this is the case, all sockets currently in used */
624 if (socket_info.allocated_sockets <= socket_info.nconns) {
625 init_sockets = (NewSocket *) realloc(init_sockets,sizeof(NewSocket)*(socket_info.nconns+1));
626 if (!init_sockets) fatal(OUT_OF_MEMORY);
627 newsocknum = socket_info.allocated_sockets;
628 socket_info.allocated_sockets++;
629 init_sockets[newsocknum].faces_sent_len = nrofpixmaps;
630 init_sockets[newsocknum].faces_sent = (uint8*) malloc(nrofpixmaps*sizeof(*init_sockets[newsocknum].faces_sent));
631 if (!init_sockets[newsocknum].faces_sent) fatal(OUT_OF_MEMORY);
632 init_sockets[newsocknum].status = Ns_Avail;
633 }
634 else {
635 int j;
636
637 for (j=1; j<socket_info.allocated_sockets; j++)
638 if (init_sockets[j].status == Ns_Avail) {
639 newsocknum=j;
640 break;
641 }
642 }
643 init_sockets[newsocknum].fd=accept(init_sockets[0].fd, (struct sockaddr *)&addr, &addrlen);
644 if (init_sockets[newsocknum].fd==-1) {
645 LOG(llevError, "accept failed: %s\n", strerror_local(errno));
646 }
647 else {
648 char buf[MAX_BUF];
649 long ip;
650 NewSocket *ns;
651
652 ns = &init_sockets[newsocknum];
653
654 ip = ntohl(addr.sin_addr.s_addr);
655 sprintf(buf, "%ld.%ld.%ld.%ld", (ip>>24)&255, (ip>>16)&255, (ip>>8)&255, ip&255);
656
657 if (checkbanned(NULL, buf)) {
658 LOG(llevInfo, "Banned host tried to connect: [%s]\n", buf);
659 close(init_sockets[newsocknum].fd);
660 init_sockets[newsocknum].fd = -1;
661 }
662 else {
663 InitConnection(ns, buf);
664 socket_info.nconns++;
665 }
666 }
667 }
668
669 /* Check for any exceptions/input on the sockets */
670 if (pollret) for(i=1;i<socket_info.allocated_sockets;i++) {
671 if (init_sockets[i].status == Ns_Avail) continue;
672 if (FD_ISSET(init_sockets[i].fd,&tmp_exceptions)) {
673 free_newsocket(&init_sockets[i]);
674 init_sockets[i].status = Ns_Avail;
675 socket_info.nconns--;
676 continue;
677 }
678 if (FD_ISSET(init_sockets[i].fd, &tmp_read)) {
679 HandleClient(&init_sockets[i], NULL);
680 }
681 if (FD_ISSET(init_sockets[i].fd, &tmp_write)) {
682 init_sockets[i].can_write=1;
683 }
684 }
685
686 /* This does roughly the same thing, but for the players now */
687 for (pl=first_player; pl!=NULL; pl=next) {
688
689 next=pl->next;
690 if (pl->socket.status==Ns_Dead) continue;
691
692 if (FD_ISSET(pl->socket.fd,&tmp_write)) {
693 if (!pl->socket.can_write) {
694#if 0
695 LOG(llevDebug,"Player %s socket now write enabled\n", pl->ob->name); 505 LOG (llevDebug, "Player %s socket now write enabled\n", pl->ob->name);
696#endif 506#endif
697 pl->socket.can_write=1; 507 pl->socket.can_write = 1;
698 write_socket_buffer(&pl->socket); 508 write_socket_buffer (&pl->socket);
699 } 509 }
510
700 /* if we get an error on the write_socket buffer, no reason to 511 /* if we get an error on the write_socket buffer, no reason to
701 * continue on this socket. 512 * continue on this socket.
702 */ 513 */
703 if (pl->socket.status==Ns_Dead) continue; 514 if (pl->socket.status == Ns_Dead)
704 } 515 continue;
516 }
517 else
705 else pl->socket.can_write=0; 518 pl->socket.can_write = 0;
706 519
707 if (FD_ISSET(pl->socket.fd,&tmp_exceptions)) {
708 save_player(pl->ob, 0);
709 if(!QUERY_FLAG(pl->ob,FLAG_REMOVED)) {
710 terminate_all_pets(pl->ob);
711 remove_ob(pl->ob);
712 }
713 leave(pl,1);
714 final_free_player(pl);
715 }
716 else {
717 HandleClient(&pl->socket, pl); 520 HandleClient (&pl->socket, pl);
718 /* If the player has left the game, then the socket status 521 /* If the player has left the game, then the socket status
719 * will be set to this be the leave function. We don't 522 * will be set to this be the leave function. We don't
720 * need to call leave again, as it has already been called 523 * need to call leave again, as it has already been called
721 * once. 524 * once.
722 */ 525 */
723 if (pl->socket.status==Ns_Dead) { 526 if (pl->socket.status == Ns_Dead)
527 {
724 save_player(pl->ob, 0); 528 save_player (pl->ob, 0);
529
725 if(!QUERY_FLAG(pl->ob,FLAG_REMOVED)) { 530 if (!QUERY_FLAG (pl->ob, FLAG_REMOVED))
531 {
726 terminate_all_pets(pl->ob); 532 terminate_all_pets (pl->ob);
727 remove_ob(pl->ob); 533 pl->ob->remove ();
728 } 534 }
729 leave(pl,1); 535
536 leave (pl, 1);
730 final_free_player(pl); 537 final_free_player (pl);
731 } else { 538 }
732 539 else
540 {
733 /* Update the players stats once per tick. More efficient than 541 /* Update the players stats once per tick. More efficient than
734 * sending them whenever they change, and probably just as useful 542 * sending them whenever they change, and probably just as useful
735 */ 543 */
736 esrv_update_stats(pl); 544 esrv_update_stats (pl);
737 if (pl->last_weight != -1 && pl->last_weight != WEIGHT(pl->ob)) { 545 if (pl->last_weight != -1 && pl->last_weight != WEIGHT (pl->ob))
546 {
738 esrv_update_item(UPD_WEIGHT, pl->ob, pl->ob); 547 esrv_update_item (UPD_WEIGHT, pl->ob, pl->ob);
739 if(pl->last_weight != WEIGHT(pl->ob)) 548 if (pl->last_weight != WEIGHT (pl->ob))
740 LOG(llevError, "esrv_update_item(UPD_WEIGHT) did not set player weight: is %lu, should be %lu\n", (unsigned long)pl->last_weight, WEIGHT(pl->ob)); 549 LOG (llevError, "esrv_update_item(UPD_WEIGHT) did not set player weight: is %lu, should be %lu\n",
741 } 550 (unsigned long) pl->last_weight, WEIGHT (pl->ob));
551 }
552
742 /* draw_client_map does sanity checking that map is 553 /* draw_client_map does sanity checking that map is
743 * valid, so don't do it here. 554 * valid, so don't do it here.
744 */ 555 */
745 draw_client_map(pl->ob); 556 draw_client_map (pl->ob);
746 if (pl->socket.update_look) esrv_draw_look(pl->ob); 557 if (pl->socket.update_look)
747 } 558 esrv_draw_look (pl->ob);
748 } 559 }
749 } 560 }
750} 561}
562

Diff Legend

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