| 1 | /* |
1 | /* |
| 2 | * This file is part of Crossfire TRT, the Roguelike Realtime MORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
| 3 | * |
3 | * |
| 4 | * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team |
4 | * Copyright (©) 2005,2006,2007,2008,2009,2010,2011 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
| 5 | * Copyright (©) 1992,2007 Frank Tore Johansen |
|
|
| 6 | * |
5 | * |
| 7 | * Crossfire TRT is free software: you can redistribute it and/or modify |
6 | * Deliantra is free software: you can redistribute it and/or modify it under |
| 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 3 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, see <http://www.gnu.org/licenses/>. |
17 | * and the GNU General Public License along with this program. If not, see |
|
|
18 | * <http://www.gnu.org/licenses/>. |
| 19 | * |
19 | * |
| 20 | * The authors can be reached via e-mail to <crossfire@schmorp.de> |
20 | * The authors can be reached via e-mail to <support@deliantra.net> |
| 21 | */ |
21 | */ |
| 22 | |
22 | |
| 23 | using namespace std; |
23 | using namespace std; |
| 24 | |
24 | |
| 25 | #include <global.h> |
25 | #include <global.h> |
| … | |
… | |
| 53 | // write a nop to the socket at least every IDLE_NOP seconds. |
53 | // write a nop to the socket at least every IDLE_NOP seconds. |
| 54 | if (!outputbuffer.len) |
54 | if (!outputbuffer.len) |
| 55 | { |
55 | { |
| 56 | if (last_send + IDLE_PING <= NOW && pl && pl->active) |
56 | if (last_send + IDLE_PING <= NOW && pl && pl->active) |
| 57 | { |
57 | { |
| 58 | // this is a bit ugly, but map1/map1a seem to be the only |
58 | // this is a bit ugly, but map1a seems to be the only |
| 59 | // nop'able commands and they are quite small. |
59 | // nop'able command and it is quite small. |
| 60 | packet sl (mapmode == Map1Cmd ? "map1" : "map1a"); |
60 | packet sl ("map1a"); |
| 61 | send_packet (sl); |
61 | send_packet (sl); |
| 62 | } |
62 | } |
| 63 | else |
63 | else |
| 64 | return; |
64 | return; |
| 65 | } |
65 | } |
| 66 | |
66 | |
| 67 | if (socket_ev.poll () & PE_W) |
67 | if (socket_ev.poll () & EV_WRITE) |
| 68 | return; |
68 | return; |
| 69 | |
69 | |
| 70 | last_send = NOW; |
70 | last_send = NOW; |
| 71 | write_outputbuffer (); |
71 | write_outputbuffer (); |
| 72 | } |
72 | } |
| … | |
… | |
| 99 | // just retry |
99 | // just retry |
| 100 | } |
100 | } |
| 101 | else if (errno == EAGAIN) |
101 | else if (errno == EAGAIN) |
| 102 | { |
102 | { |
| 103 | // delay till ready |
103 | // delay till ready |
| 104 | socket_ev.poll (socket_ev.poll () | PE_W); |
104 | socket_ev.poll (socket_ev.poll () | EV_WRITE); |
| 105 | socket_ev.start (); |
105 | socket_ev.start (); |
| 106 | return; |
106 | return; |
| 107 | } |
107 | } |
| 108 | else |
108 | else |
| 109 | { |
109 | { |
| … | |
… | |
| 111 | destroy (); |
111 | destroy (); |
| 112 | return; |
112 | return; |
| 113 | } |
113 | } |
| 114 | } |
114 | } |
| 115 | |
115 | |
| 116 | socket_ev.poll (socket_ev.poll () & ~PE_W); |
116 | socket_ev.poll (socket_ev.poll () & ~EV_WRITE); |
| 117 | } |
117 | } |
| 118 | |
118 | |
| 119 | /****************************************************************************** |
119 | /****************************************************************************** |
| 120 | * |
120 | * |
| 121 | * Start of read routines. |
121 | * Start of read routines. |
| … | |
… | |
| 156 | ****************************************************************************/ |
156 | ****************************************************************************/ |
| 157 | |
157 | |
| 158 | // SocketCommand, PlayingCommand, should not exist with those ugly casts |
158 | // SocketCommand, PlayingCommand, should not exist with those ugly casts |
| 159 | #define SC(cb) (void *)static_cast<void (*)(char *, int, client *)>(cb), |
159 | #define SC(cb) (void *)static_cast<void (*)(char *, int, client *)>(cb), |
| 160 | #define PC(cb) (void *)static_cast<void (*)(char *, int, player *)>(cb), PF_PLAYER | |
160 | #define PC(cb) (void *)static_cast<void (*)(char *, int, player *)>(cb), PF_PLAYER | |
|
|
161 | |
|
|
162 | static void |
|
|
163 | NopCmd (char *, int, client *) |
|
|
164 | { |
|
|
165 | // do nothing |
|
|
166 | } |
| 161 | |
167 | |
| 162 | /** |
168 | /** |
| 163 | * Dispatch table for the server. |
169 | * Dispatch table for the server. |
| 164 | */ |
170 | */ |
| 165 | static struct packet_type packets[] = { |
171 | static struct packet_type packets[] = { |
| … | |
… | |
| 171 | {"apply", PC(ApplyCmd) PF_PLAYING }, |
177 | {"apply", PC(ApplyCmd) PF_PLAYING }, |
| 172 | {"lookat", PC(LookAt) PF_PLAYING }, |
178 | {"lookat", PC(LookAt) PF_PLAYING }, |
| 173 | {"lock", PC(LockItem) PF_PLAYING }, |
179 | {"lock", PC(LockItem) PF_PLAYING }, |
| 174 | {"mark", PC(MarkItem) PF_PLAYING }, |
180 | {"mark", PC(MarkItem) PF_PLAYING }, |
| 175 | {"move", PC(MoveCmd) PF_PLAYING }, |
181 | {"move", PC(MoveCmd) PF_PLAYING }, |
| 176 | {"ext", PC(ExtCmd) 0 }, // CF+ |
182 | {"ext", PC(ExtCmd) 0 }, // CF+/Deliantra |
| 177 | {"mapredraw", PC(MapRedrawCmd) 0 }, |
183 | {"mapredraw", PC(MapRedrawCmd) 0 }, |
| 178 | {"mapinfo", PC(MapInfoCmd) 0 }, // CF+ |
184 | {"mapinfo", PC(MapInfoCmd) 0 }, // CF+/Deliantra |
| 179 | |
185 | |
| 180 | {"reply", SC(ReplyCmd) 0 }, |
186 | {"reply", SC(ReplyCmd) 0 }, |
| 181 | {"exti", SC(ExtiCmd) 0 }, // CF+ |
187 | {"exti", SC(ExtiCmd) 0 }, // CF+/Deliantra |
| 182 | {"addme", SC(AddMeCmd) 0 }, |
188 | {"addme", SC(AddMeCmd) 0 }, |
| 183 | {"askface", SC(AskFaceCmd) 0 }, |
189 | {"askface", SC(AskFaceCmd) 0 }, |
| 184 | {"requestinfo", SC(RequestInfo) 0 }, |
190 | {"requestinfo", SC(RequestInfo) 0 }, |
| 185 | {"setfacemode", SC(SetFaceMode) 0 }, |
|
|
| 186 | {"setsound", SC(SetSound) 0 }, |
191 | {"setsound", SC(SetSound) 0 }, |
| 187 | {"setup", SC(SetUp) 0 }, |
192 | {"setup", SC(SetUp) 0 }, |
| 188 | {"version", SC(VersionCmd) 0 }, |
193 | {"version", SC(VersionCmd) 0 }, |
| 189 | {"toggleextendedinfos", SC(ToggleExtendedInfos) 0 }, /*Added: tchize */ |
194 | |
| 190 | {"toggleextendedtext", SC(ToggleExtendedText) 0 }, /*Added: tchize */ |
195 | {"toggleextendedtext", SC(NopCmd) 0 }, // deliantra: disabled |
| 191 | {"asksmooth", SC(AskSmooth) 0 }, /*Added: tchize (smoothing technologies) */ |
|
|
| 192 | }; |
196 | }; |
| 193 | |
197 | |
| 194 | bool |
198 | bool |
| 195 | client::may_execute (const packet_type *pkt) const |
199 | client::may_execute (const packet_type *pkt) const |
| 196 | { |
200 | { |
| … | |
… | |
| 216 | { |
220 | { |
| 217 | data += 6; |
221 | data += 6; |
| 218 | len -= 6; |
222 | len -= 6; |
| 219 | } |
223 | } |
| 220 | |
224 | |
| 221 | if (len > 4 && !strncmp (data, "say " , 4)) |
225 | if (len > 4 && data [ 3] == ' ' && !strncmp (data, "say " , 4)) return true; |
| 222 | return true; |
226 | if (len > 5 && data [ 4] == ' ' && !strncmp (data, "chat " , 5)) return true; |
| 223 | if (len > 5 && !strncmp (data, "chat ", 5)) |
227 | if (len > 6 && data [ 5] == ' ' && !strncmp (data, "shout " , 6)) return true; |
| 224 | return true; |
228 | if (len > 8 && data [ 7] == ' ' && !strncmp (data, "suicide " , 8)) return true; |
|
|
229 | if (len > 18 && data [17] == ' ' && !strncmp (data, "accept-invitation ", 18)) return true; |
|
|
230 | |
|
|
231 | if (len == 7 && !strcmp (data, "suicide")) return true; |
| 225 | |
232 | |
| 226 | return false; |
233 | return false; |
| 227 | } |
234 | } |
| 228 | |
235 | |
| 229 | void |
236 | void |
| … | |
… | |
| 231 | { |
238 | { |
| 232 | if (may_execute (pkt) || always_immediate (this, pkt, data, datalen)) |
239 | if (may_execute (pkt) || always_immediate (this, pkt, data, datalen)) |
| 233 | { |
240 | { |
| 234 | //TODO: only one format |
241 | //TODO: only one format |
| 235 | if (pkt->flags & PF_PLAYER) |
242 | if (pkt->flags & PF_PLAYER) |
|
|
243 | { |
| 236 | ((void (*)(char *, int, player *))pkt->cb)((char *)data, datalen, pl); |
244 | ((void (*)(char *, int, player *))pkt->cb)((char *)data, datalen, pl); |
|
|
245 | pl->need_updated_stats (); |
|
|
246 | } |
| 237 | else |
247 | else |
| 238 | ((void (*)(char *, int, client *))pkt->cb)((char *)data, datalen, this); |
248 | ((void (*)(char *, int, client *))pkt->cb)((char *)data, datalen, this); |
| 239 | } |
249 | } |
| 240 | else |
250 | else |
| 241 | send_packet_printf ("drawinfo %d ERROR: you cannot execute '%s' now.", NDI_RED | NDI_REPLY, pkt->name); |
251 | send_packet_printf ("drawinfo %d ERROR: you cannot execute '%s' now.", NDI_RED | NDI_REPLY, pkt->name); |
| … | |
… | |
| 254 | pl && pl->ob ? &pl->ob->name : "[anonymous]"); |
264 | pl && pl->ob ? &pl->ob->name : "[anonymous]"); |
| 255 | destroy (); |
265 | destroy (); |
| 256 | return false; |
266 | return false; |
| 257 | } |
267 | } |
| 258 | |
268 | |
|
|
269 | uint8_t save_byte = inbuf [pkt_len]; // rather ugly |
| 259 | inbuf [pkt_len] = 0; /* Terminate buffer - useful for string data */ |
270 | inbuf [pkt_len] = 0; /* temporarily terminate buffer - useful for string data */ |
| 260 | |
271 | |
| 261 | /* First, break out beginning word. There are at least |
272 | /* First, break out beginning word. There are at least |
| 262 | * a few commands that do not have any paremeters. If |
273 | * a few commands that do not have any paremeters. If |
| 263 | * we get such a command, don't worry about trying |
274 | * we get such a command, don't worry about trying |
| 264 | * to break it up. |
275 | * to break it up. |
| … | |
… | |
| 275 | { |
286 | { |
| 276 | data = (char *)inbuf + 2; // better read garbage than segfault |
287 | data = (char *)inbuf + 2; // better read garbage than segfault |
| 277 | datalen = 0; |
288 | datalen = 0; |
| 278 | } |
289 | } |
| 279 | |
290 | |
| 280 | for (packet_type *pkt = packets; pkt < packets + (sizeof (packets) / sizeof (packets[0])); ++pkt) |
291 | for (packet_type *pkt = packets; pkt < packets + array_length (packets); ++pkt) |
| 281 | if (!strcmp ((char *)inbuf + 2, pkt->name)) |
292 | if (!strcmp ((char *)inbuf + 2, pkt->name)) |
| 282 | { |
293 | { |
| 283 | if (pkt->flags & PF_PLAYER && !always_immediate (this, pkt, data, datalen)) |
294 | if (pkt->flags & PF_PLAYER && !always_immediate (this, pkt, data, datalen)) |
| 284 | queue_command (pkt, data, datalen); |
295 | queue_command (pkt, data, datalen); |
| 285 | else |
296 | else |
| … | |
… | |
| 288 | goto next_packet; |
299 | goto next_packet; |
| 289 | } |
300 | } |
| 290 | |
301 | |
| 291 | // If we get here, we didn't find a valid command. |
302 | // If we get here, we didn't find a valid command. |
| 292 | send_packet_printf ("drawinfo %d ERROR: command '%s' not supported.", NDI_RED | NDI_REPLY, (char *)inbuf + 2); |
303 | send_packet_printf ("drawinfo %d ERROR: command '%s' not supported.", NDI_RED | NDI_REPLY, (char *)inbuf + 2); |
|
|
304 | |
| 293 | next_packet: |
305 | next_packet: |
|
|
306 | inbuf [pkt_len] = save_byte; // rather ugly |
| 294 | skip_packet (pkt_len); |
307 | skip_packet (pkt_len); |
| 295 | |
308 | |
| 296 | // input buffer has space again |
309 | // input buffer has space again |
| 297 | socket_ev.poll (socket_ev.poll () | PE_R); |
310 | socket_ev.poll (socket_ev.poll () | EV_READ); |
| 298 | |
311 | |
| 299 | return true; |
312 | return true; |
| 300 | } |
313 | } |
| 301 | |
314 | |
| 302 | // callback called when socket is either readable or writable |
315 | // callback called when socket is either readable or writable |
| 303 | void |
316 | void |
| 304 | client::socket_cb (iow &w, int got) |
317 | client::socket_cb (iow &w, int revents) |
| 305 | { |
318 | { |
| 306 | //TODO remove when we have better socket cleanup logic |
319 | //TODO remove when we have better socket cleanup logic |
| 307 | if (destroyed ()) |
320 | if (destroyed ()) |
| 308 | { |
321 | { |
| 309 | socket_ev.poll (0); |
322 | socket_ev.poll (0); |
| 310 | return; |
323 | return; |
| 311 | } |
324 | } |
| 312 | |
325 | |
| 313 | if (got & PE_W) |
326 | if (revents & EV_WRITE) |
| 314 | { |
327 | { |
| 315 | write_outputbuffer (); |
328 | write_outputbuffer (); |
| 316 | |
329 | |
| 317 | if (!outputbuffer.len) |
330 | if (!outputbuffer.len) |
| 318 | socket_ev.poll (socket_ev.poll () & ~PE_W); |
331 | socket_ev.poll (socket_ev.poll () & ~EV_WRITE); |
| 319 | } |
332 | } |
| 320 | |
333 | |
| 321 | if (got & PE_R) |
334 | if (revents & EV_READ) |
| 322 | { |
335 | { |
| 323 | //TODO: rate-limit tcp connection in better ways, important |
336 | //TODO: rate-limit tcp connection in better ways, important |
| 324 | |
337 | |
| 325 | int amount = sizeof (inbuf) - inbuf_len; |
338 | int amount = sizeof (inbuf) - inbuf_len; |
| 326 | |
339 | |
| 327 | if (!amount) |
340 | if (!amount) |
| 328 | { |
341 | { |
| 329 | // input buffer full |
342 | // input buffer full |
| 330 | socket_ev.poll (socket_ev.poll () & ~PE_R); |
343 | socket_ev.poll (socket_ev.poll () & ~EV_READ); |
| 331 | return; |
344 | return; |
| 332 | } |
345 | } |
| 333 | |
346 | |
| 334 | amount = read (fd, inbuf + inbuf_len, amount); |
347 | amount = read (fd, inbuf + inbuf_len, amount); |
| 335 | |
348 | |
| … | |
… | |
| 473 | va_end (ap); |
486 | va_end (ap); |
| 474 | |
487 | |
| 475 | send_packet (sl); |
488 | send_packet (sl); |
| 476 | } |
489 | } |
| 477 | |
490 | |
| 478 | // returns true when the message needs special (read: perl) treatment |
|
|
| 479 | static bool |
|
|
| 480 | msg_is_special (const char *msg) |
|
|
| 481 | { |
|
|
| 482 | return msg [strcspn (msg, "<[&\n")]; |
|
|
| 483 | } |
|
|
| 484 | |
|
|
| 485 | void |
491 | void |
| 486 | client::send_msg (int color, const char *type, const char *msg) |
492 | client::send_msg (int color, const char *type, const char *msg) |
| 487 | { |
493 | { |
| 488 | if (!msg || !type) // it can happen (for example, missing attack messages cause this) |
494 | if (!msg || !type) // it can happen (for example, missing attack messages cause this) |
| 489 | { |
495 | { |
| … | |
… | |
| 491 | return; |
497 | return; |
| 492 | } |
498 | } |
| 493 | |
499 | |
| 494 | int len = strlen (msg); |
500 | int len = strlen (msg); |
| 495 | |
501 | |
|
|
502 | if (!(color & NDI_VERBATIM) |
|
|
503 | && (msg_is_special (msg) |
| 496 | if (msg_is_special (msg) || (type [0] == 'c' && type [1] == '/') || len > (MAXSOCKBUF - 128)) |
504 | || (type [0] == 'c' && type [1] == '/') || len > (MAXSOCKBUF - 128))) |
| 497 | cfperl_send_msg (this, color, type, msg); |
505 | cfperl_send_msg (this, color, type, msg); |
| 498 | else if (can_msg) |
506 | else |
| 499 | send_packet_printf ("msg %d %s %s", color & NDI_CLIENT_MASK, type, msg); |
507 | send_packet_printf ("msg %d %s %s", color & NDI_CLIENT_MASK, type, msg); |
| 500 | else if (color < 0) |
|
|
| 501 | return; // client cannot handle this |
|
|
| 502 | else |
|
|
| 503 | send_packet_printf ("drawinfo %d %s", color & NDI_COLOR_MASK, msg); |
|
|
| 504 | } |
508 | } |
| 505 | |
509 | |
| 506 | void |
510 | void |
| 507 | client::send_drawinfo (const char *msg, int flags) |
511 | client::send_drawinfo (const char *msg, int flags) |
| 508 | { |
512 | { |
| … | |
… | |
| 524 | *cur++ = ' '; |
528 | *cur++ = ' '; |
| 525 | } |
529 | } |
| 526 | |
530 | |
| 527 | packet &packet::operator <<(const ber32 v) |
531 | packet &packet::operator <<(const ber32 v) |
| 528 | { |
532 | { |
| 529 | enum { maxlen = 32 / 7 + 1}; |
533 | enum { maxlen = 32 / 7 + 1 }; |
| 530 | uint8 buf[maxlen]; |
534 | uint8 buf[maxlen]; |
| 531 | uint8 *p = buf + maxlen; |
535 | uint8 *p = buf + maxlen; |
| 532 | uint32 val = v.val; |
536 | uint32 val = v.val; |
| 533 | |
537 | |
| 534 | *--p = val & 0x7F; |
538 | *--p = val & 0x7F; |
