[ViewVC] Diff of: cvs/deliantra/server/socket/image.C

Comparing deliantra/server/socket/image.C (file contents):
Revision 1.33 by root, Wed Mar 14 16:23:26 2007 UTC vs.
Revision 1.72 by root, Sun Nov 11 04:29:11 2012 UTC

…		…
1	/*	1	/*
2	* CrossFire, A Multiplayer game	2	* This file is part of Deliantra, the Roguelike Realtime MMORPG.
3	*	3	*
4	* Copyright (C) 2005, 2006, 2007 Marc Lehmann & Crossfire+ Development Team	4	* Copyright (©) 2005,2006,2007,2008,2009,2010,2011,2012 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5	* Copyright (C) 2001 Mark Wedel	5	* Copyright (©) 2001 Mark Wedel
6	* Copyright (C) 1992 Frank Tore Johansen	6	* Copyright (©) 1992 Frank Tore Johansen
7	*	7	*
8	* This program is free software; you can redistribute it and/or modify	8	* Deliantra is free software: you can redistribute it and/or modify it under
9	* it under the terms of the GNU General Public License as published by	9	* the terms of the Affero GNU General Public License as published by the
10	* the Free Software Foundation; either version 2 of the License, or	10	* Free Software Foundation, either version 3 of the License, or (at your
11	* (at your option) any later version.	11	* option) any later version.
12	*	12	*
13	* This program is distributed in the hope that it will be useful,	13	* This program is distributed in the hope that it will be useful,
14	* but WITHOUT ANY WARRANTY; without even the implied warranty of	14	* but WITHOUT ANY WARRANTY; without even the implied warranty of
15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the	15	* MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
16	* GNU General Public License for more details.	16	* GNU General Public License for more details.
17	*	17	*
18	* You should have received a copy of the GNU General Public License	18	* You should have received a copy of the Affero GNU General Public License
19	* along with this program; if not, write to the Free Software	19	* and the GNU General Public License along with this program. If not, see
20	* Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.	20	* <http://www.gnu.org/licenses/>.
21	*	21	*
22	* The author can be reached via e-mail to <crossfire@schmorp.de>	22	* The authors can be reached via e-mail to <support@deliantra.net>
23	*/	23	*/
24		24
25	/** \file	25	/** \file
26	* Image related communication	26	* Image related communication
27	*	27	*
36	#include <global.h>	36	#include <global.h>
37	#include <sproto.h>	37	#include <sproto.h>
38		38
39	#include "crc.h"	39	#include "crc.h"
40		40
41	#define MAX_FACE_SETS 20 /*< Maximum number of image sets the program will handle /	41	#define MAX_IMAGE_SIZE 10000
42
43	/** Information about one image */
44	typedef struct FaceInfo
45	{
46	uint8 data; /< image data /
47	uint16 datalen; /*< length of the xpm data /
48	uint32 checksum; /*< Checksum of face data /
49	} FaceInfo;
50
51	/** Information about one face set */
52	typedef struct
53	{
54	char prefix; /< /
55	char *fullname;
56
57	uint8 fallback; /*< faceset to use when an image is not found in this faceset /
58	char *size;
59	char *extension;
60	char *comment;
61
62	FaceInfo faces; /< images in this faceset /
63	} FaceSets;
64
65	static FaceSets facesets[MAX_FACE_SETS]; /*< All facesets /
66		42
67	/**	43	/**
68	* Checks specified faceset is valid	44	* client requested an image. send it rate-limited
69	* \param fsn faceset number	45	* before flushing.
70	*/	46	*/
71	int	47	void
72	is_valid_faceset (int fsn)	48	AskFaceCmd (char buf, int len, client ns)
73	{	49	{
74	if (fsn >= 0 && fsn < MAX_FACE_SETS && facesets[fsn].prefix)	50	int idx = 0, pri = 0;
75	return TRUE;	51
76	return FALSE;	52	sscanf (buf, "%d %d", &idx, &pri);
		53
		54	//TODO: somehow fetch default priority from send_fx here
		55
		56	const facedata *d = face_data (idx, ns->faceset);
		57
		58	if (!d)
		59	return; // doh
		60
		61	/* cfperl_ix calls cf::face::ix which loads the data */
		62	/* and then calls cf::client::send_ix to actually queue the ix */
		63	cfperl_ix (ns, idx, pri, d->size, d->fofs);
		64	}
		65
		66	void
		67	client::ix_send (faceidx idx, sint16 pri, SV *data_sv)
		68	{
		69	STRLEN size;
		70	char *data = SvPVbyte (data_sv, size);
		71	ixsend ix;
		72
		73	ix.pri = pri;
		74	ix.idx = idx;
		75	ix.ofs = size;
		76	ix.data = (uint8 *)data;
		77	ix.data_sv = SvREFCNT_inc (data_sv);
		78
		79	auto (pos, ixface.end ());
		80
		81	// the by far most common case will be to insert
		82	// near the end, so little looping.
		83	while (pos != ixface.begin ())
		84	{
		85	--pos;
		86
		87	// sort within 2k bins, to slightly prefer smaller images
		88	if (pri > pos->pri \|\| (pri == pos->pri && (ix.ofs >> 11) <= (pos->ofs >> 11)))
		89	{
		90	++pos;
		91	break;
		92	}
		93	}
		94
		95	ixface.insert (pos, ix);
		96
		97	#if 0
		98	for (auto (i, ixface.begin ()); i != ixface.end (); ++i)
		99	fprintf (stderr, "<%d,%d> ", i->pri, i->ofs);
		100	fprintf (stderr, "\n");
		101	#endif
		102	}
		103
		104	void
		105	client::ix_pop ()
		106	{
		107	ixsend &ix = ixface.back ();
		108
		109	SvREFCNT_dec (ix.data_sv);
		110
		111	ixface.pop_back ();
77	}	112	}
78		113
79	/**	114	/**
80	* Frees all faceset information	115	* Sends a face offer (fx) to a client.
81	*/
82	void
83	free_socket_images (void)
84	{
85	int num, q;
86
87	for (num = 0; num < MAX_FACE_SETS; num++)
88	{
89	if (facesets[num].prefix)
90	{
91	for (q = 0; q < faces.size (); q++)
92	if (facesets[num].faces[q].data)
93	free (facesets[num].faces[q].data);
94
95	free (facesets[num].prefix);
96	free (facesets[num].fullname);
97	free (facesets[num].size);
98	free (facesets[num].extension);
99	free (facesets[num].comment);
100	free (facesets[num].faces);
101	}
102	}
103	}
104
105	/**
106	* This returns the set we will actually use when sending
107	* a face. This is used because the image files may be sparse.
108	* This function is recursive. imageno is the face number we are
109	* trying to send
110	*
111	* If face is not found in specified faceset, tries with 'fallback' faceset.
112	*
113	* \param faceset faceset to check
114	* \param imageno image number
115	*
116	*/
117	static int
118	get_face_fallback (int faceset, int imageno)
119	{
120	/* faceset 0 is supposed to have every image, so just return. Doing
121	* so also prevents infinite loops in the case if it not having
122	* the face, but in that case, we are likely to crash when we try
123	* to access the data, but that is probably preferable to an infinite
124	* loop.
125	*/
126	if (faceset == 0)
127	return 0;
128
129	if (!facesets[faceset].prefix)
130	{
131	LOG (llevError, "get_face_fallback called with unused set (%d)?\n", faceset);
132	return 0; /* use default set */
133	}
134
135	if (facesets[faceset].faces[imageno].data)
136	return faceset;
137
138	return get_face_fallback (facesets[faceset].fallback, imageno);
139	}
140
141	/**
142	* Checks fallback are correctly defined.
143	* This is a simple recursive function that makes sure the fallbacks
144	* are all proper (eg, the fall back to defined sets, and also
145	* eventually fall back to 0). At the top level, togo is set to MAX_FACE_SETS,
146	* if togo gets to zero, it means we have a loop.
147	* This is only run when we first load the facesets.
148	*/
149	static void
150	check_faceset_fallback (int faceset, int togo)
151	{
152	int fallback = facesets[faceset].fallback;
153
154	/* proper case - falls back to base set */
155	if (fallback == 0)
156	return;
157
158	if (!facesets[fallback].prefix)
159	{
160	LOG (llevError, "Face set %d falls to non set faceset %d\n", faceset, fallback);
161	abort ();
162	}
163
164	togo--;
165	if (togo == 0)
166	{
167	LOG (llevError, "Infinite loop found in facesets. aborting.\n");
168	abort ();
169	}
170
171	check_faceset_fallback (fallback, togo);
172	}
173
174	#define MAX_IMAGE_SIZE 10000
175
176	/**
177	* Client tells us what type of faces it wants. Also sets
178	* the caching attribute.
179	*
180	*/
181	void
182	SetFaceMode (char buf, int len, client ns)
183	{
184	int mask = (atoi (buf) & CF_FACE_CACHE), mode = (atoi (buf) & ~CF_FACE_CACHE);
185
186	if (mode == CF_FACE_NONE)
187	ns->facecache = 1;
188	else if (mode != CF_FACE_PNG)
189	ns->send_packet_printf ("drawinfo %d %s", NDI_RED, "Warning - send unsupported face mode. Will use Png");
190
191	if (mask)
192	ns->facecache = 1;
193	}
194
195	/**
196	* Client has requested pixmap that it somehow missed getting.
197	* This will be called often if the client is
198	* caching images.
199	*/
200	void
201	SendFaceCmd (char buf, int len, client ns)
202	{
203	ns->send_image (atoi (buf));
204	}
205
206	// how lame
207	static void print_facename (packet &sl, const facedata &d)
208	{
209	for (int i = 0; i < CHKSUM_SIZE; ++i)
210	sl.printf ("%02x", d.chksum [i]);
211	}
212
213	// gcfclient uses the server-provided checksum for comparison, but always
214	// writes a broken checksum to its cache file, so we have to provide
215	// gcfclient with the same broken (and useless) checksum just to have it
216	// cache the image despite its bugs.
217	static uint32 gcfclient_checksum (const facedata *d)
218	{
219	uint32 csum = 0;
220
221	for (std::string::const_iterator i = d->data.begin ();
222	i != d->data.end ();
223	++i)
224	{
225	csum = rotate_right (csum);
226	csum += (uint8 )&*i;
227	}
228
229	return csum;
230	}
231
232	/**
233	* Sends a face to a client if they are in pixmap mode
234	* nothing gets sent in bitmap mode.
235	* If nocache is true (nonzero), ignore the cache setting from the client -	116	* If nocache is true (nonzero), ignore the cache setting from the client -
236	* this is needed for the askface, in which we really do want to send the	117	* this is needed for the askface, in which we really do want to send the
237	* face (and askface is the only place that should be setting it). Otherwise,	118	* face (and askface is the only place that should be setting it). Otherwise,
238	* we look at the facecache, and if set, send the image name.	119	* we look at the facecache, and if set, send the image name.
239	*/	120	*/
240	void	121	void
241	client::send_face (faceidx facenum)	122	client::send_face (faceidx facenum, int pri)
242	{	123	{
243	// never send face 0. ever. it does not exist.	124	// never send face 0. ever. it does not exist.
244	if (!facenum)	125	if (!facenum)
245	return;	126	return;
246		127
247	const facedata *d = face_data (facenum, faceset);	128	faceinfo *f = face_info (facenum);
248		129
249	if (!d)	130	if (!f)
250	{	131	{
251	LOG (llevError, "client::send_face (%d) out of bounds??\n", facenum);	132	LOG (llevError \| logBacktrace, "client::send_face (%d) out of bounds??\n", facenum);
252	return;	133	return;
253	}	134	}
254		135
255	if (faces_sent[facenum])	136	// refuse to send non-image faces unless requested
		137	if (!fx_want [f->type])
256	return;	138	return;
257		139
258	faces_sent[facenum] = true;	140	if (faces_sent [facenum])
259
260	if (!facecache)
261	{
262	send_drawinfo (
263	"*** Please enable image/face caching in preferences or use a client that supports it.\n",
264	NDI_RED
265	);
266	return send_image (facenum);
267	}
268
269	packet sl;
270
271	if (force_face0)
272	sl << "face " << uint16 (facenum);
273	else if (image2)
274	sl << "face2 " << uint16 (facenum) << uint8 (0) << uint32 (force_bad_checksum ? gcfclient_checksum (d) : 0);
275	else
276	sl << "face1 " << uint16 (facenum) << uint32 (force_bad_checksum ? gcfclient_checksum (d) : 0);
277
278	// how lame
279	print_facename (sl, *d);
280	send_packet (sl);
281
282	faceinfo *f = face_info (facenum);
283	if (f->smooth && EMI_smooth)
284	{
285	send_face (f->smooth);
286
287	packet sl ("smooth");
288
289	sl << uint16 (facenum)
290	<< uint16 (f->smooth);
291
292	send_packet (sl);
293	}
294	}
295
296	void
297	client::send_image (faceidx facenum)
298	{
299	// never send face 0. ever. it does not exist.
300	if (!facenum)
301	return;	141	return;
302		142
303	const facedata *d = face_data (facenum, faceset);	143	faces_sent [facenum] = true;
304		144
305	if (!d)	145	fxface.push_back (facenum);
306	{	146	}
307	LOG (llevError, "client::send_image (%d) out of bounds??\n", facenum);	147
308	return;	148	void client::flush_fx ()
		149	{
		150	while (!fxface.empty ())
309	}	151	{
		152	packet fx ("fx");
		153	packet sx ("sx");
		154	int type = 0;
310		155
311	packet sl;	156	do
		157	{
		158	faceidx facenum = fxface.back (); fxface.pop_back ();
312		159
313	sl << (image2 ? "image2 " : "image ")	160	if (const faceinfo *f = face_info (facenum))
314	<< uint32 (facenum);	161	{
		162	if (f->type != type)
		163	{
		164	type = f->type;
315		165
316	if (image2)	166	fx << ber32 (0)
317	sl << uint8 (0);	167	<< uint8 (1) << uint8 (type);
		168	}
318		169
319	sl << uint32 (d->data.size ())	170	const facedata *d = f->data (faceset);
320	<< data (d->data.data (), d->data.size ());
321		171
		172	fx << ber32 (facenum)
		173	<< data8 (d->chksum, d->chksum_len);
		174
		175	if (smoothing)
		176	{
		177	faceinfo *f = face_info (facenum);
		178
		179	if (f->smooth)
		180	{
		181	send_face (f->smooth, -110);
		182
		183	sx << ber32 (facenum)
		184	<< ber32 (f->smooth)
		185	<< ber32 (f->smoothlevel);
		186	}
		187	}
		188	}
		189	}
		190	while (!fxface.empty ()
		191	&& fx.room () > ber32::size + CHKSUM_MAXLEN + 1 + 3 /* type switch */
		192	&& sx.room () > ber32::size * 3);
		193
322	send_packet (sl);	194	send_packet (fx);
		195	if (sx.length () > 3) send_packet (sx);
		196	}
323	}	197	}
324		198
325	// send all faces of this object to the client	199	// send all faces of this object to the client
326	// this uses more bandwidth initially, but makes	200	// this uses more bandwidth initially, but makes
327	// animations look much smoother, and every client	201	// animations look much smoother, and every client
328	// is supposed to do client-side caching anyways.	202	// is supposed to do client-side caching anyways.
329	void	203	void
330	client::send_faces (object *ob)	204	client::send_faces (object *ob)
331	{	205	{
332	send_face (ob->face);	206	send_face (ob->face, 10);
333		207
334	if (ob->animation_id)	208	if (ob->animation_id)
335	{	209	{
336	animation &anim = animations [ob->animation_id];	210	const animation &anim = ob->anim ();
337		211
338	for (int i = 0; i < anim.num_animations; i++)	212	for (int i = 0; i < anim.num_animations; i++)
339	send_face (anim.faces [i]);	213	send_face (anim.faces [i], -10);
340	}	214	}
341	}	215	}
342		216
343	/**	217	/**
344	* Need to send an animation sequence to the client.	218	* Need to send an animation sequence to the client.
…		…
349	*/	223	*/
350	void	224	void
351	client::send_animation (short anim_num)	225	client::send_animation (short anim_num)
352	{	226	{
353	/* Do some checking on the anim_num we got. Note that the animations	227	/* Do some checking on the anim_num we got. Note that the animations
354	* are added in contigous order, so if the number is in the valid	228	* are added in contiguous order, so if the number is in the valid
355	* range, it must be a valid animation.	229	* range, it must be a valid animation.
356	*/	230	*/
357	if (anim_num < 0 \|\| anim_num > num_animations)	231	if (anim_num < 0 \|\| anim_num >= animations.size ())
358	{	232	{
359	LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num);	233	LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num);
360	return;	234	return;
361	}	235	}
362		236
…		…
368	/* Build up the list of faces. Also, send any information (ie, the	242	/* Build up the list of faces. Also, send any information (ie, the
369	* the face itself) down to the client.	243	* the face itself) down to the client.
370	*/	244	*/
371	for (int i = 0; i < animations[anim_num].num_animations; i++)	245	for (int i = 0; i < animations[anim_num].num_animations; i++)
372	{	246	{
373	send_face (animations[anim_num].faces[i]);	247	send_face (animations[anim_num].faces[i], -20);
374	sl << uint16 (animations[anim_num].faces[i]); /* flags - not used right now */	248	sl << uint16 (animations[anim_num].faces[i]);
375	}	249	}
376		250
377	send_packet (sl);	251	send_packet (sl);
378		252
379	anims_sent[anim_num] = 1;	253	anims_sent[anim_num] = 1;
380	}	254	}
381		255
382	/**
383	* Sends the number of images, checksum of the face file,
384	* and the image_info file information. See the doc/Developers/protocol
385	* if you want further detail.
386	*/
387	void	256	void
388	send_image_info (client ns, char params)	257	client::invalidate_face (faceidx idx)
389	{	258	{
390	packet sl;	259	faces_sent [idx] = false;
391		260	force_newmap = true;
392	//TODO: second parameter is a checksum, but it makes no sense in this current framework
393	sl.printf ("replyinfo image_info\n%d\n%u\n", MAX_FACES, 0);
394
395	sl << "0:base:standard:0:32x32:none:The old 32x32 faceset.\n";
396
397	ns->send_packet (sl);
398	}	261	}
399		262
400	/**
401	* Sends requested face information.
402	* \param ns socket to send to
403	* \param params contains first and last index of face
404	*
405	* For each image in [start..stop] sends
406	* - checksum
407	* - name
408	*/
409	void	263	void
410	send_image_sums (client ns, char params)	264	client::invalidate_all_faces ()
411	{	265	{
412	int start, stop;	266	faces_sent.reset ();
413	char *cp;	267	force_newmap = true;
414
415	packet sl;
416
417	start = atoi (params);
418	for (cp = params; *cp != '\0'; cp++)
419	if (*cp == ' ')
420	break;
421
422	stop = atoi (cp);
423	if (stop < start \|\| *cp == '\0' \|\| (stop - start) > 1000 \|\| stop >= MAX_FACES)
424	{
425	sl.printf ("replyinfo image_sums %d %d", start, stop);
426	ns->send_packet (sl);
427	sl.reset ();
428	return;
429	}
430
431	sl.printf ("replyinfo image_sums %d %d ", start, stop);
432
433	for (int i = start; i <= stop && i < faces.size (); i++)
434	{
435	ns->faces_sent[i] = true;
436
437	const facedata *d = face_data (i, ns->faceset);
438
439	if (sl.room () < 2 + 4 + 1 + d->data.size () + 1)
440	break;
441
442	sl << uint16 (i)
443	<< uint32 (0) // checksum
444	<< uint8 (ns->faceset);
445
446	print_facename (sl, *d); sl << uint8 (0);
447	}
448
449	/* It would make more sense to catch this pre-emptively in the code above.
450	* however, if this really happens, we probably just want to cut down the
451	* size to less than 1000, since that is what we claim the protocol would
452	* support.
453	*/
454	//TODO: taken care of above, should simply abort or make sure the above code is correct
455	if (sl.length () >= MAXSOCKBUF)
456	{
457	LOG (llevError, "send_image_send: buffer overrun, %d > %d\n", sl.length (), MAXSOCKBUF);
458	abort ();
459	}
460
461	ns->send_packet (sl);
462	}	268	}
463		269

Diff Legend

-–
+Removed lines
-+
+Added lines
-<
+Changed lines
->
+Changed lines

Comparing deliantra/server/socket/image.C (file contents): Revision 1.33 by root, Wed Mar 14 16:23:26 2007 UTC vs. Revision 1.72 by root, Sun Nov 11 04:29:11 2012 UTC

Diff Legend

Comparing deliantra/server/socket/image.C (file contents):
Revision 1.33 by root, Wed Mar 14 16:23:26 2007 UTC vs.
Revision 1.72 by root, Sun Nov 11 04:29:11 2012 UTC