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

Comparing deliantra/server/socket/info.C (file contents):
Revision 1.7 by root, Sat Sep 16 22:24:13 2006 UTC vs.
Revision 1.22 by root, Thu Dec 21 06:12:37 2006 UTC

1
1/* 2/*
2 CrossFire, A Multiplayer game for X-windows 3 CrossFire, A Multiplayer game for X-windows
3 4
4 Copyright (C) 2002 Mark Wedel & Crossfire Development Team 5 Copyright (C) 2002 Mark Wedel & Crossfire Development Team
5 Copyright (C) 1992 Frank Tore Johansen 6 Copyright (C) 1992 Frank Tore Johansen
… …
42 * much the same thing as the draw_info above, but takes a color 43 * much the same thing as the draw_info above, but takes a color
43 * parameter. the esrv_drawinfo functions should probably be 44 * parameter. the esrv_drawinfo functions should probably be
44 * replaced with this, just using black as the color. 45 * replaced with this, just using black as the color.
45 */ 46 */
46static void 47static void
47esrv_print_msg (NewSocket * ns, int color, const char *str) 48esrv_print_msg (client *ns, int color, const char *str)
48{ 49{
49 char buf[HUGE_BUF]; 50 ns->send_packet_printf ("drawinfo %d %s", color, str);
50
51 if (ns->status == Ns_Old)
52 {
53 snprintf (buf, HUGE_BUF, "%s\n", str);
54 }
55 else
56 {
57 snprintf (buf, HUGE_BUF, "drawinfo %d %s", color, str);
58 }
59
60/* LOG(llevDebug,"sending %s to socket, len=%d\n", buf, strlen(buf));*/
61 Write_String_To_Socket (ns, buf, strlen (buf));
62} 51}
63 52
64/** 53/**
65 * Draws an extended message on the client. 54 * Draws an extended message on the client.
66 * ns the socket to send message to 55 * ns the socket to send message to
… …
69 * subtype type and subtype of text message 58 * subtype type and subtype of text message
70 * intro Intro message to send with main message if client does not support the message type 59 * intro Intro message to send with main message if client does not support the message type
71 * message The main message 60 * message The main message
72 */ 61 */
73static void 62static void
74esrv_print_ext_msg (NewSocket * ns, int color, uint8 type, uint8 subtype, const char *message) 63esrv_print_ext_msg (client *ns, int color, uint8 type, uint8 subtype, const char *message)
75{ 64{
76 char buf[HUGE_BUF];
77
78 snprintf (buf, HUGE_BUF, "drawextinfo %d %hhu %hhu %s", color, type, subtype, message); 65 ns->send_packet_printf ("drawextinfo %d %hhu %hhu %s", color, type, subtype, message);
79 Write_String_To_Socket (ns, buf, strlen (buf));
80
81/* LOG(llevDebug,"sending %s to socket, len=%d", buf, strlen(buf));*/
82
83} 66}
84 67
85/** 68/**
86 * Frontend for esrv_print_msg 69 * Frontend for esrv_print_msg
87 * \param colr message color 70 * \param colr message color
… …
90 * 73 *
91 * If pl is NULL or without contr set, writes message to log. 74 * If pl is NULL or without contr set, writes message to log.
92 * 75 *
93 * Else sends message to player via esrv_print_msg 76 * Else sends message to player via esrv_print_msg
94 */ 77 */
95
96static void 78static void
97print_message (int colr, const object *pl, const char *tmp) 79print_message (int colr, const object *pl, const char *tmp)
98{ 80{
99 81 if (!tmp)
100 if (tmp == (char *) NULL)
101 {
102 tmp = "[NULL]"; 82 tmp = "[NULL]";
103 }
104 83
105 if (!pl || (pl->type == PLAYER && pl->contr == NULL)) 84 if (!pl || (pl->type == PLAYER && pl->contr == NULL))
106 return; 85 return;
107 86
108 if (pl->type == PLAYER) 87 if (pl->type == PLAYER)
109 {
110 esrv_print_msg (&pl->contr->socket, colr, (char *) tmp); 88 esrv_print_msg (pl->contr->socket, colr, (char *) tmp);
111 return;
112 }
113} 89}
114
115 90
116/** 91/**
117 * Prints out the contents of specified buffer structures, 92 * Prints out the contents of specified buffer structures,
118 * and clears the string. 93 * and clears the string.
119 */ 94 */
120
121void 95void
122flush_output_element (const object *pl, Output_Buf * outputs) 96flush_output_element (const object *pl, Output_Buf * outputs)
123{ 97{
124 char tbuf[MAX_BUF]; 98 char tbuf[MAX_BUF];
125 99
… …
149 * If found, checks if message should be sent now. 123 * If found, checks if message should be sent now.
150 * 124 *
151 * If message not already in buffers, flushes olders buffer, 125 * If message not already in buffers, flushes olders buffer,
152 * and adds message to queue. 126 * and adds message to queue.
153 */ 127 */
154
155static void 128static void
156check_output_buffers (const object *pl, const char *buf) 129check_output_buffers (const object *pl, const char *buf)
157{ 130{
158 int i, oldest = 0; 131 int i, oldest = 0;
159 132
… …
190 pl->contr->outputs[oldest].buf = buf; 163 pl->contr->outputs[oldest].buf = buf;
191 } 164 }
192 } 165 }
193} 166}
194 167
195
196
197/** 168/**
198 * Sends message to player(s). 169 * Sends message to player(s).
199 * 170 *
200 * flags is various flags - mostly color, plus a few specials. 171 * flags is various flags - mostly color, plus a few specials.
201 * 172 *
… …
212 */ 183 */
213 184
214void 185void
215new_draw_info (int flags, int pri, const object *pl, const char *buf) 186new_draw_info (int flags, int pri, const object *pl, const char *buf)
216{ 187{
217
218 if (flags & NDI_ALL) 188 if (flags & NDI_ALL)
219 { 189 {
220 player *tmppl; 190 player *tmppl;
221 int i;
222 191
223 for (tmppl = first_player; tmppl != NULL; tmppl = tmppl->next) 192 for (tmppl = first_player; tmppl != NULL; tmppl = tmppl->next)
224 new_draw_info ((flags & ~NDI_ALL), pri, tmppl->ob, buf); 193 new_draw_info ((flags & ~NDI_ALL), pri, tmppl->ob, buf);
225 194
226 for (i = 1; i < socket_info.allocated_sockets; i++)
227 {
228 if (init_sockets[i].status == Ns_Old && init_sockets[i].old_mode != Old_Listen && pri < 10)
229 {
230 cs_write_string (&init_sockets[i], buf, strlen (buf));
231 /* Most messages don't have a newline, so add one */
232 cs_write_string (&init_sockets[i], "\n", 1);
233 }
234 }
235
236 return; 195 return;
237 } 196 }
197
238 if (!pl || (pl->type == PLAYER && pl->contr == NULL)) 198 if (!pl || (pl->type == PLAYER && pl->contr == NULL))
239 { 199 {
240 /* Write to the socket? */ 200 /* Write to the socket? */
241 print_message (0, NULL, buf); 201 print_message (0, NULL, buf);
242 return; 202 return;
243 } 203 }
204
244 if (pl->type != PLAYER) 205 if (pl->type != PLAYER)
245 return; 206 return;
207
246 if (pri >= pl->contr->listening) 208 if (pri >= pl->contr->listening)
247 return; 209 return;
248 210
249 if ((flags & NDI_COLOR_MASK) == NDI_BLACK && !(flags & NDI_UNIQUE)) 211 if ((flags & NDI_COLOR_MASK) == NDI_BLACK && !(flags & NDI_UNIQUE))
250 {
251 /* following prints stuff out, as appropriate */ 212 /* following prints stuff out, as appropriate */
252 check_output_buffers (pl, buf); 213 check_output_buffers (pl, buf);
253 }
254 else 214 else
255 {
256 print_message (flags & NDI_COLOR_MASK, pl, buf); 215 print_message (flags & NDI_COLOR_MASK, pl, buf);
257 }
258} 216}
259 217
260/** 218/**
261 * Wrapper for new_draw_info printf-like. 219 * Wrapper for new_draw_info printf-like.
262 * 220 *
263 * This is a pretty trivial function, but it allows us to use printf style 221 * This is a pretty trivial function, but it allows us to use printf style
264 * formatting, so instead of the calling function having to do it, we do 222 * formatting, so instead of the calling function having to do it, we do
265 * it here. It may also have advantages in the future for reduction of 223 * it here. It may also have advantages in the future for reduction of
266 * client/server bandwidth (client could keep track of various strings 224 * client/server bandwidth (client could keep track of various strings
267 */ 225 */
268
269void 226void
270new_draw_info_format (int flags, int pri, const object *pl, const char *format, ...) 227new_draw_info_format (int flags, int pri, const object *pl, const char *format, ...)
271{ 228{
272 char buf[HUGE_BUF]; 229 char buf[HUGE_BUF];
273 230
… …
280 va_end (ap); 237 va_end (ap);
281 238
282 new_draw_info (flags, pri, pl, buf); 239 new_draw_info (flags, pri, pl, buf);
283} 240}
284 241
285
286void 242void
287draw_ext_info (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *message, const char *oldmessage) 243draw_ext_info (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *message, const char *oldmessage)
288{ 244{
289 245
290 if (!pl || (pl->type != PLAYER) || (pl->contr == NULL)) 246 if (!pl || (pl->type != PLAYER) || (pl->contr == NULL))
291 return; 247 return;
292 248
293 if (pri >= pl->contr->listening) 249 if (pri >= pl->contr->listening)
294 return; 250 return;
251
295 if (!CLIENT_SUPPORT_READABLES (&pl->contr->socket, type)) 252 if (!CLIENT_SUPPORT_READABLES (pl->contr->socket, type))
296 { 253 {
297 char *buf = (char *) malloc (strlen (oldmessage == NULL ? message : oldmessage) + 1); 254 char *buf = (char *) malloc (strlen (oldmessage == NULL ? message : oldmessage) + 1);
298 255
299 if (buf == NULL) 256 if (buf == NULL)
300 LOG (llevError, "info::draw_ext_info -> Out of memory!"); 257 LOG (llevError, "info::draw_ext_info -> Out of memory!");
… …
305 new_draw_info (flags, pri, pl, buf); 262 new_draw_info (flags, pri, pl, buf);
306 free (buf); 263 free (buf);
307 } 264 }
308 } 265 }
309 else 266 else
310 {
311 esrv_print_ext_msg (&pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, message); 267 esrv_print_ext_msg (pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, message);
312 }
313} 268}
314 269
315void 270void
316draw_ext_info_format (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *old_format, char *new_format, ...) 271draw_ext_info_format (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *old_format, char *new_format, ...)
317{ 272{
… …
321 if (!pl || (pl->type != PLAYER) || (pl->contr == NULL)) 276 if (!pl || (pl->type != PLAYER) || (pl->contr == NULL))
322 return; 277 return;
323 278
324 if (pri >= pl->contr->listening) 279 if (pri >= pl->contr->listening)
325 return; 280 return;
281
326 if (!CLIENT_SUPPORT_READABLES (&pl->contr->socket, type)) 282 if (!CLIENT_SUPPORT_READABLES (pl->contr->socket, type))
327 { 283 {
328 va_list ap; 284 va_list ap;
329 285
330 LOG (llevDebug, "Non supported extension text type for client.\n"); 286 LOG (llevDebug, "Non supported extension text type for client.\n");
331 va_start (ap, new_format); 287 va_start (ap, new_format);
… …
340 296
341 va_start (ap, new_format); 297 va_start (ap, new_format);
342 vsnprintf (buf, HUGE_BUF, new_format, ap); 298 vsnprintf (buf, HUGE_BUF, new_format, ap);
343 va_end (ap); 299 va_end (ap);
344 strip_media_tag (buf); 300 strip_media_tag (buf);
345 esrv_print_ext_msg (&pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, buf); 301 esrv_print_ext_msg (pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, buf);
346 } 302 }
347} 303}
348 304
349/** 305/**
350 * Writes to everyone on the map *except* op. This is useful for emotions. 306 * Writes to everyone on the map *except* op. This is useful for emotions.
351 */ 307 */
352 308
353void 309void
354new_info_map_except (int color, maptile *map, object *op, const char *str) 310new_info_map_except (int color, maptile * map, object *op, const char *str)
355{ 311{
356 player *pl; 312 player *pl;
357 313
358 for (pl = first_player; pl != NULL; pl = pl->next) 314 for (pl = first_player; pl != NULL; pl = pl->next)
359 if (pl->ob != NULL && pl->ob->map == map && pl->ob != op) 315 if (pl->ob != NULL && pl->ob->map == map && pl->ob != op)
… …
365/** 321/**
366 * Writes to everyone on the map except op1 and op2 322 * Writes to everyone on the map except op1 and op2
367 */ 323 */
368 324
369void 325void
370new_info_map_except2 (int color, maptile *map, object *op1, object *op2, const char *str) 326new_info_map_except2 (int color, maptile * map, object *op1, object *op2, const char *str)
371{ 327{
372 player *pl; 328 player *pl;
373 329
374 for (pl = first_player; pl != NULL; pl = pl->next) 330 for (pl = first_player; pl != NULL; pl = pl->next)
375 if (pl->ob != NULL && pl->ob->map == map && pl->ob != op1 && pl->ob != op2) 331 if (pl->ob != NULL && pl->ob->map == map && pl->ob != op1 && pl->ob != op2)
… …
381/** 337/**
382 * Writes to everyone on the specified map 338 * Writes to everyone on the specified map
383 */ 339 */
384 340
385void 341void
386new_info_map (int color, maptile *map, const char *str) 342new_info_map (int color, maptile * map, const char *str)
387{ 343{
388 player *pl; 344 player *pl;
389 345
390 for (pl = first_player; pl != NULL; pl = pl->next) 346 for (pl = first_player; pl != NULL; pl = pl->next)
391 if (pl->ob != NULL && pl->ob->map == map) 347 if (pl->ob != NULL && pl->ob->map == map)
… …
411void 367void
412rangetostring (object *pl, char *obuf) 368rangetostring (object *pl, char *obuf)
413{ 369{
414 switch (pl->contr->shoottype) 370 switch (pl->contr->shoottype)
415 { 371 {
416 case range_none: 372 case range_none:
417 strcpy (obuf, "Range: nothing"); 373 strcpy (obuf, "Range: nothing");
418 break; 374 break;
419 375
420 case range_bow: 376 case range_bow:
377 {
378 object *op;
379
380 for (op = pl->inv; op; op = op->below)
381 if (op->type == BOW && QUERY_FLAG (op, FLAG_APPLIED))
382 break;
383
384 if (op == NULL)
385 break;
386
387 sprintf (obuf, "Range: %s (%s)", query_base_name (op, 0), op->race ? (const char *) op->race : "nothing");
388 }
389 break;
390
391 case range_magic:
392 if (settings.casting_time == TRUE)
421 { 393 {
422 object *op; 394 if (pl->casting_time > -1)
423 395 {
424 for (op = pl->inv; op; op = op->below) 396 if (pl->casting_time == 0)
425 if (op->type == BOW && QUERY_FLAG (op, FLAG_APPLIED)) 397 sprintf (obuf, "Range: Holding spell (%s)", &pl->spell->name);
426 break; 398 else
427 if (op == NULL) 399 sprintf (obuf, "Range: Casting spell (%s)", &pl->spell->name);
428 break; 400 }
429 401 else
430 sprintf (obuf, "Range: %s (%s)", query_base_name (op, 0), op->race ? (const char *) op->race : "nothing"); 402 sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name);
431 } 403 }
432 break;
433
434 case range_magic:
435 if (settings.casting_time == TRUE)
436 {
437 if (pl->casting_time > -1)
438 {
439 if (pl->casting_time == 0)
440 sprintf (obuf, "Range: Holding spell (%s)", (const char *) pl->spell->name);
441 else
442 sprintf (obuf, "Range: Casting spell (%s)", (const char *) pl->spell->name);
443 }
444 else
445 sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name);
446 }
447 else 404 else
448 sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name); 405 sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name);
449 break; 406 break;
450 407
451 case range_misc: 408 case range_misc:
452 sprintf (obuf, "Range: %s", pl->contr->ranges[range_misc] ? query_base_name (pl->contr->ranges[range_misc], 0) : "none"); 409 sprintf (obuf, "Range: %s", pl->contr->ranges[range_misc] ? query_base_name (pl->contr->ranges[range_misc], 0) : "none");
453 break; 410 break;
454 411
455 /* range_scroll is only used for controlling golems. If the 412 /* range_scroll is only used for controlling golems. If the
456 * the player does not have a golem, reset some things. 413 * the player does not have a golem, reset some things.
457 */ 414 */
458 case range_golem: 415 case range_golem:
459 if (pl->contr->ranges[range_golem] != NULL) 416 if (pl->contr->ranges[range_golem] != NULL)
460 sprintf (obuf, "Range: golem (%s)", &pl->contr->ranges[range_golem]->name); 417 sprintf (obuf, "Range: golem (%s)", &pl->contr->ranges[range_golem]->name);
461 else 418 else
462 { 419 {
463 pl->contr->shoottype = range_none; 420 pl->contr->shoottype = range_none;
464 strcpy (obuf, "Range: nothing"); 421 strcpy (obuf, "Range: nothing");
465 } 422 }
466 break; 423 break;
467 424
468 case range_skill: 425 case range_skill:
469 sprintf (obuf, "Skill: %s", pl->chosen_skill != NULL ? (const char *) pl->chosen_skill->name : "none"); 426 sprintf (obuf, "Skill: %s", pl->chosen_skill != NULL ? (const char *) pl->chosen_skill->name : "none");
470 break; 427 break;
471 428
472 case range_builder: 429 case range_builder:
473 sprintf (obuf, "Builder: %s", query_base_name (pl->contr->ranges[range_builder], 0)); 430 sprintf (obuf, "Builder: %s", query_base_name (pl->contr->ranges[range_builder], 0));
474 break; 431 break;
475 432
476 default: 433 default:
477 strcpy (obuf, "Range: illegal"); 434 strcpy (obuf, "Range: illegal");
478 } 435 }
479} 436}
480 437
481/** 438/**
482 * Sets player title. 439 * Sets player title.
… …
605 } 562 }
606 } 563 }
607 } 564 }
608} 565}
609 566
610
611/** 567/**
612 * Creates and sends magic map to player. 568 * Creates and sends magic map to player.
613 * 569 *
614 * The following function is a lot messier than it really should be, 570 * The following function is a lot messier than it really should be,
615 * but there is no real easy solution. 571 * but there is no real easy solution.
… …
618 */ 574 */
619 575
620void 576void
621draw_magic_map (object *pl) 577draw_magic_map (object *pl)
622{ 578{
623 int x, y;
624 char *map_mark = (char *) calloc (MAGIC_MAP_SIZE * MAGIC_MAP_SIZE, 1); 579 char *map_mark = (char *)calloc (MAGIC_MAP_SIZE * MAGIC_MAP_SIZE, 1);
625 int xmin, xmax, ymin, ymax; 580 int xmin, xmax, ymin, ymax;
626 SockList sl;
627 581
628 if (pl->type != PLAYER) 582 if (pl->type != PLAYER)
629 { 583 {
630 LOG (llevError, "Non player object called draw_map.\n"); 584 LOG (llevError, "Non player object called draw_map.\n");
631 return; 585 return;
… …
641 */ 595 */
642 xmin = MAGIC_MAP_SIZE; 596 xmin = MAGIC_MAP_SIZE;
643 ymin = MAGIC_MAP_SIZE; 597 ymin = MAGIC_MAP_SIZE;
644 xmax = 0; 598 xmax = 0;
645 ymax = 0; 599 ymax = 0;
600
646 for (x = 0; x < MAGIC_MAP_SIZE; x++) 601 for (int x = 0; x < MAGIC_MAP_SIZE; x++)
647 {
648 for (y = 0; y < MAGIC_MAP_SIZE; y++) 602 for (int y = 0; y < MAGIC_MAP_SIZE; y++)
649 {
650 if (map_mark[x + MAP_WIDTH (pl->map) * y] | FACE_FLOOR) 603 if (map_mark[x + MAP_WIDTH (pl->map) * y] | FACE_FLOOR)
651 { 604 {
652 xmin = x < xmin ? x : xmin; 605 xmin = x < xmin ? x : xmin;
653 xmax = x > xmax ? x : xmax; 606 xmax = x > xmax ? x : xmax;
654 ymin = y < ymin ? y : ymin; 607 ymin = y < ymin ? y : ymin;
655 ymax = y > ymax ? y : ymax; 608 ymax = y > ymax ? y : ymax;
656 } 609 }
657 }
658 }
659 610
660 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 611 packet sl;
661 snprintf ((char *) sl.buf, MAXSOCKBUF, "magicmap %d %d %d %d ", (xmax - xmin + 1), (ymax - ymin + 1), 612 sl.printf ("magicmap %d %d %d %d ", (xmax - xmin + 1), (ymax - ymin + 1),
662 MAGIC_MAP_HALF - xmin, MAGIC_MAP_HALF - ymin); 613 MAGIC_MAP_HALF - xmin, MAGIC_MAP_HALF - ymin);
663 sl.len = strlen ((char *) sl.buf);
664 614
665 for (y = ymin; y <= ymax; y++) 615 for (int y = ymin; y <= ymax; y++)
666 {
667 for (x = xmin; x <= xmax; x++) 616 for (int x = xmin; x <= xmax; x++)
668 {
669 sl.buf[sl.len++] = map_mark[x + MAGIC_MAP_SIZE * y] & ~FACE_FLOOR; 617 sl << uint8 (map_mark[x + MAGIC_MAP_SIZE * y] & ~FACE_FLOOR);
670 } /* x loop */
671 } /* y loop */
672 618
673 Send_With_Handling (&pl->contr->socket, &sl); 619 pl->contr->socket->send_packet (sl);
674 free (sl.buf); 620
675 free (map_mark); 621 free (map_mark);
676} 622}
677 623
678
679/** 624/**
680 * Send a kill log record to sockets 625 * Send a kill log record to sockets
681 */ 626 */
682
683void 627void
684Log_Kill (const char *Who, const char *What, int WhatType, const char *With, int WithType) 628Log_Kill (const char *Who, const char *What, int WhatType, const char *With, int WithType)
685{ 629{
686 int i;
687 size_t len; 630 size_t len;
688 char buf[MAX_BUF]; 631 char buf[MAX_BUF];
689 632
690 if (With != NULL) 633 if (With != NULL)
691 {
692 snprintf (buf, MAX_BUF, "%s\t%s\t%d\t%s\t%d\n", Who, What, WhatType, With, WithType); 634 snprintf (buf, MAX_BUF, "%s\t%s\t%d\t%s\t%d\n", Who, What, WhatType, With, WithType);
693 }
694 else 635 else
695 {
696 snprintf (buf, MAX_BUF, "%s\t%s\t%d\n", Who, What, WhatType); 636 snprintf (buf, MAX_BUF, "%s\t%s\t%d\n", Who, What, WhatType);
697 } 637
698 len = strlen (buf); 638 len = strlen (buf);
699 for (i = 1; i < socket_info.allocated_sockets; i++)
700 {
701 if (init_sockets[i].old_mode == Old_Listen)
702 {
703 cs_write_string (&init_sockets[i], buf, len);
704 }
705 }
706} 639}
640

Diff Legend

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