1 |
/* |
2 |
* This file is part of Crossfire TRT, the Roguelike Realtime MORPG. |
3 |
* |
4 |
* Copyright (©) 2005,2006,2007 Marc Alexander Lehmann / Robin Redeker / the Crossfire TRT team |
5 |
* Copyright (©) 2001,2007 Mark Wedel |
6 |
* Copyright (©) 1992,2007 Frank Tore Johansen |
7 |
* |
8 |
* Crossfire TRT 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 3 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, see <http://www.gnu.org/licenses/>. |
20 |
* |
21 |
* The authors can be reached via e-mail to <crossfire@schmorp.de> |
22 |
*/ |
23 |
|
24 |
/** \file |
25 |
* Image related communication |
26 |
* |
27 |
* \date 2003-12-02 |
28 |
* |
29 |
* This file deals with the image related communication to the |
30 |
* client. I've located all the functions in this file - this |
31 |
* localizes it more, and means that we don't need to declare |
32 |
* things like all the structures as globals. |
33 |
*/ |
34 |
|
35 |
#include <global.h> |
36 |
#include <sproto.h> |
37 |
|
38 |
#include "crc.h" |
39 |
|
40 |
#define MAX_FACE_SETS 20 /**< Maximum number of image sets the program will handle */ |
41 |
|
42 |
/** Information about one image */ |
43 |
typedef struct FaceInfo |
44 |
{ |
45 |
uint8 *data; /**< image data */ |
46 |
uint16 datalen; /**< length of the xpm data */ |
47 |
uint32 checksum; /**< Checksum of face data */ |
48 |
} FaceInfo; |
49 |
|
50 |
/** Information about one face set */ |
51 |
typedef struct |
52 |
{ |
53 |
char *prefix; /**< */ |
54 |
char *fullname; |
55 |
|
56 |
uint8 fallback; /**< faceset to use when an image is not found in this faceset */ |
57 |
char *size; |
58 |
char *extension; |
59 |
char *comment; |
60 |
|
61 |
FaceInfo *faces; /**< images in this faceset */ |
62 |
} FaceSets; |
63 |
|
64 |
static FaceSets facesets[MAX_FACE_SETS]; /**< All facesets */ |
65 |
|
66 |
/** |
67 |
* Checks specified faceset is valid |
68 |
* \param fsn faceset number |
69 |
*/ |
70 |
int |
71 |
is_valid_faceset (int fsn) |
72 |
{ |
73 |
if (fsn >= 0 && fsn < MAX_FACE_SETS && facesets[fsn].prefix) |
74 |
return TRUE; |
75 |
return FALSE; |
76 |
} |
77 |
|
78 |
/** |
79 |
* Frees all faceset information |
80 |
*/ |
81 |
void |
82 |
free_socket_images (void) |
83 |
{ |
84 |
int num, q; |
85 |
|
86 |
for (num = 0; num < MAX_FACE_SETS; num++) |
87 |
{ |
88 |
if (facesets[num].prefix) |
89 |
{ |
90 |
for (q = 0; q < faces.size (); q++) |
91 |
if (facesets[num].faces[q].data) |
92 |
free (facesets[num].faces[q].data); |
93 |
|
94 |
free (facesets[num].prefix); |
95 |
free (facesets[num].fullname); |
96 |
free (facesets[num].size); |
97 |
free (facesets[num].extension); |
98 |
free (facesets[num].comment); |
99 |
free (facesets[num].faces); |
100 |
} |
101 |
} |
102 |
} |
103 |
|
104 |
/** |
105 |
* This returns the set we will actually use when sending |
106 |
* a face. This is used because the image files may be sparse. |
107 |
* This function is recursive. imageno is the face number we are |
108 |
* trying to send |
109 |
* |
110 |
* If face is not found in specified faceset, tries with 'fallback' faceset. |
111 |
* |
112 |
* \param faceset faceset to check |
113 |
* \param imageno image number |
114 |
* |
115 |
*/ |
116 |
static int |
117 |
get_face_fallback (int faceset, int imageno) |
118 |
{ |
119 |
/* faceset 0 is supposed to have every image, so just return. Doing |
120 |
* so also prevents infinite loops in the case if it not having |
121 |
* the face, but in that case, we are likely to crash when we try |
122 |
* to access the data, but that is probably preferable to an infinite |
123 |
* loop. |
124 |
*/ |
125 |
if (faceset == 0) |
126 |
return 0; |
127 |
|
128 |
if (!facesets[faceset].prefix) |
129 |
{ |
130 |
LOG (llevError, "get_face_fallback called with unused set (%d)?\n", faceset); |
131 |
return 0; /* use default set */ |
132 |
} |
133 |
|
134 |
if (facesets[faceset].faces[imageno].data) |
135 |
return faceset; |
136 |
|
137 |
return get_face_fallback (facesets[faceset].fallback, imageno); |
138 |
} |
139 |
|
140 |
/** |
141 |
* Checks fallback are correctly defined. |
142 |
* This is a simple recursive function that makes sure the fallbacks |
143 |
* are all proper (eg, the fall back to defined sets, and also |
144 |
* eventually fall back to 0). At the top level, togo is set to MAX_FACE_SETS, |
145 |
* if togo gets to zero, it means we have a loop. |
146 |
* This is only run when we first load the facesets. |
147 |
*/ |
148 |
static void |
149 |
check_faceset_fallback (int faceset, int togo) |
150 |
{ |
151 |
int fallback = facesets[faceset].fallback; |
152 |
|
153 |
/* proper case - falls back to base set */ |
154 |
if (fallback == 0) |
155 |
return; |
156 |
|
157 |
if (!facesets[fallback].prefix) |
158 |
{ |
159 |
LOG (llevError, "Face set %d falls to non set faceset %d\n", faceset, fallback); |
160 |
abort (); |
161 |
} |
162 |
|
163 |
togo--; |
164 |
if (togo == 0) |
165 |
{ |
166 |
LOG (llevError, "Infinite loop found in facesets. aborting.\n"); |
167 |
abort (); |
168 |
} |
169 |
|
170 |
check_faceset_fallback (fallback, togo); |
171 |
} |
172 |
|
173 |
#define MAX_IMAGE_SIZE 10000 |
174 |
|
175 |
/** |
176 |
* Client tells us what type of faces it wants. Also sets |
177 |
* the caching attribute. |
178 |
* |
179 |
*/ |
180 |
void |
181 |
SetFaceMode (char *buf, int len, client *ns) |
182 |
{ |
183 |
int mask = (atoi (buf) & CF_FACE_CACHE), mode = (atoi (buf) & ~CF_FACE_CACHE); |
184 |
|
185 |
if (mode == CF_FACE_NONE) |
186 |
ns->facecache = 1; |
187 |
else if (mode != CF_FACE_PNG) |
188 |
ns->send_packet_printf ("drawinfo %d %s", NDI_RED, "Warning - send unsupported face mode. Will use Png"); |
189 |
|
190 |
if (mask) |
191 |
ns->facecache = 1; |
192 |
} |
193 |
|
194 |
/** |
195 |
* client requested an image. send it rate-limited |
196 |
* before flushing. |
197 |
*/ |
198 |
void |
199 |
AskFaceCmd (char *buf, int len, client *ns) |
200 |
{ |
201 |
int idx = 0, pri = 0; |
202 |
|
203 |
sscanf (buf, "%d %d", &idx, &pri); |
204 |
|
205 |
const facedata *d = face_data (idx, ns->faceset); |
206 |
|
207 |
if (!d) |
208 |
return; // doh |
209 |
|
210 |
client::ixsend ix; |
211 |
|
212 |
ix.pri = pri; |
213 |
ix.idx = idx; |
214 |
ix.ofs = d->data.size (); |
215 |
|
216 |
// this is (hopefully) a temporary fix around older cfplus versions not |
217 |
// supporting interleaved transfers |
218 |
ns->ixface.insert (ns->ixface.begin (), ix); |
219 |
|
220 |
#if 0 |
221 |
// the by far most common case will be to insert |
222 |
// right at the end, so no looping. |
223 |
auto (i, ns->ixface.end ()); |
224 |
for (; i != ns->ixface.begin (); ) |
225 |
if (pri >= (--i)->pri) |
226 |
break; |
227 |
|
228 |
ns->ixface.insert (i, ix); |
229 |
#endif |
230 |
} |
231 |
|
232 |
/** |
233 |
* Tells client the picture it has to use |
234 |
* to smooth a picture number given as argument. |
235 |
*/ |
236 |
void |
237 |
AskSmooth (char *buf, int len, client *ns) |
238 |
{ |
239 |
ns->send_face (atoi (buf)); |
240 |
ns->flush_fx (); |
241 |
} |
242 |
|
243 |
// how lame |
244 |
static void print_facename (packet &sl, const facedata &d) |
245 |
{ |
246 |
for (int i = 0; i < CHKSUM_SIZE; ++i) |
247 |
sl.printf ("%02x", d.chksum [i]); |
248 |
} |
249 |
|
250 |
// gcfclient uses the server-provided checksum for comparison, but always |
251 |
// writes a broken checksum to its cache file, so we have to provide |
252 |
// gcfclient with the same broken (and useless) checksum just to have it |
253 |
// cache the image despite its bugs. |
254 |
static uint32 gcfclient_checksum (const facedata *d) |
255 |
{ |
256 |
uint32 csum = 0; |
257 |
|
258 |
for (std::string::const_iterator i = d->data.begin (); |
259 |
i != d->data.end (); |
260 |
++i) |
261 |
{ |
262 |
csum = rotate_right (csum); |
263 |
csum += *(uint8 *)&*i; |
264 |
} |
265 |
|
266 |
return csum; |
267 |
} |
268 |
|
269 |
/** |
270 |
* Sends a face to a client if they are in pixmap mode |
271 |
* nothing gets sent in bitmap mode. |
272 |
* If nocache is true (nonzero), ignore the cache setting from the client - |
273 |
* this is needed for the askface, in which we really do want to send the |
274 |
* face (and askface is the only place that should be setting it). Otherwise, |
275 |
* we look at the facecache, and if set, send the image name. |
276 |
*/ |
277 |
void |
278 |
client::send_face (faceidx facenum) |
279 |
{ |
280 |
// never send face 0. ever. it does not exist. |
281 |
if (!facenum) |
282 |
return; |
283 |
|
284 |
const facedata *d = face_data (facenum, faceset); |
285 |
|
286 |
if (!d) |
287 |
{ |
288 |
LOG (llevError, "client::send_face (%d) out of bounds??\n", facenum); |
289 |
return; |
290 |
} |
291 |
|
292 |
if (faces_sent[facenum]) |
293 |
return; |
294 |
|
295 |
faces_sent[facenum] = true; |
296 |
|
297 |
// if for some reason we let a client without face caching connect, |
298 |
// we better support that decision here and implement it. |
299 |
if (!facecache) |
300 |
return send_image (facenum); |
301 |
|
302 |
if (fxix) |
303 |
{ |
304 |
fxface.push_back (facenum); |
305 |
return; |
306 |
} |
307 |
|
308 |
packet sl; |
309 |
|
310 |
if (force_face0) |
311 |
sl << "face " << uint16 (facenum); |
312 |
else if (image2) |
313 |
sl << "face2 " << uint16 (facenum) << uint8 (0) << uint32 (force_bad_checksum ? gcfclient_checksum (d) : 0); |
314 |
else |
315 |
sl << "face1 " << uint16 (facenum) << uint32 (force_bad_checksum ? gcfclient_checksum (d) : 0); |
316 |
|
317 |
// how lame |
318 |
print_facename (sl, *d); |
319 |
send_packet (sl); |
320 |
|
321 |
if (EMI_smooth) |
322 |
{ |
323 |
faceinfo *f = face_info (facenum); |
324 |
|
325 |
if (f->smooth) |
326 |
{ |
327 |
send_face (f->smooth); |
328 |
|
329 |
packet sl ("smooth"); |
330 |
|
331 |
sl << uint16 (facenum) |
332 |
<< uint16 (f->smooth); |
333 |
|
334 |
send_packet (sl); |
335 |
} |
336 |
} |
337 |
} |
338 |
|
339 |
void client::flush_fx () |
340 |
{ |
341 |
while (!fxface.empty ()) |
342 |
{ |
343 |
packet fx ("fx"); |
344 |
packet sx ("sx"); |
345 |
|
346 |
do |
347 |
{ |
348 |
faceidx facenum = fxface.back (); fxface.pop_back (); |
349 |
|
350 |
const facedata *d = face_data (facenum, faceset); |
351 |
|
352 |
if (d) |
353 |
{ |
354 |
fx << ber32 (facenum) |
355 |
<< data8 (d->chksum, CHKSUM_SIZE); |
356 |
|
357 |
if (smoothing) |
358 |
{ |
359 |
faceinfo *f = face_info (facenum); |
360 |
|
361 |
if (f->smooth) |
362 |
{ |
363 |
send_face (f->smooth); |
364 |
sx << ber32 (facenum) |
365 |
<< ber32 (f->smooth) |
366 |
<< ber32 (f->smoothlevel); |
367 |
} |
368 |
} |
369 |
} |
370 |
} |
371 |
while (!fxface.empty () |
372 |
&& fx.room () > ber32::size + CHKSUM_SIZE + 1 |
373 |
&& sx.room () > ber32::size * 3); |
374 |
|
375 |
send_packet (fx); |
376 |
if (sx.length () > 3) send_packet (sx); |
377 |
} |
378 |
} |
379 |
|
380 |
void |
381 |
client::send_image (faceidx facenum) |
382 |
{ |
383 |
// never send face 0. ever. it does not exist. |
384 |
if (!facenum) |
385 |
return; |
386 |
|
387 |
const facedata *d = face_data (facenum, faceset); |
388 |
|
389 |
faces_sent[facenum] = true; |
390 |
|
391 |
if (!d) |
392 |
{ |
393 |
LOG (llevError, "client::send_image (%d) out of bounds??\n", facenum); |
394 |
return; |
395 |
} |
396 |
|
397 |
//TODO: check type here? |
398 |
|
399 |
if (force_image_newmap) |
400 |
force_newmap = true; |
401 |
|
402 |
packet sl; |
403 |
|
404 |
sl << (image2 ? "image2 " : "image ") |
405 |
<< uint32 (facenum); |
406 |
|
407 |
if (image2) |
408 |
sl << uint8 (0); |
409 |
|
410 |
sl << uint32 (d->data.size ()) |
411 |
<< data (d->data.data (), d->data.size ()); |
412 |
|
413 |
send_packet (sl); |
414 |
} |
415 |
|
416 |
// send all faces of this object to the client |
417 |
// this uses more bandwidth initially, but makes |
418 |
// animations look much smoother, and every client |
419 |
// is supposed to do client-side caching anyways. |
420 |
void |
421 |
client::send_faces (object *ob) |
422 |
{ |
423 |
send_face (ob->face); |
424 |
|
425 |
if (ob->animation_id) |
426 |
{ |
427 |
animation &anim = animations [ob->animation_id]; |
428 |
|
429 |
for (int i = 0; i < anim.num_animations; i++) |
430 |
send_face (anim.faces [i]); |
431 |
} |
432 |
} |
433 |
|
434 |
/** |
435 |
* Need to send an animation sequence to the client. |
436 |
* We will send appropriate face commands to the client if we haven't |
437 |
* sent them the face yet (this can become quite costly in terms of |
438 |
* how much we are sending - on the other hand, this should only happen |
439 |
* when the player logs in and picks stuff up. |
440 |
*/ |
441 |
void |
442 |
client::send_animation (short anim_num) |
443 |
{ |
444 |
/* Do some checking on the anim_num we got. Note that the animations |
445 |
* are added in contigous order, so if the number is in the valid |
446 |
* range, it must be a valid animation. |
447 |
*/ |
448 |
if (anim_num < 0 || anim_num >= animations.size ()) |
449 |
{ |
450 |
LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num); |
451 |
return; |
452 |
} |
453 |
|
454 |
packet sl ("anim"); |
455 |
|
456 |
sl << uint16 (anim_num) |
457 |
<< uint16 (0); /* flags - not used right now */ |
458 |
|
459 |
/* Build up the list of faces. Also, send any information (ie, the |
460 |
* the face itself) down to the client. |
461 |
*/ |
462 |
for (int i = 0; i < animations[anim_num].num_animations; i++) |
463 |
{ |
464 |
send_face (animations[anim_num].faces[i]); |
465 |
sl << uint16 (animations[anim_num].faces[i]); /* flags - not used right now */ |
466 |
} |
467 |
|
468 |
send_packet (sl); |
469 |
|
470 |
anims_sent[anim_num] = 1; |
471 |
} |
472 |
|
473 |
/** |
474 |
* Sends the number of images, checksum of the face file, |
475 |
* and the image_info file information. See the doc/Developers/protocol |
476 |
* if you want further detail. |
477 |
*/ |
478 |
void |
479 |
send_image_info (client *ns, char *params) |
480 |
{ |
481 |
packet sl; |
482 |
|
483 |
//TODO: second parameter is a checksum, but it makes no sense in this current framework |
484 |
sl.printf ("replyinfo image_info\n%d\n%u\n", MAX_FACES, 0); |
485 |
|
486 |
sl << "0:base:standard:0:32x32:none:The old 32x32 faceset.\n"; |
487 |
|
488 |
ns->send_packet (sl); |
489 |
} |
490 |
|
491 |
/** |
492 |
* Sends requested face information. |
493 |
* \param ns socket to send to |
494 |
* \param params contains first and last index of face |
495 |
* |
496 |
* For each image in [start..stop] sends |
497 |
* - checksum |
498 |
* - name |
499 |
*/ |
500 |
void |
501 |
send_image_sums (client *ns, char *params) |
502 |
{ |
503 |
int start, stop; |
504 |
char *cp; |
505 |
|
506 |
packet sl; |
507 |
|
508 |
start = atoi (params); |
509 |
for (cp = params; *cp != '\0'; cp++) |
510 |
if (*cp == ' ') |
511 |
break; |
512 |
|
513 |
stop = atoi (cp); |
514 |
if (stop < start || *cp == '\0' || (stop - start) > 1000 || stop >= MAX_FACES) |
515 |
{ |
516 |
sl.printf ("replyinfo image_sums %d %d", start, stop); |
517 |
ns->send_packet (sl); |
518 |
sl.reset (); |
519 |
return; |
520 |
} |
521 |
|
522 |
sl.printf ("replyinfo image_sums %d %d ", start, stop); |
523 |
|
524 |
for (int i = start; i <= stop && i < faces.size (); i++) |
525 |
{ |
526 |
ns->faces_sent[i] = true; |
527 |
|
528 |
const facedata *d = face_data (i, ns->faceset); |
529 |
|
530 |
if (sl.room () < 2 + 4 + 1 + d->data.size () + 1) |
531 |
break; |
532 |
|
533 |
sl << uint16 (i) |
534 |
<< uint32 (0) // checksum |
535 |
<< uint8 (ns->faceset); |
536 |
|
537 |
print_facename (sl, *d); sl << uint8 (0); |
538 |
} |
539 |
|
540 |
/* It would make more sense to catch this pre-emptively in the code above. |
541 |
* however, if this really happens, we probably just want to cut down the |
542 |
* size to less than 1000, since that is what we claim the protocol would |
543 |
* support. |
544 |
*/ |
545 |
//TODO: taken care of above, should simply abort or make sure the above code is correct |
546 |
if (sl.length () >= MAXSOCKBUF) |
547 |
{ |
548 |
LOG (llevError, "send_image_send: buffer overrun, %d > %d\n", sl.length (), MAXSOCKBUF); |
549 |
abort (); |
550 |
} |
551 |
|
552 |
ns->send_packet (sl); |
553 |
} |
554 |
|