1 |
root |
1.8 |
|
2 |
elmex |
1.1 |
/* |
3 |
|
|
CrossFire, A Multiplayer game for X-windows |
4 |
|
|
|
5 |
|
|
Copyright (C) 2002 Mark Wedel & Crossfire Development Team |
6 |
|
|
Copyright (C) 1992 Frank Tore Johansen |
7 |
|
|
|
8 |
|
|
This program is free software; you can redistribute it and/or modify |
9 |
|
|
it under the terms of the GNU General Public License as published by |
10 |
|
|
the Free Software Foundation; either version 2 of the License, or |
11 |
|
|
(at your option) any later version. |
12 |
|
|
|
13 |
|
|
This program is distributed in the hope that it will be useful, |
14 |
|
|
but WITHOUT ANY WARRANTY; without even the implied warranty of |
15 |
|
|
MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the |
16 |
|
|
GNU General Public License for more details. |
17 |
|
|
|
18 |
|
|
You should have received a copy of the GNU General Public License |
19 |
|
|
along with this program; if not, write to the Free Software |
20 |
|
|
Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA. |
21 |
|
|
|
22 |
root |
1.6 |
The authors can be reached via e-mail at <crossfire@schmorp.de> |
23 |
elmex |
1.1 |
*/ |
24 |
|
|
|
25 |
|
|
/** |
26 |
|
|
* \file |
27 |
|
|
* Basic client output functions. |
28 |
|
|
* |
29 |
|
|
* \date 2003-12-02 |
30 |
|
|
* |
31 |
|
|
* This file implements some of the simpler output functions to the |
32 |
|
|
* client. Basically, things like sending text strings along |
33 |
|
|
*/ |
34 |
|
|
|
35 |
|
|
#include <global.h> |
36 |
|
|
#include <sproto.h> |
37 |
|
|
#include <stdarg.h> |
38 |
|
|
#include <spells.h> |
39 |
|
|
#include <skills.h> |
40 |
|
|
|
41 |
|
|
/** |
42 |
|
|
* Draws a normal message on the client. It is pretty |
43 |
|
|
* much the same thing as the draw_info above, but takes a color |
44 |
|
|
* parameter. the esrv_drawinfo functions should probably be |
45 |
|
|
* replaced with this, just using black as the color. |
46 |
|
|
*/ |
47 |
root |
1.5 |
static void |
48 |
root |
1.16 |
esrv_print_msg (client_socket * ns, int color, const char *str) |
49 |
elmex |
1.1 |
{ |
50 |
root |
1.15 |
packet sl; |
51 |
root |
1.18 |
sl.printf ("drawinfo %d %s", color, str); |
52 |
root |
1.14 |
ns->send_packet (sl); |
53 |
elmex |
1.1 |
} |
54 |
|
|
|
55 |
|
|
/** |
56 |
|
|
* Draws an extended message on the client. |
57 |
|
|
* ns the socket to send message to |
58 |
|
|
* color color informations (used mainly if client does not support message type) |
59 |
|
|
* type, |
60 |
|
|
* subtype type and subtype of text message |
61 |
|
|
* intro Intro message to send with main message if client does not support the message type |
62 |
|
|
* message The main message |
63 |
|
|
*/ |
64 |
root |
1.5 |
static void |
65 |
root |
1.16 |
esrv_print_ext_msg (client_socket * ns, int color, uint8 type, uint8 subtype, const char *message) |
66 |
elmex |
1.1 |
{ |
67 |
root |
1.15 |
packet sl; |
68 |
elmex |
1.1 |
|
69 |
root |
1.14 |
sl.printf ("drawextinfo %d %hhu %hhu %s", color, type, subtype, message); |
70 |
|
|
ns->send_packet (sl); |
71 |
elmex |
1.1 |
} |
72 |
|
|
|
73 |
|
|
/** |
74 |
|
|
* Frontend for esrv_print_msg |
75 |
|
|
* \param colr message color |
76 |
|
|
* \param pl player to send to. Can be NULL |
77 |
|
|
* \param tmp message to send. Can be NULL |
78 |
|
|
* |
79 |
|
|
* If pl is NULL or without contr set, writes message to log. |
80 |
|
|
* |
81 |
|
|
* Else sends message to player via esrv_print_msg |
82 |
|
|
*/ |
83 |
|
|
|
84 |
root |
1.5 |
static void |
85 |
|
|
print_message (int colr, const object *pl, const char *tmp) |
86 |
|
|
{ |
87 |
elmex |
1.1 |
|
88 |
root |
1.11 |
if (!tmp) |
89 |
|
|
tmp = "[NULL]"; |
90 |
elmex |
1.1 |
|
91 |
|
|
if (!pl || (pl->type == PLAYER && pl->contr == NULL)) |
92 |
|
|
return; |
93 |
|
|
|
94 |
root |
1.5 |
if (pl->type == PLAYER) |
95 |
root |
1.17 |
esrv_print_msg (pl->contr->socket, colr, (char *) tmp); |
96 |
elmex |
1.1 |
} |
97 |
|
|
|
98 |
|
|
/** |
99 |
|
|
* Prints out the contents of specified buffer structures, |
100 |
|
|
* and clears the string. |
101 |
|
|
*/ |
102 |
|
|
|
103 |
root |
1.5 |
void |
104 |
|
|
flush_output_element (const object *pl, Output_Buf * outputs) |
105 |
elmex |
1.1 |
{ |
106 |
root |
1.5 |
char tbuf[MAX_BUF]; |
107 |
elmex |
1.1 |
|
108 |
root |
1.5 |
if (outputs->buf == NULL) |
109 |
|
|
return; |
110 |
|
|
if (outputs->count > 1) |
111 |
|
|
{ |
112 |
|
|
snprintf (tbuf, MAX_BUF, "%d times %s", outputs->count, &outputs->buf); |
113 |
|
|
print_message (NDI_BLACK, pl, tbuf); |
114 |
|
|
} |
115 |
|
|
else |
116 |
|
|
print_message (NDI_BLACK, pl, &outputs->buf); |
117 |
elmex |
1.1 |
|
118 |
root |
1.5 |
outputs->buf = NULL; |
119 |
|
|
outputs->first_update = 0; /* This way, it will be reused */ |
120 |
elmex |
1.1 |
} |
121 |
|
|
|
122 |
|
|
/** |
123 |
|
|
* Sends message to player through output buffers. |
124 |
|
|
* \param pl player to send message |
125 |
|
|
* \param buf message to send |
126 |
|
|
* |
127 |
|
|
* If player's output_count is 1, sends message directly. |
128 |
|
|
* |
129 |
|
|
* Else checks output buffers for specified message. |
130 |
|
|
* |
131 |
|
|
* If found, checks if message should be sent now. |
132 |
|
|
* |
133 |
|
|
* If message not already in buffers, flushes olders buffer, |
134 |
|
|
* and adds message to queue. |
135 |
|
|
*/ |
136 |
|
|
|
137 |
root |
1.5 |
static void |
138 |
|
|
check_output_buffers (const object *pl, const char *buf) |
139 |
elmex |
1.1 |
{ |
140 |
root |
1.5 |
int i, oldest = 0; |
141 |
elmex |
1.1 |
|
142 |
root |
1.5 |
if (pl->contr->outputs_count < 2) |
143 |
|
|
{ |
144 |
|
|
print_message (NDI_BLACK, pl, buf); |
145 |
|
|
return; |
146 |
|
|
} |
147 |
|
|
else |
148 |
|
|
{ |
149 |
|
|
for (i = 0; i < NUM_OUTPUT_BUFS; i++) |
150 |
|
|
{ |
151 |
|
|
if (pl->contr->outputs[i].buf && !strcmp (buf, pl->contr->outputs[i].buf)) |
152 |
|
|
break; |
153 |
|
|
else if (pl->contr->outputs[i].first_update < pl->contr->outputs[oldest].first_update) |
154 |
|
|
oldest = i; |
155 |
root |
1.2 |
} |
156 |
root |
1.5 |
/* We found a match */ |
157 |
|
|
if (i < NUM_OUTPUT_BUFS) |
158 |
|
|
{ |
159 |
|
|
pl->contr->outputs[i].count++; |
160 |
|
|
if (pl->contr->outputs[i].count >= pl->contr->outputs_count) |
161 |
|
|
{ |
162 |
|
|
flush_output_element (pl, &pl->contr->outputs[i]); |
163 |
root |
1.2 |
} |
164 |
|
|
} |
165 |
root |
1.5 |
/* No match - flush the oldest, and put the new one in */ |
166 |
|
|
else |
167 |
|
|
{ |
168 |
|
|
flush_output_element (pl, &pl->contr->outputs[oldest]); |
169 |
|
|
|
170 |
|
|
pl->contr->outputs[oldest].first_update = pticks; |
171 |
|
|
pl->contr->outputs[oldest].count = 1; |
172 |
|
|
pl->contr->outputs[oldest].buf = buf; |
173 |
root |
1.2 |
} |
174 |
elmex |
1.1 |
} |
175 |
|
|
} |
176 |
root |
1.5 |
|
177 |
elmex |
1.1 |
|
178 |
|
|
|
179 |
|
|
/** |
180 |
|
|
* Sends message to player(s). |
181 |
|
|
* |
182 |
|
|
* flags is various flags - mostly color, plus a few specials. |
183 |
|
|
* |
184 |
|
|
* pri is priority. It is a little odd - the lower the value, the more |
185 |
|
|
* important it is. Thus, 0 gets sent no matter what. Otherwise, the |
186 |
|
|
* value must be less than the listening level that the player has set. |
187 |
|
|
* Unfortunately, there is no clear guideline on what each level does what. |
188 |
|
|
* |
189 |
|
|
* pl can be passed as NULL - in fact, this will be done if NDI_ALL is set |
190 |
|
|
* in the flags. |
191 |
|
|
* |
192 |
|
|
* If message is black, and not NDI_UNIQUE, gets sent through output buffers. |
193 |
|
|
* |
194 |
|
|
*/ |
195 |
|
|
|
196 |
root |
1.5 |
void |
197 |
|
|
new_draw_info (int flags, int pri, const object *pl, const char *buf) |
198 |
elmex |
1.1 |
{ |
199 |
|
|
|
200 |
root |
1.5 |
if (flags & NDI_ALL) |
201 |
|
|
{ |
202 |
|
|
player *tmppl; |
203 |
elmex |
1.1 |
|
204 |
root |
1.5 |
for (tmppl = first_player; tmppl != NULL; tmppl = tmppl->next) |
205 |
|
|
new_draw_info ((flags & ~NDI_ALL), pri, tmppl->ob, buf); |
206 |
elmex |
1.1 |
|
207 |
root |
1.5 |
return; |
208 |
elmex |
1.1 |
} |
209 |
root |
1.11 |
|
210 |
root |
1.5 |
if (!pl || (pl->type == PLAYER && pl->contr == NULL)) |
211 |
|
|
{ |
212 |
|
|
/* Write to the socket? */ |
213 |
|
|
print_message (0, NULL, buf); |
214 |
|
|
return; |
215 |
elmex |
1.1 |
} |
216 |
root |
1.11 |
|
217 |
root |
1.5 |
if (pl->type != PLAYER) |
218 |
|
|
return; |
219 |
root |
1.11 |
|
220 |
root |
1.5 |
if (pri >= pl->contr->listening) |
221 |
|
|
return; |
222 |
|
|
|
223 |
|
|
if ((flags & NDI_COLOR_MASK) == NDI_BLACK && !(flags & NDI_UNIQUE)) |
224 |
root |
1.11 |
/* following prints stuff out, as appropriate */ |
225 |
|
|
check_output_buffers (pl, buf); |
226 |
root |
1.5 |
else |
227 |
root |
1.11 |
print_message (flags & NDI_COLOR_MASK, pl, buf); |
228 |
elmex |
1.1 |
} |
229 |
|
|
|
230 |
|
|
/** |
231 |
|
|
* Wrapper for new_draw_info printf-like. |
232 |
|
|
* |
233 |
|
|
* This is a pretty trivial function, but it allows us to use printf style |
234 |
|
|
* formatting, so instead of the calling function having to do it, we do |
235 |
|
|
* it here. It may also have advantages in the future for reduction of |
236 |
|
|
* client/server bandwidth (client could keep track of various strings |
237 |
|
|
*/ |
238 |
|
|
|
239 |
root |
1.5 |
void |
240 |
|
|
new_draw_info_format (int flags, int pri, const object *pl, const char *format, ...) |
241 |
elmex |
1.1 |
{ |
242 |
root |
1.5 |
char buf[HUGE_BUF]; |
243 |
|
|
|
244 |
|
|
va_list ap; |
245 |
|
|
|
246 |
|
|
va_start (ap, format); |
247 |
elmex |
1.1 |
|
248 |
root |
1.5 |
vsnprintf (buf, HUGE_BUF, format, ap); |
249 |
elmex |
1.1 |
|
250 |
root |
1.5 |
va_end (ap); |
251 |
elmex |
1.1 |
|
252 |
root |
1.5 |
new_draw_info (flags, pri, pl, buf); |
253 |
elmex |
1.1 |
} |
254 |
|
|
|
255 |
|
|
|
256 |
root |
1.5 |
void |
257 |
|
|
draw_ext_info (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *message, const char *oldmessage) |
258 |
|
|
{ |
259 |
|
|
|
260 |
|
|
if (!pl || (pl->type != PLAYER) || (pl->contr == NULL)) |
261 |
|
|
return; |
262 |
|
|
|
263 |
|
|
if (pri >= pl->contr->listening) |
264 |
|
|
return; |
265 |
root |
1.17 |
|
266 |
|
|
if (!CLIENT_SUPPORT_READABLES (pl->contr->socket, type)) |
267 |
root |
1.5 |
{ |
268 |
|
|
char *buf = (char *) malloc (strlen (oldmessage == NULL ? message : oldmessage) + 1); |
269 |
|
|
|
270 |
|
|
if (buf == NULL) |
271 |
|
|
LOG (llevError, "info::draw_ext_info -> Out of memory!"); |
272 |
|
|
else |
273 |
|
|
{ |
274 |
|
|
strcpy (buf, oldmessage == NULL ? message : oldmessage); |
275 |
|
|
strip_media_tag (buf); |
276 |
|
|
new_draw_info (flags, pri, pl, buf); |
277 |
|
|
free (buf); |
278 |
elmex |
1.1 |
} |
279 |
root |
1.5 |
} |
280 |
|
|
else |
281 |
root |
1.17 |
esrv_print_ext_msg (pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, message); |
282 |
elmex |
1.1 |
} |
283 |
|
|
|
284 |
root |
1.5 |
void |
285 |
|
|
draw_ext_info_format (int flags, int pri, const object *pl, uint8 type, uint8 subtype, const char *old_format, char *new_format, ...) |
286 |
|
|
{ |
287 |
|
|
|
288 |
|
|
char buf[HUGE_BUF]; |
289 |
|
|
|
290 |
|
|
if (!pl || (pl->type != PLAYER) || (pl->contr == NULL)) |
291 |
|
|
return; |
292 |
|
|
|
293 |
|
|
if (pri >= pl->contr->listening) |
294 |
|
|
return; |
295 |
root |
1.17 |
|
296 |
|
|
if (!CLIENT_SUPPORT_READABLES (pl->contr->socket, type)) |
297 |
root |
1.5 |
{ |
298 |
|
|
va_list ap; |
299 |
|
|
|
300 |
|
|
LOG (llevDebug, "Non supported extension text type for client.\n"); |
301 |
|
|
va_start (ap, new_format); |
302 |
|
|
vsnprintf (buf, HUGE_BUF, old_format, ap); |
303 |
|
|
va_end (ap); |
304 |
|
|
new_draw_info (flags, pri, pl, buf); |
305 |
|
|
return; |
306 |
|
|
} |
307 |
|
|
else |
308 |
|
|
{ |
309 |
|
|
va_list ap; |
310 |
|
|
|
311 |
|
|
va_start (ap, new_format); |
312 |
|
|
vsnprintf (buf, HUGE_BUF, new_format, ap); |
313 |
|
|
va_end (ap); |
314 |
|
|
strip_media_tag (buf); |
315 |
root |
1.17 |
esrv_print_ext_msg (pl->contr->socket, flags & NDI_COLOR_MASK, type, subtype, buf); |
316 |
elmex |
1.1 |
} |
317 |
|
|
} |
318 |
root |
1.5 |
|
319 |
elmex |
1.1 |
/** |
320 |
|
|
* Writes to everyone on the map *except* op. This is useful for emotions. |
321 |
|
|
*/ |
322 |
|
|
|
323 |
root |
1.5 |
void |
324 |
root |
1.8 |
new_info_map_except (int color, maptile * map, object *op, const char *str) |
325 |
root |
1.5 |
{ |
326 |
|
|
player *pl; |
327 |
elmex |
1.1 |
|
328 |
root |
1.5 |
for (pl = first_player; pl != NULL; pl = pl->next) |
329 |
|
|
if (pl->ob != NULL && pl->ob->map == map && pl->ob != op) |
330 |
|
|
{ |
331 |
|
|
new_draw_info (color, 0, pl->ob, str); |
332 |
|
|
} |
333 |
elmex |
1.1 |
} |
334 |
|
|
|
335 |
|
|
/** |
336 |
|
|
* Writes to everyone on the map except op1 and op2 |
337 |
|
|
*/ |
338 |
|
|
|
339 |
root |
1.5 |
void |
340 |
root |
1.8 |
new_info_map_except2 (int color, maptile * map, object *op1, object *op2, const char *str) |
341 |
root |
1.5 |
{ |
342 |
|
|
player *pl; |
343 |
|
|
|
344 |
|
|
for (pl = first_player; pl != NULL; pl = pl->next) |
345 |
|
|
if (pl->ob != NULL && pl->ob->map == map && pl->ob != op1 && pl->ob != op2) |
346 |
|
|
{ |
347 |
|
|
new_draw_info (color, 0, pl->ob, str); |
348 |
|
|
} |
349 |
elmex |
1.1 |
} |
350 |
|
|
|
351 |
|
|
/** |
352 |
|
|
* Writes to everyone on the specified map |
353 |
|
|
*/ |
354 |
|
|
|
355 |
root |
1.5 |
void |
356 |
root |
1.8 |
new_info_map (int color, maptile * map, const char *str) |
357 |
root |
1.5 |
{ |
358 |
|
|
player *pl; |
359 |
elmex |
1.1 |
|
360 |
root |
1.5 |
for (pl = first_player; pl != NULL; pl = pl->next) |
361 |
|
|
if (pl->ob != NULL && pl->ob->map == map) |
362 |
|
|
{ |
363 |
|
|
new_draw_info (color, 0, pl->ob, str); |
364 |
|
|
} |
365 |
elmex |
1.1 |
} |
366 |
|
|
|
367 |
|
|
|
368 |
|
|
/** |
369 |
|
|
* This does nothing now. However, in theory, we should probably send |
370 |
|
|
* something to the client and let the client figure out how it might want |
371 |
|
|
* to handle this |
372 |
|
|
*/ |
373 |
root |
1.5 |
void |
374 |
|
|
clear_win_info (object *op) |
375 |
elmex |
1.1 |
{ |
376 |
|
|
} |
377 |
|
|
|
378 |
|
|
/** |
379 |
|
|
* Get player's current range attack in obuf. |
380 |
|
|
*/ |
381 |
root |
1.5 |
void |
382 |
|
|
rangetostring (object *pl, char *obuf) |
383 |
elmex |
1.1 |
{ |
384 |
root |
1.5 |
switch (pl->contr->shoottype) |
385 |
|
|
{ |
386 |
root |
1.8 |
case range_none: |
387 |
|
|
strcpy (obuf, "Range: nothing"); |
388 |
|
|
break; |
389 |
root |
1.2 |
|
390 |
root |
1.8 |
case range_bow: |
391 |
|
|
{ |
392 |
|
|
object *op; |
393 |
root |
1.2 |
|
394 |
root |
1.8 |
for (op = pl->inv; op; op = op->below) |
395 |
|
|
if (op->type == BOW && QUERY_FLAG (op, FLAG_APPLIED)) |
396 |
root |
1.5 |
break; |
397 |
root |
1.10 |
|
398 |
root |
1.8 |
if (op == NULL) |
399 |
|
|
break; |
400 |
|
|
|
401 |
|
|
sprintf (obuf, "Range: %s (%s)", query_base_name (op, 0), op->race ? (const char *) op->race : "nothing"); |
402 |
|
|
} |
403 |
|
|
break; |
404 |
root |
1.5 |
|
405 |
root |
1.8 |
case range_magic: |
406 |
|
|
if (settings.casting_time == TRUE) |
407 |
|
|
{ |
408 |
|
|
if (pl->casting_time > -1) |
409 |
|
|
{ |
410 |
|
|
if (pl->casting_time == 0) |
411 |
root |
1.9 |
sprintf (obuf, "Range: Holding spell (%s)", &pl->spell->name); |
412 |
root |
1.8 |
else |
413 |
root |
1.9 |
sprintf (obuf, "Range: Casting spell (%s)", &pl->spell->name); |
414 |
root |
1.8 |
} |
415 |
|
|
else |
416 |
|
|
sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name); |
417 |
root |
1.5 |
} |
418 |
root |
1.8 |
else |
419 |
|
|
sprintf (obuf, "Range: spell (%s)", &pl->contr->ranges[range_magic]->name); |
420 |
|
|
break; |
421 |
|
|
|
422 |
|
|
case range_misc: |
423 |
|
|
sprintf (obuf, "Range: %s", pl->contr->ranges[range_misc] ? query_base_name (pl->contr->ranges[range_misc], 0) : "none"); |
424 |
|
|
break; |
425 |
|
|
|
426 |
|
|
/* range_scroll is only used for controlling golems. If the |
427 |
|
|
* the player does not have a golem, reset some things. |
428 |
|
|
*/ |
429 |
|
|
case range_golem: |
430 |
|
|
if (pl->contr->ranges[range_golem] != NULL) |
431 |
|
|
sprintf (obuf, "Range: golem (%s)", &pl->contr->ranges[range_golem]->name); |
432 |
|
|
else |
433 |
|
|
{ |
434 |
|
|
pl->contr->shoottype = range_none; |
435 |
|
|
strcpy (obuf, "Range: nothing"); |
436 |
|
|
} |
437 |
|
|
break; |
438 |
root |
1.2 |
|
439 |
root |
1.8 |
case range_skill: |
440 |
|
|
sprintf (obuf, "Skill: %s", pl->chosen_skill != NULL ? (const char *) pl->chosen_skill->name : "none"); |
441 |
|
|
break; |
442 |
|
|
|
443 |
|
|
case range_builder: |
444 |
|
|
sprintf (obuf, "Builder: %s", query_base_name (pl->contr->ranges[range_builder], 0)); |
445 |
|
|
break; |
446 |
elmex |
1.1 |
|
447 |
root |
1.8 |
default: |
448 |
|
|
strcpy (obuf, "Range: illegal"); |
449 |
elmex |
1.1 |
} |
450 |
|
|
} |
451 |
|
|
|
452 |
|
|
/** |
453 |
|
|
* Sets player title. |
454 |
|
|
*/ |
455 |
root |
1.5 |
void |
456 |
|
|
set_title (object *pl, char *buf) |
457 |
elmex |
1.1 |
{ |
458 |
root |
1.5 |
/* Eneq(@csd.uu.se): Let players define their own titles. */ |
459 |
|
|
if (pl->contr->own_title[0] == '\0') |
460 |
|
|
sprintf (buf, "Player: %s the %s", (const char *) pl->name, (const char *) pl->contr->title); |
461 |
|
|
else |
462 |
|
|
sprintf (buf, "Player: %s %s", (const char *) pl->name, (const char *) pl->contr->own_title); |
463 |
elmex |
1.1 |
} |
464 |
|
|
|
465 |
|
|
|
466 |
|
|
/** |
467 |
|
|
* Helper for magic map creation. |
468 |
|
|
* |
469 |
|
|
* Takes a player, the map_mark array and an x and y starting position. |
470 |
|
|
* pl is the player. |
471 |
|
|
* px, py are offsets from the player. |
472 |
|
|
* |
473 |
|
|
* This function examines all the adjacant spaces next to px, py. |
474 |
|
|
* It updates the map_mark arrow with the color and high bits set |
475 |
|
|
* for various code values. |
476 |
|
|
*/ |
477 |
root |
1.5 |
static void |
478 |
|
|
magic_mapping_mark_recursive (object *pl, char *map_mark, int px, int py) |
479 |
elmex |
1.1 |
{ |
480 |
root |
1.5 |
int x, y, dx, dy, mflags; |
481 |
|
|
sint16 nx, ny; |
482 |
root |
1.7 |
maptile *mp; |
483 |
root |
1.5 |
New_Face *f; |
484 |
|
|
|
485 |
|
|
for (dx = -1; dx <= 1; dx++) |
486 |
|
|
{ |
487 |
|
|
for (dy = -1; dy <= 1; dy++) |
488 |
|
|
{ |
489 |
|
|
x = px + dx; |
490 |
|
|
y = py + dy; |
491 |
|
|
|
492 |
|
|
if (FABS (x) >= MAGIC_MAP_HALF || FABS (y) >= MAGIC_MAP_HALF) |
493 |
|
|
continue; |
494 |
|
|
|
495 |
|
|
mp = pl->map; |
496 |
|
|
nx = pl->x + x; |
497 |
|
|
ny = pl->y + y; |
498 |
|
|
|
499 |
|
|
mflags = get_map_flags (pl->map, &mp, nx, ny, &nx, &ny); |
500 |
|
|
if (mflags & P_OUT_OF_MAP) |
501 |
|
|
continue; |
502 |
|
|
|
503 |
|
|
if (map_mark[MAGIC_MAP_HALF + x + MAGIC_MAP_SIZE * (MAGIC_MAP_HALF + y)] == 0) |
504 |
|
|
{ |
505 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 0); |
506 |
|
|
if (f == blank_face) |
507 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 1); |
508 |
|
|
if (f == blank_face) |
509 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 2); |
510 |
|
|
|
511 |
|
|
/* Should probably have P_NO_MAGIC here also, but then shops don't |
512 |
|
|
* work. |
513 |
|
|
*/ |
514 |
|
|
if (mflags & P_BLOCKSVIEW) |
515 |
|
|
map_mark[MAGIC_MAP_HALF + x + MAGIC_MAP_SIZE * (MAGIC_MAP_HALF + y)] = FACE_WALL | (f ? f->magicmap : 0); |
516 |
|
|
else |
517 |
|
|
{ |
518 |
|
|
map_mark[MAGIC_MAP_HALF + x + MAGIC_MAP_SIZE * (MAGIC_MAP_HALF + y)] = FACE_FLOOR | (f ? f->magicmap : 0); |
519 |
|
|
magic_mapping_mark_recursive (pl, map_mark, x, y); |
520 |
root |
1.2 |
} |
521 |
|
|
} |
522 |
|
|
} |
523 |
elmex |
1.1 |
} |
524 |
|
|
} |
525 |
|
|
|
526 |
|
|
|
527 |
|
|
/** |
528 |
|
|
* Creates magic map for player. |
529 |
|
|
* |
530 |
|
|
* Note: For improved magic mapping display, the space that blocks |
531 |
|
|
* the view is now marked with value 2. Any dependencies of map_mark |
532 |
|
|
* being nonzero have been changed to check for 1. Also, since |
533 |
|
|
* map_mark is a char value, putting 2 in should cause no problems. |
534 |
|
|
* |
535 |
|
|
* This function examines the map the player is on, and determines what |
536 |
|
|
* is visible. 2 is set for walls or objects that blocks view. 1 |
537 |
|
|
* is for open spaces. map_mark should already have been initialized |
538 |
|
|
* to zero before this is called. |
539 |
|
|
* strength is an initial strength*2 rectangular area that we automatically |
540 |
|
|
* see in/penetrate through. |
541 |
|
|
*/ |
542 |
|
|
|
543 |
root |
1.5 |
void |
544 |
|
|
magic_mapping_mark (object *pl, char *map_mark, int strength) |
545 |
elmex |
1.1 |
{ |
546 |
root |
1.5 |
int x, y, mflags; |
547 |
|
|
sint16 nx, ny; |
548 |
root |
1.7 |
maptile *mp; |
549 |
root |
1.5 |
New_Face *f; |
550 |
|
|
|
551 |
|
|
for (x = -strength; x < strength; x++) |
552 |
|
|
{ |
553 |
|
|
for (y = -strength; y < strength; y++) |
554 |
|
|
{ |
555 |
|
|
mp = pl->map; |
556 |
|
|
nx = pl->x + x; |
557 |
|
|
ny = pl->y + y; |
558 |
|
|
mflags = get_map_flags (pl->map, &mp, nx, ny, &nx, &ny); |
559 |
|
|
if (mflags & P_OUT_OF_MAP) |
560 |
|
|
continue; |
561 |
|
|
else |
562 |
|
|
{ |
563 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 0); |
564 |
|
|
if (f == blank_face) |
565 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 1); |
566 |
|
|
if (f == blank_face) |
567 |
|
|
f = GET_MAP_FACE (mp, nx, ny, 2); |
568 |
root |
1.2 |
} |
569 |
|
|
|
570 |
root |
1.5 |
if (mflags & P_BLOCKSVIEW) |
571 |
|
|
map_mark[MAGIC_MAP_HALF + x + MAGIC_MAP_SIZE * (MAGIC_MAP_HALF + y)] = FACE_WALL | (f ? f->magicmap : 0); |
572 |
|
|
else |
573 |
|
|
{ |
574 |
|
|
map_mark[MAGIC_MAP_HALF + x + MAGIC_MAP_SIZE * (MAGIC_MAP_HALF + y)] = FACE_FLOOR | (f ? f->magicmap : 0); |
575 |
|
|
magic_mapping_mark_recursive (pl, map_mark, x, y); |
576 |
root |
1.2 |
} |
577 |
|
|
} |
578 |
elmex |
1.1 |
} |
579 |
|
|
} |
580 |
|
|
|
581 |
|
|
|
582 |
|
|
/** |
583 |
|
|
* Creates and sends magic map to player. |
584 |
|
|
* |
585 |
|
|
* The following function is a lot messier than it really should be, |
586 |
|
|
* but there is no real easy solution. |
587 |
|
|
* |
588 |
|
|
* Mark Wedel |
589 |
|
|
*/ |
590 |
|
|
|
591 |
root |
1.5 |
void |
592 |
|
|
draw_magic_map (object *pl) |
593 |
elmex |
1.1 |
{ |
594 |
root |
1.13 |
char *map_mark = (char *)calloc (MAGIC_MAP_SIZE * MAGIC_MAP_SIZE, 1); |
595 |
root |
1.5 |
int xmin, xmax, ymin, ymax; |
596 |
|
|
|
597 |
|
|
if (pl->type != PLAYER) |
598 |
|
|
{ |
599 |
|
|
LOG (llevError, "Non player object called draw_map.\n"); |
600 |
|
|
return; |
601 |
|
|
} |
602 |
|
|
|
603 |
|
|
/* First, we figure out what spaces are 'reachable' by the player */ |
604 |
|
|
magic_mapping_mark (pl, map_mark, 3); |
605 |
|
|
|
606 |
|
|
/* We now go through and figure out what spaces have been |
607 |
|
|
* marked, and thus figure out rectangular region we send |
608 |
|
|
* to the client (eg, if only a 10x10 area is visible, we only |
609 |
|
|
* want to send those 100 spaces.) |
610 |
|
|
*/ |
611 |
|
|
xmin = MAGIC_MAP_SIZE; |
612 |
|
|
ymin = MAGIC_MAP_SIZE; |
613 |
|
|
xmax = 0; |
614 |
|
|
ymax = 0; |
615 |
root |
1.13 |
|
616 |
|
|
for (int x = 0; x < MAGIC_MAP_SIZE; x++) |
617 |
|
|
for (int y = 0; y < MAGIC_MAP_SIZE; y++) |
618 |
|
|
if (map_mark[x + MAP_WIDTH (pl->map) * y] | FACE_FLOOR) |
619 |
root |
1.5 |
{ |
620 |
root |
1.13 |
xmin = x < xmin ? x : xmin; |
621 |
|
|
xmax = x > xmax ? x : xmax; |
622 |
|
|
ymin = y < ymin ? y : ymin; |
623 |
|
|
ymax = y > ymax ? y : ymax; |
624 |
root |
1.2 |
} |
625 |
elmex |
1.1 |
|
626 |
root |
1.15 |
packet sl; |
627 |
root |
1.13 |
sl.printf ("magicmap %d %d %d %d ", (xmax - xmin + 1), (ymax - ymin + 1), |
628 |
|
|
MAGIC_MAP_HALF - xmin, MAGIC_MAP_HALF - ymin); |
629 |
|
|
|
630 |
|
|
for (int y = ymin; y <= ymax; y++) |
631 |
|
|
for (int x = xmin; x <= xmax; x++) |
632 |
|
|
sl << uint8 (map_mark[x + MAGIC_MAP_SIZE * y] & ~FACE_FLOOR); |
633 |
|
|
|
634 |
root |
1.19 |
pl->contr->socket->send_packet (sl); |
635 |
root |
1.5 |
|
636 |
|
|
free (map_mark); |
637 |
elmex |
1.1 |
} |
638 |
|
|
|
639 |
|
|
|
640 |
|
|
/** |
641 |
|
|
* Send a kill log record to sockets |
642 |
|
|
*/ |
643 |
|
|
|
644 |
root |
1.5 |
void |
645 |
|
|
Log_Kill (const char *Who, const char *What, int WhatType, const char *With, int WithType) |
646 |
|
|
{ |
647 |
|
|
size_t len; |
648 |
|
|
char buf[MAX_BUF]; |
649 |
|
|
|
650 |
|
|
if (With != NULL) |
651 |
root |
1.11 |
snprintf (buf, MAX_BUF, "%s\t%s\t%d\t%s\t%d\n", Who, What, WhatType, With, WithType); |
652 |
root |
1.5 |
else |
653 |
root |
1.11 |
snprintf (buf, MAX_BUF, "%s\t%s\t%d\n", Who, What, WhatType); |
654 |
|
|
|
655 |
root |
1.5 |
len = strlen (buf); |
656 |
elmex |
1.1 |
} |