ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/socket/loop.C
Revision: 1.13
Committed: Thu Dec 14 02:37:37 2006 UTC (17 years, 5 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.12: +6 -6 lines
Log Message:
moar\! rewrite\!

File Contents

# Content
1 /*
2 CrossFire, A Multiplayer game for X-windows
3
4 Copyright (C) 2002-2003 Mark Wedel & The Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen
6
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
9 the Free Software Foundation; either version 2 of the License, or
10 (at your option) any later version.
11
12 This program is distributed in the hope that it will be useful,
13 but WITHOUT ANY WARRANTY; without even the implied warranty of
14 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 GNU General Public License for more details.
16
17 You should have received a copy of the GNU General Public License
18 along with this program; if not, write to the Free Software
19 Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
20
21 The author can be reached via e-mail to <crossfire@schmorp.de>
22 */
23
24 /**
25 * \file
26 * Main client/server loops.
27 *
28 * \date 2003-12-02
29 *
30 * loop.c 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 */
34
35
36 #include <global.h>
37 #include <sproto.h>
38 #include <sockproto.h>
39
40 #include <sys/types.h>
41 #include <sys/time.h>
42 #include <sys/socket.h>
43 #include <netinet/in.h>
44 #include <netdb.h>
45
46 #ifdef HAVE_UNISTD_H
47 # include <unistd.h>
48 #endif
49
50 #ifdef HAVE_ARPA_INET_H
51 # include <arpa/inet.h>
52 #endif
53
54 #include <loader.h>
55 #include <newserver.h>
56
57 /*****************************************************************************
58 * Start of command dispatch area.
59 * The commands here are protocol commands.
60 ****************************************************************************/
61
62 /* Either keep this near the start or end of the file so it is
63 * at least reasonablye easy to find.
64 * There are really 2 commands - those which are sent/received
65 * before player joins, and those happen after the player has joined.
66 * As such, we have function types that might be called, so
67 * we end up having 2 tables.
68 */
69
70 typedef void (*func_uint8_int_ns) (char *, int, client_socket *);
71
72 struct NsCmdMapping
73 {
74 const char *cmdname;
75 func_uint8_int_ns cmdproc;
76 uint8 flag;
77 };
78
79 typedef void (*func_uint8_int_pl) (char *, int, player *);
80 struct PlCmdMapping
81 {
82 const char *cmdname;
83 func_uint8_int_pl cmdproc;
84 uint8 flag;
85 };
86
87 /**
88 * Dispatch table for the server.
89 *
90 * CmdMapping is the dispatch table for the server, used in HandleClient,
91 * which gets called when the client has input. All commands called here
92 * use the same parameter form (char* data, int len, int clientnum.
93 * We do implicit casts, because the data that is being passed is
94 * unsigned (pretty much needs to be for binary data), however, most
95 * of these treat it only as strings, so it makes things easier
96 * to cast it here instead of a bunch of times in the function itself.
97 * flag is 1 if the player must be in the playing state to issue the
98 * command, 0 if they can issue it at any time.
99 */
100 static struct PlCmdMapping plcommands[] = {
101 {"examine", ExamineCmd, 1},
102 {"apply", ApplyCmd, 1},
103 {"move", MoveCmd, 1},
104 {"reply", ReplyCmd, 0},
105 {"command", PlayerCmd, 1},
106 {"ncom", (func_uint8_int_pl) NewPlayerCmd, 1},
107 {"lookat", LookAt, 1},
108 {"lock", (func_uint8_int_pl) LockItem, 1},
109 {"mark", (func_uint8_int_pl) MarkItem, 1},
110 {"mapredraw", MapRedrawCmd, 0}, /* Added: phil */
111 {"mapinfo", MapInfoCmd, 2}, /* CF+ */
112 {"ext", ExtCmd, 2}, /* CF+ */
113 { 0 } /* terminator */
114 };
115
116 /** Face-related commands */
117 static struct NsCmdMapping nscommands[] = {
118 {"addme", AddMeCmd, 2},
119 {"askface", SendFaceCmd}, /* Added: phil */
120 {"requestinfo", RequestInfo},
121 {"setfacemode", SetFaceMode, 2},
122 {"setsound", SetSound, 2},
123 {"setup", SetUp, 2},
124 {"version", VersionCmd, 2},
125 {"toggleextendedinfos", ToggleExtendedInfos, 2}, /*Added: tchize */
126 {"toggleextendedtext", ToggleExtendedText, 2}, /*Added: tchize */
127 {"asksmooth", AskSmooth}, /*Added: tchize (smoothing technologies) */
128 { 0 } /* terminator (I, II & III) */
129 };
130
131 /**
132 * RequestInfo is sort of a meta command. There is some specific
133 * request of information, but we call other functions to provide
134 * that information.
135 */
136 void
137 RequestInfo (char *buf, int len, client_socket * ns)
138 {
139 char *params = NULL, *cp;
140
141 /* No match */
142 char bigbuf[MAX_BUF];
143 int slen;
144
145 /* Set up replyinfo before we modify any of the buffers - this is used
146 * if we don't find a match.
147 */
148 strcpy (bigbuf, "replyinfo ");
149 slen = strlen (bigbuf);
150 safe_strcat (bigbuf, buf, &slen, MAX_BUF);
151
152 /* find the first space, make it null, and update the
153 * params pointer.
154 */
155 for (cp = buf; *cp != '\0'; cp++)
156 if (*cp == ' ')
157 {
158 *cp = '\0';
159 params = cp + 1;
160 break;
161 }
162
163 if (!strcmp (buf, "image_info"))
164 send_image_info (ns, params);
165 else if (!strcmp (buf, "image_sums"))
166 send_image_sums (ns, params);
167 else if (!strcmp (buf, "skill_info"))
168 send_skill_info (ns, params);
169 else if (!strcmp (buf, "spell_paths"))
170 send_spell_paths (ns, params);
171 else
172 ns->send_packet (bigbuf, len);
173 }
174
175 /**
176 * Handle client input.
177 *
178 * HandleClient is actually not named really well - we only get here once
179 * there is input, so we don't do exception or other stuff here.
180 * sock is the output socket information. pl is the player associated
181 * with this socket, null if no player (one of the init_sockets for just
182 * starting a connection)
183 */
184
185 void
186 HandleClient (client_socket *ns, player *pl)
187 {
188 /* Loop through this - maybe we have several complete packets here. */
189 // limit to a few commands only, though, as to not monopolise the server
190 for (int repeat = 16; repeat--;)
191 {
192 /* If it is a player, and they don't have any speed left, we
193 * return, and will read in the data when they do have time.
194 */
195 if (pl && pl->state == ST_PLAYING && pl->ob && pl->ob->speed_left < 0)
196 return;
197
198 int pkt_len = ns->read_packet ();
199
200 if (pkt_len < 0)
201 {
202 LOG (llevError, "read error on player %s\n", &pl->ob->name);
203 /* Caller will take care of cleaning this up */
204 ns->status = Ns_Dead;
205 return;
206 }
207 else if (pkt_len == 0)
208 /* Still dont have a full packet */
209 return;
210
211 /* First, break out beginning word. There are at least
212 * a few commands that do not have any paremeters. If
213 * we get such a command, don't worry about trying
214 * to break it up.
215 */
216 int datalen;
217 char *data = strchr ((char *)ns->inbuf + 2, ' ');
218
219 if (data)
220 {
221 *data++ = 0;
222 datalen = pkt_len - (data - (char *)ns->inbuf);
223 }
224 else
225 {
226 data = (char *)ns->inbuf + 2; // better read garbage than segfault
227 datalen = 0;
228 }
229
230 ns->inbuf [pkt_len] = 0; /* Terminate buffer - useful for string data */
231
232 for (int i = 0; nscommands[i].cmdname; i++)
233 {
234 if (!strcmp ((char *)ns->inbuf + 2, nscommands[i].cmdname))
235 {
236 nscommands[i].cmdproc (data, datalen, ns);
237 ns->skip_packet (pkt_len);
238 //D// not doing this causes random memory corruption
239 if (nscommands[i].flag & 2)
240 goto next_packet;
241 return;
242 }
243 }
244
245 /* Player must be in the playing state or the flag on the
246 * the command must be zero for the user to use the command -
247 * otherwise, a player cam save, be in the play_again state, and
248 * the map they were on gets swapped out, yet things that try to look
249 * at the map causes a crash. If the command is valid, but
250 * one they can't use, we still swallow it up.
251 */
252 if (pl)
253 for (int i = 0; plcommands[i].cmdname; i++)
254 {
255 if (!strcmp ((char *)ns->inbuf + 2, plcommands[i].cmdname))
256 {
257 if (pl->state == ST_PLAYING || !(plcommands[i].flag & 1))
258 plcommands[i].cmdproc ((char *) data, datalen, pl);
259
260 ns->skip_packet (pkt_len);
261 //D// not doing this causes random memory corruption
262 if (plcommands[i].flag & 2)
263 goto next_packet;
264
265 return;
266 }
267 }
268
269 printf ("BP34n");//D
270 /* If we get here, we didn't find a valid command. Logging
271 * this might be questionable, because a broken client/malicious
272 * user could certainly send a whole bunch of invalid commands.
273 */
274 LOG (llevDebug, "Bad command from client (%s)\n", ns->inbuf + 2);
275 ns->skip_packet (pkt_len);
276 next_packet:
277 ;
278 }
279 }
280
281
282 /*****************************************************************************
283 *
284 * Low level socket looping - select calls and watchdog udp packet
285 * sending.
286 *
287 ******************************************************************************/
288
289 #ifdef WATCHDOG
290
291 /**
292 * Tell watchdog that we are still alive
293 *
294 * I put the function here since we should hopefully already be getting
295 * all the needed include files for socket support
296 */
297
298 void
299 watchdog (void)
300 {
301 static int fd = -1;
302 static struct sockaddr_in insock;
303
304 if (fd == -1)
305 {
306 struct protoent *protoent;
307
308 if ((protoent = getprotobyname ("udp")) == NULL || (fd = socket (PF_INET, SOCK_DGRAM, protoent->p_proto)) == -1)
309 {
310 return;
311 }
312 insock.sin_family = AF_INET;
313 insock.sin_port = htons ((unsigned short) 13325);
314 insock.sin_addr.s_addr = inet_addr ("127.0.0.1");
315 }
316 sendto (fd, (void *) &fd, 1, 0, (struct sockaddr *) &insock, sizeof (insock));
317 }
318 #endif
319
320 void
321 flush_sockets (void)
322 {
323 player *pl;
324
325 for (pl = first_player; pl != NULL; pl = pl->next)
326 if (pl->socket.status != Ns_Dead)
327 Socket_Flush (&pl->socket);
328 }
329
330 /**
331 * This checks the sockets for input, does the right thing.
332 *
333 * A bit of this code is grabbed out of socket.c
334 * There are 2 lists we need to look through - init_sockets is a list
335 *
336 */
337 void
338 doeric_server (void)
339 {
340 int i, pollret;
341 fd_set tmp_read, tmp_write;
342 struct sockaddr_in addr;
343 socklen_t addrlen = sizeof (struct sockaddr);
344 player *pl, *next;
345
346 #ifdef CS_LOGSTATS
347 if ((time (NULL) - cst_lst.time_start) >= CS_LOGTIME)
348 write_cs_stats ();
349 #endif
350
351 FD_ZERO (&tmp_read);
352 FD_ZERO (&tmp_write);
353
354 for (i = 0; i < socket_info.allocated_sockets; i++)
355 {
356 if (init_sockets[i].status == Ns_Dead)
357 {
358 free_newsocket (&init_sockets[i]);
359 init_sockets[i].status = Ns_Avail;
360 socket_info.nconns--;
361 }
362 else if (init_sockets[i].status != Ns_Avail)
363 {
364 FD_SET (init_sockets[i].fd, &tmp_read);
365 FD_SET (init_sockets[i].fd, &tmp_write);
366 }
367 }
368
369 /* Go through the players. Let the loop set the next pl value,
370 * since we may remove some
371 */
372 for (pl = first_player; pl != NULL;)
373 {
374 if (pl->socket.status == Ns_Dead)
375 {
376 player *npl = pl->next;
377
378 save_player (pl->ob, 0);
379
380 if (!QUERY_FLAG (pl->ob, FLAG_REMOVED))
381 {
382 terminate_all_pets (pl->ob);
383 pl->ob->remove ();
384 }
385
386 leave (pl, 1);
387 final_free_player (pl);
388 pl = npl;
389 }
390 else
391 {
392 FD_SET ((uint32) pl->socket.fd, &tmp_read);
393 FD_SET ((uint32) pl->socket.fd, &tmp_write);
394 pl = pl->next;
395 }
396 }
397
398 /* Reset timeout each time, since some OS's will change the values on
399 * the return from select.
400 */
401 socket_info.timeout.tv_sec = 0;
402 socket_info.timeout.tv_usec = 0;
403
404 pollret = select (socket_info.max_filedescriptor,
405 &tmp_read, &tmp_write, 0,
406 &socket_info.timeout);
407
408 if (pollret == -1)
409 {
410 LOG (llevError, "select failed: %s\n", strerror (errno));
411 return;
412 }
413
414 /* We need to do some of the processing below regardless */
415
416 /* if (!pollret) return;*/
417
418 /* Following adds a new connection */
419 if (pollret && FD_ISSET (init_sockets[0].fd, &tmp_read))
420 {
421 int newsocknum = 0;
422
423 #ifdef ESRV_DEBUG
424 LOG (llevDebug, "doeric_server: New Connection\n");
425 #endif
426 /* If this is the case, all sockets currently in used */
427 if (socket_info.allocated_sockets <= socket_info.nconns)
428 {
429 init_sockets = (client_socket *) realloc (init_sockets, sizeof (client_socket) * (socket_info.nconns + 1));
430 if (!init_sockets)
431 fatal (OUT_OF_MEMORY);
432 newsocknum = socket_info.allocated_sockets;
433 socket_info.allocated_sockets++;
434 init_sockets[newsocknum].faces_sent_len = nrofpixmaps;
435 init_sockets[newsocknum].faces_sent = (uint8 *) malloc (nrofpixmaps * sizeof (*init_sockets[newsocknum].faces_sent));
436 if (!init_sockets[newsocknum].faces_sent)
437 fatal (OUT_OF_MEMORY);
438 init_sockets[newsocknum].status = Ns_Avail;
439 }
440 else
441 {
442 int j;
443
444 for (j = 1; j < socket_info.allocated_sockets; j++)
445 if (init_sockets[j].status == Ns_Avail)
446 {
447 newsocknum = j;
448 break;
449 }
450 }
451
452 init_sockets[newsocknum].fd = accept (init_sockets[0].fd, (struct sockaddr *) &addr, &addrlen);
453
454 if (init_sockets[newsocknum].fd == -1)
455 LOG (llevError, "accept failed: %s\n", strerror (errno));
456 else
457 {
458 char buf[MAX_BUF];
459 long ip;
460 client_socket *ns;
461
462 ns = &init_sockets[newsocknum];
463
464 ip = ntohl (addr.sin_addr.s_addr);
465 sprintf (buf, "%ld.%ld.%ld.%ld", (ip >> 24) & 255, (ip >> 16) & 255, (ip >> 8) & 255, ip & 255);
466
467 if (checkbanned (NULL, buf))
468 {
469 LOG (llevInfo, "Banned host tried to connect: [%s]\n", buf);
470 close (init_sockets[newsocknum].fd);
471 init_sockets[newsocknum].fd = -1;
472 }
473 else
474 {
475 ns->init (buf);
476 socket_info.nconns++;
477 }
478 }
479 }
480
481 /* Check for any input on the sockets */
482 if (pollret)
483 for (i = 1; i < socket_info.allocated_sockets; i++)
484 {
485 if (init_sockets[i].status == Ns_Avail)
486 continue;
487
488 //TODO: disassociate handleclient from socket readin
489 if (init_sockets[i].inbuf_len || FD_ISSET (init_sockets[i].fd, &tmp_read))
490 HandleClient (&init_sockets[i], NULL);
491
492 if (FD_ISSET (init_sockets[i].fd, &tmp_write))
493 init_sockets[i].can_write = 1;
494 }
495
496 /* This does roughly the same thing, but for the players now */
497 for (pl = first_player; pl != NULL; pl = next)
498 {
499
500 next = pl->next;
501 if (pl->socket.status == Ns_Dead)
502 continue;
503
504 if (FD_ISSET (pl->socket.fd, &tmp_write))
505 {
506 if (!pl->socket.can_write)
507 {
508 #if 0
509 LOG (llevDebug, "Player %s socket now write enabled\n", pl->ob->name);
510 #endif
511 pl->socket.can_write = 1;
512 write_socket_buffer (&pl->socket);
513 }
514
515 /* if we get an error on the write_socket buffer, no reason to
516 * continue on this socket.
517 */
518 if (pl->socket.status == Ns_Dead)
519 continue;
520 }
521 else
522 pl->socket.can_write = 0;
523
524 HandleClient (&pl->socket, pl);
525 /* If the player has left the game, then the socket status
526 * will be set to this be the leave function. We don't
527 * need to call leave again, as it has already been called
528 * once.
529 */
530 if (pl->socket.status == Ns_Dead)
531 {
532 save_player (pl->ob, 0);
533
534 if (!QUERY_FLAG (pl->ob, FLAG_REMOVED))
535 {
536 terminate_all_pets (pl->ob);
537 pl->ob->remove ();
538 }
539
540 leave (pl, 1);
541 final_free_player (pl);
542 }
543 else
544 {
545 /* Update the players stats once per tick. More efficient than
546 * sending them whenever they change, and probably just as useful
547 */
548 esrv_update_stats (pl);
549 if (pl->last_weight != -1 && pl->last_weight != WEIGHT (pl->ob))
550 {
551 esrv_update_item (UPD_WEIGHT, pl->ob, pl->ob);
552 if (pl->last_weight != WEIGHT (pl->ob))
553 LOG (llevError, "esrv_update_item(UPD_WEIGHT) did not set player weight: is %lu, should be %lu\n",
554 (unsigned long) pl->last_weight, WEIGHT (pl->ob));
555 }
556
557 /* draw_client_map does sanity checking that map is
558 * valid, so don't do it here.
559 */
560 draw_client_map (pl->ob);
561 if (pl->socket.update_look)
562 esrv_draw_look (pl->ob);
563 }
564 }
565 }
566