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

Comparing deliantra/server/socket/request.C (file contents):
Revision 1.21 by root, Sat Sep 16 22:24:13 2006 UTC vs.
Revision 1.45 by root, Tue Dec 19 04:58:05 2006 UTC

38 * esrv_map_new starts updating the map 38 * esrv_map_new starts updating the map
39 * 39 *
40 * esrv_map_setbelow allows filling in all of the faces for the map. 40 * esrv_map_setbelow allows filling in all of the faces for the map.
41 * if a face has not already been sent to the client, it is sent now. 41 * if a face has not already been sent to the client, it is sent now.
42 * 42 *
43 * mapcellchanged, compactlayer, compactstack, perform the map compressing
44 * operations
45 *
46 * esrv_map_doneredraw finishes the map update, and ships across the
47 * map updates.
48 *
49 */ 43 */
50 44
51#include <global.h> 45#include <global.h>
52#include <sproto.h> 46#include <sproto.h>
53 47
54#include <newclient.h>
55#include <newserver.h>
56#include <living.h> 48#include <living.h>
57#include <commands.h> 49#include <commands.h>
58 50
59/* This block is basically taken from socket.c - I assume if it works there, 51/* This block is basically taken from socket.c - I assume if it works there,
60 * it should work here. 52 * it should work here.
61 */ 53 */
62#ifndef WIN32 /* ---win32 exclude unix headers */
63# include <sys/types.h> 54#include <sys/types.h>
64# include <sys/time.h> 55#include <sys/time.h>
65# include <sys/socket.h> 56#include <sys/socket.h>
66# include <netinet/in.h> 57#include <netinet/in.h>
67# include <netdb.h> 58#include <netdb.h>
68#endif /* win32 */
69 59
70#ifdef HAVE_UNISTD_H
71# include <unistd.h> 60#include <unistd.h>
72#endif
73
74#ifdef HAVE_SYS_TIME_H
75# include <sys/time.h> 61#include <sys/time.h>
76#endif
77 62
78#include "sounds.h" 63#include "sounds.h"
79 64
80/** 65/**
81 * This table translates the attack numbers as used within the 66 * This table translates the attack numbers as used within the
98 -1, /* life stealing */ 83 -1, /* life stealing */
99 -1 /* Disease - not fully done yet */ 84 -1 /* Disease - not fully done yet */
100}; 85};
101 86
102static void 87static void
103socket_map_scroll (NewSocket * ns, int dx, int dy) 88socket_map_scroll (client *ns, int dx, int dy)
104{ 89{
105 struct Map newmap; 90 struct Map newmap;
106 int x, y, mx, my; 91 int x, y, mx, my;
107 92
108 {
109 char buf[MAXSOCKBUF];
110
111 sprintf (buf, "map_scroll %d %d", dx, dy); 93 ns->send_packet_printf ("map_scroll %d %d", dx, dy);
112 Write_String_To_Socket (ns, buf, strlen (buf));
113 }
114 94
115 /* If we are using the Map1aCmd, we may in fact send 95 /* If we are using the Map1aCmd, we may in fact send
116 * head information that is outside the viewable map. 96 * head information that is outside the viewable map.
117 * So set the mx,my to the max value we want to 97 * So set the mx,my to the max value we want to
118 * look for. Removed code to do so - it caused extra 98 * look for. Removed code to do so - it caused extra
137 for (x = 0; x < mx; x++) 117 for (x = 0; x < mx; x++)
138 { 118 {
139 for (y = 0; y < my; y++) 119 for (y = 0; y < my; y++)
140 { 120 {
141 if (x >= ns->mapx || y >= ns->mapy) 121 if (x >= ns->mapx || y >= ns->mapy)
142 {
143 /* clear cells outside the viewable area */ 122 /* clear cells outside the viewable area */
144 memset (&newmap.cells[x][y], 0, sizeof (struct MapCell)); 123 memset (&newmap.cells[x][y], 0, sizeof (struct MapCell));
145 }
146 else if ((x + dx) < 0 || (x + dx) >= ns->mapx || (y + dy) < 0 || (y + dy) >= ns->mapy) 124 else if ((x + dx) < 0 || (x + dx) >= ns->mapx || (y + dy) < 0 || (y + dy) >= ns->mapy)
147 {
148 /* clear newly visible tiles within the viewable area */ 125 /* clear newly visible tiles within the viewable area */
149 memset (&(newmap.cells[x][y]), 0, sizeof (struct MapCell)); 126 memset (&(newmap.cells[x][y]), 0, sizeof (struct MapCell));
150 }
151 else 127 else
152 {
153 memcpy (&(newmap.cells[x][y]), &(ns->lastmap.cells[x + dx][y + dy]), sizeof (struct MapCell)); 128 memcpy (&(newmap.cells[x][y]), &(ns->lastmap.cells[x + dx][y + dy]), sizeof (struct MapCell));
154 }
155 } 129 }
156 } 130 }
157 131
158 memcpy (&(ns->lastmap), &newmap, sizeof (struct Map)); 132 memcpy (&(ns->lastmap), &newmap, sizeof (struct Map));
159 133
164} 138}
165 139
166static void 140static void
167clear_map (player *pl) 141clear_map (player *pl)
168{ 142{
169 NewSocket & socket = pl->socket; 143 client &socket = *pl->socket;
170 144
171 memset (&socket.lastmap, 0, sizeof (socket.lastmap)); 145 memset (&socket.lastmap, 0, sizeof (socket.lastmap));
172 146
173 if (socket.newmapcmd == 1) 147 if (socket.newmapcmd == 1)
174 Write_String_To_Socket (&socket, "newmap", 6); 148 socket.send_packet ("newmap");
175 149
176 socket.update_look = 1; 150 socket.update_look = 1;
177 socket.look_position = 0; 151 socket.look_position = 0;
178} 152}
179 153
180/** check for map change and send new map data */ 154/** check for map change and send new map data */
181static void 155static void
182check_map_change (player *pl) 156check_map_change (player *pl)
183{ 157{
184 NewSocket & socket = pl->socket; 158 client &socket = *pl->socket;
185 object *ob = pl->ob; 159 object *ob = pl->ob;
186 char buf[MAX_BUF]; /* eauugggh */ 160 char buf[MAX_BUF]; /* eauugggh */
187 161
188 if (socket.current_map != ob->map) 162 if (socket.current_map != ob->map)
189 { 163 {
210 flags, socket.mapx / 2 - ob->x, socket.mapy / 2 - ob->y, ob->map->width, ob->map->height, ob->map->path); 184 flags, socket.mapx / 2 - ob->x, socket.mapy / 2 - ob->y, ob->map->width, ob->map->height, ob->map->path);
211 } 185 }
212 else 186 else
213 snprintf (buf, MAX_BUF, "mapinfo current"); 187 snprintf (buf, MAX_BUF, "mapinfo current");
214 188
215 Write_String_To_Socket (&socket, buf, strlen (buf)); 189 socket.send_packet (buf);
216 } 190 }
217 } 191 }
218 else if (socket.current_x != ob->x || socket.current_y != ob->y) 192 else if (socket.current_x != ob->x || socket.current_y != ob->y)
219 { 193 {
220 int dx = ob->x - socket.current_x; 194 int dx = ob->x - socket.current_x;
232 206
233 socket.current_x = ob->x; 207 socket.current_x = ob->x;
234 socket.current_y = ob->y; 208 socket.current_y = ob->y;
235} 209}
236 210
211/**
212 * RequestInfo is sort of a meta command. There is some specific
213 * request of information, but we call other functions to provide
214 * that information.
215 */
216void
217RequestInfo (char *buf, int len, client * ns)
218{
219 char *params = NULL, *cp;
220
221 /* No match */
222 char bigbuf[MAX_BUF];
223 int slen;
224
225 /* Set up replyinfo before we modify any of the buffers - this is used
226 * if we don't find a match.
227 */
228 strcpy (bigbuf, "replyinfo ");
229 slen = strlen (bigbuf);
230 safe_strcat (bigbuf, buf, &slen, MAX_BUF);
231
232 /* find the first space, make it null, and update the
233 * params pointer.
234 */
235 for (cp = buf; *cp != '\0'; cp++)
236 if (*cp == ' ')
237 {
238 *cp = '\0';
239 params = cp + 1;
240 break;
241 }
242
243 if (!strcmp (buf, "image_info"))
244 send_image_info (ns, params);
245 else if (!strcmp (buf, "image_sums"))
246 send_image_sums (ns, params);
247 else if (!strcmp (buf, "skill_info"))
248 send_skill_info (ns, params);
249 else if (!strcmp (buf, "spell_paths"))
250 send_spell_paths (ns, params);
251 else
252 ns->send_packet (bigbuf, len);
253}
254
237void 255void
238ExtCmd (char *buf, int len, player *pl) 256ExtCmd (char *buf, int len, player *pl)
239{ 257{
240 INVOKE_PLAYER (EXTCMD, pl, ARG_DATA (buf, len)); 258 INVOKE_PLAYER (EXTCMD, pl, ARG_DATA (buf, len));
259}
260
261void
262ExtiCmd (char *buf, int len, client *ns)
263{
264 INVOKE_CLIENT (EXTICMD, ns, ARG_DATA (buf, len));
241} 265}
242 266
243void 267void
244MapInfoCmd (char *buf, int len, player *pl) 268MapInfoCmd (char *buf, int len, player *pl)
245{ 269{
260 buf += 8; 284 buf += 8;
261 285
262 // initial map and its origin 286 // initial map and its origin
263 maptile *map = pl->ob->map; 287 maptile *map = pl->ob->map;
264 sint16 dx, dy; 288 sint16 dx, dy;
265 int mapx = pl->socket.mapx / 2 - pl->ob->x; 289 int mapx = pl->socket->mapx / 2 - pl->ob->x;
266 int mapy = pl->socket.mapy / 2 - pl->ob->y; 290 int mapy = pl->socket->mapy / 2 - pl->ob->y;
267 int max_distance = 8; // limit maximum path length to something generous 291 int max_distance = 8; // limit maximum path length to something generous
268 292
269 while (*buf && map && max_distance) 293 while (*buf && map && max_distance)
270 { 294 {
271 int dir = *buf++; 295 int dir = *buf++;
322 snprintf (bigbuf, MAX_BUF, "mapinfo %s nomap", token); 346 snprintf (bigbuf, MAX_BUF, "mapinfo %s nomap", token);
323 } 347 }
324 else 348 else
325 snprintf (bigbuf, MAX_BUF, "mapinfo %s unsupported", token); 349 snprintf (bigbuf, MAX_BUF, "mapinfo %s unsupported", token);
326 350
327 Write_String_To_Socket (&pl->socket, bigbuf, strlen (bigbuf)); 351 pl->socket->send_packet (bigbuf);
328} 352}
329 353
330/** This is the Setup cmd - easy first implementation */ 354/** This is the Setup cmd - easy first implementation */
331void 355void
332SetUp (char *buf, int len, NewSocket * ns) 356SetUp (char *buf, int len, client * ns)
333{ 357{
334 int s, slen; 358 int s, slen;
335 char *cmd, *param, cmdback[HUGE_BUF]; 359 char *cmd, *param, cmdback[HUGE_BUF];
336 360
337 /* run through the cmds of setup 361 /* run through the cmds of setup
339 * 363 *
340 * we send the status of the cmd back, or a FALSE is the cmd is the server unknown 364 * we send the status of the cmd back, or a FALSE is the cmd is the server unknown
341 * The client then must sort this out 365 * The client then must sort this out
342 */ 366 */
343 367
344 LOG (llevInfo, "Get SetupCmd:: %s\n", buf); 368 //LOG (llevInfo, "Get SetupCmd:: %s\n", buf);
369
345 strcpy (cmdback, "setup"); 370 strcpy (cmdback, "setup");
346 for (s = 0; s < len;) 371 for (s = 0; s < len; )
347 { 372 {
348
349 cmd = &buf[s]; 373 cmd = &buf[s];
350 374
351 /* find the next space, and put a null there */ 375 /* find the next space, and put a null there */
352 for (; buf[s] && buf[s] != ' '; s++); 376 for (; buf[s] && buf[s] != ' '; s++)
377 ;
378
353 buf[s++] = 0; 379 buf[s++] = 0;
380
354 while (buf[s] == ' ') 381 while (buf[s] == ' ')
355 s++; 382 s++;
356 383
357 if (s >= len) 384 if (s >= len)
358 break; 385 break;
359 386
360 param = &buf[s]; 387 param = &buf[s];
361 388
362 for (; buf[s] && buf[s] != ' '; s++); 389 for (; buf[s] && buf[s] != ' '; s++)
390 ;
391
363 buf[s++] = 0; 392 buf[s++] = 0;
393
364 while (buf[s] == ' ') 394 while (buf[s] == ' ')
365 s++; 395 s++;
366 396
367 slen = strlen (cmdback); 397 slen = strlen (cmdback);
368 safe_strcat (cmdback, " ", &slen, HUGE_BUF); 398 safe_strcat (cmdback, " ", &slen, HUGE_BUF);
529 * report a failure to the client. 559 * report a failure to the client.
530 */ 560 */
531 safe_strcat (cmdback, "FALSE", &slen, HUGE_BUF); 561 safe_strcat (cmdback, "FALSE", &slen, HUGE_BUF);
532 } 562 }
533 } /* for processing all the setup commands */ 563 } /* for processing all the setup commands */
564
534 LOG (llevInfo, "SendBack SetupCmd:: %s\n", cmdback); 565 LOG (llevInfo, "SendBack SetupCmd:: %s\n", cmdback);
535 Write_String_To_Socket (ns, cmdback, strlen (cmdback)); 566 ns->send_packet (cmdback);
536} 567}
537 568
538/** 569/**
539 * The client has requested to be added to the game. 570 * The client has requested to be added to the game.
540 * This is what takes care of it. We tell the client how things worked out. 571 * This is what takes care of it. We tell the client how things worked out.
541 * I am not sure if this file is the best place for this function. however, 572 * I am not sure if this file is the best place for this function. however,
542 * it either has to be here or init_sockets needs to be exported. 573 * it either has to be here or init_sockets needs to be exported.
543 */ 574 */
544void 575void
545AddMeCmd (char *buf, int len, NewSocket * ns) 576AddMeCmd (char *buf, int len, client * ns)
546{ 577{
547 Settings oldsettings;
548
549 oldsettings = settings;
550 if (ns->status != Ns_Add || add_player (ns)) 578 if (ns->status != Ns_Add || add_player (ns))
551 { 579 ns->send_packet ("addme_failed");
552 Write_String_To_Socket (ns, "addme_failed", 12);
553 }
554 else 580 else
555 { 581 ns->send_packet ("addme_success");
556 /* Basically, the add_player copies the socket structure into
557 * the player structure, so this one (which is from init_sockets)
558 * is not needed anymore. The write below should still work, as the
559 * stuff in ns is still relevant.
560 */
561 Write_String_To_Socket (ns, "addme_success", 13);
562 socket_info.nconns--;
563 ns->status = Ns_Avail;
564 }
565 settings = oldsettings;
566} 582}
567 583
568/** Reply to ExtendedInfos command */ 584/** Reply to ExtendedInfos command */
569void 585void
570ToggleExtendedInfos (char *buf, int len, NewSocket * ns) 586ToggleExtendedInfos (char *buf, int len, client * ns)
571{ 587{
572 char cmdback[MAX_BUF]; 588 char cmdback[MAX_BUF];
573 char command[50]; 589 char command[50];
574 int info, nextinfo; 590 int info, nextinfo;
575 591
613 { 629 {
614 strcat (cmdback, " "); 630 strcat (cmdback, " ");
615 strcat (cmdback, "smoothing"); 631 strcat (cmdback, "smoothing");
616 } 632 }
617 633
618 Write_String_To_Socket (ns, cmdback, strlen (cmdback)); 634 ns->send_packet (cmdback);
619} 635}
620 636
621/* 637/*
622#define MSG_TYPE_BOOK 1 638#define MSG_TYPE_BOOK 1
623#define MSG_TYPE_CARD 2 639#define MSG_TYPE_CARD 2
626#define MSG_TYPE_MONUMENT 5 642#define MSG_TYPE_MONUMENT 5
627#define MSG_TYPE_SCRIPTED_DIALOG 6*/ 643#define MSG_TYPE_SCRIPTED_DIALOG 6*/
628 644
629/** Reply to ExtendedInfos command */ 645/** Reply to ExtendedInfos command */
630void 646void
631ToggleExtendedText (char *buf, int len, NewSocket * ns) 647ToggleExtendedText (char *buf, int len, client * ns)
632{ 648{
633 char cmdback[MAX_BUF]; 649 char cmdback[MAX_BUF];
634 char temp[10]; 650 char temp[10];
635 char command[50]; 651 char command[50];
636 int info, nextinfo, i, flag; 652 int info, nextinfo, i, flag;
676 strcat (cmdback, " "); 692 strcat (cmdback, " ");
677 snprintf (temp, sizeof (temp), "%d", i); 693 snprintf (temp, sizeof (temp), "%d", i);
678 strcat (cmdback, temp); 694 strcat (cmdback, temp);
679 } 695 }
680 696
681 Write_String_To_Socket (ns, cmdback, strlen (cmdback)); 697 ns->send_packet (cmdback);
682} 698}
683 699
684/** 700/**
685 * A lot like the old AskSmooth (in fact, now called by AskSmooth). 701 * A lot like the old AskSmooth (in fact, now called by AskSmooth).
686 * Basically, it makes no sense to wait for the client to request a 702 * Basically, it makes no sense to wait for the client to request a
687 * a piece of data from us that we know the client wants. So 703 * a piece of data from us that we know the client wants. So
688 * if we know the client wants it, might as well push it to the 704 * if we know the client wants it, might as well push it to the
689 * client. 705 * client.
690 */ 706 */
691static void 707static void
692SendSmooth (NewSocket * ns, uint16 face) 708SendSmooth (client *ns, uint16 face)
693{ 709{
694 uint16 smoothface; 710 uint16 smoothface;
695 unsigned char reply[MAX_BUF];
696 SockList sl;
697 711
698 /* If we can't find a face, return and set it so we won't try to send this 712 /* If we can't find a face, return and set it so we won't try to send this
699 * again. 713 * again.
700 */ 714 */
701 if ((!FindSmooth (face, &smoothface)) && (!FindSmooth (smooth_face->number, &smoothface))) 715 if ((!FindSmooth (face, &smoothface)) && (!FindSmooth (smooth_face->number, &smoothface)))
709 if (!(ns->faces_sent[smoothface] & NS_FACESENT_FACE)) 723 if (!(ns->faces_sent[smoothface] & NS_FACESENT_FACE))
710 esrv_send_face (ns, smoothface, 0); 724 esrv_send_face (ns, smoothface, 0);
711 725
712 ns->faces_sent[face] |= NS_FACESENT_SMOOTH; 726 ns->faces_sent[face] |= NS_FACESENT_SMOOTH;
713 727
714 sl.buf = reply; 728 packet sl;
715 strcpy ((char *) sl.buf, "smooth "); 729
716 sl.len = strlen ((char *) sl.buf); 730 sl << "smooth "
717 SockList_AddShort (&sl, face); 731 << uint16 (face)
718 SockList_AddShort (&sl, smoothface); 732 << uint16 (smoothface);
719 Send_With_Handling (ns, &sl); 733
734 ns->send_packet (sl);
720} 735}
721 736
722 /** 737 /**
723 * Tells client the picture it has to use 738 * Tells client the picture it has to use
724 * to smooth a picture number given as argument. 739 * to smooth a picture number given as argument.
725 */ 740 */
726void 741void
727AskSmooth (char *buf, int len, NewSocket * ns) 742AskSmooth (char *buf, int len, client *ns)
728{ 743{
729 uint16 facenbr; 744 SendSmooth (ns, atoi (buf));
730
731 facenbr = atoi (buf);
732 SendSmooth (ns, facenbr);
733} 745}
734
735
736
737
738 746
739/** 747/**
740 * This handles the general commands from the client (ie, north, fire, cast, 748 * This handles the general commands from the client (ie, north, fire, cast,
741 * etc.) 749 * etc.)
742 */ 750 */
743void 751void
744PlayerCmd (char *buf, int len, player *pl) 752PlayerCmd (char *buf, int len, player *pl)
745{ 753{
746
747 /* The following should never happen with a proper or honest client.
748 * Therefore, the error message doesn't have to be too clear - if
749 * someone is playing with a hacked/non working client, this gives them
750 * an idea of the problem, but they deserve what they get
751 */
752 if (pl->state != ST_PLAYING)
753 {
754 new_draw_info_format (NDI_UNIQUE, 0, pl->ob, "You can not issue commands - state is not ST_PLAYING (%s)", buf);
755 return;
756 }
757 /* Check if there is a count. In theory, a zero count could also be 754 /* Check if there is a count. In theory, a zero count could also be
758 * sent, so check for that also. 755 * sent, so check for that also.
759 */ 756 */
760 if (atoi (buf) || buf[0] == '0') 757 if (atoi (buf) || buf[0] == '0')
761 { 758 {
762 pl->count = atoi ((char *) buf); 759 pl->count = atoi ((char *) buf);
760
763 buf = strchr (buf, ' '); /* advance beyond the numbers */ 761 buf = strchr (buf, ' '); /* advance beyond the numbers */
764 if (!buf) 762 if (!buf)
765 {
766#ifdef ESRV_DEBUG
767 LOG (llevDebug, "PlayerCmd: Got count but no command.\n");
768#endif
769 return; 763 return;
770 } 764
771 buf++; 765 buf++;
772 } 766 }
773 /* This should not happen anymore. */ 767
774 if (pl->ob->speed_left < -1.0)
775 {
776 LOG (llevError, "Player has negative time - shouldn't do command.\n");
777 }
778 /* In c_new.c */
779 execute_newserver_command (pl->ob, (char *) buf); 768 execute_newserver_command (pl->ob, (char *) buf);
769
780 /* Perhaps something better should be done with a left over count. 770 /* Perhaps something better should be done with a left over count.
781 * Cleaning up the input should probably be done first - all actions 771 * Cleaning up the input should probably be done first - all actions
782 * for the command that issued the count should be done before any other 772 * for the command that issued the count should be done before any other
783 * commands. 773 * commands.
784 */ 774 */
785
786 pl->count = 0; 775 pl->count = 0;
787
788} 776}
789 777
790 778
791/** 779/**
792 * This handles the general commands from the client (ie, north, fire, cast, 780 * This handles the general commands from the client (ie, north, fire, cast,
793 * etc.). It is a lot like PlayerCmd above, but is called with the 781 * etc.). It is a lot like PlayerCmd above, but is called with the
794 * 'ncom' method which gives more information back to the client so it 782 * 'ncom' method which gives more information back to the client so it
795 * can throttle. 783 * can throttle.
796 */ 784 */
797void 785void
798NewPlayerCmd (uint8 * buf, int len, player *pl) 786NewPlayerCmd (char *buf, int len, player *pl)
799{ 787{
800 int time, repeat;
801 short packet;
802 unsigned char command[MAX_BUF];
803 SockList sl;
804
805 if (len < 7) 788 if (len <= 6)
806 { 789 {
807 LOG (llevDebug, "Corrupt ncom command <%s> not long enough - discarding\n", buf); 790 LOG (llevDebug, "Corrupt ncom command <%s> not long enough - discarding\n", buf);
808 return; 791 return;
809 } 792 }
810 793
811 packet = GetShort_String (buf); 794 uint16 cmdid = net_uint16 ((uint8 *)buf);
812 repeat = GetInt_String (buf + 2); 795 sint32 repeat = net_sint32 ((uint8 *)buf + 2);
796
813 /* -1 is special - no repeat, but don't update */ 797 /* -1 is special - no repeat, but don't update */
814 if (repeat != -1) 798 if (repeat != -1)
815 {
816 pl->count = repeat; 799 pl->count = repeat;
817 }
818 if ((len - 4) >= MAX_BUF)
819 len = MAX_BUF - 5;
820 800
821 strncpy ((char *) command, (char *) buf + 6, len - 4); 801 buf += 6; //len -= 6;
822 command[len - 4] = '\0';
823 802
824 /* The following should never happen with a proper or honest client.
825 * Therefore, the error message doesn't have to be too clear - if
826 * someone is playing with a hacked/non working client, this gives them
827 * an idea of the problem, but they deserve what they get
828 */
829 if (pl->state != ST_PLAYING)
830 {
831 new_draw_info_format (NDI_UNIQUE, 0, pl->ob, "You can not issue commands - state is not ST_PLAYING (%s)", buf);
832 return;
833 }
834
835 /* This should not happen anymore. */
836 if (pl->ob->speed_left < -1.0)
837 {
838 LOG (llevError, "Player has negative time - shouldn't do command.\n");
839 }
840 /* In c_new.c */
841 execute_newserver_command (pl->ob, (char *) command); 803 execute_newserver_command (pl->ob, buf);
804
842 /* Perhaps something better should be done with a left over count. 805 /* Perhaps something better should be done with a left over count.
843 * Cleaning up the input should probably be done first - all actions 806 * Cleaning up the input should probably be done first - all actions
844 * for the command that issued the count should be done before any other 807 * for the command that issued the count should be done before any other
845 * commands. 808 * commands.
846 */ 809 */
847 pl->count = 0; 810 pl->count = 0;
848 811
812 //TODO: schmorp thinks whatever this calculates, it makes no sense at all
813 int time = FABS (pl->ob->speed) < 0.001
814 ? time = MAX_TIME * 100
815 : time = (int) (MAX_TIME / FABS (pl->ob->speed));
816
849 /* Send confirmation of command execution now */ 817 /* Send confirmation of command execution now */
850 sl.buf = command; 818 packet sl;
851 strcpy ((char *) sl.buf, "comc "); 819 sl << "comc " << uint16 (cmdid) << uint32 (time);
852 sl.len = 5; 820 pl->socket->send_packet (sl);
853 SockList_AddShort (&sl, packet);
854 if (FABS (pl->ob->speed) < 0.001)
855 time = MAX_TIME * 100;
856 else
857 time = (int) (MAX_TIME / FABS (pl->ob->speed));
858 SockList_AddInt (&sl, time);
859 Send_With_Handling (&pl->socket, &sl);
860} 821}
861 822
862 823
863/** This is a reply to a previous query. */ 824/** This is a reply to a previous query. */
864void 825void
865ReplyCmd (char *buf, int len, player *pl) 826ReplyCmd (char *buf, int len, player *pl)
866{ 827{
867 /* This is to synthesize how the data would be stored if it 828 /* This is to synthesize how the data would be stored if it
868 * was normally entered. A bit of a hack, and should be cleaned up 829 * was normally entered. A bit of a hack, and should be cleaned up
869 * once all the X11 code is removed from the server. 830 * once all the X11 code is removed from the server.
870 * 831 *
871 * We pass 13 to many of the functions because this way they 832 * We pass 13 to many of the functions because this way they
872 * think it was the carriage return that was entered, and the 833 * think it was the carriage return that was entered, and the
873 * function then does not try to do additional input. 834 * function then does not try to do additional input.
876 837
877 /* this avoids any hacking here */ 838 /* this avoids any hacking here */
878 839
879 switch (pl->state) 840 switch (pl->state)
880 { 841 {
881 case ST_PLAYING: 842 case ST_PLAYING:
882 LOG (llevError, "Got reply message with ST_PLAYING input state\n"); 843 LOG (llevError, "Got reply message with ST_PLAYING input state\n");
883 break; 844 break;
884 845
885 case ST_PLAY_AGAIN: 846 case ST_PLAY_AGAIN:
886 /* We can check this for return value (2==quit). Maybe we 847 /* We can check this for return value (2==quit). Maybe we
887 * should, and do something appropriate? 848 * should, and do something appropriate?
888 */ 849 */
889 receive_play_again (pl->ob, buf[0]); 850 receive_play_again (pl->ob, buf[0]);
890 break; 851 break;
891 852
892 case ST_ROLL_STAT: 853 case ST_ROLL_STAT:
893 key_roll_stat (pl->ob, buf[0]); 854 key_roll_stat (pl->ob, buf[0]);
894 break; 855 break;
895 856
896 case ST_CHANGE_CLASS: 857 case ST_CHANGE_CLASS:
897 858
898 key_change_class (pl->ob, buf[0]); 859 key_change_class (pl->ob, buf[0]);
899 break; 860 break;
900 861
901 case ST_CONFIRM_QUIT: 862 case ST_CONFIRM_QUIT:
902 key_confirm_quit (pl->ob, buf[0]); 863 key_confirm_quit (pl->ob, buf[0]);
903 break; 864 break;
904 865
905 case ST_CONFIGURE: 866 case ST_CONFIGURE:
906 LOG (llevError, "In client input handling, but into configure state\n"); 867 LOG (llevError, "In client input handling, but into configure state\n");
907 pl->state = ST_PLAYING; 868 pl->state = ST_PLAYING;
908 break; 869 break;
909 870
910 case ST_GET_NAME: 871 case ST_GET_NAME:
911 receive_player_name (pl->ob, 13); 872 receive_player_name (pl->ob, 13);
912 break; 873 break;
913 874
914 case ST_GET_PASSWORD: 875 case ST_GET_PASSWORD:
915 case ST_CONFIRM_PASSWORD: 876 case ST_CONFIRM_PASSWORD:
916 receive_player_password (pl->ob, 13); 877 receive_player_password (pl->ob, 13);
917 break; 878 break;
918 879
919 case ST_GET_PARTY_PASSWORD: /* Get password for party */ 880 case ST_GET_PARTY_PASSWORD: /* Get password for party */
920 receive_party_password (pl->ob, 13); 881 receive_party_password (pl->ob, 13);
921 break; 882 break;
922 883
923 default: 884 default:
924 LOG (llevError, "Unknown input state: %d\n", pl->state); 885 LOG (llevError, "Unknown input state: %d\n", pl->state);
925 } 886 }
926} 887}
927 888
928/** 889/**
929 * Client tells its version. If there is a mismatch, we close the 890 * Client tells its version. If there is a mismatch, we close the
931 * something older than the server. If we assume the client will be 892 * something older than the server. If we assume the client will be
932 * backwards compatible, having it be a later version should not be a 893 * backwards compatible, having it be a later version should not be a
933 * problem. 894 * problem.
934 */ 895 */
935void 896void
936VersionCmd (char *buf, int len, NewSocket * ns) 897VersionCmd (char *buf, int len, client * ns)
937{ 898{
938 char *cp;
939 char version_warning[256];
940
941 if (!buf) 899 if (!buf)
942 { 900 {
943 LOG (llevError, "CS: received corrupted version command\n"); 901 LOG (llevError, "CS: received corrupted version command\n");
944 return; 902 return;
945 } 903 }
946 904
947 ns->cs_version = atoi (buf); 905 ns->cs_version = atoi (buf);
948 ns->sc_version = ns->cs_version; 906 ns->sc_version = ns->cs_version;
907
908 LOG (llevDebug, "connection from client <%s>\n", buf);
909
910
911 //TODO: should log here just for statistics
912
949 if (VERSION_CS != ns->cs_version) 913 //if (VERSION_CS != ns->cs_version)
950 { 914 // unchecked;
951#ifdef ESRV_DEBUG 915
952 LOG (llevDebug, "CS: csversion mismatch (%d,%d)\n", VERSION_CS, ns->cs_version);
953#endif
954 }
955 cp = strchr (buf + 1, ' '); 916 char *cp = strchr (buf + 1, ' ');
956 if (!cp) 917 if (!cp)
957 return; 918 return;
919
958 ns->sc_version = atoi (cp); 920 ns->sc_version = atoi (cp);
921
959 if (VERSION_SC != ns->sc_version) 922 //if (VERSION_SC != ns->sc_version)
960 { 923 // unchecked;
961#ifdef ESRV_DEBUG 924
962 LOG (llevDebug, "CS: scversion mismatch (%d,%d)\n", VERSION_SC, ns->sc_version);
963#endif
964 }
965 cp = strchr (cp + 1, ' '); 925 cp = strchr (cp + 1, ' ');
926
966 if (cp) 927 if (cp)
967 { 928 {
968 LOG (llevDebug, "CS: connection from client of type <%s>, ip %s\n", cp, ns->host); 929 assign (ns->version, cp + 1);
969 930
970 snprintf (ns->client, sizeof (ns->client), "%s", cp + 1); 931 if (ns->sc_version < 1026)
971 932 ns->send_packet_printf ("drawinfo %d %s", NDI_RED,
972 /* This is first implementation - i skip all beta DX clients with it
973 * Add later stuff here for other clients
974 */
975
976 /* these are old dxclients */
977 /* Version 1024 added support for singular + plural name values -
978 * requiing this minimal value reduces complexity of that code, and it
979 * has been around for a long time.
980 */
981 if (!strcmp (" CF DX CLIENT", cp) || ns->sc_version < 1024)
982 {
983 sprintf (version_warning, "drawinfo %d %s", NDI_RED,
984 "**** VERSION WARNING ****\n**** CLIENT IS TOO OLD!! UPDATE THE CLIENT!! ****"); 933 "**** VERSION WARNING ****\n**** CLIENT IS TOO OLD!! UPDATE THE CLIENT!! ****");
985 Write_String_To_Socket (ns, version_warning, strlen (version_warning));
986 }
987
988 } 934 }
989} 935}
990 936
991/** sound related functions. */ 937/** sound related functions. */
992
993void 938void
994SetSound (char *buf, int len, NewSocket * ns) 939SetSound (char *buf, int len, client * ns)
995{ 940{
996 ns->sound = atoi (buf); 941 ns->sound = atoi (buf);
997} 942}
998 943
999/** client wants the map resent */ 944/** client wants the map resent */
1000 945
1001void 946void
1002MapRedrawCmd (char *buf, int len, player *pl) 947MapRedrawCmd (char *buf, int len, player *pl)
1003{ 948{
1004
1005/* This function is currently disabled; just clearing the map state results in 949/* This function is currently disabled; just clearing the map state results in
1006 * display errors. It should clear the cache and send a newmap command. 950 * display errors. It should clear the cache and send a newmap command.
1007 * Unfortunately this solution does not work because some client versions send 951 * Unfortunately this solution does not work because some client versions send
1008 * a mapredraw command after receiving a newmap command. 952 * a mapredraw command after receiving a newmap command.
1009 */ 953 */
1010#if 0
1011 /* Okay, this is MAJOR UGLY. but the only way I know how to
1012 * clear the "cache"
1013 */
1014 memset (&pl->socket.lastmap, 0, sizeof (struct Map));
1015 draw_client_map (pl->ob);
1016#endif
1017} 954}
1018 955
1019/** 956/**
1020 * Moves an object (typically, container to inventory). 957 * Moves an object (typically, container to inventory).
1021 * syntax is: move (to) (tag) (nrof) 958 * syntax is: move (to) (tag) (nrof)
1024MoveCmd (char *buf, int len, player *pl) 961MoveCmd (char *buf, int len, player *pl)
1025{ 962{
1026 int vals[3], i; 963 int vals[3], i;
1027 964
1028 /* A little funky here. We only cycle for 2 records, because 965 /* A little funky here. We only cycle for 2 records, because
1029 * we obviously am not going to find a space after the third 966 * we obviously are not going to find a space after the third
1030 * record. Perhaps we should just replace this with a 967 * record. Perhaps we should just replace this with a
1031 * sscanf? 968 * sscanf?
1032 */ 969 */
1033 for (i = 0; i < 2; i++) 970 for (i = 0; i < 2; i++)
1034 { 971 {
1035 vals[i] = atoi (buf); 972 vals[i] = atoi (buf);
973
1036 if (!(buf = strchr (buf, ' '))) 974 if (!(buf = strchr (buf, ' ')))
1037 { 975 {
1038 LOG (llevError, "Incomplete move command: %s\n", buf); 976 LOG (llevError, "Incomplete move command: %s\n", buf);
1039 return; 977 return;
1040 } 978 }
979
1041 buf++; 980 buf++;
1042 } 981 }
982
1043 vals[2] = atoi (buf); 983 vals[2] = atoi (buf);
1044 984
1045/* LOG(llevDebug,"Move item %d (nrof=%d) to %d.\n", vals[1], vals[2], vals[0]);*/ 985/* LOG(llevDebug,"Move item %d (nrof=%d) to %d.\n", vals[1], vals[2], vals[0]);*/
1046 esrv_move_object (pl->ob, vals[0], vals[1], vals[2]); 986 esrv_move_object (pl->ob, vals[0], vals[1], vals[2]);
1047} 987}
1048
1049
1050 988
1051/****************************************************************************** 989/******************************************************************************
1052 * 990 *
1053 * Start of commands the server sends to the client. 991 * Start of commands the server sends to the client.
1054 * 992 *
1057/** 995/**
1058 * Asks the client to query the user. This way, the client knows 996 * Asks the client to query the user. This way, the client knows
1059 * it needs to send something back (vs just printing out a message) 997 * it needs to send something back (vs just printing out a message)
1060 */ 998 */
1061void 999void
1062send_query (NewSocket * ns, uint8 flags, char *text) 1000send_query (client *ns, uint8 flags, char *text)
1063{ 1001{
1064 char buf[MAX_BUF];
1065
1066 sprintf (buf, "query %d %s", flags, text ? text : ""); 1002 ns->send_packet_printf ("query %d %s", flags, text ? text : "");
1067 Write_String_To_Socket (ns, buf, strlen (buf));
1068} 1003}
1069 1004
1070#define AddIfInt64(Old,New,Type) if (Old != New) {\ 1005#define AddIfInt64(Old,New,Type) if (Old != New) {\
1071 Old = New; \ 1006 Old = New; \
1072 SockList_AddChar(&sl, Type); \ 1007 sl << uint8 (Type) << uint64 (New); \
1073 SockList_AddInt64(&sl, New); \
1074 } 1008 }
1075 1009
1076#define AddIfInt(Old,New,Type) if (Old != New) {\ 1010#define AddIfInt(Old,New,Type) if (Old != New) {\
1077 Old = New; \ 1011 Old = New; \
1078 SockList_AddChar(&sl, Type); \ 1012 sl << uint8 (Type) << uint32 (New); \
1079 SockList_AddInt(&sl, New); \
1080 } 1013 }
1081 1014
1082#define AddIfShort(Old,New,Type) if (Old != New) {\ 1015#define AddIfShort(Old,New,Type) if (Old != New) {\
1083 Old = New; \ 1016 Old = New; \
1084 SockList_AddChar(&sl, Type); \ 1017 sl << uint8 (Type) << uint16 (New); \
1085 SockList_AddShort(&sl, New); \
1086 } 1018 }
1087 1019
1088#define AddIfFloat(Old,New,Type) if (Old != New) {\ 1020#define AddIfFloat(Old,New,Type) if (Old != New) {\
1089 Old = New; \ 1021 Old = New; \
1090 SockList_AddChar(&sl, Type); \ 1022 sl << uint8 (Type) << uint32 (New*FLOAT_MULTI); \
1091 SockList_AddInt(&sl,(long)(New*FLOAT_MULTI));\
1092 } 1023 }
1093 1024
1094#define AddIfString(Old,New,Type) if (Old == NULL || strcmp(Old,New)) {\ 1025#define AddIfString(Old,New,Type) if (Old == NULL || strcmp(Old,New)) {\
1095 if (Old) free(Old);\
1096 Old = strdup_local(New);\ 1026 free(Old); Old = strdup (New);\
1097 SockList_AddChar(&sl, Type); \ 1027 sl << uint8 (Type) << data8 (New); \
1098 SockList_AddChar(&sl, ( char )strlen(New)); \
1099 strcpy((char*)sl.buf + sl.len, New); \
1100 sl.len += strlen(New); \
1101 } 1028 }
1102 1029
1103/** 1030/**
1104 * Sends a statistics update. We look at the old values, 1031 * Sends a statistics update. We look at the old values,
1105 * and only send what has changed. Stat mapping values are in newclient.h 1032 * and only send what has changed. Stat mapping values are in newclient.h
1107 * commands for now. 1034 * commands for now.
1108 */ 1035 */
1109void 1036void
1110esrv_update_stats (player *pl) 1037esrv_update_stats (player *pl)
1111{ 1038{
1112 SockList sl;
1113 char buf[MAX_BUF]; 1039 char buf[MAX_BUF];
1114 uint16 flags; 1040 uint16 flags;
1115 1041
1116 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 1042 packet sl;
1117 strcpy ((char *) sl.buf, "stats "); 1043 sl << "stats ";
1118 sl.len = strlen ((char *) sl.buf);
1119 1044
1120 if (pl->ob != NULL) 1045 if (pl->ob)
1121 { 1046 {
1122 AddIfShort (pl->last_stats.hp, pl->ob->stats.hp, CS_STAT_HP); 1047 AddIfShort (pl->last_stats.hp, pl->ob->stats.hp, CS_STAT_HP);
1123 AddIfShort (pl->last_stats.maxhp, pl->ob->stats.maxhp, CS_STAT_MAXHP); 1048 AddIfShort (pl->last_stats.maxhp, pl->ob->stats.maxhp, CS_STAT_MAXHP);
1124 AddIfShort (pl->last_stats.sp, pl->ob->stats.sp, CS_STAT_SP); 1049 AddIfShort (pl->last_stats.sp, pl->ob->stats.sp, CS_STAT_SP);
1125 AddIfShort (pl->last_stats.maxsp, pl->ob->stats.maxsp, CS_STAT_MAXSP); 1050 AddIfShort (pl->last_stats.maxsp, pl->ob->stats.maxsp, CS_STAT_MAXSP);
1131 AddIfShort (pl->last_stats.Wis, pl->ob->stats.Wis, CS_STAT_WIS); 1056 AddIfShort (pl->last_stats.Wis, pl->ob->stats.Wis, CS_STAT_WIS);
1132 AddIfShort (pl->last_stats.Dex, pl->ob->stats.Dex, CS_STAT_DEX); 1057 AddIfShort (pl->last_stats.Dex, pl->ob->stats.Dex, CS_STAT_DEX);
1133 AddIfShort (pl->last_stats.Con, pl->ob->stats.Con, CS_STAT_CON); 1058 AddIfShort (pl->last_stats.Con, pl->ob->stats.Con, CS_STAT_CON);
1134 AddIfShort (pl->last_stats.Cha, pl->ob->stats.Cha, CS_STAT_CHA); 1059 AddIfShort (pl->last_stats.Cha, pl->ob->stats.Cha, CS_STAT_CHA);
1135 } 1060 }
1061
1136 if (pl->socket.exp64) 1062 if (pl->socket->exp64)
1137 {
1138 uint8 s;
1139
1140 for (s = 0; s < NUM_SKILLS; s++) 1063 for (int s = 0; s < NUM_SKILLS; s++)
1141 {
1142 if (pl->last_skill_ob[s] && pl->last_skill_exp[s] != pl->last_skill_ob[s]->stats.exp) 1064 if (pl->last_skill_ob[s] && pl->last_skill_exp[s] != pl->last_skill_ob[s]->stats.exp)
1143 { 1065 {
1144
1145 /* Always send along the level if exp changes. This is only 1066 /* Always send along the level if exp changes. This is only
1146 * 1 extra byte, but keeps processing simpler. 1067 * 1 extra byte, but keeps processing simpler.
1147 */ 1068 */
1148 SockList_AddChar (&sl, (char) (s + CS_STAT_SKILLINFO)); 1069 sl << uint8 (s + CS_STAT_SKILLINFO)
1149 SockList_AddChar (&sl, (char) pl->last_skill_ob[s]->level); 1070 << uint8 (pl->last_skill_ob[s]->level)
1150 SockList_AddInt64 (&sl, pl->last_skill_ob[s]->stats.exp); 1071 << uint64 (pl->last_skill_ob[s]->stats.exp);
1072
1151 pl->last_skill_exp[s] = pl->last_skill_ob[s]->stats.exp; 1073 pl->last_skill_exp[s] = pl->last_skill_ob[s]->stats.exp;
1152 } 1074 }
1153 } 1075
1154 }
1155 if (pl->socket.exp64) 1076 if (pl->socket->exp64)
1156 {
1157 AddIfInt64 (pl->last_stats.exp, pl->ob->stats.exp, CS_STAT_EXP64); 1077 { AddIfInt64 (pl->last_stats.exp, pl->ob->stats.exp, CS_STAT_EXP64) }
1158 }
1159 else 1078 else
1160 {
1161 AddIfInt (pl->last_stats.exp, (int) pl->ob->stats.exp, CS_STAT_EXP); 1079 { AddIfInt (pl->last_stats.exp, (int) pl->ob->stats.exp, CS_STAT_EXP) }
1162 } 1080
1163 AddIfShort (pl->last_level, (char) pl->ob->level, CS_STAT_LEVEL); 1081 AddIfShort (pl->last_level, (char) pl->ob->level, CS_STAT_LEVEL);
1164 AddIfShort (pl->last_stats.wc, pl->ob->stats.wc, CS_STAT_WC); 1082 AddIfShort (pl->last_stats.wc, pl->ob->stats.wc, CS_STAT_WC);
1165 AddIfShort (pl->last_stats.ac, pl->ob->stats.ac, CS_STAT_AC); 1083 AddIfShort (pl->last_stats.ac, pl->ob->stats.ac, CS_STAT_AC);
1166 AddIfShort (pl->last_stats.dam, pl->ob->stats.dam, CS_STAT_DAM); 1084 AddIfShort (pl->last_stats.dam, pl->ob->stats.dam, CS_STAT_DAM);
1167 AddIfFloat (pl->last_speed, pl->ob->speed, CS_STAT_SPEED); 1085 AddIfFloat (pl->last_speed, pl->ob->speed, CS_STAT_SPEED);
1168 AddIfShort (pl->last_stats.food, pl->ob->stats.food, CS_STAT_FOOD); 1086 AddIfShort (pl->last_stats.food, pl->ob->stats.food, CS_STAT_FOOD);
1169 AddIfFloat (pl->last_weapon_sp, pl->weapon_sp, CS_STAT_WEAP_SP); 1087 AddIfFloat (pl->last_weapon_sp, pl->weapon_sp, CS_STAT_WEAP_SP);
1170 AddIfInt (pl->last_weight_limit, (sint32) weight_limit[pl->ob->stats.Str], CS_STAT_WEIGHT_LIM); 1088 AddIfInt (pl->last_weight_limit, (sint32) weight_limit[pl->ob->stats.Str], CS_STAT_WEIGHT_LIM);
1171 flags = 0; 1089 flags = 0;
1090
1172 if (pl->fire_on) 1091 if (pl->fire_on)
1173 flags |= SF_FIREON; 1092 flags |= SF_FIREON;
1093
1174 if (pl->run_on) 1094 if (pl->run_on)
1175 flags |= SF_RUNON; 1095 flags |= SF_RUNON;
1176 1096
1177 AddIfShort (pl->last_flags, flags, CS_STAT_FLAGS); 1097 AddIfShort (pl->last_flags, flags, CS_STAT_FLAGS);
1098
1178 if (pl->socket.sc_version < 1025) 1099 if (pl->socket->sc_version < 1025)
1179 {
1180 AddIfShort (pl->last_resist[ATNR_PHYSICAL], pl->ob->resist[ATNR_PHYSICAL], CS_STAT_ARMOUR); 1100 { AddIfShort (pl->last_resist[ATNR_PHYSICAL], pl->ob->resist[ATNR_PHYSICAL], CS_STAT_ARMOUR) }
1181 }
1182 else 1101 else
1183 {
1184 int i;
1185
1186 for (i = 0; i < NROFATTACKS; i++) 1102 for (int i = 0; i < NROFATTACKS; i++)
1187 { 1103 {
1188 /* Skip ones we won't send */ 1104 /* Skip ones we won't send */
1189 if (atnr_cs_stat[i] == -1) 1105 if (atnr_cs_stat[i] == -1)
1190 continue; 1106 continue;
1107
1191 AddIfShort (pl->last_resist[i], pl->ob->resist[i], (char) atnr_cs_stat[i]); 1108 AddIfShort (pl->last_resist[i], pl->ob->resist[i], (char) atnr_cs_stat[i]);
1192 } 1109 }
1193 } 1110
1194 if (pl->socket.monitor_spells) 1111 if (pl->socket->monitor_spells)
1195 { 1112 {
1196 AddIfInt (pl->last_path_attuned, pl->ob->path_attuned, CS_STAT_SPELL_ATTUNE); 1113 AddIfInt (pl->last_path_attuned, pl->ob->path_attuned, CS_STAT_SPELL_ATTUNE);
1197 AddIfInt (pl->last_path_repelled, pl->ob->path_repelled, CS_STAT_SPELL_REPEL); 1114 AddIfInt (pl->last_path_repelled, pl->ob->path_repelled, CS_STAT_SPELL_REPEL);
1198 AddIfInt (pl->last_path_denied, pl->ob->path_denied, CS_STAT_SPELL_DENY); 1115 AddIfInt (pl->last_path_denied, pl->ob->path_denied, CS_STAT_SPELL_DENY);
1199 } 1116 }
1117
1200 rangetostring (pl->ob, buf); /* we want use the new fire & run system in new client */ 1118 rangetostring (pl->ob, buf); /* we want use the new fire & run system in new client */
1201 AddIfString (pl->socket.stats.range, buf, CS_STAT_RANGE); 1119 AddIfString (pl->socket->stats.range, buf, CS_STAT_RANGE);
1202 set_title (pl->ob, buf); 1120 set_title (pl->ob, buf);
1203 AddIfString (pl->socket.stats.title, buf, CS_STAT_TITLE); 1121 AddIfString (pl->socket->stats.title, buf, CS_STAT_TITLE);
1204 1122
1205 /* Only send it away if we have some actual data */ 1123 /* Only send it away if we have some actual data */
1206 if (sl.len > 6) 1124 if (sl.length () > 6)
1207 { 1125 pl->socket->send_packet (sl);
1208#ifdef ESRV_DEBUG
1209 LOG (llevDebug, "Sending stats command, %d bytes long.\n", sl.len);
1210#endif
1211 Send_With_Handling (&pl->socket, &sl);
1212 }
1213 free (sl.buf);
1214} 1126}
1215
1216 1127
1217/** 1128/**
1218 * Tells the client that here is a player it should start using. 1129 * Tells the client that here is a player it should start using.
1219 */ 1130 */
1220void 1131void
1221esrv_new_player (player *pl, uint32 weight) 1132esrv_new_player (player *pl, uint32 weight)
1222{ 1133{
1223 SockList sl;
1224
1225 pl->last_weight = weight; 1134 pl->last_weight = weight;
1226 1135
1227 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 1136 packet sl;
1137 sl << "player ";
1228 1138
1229 strcpy ((char *) sl.buf, "player "); 1139 sl << uint32 (pl->ob->count)
1230 sl.len = strlen ((char *) sl.buf); 1140 << uint32 (weight)
1231 SockList_AddInt (&sl, pl->ob->count); 1141 << uint32 (pl->ob->face->number)
1232 SockList_AddInt (&sl, weight); 1142 << data8 (pl->ob->name);
1233 SockList_AddInt (&sl, pl->ob->face->number);
1234 1143
1235 SockList_AddChar (&sl, (char) strlen (pl->ob->name)); 1144 pl->socket->send_packet (sl);
1236 strcpy ((char *) sl.buf + sl.len, pl->ob->name);
1237 sl.len += strlen (pl->ob->name);
1238
1239 Send_With_Handling (&pl->socket, &sl);
1240 free (sl.buf);
1241 SET_FLAG (pl->ob, FLAG_CLIENT_SENT); 1145 SET_FLAG (pl->ob, FLAG_CLIENT_SENT);
1242} 1146}
1243
1244 1147
1245/** 1148/**
1246 * Need to send an animation sequence to the client. 1149 * Need to send an animation sequence to the client.
1247 * We will send appropriate face commands to the client if we haven't 1150 * We will send appropriate face commands to the client if we haven't
1248 * sent them the face yet (this can become quite costly in terms of 1151 * sent them the face yet (this can become quite costly in terms of
1249 * how much we are sending - on the other hand, this should only happen 1152 * how much we are sending - on the other hand, this should only happen
1250 * when the player logs in and picks stuff up. 1153 * when the player logs in and picks stuff up.
1251 */ 1154 */
1252void 1155void
1253esrv_send_animation (NewSocket * ns, short anim_num) 1156esrv_send_animation (client * ns, short anim_num)
1254{ 1157{
1255 SockList sl;
1256 int i;
1257
1258 /* Do some checking on the anim_num we got. Note that the animations 1158 /* Do some checking on the anim_num we got. Note that the animations
1259 * are added in contigous order, so if the number is in the valid 1159 * are added in contigous order, so if the number is in the valid
1260 * range, it must be a valid animation. 1160 * range, it must be a valid animation.
1261 */ 1161 */
1262 if (anim_num < 0 || anim_num > num_animations) 1162 if (anim_num < 0 || anim_num > num_animations)
1263 { 1163 {
1264 LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num); 1164 LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num);
1265 return; 1165 return;
1266 } 1166 }
1267 1167
1268 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 1168 packet sl;
1269 strcpy ((char *) sl.buf, "anim "); 1169
1270 sl.len = 5; 1170 sl << "anim "
1271 SockList_AddShort (&sl, anim_num); 1171 << uint16 (anim_num)
1272 SockList_AddShort (&sl, 0); /* flags - not used right now */ 1172 << uint16 (0); /* flags - not used right now */
1173
1273 /* Build up the list of faces. Also, send any information (ie, the 1174 /* Build up the list of faces. Also, send any information (ie, the
1274 * the face itself) down to the client. 1175 * the face itself) down to the client.
1275 */ 1176 */
1276 for (i = 0; i < animations[anim_num].num_animations; i++) 1177 for (int i = 0; i < animations[anim_num].num_animations; i++)
1277 { 1178 {
1278 if (!(ns->faces_sent[animations[anim_num].faces[i]] & NS_FACESENT_FACE)) 1179 if (!(ns->faces_sent[animations[anim_num].faces[i]] & NS_FACESENT_FACE))
1279 esrv_send_face (ns, animations[anim_num].faces[i], 0); 1180 esrv_send_face (ns, animations[anim_num].faces[i], 0);
1181
1280 SockList_AddShort (&sl, animations[anim_num].faces[i]); /* flags - not used right now */ 1182 sl << uint16 (animations[anim_num].faces[i]); /* flags - not used right now */
1281 } 1183 }
1282 Send_With_Handling (ns, &sl); 1184
1283 free (sl.buf); 1185 ns->send_packet (sl);
1186
1284 ns->anims_sent[anim_num] = 1; 1187 ns->anims_sent[anim_num] = 1;
1285} 1188}
1286 1189
1287 1190
1288/****************************************************************************** 1191/******************************************************************************
1294/** 1197/**
1295 * This adds face_num to a map cell at x,y. If the client doesn't have 1198 * This adds face_num to a map cell at x,y. If the client doesn't have
1296 * the face yet, we will also send it. 1199 * the face yet, we will also send it.
1297 */ 1200 */
1298static void 1201static void
1299esrv_map_setbelow (NewSocket * ns, int x, int y, short face_num, struct Map *newmap) 1202esrv_map_setbelow (client * ns, int x, int y, short face_num, struct Map *newmap)
1300{ 1203{
1301 if (newmap->cells[x][y].count >= MAP_LAYERS) 1204 if (newmap->cells[x][y].count >= MAP_LAYERS)
1302 { 1205 {
1206 //TODO: one or the other, can't both have abort and return, verify and act
1303 LOG (llevError, "Too many faces in map cell %d %d\n", x, y); 1207 LOG (llevError, "Too many faces in map cell %d %d\n", x, y);
1304 return; 1208 return;
1305 abort (); 1209 abort ();
1306 } 1210 }
1211
1307 newmap->cells[x][y].faces[newmap->cells[x][y].count] = face_num; 1212 newmap->cells[x][y].faces[newmap->cells[x][y].count] = face_num;
1308 newmap->cells[x][y].count++; 1213 newmap->cells[x][y].count++;
1214
1309 if (!(ns->faces_sent[face_num] & NS_FACESENT_FACE)) 1215 if (!(ns->faces_sent[face_num] & NS_FACESENT_FACE))
1310 esrv_send_face (ns, face_num, 0); 1216 esrv_send_face (ns, face_num, 0);
1311} 1217}
1312
1313struct LayerCell
1314{
1315 uint16 xy;
1316 short face;
1317};
1318
1319struct MapLayer
1320{
1321 int count;
1322 struct LayerCell lcells[MAP_CLIENT_X * MAP_CLIENT_Y];
1323};
1324
1325/** Checkes if map cells have changed */
1326static int
1327mapcellchanged (NewSocket * ns, int i, int j, struct Map *newmap)
1328{
1329 int k;
1330
1331 if (ns->lastmap.cells[i][j].count != newmap->cells[i][j].count)
1332 return 1;
1333 for (k = 0; k < newmap->cells[i][j].count; k++)
1334 {
1335 if (ns->lastmap.cells[i][j].faces[k] != newmap->cells[i][j].faces[k])
1336 {
1337 return 1;
1338 }
1339 }
1340 return 0;
1341}
1342
1343/**
1344 * Basically, what this does is pack the data into layers.
1345 * cnum is the client number, cur is the the buffer we put all of
1346 * this data into. we return the end of the data. layers is
1347 * how many layers of data we should back.
1348 */
1349static uint8 *
1350compactlayer (NewSocket * ns, unsigned char *cur, int numlayers, struct Map *newmap)
1351{
1352 int x, y, k;
1353 int face;
1354 unsigned char *fcur;
1355 struct MapLayer layers[MAP_LAYERS];
1356
1357 for (k = 0; k < MAP_LAYERS; k++)
1358 layers[k].count = 0;
1359 fcur = cur;
1360 for (x = 0; x < ns->mapx; x++)
1361 {
1362 for (y = 0; y < ns->mapy; y++)
1363 {
1364 if (!mapcellchanged (ns, x, y, newmap))
1365 continue;
1366 if (newmap->cells[x][y].count == 0)
1367 {
1368 *cur = x * ns->mapy + y; /* mark empty space */
1369 cur++;
1370 continue;
1371 }
1372 for (k = 0; k < newmap->cells[x][y].count; k++)
1373 {
1374 layers[k].lcells[layers[k].count].xy = x * ns->mapy + y;
1375 layers[k].lcells[layers[k].count].face = newmap->cells[x][y].faces[k];
1376 layers[k].count++;
1377 }
1378 }
1379 }
1380 /* If no data, return now. */
1381 if (fcur == cur && layers[0].count == 0)
1382 return cur;
1383 *cur = 255; /* mark end of explicitly cleared cells */
1384 cur++;
1385 /* First pack by layers. */
1386 for (k = 0; k < numlayers; k++)
1387 {
1388 if (layers[k].count == 0)
1389 break; /* once a layer is entirely empty, no layer below it can
1390 have anything in it either */
1391 /* Pack by entries in thie layer */
1392 for (x = 0; x < layers[k].count;)
1393 {
1394 fcur = cur;
1395 *cur = layers[k].lcells[x].face >> 8;
1396 cur++;
1397 *cur = layers[k].lcells[x].face & 0xFF;
1398 cur++;
1399 face = layers[k].lcells[x].face;
1400 /* Now, we back the redundant data into 1 byte xy pairings */
1401 for (y = x; y < layers[k].count; y++)
1402 {
1403 if (layers[k].lcells[y].face == face)
1404 {
1405 *cur = (uint8) layers[k].lcells[y].xy;
1406 cur++;
1407 layers[k].lcells[y].face = -1;
1408 }
1409 }
1410 *(cur - 1) = *(cur - 1) | 128; /* mark for end of xy's; 11*11 < 128 */
1411 /* forward over the now redundant data */
1412 while (x < layers[k].count && layers[k].lcells[x].face == -1)
1413 x++;
1414 }
1415 *fcur = *fcur | 128; /* mark for end of faces at this layer */
1416 }
1417 return cur;
1418}
1419
1420static void
1421esrv_map_doneredraw (NewSocket * ns, struct Map *newmap)
1422{
1423 static long frames, bytes, tbytes, tframes;
1424 char *cur;
1425 SockList sl;
1426
1427
1428 sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
1429 strcpy ((char *) sl.buf, "map ");
1430 sl.len = strlen ((char *) sl.buf);
1431
1432 cur = (char *) compactlayer (ns, (unsigned char *) sl.buf + sl.len, MAP_LAYERS, newmap);
1433 sl.len = cur - (char *) sl.buf;
1434
1435/* LOG(llevDebug, "Sending map command.\n");*/
1436
1437 if (sl.len > (int) strlen ("map ") || ns->sent_scroll)
1438 {
1439 /* All of this is just accounting stuff */
1440 if (tframes > 100)
1441 tframes = tbytes = 0;
1442
1443 tframes++;
1444 frames++;
1445 tbytes += sl.len;
1446 bytes += sl.len;
1447 memcpy (&ns->lastmap, newmap, sizeof (struct Map));
1448 Send_With_Handling (ns, &sl);
1449 ns->sent_scroll = 0;
1450 }
1451
1452 free (sl.buf);
1453}
1454
1455 1218
1456/** Clears a map cell */ 1219/** Clears a map cell */
1457static void 1220static void
1458map_clearcell (struct MapCell *cell, int face0, int face1, int face2, int count) 1221map_clearcell (struct MapCell *cell, int face0, int face1, int face2, int count)
1459{ 1222{
1460 cell->faces[0] = face0; 1223 cell->faces[0] = face0;
1461 cell->faces[1] = face1; 1224 cell->faces[1] = face1;
1462 cell->faces[2] = face2; 1225 cell->faces[2] = face2;
1463 cell->count = count; 1226 cell->count = count;
1464 cell->stat_hp = 0; 1227 cell->stat_hp = 0;
1228 cell->flags = 0;
1465 cell->player = 0; 1229 cell->player = 0;
1466} 1230}
1467 1231
1468#define MAX_HEAD_POS MAX(MAX_CLIENT_X, MAX_CLIENT_Y) 1232#define MAX_HEAD_POS MAX(MAX_CLIENT_X, MAX_CLIENT_Y)
1469#define MAX_LAYERS 3 1233#define MAX_LAYERS 3
1470 1234
1471/* Using a global really isn't a good approach, but saves the over head of 1235/* Using a global really isn't a good approach, but saves the over head of
1472 * allocating and deallocating such a block of data each time run through, 1236 * allocating and deallocating such a block of data each time run through,
1473 * and saves the space of allocating this in the socket object when we only 1237 * and saves the space of allocating this in the socket object when we only
1474 * need it for this cycle. If the serve is ever threaded, this needs to be 1238 * need it for this cycle. If the server is ever threaded, this needs to be
1475 * re-examined. 1239 * re-examined.
1476 */ 1240 */
1477
1478static object *heads[MAX_HEAD_POS * MAX_HEAD_POS * MAX_LAYERS]; 1241static object *heads[MAX_HEAD_POS * MAX_HEAD_POS * MAX_LAYERS];
1479 1242
1480/** 1243/**
1481 * Returns true if any of the heads for this 1244 * Returns true if any of the heads for this
1482 * space is set. Returns false if all are blank - this is used 1245 * space is set. Returns false if all are blank - this is used
1483 * for empty space checking. 1246 * for empty space checking.
1484 */ 1247 */
1485static inline int 1248static inline int
1486have_head (int ax, int ay) 1249have_head (int ax, int ay)
1487{ 1250{
1488
1489 if (heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS] || 1251 if (heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS] ||
1490 heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + 1] || heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + 2]) 1252 heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + 1] || heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + 2])
1491 return 1; 1253 return 1;
1254
1492 return 0; 1255 return 0;
1493} 1256}
1494 1257
1495/** 1258/**
1496 * check_head is a bit simplistic version of update_space below. 1259 * check_head is a bit simplistic version of update_space below.
1497 * basically, it only checks the that the head on space ax,ay at layer 1260 * basically, it only checks the that the head on space ax,ay at layer
1498 * needs to get sent - if so, it adds the data, sending the head 1261 * needs to get sent - if so, it adds the data, sending the head
1499 * if needed, and returning 1. If this no data needs to get 1262 * if needed, and returning 1. If this no data needs to get
1500 * sent, it returns zero. 1263 * sent, it returns zero.
1501 */ 1264 */
1502static int 1265static int
1503check_head (SockList & sl, NewSocket & ns, int ax, int ay, int layer) 1266check_head (packet &sl, client &ns, int ax, int ay, int layer)
1504{ 1267{
1505 short face_num; 1268 short face_num;
1506 1269
1507 if (heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer]) 1270 if (heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer])
1508 face_num = heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer]->face->number; 1271 face_num = heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer]->face->number;
1509 else 1272 else
1510 face_num = 0; 1273 face_num = 0;
1511 1274
1512 if (face_num != ns.lastmap.cells[ax][ay].faces[layer]) 1275 if (face_num != ns.lastmap.cells[ax][ay].faces[layer])
1513 { 1276 {
1514 SockList_AddShort (&sl, face_num); 1277 sl << uint16 (face_num);
1515 if (face_num && !(ns.faces_sent[face_num] & NS_FACESENT_FACE)) 1278 if (face_num && !(ns.faces_sent[face_num] & NS_FACESENT_FACE))
1516 esrv_send_face (&ns, face_num, 0); 1279 esrv_send_face (&ns, face_num, 0);
1280
1517 heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer] = NULL; 1281 heads[(ay * MAX_HEAD_POS + ax) * MAX_LAYERS + layer] = NULL;
1518 ns.lastmap.cells[ax][ay].faces[layer] = face_num; 1282 ns.lastmap.cells[ax][ay].faces[layer] = face_num;
1519 return 1; 1283 return 1;
1520 } 1284 }
1521 1285
1539 * numbers the spaces differently - I think this was a leftover from 1303 * numbers the spaces differently - I think this was a leftover from
1540 * the map command, where the faces stack up. Sinces that is no longer 1304 * the map command, where the faces stack up. Sinces that is no longer
1541 * the case, it seems to make more sense to have these layer values 1305 * the case, it seems to make more sense to have these layer values
1542 * actually match. 1306 * actually match.
1543 */ 1307 */
1544
1545static int 1308static int
1546update_space (SockList * sl, NewSocket * ns, maptile *mp, int mx, int my, int sx, int sy, int layer) 1309update_space (packet &sl, client &ns, maptile *mp, int mx, int my, int sx, int sy, int layer)
1547{ 1310{
1548 object *ob, *head; 1311 object *ob, *head;
1549 uint16 face_num; 1312 uint16 face_num;
1550 int bx, by, i; 1313 int bx, by, i;
1551 1314
1552 /* If there is a multipart object stored away, treat that as more important. 1315 /* If there is a multipart object stored away, treat that as more important.
1553 * If not, then do the normal processing. 1316 * If not, then do the normal processing.
1554 */ 1317 */
1555
1556 head = heads[(sy * MAX_HEAD_POS + sx) * MAX_LAYERS + layer]; 1318 head = heads[(sy * MAX_HEAD_POS + sx) * MAX_LAYERS + layer];
1557 1319
1558 /* Check to see if this head is part of the set of objects 1320 /* Check to see if this head is part of the set of objects
1559 * we would normally send for this space. If so, then 1321 * we would normally send for this space. If so, then
1560 * don't use the head value. We need to do the check 1322 * don't use the head value. We need to do the check
1725 1487
1726 /* Another hack - because of heads and whatnot, this face may match one 1488 /* Another hack - because of heads and whatnot, this face may match one
1727 * we already sent for a lower layer. In that case, don't send 1489 * we already sent for a lower layer. In that case, don't send
1728 * this one. 1490 * this one.
1729 */ 1491 */
1730 if (face_num && layer + 1 < MAP_LAYERS && ns->lastmap.cells[sx][sy].faces[layer + 1] == face_num) 1492 if (face_num && layer + 1 < MAP_LAYERS && ns.lastmap.cells[sx][sy].faces[layer + 1] == face_num)
1731 {
1732 face_num = 0; 1493 face_num = 0;
1733 }
1734 1494
1735 /* We've gotten what face we want to use for the object. Now see if 1495 /* We've gotten what face we want to use for the object. Now see if
1736 * if it has changed since we last sent it to the client. 1496 * if it has changed since we last sent it to the client.
1737 */ 1497 */
1738 if (ns->lastmap.cells[sx][sy].faces[layer] != face_num) 1498 if (ns.lastmap.cells[sx][sy].faces[layer] != face_num)
1739 { 1499 {
1740 ns->lastmap.cells[sx][sy].faces[layer] = face_num; 1500 ns.lastmap.cells[sx][sy].faces[layer] = face_num;
1741 if (!(ns->faces_sent[face_num] & NS_FACESENT_FACE)) 1501 if (!(ns.faces_sent[face_num] & NS_FACESENT_FACE))
1742 esrv_send_face (ns, face_num, 0); 1502 esrv_send_face (&ns, face_num, 0);
1743 SockList_AddShort (sl, face_num); 1503
1504 sl << uint16 (face_num);
1744 return 1; 1505 return 1;
1745 } 1506 }
1507
1746 /* Nothing changed */ 1508 /* Nothing changed */
1747 return 0; 1509 return 0;
1748} 1510}
1749 1511
1750/** 1512/**
1765 * top layer (this matches what the GET_MAP_FACE and GET_MAP_FACE_OBJ 1527 * top layer (this matches what the GET_MAP_FACE and GET_MAP_FACE_OBJ
1766 * take. 1528 * take.
1767 */ 1529 */
1768 1530
1769static inline int 1531static inline int
1770update_smooth (SockList * sl, NewSocket * ns, maptile *mp, int mx, int my, int sx, int sy, int layer) 1532update_smooth (packet &sl, client &ns, maptile *mp, int mx, int my, int sx, int sy, int layer)
1771{ 1533{
1772 object *ob; 1534 object *ob;
1773 int smoothlevel; /* old face_num; */ 1535 int smoothlevel; /* old face_num; */
1774 1536
1775 ob = GET_MAP_FACE_OBJ (mp, mx, my, layer); 1537 ob = GET_MAP_FACE_OBJ (mp, mx, my, layer);
1780 if (!ob || ob->face == blank_face || MAP_NOSMOOTH (mp)) 1542 if (!ob || ob->face == blank_face || MAP_NOSMOOTH (mp))
1781 smoothlevel = 0; 1543 smoothlevel = 0;
1782 else 1544 else
1783 { 1545 {
1784 smoothlevel = ob->smoothlevel; 1546 smoothlevel = ob->smoothlevel;
1785 if (smoothlevel && !(ns->faces_sent[ob->face->number] & NS_FACESENT_SMOOTH)) 1547 if (smoothlevel && !(ns.faces_sent[ob->face->number] & NS_FACESENT_SMOOTH))
1786 SendSmooth (ns, ob->face->number); 1548 SendSmooth (&ns, ob->face->number);
1787 } /* else not already head object or blank face */ 1549 } /* else not already head object or blank face */
1788 1550
1789 /* We've gotten what face we want to use for the object. Now see if 1551 /* We've gotten what face we want to use for the object. Now see if
1790 * if it has changed since we last sent it to the client. 1552 * if it has changed since we last sent it to the client.
1791 */ 1553 */
1792 if (smoothlevel > 255) 1554 if (smoothlevel > 255)
1793 smoothlevel = 255; 1555 smoothlevel = 255;
1794 else if (smoothlevel < 0) 1556 else if (smoothlevel < 0)
1795 smoothlevel = 0; 1557 smoothlevel = 0;
1558
1796 if (ns->lastmap.cells[sx][sy].smooth[layer] != smoothlevel) 1559 if (ns.lastmap.cells[sx][sy].smooth[layer] != smoothlevel)
1797 { 1560 {
1798 ns->lastmap.cells[sx][sy].smooth[layer] = smoothlevel; 1561 ns.lastmap.cells[sx][sy].smooth[layer] = smoothlevel;
1799 SockList_AddChar (sl, (uint8) (smoothlevel & 0xFF)); 1562 sl << uint8 (smoothlevel);
1800 return 1; 1563 return 1;
1801 } 1564 }
1565
1802 /* Nothing changed */ 1566 /* Nothing changed */
1803 return 0; 1567 return 0;
1804} 1568}
1805 1569
1806/** 1570/**
1807 * Returns the size of a data for a map square as returned by 1571 * Returns the size of a data for a map square as returned by
1808 * mapextended. There are CLIENTMAPX*CLIENTMAPY*LAYERS entries 1572 * mapextended. There are CLIENTMAPX*CLIENTMAPY*LAYERS entries
1809 * available. 1573 * available.
1810 */ 1574 */
1811int 1575int
1812getExtendedMapInfoSize (NewSocket * ns) 1576getExtendedMapInfoSize (client * ns)
1813{ 1577{
1814 int result = 0; 1578 int result = 0;
1815 1579
1816 if (ns->ext_mapinfos) 1580 if (ns->ext_mapinfos)
1817 { 1581 {
1818 if (ns->EMI_smooth) 1582 if (ns->EMI_smooth)
1819 result += 1; /*One byte for smoothlevel */ 1583 result += 1; /*One byte for smoothlevel */
1820 } 1584 }
1585
1821 return result; 1586 return result;
1822} 1587}
1823 1588
1824/** 1589/**
1825 * This function uses the new map1 protocol command to send the map 1590 * This function uses the new map1 protocol command to send the map
1847draw_client_map1 (object *pl) 1612draw_client_map1 (object *pl)
1848{ 1613{
1849 int x, y, ax, ay, d, startlen, max_x, max_y, oldlen; 1614 int x, y, ax, ay, d, startlen, max_x, max_y, oldlen;
1850 sint16 nx, ny; 1615 sint16 nx, ny;
1851 int estartlen, eoldlen; 1616 int estartlen, eoldlen;
1852 SockList sl;
1853 SockList esl; /*For extended Map info */
1854 uint16 mask, emask; 1617 uint16 mask, emask;
1855 uint8 eentrysize; 1618 uint8 eentrysize;
1856 uint16 ewhatstart, ewhatflag; 1619 uint16 ewhatstart, ewhatflag;
1857 uint8 extendedinfos; 1620 uint8 extendedinfos;
1858 maptile *m; 1621 maptile *m;
1859 1622
1860 NewSocket & socket = pl->contr->socket; 1623 client &socket = *pl->contr->socket;
1861 1624
1862 check_map_change (pl->contr); 1625 check_map_change (pl->contr);
1863 1626
1864 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 1627 packet sl;
1865 if (socket.mapmode == Map1Cmd) 1628 packet esl;
1866 strcpy ((char *) sl.buf, "map1 "); 1629
1867 else 1630 sl << (socket.mapmode == Map1Cmd ? "map1 " : "map1a ");
1868 strcpy ((char *) sl.buf, "map1a ");
1869 sl.len = strlen ((char *) sl.buf);
1870 startlen = sl.len; 1631 startlen = sl.length ();
1632
1871 /*Extendedmapinfo structure initialisation */ 1633 /*Extendedmapinfo structure initialisation */
1872 if (socket.ext_mapinfos) 1634 if (socket.ext_mapinfos)
1873 { 1635 {
1874 esl.buf = (unsigned char *) malloc (MAXSOCKBUF);
1875 strcpy ((char *) esl.buf, "mapextended ");
1876 esl.len = strlen ((char *) esl.buf);
1877 extendedinfos = EMI_NOREDRAW; 1636 extendedinfos = EMI_NOREDRAW;
1637
1878 if (socket.EMI_smooth) 1638 if (socket.EMI_smooth)
1879 extendedinfos |= EMI_SMOOTH; 1639 extendedinfos |= EMI_SMOOTH;
1640
1880 ewhatstart = esl.len; 1641 ewhatstart = esl.length ();
1881 ewhatflag = extendedinfos; /*The EMI_NOREDRAW bit 1642 ewhatflag = extendedinfos; /*The EMI_NOREDRAW bit
1882 could need to be taken away */ 1643 could need to be taken away */
1883 SockList_AddChar (&esl, extendedinfos);
1884 eentrysize = getExtendedMapInfoSize (&socket); 1644 eentrysize = getExtendedMapInfoSize (&socket);
1885 SockList_AddChar (&esl, eentrysize); 1645 esl << "mapextended "
1646 << uint8 (extendedinfos)
1647 << uint8 (eentrysize);
1648
1886 estartlen = esl.len; 1649 estartlen = esl.length ();
1887 } 1650 }
1888 else 1651 else
1889 { 1652 {
1890 /* suppress compiler warnings */ 1653 /* suppress compiler warnings */
1891 ewhatstart = 0; 1654 ewhatstart = 0;
1892 ewhatflag = 0; 1655 ewhatflag = 0;
1893 estartlen = 0; 1656 estartlen = 0;
1894 } 1657 }
1658
1895 /* Init data to zero */ 1659 /* Init data to zero */
1896 memset (heads, 0, sizeof (object *) * MAX_HEAD_POS * MAX_HEAD_POS * MAX_LAYERS); 1660 memset (heads, 0, sizeof (object *) * MAX_HEAD_POS * MAX_HEAD_POS * MAX_LAYERS);
1897 1661
1898 /* x,y are the real map locations. ax, ay are viewport relative 1662 /* x,y are the real map locations. ax, ay are viewport relative
1899 * locations. 1663 * locations.
1903 /* We could do this logic as conditionals in the if statement, 1667 /* We could do this logic as conditionals in the if statement,
1904 * but that started to get a bit messy to look at. 1668 * but that started to get a bit messy to look at.
1905 */ 1669 */
1906 max_x = pl->x + (socket.mapx + 1) / 2; 1670 max_x = pl->x + (socket.mapx + 1) / 2;
1907 max_y = pl->y + (socket.mapy + 1) / 2; 1671 max_y = pl->y + (socket.mapy + 1) / 2;
1672
1908 if (socket.mapmode == Map1aCmd) 1673 if (socket.mapmode == Map1aCmd)
1909 { 1674 {
1910 max_x += MAX_HEAD_OFFSET; 1675 max_x += MAX_HEAD_OFFSET;
1911 max_y += MAX_HEAD_OFFSET; 1676 max_y += MAX_HEAD_OFFSET;
1912 } 1677 }
1927 */ 1692 */
1928 if (ax >= socket.mapx || ay >= socket.mapy) 1693 if (ax >= socket.mapx || ay >= socket.mapy)
1929 { 1694 {
1930 int i, got_one; 1695 int i, got_one;
1931 1696
1932 oldlen = sl.len; 1697 oldlen = sl.length ();
1933 1698
1934 SockList_AddShort (&sl, mask); 1699 sl << uint16 (mask);
1935 1700
1936 if (check_head (sl, socket, ax, ay, 2)) 1701 if (check_head (sl, socket, ax, ay, 2)) mask |= 0x4;
1937 mask |= 0x4;
1938 if (check_head (sl, socket, ax, ay, 1)) 1702 if (check_head (sl, socket, ax, ay, 1)) mask |= 0x2;
1939 mask |= 0x2;
1940 if (check_head (sl, socket, ax, ay, 0)) 1703 if (check_head (sl, socket, ax, ay, 0)) mask |= 0x1;
1941 mask |= 0x1;
1942 1704
1943 /* If all we are doing is sending 0 (blank) faces, we don't 1705 /* If all we are doing is sending 0 (blank) faces, we don't
1944 * actually need to send that - just the coordinates 1706 * actually need to send that - just the coordinates
1945 * with no faces tells the client to blank out the 1707 * with no faces tells the client to blank out the
1946 * space. 1708 * space.
1947 */ 1709 */
1948 got_one = 0; 1710 got_one = 0;
1949 for (i = oldlen + 2; i < sl.len; i++) 1711 for (i = oldlen + 2; i < sl.length (); i++)
1950 {
1951 if (sl.buf[i]) 1712 if (sl[i])
1952 got_one = 1; 1713 got_one = 1;
1953 }
1954 1714
1955 if (got_one && (mask & 0xf)) 1715 if (got_one && (mask & 0xf))
1956 {
1957 sl.buf[oldlen + 1] = mask & 0xff; 1716 sl[oldlen + 1] = mask & 0xff;
1958 }
1959 else 1717 else
1960 { /*either all faces blank, either no face at all */ 1718 { /*either all faces blank, either no face at all */
1961 if (mask & 0xf) /*at least 1 face, we know it's blank, only send coordinates */ 1719 if (mask & 0xf) /*at least 1 face, we know it's blank, only send coordinates */
1962 sl.len = oldlen + 2; 1720 sl.reset (oldlen + 2);
1963 else 1721 else
1964 sl.len = oldlen; 1722 sl.reset (oldlen);
1965 } 1723 }
1724
1966 /*What concerns extendinfos, nothing to be done for now 1725 /*What concerns extendinfos, nothing to be done for now
1967 * (perhaps effects layer later) 1726 * (perhaps effects layer later)
1968 */ 1727 */
1969 continue; /* don't do processing below */ 1728 continue; /* don't do processing below */
1970 } 1729 }
1971 1730
1972 MapCell & lastcell = socket.lastmap.cells[ax][ay]; 1731 MapCell &lastcell = socket.lastmap.cells[ax][ay];
1973 1732
1974 d = pl->contr->blocked_los[ax][ay]; 1733 d = pl->contr->blocked_los[ax][ay];
1975 1734
1976 /* If the coordinates are not valid, or it is too dark to see, 1735 /* If the coordinates are not valid, or it is too dark to see,
1977 * we tell the client as such 1736 * we tell the client as such
1978 */ 1737 */
1979 nx = x; 1738 nx = x;
1980 ny = y; 1739 ny = y;
1981 m = get_map_from_coord (pl->map, &nx, &ny); 1740 m = get_map_from_coord (pl->map, &nx, &ny);
1741
1982 if (!m) 1742 if (!m)
1983 { 1743 {
1984 /* space is out of map. Update space and clear values 1744 /* space is out of map. Update space and clear values
1985 * if this hasn't already been done. If the space is out 1745 * if this hasn't already been done. If the space is out
1986 * of the map, it shouldn't have a head 1746 * of the map, it shouldn't have a head
1987 */ 1747 */
1988 if (lastcell.count != -1) 1748 if (lastcell.count != -1)
1989 { 1749 {
1990 SockList_AddShort (&sl, mask); 1750 sl << uint16 (mask);
1991 map_clearcell (&lastcell, 0, 0, 0, -1); 1751 map_clearcell (&lastcell, 0, 0, 0, -1);
1992 } 1752 }
1993 } 1753 }
1994 else if (d > 3) 1754 else if (d > 3)
1995 { 1755 {
1997 1757
1998 /* This block deals with spaces that are not visible for whatever 1758 /* This block deals with spaces that are not visible for whatever
1999 * reason. Still may need to send the head for this space. 1759 * reason. Still may need to send the head for this space.
2000 */ 1760 */
2001 1761
2002 oldlen = sl.len; 1762 oldlen = sl.length ();
2003 1763
2004 SockList_AddShort (&sl, mask); 1764 sl << uint16 (mask);
1765
2005 if (lastcell.count != -1) 1766 if (lastcell.count != -1)
2006 need_send = 1; 1767 need_send = 1;
1768
2007 count = -1; 1769 count = -1;
2008 1770
2009 if (socket.mapmode == Map1aCmd && have_head (ax, ay)) 1771 if (socket.mapmode == Map1aCmd && have_head (ax, ay))
2010 { 1772 {
2011 /* Now check to see if any heads need to be sent */ 1773 /* Now check to see if any heads need to be sent */
2012 1774
2013 if (check_head (sl, socket, ax, ay, 2)) 1775 if (check_head (sl, socket, ax, ay, 2)) mask |= 0x4;
2014 mask |= 0x4;
2015 if (check_head (sl, socket, ax, ay, 1)) 1776 if (check_head (sl, socket, ax, ay, 1)) mask |= 0x2;
2016 mask |= 0x2;
2017 if (check_head (sl, socket, ax, ay, 0)) 1777 if (check_head (sl, socket, ax, ay, 0)) mask |= 0x1;
2018 mask |= 0x1;
2019 1778
2020 lastcell.count = count; 1779 lastcell.count = count;
2021
2022 } 1780 }
2023 else 1781 else
2024 { 1782 {
2025 struct MapCell *cell = &lastcell;
2026
2027 /* properly clear a previously sent big face */ 1783 /* properly clear a previously sent big face */
2028 if (cell->faces[0] != 0 || cell->faces[1] != 0 || cell->faces[2] != 0) 1784 if (lastcell.faces[0] != 0 || lastcell.faces[1] != 0 || lastcell.faces[2] != 0
1785 || lastcell.stat_hp || lastcell.flags || lastcell.player)
2029 need_send = 1; 1786 need_send = 1;
1787
2030 map_clearcell (&lastcell, 0, 0, 0, count); 1788 map_clearcell (&lastcell, 0, 0, 0, count);
2031 } 1789 }
2032 1790
2033 if ((mask & 0xf) || need_send) 1791 if ((mask & 0xf) || need_send)
2034 {
2035 sl.buf[oldlen + 1] = mask & 0xff; 1792 sl[oldlen + 1] = mask & 0xff;
2036 }
2037 else 1793 else
2038 {
2039 sl.len = oldlen; 1794 sl.reset (oldlen);
2040 }
2041 } 1795 }
2042 else 1796 else
2043 { 1797 {
2044 /* In this block, the space is visible or there are head objects 1798 /* In this block, the space is visible or there are head objects
2045 * we need to send. 1799 * we need to send.
2047 1801
2048 /* Rather than try to figure out what everything that we might 1802 /* Rather than try to figure out what everything that we might
2049 * need to send is, then form the packet after that, 1803 * need to send is, then form the packet after that,
2050 * we presume that we will in fact form a packet, and update 1804 * we presume that we will in fact form a packet, and update
2051 * the bits by what we do actually send. If we send nothing, 1805 * the bits by what we do actually send. If we send nothing,
2052 * we just back out sl.len to the old value, and no harm 1806 * we just back out sl.length () to the old value, and no harm
2053 * is done. 1807 * is done.
2054 * I think this is simpler than doing a bunch of checks to see 1808 * I think this is simpler than doing a bunch of checks to see
2055 * what if anything we need to send, setting the bits, then 1809 * what if anything we need to send, setting the bits, then
2056 * doing those checks again to add the real data. 1810 * doing those checks again to add the real data.
2057 */ 1811 */
2058 oldlen = sl.len; 1812 oldlen = sl.length ();
2059 mask = (ax & 0x3f) << 10 | (ay & 0x3f) << 4; 1813 mask = (ax & 0x3f) << 10 | (ay & 0x3f) << 4;
2060 eoldlen = esl.len; 1814 eoldlen = esl.length ();
2061 emask = (ax & 0x3f) << 10 | (ay & 0x3f) << 4; 1815 emask = (ax & 0x3f) << 10 | (ay & 0x3f) << 4;
2062 SockList_AddShort (&sl, mask); 1816 sl << uint16 (mask);
2063 1817
2064 if (socket.ext_mapinfos) 1818 if (socket.ext_mapinfos)
2065 SockList_AddShort (&esl, emask); 1819 esl << uint16 (emask);
2066 1820
2067 unsigned char dummy; 1821 unsigned char dummy;
2068 unsigned char *last_ext = &dummy; 1822 unsigned char *last_ext = &dummy;
2069 1823
2070 /* Darkness changed */ 1824 /* Darkness changed */
2073 mask |= 0x8; 1827 mask |= 0x8;
2074 1828
2075 if (socket.extmap) 1829 if (socket.extmap)
2076 { 1830 {
2077 *last_ext |= 0x80; 1831 *last_ext |= 0x80;
2078 last_ext = sl.buf + sl.len; 1832 last_ext = &sl[sl.length ()];
2079 SockList_AddChar (&sl, d); 1833 sl << uint8 (d);
2080 } 1834 }
2081 else 1835 else
2082 SockList_AddChar (&sl, 255 - 64 * d); 1836 sl << uint8 (255 - 64 * d);
2083 } 1837 }
2084 1838
2085 lastcell.count = d; 1839 lastcell.count = d;
2086 1840
2087 if (socket.extmap) 1841 if (socket.extmap)
2088 { 1842 {
2089 uint8 stat_hp = 0; 1843 uint8 stat_hp = 0;
2090 uint8 stat_width = 0; 1844 uint8 stat_width = 0;
1845 uint8 flags = 0;
2091 tag_t player = 0; 1846 UUID player = 0;
2092 1847
2093 // send hp information, if applicable 1848 // send hp information, if applicable
2094 if (object *op = GET_MAP_FACE_OBJ (m, nx, ny, 0)) 1849 if (object *op = GET_MAP_FACE_OBJ (m, nx, ny, 0))
2095 { 1850 {
2096 if (op->head || op->invisible) 1851 if (op->head || op->invisible)
2103 stat_hp = 255 - (op->stats.hp * 255 + 254) / op->stats.maxhp; 1858 stat_hp = 255 - (op->stats.hp * 255 + 254) / op->stats.maxhp;
2104 stat_width = op->arch->tail_x; 1859 stat_width = op->arch->tail_x;
2105 } 1860 }
2106 } 1861 }
2107 1862
1863 if (op->msg && op->msg[0] == '@')
1864 flags |= 1;
1865
2108 if (op->type == PLAYER && op != pl) 1866 if (op->type == PLAYER && op != pl)
2109 player = op->count; 1867 player = op->count;
2110 } 1868 }
2111 1869
2112 if (lastcell.stat_hp != stat_hp) 1870 if (lastcell.stat_hp != stat_hp)
2113 { 1871 {
2114 lastcell.stat_hp = stat_hp; 1872 lastcell.stat_hp = stat_hp;
2115 1873
2116 mask |= 0x8; 1874 mask |= 0x8;
2117 *last_ext |= 0x80; 1875 *last_ext |= 0x80;
2118 last_ext = sl.buf + sl.len; 1876 last_ext = &sl[sl.length ()];
2119 SockList_AddChar (&sl, 5); 1877
2120 SockList_AddChar (&sl, stat_hp); 1878 sl << uint8 (5) << uint8 (stat_hp);
2121 1879
2122 if (stat_width > 1) 1880 if (stat_width > 1)
2123 { 1881 {
2124 *last_ext |= 0x80; 1882 *last_ext |= 0x80;
2125 last_ext = sl.buf + sl.len; 1883 last_ext = &sl[sl.length ()];
2126 SockList_AddChar (&sl, 6); 1884
2127 SockList_AddChar (&sl, stat_width); 1885 sl << uint8 (6) << uint8 (stat_width);
2128 } 1886 }
2129 } 1887 }
2130 1888
2131 if (lastcell.player != player) 1889 if (lastcell.player != player)
2132 { 1890 {
2133 lastcell.player = player; 1891 lastcell.player = player;
2134 1892
2135 mask |= 0x8; 1893 mask |= 0x8;
2136 *last_ext |= 0x80; 1894 *last_ext |= 0x80;
2137 last_ext = sl.buf + sl.len; 1895 last_ext = &sl[sl.length ()];
2138 SockList_AddChar (&sl, 0x47); 1896
2139 SockList_AddChar (&sl, 4); 1897 sl << uint8 (0x47) << uint8 (8) << (uint64)player;
2140 SockList_AddInt (&sl, player); 1898 }
1899
1900 if (lastcell.flags != flags)
1901 {
1902 lastcell.flags = flags;
1903
1904 mask |= 0x8;
1905 *last_ext |= 0x80;
1906 last_ext = &sl[sl.length ()];
1907
1908 sl << uint8 (8) << uint8 (flags);
2141 } 1909 }
2142 } 1910 }
2143 1911
2144 /* Floor face */ 1912 /* Floor face */
2145 if (update_space (&sl, &socket, m, nx, ny, ax, ay, 2)) 1913 if (update_space (sl, socket, m, nx, ny, ax, ay, 2))
2146 mask |= 0x4; 1914 mask |= 0x4;
2147 1915
2148 if (socket.EMI_smooth) 1916 if (socket.EMI_smooth)
2149 if (update_smooth (&esl, &socket, m, nx, ny, ax, ay, 2)) 1917 if (update_smooth (esl, socket, m, nx, ny, ax, ay, 2))
2150 emask |= 0x4; 1918 emask |= 0x4;
2151 1919
2152 /* Middle face */ 1920 /* Middle face */
2153 if (update_space (&sl, &socket, m, nx, ny, ax, ay, 1)) 1921 if (update_space (sl, socket, m, nx, ny, ax, ay, 1))
2154 mask |= 0x2; 1922 mask |= 0x2;
2155 1923
2156 if (socket.EMI_smooth) 1924 if (socket.EMI_smooth)
2157 if (update_smooth (&esl, &socket, m, nx, ny, ax, ay, 1)) 1925 if (update_smooth (esl, socket, m, nx, ny, ax, ay, 1))
2158 emask |= 0x2; 1926 emask |= 0x2;
2159 1927
2160 if (nx == pl->x && ny == pl->y && pl->invisible & (pl->invisible < 50 ? 4 : 1)) 1928 if (nx == pl->x && ny == pl->y && pl->invisible & (pl->invisible < 50 ? 4 : 1))
2161 { 1929 {
2162 if (lastcell.faces[0] != pl->face->number) 1930 if (lastcell.faces[0] != pl->face->number)
2163 { 1931 {
2164 lastcell.faces[0] = pl->face->number; 1932 lastcell.faces[0] = pl->face->number;
2165 mask |= 0x1; 1933 mask |= 0x1;
1934
2166 if (!(socket.faces_sent[pl->face->number] & NS_FACESENT_FACE)) 1935 if (!(socket.faces_sent[pl->face->number] & NS_FACESENT_FACE))
2167 esrv_send_face (&socket, pl->face->number, 0); 1936 esrv_send_face (&socket, pl->face->number, 0);
2168 SockList_AddShort (&sl, pl->face->number); 1937
1938 sl << uint16 (pl->face->number);
2169 } 1939 }
2170 } 1940 }
2171 /* Top face */
2172 else 1941 else
2173 { 1942 {
1943 /* Top face */
2174 if (update_space (&sl, &socket, m, nx, ny, ax, ay, 0)) 1944 if (update_space (sl, socket, m, nx, ny, ax, ay, 0))
2175 mask |= 0x1; 1945 mask |= 0x1;
1946
2176 if (socket.EMI_smooth) 1947 if (socket.EMI_smooth)
2177 if (update_smooth (&esl, &socket, m, nx, ny, ax, ay, 0)) 1948 if (update_smooth (esl, socket, m, nx, ny, ax, ay, 0))
2178 {
2179 emask |= 0x1; 1949 emask |= 0x1;
2180 }
2181 } 1950 }
1951
2182 /* Check to see if we are in fact sending anything for this 1952 /* Check to see if we are in fact sending anything for this
2183 * space by checking the mask. If so, update the mask. 1953 * space by checking the mask. If so, update the mask.
2184 * if not, reset the len to that from before adding the mask 1954 * if not, reset the len to that from before adding the mask
2185 * value, so we don't send those bits. 1955 * value, so we don't send those bits.
2186 */ 1956 */
2187 if (mask & 0xf) 1957 if (mask & 0xf)
2188 {
2189 sl.buf[oldlen + 1] = mask & 0xff; 1958 sl[oldlen + 1] = mask & 0xff;
2190 }
2191 else 1959 else
2192 {
2193 sl.len = oldlen; 1960 sl.reset (oldlen);
2194 } 1961
2195 if (emask & 0xf) 1962 if (emask & 0xf)
2196 {
2197 esl.buf[eoldlen + 1] = emask & 0xff; 1963 esl[eoldlen + 1] = emask & 0xff;
2198 }
2199 else 1964 else
2200 {
2201 esl.len = eoldlen; 1965 esl.reset (eoldlen);
2202 }
2203 } /* else this is a viewable space */ 1966 } /* else this is a viewable space */
2204 } /* for x loop */ 1967 } /* for x loop */
2205 } /* for y loop */ 1968 } /* for y loop */
2206 1969
2207 /* Verify that we in fact do need to send this */ 1970 /* Verify that we in fact do need to send this */
2208 if (socket.ext_mapinfos) 1971 if (socket.ext_mapinfos)
2209 { 1972 {
2210 if (!(sl.len > startlen || socket.sent_scroll)) 1973 if (!(sl.length () > startlen || socket.sent_scroll))
2211 { 1974 {
2212 /* No map data will follow, so don't say the client 1975 /* No map data will follow, so don't say the client
2213 * it doesn't need draw! 1976 * it doesn't need draw!
2214 */ 1977 */
2215 ewhatflag &= (~EMI_NOREDRAW); 1978 ewhatflag &= (~EMI_NOREDRAW);
2216 esl.buf[ewhatstart + 1] = ewhatflag & 0xff; 1979 esl[ewhatstart + 1] = ewhatflag & 0xff;
2217 } 1980 }
2218 1981
2219 if (esl.len > estartlen) 1982 if (esl.length () > estartlen)
2220 Send_With_Handling (&socket, &esl); 1983 socket.send_packet (esl);
2221
2222 free (esl.buf);
2223 } 1984 }
2224 1985
2225 if (sl.len > startlen || socket.sent_scroll) 1986 if (sl.length () > startlen || socket.sent_scroll)
2226 { 1987 {
2227 Send_With_Handling (&socket, &sl); 1988 socket.send_packet (sl);
2228 socket.sent_scroll = 0; 1989 socket.sent_scroll = 0;
2229 } 1990 }
2230
2231 free (sl.buf);
2232} 1991}
2233 1992
2234/** 1993/**
2235 * Draws client map. 1994 * Draws client map.
2236 */ 1995 */
2260 if (pm == NULL || pm->in_memory != MAP_IN_MEMORY) 2019 if (pm == NULL || pm->in_memory != MAP_IN_MEMORY)
2261 return; 2020 return;
2262 2021
2263 memset (&newmap, 0, sizeof (struct Map)); 2022 memset (&newmap, 0, sizeof (struct Map));
2264 2023
2265 for (j = (pl->y - pl->contr->socket.mapy / 2); j < (pl->y + (pl->contr->socket.mapy + 1) / 2); j++) 2024 for (j = (pl->y - pl->contr->socket->mapy / 2); j < (pl->y + (pl->contr->socket->mapy + 1) / 2); j++)
2266 { 2025 {
2267 for (i = (pl->x - pl->contr->socket.mapx / 2); i < (pl->x + (pl->contr->socket.mapx + 1) / 2); i++) 2026 for (i = (pl->x - pl->contr->socket->mapx / 2); i < (pl->x + (pl->contr->socket->mapx + 1) / 2); i++)
2268 { 2027 {
2269 ax = i; 2028 ax = i;
2270 ay = j; 2029 ay = j;
2271 m = pm; 2030 m = pm;
2272 mflags = get_map_flags (m, &m, ax, ay, &ax, &ay); 2031 mflags = get_map_flags (m, &m, ax, ay, &ax, &ay);
2032
2273 if (mflags & P_OUT_OF_MAP) 2033 if (mflags & P_OUT_OF_MAP)
2274 continue; 2034 continue;
2035
2275 if (mflags & P_NEED_UPDATE) 2036 if (mflags & P_NEED_UPDATE)
2276 update_position (m, ax, ay); 2037 update_position (m, ax, ay);
2038
2277 /* If a map is visible to the player, we don't want to swap it out 2039 /* If a map is visible to the player, we don't want to swap it out
2278 * just to reload it. This should really call something like 2040 * just to reload it. This should really call something like
2279 * swap_map, but this is much more efficient and 'good enough' 2041 * swap_map, but this is much more efficient and 'good enough'
2280 */ 2042 */
2281 if (mflags & P_NEW_MAP) 2043 if (mflags & P_NEW_MAP)
2287 { 2049 {
2288 update_los (pl); 2050 update_los (pl);
2289 pl->contr->do_los = 0; 2051 pl->contr->do_los = 0;
2290 } 2052 }
2291 2053
2292 if (pl->contr->socket.mapmode == Map1Cmd || pl->contr->socket.mapmode == Map1aCmd)
2293 {
2294 /* Big maps need a different drawing mechanism to work */ 2054 /* Big maps need a different drawing mechanism to work */
2295 draw_client_map1 (pl); 2055 draw_client_map1 (pl);
2296 return;
2297 }
2298
2299 if (pl->invisible & (pl->invisible < 50 ? 4 : 1))
2300 {
2301 esrv_map_setbelow (&pl->contr->socket, pl->contr->socket.mapx / 2, pl->contr->socket.mapy / 2, pl->face->number, &newmap);
2302 }
2303
2304 /* j and i are the y and x coordinates of the real map (which is
2305 * basically some number of spaces around the player)
2306 * ax and ay are values from within the viewport (ie, 0, 0 is upper
2307 * left corner) and are thus disconnected from the map values.
2308 * Subtract 1 from the max values so that we properly handle cases where
2309 * player has specified an even map. Otherwise, we try to send them too
2310 * much, ie, if mapx is 10, we would try to send from -5 to 5, which is actually
2311 * 11 spaces. Now, we would send from -5 to 4, which is properly. If mapx is
2312 * odd, this still works fine.
2313 */
2314 ay = 0;
2315 for (j = pl->y - pl->contr->socket.mapy / 2; j <= pl->y + (pl->contr->socket.mapy - 1) / 2; j++, ay++)
2316 {
2317 ax = 0;
2318 for (i = pl->x - pl->contr->socket.mapx / 2; i <= pl->x + (pl->contr->socket.mapx - 1) / 2; i++, ax++)
2319 {
2320
2321 d = pl->contr->blocked_los[ax][ay];
2322 /* note the out_of_map and d>3 checks are both within the same
2323 * negation check.
2324 */
2325 nx = i;
2326 ny = j;
2327 m = get_map_from_coord (pm, &nx, &ny);
2328 if (m && d < 4)
2329 {
2330 face = GET_MAP_FACE (m, nx, ny, 0);
2331 floor2 = GET_MAP_FACE (m, nx, ny, 1);
2332 floor = GET_MAP_FACE (m, nx, ny, 2);
2333
2334 /* If all is blank, send a blank face. */
2335 if ((!face || face == blank_face) && (!floor2 || floor2 == blank_face) && (!floor || floor == blank_face))
2336 {
2337 esrv_map_setbelow (&pl->contr->socket, ax, ay, blank_face->number, &newmap);
2338 }
2339 else
2340 { /* actually have something interesting */
2341 /* send the darkness mask, if any. */
2342 if (d && pl->contr->socket.darkness)
2343 esrv_map_setbelow (&pl->contr->socket, ax, ay, dark_faces[d - 1]->number, &newmap);
2344
2345 if (face && face != blank_face)
2346 esrv_map_setbelow (&pl->contr->socket, ax, ay, face->number, &newmap);
2347 if (floor2 && floor2 != blank_face)
2348 esrv_map_setbelow (&pl->contr->socket, ax, ay, floor2->number, &newmap);
2349 if (floor && floor != blank_face)
2350 esrv_map_setbelow (&pl->contr->socket, ax, ay, floor->number, &newmap);
2351 }
2352 } /* Is a valid space */
2353 }
2354 }
2355 esrv_map_doneredraw (&pl->contr->socket, &newmap);
2356
2357 check_map_change (pl->contr);
2358} 2056}
2359 2057
2360 2058
2361/*****************************************************************************/ 2059/*****************************************************************************/
2362 2060
2368 2066
2369/*****************************************************************************/ 2067/*****************************************************************************/
2370void 2068void
2371send_plugin_custom_message (object *pl, char *buf) 2069send_plugin_custom_message (object *pl, char *buf)
2372{ 2070{
2373 cs_write_string (&pl->contr->socket, buf, strlen (buf)); 2071 pl->contr->socket->send_packet (buf);
2374} 2072}
2375 2073
2376/** 2074/**
2377 * This sends the skill number to name mapping. We ignore 2075 * This sends the skill number to name mapping. We ignore
2378 * the params - we always send the same info no matter what. 2076 * the params - we always send the same info no matter what.
2379 */ 2077 */
2380void 2078void
2381send_skill_info (NewSocket * ns, char *params) 2079send_skill_info (client *ns, char *params)
2382{ 2080{
2383 SockList sl; 2081 packet sl;
2384 int i; 2082 sl << "replyinfo skill_info\n";
2385 2083
2386 sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
2387 strcpy ((char *) sl.buf, "replyinfo skill_info\n");
2388 for (i = 1; i < NUM_SKILLS; i++) 2084 for (int i = 1; i < NUM_SKILLS; i++)
2389 { 2085 sl.printf ("%d:%s\n", i + CS_STAT_SKILLINFO, &skill_names[i]);
2390 sprintf ((char *) sl.buf + strlen ((char *) sl.buf), "%d:%s\n", i + CS_STAT_SKILLINFO, &skill_names[i]); 2086
2391 }
2392 sl.len = strlen ((char *) sl.buf);
2393 if (sl.len >= MAXSOCKBUF) 2087 if (sl.length () >= MAXSOCKBUF)
2394 { 2088 {
2395 LOG (llevError, "Buffer overflow in send_skill_info!\n"); 2089 LOG (llevError, "Buffer overflow in send_skill_info!\n");
2396 fatal (0); 2090 fatal (0);
2397 } 2091 }
2398 Send_With_Handling (ns, &sl); 2092
2399 free (sl.buf); 2093 ns->send_packet (sl);
2400} 2094}
2401 2095
2402/** 2096/**
2403 * This sends the spell path to name mapping. We ignore 2097 * This sends the spell path to name mapping. We ignore
2404 * the params - we always send the same info no matter what. 2098 * the params - we always send the same info no matter what.
2405 */ 2099 */
2406void 2100void
2407send_spell_paths (NewSocket * ns, char *params) 2101send_spell_paths (client * ns, char *params)
2408{ 2102{
2409 SockList sl; 2103 packet sl;
2410 int i;
2411 2104
2412 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 2105 sl << "replyinfo spell_paths\n";
2413 strcpy ((char *) sl.buf, "replyinfo spell_paths\n"); 2106
2414 for (i = 0; i < NRSPELLPATHS; i++) 2107 for (int i = 0; i < NRSPELLPATHS; i++)
2415 sprintf ((char *) sl.buf + strlen ((char *) sl.buf), "%d:%s\n", 1 << i, spellpathnames[i]); 2108 sl.printf ("%d:%s\n", 1 << i, spellpathnames[i]);
2416 sl.len = strlen ((char *) sl.buf); 2109
2417 if (sl.len >= MAXSOCKBUF) 2110 if (sl.length () >= MAXSOCKBUF)
2418 { 2111 {
2419 LOG (llevError, "Buffer overflow in send_spell_paths!\n"); 2112 LOG (llevError, "Buffer overflow in send_spell_paths!\n");
2420 fatal (0); 2113 fatal (0);
2421 } 2114 }
2422 Send_With_Handling (ns, &sl); 2115
2423 free (sl.buf); 2116 ns->send_packet (sl);
2424} 2117}
2425 2118
2426/** 2119/**
2427 * This looks for any spells the player may have that have changed their stats. 2120 * This looks for any spells the player may have that have changed their stats.
2428 * it then sends an updspell packet for each spell that has changed in this way 2121 * it then sends an updspell packet for each spell that has changed in this way
2429 */ 2122 */
2430void 2123void
2431esrv_update_spells (player *pl) 2124esrv_update_spells (player *pl)
2432{ 2125{
2433 SockList sl;
2434 int flags = 0;
2435 object *spell;
2436
2437 if (!pl->socket.monitor_spells) 2126 if (!pl->socket->monitor_spells)
2438 return; 2127 return;
2128
2439 for (spell = pl->ob->inv; spell != NULL; spell = spell->below) 2129 for (object *spell = pl->ob->inv; spell; spell = spell->below)
2440 { 2130 {
2441 if (spell->type == SPELL) 2131 if (spell->type == SPELL)
2442 { 2132 {
2133 int flags = 0;
2134
2443 /* check if we need to update it */ 2135 /* check if we need to update it */
2444 if (spell->last_sp != SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA)) 2136 if (spell->last_sp != SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA))
2445 { 2137 {
2446 spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); 2138 spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA);
2447 flags |= UPD_SP_MANA; 2139 flags |= UPD_SP_MANA;
2448 } 2140 }
2141
2449 if (spell->last_grace != SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE)) 2142 if (spell->last_grace != SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE))
2450 { 2143 {
2451 spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); 2144 spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE);
2452 flags |= UPD_SP_GRACE; 2145 flags |= UPD_SP_GRACE;
2453 } 2146 }
2147
2454 if (spell->last_eat != spell->stats.dam + SP_level_dam_adjust (pl->ob, spell)) 2148 if (spell->last_eat != spell->stats.dam + SP_level_dam_adjust (pl->ob, spell))
2455 { 2149 {
2456 spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); 2150 spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell);
2457 flags |= UPD_SP_DAMAGE; 2151 flags |= UPD_SP_DAMAGE;
2458 } 2152 }
2153
2459 if (flags != 0) 2154 if (flags)
2460 { 2155 {
2461 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 2156 packet sl;
2462 strcpy ((char *) sl.buf, "updspell "); 2157
2463 sl.len = strlen ((char *) sl.buf); 2158 sl << "updspell "
2464 SockList_AddChar (&sl, flags); 2159 << uint8 (flags)
2465 SockList_AddInt (&sl, spell->count); 2160 << uint32 (spell->count);
2466 if (flags & UPD_SP_MANA) 2161
2467 SockList_AddShort (&sl, spell->last_sp); 2162 if (flags & UPD_SP_MANA ) sl << uint16 (spell->last_sp);
2468 if (flags & UPD_SP_GRACE) 2163 if (flags & UPD_SP_GRACE ) sl << uint16 (spell->last_grace);
2469 SockList_AddShort (&sl, spell->last_grace); 2164 if (flags & UPD_SP_DAMAGE) sl << uint16 (spell->last_eat);
2470 if (flags & UPD_SP_DAMAGE) 2165
2471 SockList_AddShort (&sl, spell->last_eat); 2166 pl->socket->send_packet (sl);
2472 flags = 0;
2473 Send_With_Handling (&pl->socket, &sl);
2474 free (sl.buf);
2475 } 2167 }
2476 } 2168 }
2477 } 2169 }
2478} 2170}
2479 2171
2480void 2172void
2481esrv_remove_spell (player *pl, object *spell) 2173esrv_remove_spell (player *pl, object *spell)
2482{ 2174{
2483 SockList sl;
2484
2485 if (!pl->socket.monitor_spells) 2175 if (!pl->socket->monitor_spells)
2486 return; 2176 return;
2177
2487 if (!pl || !spell || spell->env != pl->ob) 2178 if (!pl || !spell || spell->env != pl->ob)
2488 { 2179 {
2489 LOG (llevError, "Invalid call to esrv_remove_spell"); 2180 LOG (llevError, "Invalid call to esrv_remove_spell");
2490 return; 2181 return;
2491 } 2182 }
2492 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 2183
2493 strcpy ((char *) sl.buf, "delspell "); 2184 packet sl;
2494 sl.len = strlen ((char *) sl.buf); 2185
2495 SockList_AddInt (&sl, spell->count); 2186 sl << "delspell "
2496 Send_With_Handling (&pl->socket, &sl); 2187 << uint32 (spell->count);
2497 free (sl.buf); 2188
2189 pl->socket->send_packet (sl);
2498} 2190}
2499 2191
2500/* appends the spell *spell to the Socklist we will send the data to. */ 2192/* appends the spell *spell to the Socklist we will send the data to. */
2501static void 2193static void
2502append_spell (player *pl, SockList * sl, object *spell) 2194append_spell (player *pl, packet &sl, object *spell)
2503{ 2195{
2504 int len, i, skill = 0; 2196 int len, i, skill = 0;
2505 2197
2506 if (!(spell->name)) 2198 if (!(spell->name))
2507 { 2199 {
2508 LOG (llevError, "item number %d is a spell with no name.\n", spell->count); 2200 LOG (llevError, "item number %d is a spell with no name.\n", spell->count);
2509 return; 2201 return;
2510 } 2202 }
2511 SockList_AddInt (sl, spell->count); 2203
2512 SockList_AddShort (sl, spell->level);
2513 SockList_AddShort (sl, spell->casting_time);
2514 /* store costs and damage in the object struct, to compare to later */ 2204 /* store costs and damage in the object struct, to compare to later */
2515 spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); 2205 spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA);
2516 spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); 2206 spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE);
2517 spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); 2207 spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell);
2518 /* send the current values */
2519 SockList_AddShort (sl, spell->last_sp);
2520 SockList_AddShort (sl, spell->last_grace);
2521 SockList_AddShort (sl, spell->last_eat);
2522 2208
2523 /* figure out which skill it uses, if it uses one */ 2209 /* figure out which skill it uses, if it uses one */
2524 if (spell->skill) 2210 if (spell->skill)
2525 { 2211 {
2526 for (i = 1; i < NUM_SKILLS; i++) 2212 for (i = 1; i < NUM_SKILLS; i++)
2528 { 2214 {
2529 skill = i + CS_STAT_SKILLINFO; 2215 skill = i + CS_STAT_SKILLINFO;
2530 break; 2216 break;
2531 } 2217 }
2532 } 2218 }
2533 SockList_AddChar (sl, skill);
2534 2219
2535 SockList_AddInt (sl, spell->path_attuned); 2220 /* send the current values */
2221 sl << uint32 (spell->count)
2222 << uint16 (spell->level)
2223 << uint16 (spell->casting_time)
2224 << uint16 (spell->last_sp)
2225 << uint16 (spell->last_grace)
2226 << uint16 (spell->last_eat)
2227 << uint8 (skill)
2228 << uint32 (spell->path_attuned)
2536 SockList_AddInt (sl, (spell->face) ? spell->face->number : 0); 2229 << uint32 (spell->face ? spell->face->number : 0)
2537 2230 << data8 (spell->name)
2538 len = strlen (spell->name); 2231 << data16 (spell->msg);
2539 SockList_AddChar (sl, (char) len);
2540 memcpy (sl->buf + sl->len, spell->name, len);
2541 sl->len += len;
2542
2543 if (!spell->msg)
2544 {
2545 SockList_AddShort (sl, 0);
2546 }
2547 else
2548 {
2549 len = strlen (spell->msg);
2550 SockList_AddShort (sl, len);
2551 memcpy (sl->buf + sl->len, spell->msg, len);
2552 sl->len += len;
2553 }
2554} 2232}
2555 2233
2556/** 2234/**
2557 * This tells the client to add the spell *ob, if *ob is NULL, then add 2235 * This tells the client to add the spell *ob, if *ob is NULL, then add
2558 * all spells in the player's inventory. 2236 * all spells in the player's inventory.
2559 */ 2237 */
2560void 2238void
2561esrv_add_spells (player *pl, object *spell) 2239esrv_add_spells (player *pl, object *spell)
2562{ 2240{
2563 SockList sl;
2564
2565 if (!pl) 2241 if (!pl)
2566 { 2242 {
2567 LOG (llevError, "esrv_add_spells, tried to add a spell to a NULL player"); 2243 LOG (llevError, "esrv_add_spells, tried to add a spell to a NULL player");
2568 return; 2244 return;
2569 } 2245 }
2246
2570 if (!pl->socket.monitor_spells) 2247 if (!pl->socket->monitor_spells)
2571 return; 2248 return;
2572 sl.buf = (unsigned char *) malloc (MAXSOCKBUF); 2249
2573 strcpy ((char *) sl.buf, "addspell "); 2250 packet sl;
2574 sl.len = strlen ((char *) sl.buf); 2251 sl << "addspell ";
2252
2575 if (!spell) 2253 if (!spell)
2576 { 2254 {
2577 for (spell = pl->ob->inv; spell != NULL; spell = spell->below) 2255 for (spell = pl->ob->inv; spell != NULL; spell = spell->below)
2578 { 2256 {
2579 /* were we to simply keep appending data here, we could exceed 2257 /* were we to simply keep appending data here, we could exceed
2589 * is hundreds of bytes off, so correcting 22 vs 26 doesn't seem 2267 * is hundreds of bytes off, so correcting 22 vs 26 doesn't seem
2590 * like it will fix this 2268 * like it will fix this
2591 */ 2269 */
2592 if (spell->type != SPELL) 2270 if (spell->type != SPELL)
2593 continue; 2271 continue;
2272
2594 if (sl.len >= (MAXSOCKBUF - (26 + strlen (spell->name) + (spell->msg ? strlen (spell->msg) : 0)))) 2273 if (sl.length () >= (MAXSOCKBUF - (26 + strlen (spell->name) + (spell->msg ? strlen (spell->msg) : 0))))
2595 { 2274 {
2596 Send_With_Handling (&pl->socket, &sl); 2275 pl->socket->send_packet (sl);
2597 strcpy ((char *) sl.buf, "addspell "); 2276
2598 sl.len = strlen ((char *) sl.buf); 2277 sl.reset ();
2278 sl << "addspell ";
2599 } 2279 }
2280
2600 append_spell (pl, &sl, spell); 2281 append_spell (pl, sl, spell);
2601 } 2282 }
2602 } 2283 }
2603 else if (spell->type != SPELL) 2284 else if (spell->type != SPELL)
2604 { 2285 {
2605 LOG (llevError, "Asked to send a non-spell object as a spell"); 2286 LOG (llevError, "Asked to send a non-spell object as a spell");
2606 return; 2287 return;
2607 } 2288 }
2608 else 2289 else
2609 append_spell (pl, &sl, spell); 2290 append_spell (pl, sl, spell);
2291
2610 if (sl.len >= MAXSOCKBUF) 2292 if (sl.length () >= MAXSOCKBUF)
2611 { 2293 {
2612 LOG (llevError, "Buffer overflow in esrv_add_spells!\n"); 2294 LOG (llevError, "Buffer overflow in esrv_add_spells!\n");
2613 fatal (0); 2295 fatal (0);
2614 } 2296 }
2297
2615 /* finally, we can send the packet */ 2298 /* finally, we can send the packet */
2616 Send_With_Handling (&pl->socket, &sl); 2299 pl->socket->send_packet (sl);
2617 free (sl.buf);
2618} 2300}
2301

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines