ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/deliantra/server/socket/loop.C
Revision: 1.17
Committed: Fri Dec 15 03:53:44 2006 UTC (17 years, 6 months ago) by root
Content type: text/plain
Branch: MAIN
Changes since 1.16: +58 -80 lines
Log Message:
streamlined packet processing a bit, experimentally enabled more immediate paclets

File Contents

# User Rev Content
1 elmex 1.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 root 1.7 The author can be reached via e-mail to <crossfire@schmorp.de>
22 elmex 1.1 */
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 root 1.10 #include <sproto.h>
38     #include <sockproto.h>
39 elmex 1.1
40 pippijn 1.8 #include <sys/types.h>
41     #include <sys/time.h>
42     #include <sys/socket.h>
43     #include <netinet/in.h>
44     #include <netdb.h>
45 elmex 1.1
46 root 1.16 #include <unistd.h>
47     #include <arpa/inet.h>
48 elmex 1.1
49     #include <loader.h>
50     #include <newserver.h>
51    
52     /*****************************************************************************
53     * Start of command dispatch area.
54     * The commands here are protocol commands.
55     ****************************************************************************/
56    
57     /* Either keep this near the start or end of the file so it is
58     * at least reasonablye easy to find.
59     * There are really 2 commands - those which are sent/received
60     * before player joins, and those happen after the player has joined.
61     * As such, we have function types that might be called, so
62     * we end up having 2 tables.
63     */
64    
65 root 1.17 enum {
66     PF_PLAYER = 0x01, // must have valid player
67     PF_IMMEDIATE = 0x02, // TODO: hack, can be executed immediately
68     PF_PLAYING = 0x04, // must be in playing state
69     };
70 elmex 1.1
71 root 1.17 struct pkt_type
72 root 1.6 {
73 root 1.17 const char *name;
74     void *cb;
75     int flags;
76    
77     bool may_execute (client_socket *ns)
78     {
79     return (!(flags & PF_PLAYER) || ns->pl)
80     && (!(flags & PF_PLAYING) || (ns->pl && ns->pl->state == ST_PLAYING));
81     }
82    
83     void execute (client_socket *ns, char *data, int datalen)
84     {
85     //TODO: only one format
86     if (flags & PF_PLAYER)
87     ((void (*)(char *, int, player * ))cb)((char *)data, datalen, ns->pl);
88     else
89     ((void (*)(char *, int, client_socket *))cb)((char *)data, datalen, ns);
90     }
91 elmex 1.1 };
92    
93 root 1.17 // SocketCommand, PlayingCommand, should not exist with those ugly casts
94     #define SC(cb) (void *)static_cast<void (*)(char *, int, client_socket *)>(cb),
95     #define PC(cb) (void *)static_cast<void (*)(char *, int, player *)>(cb), PF_PLAYER |
96 elmex 1.1
97     /**
98     * Dispatch table for the server.
99     */
100 root 1.17 static struct pkt_type packets[] = {
101     {"ncom", PC(NewPlayerCmd) PF_PLAYING },
102     {"command", PC(PlayerCmd) PF_PLAYING },
103    
104     {"examine", PC(ExamineCmd) PF_PLAYING | PF_IMMEDIATE },
105     {"apply", PC(ApplyCmd) PF_PLAYING | PF_IMMEDIATE },
106     {"reply", PC(ReplyCmd) PF_IMMEDIATE },
107     {"lookat", PC(LookAt) PF_PLAYING | PF_IMMEDIATE },
108     {"lock", PC(LockItem) PF_PLAYING | PF_IMMEDIATE },
109     {"mark", PC(MarkItem) PF_PLAYING | PF_IMMEDIATE },
110     {"move", PC(MoveCmd) PF_PLAYING | PF_IMMEDIATE },
111     {"ext", PC(ExtCmd) PF_IMMEDIATE }, /* CF+ */
112     {"mapredraw", PC(MapRedrawCmd) PF_IMMEDIATE }, /* Added: phil */
113     {"mapinfo", PC(MapInfoCmd) PF_IMMEDIATE }, /* CF+ */
114    
115     {"addme", SC(AddMeCmd) PF_IMMEDIATE },
116     {"askface", SC(SendFaceCmd) 0 }, /* Added: phil */
117     {"requestinfo", SC(RequestInfo) 0 },
118     {"setfacemode", SC(SetFaceMode) PF_IMMEDIATE },
119     {"setsound", SC(SetSound) PF_IMMEDIATE },
120     {"setup", SC(SetUp) PF_IMMEDIATE },
121     {"version", SC(VersionCmd) PF_IMMEDIATE },
122     {"toggleextendedinfos", SC(ToggleExtendedInfos) PF_IMMEDIATE }, /*Added: tchize */
123     {"toggleextendedtext", SC(ToggleExtendedText) PF_IMMEDIATE }, /*Added: tchize */
124     {"asksmooth", SC(AskSmooth) 0 }, /*Added: tchize (smoothing technologies) */
125 elmex 1.1 };
126    
127     /**
128     * RequestInfo is sort of a meta command. There is some specific
129     * request of information, but we call other functions to provide
130     * that information.
131     */
132 root 1.6 void
133 root 1.13 RequestInfo (char *buf, int len, client_socket * ns)
134 elmex 1.1 {
135 root 1.6 char *params = NULL, *cp;
136    
137     /* No match */
138     char bigbuf[MAX_BUF];
139     int slen;
140    
141     /* Set up replyinfo before we modify any of the buffers - this is used
142     * if we don't find a match.
143     */
144     strcpy (bigbuf, "replyinfo ");
145     slen = strlen (bigbuf);
146     safe_strcat (bigbuf, buf, &slen, MAX_BUF);
147    
148     /* find the first space, make it null, and update the
149     * params pointer.
150     */
151     for (cp = buf; *cp != '\0'; cp++)
152     if (*cp == ' ')
153     {
154     *cp = '\0';
155     params = cp + 1;
156     break;
157     }
158 root 1.10
159 root 1.6 if (!strcmp (buf, "image_info"))
160     send_image_info (ns, params);
161     else if (!strcmp (buf, "image_sums"))
162     send_image_sums (ns, params);
163     else if (!strcmp (buf, "skill_info"))
164     send_skill_info (ns, params);
165     else if (!strcmp (buf, "spell_paths"))
166     send_spell_paths (ns, params);
167     else
168 root 1.12 ns->send_packet (bigbuf, len);
169 elmex 1.1 }
170    
171     /**
172     * Handle client input.
173     *
174     * HandleClient is actually not named really well - we only get here once
175     * there is input, so we don't do exception or other stuff here.
176     * sock is the output socket information. pl is the player associated
177     * with this socket, null if no player (one of the init_sockets for just
178     * starting a connection)
179     */
180    
181 root 1.6 void
182 root 1.13 HandleClient (client_socket *ns, player *pl)
183 elmex 1.1 {
184 root 1.6 /* Loop through this - maybe we have several complete packets here. */
185     // limit to a few commands only, though, as to not monopolise the server
186 root 1.11 for (int repeat = 16; repeat--;)
187 root 1.6 {
188     /* If it is a player, and they don't have any speed left, we
189     * return, and will read in the data when they do have time.
190     */
191 root 1.11 if (pl && pl->state == ST_PLAYING && pl->ob && pl->ob->speed_left < 0)
192     return;
193 elmex 1.1
194 root 1.11 int pkt_len = ns->read_packet ();
195 root 1.6
196 root 1.11 if (pkt_len < 0)
197 root 1.6 {
198 root 1.11 LOG (llevError, "read error on player %s\n", &pl->ob->name);
199 root 1.6 /* Caller will take care of cleaning this up */
200     ns->status = Ns_Dead;
201     return;
202 root 1.3 }
203 root 1.11 else if (pkt_len == 0)
204     /* Still dont have a full packet */
205 root 1.6 return;
206 elmex 1.1
207 root 1.6 /* First, break out beginning word. There are at least
208     * a few commands that do not have any paremeters. If
209     * we get such a command, don't worry about trying
210     * to break it up.
211     */
212 root 1.11 int datalen;
213     char *data = strchr ((char *)ns->inbuf + 2, ' ');
214    
215 root 1.6 if (data)
216     {
217 root 1.11 *data++ = 0;
218     datalen = pkt_len - (data - (char *)ns->inbuf);
219 root 1.6 }
220     else
221 root 1.11 {
222     data = (char *)ns->inbuf + 2; // better read garbage than segfault
223     datalen = 0;
224     }
225    
226     ns->inbuf [pkt_len] = 0; /* Terminate buffer - useful for string data */
227 root 1.6
228 root 1.17 for (pkt_type *pkt = packets; pkt < packets + (sizeof (packets) / sizeof (packets[0])); ++pkt)
229     if (!strcmp ((char *)ns->inbuf + 2, pkt->name))
230 root 1.6 {
231 root 1.17 if (pkt->may_execute (ns))
232 root 1.6 {
233 root 1.17 pkt->execute (ns, data, datalen);
234 root 1.11 ns->skip_packet (pkt_len);
235 root 1.17 //D//TODO not doing this causes random memory corruption
236     if (pkt->flags & PF_IMMEDIATE)
237 elmex 1.1 goto next_packet;
238     return;
239 root 1.6 }
240     }
241 root 1.11
242 root 1.6 /* If we get here, we didn't find a valid command. Logging
243     * this might be questionable, because a broken client/malicious
244     * user could certainly send a whole bunch of invalid commands.
245     */
246 root 1.11 LOG (llevDebug, "Bad command from client (%s)\n", ns->inbuf + 2);
247     ns->skip_packet (pkt_len);
248 elmex 1.1 next_packet:
249 root 1.6 ;
250 elmex 1.1 }
251     }
252    
253 root 1.6 void
254     flush_sockets (void)
255 elmex 1.1 {
256 root 1.15 for (sockvec::iterator i = client_sockets.begin (); i != client_sockets.end (); ++i)
257     if ((*i)->status != Ns_Dead)
258     (*i)->flush ();
259 elmex 1.1 }
260    
261     /**
262 root 1.10 * This checks the sockets for input, does the right thing.
263 elmex 1.1 *
264     * A bit of this code is grabbed out of socket.c
265     * There are 2 lists we need to look through - init_sockets is a list
266     *
267     */
268 root 1.6 void
269     doeric_server (void)
270 elmex 1.1 {
271 root 1.6 int i, pollret;
272 root 1.15 fd_set tmp_read;
273 root 1.6 struct sockaddr_in addr;
274     socklen_t addrlen = sizeof (struct sockaddr);
275     player *pl, *next;
276 root 1.14 int maxfd = 0;
277 elmex 1.1
278     #ifdef CS_LOGSTATS
279 root 1.6 if ((time (NULL) - cst_lst.time_start) >= CS_LOGTIME)
280     write_cs_stats ();
281 elmex 1.1 #endif
282    
283 root 1.6 /* Go through the players. Let the loop set the next pl value,
284     * since we may remove some
285     */
286 root 1.14 //TODO: must be handled cleanly elsewhere
287     for (pl = first_player; pl; )
288 root 1.6 {
289 root 1.14 player *npl = pl->next;
290    
291     //TODO: must be handled cleanly elsewhere
292     if (pl->socket->status == Ns_Dead)
293 root 1.6 {
294     save_player (pl->ob, 0);
295 root 1.10
296 root 1.6 if (!QUERY_FLAG (pl->ob, FLAG_REMOVED))
297     {
298     terminate_all_pets (pl->ob);
299 root 1.9 pl->ob->remove ();
300 root 1.3 }
301 root 1.10
302 root 1.6 leave (pl, 1);
303     final_free_player (pl);
304 root 1.3 }
305 elmex 1.1
306 root 1.14 pl = npl;
307 elmex 1.1 }
308    
309 root 1.14 FD_ZERO (&tmp_read);
310 elmex 1.1
311 root 1.14 for (sockvec::iterator i = client_sockets.begin (); i != client_sockets.end (); )
312 root 1.6 {
313 root 1.14 client_socket *s = *i;
314 elmex 1.1
315 root 1.14 if (s->status == Ns_Dead)
316 root 1.6 {
317 root 1.14 client_sockets.erase (i);
318     delete s;
319 root 1.6 }
320     else
321     {
322 root 1.14 if (s->fd > maxfd) maxfd = s->fd;
323    
324     FD_SET (s->fd, &tmp_read);
325 root 1.6
326 root 1.14 ++i;
327 root 1.6 }
328 root 1.14 }
329 root 1.10
330 root 1.14 struct timeval timeout;
331 root 1.6
332 root 1.14 timeout.tv_sec = 0;
333     timeout.tv_usec = 0;
334 root 1.6
335 root 1.14 pollret = select (maxfd + 1,
336 root 1.15 &tmp_read, 0, 0,
337 root 1.14 &timeout);
338 root 1.6
339 root 1.14 if (pollret == -1)
340     {
341     LOG (llevError, "select failed: %s\n", strerror (errno));
342     return;
343 elmex 1.1 }
344    
345 root 1.14 /* We need to do some of the processing below regardless */
346    
347 root 1.10 /* Check for any input on the sockets */
348 root 1.14 for (sockvec::iterator i = client_sockets.begin (); i != client_sockets.end (); ++i)
349 root 1.6 {
350 root 1.14 client_socket *s = *i;
351     player *pl = s->pl;
352 elmex 1.1
353 root 1.14 //TODO: disassociate handleclient from socket readin
354     if (s->inbuf_len || FD_ISSET (s->fd, &tmp_read))
355     HandleClient (s, pl);
356 root 1.10
357 root 1.14 //TODO: should not be done here, either
358     if (s->status != Ns_Dead && pl)
359 root 1.6 {
360 root 1.10 /* Update the players stats once per tick. More efficient than
361     * sending them whenever they change, and probably just as useful
362 root 1.6 */
363 root 1.10 esrv_update_stats (pl);
364     if (pl->last_weight != -1 && pl->last_weight != WEIGHT (pl->ob))
365 root 1.6 {
366 root 1.10 esrv_update_item (UPD_WEIGHT, pl->ob, pl->ob);
367     if (pl->last_weight != WEIGHT (pl->ob))
368     LOG (llevError, "esrv_update_item(UPD_WEIGHT) did not set player weight: is %lu, should be %lu\n",
369     (unsigned long) pl->last_weight, WEIGHT (pl->ob));
370 root 1.6 }
371    
372 root 1.10 /* draw_client_map does sanity checking that map is
373     * valid, so don't do it here.
374     */
375     draw_client_map (pl->ob);
376 root 1.14 if (s->update_look)
377 root 1.10 esrv_draw_look (pl->ob);
378 root 1.3 }
379 elmex 1.1 }
380     }
381 root 1.10