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.8 by root, Thu Aug 24 10:58:39 2006 UTC vs.
Revision 1.33 by root, Thu Dec 14 01:21:58 2006 UTC

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

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines