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