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

Comparing deliantra/server/socket/image.C (file contents):
Revision 1.22 by pippijn, Thu Mar 1 12:28:17 2007 UTC vs.
Revision 1.61 by root, Wed Nov 4 13:46:37 2009 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 Marc Alexander Lehmann / Robin Redeker / the Deliantra team
5	* Copyright (C) 2001 Mark Wedel	5	* Copyright (©) 2001,2007 Mark Wedel
6	* Copyright (C) 1992 Frank Tore Johansen	6	* Copyright (©) 1992,2007 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
72	is_valid_faceset (int fsn)
73	{
74	if (fsn >= 0 && fsn < MAX_FACE_SETS && facesets[fsn].prefix)
75	return TRUE;
76	return FALSE;
77	}
78
79	/**
80	* Frees all faceset information
81	*/
82	void	47	void
83	free_socket_images (void)	48	AskFaceCmd (char buf, int len, client ns)
84	{	49	{
85	int num, q;	50	int idx = 0, pri = 0;
86		51
87	for (num = 0; num < MAX_FACE_SETS; num++)	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	client::ixsend ix;
		62
		63	ix.pri = pri;
		64	ix.idx = idx;
		65	ix.ofs = d->data.size ();
		66
		67	auto (pos, ns->ixface.end ());
		68
		69	// the by far most common case will be to insert
		70	// near the end, so little looping.
		71	while (pos != ns->ixface.begin ())
88	{	72	{
89	if (facesets[num].prefix)	73	--pos;
		74
		75	// sort within 2k bins, to slightly prefer smaller images
		76	if (pri > pos->pri \|\| (pri == pos->pri && (ix.ofs >> 11) <= (pos->ofs >> 11)))
90	{	77	{
91	for (q = 0; q < nrofpixmaps; q++)	78	++pos;
92	if (facesets[num].faces[q].data)	79	break;
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	}	80	}
102	}	81	}
103	}
104		82
105	/**	83	ns->ixface.insert (pos, ix);
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		84
129	if (!facesets[faceset].prefix)	85	#if 0
130	{	86	for (auto (i, ns->ixface.begin ()); i != ns->ixface.end (); ++i)
131	LOG (llevError, "get_face_fallback called with unused set (%d)?\n", faceset);	87	fprintf (stderr, "<%d,%d> ", i->pri, i->ofs);
132	return 0; /* use default set */	88	fprintf (stderr, "\n");
133	}	89	#endif
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	* Loads all the image types into memory.
178	*
179	* This way, we can easily send them to the client. We should really do something
180	* better than abort on any errors - on the other hand, these are all fatal
181	* to the server (can't work around them), but the abort just seems a bit
182	* messy (exit would probably be better.)
183	*
184	* Couple of notes: We assume that the faces are in a continous block.
185	* This works fine for now, but this could perhaps change in the future
186	*
187	* Function largely rewritten May 2000 to be more general purpose.
188	* The server itself does not care what the image data is - to the server,
189	* it is just data it needs to allocate. As such, the code is written
190	* to do such.
191	*/
192	void
193	read_client_images (void)
194	{
195	char filename[400];
196	char buf[HUGE_BUF];
197	char cp, cps[7];
198	FILE *infile;
199	int num, len, compressed, fileno, i, badline;
200
201	memset (facesets, 0, sizeof (facesets));
202	sprintf (filename, "%s/image_info", settings.datadir);
203	if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
204	{
205	LOG (llevError, "Unable to open %s\n", filename);
206	abort ();
207	}
208
209	while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
210	{
211	badline = 0;
212
213	if (buf[0] == '#')
214	continue;
215
216	if (!(cps[0] = strtok (buf, ":")))
217	badline = 1;
218
219	for (i = 1; i < 7; i++)
220	if (!(cps[i] = strtok (NULL, ":")))
221	badline = 1;
222
223	if (badline)
224	LOG (llevError, "Bad line in image_info file, ignoring line:\n %s", buf);
225	else
226	{
227	len = atoi (cps[0]);
228	if (len >= MAX_FACE_SETS)
229	{
230	LOG (llevError, "To high a setnum in image_info file: %d > %d\n", len, MAX_FACE_SETS);
231	abort ();
232	}
233	facesets[len].prefix = strdup (cps[1]);
234	facesets[len].fullname = strdup (cps[2]);
235	facesets[len].fallback = atoi (cps[3]);
236	facesets[len].size = strdup (cps[4]);
237	facesets[len].extension = strdup (cps[5]);
238	facesets[len].comment = strdup (cps[6]);
239	}
240	}
241
242	close_and_delete (infile, compressed);
243
244	for (i = 0; i < MAX_FACE_SETS; i++)
245	{
246	if (facesets[i].prefix)
247	check_faceset_fallback (i, MAX_FACE_SETS);
248	}
249
250	/* Loaded the faceset information - now need to load up the
251	* actual faces.
252	*/
253
254	for (fileno = 0; fileno < MAX_FACE_SETS; fileno++)
255	{
256	/* if prefix is not set, this is not used */
257	if (!facesets[fileno].prefix)
258	continue;
259
260	facesets[fileno].faces = (FaceInfo *) calloc (nrofpixmaps, sizeof (FaceInfo));
261
262	sprintf (filename, "%s/crossfire.%d", settings.datadir, fileno);
263	LOG (llevDebug, "Loading image file %s\n", filename);
264
265	if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
266	{
267	LOG (llevError, "Unable to open %s\n", filename);
268	abort ();
269	}
270
271	while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
272	{
273	if (strncmp (buf, "IMAGE ", 6) != 0)
274	{
275	LOG (llevError, "read_client_images:Bad image line - not IMAGE, instead\n%s", buf);
276	abort ();
277	}
278
279	num = atoi (buf + 6);
280	if (num < 0 \|\| num >= nrofpixmaps)
281	{
282	LOG (llevError, "read_client_images: Image num %d not in 0..%d\n%s", num, nrofpixmaps, buf);
283	abort ();
284	}
285
286	/* Skip accross the number data */
287	for (cp = buf + 6; *cp != ' '; cp++)
288	;
289
290	len = atoi (cp);
291	if (len == 0 \|\| len > MAX_IMAGE_SIZE)
292	{
293	LOG (llevError, "read_client_images: length not valid: %d > %d \n%s", len, MAX_IMAGE_SIZE, buf);
294	abort ();
295	}
296
297	/* We don't actualy care about the name of the image that
298	* is embedded in the image file, so just ignore it.
299	*/
300	facesets[fileno].faces[num].datalen = len;
301	facesets[fileno].faces[num].data = (uint8 *) malloc (len);
302	if ((i = fread (facesets[fileno].faces[num].data, len, 1, infile)) != 1)
303	{
304	LOG (llevError, "read_client_images: Did not read desired amount of data, wanted %d, got %d\n%s", len, i, buf);
305	abort ();
306	}
307
308	crc32 chksum;
309
310	for (i = 0; i < len; i++)
311	chksum (facesets[fileno].faces[num].data[i]);
312
313	facesets[fileno].faces[num].checksum = chksum;
314	}
315
316	close_and_delete (infile, compressed);
317	} /* For fileno < MAX_FACE_SETS */
318	}
319
320	/**
321	* Client tells us what type of faces it wants. Also sets
322	* the caching attribute.
323	*
324	*/
325	void
326	SetFaceMode (char buf, int len, client ns)
327	{
328	int mask = (atoi (buf) & CF_FACE_CACHE), mode = (atoi (buf) & ~CF_FACE_CACHE);
329
330	if (mode == CF_FACE_NONE)
331	ns->facecache = 1;
332	else if (mode != CF_FACE_PNG)
333	ns->send_packet_printf ("drawinfo %d %s", NDI_RED, "Warning - send unsupported face mode. Will use Png");
334
335	if (mask)
336	ns->facecache = 1;
337	}
338
339	/**
340	* Client has requested pixmap that it somehow missed getting.
341	* This will be called often if the client is
342	* caching images.
343	*/
344	void
345	SendFaceCmd (char buf, int len, client ns)
346	{
347	uint16 facenum = atoi (buf);
348
349	if (facenum != 0)
350	esrv_send_face (ns, facenum, 1);
351	}	90	}
352		91
353	/**	92	/**
354	* Sends a face to a client if they are in pixmap mode	93	* Sends a face to a client if they are in pixmap mode
355	* nothing gets sent in bitmap mode.	94	* nothing gets sent in bitmap mode.
…		…
357	* this is needed for the askface, in which we really do want to send the	96	* this is needed for the askface, in which we really do want to send the
358	* face (and askface is the only place that should be setting it). Otherwise,	97	* face (and askface is the only place that should be setting it). Otherwise,
359	* we look at the facecache, and if set, send the image name.	98	* we look at the facecache, and if set, send the image name.
360	*/	99	*/
361	void	100	void
362	esrv_send_face (client *ns, short face_num, int nocache)	101	client::send_face (faceidx facenum, int pri)
363	{	102	{
364	char fallback;	103	// never send face 0. ever. it does not exist.
		104	if (!facenum)
		105	return;
365		106
366	if (face_num <= 0 \|\| face_num >= nrofpixmaps)	107	faceinfo *f = face_info (facenum);
		108
		109	if (!f)
367	{	110	{
368	LOG (llevError, "esrv_send_face (%d) out of bounds??\n", face_num);	111	LOG (llevError \| logBacktrace, "client::send_face (%d) out of bounds??\n", facenum);
369	return;	112	return;
370	}	113	}
371		114
372	packet sl;	115	// refuse to send non-image faces
373	fallback = get_face_fallback (ns->faceset, face_num);	116	if (!fx_want [f->type])
		117	return;
374		118
375	if (facesets[fallback].faces[face_num].data == NULL)	119	if (faces_sent [facenum])
		120	return;
		121
		122	faces_sent[facenum] = true;
		123
		124	fxface.push_back (facenum);
		125	}
		126
		127	void client::flush_fx ()
		128	{
		129	while (!fxface.empty ())
		130	{
		131	packet fx ("fx");
		132	packet sx ("sx");
		133	int type = 0;
		134
		135	do
		136	{
		137	faceidx facenum = fxface.back (); fxface.pop_back ();
		138
		139	if (const faceinfo *f = face_info (facenum))
		140	{
		141	if (f->type != type)
		142	{
		143	type = f->type;
		144
		145	fx << ber32 (0)
		146	<< uint8 (1) << uint8 (type);
		147	}
		148
		149	const facedata *d = f->data (faceset);
		150
		151	fx << ber32 (facenum)
		152	<< data8 (d->chksum, CHKSUM_SIZE);
		153
		154	if (smoothing)
		155	{
		156	faceinfo *f = face_info (facenum);
		157
		158	if (f->smooth)
		159	{
		160	send_face (f->smooth, -110);
		161
		162	sx << ber32 (facenum)
		163	<< ber32 (f->smooth)
		164	<< ber32 (f->smoothlevel);
		165	}
		166	}
		167	}
		168	}
		169	while (!fxface.empty ()
		170	&& fx.room () > ber32::size + CHKSUM_SIZE + 1 + 3 /* type switch */
		171	&& sx.room () > ber32::size * 3);
		172
		173	send_packet (fx);
		174	if (sx.length () > 3) send_packet (sx);
376	{	175	}
377	LOG (llevError, "esrv_send_face: faces[%d].data == NULL\n", face_num);	176	}
		177
		178	// send all faces of this object to the client
		179	// this uses more bandwidth initially, but makes
		180	// animations look much smoother, and every client
		181	// is supposed to do client-side caching anyways.
		182	void
		183	client::send_faces (object *ob)
		184	{
		185	send_face (ob->face, 10);
		186
		187	if (ob->animation_id)
		188	{
		189	const animation &anim = ob->anim ();
		190
		191	for (int i = 0; i < anim.num_animations; i++)
		192	send_face (anim.faces [i], -10);
		193	}
		194	}
		195
		196	/**
		197	* Need to send an animation sequence to the client.
		198	* We will send appropriate face commands to the client if we haven't
		199	* sent them the face yet (this can become quite costly in terms of
		200	* how much we are sending - on the other hand, this should only happen
		201	* when the player logs in and picks stuff up.
		202	*/
		203	void
		204	client::send_animation (short anim_num)
		205	{
		206	/* Do some checking on the anim_num we got. Note that the animations
		207	* are added in contiguous order, so if the number is in the valid
		208	* range, it must be a valid animation.
		209	*/
		210	if (anim_num < 0 \|\| anim_num >= animations.size ())
		211	{
		212	LOG (llevError, "esrv_send_anim (%d) out of bounds??\n", anim_num);
378	return;	213	return;
379	}	214	}
380		215
381	if (ns->facecache && !nocache)	216	packet sl ("anim");
382	{
383	sl << (ns->image2 ? "face2 " : "face1 ")
384	<< uint16 (face_num);
385		217
386	if (ns->image2)
387	sl << uint8 (fallback);
388
389	sl << uint32 (facesets[fallback].faces[face_num].checksum)
390	<< new_faces[face_num].name;
391
392	ns->send_packet (sl);
393	}
394	else
395	{
396	sl << (ns->image2 ? "image2 " : "image ")
397	<< uint32 (face_num);
398
399	if (ns->image2)
400	sl << uint8 (fallback);
401
402	sl << uint32 (facesets[fallback].faces[face_num].datalen)
403	<< data (facesets[fallback].faces[face_num].data, facesets[fallback].faces[face_num].datalen);
404
405	ns->send_packet (sl);
406	}
407
408	ns->faces_sent[face_num] \|= NS_FACESENT_FACE;
409	}
410
411	/**
412	* Sends the number of images, checksum of the face file,
413	* and the image_info file information. See the doc/Developers/protocol
414	* if you want further detail.
415	*/
416
417	void
418	send_image_info (client ns, char params)
419	{
420	packet sl;
421
422	sl.printf ("replyinfo image_info\n%d\n%u\n", nrofpixmaps - 1, (unsigned int)bmaps_checksum);
423
424	for (int i = 0; i < MAX_FACE_SETS; i++)
425	if (facesets[i].prefix)
426	sl.printf ("%d:%s:%s:%d:%s:%s:%s", i,
427	facesets[i].prefix, facesets[i].fullname , facesets[i].fallback,
428	facesets[i].size , facesets[i].extension, facesets[i].comment);
429
430	ns->send_packet (sl);
431	}
432
433	/**
434	* Sends requested face information.
435	* \param ns socket to send to
436	* \param params contains first and last index of face
437	*
438	* For each image in [start..stop] sends
439	* - checksum
440	* - name
441	*/
442	void
443	send_image_sums (client ns, char params)
444	{
445	int start, stop;
446	char *cp;
447
448	packet sl;
449
450	start = atoi (params);
451	for (cp = params; *cp != '\0'; cp++)
452	if (*cp == ' ')
453	break;
454
455	stop = atoi (cp);
456	if (stop < start \|\| *cp == '\0' \|\| (stop - start) > 1000 \|\| stop >= nrofpixmaps)
457	{
458	sl.printf ("replyinfo image_sums %d %d", start, stop);
459	ns->send_packet (sl);
460	sl.reset ();
461	return;
462	}
463
464	sl.printf ("replyinfo image_sums %d %d ", start, stop);
465
466	for (int i = start; i <= stop; i++)
467	{
468	ns->faces_sent[i] \|= NS_FACESENT_FACE;
469
470	int qq = get_face_fallback (ns->faceset, i);
471
472	sl << uint16 (i)	218	sl << uint16 (anim_num)
473	<< uint32 (facesets[qq].faces[i].checksum)	219	<< uint16 (0); /* flags - not used right now */
474	<< uint8 (qq)
475	<< data8 (&new_faces[i].name, new_faces[i].name.length () + 1);
476	}
477		220
478	/* It would make more sense to catch this pre-emptively in the code above.	221	/* Build up the list of faces. Also, send any information (ie, the
479	* however, if this really happens, we probably just want to cut down the	222	* the face itself) down to the client.
480	* size to less than 1000, since that is what we claim the protocol would
481	* support.
482	*/	223	*/
483	if (sl.length () >= MAXSOCKBUF)	224	for (int i = 0; i < animations[anim_num].num_animations; i++)
484	{
485	LOG (llevError, "send_image_send: buffer overrun, %d > %d\n", sl.length (), MAXSOCKBUF);
486	abort ();
487	}	225	{
		226	send_face (animations[anim_num].faces[i], -20);
		227	sl << uint16 (animations[anim_num].faces[i]);
		228	}
488		229
489	ns->send_packet (sl);	230	send_packet (sl);
490	}
491		231
		232	anims_sent[anim_num] = 1;
		233	}
		234

Diff Legend

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

Comparing deliantra/server/socket/image.C (file contents): Revision 1.22 by pippijn, Thu Mar 1 12:28:17 2007 UTC vs. Revision 1.61 by root, Wed Nov 4 13:46:37 2009 UTC

Diff Legend

Comparing deliantra/server/socket/image.C (file contents):
Revision 1.22 by pippijn, Thu Mar 1 12:28:17 2007 UTC vs.
Revision 1.61 by root, Wed Nov 4 13:46:37 2009 UTC