1 | /* |
1 | /* |
2 | * This file is part of Crossfire TRT, the Roguelike Realtime MORPG. |
2 | * This file is part of Deliantra, the Roguelike Realtime MMORPG. |
3 | * |
3 | * |
4 | * Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team |
4 | * Copyright (©) 2005,2006,2007,2008 Marc Alexander Lehmann / Robin Redeker / the Deliantra team |
5 | * Copyright (©) 2001,2007 Mark Wedel |
5 | * Copyright (©) 2001,2007 Mark Wedel |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
6 | * Copyright (©) 1992,2007 Frank Tore Johansen |
7 | * |
7 | * |
8 | * Crossfire TRT is free software: you can redistribute it and/or modify |
8 | * Deliantra is free software: you can redistribute it and/or modify |
9 | * it under the terms of the GNU General Public License as published by |
9 | * it under the terms of the GNU General Public License as published by |
10 | * the Free Software Foundation, either version 3 of the License, or |
10 | * the Free Software Foundation, either version 3 of the License, or |
11 | * (at your option) any later version. |
11 | * (at your option) any later version. |
12 | * |
12 | * |
13 | * This program is distributed in the hope that it will be useful, |
13 | * This program is distributed in the hope that it will be useful, |
… | |
… | |
16 | * GNU General Public License for more details. |
16 | * GNU General Public License for more details. |
17 | * |
17 | * |
18 | * You should have received a copy of the GNU General Public License |
18 | * You should have received a copy of the GNU General Public License |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
19 | * along with this program. If not, see <http://www.gnu.org/licenses/>. |
20 | * |
20 | * |
21 | * The authors can be reached via e-mail to <crossfire@schmorp.de> |
21 | * The authors can be reached via e-mail to <support@deliantra.net> |
22 | */ |
22 | */ |
23 | |
23 | |
24 | /** |
24 | /** |
25 | * \file |
25 | * \file |
26 | * Client handling. |
26 | * Client handling. |
… | |
… | |
98 | */ |
98 | */ |
99 | mx = ns->mapx; |
99 | mx = ns->mapx; |
100 | my = ns->mapy; |
100 | my = ns->mapy; |
101 | |
101 | |
102 | /* the x and y here are coordinates for the new map, i.e. if we moved |
102 | /* the x and y here are coordinates for the new map, i.e. if we moved |
103 | * (dx,dy), newmap[x][y] = oldmap[x-dx][y-dy]. For this reason, |
103 | * (dx,dy), newmap[x][y] = oldmap[x-dx][y-dy]. For this reason, |
104 | * if the destination x or y coordinate is outside the viewable |
104 | * if the destination x or y coordinate is outside the viewable |
105 | * area, we clear the values - otherwise, the old values |
105 | * area, we clear the values - otherwise, the old values |
106 | * are preserved, and the check_head thinks it needs to clear them. |
106 | * are preserved, and the check_head thinks it needs to clear them. |
107 | */ |
107 | */ |
108 | for (x = 0; x < mx; x++) |
108 | for (x = 0; x < mx; x++) |
109 | { |
|
|
110 | for (y = 0; y < my; y++) |
109 | for (y = 0; y < my; y++) |
111 | { |
|
|
112 | if (x >= ns->mapx || y >= ns->mapy) |
110 | if (x >= ns->mapx || y >= ns->mapy) |
113 | /* clear cells outside the viewable area */ |
111 | /* clear cells outside the viewable area */ |
114 | memset (&newmap.cells[x][y], 0, sizeof (struct MapCell)); |
112 | memset (&newmap.cells[x][y], 0, sizeof (struct MapCell)); |
115 | else if ((x + dx) < 0 || (x + dx) >= ns->mapx || (y + dy) < 0 || (y + dy) >= ns->mapy) |
113 | else if ((x + dx) < 0 || (x + dx) >= ns->mapx || (y + dy) < 0 || (y + dy) >= ns->mapy) |
116 | /* clear newly visible tiles within the viewable area */ |
114 | /* clear newly visible tiles within the viewable area */ |
117 | memset (&(newmap.cells[x][y]), 0, sizeof (struct MapCell)); |
115 | memset (&(newmap.cells[x][y]), 0, sizeof (struct MapCell)); |
118 | else |
116 | else |
119 | memcpy (&(newmap.cells[x][y]), &(ns->lastmap.cells[x + dx][y + dy]), sizeof (struct MapCell)); |
117 | memcpy (&(newmap.cells[x][y]), &(ns->lastmap.cells[x + dx][y + dy]), sizeof (struct MapCell)); |
120 | } |
|
|
121 | } |
|
|
122 | |
118 | |
123 | memcpy (&(ns->lastmap), &newmap, sizeof (struct Map)); |
119 | memcpy (&(ns->lastmap), &newmap, sizeof (struct Map)); |
124 | |
120 | |
125 | /* Make sure that the next "map1" command will be sent (even if it is |
121 | /* Make sure that the next "map1" command will be sent (even if it is |
126 | * empty). |
122 | * empty). |
… | |
… | |
129 | } |
125 | } |
130 | |
126 | |
131 | static void |
127 | static void |
132 | clear_map (player *pl) |
128 | clear_map (player *pl) |
133 | { |
129 | { |
|
|
130 | pl->ns->mapinfo_queue_clear (); |
|
|
131 | |
134 | memset (&pl->ns->lastmap, 0, sizeof (pl->ns->lastmap)); |
132 | memset (&pl->ns->lastmap, 0, sizeof (pl->ns->lastmap)); |
135 | |
133 | |
136 | pl->ns->force_newmap = false; |
134 | pl->ns->force_newmap = false; |
137 | |
135 | |
138 | if (pl->ns->newmapcmd == 1) |
136 | if (pl->ns->newmapcmd == 1) |
139 | pl->ns->send_packet ("newmap"); |
137 | pl->ns->send_packet ("newmap"); |
140 | |
138 | |
141 | pl->ns->floorbox_reset (); |
139 | pl->ns->floorbox_reset (); |
|
|
140 | } |
|
|
141 | |
|
|
142 | static void |
|
|
143 | send_map_info (player *pl) |
|
|
144 | { |
|
|
145 | client &socket = *pl->ns; |
|
|
146 | object *ob = pl->observe; |
|
|
147 | |
|
|
148 | if (socket.mapinfocmd) |
|
|
149 | { |
|
|
150 | if (ob->map && ob->map->path[0]) |
|
|
151 | { |
|
|
152 | int flags = 0; |
|
|
153 | |
|
|
154 | if (ob->map->tile_path[0]) flags |= 1; |
|
|
155 | if (ob->map->tile_path[1]) flags |= 2; |
|
|
156 | if (ob->map->tile_path[2]) flags |= 4; |
|
|
157 | if (ob->map->tile_path[3]) flags |= 8; |
|
|
158 | |
|
|
159 | socket.send_packet_printf ("mapinfo - spatial %d %d %d %d %d %s", |
|
|
160 | flags, socket.mapx / 2 - ob->x, socket.mapy / 2 - ob->y, |
|
|
161 | ob->map->width, ob->map->height, &ob->map->path); |
|
|
162 | } |
|
|
163 | else |
|
|
164 | socket.send_packet ("mapinfo current"); |
|
|
165 | } |
142 | } |
166 | } |
143 | |
167 | |
144 | /** check for map/region change and send new map data */ |
168 | /** check for map/region change and send new map data */ |
145 | static void |
169 | static void |
146 | check_map_change (player *pl) |
170 | check_map_change (player *pl) |
147 | { |
171 | { |
148 | client &socket = *pl->ns; |
172 | client &socket = *pl->ns; |
149 | object *ob = pl->observe; |
173 | object *ob = pl->observe; |
150 | |
174 | |
|
|
175 | region *reg = ob->region (); |
|
|
176 | if (socket.current_region != reg) |
|
|
177 | { |
|
|
178 | INVOKE_PLAYER (REGION_CHANGE, pl, ARG_REGION (reg), ARG_REGION (socket.current_region)); |
|
|
179 | socket.current_region = reg; |
|
|
180 | } |
|
|
181 | |
|
|
182 | // first try to aovid a full newmap on tiled map scrolls |
|
|
183 | if (socket.current_map != ob->map && !socket.force_newmap) |
|
|
184 | { |
|
|
185 | rv_vector rv; |
|
|
186 | |
|
|
187 | get_rangevector_from_mapcoord (socket.current_map, socket.current_x, socket.current_y, ob, &rv, 0); |
|
|
188 | |
|
|
189 | // manhattan distance is very handy here |
|
|
190 | if (rv.distance < 8) // 8 works nicely for speed << 70 and buggy gcfclient |
|
|
191 | { |
|
|
192 | socket.current_map = ob->map; |
|
|
193 | socket.current_x = ob->x; |
|
|
194 | socket.current_y = ob->y; |
|
|
195 | |
|
|
196 | socket_map_scroll (&socket, rv.distance_x, rv.distance_y); |
|
|
197 | socket.floorbox_reset (); |
|
|
198 | send_map_info (pl); |
|
|
199 | } |
|
|
200 | } |
|
|
201 | |
151 | if (socket.current_map != ob->map || socket.force_newmap) |
202 | if (socket.current_map != ob->map || socket.force_newmap) |
152 | { |
203 | { |
153 | clear_map (pl); |
204 | clear_map (pl); |
154 | socket.current_map = ob->map; |
205 | socket.current_map = ob->map; |
155 | |
206 | send_map_info (pl); |
156 | if (socket.mapinfocmd) |
|
|
157 | { |
|
|
158 | if (ob->map && ob->map->path[0]) |
|
|
159 | { |
|
|
160 | int flags = 0; |
|
|
161 | |
|
|
162 | if (ob->map->tile_path[0]) flags |= 1; |
|
|
163 | if (ob->map->tile_path[1]) flags |= 2; |
|
|
164 | if (ob->map->tile_path[2]) flags |= 4; |
|
|
165 | if (ob->map->tile_path[3]) flags |= 8; |
|
|
166 | |
|
|
167 | socket.send_packet_printf ("mapinfo - spatial %d %d %d %d %d %s", |
|
|
168 | flags, socket.mapx / 2 - ob->x, socket.mapy / 2 - ob->y, |
|
|
169 | ob->map->width, ob->map->height, &ob->map->path); |
|
|
170 | } |
|
|
171 | else |
|
|
172 | socket.send_packet ("mapinfo current"); |
|
|
173 | } |
|
|
174 | } |
207 | } |
175 | else if (socket.current_x != ob->x || socket.current_y != ob->y) |
208 | else if (socket.current_x != ob->x || socket.current_y != ob->y) |
176 | { |
209 | { |
177 | int dx = ob->x - socket.current_x; |
210 | int dx = ob->x - socket.current_x; |
178 | int dy = ob->y - socket.current_y; |
211 | int dy = ob->y - socket.current_y; |
… | |
… | |
186 | } |
219 | } |
187 | } |
220 | } |
188 | |
221 | |
189 | socket.current_x = ob->x; |
222 | socket.current_x = ob->x; |
190 | socket.current_y = ob->y; |
223 | socket.current_y = ob->y; |
191 | |
|
|
192 | region *reg = ob->region (); |
|
|
193 | if (socket.current_region != reg) |
|
|
194 | { |
|
|
195 | socket.current_region = reg; |
|
|
196 | socket.send_packet_printf ("drawinfo 0 You are now %s.\n(use whereami for more details)", ®->longname); |
|
|
197 | } |
|
|
198 | } |
224 | } |
199 | |
225 | |
200 | /** |
226 | /** |
201 | * RequestInfo is sort of a meta command. There is some specific |
227 | * RequestInfo is sort of a meta command. There is some specific |
202 | * request of information, but we call other functions to provide |
228 | * request of information, but we call other functions to provide |
203 | * that information. |
229 | * that information. |
204 | */ |
230 | */ |
205 | void |
231 | void |
206 | RequestInfo (char *buf, int len, client * ns) |
232 | RequestInfo (char *buf, int len, client *ns) |
207 | { |
233 | { |
208 | char *params = NULL, *cp; |
234 | char *params; |
209 | |
|
|
210 | /* No match */ |
|
|
211 | char bigbuf[MAX_BUF]; |
|
|
212 | int slen; |
|
|
213 | |
|
|
214 | /* Set up replyinfo before we modify any of the buffers - this is used |
|
|
215 | * if we don't find a match. |
|
|
216 | */ |
|
|
217 | strcpy (bigbuf, "replyinfo "); |
|
|
218 | slen = strlen (bigbuf); |
|
|
219 | safe_strcat (bigbuf, buf, &slen, MAX_BUF); |
|
|
220 | |
235 | |
221 | /* find the first space, make it null, and update the |
236 | /* find the first space, make it null, and update the |
222 | * params pointer. |
237 | * params pointer. |
223 | */ |
238 | */ |
224 | for (cp = buf; *cp != '\0'; cp++) |
239 | for (params = buf; *params; params++) |
225 | if (*cp == ' ') |
240 | if (*params == ' ') |
226 | { |
241 | { |
227 | *cp = '\0'; |
|
|
228 | params = cp + 1; |
242 | *params++ = 0; |
229 | break; |
243 | break; |
230 | } |
244 | } |
231 | |
245 | |
232 | if (!strcmp (buf, "image_info")) |
246 | if (!strcmp (buf, "image_info")) |
233 | send_image_info (ns, params); |
247 | send_image_info (ns, params); |
… | |
… | |
236 | else if (!strcmp (buf, "skill_info")) |
250 | else if (!strcmp (buf, "skill_info")) |
237 | send_skill_info (ns, params); |
251 | send_skill_info (ns, params); |
238 | else if (!strcmp (buf, "spell_paths")) |
252 | else if (!strcmp (buf, "spell_paths")) |
239 | send_spell_paths (ns, params); |
253 | send_spell_paths (ns, params); |
240 | else |
254 | else |
241 | ns->send_packet (bigbuf, len); |
255 | { |
|
|
256 | // undo tokenisation above and send replyinfo with the request unchanged |
|
|
257 | if (*params) |
|
|
258 | *--params = ' '; |
|
|
259 | |
|
|
260 | ns->send_packet_printf ("replyinfo %s", buf); |
|
|
261 | } |
242 | } |
262 | } |
243 | |
263 | |
244 | void |
264 | void |
245 | ExtCmd (char *buf, int len, player *pl) |
265 | ExtCmd (char *buf, int len, player *pl) |
246 | { |
266 | { |
… | |
… | |
249 | |
269 | |
250 | void |
270 | void |
251 | ExtiCmd (char *buf, int len, client *ns) |
271 | ExtiCmd (char *buf, int len, client *ns) |
252 | { |
272 | { |
253 | INVOKE_CLIENT (EXTICMD, ns, ARG_DATA (buf, len)); |
273 | INVOKE_CLIENT (EXTICMD, ns, ARG_DATA (buf, len)); |
|
|
274 | } |
|
|
275 | |
|
|
276 | void |
|
|
277 | client::mapinfo_queue_clear () |
|
|
278 | { |
|
|
279 | for (auto (i, mapinfo_queue.begin ()); i != mapinfo_queue.end (); ++i) |
|
|
280 | free (*i); |
|
|
281 | |
|
|
282 | mapinfo_queue.clear (); |
|
|
283 | } |
|
|
284 | |
|
|
285 | bool |
|
|
286 | client::mapinfo_try (char *buf) |
|
|
287 | { |
|
|
288 | char *token = buf; |
|
|
289 | buf += strlen (buf) + 9; |
|
|
290 | |
|
|
291 | // initial map and its origin |
|
|
292 | maptile *map = pl->observe->map; |
|
|
293 | int mapx = pl->ns->mapx / 2 - pl->observe->x; |
|
|
294 | int mapy = pl->ns->mapy / 2 - pl->observe->y; |
|
|
295 | int max_distance = 8; // limit maximum path length to something generous |
|
|
296 | |
|
|
297 | while (*buf && map && max_distance) |
|
|
298 | { |
|
|
299 | int dir = *buf++ - '1'; |
|
|
300 | |
|
|
301 | if (dir >= 0 && dir <= 3) |
|
|
302 | { |
|
|
303 | if (!map->tile_path [dir]) |
|
|
304 | map = 0; |
|
|
305 | else if (map->tile_available (dir, false)) |
|
|
306 | { |
|
|
307 | maptile *neigh = map->tile_map [dir]; |
|
|
308 | |
|
|
309 | switch (dir) |
|
|
310 | { |
|
|
311 | case 0: mapy -= neigh->height; break; |
|
|
312 | case 2: mapy += map ->height; break; |
|
|
313 | case 3: mapx -= neigh->width ; break; |
|
|
314 | case 1: mapx += map ->width ; break; |
|
|
315 | } |
|
|
316 | |
|
|
317 | map = neigh; |
|
|
318 | --max_distance; |
|
|
319 | } |
|
|
320 | else |
|
|
321 | return 0; |
|
|
322 | } |
|
|
323 | else |
|
|
324 | max_distance = 0; |
|
|
325 | } |
|
|
326 | |
|
|
327 | if (!max_distance) |
|
|
328 | send_packet_printf ("mapinfo %s error", token); |
|
|
329 | else if (!map || !map->path) |
|
|
330 | send_packet_printf ("mapinfo %s nomap", token); |
|
|
331 | else |
|
|
332 | { |
|
|
333 | int flags = 0; |
|
|
334 | |
|
|
335 | if (map->tile_path[0]) flags |= 1; |
|
|
336 | if (map->tile_path[1]) flags |= 2; |
|
|
337 | if (map->tile_path[2]) flags |= 4; |
|
|
338 | if (map->tile_path[3]) flags |= 8; |
|
|
339 | |
|
|
340 | send_packet_printf ("mapinfo %s spatial %d %d %d %d %d %s", token, flags, mapx, mapy, map->width, map->height, &map->path); |
|
|
341 | } |
|
|
342 | |
|
|
343 | return 1; |
|
|
344 | } |
|
|
345 | |
|
|
346 | void |
|
|
347 | client::mapinfo_queue_run () |
|
|
348 | { |
|
|
349 | if (mapinfo_queue.empty () || !pl) |
|
|
350 | return; |
|
|
351 | |
|
|
352 | for (int i = 0; i < mapinfo_queue.size (); ++i) |
|
|
353 | if (mapinfo_try (mapinfo_queue [i])) |
|
|
354 | { |
|
|
355 | free (mapinfo_queue [i]); |
|
|
356 | mapinfo_queue.erase (i); |
|
|
357 | } |
|
|
358 | else |
|
|
359 | ++i; |
254 | } |
360 | } |
255 | |
361 | |
256 | void |
362 | void |
257 | MapInfoCmd (char *buf, int len, player *pl) |
363 | MapInfoCmd (char *buf, int len, player *pl) |
258 | { |
364 | { |
259 | // <mapinfo tag spatial tile-path |
365 | // <mapinfo tag spatial tile-path |
260 | // >mapinfo tag spatial flags x y w h hash |
366 | // >mapinfo tag spatial flags x y w h hash |
261 | |
367 | |
262 | char bigbuf[MAX_BUF], *token; |
|
|
263 | |
|
|
264 | token = buf; |
368 | char *token = buf; |
265 | // copy token |
369 | |
266 | if (!(buf = strchr (buf, ' '))) |
370 | if (!(buf = strchr (buf, ' '))) |
267 | return; |
371 | return; |
268 | |
372 | |
269 | *buf++ = 0; |
|
|
270 | |
|
|
271 | if (!strncmp (buf, "spatial ", 8)) |
373 | if (!strncmp (buf, " spatial ", 9)) |
272 | { |
374 | { |
273 | buf += 8; |
375 | char *copy = strdup (token); |
|
|
376 | copy [buf - token] = 0; |
274 | |
377 | |
275 | // initial map and its origin |
378 | #if 0 |
276 | maptile *map = pl->ob->map; |
379 | // this makes only sense when we flush the buffer immediately |
277 | sint16 dx, dy; |
380 | if (pl->ns->mapinfo_try (copy)) |
278 | int mapx = pl->ns->mapx / 2 - pl->ob->x; |
381 | free (copy); |
279 | int mapy = pl->ns->mapy / 2 - pl->ob->y; |
|
|
280 | int max_distance = 8; // limit maximum path length to something generous |
|
|
281 | |
|
|
282 | while (*buf && map && max_distance) |
|
|
283 | { |
|
|
284 | int dir = *buf++; |
|
|
285 | |
|
|
286 | switch (dir) |
|
|
287 | { |
|
|
288 | case '1': |
|
|
289 | dx = 0; |
|
|
290 | dy = -1; |
|
|
291 | map = map->xy_find (dx, dy); |
|
|
292 | map && (mapy -= map->height); |
|
|
293 | break; |
|
|
294 | case '2': |
|
|
295 | mapx += map->width; |
|
|
296 | dx = map->width; |
|
|
297 | dy = 0; |
|
|
298 | map = map->xy_find (dx, dy); |
|
|
299 | break; |
|
|
300 | case '3': |
|
|
301 | mapy += map->height; |
|
|
302 | dx = 0; |
|
|
303 | dy = map->height; |
|
|
304 | map = map->xy_find (dx, dy); |
|
|
305 | break; |
|
|
306 | case '4': |
|
|
307 | dx = -1; |
|
|
308 | dy = 0; |
|
|
309 | map = map->xy_find (dx, dy); |
|
|
310 | map && (mapx -= map->width); |
|
|
311 | break; |
|
|
312 | } |
|
|
313 | |
|
|
314 | --max_distance; |
|
|
315 | } |
|
|
316 | |
|
|
317 | if (!max_distance) |
|
|
318 | snprintf (bigbuf, MAX_BUF, "mapinfo %s error", token); |
|
|
319 | else if (map && map->path[0]) |
|
|
320 | { |
|
|
321 | int flags = 0; |
|
|
322 | |
|
|
323 | if (map->tile_path[0]) flags |= 1; |
|
|
324 | if (map->tile_path[1]) flags |= 2; |
|
|
325 | if (map->tile_path[2]) flags |= 4; |
|
|
326 | if (map->tile_path[3]) flags |= 8; |
|
|
327 | |
|
|
328 | snprintf (bigbuf, MAX_BUF, "mapinfo %s spatial %d %d %d %d %d %s", token, flags, mapx, mapy, map->width, map->height, &map->path); |
|
|
329 | } |
|
|
330 | else |
382 | else |
331 | snprintf (bigbuf, MAX_BUF, "mapinfo %s nomap", token); |
383 | #endif |
|
|
384 | pl->ns->mapinfo_queue.push_back (copy); |
332 | } |
385 | } |
333 | else |
386 | else |
334 | snprintf (bigbuf, MAX_BUF, "mapinfo %s unsupported", token); |
387 | pl->ns->send_packet_printf ("mapinfo %s unsupported", token); |
335 | |
|
|
336 | pl->ns->send_packet (bigbuf); |
|
|
337 | } |
388 | } |
338 | |
389 | |
339 | /** This is the Setup cmd */ |
390 | /** This is the Setup cmd */ |
340 | void |
391 | void |
341 | SetUp (char *buf, int len, client * ns) |
392 | SetUp (char *buf, int len, client * ns) |
… | |
… | |
351 | */ |
402 | */ |
352 | void |
403 | void |
353 | AddMeCmd (char *buf, int len, client *ns) |
404 | AddMeCmd (char *buf, int len, client *ns) |
354 | { |
405 | { |
355 | INVOKE_CLIENT (ADDME, ns, ARG_DATA (buf, len)); |
406 | INVOKE_CLIENT (ADDME, ns, ARG_DATA (buf, len)); |
356 | } |
|
|
357 | |
|
|
358 | /** Reply to ExtendedInfos command */ |
|
|
359 | void |
|
|
360 | ToggleExtendedInfos (char *buf, int len, client * ns) |
|
|
361 | { |
|
|
362 | char cmdback[MAX_BUF]; |
|
|
363 | char command[50]; |
|
|
364 | int info, nextinfo; |
|
|
365 | |
|
|
366 | cmdback[0] = '\0'; |
|
|
367 | nextinfo = 0; |
|
|
368 | |
|
|
369 | while (1) |
|
|
370 | { |
|
|
371 | /* 1. Extract an info */ |
|
|
372 | info = nextinfo; |
|
|
373 | |
|
|
374 | while ((info < len) && (buf[info] == ' ')) |
|
|
375 | info++; |
|
|
376 | |
|
|
377 | if (info >= len) |
|
|
378 | break; |
|
|
379 | |
|
|
380 | nextinfo = info + 1; |
|
|
381 | |
|
|
382 | while ((nextinfo < len) && (buf[nextinfo] != ' ')) |
|
|
383 | nextinfo++; |
|
|
384 | |
|
|
385 | if (nextinfo - info >= 49) /*Erroneous info asked */ |
|
|
386 | continue; |
|
|
387 | |
|
|
388 | strncpy (command, &(buf[info]), nextinfo - info); |
|
|
389 | |
|
|
390 | /* 2. Interpret info */ |
|
|
391 | if (!strcmp ("smooth", command)) |
|
|
392 | /* Toggle smoothing */ |
|
|
393 | ns->EMI_smooth = !ns->EMI_smooth; |
|
|
394 | else |
|
|
395 | /*bad value */; |
|
|
396 | |
|
|
397 | /*3. Next info */ |
|
|
398 | } |
|
|
399 | |
|
|
400 | strcpy (cmdback, "ExtendedInfoSet"); |
|
|
401 | |
|
|
402 | if (ns->EMI_smooth) |
|
|
403 | { |
|
|
404 | strcat (cmdback, " "); |
|
|
405 | strcat (cmdback, "smoothing"); |
|
|
406 | } |
|
|
407 | |
|
|
408 | ns->send_packet (cmdback); |
|
|
409 | } |
407 | } |
410 | |
408 | |
411 | /* |
409 | /* |
412 | #define MSG_TYPE_BOOK 1 |
410 | #define MSG_TYPE_BOOK 1 |
413 | #define MSG_TYPE_CARD 2 |
411 | #define MSG_TYPE_CARD 2 |
… | |
… | |
511 | void |
509 | void |
512 | NewPlayerCmd (char *buf, int len, player *pl) |
510 | NewPlayerCmd (char *buf, int len, player *pl) |
513 | { |
511 | { |
514 | if (len <= 6) |
512 | if (len <= 6) |
515 | { |
513 | { |
516 | LOG (llevDebug, "Corrupt ncom command <%s> not long enough - discarding\n", buf); |
514 | LOG (llevDebug, "%s: corrupt ncom command <%s>: not long enough (%d) - discarding\n", pl->ns->host, buf, len); |
517 | return; |
515 | return; |
518 | } |
516 | } |
519 | |
517 | |
520 | uint16 cmdid = net_uint16 ((uint8 *)buf); |
518 | uint16 cmdid = net_uint16 ((uint8 *)buf); |
521 | sint32 repeat = net_sint32 ((uint8 *)buf + 2); |
519 | sint32 repeat = net_sint32 ((uint8 *)buf + 2); |
… | |
… | |
659 | * syntax is: move (to) (tag) (nrof) |
657 | * syntax is: move (to) (tag) (nrof) |
660 | */ |
658 | */ |
661 | void |
659 | void |
662 | MoveCmd (char *buf, int len, player *pl) |
660 | MoveCmd (char *buf, int len, player *pl) |
663 | { |
661 | { |
664 | int vals[3], i; |
662 | int to, tag, nrof; |
665 | |
663 | |
666 | /* A little funky here. We only cycle for 2 records, because |
664 | if (3 != sscanf (buf, "%d %d %d", &to, &tag, &nrof)) |
667 | * we obviously are not going to find a space after the third |
|
|
668 | * record. Perhaps we should just replace this with a |
|
|
669 | * sscanf? |
|
|
670 | */ |
|
|
671 | for (i = 0; i < 2; i++) |
|
|
672 | { |
665 | { |
673 | vals[i] = atoi (buf); |
|
|
674 | |
|
|
675 | if (!(buf = strchr (buf, ' '))) |
|
|
676 | { |
|
|
677 | LOG (llevError, "Incomplete move command: %s\n", buf); |
666 | LOG (llevError, "Incomplete move command: %s\n", buf); |
678 | return; |
667 | return; |
679 | } |
|
|
680 | |
|
|
681 | buf++; |
|
|
682 | } |
668 | } |
683 | |
669 | |
684 | vals[2] = atoi (buf); |
670 | esrv_move_object (pl->ob, to, tag, nrof); |
685 | |
|
|
686 | /* LOG(llevDebug,"Move item %d (nrof=%d) to %d.\n", vals[1], vals[2], vals[0]);*/ |
|
|
687 | esrv_move_object (pl->ob, vals[0], vals[1], vals[2]); |
|
|
688 | } |
671 | } |
689 | |
672 | |
690 | /****************************************************************************** |
673 | /****************************************************************************** |
691 | * |
674 | * |
692 | * Start of commands the server sends to the client. |
675 | * Start of commands the server sends to the client. |
… | |
… | |
793 | AddIfShort (ns->last_stats.Wis, ob->stats.Wis, CS_STAT_WIS); |
776 | AddIfShort (ns->last_stats.Wis, ob->stats.Wis, CS_STAT_WIS); |
794 | AddIfShort (ns->last_stats.Pow, ob->stats.Pow, CS_STAT_POW); |
777 | AddIfShort (ns->last_stats.Pow, ob->stats.Pow, CS_STAT_POW); |
795 | AddIfShort (ns->last_stats.Cha, ob->stats.Cha, CS_STAT_CHA); |
778 | AddIfShort (ns->last_stats.Cha, ob->stats.Cha, CS_STAT_CHA); |
796 | |
779 | |
797 | for (int s = 0; s < NUM_SKILLS; s++) |
780 | for (int s = 0; s < NUM_SKILLS; s++) |
798 | if (object *skill = opl->last_skill_ob[s]) |
781 | if (object *skill = opl->last_skill_ob [s]) |
799 | if (skill->stats.exp != ns->last_skill_exp [s]) |
782 | if (skill->stats.exp != ns->last_skill_exp [s]) |
800 | { |
783 | { |
801 | ns->last_skill_exp [s] = skill->stats.exp; |
784 | ns->last_skill_exp [s] = skill->stats.exp; |
802 | |
785 | |
803 | /* Always send along the level if exp changes. This is only |
786 | /* Always send along the level if exp changes. This is only |
… | |
… | |
859 | |
842 | |
860 | /** |
843 | /** |
861 | * Tells the client that here is a player it should start using. |
844 | * Tells the client that here is a player it should start using. |
862 | */ |
845 | */ |
863 | void |
846 | void |
864 | esrv_new_player (player *pl, uint32 weight) |
847 | esrv_new_player (player *pl) |
865 | { |
848 | { |
|
|
849 | sint32 weight = pl->ob->client_weight (); |
|
|
850 | |
866 | packet sl ("player"); |
851 | packet sl ("player"); |
867 | |
852 | |
868 | sl << uint32 (pl->ob->count) |
853 | sl << uint32 (pl->ob->count) |
869 | << uint32 (weight) |
854 | << uint32 (weight) |
870 | << uint32 (pl->ob->face) |
855 | << uint32 (pl->ob->face) |
871 | << data8 (pl->ob->name); |
856 | << data8 (pl->ob->name); |
872 | |
857 | |
873 | pl->ns->last_weight = weight; |
858 | pl->ns->last_weight = weight; |
874 | pl->ns->send_packet (sl); |
859 | pl->ns->send_packet (sl); |
875 | SET_FLAG (pl->ob, FLAG_CLIENT_SENT); |
|
|
876 | } |
860 | } |
877 | |
861 | |
878 | /****************************************************************************** |
862 | /****************************************************************************** |
879 | * |
863 | * |
880 | * Start of map related commands. |
864 | * Start of map related commands. |
… | |
… | |
937 | |
921 | |
938 | if (!ns.faces_sent[face_num]) |
922 | if (!ns.faces_sent[face_num]) |
939 | if (ob) |
923 | if (ob) |
940 | ns.send_faces (ob); |
924 | ns.send_faces (ob); |
941 | else |
925 | else |
942 | ns.send_face (face_num); |
926 | ns.send_face (face_num, 10); |
943 | |
927 | |
944 | sl << uint16 (face_num); |
928 | sl << uint16 (face_num); |
945 | return 1; |
929 | return 1; |
946 | } |
930 | } |
947 | |
931 | |
948 | /* Nothing changed */ |
932 | /* Nothing changed */ |
949 | return 0; |
933 | return 0; |
950 | } |
|
|
951 | |
|
|
952 | /** |
|
|
953 | * Returns the size of a data for a map square as returned by |
|
|
954 | * mapextended. There are CLIENTMAPX*CLIENTMAPY*LAYERS entries |
|
|
955 | * available. |
|
|
956 | */ |
|
|
957 | int |
|
|
958 | getExtendedMapInfoSize (client * ns) |
|
|
959 | { |
|
|
960 | int result = 0; |
|
|
961 | |
|
|
962 | if (ns->ext_mapinfos) |
|
|
963 | { |
|
|
964 | if (ns->EMI_smooth) |
|
|
965 | result += 1; /*One byte for smoothlevel */ |
|
|
966 | } |
|
|
967 | |
|
|
968 | return result; |
|
|
969 | } |
934 | } |
970 | |
935 | |
971 | // prefetch (and touch) all maps within a specific distancd |
936 | // prefetch (and touch) all maps within a specific distancd |
972 | static void |
937 | static void |
973 | prefetch_surrounding_maps (maptile *map, int distance) |
938 | prefetch_surrounding_maps (maptile *map, int distance) |
… | |
… | |
998 | { |
963 | { |
999 | object *ob = pl->observe; |
964 | object *ob = pl->observe; |
1000 | if (!ob->active) |
965 | if (!ob->active) |
1001 | return; |
966 | return; |
1002 | |
967 | |
1003 | maptile *plmap = ob->map; |
|
|
1004 | |
|
|
1005 | /* If player is just joining the game, he isn't here yet, so the map |
968 | /* If player is just joining the game, he isn't here yet, so the map |
1006 | * can get swapped out. If so, don't try to send them a map. All will |
969 | * can get swapped out. If so, don't try to send them a map. All will |
1007 | * be OK once they really log in. |
970 | * be OK once they really log in. |
1008 | */ |
971 | */ |
1009 | if (!plmap || plmap->in_memory != MAP_IN_MEMORY) |
972 | if (!ob->map || ob->map->in_memory != MAP_ACTIVE) |
1010 | return; |
973 | return; |
1011 | |
974 | |
1012 | int x, y, ax, ay, startlen, max_x, max_y, oldlen; |
|
|
1013 | int estartlen, eoldlen; |
975 | int startlen, oldlen; |
1014 | uint8 eentrysize; |
|
|
1015 | uint16 ewhatstart, ewhatflag; |
|
|
1016 | uint8 extendedinfos; |
|
|
1017 | |
976 | |
1018 | check_map_change (pl); |
977 | check_map_change (pl); |
1019 | prefetch_surrounding_maps (pl->ob); |
978 | prefetch_surrounding_maps (pl->ob); |
1020 | |
979 | |
1021 | /* do LOS after calls to update_position */ |
980 | /* do LOS after calls to update_position */ |
1022 | if (ob != pl->ob) |
981 | /* unfortunately, we need to udpate los when observing, currently */ |
1023 | clear_los (pl); |
982 | if (pl->do_los || pl->observe != pl->ob) |
1024 | else if (pl->do_los) |
|
|
1025 | { |
983 | { |
1026 | update_los (ob); |
|
|
1027 | pl->do_los = 0; |
984 | pl->do_los = 0; |
|
|
985 | pl->update_los (); |
1028 | } |
986 | } |
1029 | |
987 | |
1030 | /** |
988 | /** |
1031 | * This function uses the new map1 protocol command to send the map |
989 | * This function uses the new map1 protocol command to send the map |
1032 | * to the client. It is necessary because the old map command supports |
990 | * to the client. It is necessary because the old map command supports |
… | |
… | |
1051 | */ |
1009 | */ |
1052 | |
1010 | |
1053 | client &socket = *pl->ns; |
1011 | client &socket = *pl->ns; |
1054 | |
1012 | |
1055 | packet sl (socket.mapmode == Map1Cmd ? "map1" : "map1a"); |
1013 | packet sl (socket.mapmode == Map1Cmd ? "map1" : "map1a"); |
1056 | packet esl; |
|
|
1057 | |
1014 | |
1058 | startlen = sl.length (); |
1015 | startlen = sl.length (); |
1059 | |
1016 | |
1060 | /*Extendedmapinfo structure initialisation */ |
1017 | int hx = socket.mapx / 2; |
1061 | if (socket.ext_mapinfos) |
1018 | int hy = socket.mapy / 2; |
1062 | { |
|
|
1063 | extendedinfos = EMI_NOREDRAW; |
|
|
1064 | |
1019 | |
1065 | if (socket.EMI_smooth) |
1020 | ordered_mapwalk_begin (ob, -hx, -hy, hx, hy) |
1066 | extendedinfos |= EMI_SMOOTH; |
1021 | int ax = dx + hx; |
|
|
1022 | int ay = dy + hy; |
1067 | |
1023 | |
1068 | ewhatstart = esl.length (); |
1024 | int mask = (ax << 10) | (ay << 4); |
1069 | ewhatflag = extendedinfos; /*The EMI_NOREDRAW bit |
|
|
1070 | could need to be taken away */ |
|
|
1071 | eentrysize = getExtendedMapInfoSize (&socket); |
|
|
1072 | esl << "mapextended " |
|
|
1073 | << uint8 (extendedinfos) |
|
|
1074 | << uint8 (eentrysize); |
|
|
1075 | |
|
|
1076 | estartlen = esl.length (); |
|
|
1077 | } |
|
|
1078 | |
|
|
1079 | /* x,y are the real map locations. ax, ay are viewport relative |
|
|
1080 | * locations. |
|
|
1081 | */ |
|
|
1082 | ay = 0; |
|
|
1083 | |
|
|
1084 | /* We could do this logic as conditionals in the if statement, |
|
|
1085 | * but that started to get a bit messy to look at. |
|
|
1086 | */ |
|
|
1087 | max_x = ob->x + (socket.mapx + 1) / 2; |
|
|
1088 | max_y = ob->y + (socket.mapy + 1) / 2; |
|
|
1089 | |
|
|
1090 | for (y = ob->y - socket.mapy / 2; y < max_y; y++, ay++) |
|
|
1091 | { |
|
|
1092 | sint16 nx, ny; |
|
|
1093 | maptile *m = 0; |
|
|
1094 | |
|
|
1095 | ax = 0; |
|
|
1096 | for (x = ob->x - socket.mapx / 2; x < max_x; x++, ax++) |
|
|
1097 | { |
|
|
1098 | // check to see if we can simply go one right quickly |
|
|
1099 | ++nx; |
|
|
1100 | if (m && nx >= m->width) |
|
|
1101 | m = 0; |
|
|
1102 | |
|
|
1103 | if (!m) |
|
|
1104 | { |
|
|
1105 | nx = x; ny = y; m = plmap; |
|
|
1106 | |
|
|
1107 | if (!xy_normalise (m, nx, ny)) |
|
|
1108 | m = 0; |
|
|
1109 | } |
|
|
1110 | |
|
|
1111 | int emask, mask; |
|
|
1112 | emask = mask = (ax & 0x3f) << 10 | (ay & 0x3f) << 4; |
|
|
1113 | |
|
|
1114 | MapCell &lastcell = socket.lastmap.cells[ax][ay]; |
1025 | MapCell &lastcell = socket.lastmap.cells[ax][ay]; |
1115 | |
1026 | |
1116 | /* If the coordinates are not valid, or it is too dark to see, |
1027 | /* If the coordinates are not valid, or it is too dark to see, |
1117 | * we tell the client as such |
1028 | * we tell the client as such |
1118 | */ |
1029 | */ |
1119 | if (!m) |
1030 | if (!m) |
1120 | { |
1031 | { |
1121 | /* space is out of map. Update space and clear values |
1032 | /* space is out of map. Update space and clear values |
1122 | * if this hasn't already been done. If the space is out |
1033 | * if this hasn't already been done. If the space is out |
1123 | * of the map, it shouldn't have a head |
1034 | * of the map, it shouldn't have a head. |
1124 | */ |
1035 | */ |
1125 | if (lastcell.count != -1) |
1036 | if (lastcell.count != -1) |
|
|
1037 | { |
|
|
1038 | sl << uint16 (mask); |
|
|
1039 | map_clearcell (&lastcell, -1); |
|
|
1040 | } |
|
|
1041 | |
|
|
1042 | continue; |
|
|
1043 | } |
|
|
1044 | |
|
|
1045 | int d = pl->blocked_los_uc (dx, dy); |
|
|
1046 | |
|
|
1047 | if (d > 3) |
|
|
1048 | { |
|
|
1049 | /* This block deals with spaces that are not visible for whatever |
|
|
1050 | * reason. Still may need to send the head for this space. |
|
|
1051 | */ |
|
|
1052 | if (lastcell.count != -1 |
|
|
1053 | || lastcell.faces[0] |
|
|
1054 | || lastcell.faces[1] |
|
|
1055 | || lastcell.faces[2] |
|
|
1056 | || lastcell.stat_hp |
|
|
1057 | || lastcell.flags |
|
|
1058 | || lastcell.player) |
|
|
1059 | sl << uint16 (mask); |
|
|
1060 | |
|
|
1061 | /* properly clear a previously sent big face */ |
|
|
1062 | map_clearcell (&lastcell, -1); |
|
|
1063 | } |
|
|
1064 | else |
|
|
1065 | { |
|
|
1066 | /* In this block, the space is visible. |
|
|
1067 | */ |
|
|
1068 | |
|
|
1069 | /* Rather than try to figure out what everything that we might |
|
|
1070 | * need to send is, then form the packet after that, |
|
|
1071 | * we presume that we will in fact form a packet, and update |
|
|
1072 | * the bits by what we do actually send. If we send nothing, |
|
|
1073 | * we just back out sl.length () to the old value, and no harm |
|
|
1074 | * is done. |
|
|
1075 | * I think this is simpler than doing a bunch of checks to see |
|
|
1076 | * what if anything we need to send, setting the bits, then |
|
|
1077 | * doing those checks again to add the real data. |
|
|
1078 | */ |
|
|
1079 | oldlen = sl.length (); |
|
|
1080 | |
|
|
1081 | sl << uint16 (mask); |
|
|
1082 | |
|
|
1083 | unsigned char dummy; |
|
|
1084 | unsigned char *last_ext = &dummy; |
|
|
1085 | |
|
|
1086 | /* Darkness changed */ |
|
|
1087 | if (lastcell.count != d && socket.darkness) |
|
|
1088 | { |
|
|
1089 | mask |= 0x8; |
|
|
1090 | |
|
|
1091 | if (socket.extmap) |
|
|
1092 | { |
|
|
1093 | *last_ext |= 0x80; |
|
|
1094 | last_ext = &sl[sl.length ()]; |
|
|
1095 | sl << uint8 (d); |
|
|
1096 | } |
|
|
1097 | else |
|
|
1098 | sl << uint8 (255 - 64 * d); |
|
|
1099 | } |
|
|
1100 | |
|
|
1101 | lastcell.count = d; |
|
|
1102 | |
|
|
1103 | mapspace &ms = m->at (nx, ny); |
|
|
1104 | ms.update (); |
|
|
1105 | |
|
|
1106 | if (expect_true (socket.extmap)) |
|
|
1107 | { |
|
|
1108 | uint8 stat_hp = 0; |
|
|
1109 | uint8 stat_width = 0; |
|
|
1110 | uint8 flags = 0; |
|
|
1111 | tag_t player = 0; |
|
|
1112 | |
|
|
1113 | // send hp information, if applicable |
|
|
1114 | if (object *op = ms.faces_obj [0]) |
|
|
1115 | if (op->is_head () && !op->invisible) |
1126 | { |
1116 | { |
1127 | sl << uint16 (mask); |
1117 | if (op->stats.maxhp > op->stats.hp |
1128 | map_clearcell (&lastcell, -1); |
1118 | && op->stats.maxhp > 0 |
|
|
1119 | && (op->type == PLAYER |
|
|
1120 | || op->type == DOOR // does not work, have maxhp 0 |
|
|
1121 | || QUERY_FLAG (op, FLAG_MONSTER) |
|
|
1122 | || QUERY_FLAG (op, FLAG_ALIVE) |
|
|
1123 | || QUERY_FLAG (op, FLAG_GENERATOR))) |
|
|
1124 | { |
|
|
1125 | stat_hp = 255 - (op->stats.hp * 255 + 254) / op->stats.maxhp; |
|
|
1126 | stat_width = op->arch->max_x - op->arch->x; //TODO: should be upper-left edge |
|
|
1127 | } |
|
|
1128 | |
|
|
1129 | if (expect_false (op->has_dialogue ())) |
|
|
1130 | flags |= 1; |
|
|
1131 | |
|
|
1132 | if (expect_false (op->type == PLAYER)) |
|
|
1133 | player = op == ob ? pl->ob->count |
|
|
1134 | : op == pl->ob ? ob->count |
|
|
1135 | : op->count; |
1129 | } |
1136 | } |
1130 | |
1137 | |
1131 | continue; |
1138 | if (expect_false (lastcell.stat_hp != stat_hp)) |
1132 | } |
|
|
1133 | |
|
|
1134 | m->touch (); |
|
|
1135 | |
|
|
1136 | int d = pl->blocked_los[ax][ay]; |
|
|
1137 | |
|
|
1138 | if (d > 3) |
|
|
1139 | { |
|
|
1140 | |
|
|
1141 | int need_send = 0, count; |
|
|
1142 | |
|
|
1143 | /* This block deals with spaces that are not visible for whatever |
|
|
1144 | * reason. Still may need to send the head for this space. |
|
|
1145 | */ |
|
|
1146 | |
|
|
1147 | oldlen = sl.length (); |
|
|
1148 | |
|
|
1149 | sl << uint16 (mask); |
|
|
1150 | |
|
|
1151 | if (lastcell.count != -1) |
|
|
1152 | need_send = 1; |
|
|
1153 | |
|
|
1154 | count = -1; |
|
|
1155 | |
|
|
1156 | /* properly clear a previously sent big face */ |
|
|
1157 | if (lastcell.faces[0] || lastcell.faces[1] || lastcell.faces[2] |
|
|
1158 | || lastcell.stat_hp || lastcell.flags || lastcell.player) |
|
|
1159 | need_send = 1; |
|
|
1160 | |
|
|
1161 | map_clearcell (&lastcell, count); |
|
|
1162 | |
|
|
1163 | if ((mask & 0xf) || need_send) |
|
|
1164 | sl[oldlen + 1] = mask & 0xff; |
|
|
1165 | else |
|
|
1166 | sl.reset (oldlen); |
|
|
1167 | } |
|
|
1168 | else |
|
|
1169 | { |
|
|
1170 | /* In this block, the space is visible. |
|
|
1171 | */ |
|
|
1172 | |
|
|
1173 | /* Rather than try to figure out what everything that we might |
|
|
1174 | * need to send is, then form the packet after that, |
|
|
1175 | * we presume that we will in fact form a packet, and update |
|
|
1176 | * the bits by what we do actually send. If we send nothing, |
|
|
1177 | * we just back out sl.length () to the old value, and no harm |
|
|
1178 | * is done. |
|
|
1179 | * I think this is simpler than doing a bunch of checks to see |
|
|
1180 | * what if anything we need to send, setting the bits, then |
|
|
1181 | * doing those checks again to add the real data. |
|
|
1182 | */ |
|
|
1183 | oldlen = sl.length (); |
|
|
1184 | eoldlen = esl.length (); |
|
|
1185 | |
|
|
1186 | sl << uint16 (mask); |
|
|
1187 | |
|
|
1188 | unsigned char dummy; |
|
|
1189 | unsigned char *last_ext = &dummy; |
|
|
1190 | |
|
|
1191 | /* Darkness changed */ |
|
|
1192 | if (lastcell.count != d && socket.darkness) |
|
|
1193 | { |
1139 | { |
|
|
1140 | lastcell.stat_hp = stat_hp; |
|
|
1141 | |
1194 | mask |= 0x8; |
1142 | mask |= 0x8; |
|
|
1143 | *last_ext |= 0x80; |
|
|
1144 | last_ext = &sl[sl.length ()]; |
1195 | |
1145 | |
1196 | if (socket.extmap) |
1146 | sl << uint8 (5) << uint8 (stat_hp); |
|
|
1147 | |
|
|
1148 | if (stat_width > 1) |
1197 | { |
1149 | { |
1198 | *last_ext |= 0x80; |
1150 | *last_ext |= 0x80; |
1199 | last_ext = &sl[sl.length ()]; |
1151 | last_ext = &sl[sl.length ()]; |
1200 | sl << uint8 (d); |
|
|
1201 | } |
|
|
1202 | else |
|
|
1203 | sl << uint8 (255 - 64 * d); |
|
|
1204 | } |
|
|
1205 | |
1152 | |
1206 | lastcell.count = d; |
|
|
1207 | |
|
|
1208 | mapspace &ms = m->at (nx, ny); |
|
|
1209 | ms.update (); |
|
|
1210 | |
|
|
1211 | if (socket.extmap) |
|
|
1212 | { |
|
|
1213 | uint8 stat_hp = 0; |
|
|
1214 | uint8 stat_width = 0; |
|
|
1215 | uint8 flags = 0; |
|
|
1216 | tag_t player = 0; |
|
|
1217 | |
|
|
1218 | // send hp information, if applicable |
|
|
1219 | if (object *op = ms.faces_obj [0]) |
|
|
1220 | { |
|
|
1221 | if (op->head || op->invisible) |
|
|
1222 | ; // do not show |
|
|
1223 | else if (op->type == PLAYER |
|
|
1224 | || QUERY_FLAG (op, FLAG_MONSTER) || QUERY_FLAG (op, FLAG_ALIVE) || QUERY_FLAG (op, FLAG_GENERATOR)) |
|
|
1225 | { |
|
|
1226 | if (op->stats.maxhp > 0 && (unsigned) op->stats.maxhp > (unsigned) op->stats.hp) |
|
|
1227 | { |
|
|
1228 | stat_hp = 255 - (op->stats.hp * 255 + 254) / op->stats.maxhp; |
|
|
1229 | stat_width = op->arch->max_x - op->arch->x; //TODO: should be upper-left edge |
|
|
1230 | } |
|
|
1231 | } |
|
|
1232 | |
|
|
1233 | if (op->msg && op->msg[0] == '@') |
|
|
1234 | flags |= 1; |
|
|
1235 | |
|
|
1236 | if (op->type == PLAYER && op != ob) |
|
|
1237 | player = op->count; |
|
|
1238 | } |
|
|
1239 | |
|
|
1240 | if (lastcell.stat_hp != stat_hp) |
|
|
1241 | { |
|
|
1242 | lastcell.stat_hp = stat_hp; |
|
|
1243 | |
|
|
1244 | mask |= 0x8; |
|
|
1245 | *last_ext |= 0x80; |
|
|
1246 | last_ext = &sl[sl.length ()]; |
|
|
1247 | |
|
|
1248 | sl << uint8 (5) << uint8 (stat_hp); |
|
|
1249 | |
|
|
1250 | if (stat_width > 1) |
|
|
1251 | { |
|
|
1252 | *last_ext |= 0x80; |
|
|
1253 | last_ext = &sl[sl.length ()]; |
|
|
1254 | |
|
|
1255 | sl << uint8 (6) << uint8 (stat_width); |
1153 | sl << uint8 (6) << uint8 (stat_width); |
1256 | } |
|
|
1257 | } |
1154 | } |
1258 | |
|
|
1259 | if (lastcell.player != player) |
|
|
1260 | { |
|
|
1261 | lastcell.player = player; |
|
|
1262 | |
|
|
1263 | mask |= 0x8; |
|
|
1264 | *last_ext |= 0x80; |
|
|
1265 | last_ext = &sl[sl.length ()]; |
|
|
1266 | |
|
|
1267 | sl << uint8 (0x47) << uint8 (4) << (uint32)player; |
|
|
1268 | } |
|
|
1269 | |
|
|
1270 | if (lastcell.flags != flags) |
|
|
1271 | { |
|
|
1272 | lastcell.flags = flags; |
|
|
1273 | |
|
|
1274 | mask |= 0x8; |
|
|
1275 | *last_ext |= 0x80; |
|
|
1276 | last_ext = &sl[sl.length ()]; |
|
|
1277 | |
|
|
1278 | sl << uint8 (8) << uint8 (flags); |
|
|
1279 | } |
|
|
1280 | } |
1155 | } |
1281 | |
1156 | |
1282 | /* Floor face */ |
1157 | if (expect_false (lastcell.player != player)) |
1283 | if (update_space (sl, socket, ms, lastcell, 2)) |
1158 | { |
|
|
1159 | lastcell.player = player; |
|
|
1160 | |
1284 | mask |= 0x4; |
1161 | mask |= 0x8; |
|
|
1162 | *last_ext |= 0x80; |
|
|
1163 | last_ext = &sl[sl.length ()]; |
1285 | |
1164 | |
1286 | /* Middle face */ |
1165 | sl << uint8 (0x47) << uint8 (4) << (uint32)player; |
1287 | if (update_space (sl, socket, ms, lastcell, 1)) |
1166 | } |
|
|
1167 | |
|
|
1168 | if (expect_false (lastcell.flags != flags)) |
|
|
1169 | { |
|
|
1170 | lastcell.flags = flags; |
|
|
1171 | |
1288 | mask |= 0x2; |
1172 | mask |= 0x8; |
|
|
1173 | *last_ext |= 0x80; |
|
|
1174 | last_ext = &sl[sl.length ()]; |
1289 | |
1175 | |
1290 | if (ms.player () == ob |
1176 | sl << uint8 (8) << uint8 (flags); |
1291 | && (ob->invisible & (ob->invisible < 50 ? 1 : 7))) |
|
|
1292 | { |
1177 | } |
|
|
1178 | } |
|
|
1179 | |
|
|
1180 | /* Floor face */ |
|
|
1181 | if (update_space (sl, socket, ms, lastcell, 2)) |
|
|
1182 | mask |= 0x4; |
|
|
1183 | |
|
|
1184 | /* Middle face */ |
|
|
1185 | if (update_space (sl, socket, ms, lastcell, 1)) |
|
|
1186 | mask |= 0x2; |
|
|
1187 | |
|
|
1188 | if (expect_false (ob->invisible) |
|
|
1189 | && ob->invisible & (ob->invisible < 50 ? 1 : 7) |
|
|
1190 | && ms.player () == ob) |
|
|
1191 | { |
1293 | // force player to be visible to himself if invisible |
1192 | // force player to be visible to himself if invisible |
1294 | if (lastcell.faces[0] != ob->face) |
1193 | if (lastcell.faces[0] != ob->face) |
1295 | { |
1194 | { |
1296 | lastcell.faces[0] = ob->face; |
1195 | lastcell.faces[0] = ob->face; |
1297 | |
1196 | |
1298 | mask |= 0x1; |
|
|
1299 | sl << uint16 (ob->face); |
|
|
1300 | |
|
|
1301 | socket.send_faces (ob); |
|
|
1302 | } |
|
|
1303 | } |
|
|
1304 | /* Top face */ |
|
|
1305 | else if (update_space (sl, socket, ms, lastcell, 0)) |
|
|
1306 | mask |= 0x1; |
1197 | mask |= 0x1; |
|
|
1198 | sl << uint16 (ob->face); |
1307 | |
1199 | |
|
|
1200 | socket.send_faces (ob); |
|
|
1201 | } |
|
|
1202 | } |
|
|
1203 | /* Top face */ |
|
|
1204 | else if (update_space (sl, socket, ms, lastcell, 0)) |
|
|
1205 | mask |= 0x1; |
|
|
1206 | |
1308 | /* Check to see if we are in fact sending anything for this |
1207 | /* Check to see if we are in fact sending anything for this |
1309 | * space by checking the mask. If so, update the mask. |
1208 | * space by checking the mask. If so, update the mask. |
1310 | * if not, reset the len to that from before adding the mask |
1209 | * if not, reset the len to that from before adding the mask |
1311 | * value, so we don't send those bits. |
1210 | * value, so we don't send those bits. |
1312 | */ |
1211 | */ |
1313 | if (mask & 0xf) |
1212 | if (mask & 0xf) |
1314 | sl[oldlen + 1] = mask & 0xff; |
1213 | sl[oldlen + 1] = mask & 0xff; |
1315 | else |
1214 | else |
1316 | sl.reset (oldlen); |
1215 | sl.reset (oldlen); |
1317 | |
|
|
1318 | if (socket.ext_mapinfos) |
|
|
1319 | esl << uint16 (emask); |
|
|
1320 | |
|
|
1321 | if (socket.EMI_smooth) |
|
|
1322 | { |
|
|
1323 | for (int layer = 2+1; layer--; ) |
|
|
1324 | { |
|
|
1325 | object *ob = ms.faces_obj [layer]; |
|
|
1326 | |
|
|
1327 | // If there is no object for this space, or if the face for the object |
|
|
1328 | // is the blank face, set the smoothlevel to zero. |
|
|
1329 | int smoothlevel = ob && ob->face != blank_face ? ob->smoothlevel : 0; |
|
|
1330 | |
|
|
1331 | // We've gotten what face we want to use for the object. Now see if |
|
|
1332 | // if it has changed since we last sent it to the client. |
|
|
1333 | if (lastcell.smooth[layer] != smoothlevel) |
|
|
1334 | { |
|
|
1335 | lastcell.smooth[layer] = smoothlevel; |
|
|
1336 | esl << uint8 (smoothlevel); |
|
|
1337 | emask |= 1 << layer; |
|
|
1338 | } |
|
|
1339 | } |
|
|
1340 | |
|
|
1341 | if (emask & 0xf) |
|
|
1342 | esl[eoldlen + 1] = emask & 0xff; |
|
|
1343 | else |
|
|
1344 | esl.reset (eoldlen); |
|
|
1345 | } |
|
|
1346 | } /* else this is a viewable space */ |
1216 | } /* else this is a viewable space */ |
1347 | } /* for x loop */ |
1217 | ordered_mapwalk_end |
1348 | } /* for y loop */ |
|
|
1349 | |
1218 | |
1350 | socket.flush_fx (); |
1219 | socket.flush_fx (); |
1351 | |
|
|
1352 | /* Verify that we in fact do need to send this */ |
|
|
1353 | if (socket.ext_mapinfos) |
|
|
1354 | { |
|
|
1355 | if (!(sl.length () > startlen || socket.sent_scroll)) |
|
|
1356 | { |
|
|
1357 | /* No map data will follow, so don't say the client |
|
|
1358 | * it doesn't need draw! |
|
|
1359 | */ |
|
|
1360 | ewhatflag &= ~EMI_NOREDRAW; |
|
|
1361 | esl[ewhatstart + 1] = ewhatflag & 0xff; |
|
|
1362 | } |
|
|
1363 | |
|
|
1364 | if (esl.length () > estartlen) |
|
|
1365 | socket.send_packet (esl); |
|
|
1366 | } |
|
|
1367 | |
1220 | |
1368 | if (sl.length () > startlen || socket.sent_scroll) |
1221 | if (sl.length () > startlen || socket.sent_scroll) |
1369 | { |
1222 | { |
1370 | socket.send_packet (sl); |
1223 | socket.send_packet (sl); |
1371 | socket.sent_scroll = 0; |
1224 | socket.sent_scroll = 0; |
… | |
… | |
1392 | { |
1245 | { |
1393 | packet sl; |
1246 | packet sl; |
1394 | sl << "replyinfo skill_info\n"; |
1247 | sl << "replyinfo skill_info\n"; |
1395 | |
1248 | |
1396 | for (int i = 1; i < NUM_SKILLS; i++) |
1249 | for (int i = 1; i < NUM_SKILLS; i++) |
1397 | sl.printf ("%d:%s\n", i + CS_STAT_SKILLINFO, &skill_names[i]); |
1250 | sl.printf ("%d:%s\n", i + CS_STAT_SKILLINFO, &skill_names [i]); |
1398 | |
1251 | |
1399 | if (sl.length () >= MAXSOCKBUF) |
1252 | if (sl.length () > MAXSOCKBUF) |
1400 | { |
1253 | { |
1401 | LOG (llevError, "Buffer overflow in send_skill_info!\n"); |
1254 | LOG (llevError, "Buffer overflow in send_skill_info!\n"); |
1402 | fatal (0); |
1255 | fatal (0); |
1403 | } |
1256 | } |
1404 | |
1257 | |
… | |
… | |
1417 | sl << "replyinfo spell_paths\n"; |
1270 | sl << "replyinfo spell_paths\n"; |
1418 | |
1271 | |
1419 | for (int i = 0; i < NRSPELLPATHS; i++) |
1272 | for (int i = 0; i < NRSPELLPATHS; i++) |
1420 | sl.printf ("%d:%s\n", 1 << i, spellpathnames[i]); |
1273 | sl.printf ("%d:%s\n", 1 << i, spellpathnames[i]); |
1421 | |
1274 | |
1422 | if (sl.length () >= MAXSOCKBUF) |
1275 | if (sl.length () > MAXSOCKBUF) |
1423 | { |
1276 | { |
1424 | LOG (llevError, "Buffer overflow in send_spell_paths!\n"); |
1277 | LOG (llevError, "Buffer overflow in send_spell_paths!\n"); |
1425 | fatal (0); |
1278 | fatal (0); |
1426 | } |
1279 | } |
1427 | |
1280 | |
… | |
… | |
1446 | if (spell->type == SPELL) |
1299 | if (spell->type == SPELL) |
1447 | { |
1300 | { |
1448 | int flags = 0; |
1301 | int flags = 0; |
1449 | |
1302 | |
1450 | /* check if we need to update it */ |
1303 | /* check if we need to update it */ |
1451 | if (spell->last_sp != SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA)) |
1304 | if (spell->cached_sp != SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA)) |
1452 | { |
1305 | { |
1453 | spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); |
1306 | spell->cached_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); |
1454 | flags |= UPD_SP_MANA; |
1307 | flags |= UPD_SP_MANA; |
1455 | } |
1308 | } |
1456 | |
1309 | |
1457 | if (spell->last_grace != SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE)) |
1310 | if (spell->cached_grace != SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE)) |
1458 | { |
1311 | { |
1459 | spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); |
1312 | spell->cached_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); |
1460 | flags |= UPD_SP_GRACE; |
1313 | flags |= UPD_SP_GRACE; |
1461 | } |
1314 | } |
1462 | |
1315 | |
1463 | if (spell->last_eat != spell->stats.dam + SP_level_dam_adjust (pl->ob, spell)) |
1316 | if (spell->cached_eat != spell->stats.dam + SP_level_dam_adjust (pl->ob, spell)) |
1464 | { |
1317 | { |
1465 | spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); |
1318 | spell->cached_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); |
1466 | flags |= UPD_SP_DAMAGE; |
1319 | flags |= UPD_SP_DAMAGE; |
1467 | } |
1320 | } |
1468 | |
1321 | |
1469 | if (flags) |
1322 | if (flags) |
1470 | { |
1323 | { |
… | |
… | |
1472 | |
1325 | |
1473 | sl << "updspell " |
1326 | sl << "updspell " |
1474 | << uint8 (flags) |
1327 | << uint8 (flags) |
1475 | << uint32 (spell->count); |
1328 | << uint32 (spell->count); |
1476 | |
1329 | |
1477 | if (flags & UPD_SP_MANA ) sl << uint16 (spell->last_sp); |
1330 | if (flags & UPD_SP_MANA ) sl << uint16 (spell->cached_sp); |
1478 | if (flags & UPD_SP_GRACE ) sl << uint16 (spell->last_grace); |
1331 | if (flags & UPD_SP_GRACE ) sl << uint16 (spell->cached_grace); |
1479 | if (flags & UPD_SP_DAMAGE) sl << uint16 (spell->last_eat); |
1332 | if (flags & UPD_SP_DAMAGE) sl << uint16 (spell->cached_eat); |
1480 | |
1333 | |
1481 | pl->ns->send_packet (sl); |
1334 | pl->ns->send_packet (sl); |
1482 | } |
1335 | } |
1483 | } |
1336 | } |
1484 | } |
1337 | } |
… | |
… | |
1514 | LOG (llevError, "item number %d is a spell with no name.\n", spell->count); |
1367 | LOG (llevError, "item number %d is a spell with no name.\n", spell->count); |
1515 | return; |
1368 | return; |
1516 | } |
1369 | } |
1517 | |
1370 | |
1518 | /* store costs and damage in the object struct, to compare to later */ |
1371 | /* store costs and damage in the object struct, to compare to later */ |
1519 | spell->last_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); |
1372 | spell->cached_sp = SP_level_spellpoint_cost (pl->ob, spell, SPELL_MANA); |
1520 | spell->last_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); |
1373 | spell->cached_grace = SP_level_spellpoint_cost (pl->ob, spell, SPELL_GRACE); |
1521 | spell->last_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); |
1374 | spell->cached_eat = spell->stats.dam + SP_level_dam_adjust (pl->ob, spell); |
1522 | |
1375 | |
1523 | /* figure out which skill it uses, if it uses one */ |
1376 | /* figure out which skill it uses, if it uses one */ |
1524 | if (spell->skill) |
1377 | if (spell->skill) |
1525 | { |
1378 | if (object *tmp = pl->find_skill (spell->skill)) |
1526 | for (i = 1; i < NUM_SKILLS; i++) |
|
|
1527 | if (!strcmp (spell->skill, skill_names[i])) |
|
|
1528 | { |
|
|
1529 | skill = i + CS_STAT_SKILLINFO; |
1379 | skill = tmp->subtype + CS_STAT_SKILLINFO; |
1530 | break; |
|
|
1531 | } |
|
|
1532 | } |
|
|
1533 | |
1380 | |
1534 | // spells better have a face |
1381 | // spells better have a face |
1535 | if (!spell->face) |
1382 | if (!spell->face) |
1536 | { |
1383 | { |
1537 | LOG (llevError, "%s: spell has no face, but face is mandatory.\n", &spell->name); |
1384 | LOG (llevError, "%s: spell has no face, but face is mandatory.\n", &spell->name); |
1538 | spell->face = face_find ("burnout.x11", blank_face); |
1385 | spell->face = face_find ("burnout.x11", blank_face); |
1539 | } |
1386 | } |
|
|
1387 | |
|
|
1388 | pl->ns->send_face (spell->face); |
1540 | |
1389 | |
1541 | /* send the current values */ |
1390 | /* send the current values */ |
1542 | sl << uint32 (spell->count) |
1391 | sl << uint32 (spell->count) |
1543 | << uint16 (spell->level) |
1392 | << uint16 (spell->level) |
1544 | << uint16 (spell->casting_time) |
1393 | << uint16 (spell->casting_time) |
1545 | << uint16 (spell->last_sp) |
1394 | << uint16 (spell->cached_sp) |
1546 | << uint16 (spell->last_grace) |
1395 | << uint16 (spell->cached_grace) |
1547 | << uint16 (spell->last_eat) |
1396 | << uint16 (spell->cached_eat) |
1548 | << uint8 (skill) |
1397 | << uint8 (skill) |
1549 | << uint32 (spell->path_attuned) |
1398 | << uint32 (spell->path_attuned) |
1550 | << uint32 (spell->face) |
1399 | << uint32 (spell->face) |
1551 | << data8 (spell->name) |
1400 | << data8 (spell->name) |
1552 | << data16 (spell->msg); |
1401 | << data16 (spell->msg); |
… | |
… | |
1580 | * bytes and 3 strings (because that is the spec) so we need to |
1429 | * bytes and 3 strings (because that is the spec) so we need to |
1581 | * check that the length of those 3 strings, plus the 23 bytes, |
1430 | * check that the length of those 3 strings, plus the 23 bytes, |
1582 | * won't take us over the length limit for the socket, if it does, |
1431 | * won't take us over the length limit for the socket, if it does, |
1583 | * we need to send what we already have, and restart packet formation |
1432 | * we need to send what we already have, and restart packet formation |
1584 | */ |
1433 | */ |
|
|
1434 | if (spell->type != SPELL) |
|
|
1435 | continue; |
|
|
1436 | |
1585 | /* Seeing crashes by overflowed buffers. Quick arithemetic seems |
1437 | /* Seeing crashes by overflowed buffers. Quick arithemetic seems |
1586 | * to show add_spell is 26 bytes + 2 strings. However, the overun |
1438 | * to show add_spell is 26 bytes + 2 strings. However, the overun |
1587 | * is hundreds of bytes off, so correcting 22 vs 26 doesn't seem |
1439 | * is hundreds of bytes off, so correcting 22 vs 26 doesn't seem |
1588 | * like it will fix this |
1440 | * like it will fix this |
1589 | */ |
1441 | */ |
1590 | if (spell->type != SPELL) |
|
|
1591 | continue; |
|
|
1592 | |
|
|
1593 | if (sl.length () >= (MAXSOCKBUF - (26 + strlen (spell->name) + (spell->msg ? strlen (spell->msg) : 0)))) |
1442 | if (sl.length () > (MAXSOCKBUF - (26 + strlen (spell->name) + (spell->msg ? strlen (spell->msg) : 0)))) |
1594 | { |
1443 | { |
|
|
1444 | pl->ns->flush_fx (); |
1595 | pl->ns->send_packet (sl); |
1445 | pl->ns->send_packet (sl); |
1596 | |
1446 | |
1597 | sl.reset (); |
1447 | sl.reset (); |
1598 | sl << "addspell "; |
1448 | sl << "addspell "; |
1599 | } |
1449 | } |
… | |
… | |
1607 | return; |
1457 | return; |
1608 | } |
1458 | } |
1609 | else |
1459 | else |
1610 | append_spell (pl, sl, spell); |
1460 | append_spell (pl, sl, spell); |
1611 | |
1461 | |
1612 | if (sl.length () >= MAXSOCKBUF) |
1462 | if (sl.length () > MAXSOCKBUF) |
1613 | { |
1463 | { |
1614 | LOG (llevError, "Buffer overflow in esrv_add_spells!\n"); |
1464 | LOG (llevError, "Buffer overflow in esrv_add_spells!\n"); |
1615 | fatal (0); |
1465 | fatal (0); |
1616 | } |
1466 | } |
1617 | |
1467 | |
1618 | /* finally, we can send the packet */ |
1468 | /* finally, we can send the packet */ |
|
|
1469 | pl->ns->flush_fx (); |
1619 | pl->ns->send_packet (sl); |
1470 | pl->ns->send_packet (sl); |
1620 | } |
1471 | } |
1621 | |
1472 | |