server/socket/image.C


/*
 * static char *rcsid_init_c =
 *    "$Id: image.C,v 1.2 2006-08-29 08:01:38 root Exp $";
 */

/*
    CrossFire, A Multiplayer game for X-windows

    Copyright (C) 2001 Mark Wedel
    Copyright (C) 1992 Frank Tore Johansen

    This program is free software; you can redistribute it and/or modify
    it under the terms of the GNU General Public License as published by
    the Free Software Foundation; either version 2 of the License, or
    (at your option) any later version.

    This program is distributed in the hope that it will be useful,
    but WITHOUT ANY WARRANTY; without even the implied warranty of
    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
    GNU General Public License for more details.

    You should have received a copy of the GNU General Public License
    along with this program; if not, write to the Free Software
    Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.

    The author can be reached via e-mail to crossfire-devel@real-time.com
*/

/** \file
 * Image related communication
 *
 *  \date 2003-12-02
 *
 * This file deals with the image related communication to the
 * client.  I've located all the functions in this file - this
 * localizes it more, and means that we don't need to declare
 * things like all the structures as globals.
 */

#include <global.h>
#include <sproto.h>

#include <newclient.h>
#include <newserver.h>
#include <loader.h>

#define MAX_FACE_SETS   20  /**< Maximum number of image sets the program will handle */

/** Information about one image */
typedef struct FaceInfo
{

  uint8 *data;              /**< image data */

  uint16 datalen;           /**< length of the xpm data */

  uint32 checksum;          /**< Checksum of face data */
} FaceInfo;

/** Information about one face set */
typedef struct
{

  char *prefix;         /**< */
  char *fullname;

  uint8 fallback;       /**< faceset to use when an image is not found in this faceset */
  char *size;
  char *extension;
  char *comment;

  FaceInfo *faces;      /**< images in this faceset */
} FaceSets;

static FaceSets facesets[MAX_FACE_SETS];    /**< All facesets */

/**
 * Checks specified faceset is valid
 * \param fsn faceset number
 */
int
is_valid_faceset (int fsn)
{
  if (fsn >= 0 && fsn < MAX_FACE_SETS && facesets[fsn].prefix)
    return TRUE;
  return FALSE;
}

/**
 * Frees all faceset information
 */
void
free_socket_images (void)
{
  int num, q;

  for (num = 0; num < MAX_FACE_SETS; num++)
    {
      if (facesets[num].prefix)
        {
          for (q = 0; q < nrofpixmaps; q++)
            if (facesets[num].faces[q].data)
              free (facesets[num].faces[q].data);
          free (facesets[num].prefix);
          free (facesets[num].fullname);
          free (facesets[num].size);
          free (facesets[num].extension);
          free (facesets[num].comment);
          free (facesets[num].faces);
        }
    }
}

/**
 * This returns the set we will actually use when sending
 * a face.  This is used because the image files may be sparse.
 * This function is recursive.  imageno is the face number we are
 * trying to send
 *
 * If face is not found in specified faceset, tries with 'fallback' faceset.
 *
 * \param faceset faceset to check
 * \param imageno image number
 *
 */
static int
get_face_fallback (int faceset, int imageno)
{
  /* faceset 0 is supposed to have every image, so just return.  Doing
   * so also prevents infinite loops in the case if it not having
   * the face, but in that case, we are likely to crash when we try
   * to access the data, but that is probably preferable to an infinite
   * loop.
   */
  if (faceset == 0)
    return 0;

  if (!facesets[faceset].prefix)
    {
      LOG (llevError, "get_face_fallback called with unused set (%d)?\n", faceset);
      return 0;                 /* use default set */
    }
  if (facesets[faceset].faces[imageno].data)
    return faceset;
  return get_face_fallback (facesets[faceset].fallback, imageno);
}

/**
 * Checks fallback are correctly defined.
 * This is a simple recursive function that makes sure the fallbacks
 * are all proper (eg, the fall back to defined sets, and also
 * eventually fall back to 0).  At the top level, togo is set to MAX_FACE_SETS,
 * if togo gets to zero, it means we have a loop.
 * This is only run when we first load the facesets.
 */
static void
check_faceset_fallback (int faceset, int togo)
{
  int fallback = facesets[faceset].fallback;

  /* proper case - falls back to base set */
  if (fallback == 0)
    return;

  if (!facesets[fallback].prefix)
    {
      LOG (llevError, "Face set %d falls to non set faceset %d\n", faceset, fallback);
      abort ();
    }
  togo--;
  if (togo == 0)
    {
      LOG (llevError, "Infinite loop found in facesets. aborting.\n");
      abort ();
    }
  check_faceset_fallback (fallback, togo);
}

#define MAX_IMAGE_SIZE 10000

/**
 * Loads all the image types into memory.
 *
 *  This  way, we can easily send them to the client.  We should really do something
 * better than abort on any errors - on the other hand, these are all fatal
 * to the server (can't work around them), but the abort just seems a bit
 * messy (exit would probably be better.)
 *
 * Couple of notes:  We assume that the faces are in a continous block.
 * This works fine for now, but this could perhaps change in the future
 *
 * Function largely rewritten May 2000 to be more general purpose.
 * The server itself does not care what the image data is - to the server,
 * it is just data it needs to allocate.  As such, the code is written
 * to do such.
 */

void
read_client_images (void)
{
  char filename[400];
  char buf[HUGE_BUF];
  char *cp, *cps[7];
  FILE *infile;
  int num, len, compressed, fileno, i, badline;

  memset (facesets, 0, sizeof (facesets));
  sprintf (filename, "%s/image_info", settings.datadir);
  if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
    {
      LOG (llevError, "Unable to open %s\n", filename);
      abort ();
    }
  while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
    {
      badline = 0;

      if (buf[0] == '#')
        continue;
      if (!(cps[0] = strtok (buf, ":")))
        badline = 1;
      for (i = 1; i < 7; i++)
        {
          if (!(cps[i] = strtok (NULL, ":")))
            badline = 1;
        }
      if (badline)
        {
          LOG (llevError, "Bad line in image_info file, ignoring line:\n  %s", buf);
        }
      else
        {
          len = atoi (cps[0]);
          if (len >= MAX_FACE_SETS)
            {
              LOG (llevError, "To high a setnum in image_info file: %d > %d\n", len, MAX_FACE_SETS);
              abort ();
            }
          facesets[len].prefix = strdup_local (cps[1]);
          facesets[len].fullname = strdup_local (cps[2]);
          facesets[len].fallback = atoi (cps[3]);
          facesets[len].size = strdup_local (cps[4]);
          facesets[len].extension = strdup_local (cps[5]);
          facesets[len].comment = strdup_local (cps[6]);
        }
    }
  close_and_delete (infile, compressed);
  for (i = 0; i < MAX_FACE_SETS; i++)
    {
      if (facesets[i].prefix)
        check_faceset_fallback (i, MAX_FACE_SETS);
    }
  /* Loaded the faceset information - now need to load up the
   * actual faces.
   */

  for (fileno = 0; fileno < MAX_FACE_SETS; fileno++)
    {
      /* if prefix is not set, this is not used */
      if (!facesets[fileno].prefix)
        continue;
      facesets[fileno].faces = (FaceInfo *) calloc (nrofpixmaps, sizeof (FaceInfo));

      sprintf (filename, "%s/crossfire.%d", settings.datadir, fileno);
      LOG (llevDebug, "Loading image file %s\n", filename);

      if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
        {
          LOG (llevError, "Unable to open %s\n", filename);
          abort ();
        }
      while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
        {
          if (strncmp (buf, "IMAGE ", 6) != 0)
            {
              LOG (llevError, "read_client_images:Bad image line - not IMAGE, instead\n%s", buf);
              abort ();
            }
          num = atoi (buf + 6);
          if (num < 0 || num >= nrofpixmaps)
            {
              LOG (llevError, "read_client_images: Image num %d not in 0..%d\n%s", num, nrofpixmaps, buf);
              abort ();
            }
          /* Skip accross the number data */
          for (cp = buf + 6; *cp != ' '; cp++);
          len = atoi (cp);
          if (len == 0 || len > MAX_IMAGE_SIZE)
            {
              LOG (llevError, "read_client_images: length not valid: %d > %d \n%s", len, MAX_IMAGE_SIZE, buf);
              abort ();
            }
          /* We don't actualy care about the name if the image that
           * is embedded in the image file, so just ignore it.
           */
          facesets[fileno].faces[num].datalen = len;
          facesets[fileno].faces[num].data = (uint8 *) malloc (len);
          if ((i = fread (facesets[fileno].faces[num].data, len, 1, infile)) != 1)
            {
              LOG (llevError, "read_client_images: Did not read desired amount of data, wanted %d, got %d\n%s", len, i, buf);
              abort ();
            }
          facesets[fileno].faces[num].checksum = 0;
          for (i = 0; i < len; i++)
            {
              ROTATE_RIGHT (facesets[fileno].faces[num].checksum);
              facesets[fileno].faces[num].checksum += facesets[fileno].faces[num].data[i];
              facesets[fileno].faces[num].checksum &= 0xffffffff;
            }
        }
      close_and_delete (infile, compressed);
    }                           /* For fileno < MAX_FACE_SETS */
}

/**
 * Client tells us what type of faces it wants.  Also sets
 * the caching attribute.
 *
 */

void
SetFaceMode (char *buf, int len, NewSocket * ns)
{
  char tmp[256];

  int mask = (atoi (buf) & CF_FACE_CACHE), mode = (atoi (buf) & ~CF_FACE_CACHE);

  if (mode == CF_FACE_NONE)
    {
      ns->facecache = 1;
    }
  else if (mode != CF_FACE_PNG)
    {
      sprintf (tmp, "drawinfo %d %s", NDI_RED, "Warning - send unsupported face mode.  Will use Png");
      Write_String_To_Socket (ns, tmp, strlen (tmp));
#ifdef ESRV_DEBUG
      LOG (llevDebug, "SetFaceMode: Invalid mode from client: %d\n", mode);
#endif
    }
  if (mask)
    {
      ns->facecache = 1;
    }
}

/**
 * Client has requested pixmap that it somehow missed getting.
 * This will be called often if the client is
 * caching images.
 */

void
SendFaceCmd (char *buff, int len, NewSocket * ns)
{
  long tmpnum = atoi (buff);
  short facenum = tmpnum & 0xffff;

  if (facenum != 0)
    esrv_send_face (ns, facenum, 1);
}

/**
 * Sends a face to a client if they are in pixmap mode
 * nothing gets sent in bitmap mode. 
 * If nocache is true (nonzero), ignore the cache setting from the client -
 * this is needed for the askface, in which we really do want to send the
 * face (and askface is the only place that should be setting it).  Otherwise,
 * we look at the facecache, and if set, send the image name.
 */

void
esrv_send_face (NewSocket * ns, short face_num, int nocache)
{
  SockList sl;
  char fallback;

  if (face_num <= 0 || face_num >= nrofpixmaps)
    {
      LOG (llevError, "esrv_send_face (%d) out of bounds??\n", face_num);
      return;
    }

  sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
  fallback = get_face_fallback (ns->faceset, face_num);

  if (facesets[fallback].faces[face_num].data == NULL)
    {
      LOG (llevError, "esrv_send_face: faces[%d].data == NULL\n", face_num);
      return;
    }

  if (ns->facecache && !nocache)
    {
      if (ns->image2)
        strcpy ((char *) sl.buf, "face2 ");
      else if (ns->sc_version >= 1026)
        strcpy ((char *) sl.buf, "face1 ");
      else
        strcpy ((char *) sl.buf, "face ");

      sl.len = strlen ((const char *) sl.buf);
      SockList_AddShort (&sl, face_num);
      if (ns->image2)
        SockList_AddChar (&sl, fallback);
      if (ns->sc_version >= 1026)
        SockList_AddInt (&sl, facesets[fallback].faces[face_num].checksum);
      strcpy ((char *) sl.buf + sl.len, new_faces[face_num].name);
      sl.len += strlen (new_faces[face_num].name);
      Send_With_Handling (ns, &sl);
    }
  else
    {
      if (ns->image2)
        strcpy ((char *) sl.buf, "image2 ");
      else
        strcpy ((char *) sl.buf, "image ");
      sl.len = strlen ((char *) sl.buf);
      SockList_AddInt (&sl, face_num);
      if (ns->image2)
        SockList_AddChar (&sl, fallback);
      SockList_AddInt (&sl, facesets[fallback].faces[face_num].datalen);
      memcpy (sl.buf + sl.len, facesets[fallback].faces[face_num].data, facesets[fallback].faces[face_num].datalen);
      sl.len += facesets[fallback].faces[face_num].datalen;
      Send_With_Handling (ns, &sl);
    }
  ns->faces_sent[face_num] |= NS_FACESENT_FACE;
  free (sl.buf);
}

/**
 * Sends the number of images, checksum of the face file,
 * and the image_info file information.  See the doc/Developers/protocol
 * if you want further detail.
 */

void
send_image_info (NewSocket * ns, char *params)
{
  SockList sl;
  int i;

  sl.buf = (unsigned char *) malloc (MAXSOCKBUF);

  sprintf ((char *) sl.buf, "replyinfo image_info\n%d\n%d\n", nrofpixmaps - 1, bmaps_checksum);
  for (i = 0; i < MAX_FACE_SETS; i++)
    {
      if (facesets[i].prefix)
        {
          sprintf ((char *) sl.buf + strlen ((const char *) sl.buf), "%d:%s:%s:%d:%s:%s:%s",
                   i, facesets[i].prefix, facesets[i].fullname, facesets[i].fallback,
                   facesets[i].size, facesets[i].extension, facesets[i].comment);
        }
    }
  sl.len = strlen ((const char *) sl.buf);
  Send_With_Handling (ns, &sl);
  free (sl.buf);
}

/**
 * Sends requested face information.
 * \param ns socket to send to
 * \param params contains first and last index of face
 *
 * For each image in [start..stop] sends
 *  - checksum
 *  - name
 */
void
send_image_sums (NewSocket * ns, char *params)
{
  int start, stop;
  short i;
  char qq;
  char *cp, buf[MAX_BUF];
  SockList sl;

  sl.buf = (unsigned char *) malloc (MAXSOCKBUF);

  start = atoi (params);
  for (cp = params; *cp != '\0'; cp++)
    if (*cp == ' ')
      break;

  stop = atoi (cp);
  if (stop < start || *cp == '\0' || (stop - start) > 1000 || stop >= nrofpixmaps)
    {
      sprintf (buf, "replyinfo image_sums %d %d", start, stop);
      cs_write_string (ns, buf, strlen (buf));
      return;
    }
  sprintf ((char *) sl.buf, "replyinfo image_sums %d %d ", start, stop);

  sl.len = strlen ((const char *) sl.buf);

  for (i = start; i <= stop; i++)
    {
      SockList_AddShort (&sl, i);
      ns->faces_sent[i] |= NS_FACESENT_FACE;

      qq = get_face_fallback (ns->faceset, i);
      SockList_AddInt (&sl, facesets[qq].faces[i].checksum);
      SockList_AddChar (&sl, qq);

      qq = strlen (new_faces[i].name);
      SockList_AddChar (&sl, (char) (qq + 1));
      strcpy ((char *) sl.buf + sl.len, new_faces[i].name);
      sl.len += qq;
      SockList_AddChar (&sl, 0);
    }
  /* It would make more sense to catch this pre-emptively in the code above.
   * however, if this really happens, we probably just want to cut down the
   * size to less than 1000, since that is what we claim the protocol would
   * support.
   */
  if (sl.len >= MAXSOCKBUF)
    {
      LOG (llevError, "send_image_send: buffer overrun, %d > %d\n", sl.len, MAXSOCKBUF);
      abort ();
    }
  Send_With_Handling (ns, &sl);
  free (sl.buf);
}
Revision:	1.3
Committed:	Sun Sep 10 13:43:33 2006 UTC (17 years, 9 months ago) by root
Content type:	text/plain
Branch:	MAIN
Changes since 1.2:	+327 -268 lines
Log Message:	indent
#	Content
1
2	/*
3	* static char *rcsid_init_c =
4	* "$Id: image.C,v 1.2 2006-08-29 08:01:38 root Exp $";
5	*/
6
7	/*
8	CrossFire, A Multiplayer game for X-windows
9
10	Copyright (C) 2001 Mark Wedel
11	Copyright (C) 1992 Frank Tore Johansen
12
13	This program is free software; you can redistribute it and/or modify
14	it under the terms of the GNU General Public License as published by
15	the Free Software Foundation; either version 2 of the License, or
16	(at your option) any later version.
17
18	This program is distributed in the hope that it will be useful,
19	but WITHOUT ANY WARRANTY; without even the implied warranty of
20	MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
21	GNU General Public License for more details.
22
23	You should have received a copy of the GNU General Public License
24	along with this program; if not, write to the Free Software
25	Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
26
27	The author can be reached via e-mail to crossfire-devel@real-time.com
28	*/
29
30	/** \file
31	* Image related communication
32	*
33	* \date 2003-12-02
34	*
35	* This file deals with the image related communication to the
36	* client. I've located all the functions in this file - this
37	* localizes it more, and means that we don't need to declare
38	* things like all the structures as globals.
39	*/
40
41	#include <global.h>
42	#include <sproto.h>
43
44	#include <newclient.h>
45	#include <newserver.h>
46	#include <loader.h>
47
48	#define MAX_FACE_SETS 20 /*< Maximum number of image sets the program will handle /
49
50	/** Information about one image */
51	typedef struct FaceInfo
52	{
53
54	uint8 data; /< image data /
55
56	uint16 datalen; /*< length of the xpm data /
57
58	uint32 checksum; /*< Checksum of face data /
59	} FaceInfo;
60
61	/** Information about one face set */
62	typedef struct
63	{
64
65	char prefix; /< /
66	char *fullname;
67
68	uint8 fallback; /*< faceset to use when an image is not found in this faceset /
69	char *size;
70	char *extension;
71	char *comment;
72
73	FaceInfo faces; /< images in this faceset /
74	} FaceSets;
75
76	static FaceSets facesets[MAX_FACE_SETS]; /*< All facesets /
77
78	/**
79	* Checks specified faceset is valid
80	* \param fsn faceset number
81	*/
82	int
83	is_valid_faceset (int fsn)
84	{
85	if (fsn >= 0 && fsn < MAX_FACE_SETS && facesets[fsn].prefix)
86	return TRUE;
87	return FALSE;
88	}
89
90	/**
91	* Frees all faceset information
92	*/
93	void
94	free_socket_images (void)
95	{
96	int num, q;
97
98	for (num = 0; num < MAX_FACE_SETS; num++)
99	{
100	if (facesets[num].prefix)
101	{
102	for (q = 0; q < nrofpixmaps; q++)
103	if (facesets[num].faces[q].data)
104	free (facesets[num].faces[q].data);
105	free (facesets[num].prefix);
106	free (facesets[num].fullname);
107	free (facesets[num].size);
108	free (facesets[num].extension);
109	free (facesets[num].comment);
110	free (facesets[num].faces);
111	}
112	}
113	}
114
115	/**
116	* This returns the set we will actually use when sending
117	* a face. This is used because the image files may be sparse.
118	* This function is recursive. imageno is the face number we are
119	* trying to send
120	*
121	* If face is not found in specified faceset, tries with 'fallback' faceset.
122	*
123	* \param faceset faceset to check
124	* \param imageno image number
125	*
126	*/
127	static int
128	get_face_fallback (int faceset, int imageno)
129	{
130	/* faceset 0 is supposed to have every image, so just return. Doing
131	* so also prevents infinite loops in the case if it not having
132	* the face, but in that case, we are likely to crash when we try
133	* to access the data, but that is probably preferable to an infinite
134	* loop.
135	*/
136	if (faceset == 0)
137	return 0;
138
139	if (!facesets[faceset].prefix)
140	{
141	LOG (llevError, "get_face_fallback called with unused set (%d)?\n", faceset);
142	return 0; /* use default set */
143	}
144	if (facesets[faceset].faces[imageno].data)
145	return faceset;
146	return get_face_fallback (facesets[faceset].fallback, imageno);
147	}
148
149	/**
150	* Checks fallback are correctly defined.
151	* This is a simple recursive function that makes sure the fallbacks
152	* are all proper (eg, the fall back to defined sets, and also
153	* eventually fall back to 0). At the top level, togo is set to MAX_FACE_SETS,
154	* if togo gets to zero, it means we have a loop.
155	* This is only run when we first load the facesets.
156	*/
157	static void
158	check_faceset_fallback (int faceset, int togo)
159	{
160	int fallback = facesets[faceset].fallback;
161
162	/* proper case - falls back to base set */
163	if (fallback == 0)
164	return;
165
166	if (!facesets[fallback].prefix)
167	{
168	LOG (llevError, "Face set %d falls to non set faceset %d\n", faceset, fallback);
169	abort ();
170	}
171	togo--;
172	if (togo == 0)
173	{
174	LOG (llevError, "Infinite loop found in facesets. aborting.\n");
175	abort ();
176	}
177	check_faceset_fallback (fallback, togo);
178	}
179
180	#define MAX_IMAGE_SIZE 10000
181
182	/**
183	* Loads all the image types into memory.
184	*
185	* This way, we can easily send them to the client. We should really do something
186	* better than abort on any errors - on the other hand, these are all fatal
187	* to the server (can't work around them), but the abort just seems a bit
188	* messy (exit would probably be better.)
189	*
190	* Couple of notes: We assume that the faces are in a continous block.
191	* This works fine for now, but this could perhaps change in the future
192	*
193	* Function largely rewritten May 2000 to be more general purpose.
194	* The server itself does not care what the image data is - to the server,
195	* it is just data it needs to allocate. As such, the code is written
196	* to do such.
197	*/
198
199	void
200	read_client_images (void)
201	{
202	char filename[400];
203	char buf[HUGE_BUF];
204	char cp, cps[7];
205	FILE *infile;
206	int num, len, compressed, fileno, i, badline;
207
208	memset (facesets, 0, sizeof (facesets));
209	sprintf (filename, "%s/image_info", settings.datadir);
210	if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
211	{
212	LOG (llevError, "Unable to open %s\n", filename);
213	abort ();
214	}
215	while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
216	{
217	badline = 0;
218
219	if (buf[0] == '#')
220	continue;
221	if (!(cps[0] = strtok (buf, ":")))
222	badline = 1;
223	for (i = 1; i < 7; i++)
224	{
225	if (!(cps[i] = strtok (NULL, ":")))
226	badline = 1;
227	}
228	if (badline)
229	{
230	LOG (llevError, "Bad line in image_info file, ignoring line:\n %s", buf);
231	}
232	else
233	{
234	len = atoi (cps[0]);
235	if (len >= MAX_FACE_SETS)
236	{
237	LOG (llevError, "To high a setnum in image_info file: %d > %d\n", len, MAX_FACE_SETS);
238	abort ();
239	}
240	facesets[len].prefix = strdup_local (cps[1]);
241	facesets[len].fullname = strdup_local (cps[2]);
242	facesets[len].fallback = atoi (cps[3]);
243	facesets[len].size = strdup_local (cps[4]);
244	facesets[len].extension = strdup_local (cps[5]);
245	facesets[len].comment = strdup_local (cps[6]);
246	}
247	}
248	close_and_delete (infile, compressed);
249	for (i = 0; i < MAX_FACE_SETS; i++)
250	{
251	if (facesets[i].prefix)
252	check_faceset_fallback (i, MAX_FACE_SETS);
253	}
254	/* Loaded the faceset information - now need to load up the
255	* actual faces.
256	*/
257
258	for (fileno = 0; fileno < MAX_FACE_SETS; fileno++)
259	{
260	/* if prefix is not set, this is not used */
261	if (!facesets[fileno].prefix)
262	continue;
263	facesets[fileno].faces = (FaceInfo *) calloc (nrofpixmaps, sizeof (FaceInfo));
264
265	sprintf (filename, "%s/crossfire.%d", settings.datadir, fileno);
266	LOG (llevDebug, "Loading image file %s\n", filename);
267
268	if ((infile = open_and_uncompress (filename, 0, &compressed)) == NULL)
269	{
270	LOG (llevError, "Unable to open %s\n", filename);
271	abort ();
272	}
273	while (fgets (buf, HUGE_BUF - 1, infile) != NULL)
274	{
275	if (strncmp (buf, "IMAGE ", 6) != 0)
276	{
277	LOG (llevError, "read_client_images:Bad image line - not IMAGE, instead\n%s", buf);
278	abort ();
279	}
280	num = atoi (buf + 6);
281	if (num < 0 \|\| num >= nrofpixmaps)
282	{
283	LOG (llevError, "read_client_images: Image num %d not in 0..%d\n%s", num, nrofpixmaps, buf);
284	abort ();
285	}
286	/* Skip accross the number data */
287	for (cp = buf + 6; *cp != ' '; cp++);
288	len = atoi (cp);
289	if (len == 0 \|\| len > MAX_IMAGE_SIZE)
290	{
291	LOG (llevError, "read_client_images: length not valid: %d > %d \n%s", len, MAX_IMAGE_SIZE, buf);
292	abort ();
293	}
294	/* We don't actualy care about the name if the image that
295	* is embedded in the image file, so just ignore it.
296	*/
297	facesets[fileno].faces[num].datalen = len;
298	facesets[fileno].faces[num].data = (uint8 *) malloc (len);
299	if ((i = fread (facesets[fileno].faces[num].data, len, 1, infile)) != 1)
300	{
301	LOG (llevError, "read_client_images: Did not read desired amount of data, wanted %d, got %d\n%s", len, i, buf);
302	abort ();
303	}
304	facesets[fileno].faces[num].checksum = 0;
305	for (i = 0; i < len; i++)
306	{
307	ROTATE_RIGHT (facesets[fileno].faces[num].checksum);
308	facesets[fileno].faces[num].checksum += facesets[fileno].faces[num].data[i];
309	facesets[fileno].faces[num].checksum &= 0xffffffff;
310	}
311	}
312	close_and_delete (infile, compressed);
313	} /* For fileno < MAX_FACE_SETS */
314	}
315
316	/**
317	* Client tells us what type of faces it wants. Also sets
318	* the caching attribute.
319	*
320	*/
321
322	void
323	SetFaceMode (char buf, int len, NewSocket ns)
324	{
325	char tmp[256];
326
327	int mask = (atoi (buf) & CF_FACE_CACHE), mode = (atoi (buf) & ~CF_FACE_CACHE);
328
329	if (mode == CF_FACE_NONE)
330	{
331	ns->facecache = 1;
332	}
333	else if (mode != CF_FACE_PNG)
334	{
335	sprintf (tmp, "drawinfo %d %s", NDI_RED, "Warning - send unsupported face mode. Will use Png");
336	Write_String_To_Socket (ns, tmp, strlen (tmp));
337	#ifdef ESRV_DEBUG
338	LOG (llevDebug, "SetFaceMode: Invalid mode from client: %d\n", mode);
339	#endif
340	}
341	if (mask)
342	{
343	ns->facecache = 1;
344	}
345	}
346
347	/**
348	* Client has requested pixmap that it somehow missed getting.
349	* This will be called often if the client is
350	* caching images.
351	*/
352
353	void
354	SendFaceCmd (char buff, int len, NewSocket ns)
355	{
356	long tmpnum = atoi (buff);
357	short facenum = tmpnum & 0xffff;
358
359	if (facenum != 0)
360	esrv_send_face (ns, facenum, 1);
361	}
362
363	/**
364	* Sends a face to a client if they are in pixmap mode
365	* nothing gets sent in bitmap mode.
366	* If nocache is true (nonzero), ignore the cache setting from the client -
367	* this is needed for the askface, in which we really do want to send the
368	* face (and askface is the only place that should be setting it). Otherwise,
369	* we look at the facecache, and if set, send the image name.
370	*/
371
372	void
373	esrv_send_face (NewSocket * ns, short face_num, int nocache)
374	{
375	SockList sl;
376	char fallback;
377
378	if (face_num <= 0 \|\| face_num >= nrofpixmaps)
379	{
380	LOG (llevError, "esrv_send_face (%d) out of bounds??\n", face_num);
381	return;
382	}
383
384	sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
385	fallback = get_face_fallback (ns->faceset, face_num);
386
387	if (facesets[fallback].faces[face_num].data == NULL)
388	{
389	LOG (llevError, "esrv_send_face: faces[%d].data == NULL\n", face_num);
390	return;
391	}
392
393	if (ns->facecache && !nocache)
394	{
395	if (ns->image2)
396	strcpy ((char *) sl.buf, "face2 ");
397	else if (ns->sc_version >= 1026)
398	strcpy ((char *) sl.buf, "face1 ");
399	else
400	strcpy ((char *) sl.buf, "face ");
401
402	sl.len = strlen ((const char *) sl.buf);
403	SockList_AddShort (&sl, face_num);
404	if (ns->image2)
405	SockList_AddChar (&sl, fallback);
406	if (ns->sc_version >= 1026)
407	SockList_AddInt (&sl, facesets[fallback].faces[face_num].checksum);
408	strcpy ((char *) sl.buf + sl.len, new_faces[face_num].name);
409	sl.len += strlen (new_faces[face_num].name);
410	Send_With_Handling (ns, &sl);
411	}
412	else
413	{
414	if (ns->image2)
415	strcpy ((char *) sl.buf, "image2 ");
416	else
417	strcpy ((char *) sl.buf, "image ");
418	sl.len = strlen ((char *) sl.buf);
419	SockList_AddInt (&sl, face_num);
420	if (ns->image2)
421	SockList_AddChar (&sl, fallback);
422	SockList_AddInt (&sl, facesets[fallback].faces[face_num].datalen);
423	memcpy (sl.buf + sl.len, facesets[fallback].faces[face_num].data, facesets[fallback].faces[face_num].datalen);
424	sl.len += facesets[fallback].faces[face_num].datalen;
425	Send_With_Handling (ns, &sl);
426	}
427	ns->faces_sent[face_num] \|= NS_FACESENT_FACE;
428	free (sl.buf);
429	}
430
431	/**
432	* Sends the number of images, checksum of the face file,
433	* and the image_info file information. See the doc/Developers/protocol
434	* if you want further detail.
435	*/
436
437	void
438	send_image_info (NewSocket * ns, char *params)
439	{
440	SockList sl;
441	int i;
442
443	sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
444
445	sprintf ((char *) sl.buf, "replyinfo image_info\n%d\n%d\n", nrofpixmaps - 1, bmaps_checksum);
446	for (i = 0; i < MAX_FACE_SETS; i++)
447	{
448	if (facesets[i].prefix)
449	{
450	sprintf ((char ) sl.buf + strlen ((const char ) sl.buf), "%d:%s:%s:%d:%s:%s:%s",
451	i, facesets[i].prefix, facesets[i].fullname, facesets[i].fallback,
452	facesets[i].size, facesets[i].extension, facesets[i].comment);
453	}
454	}
455	sl.len = strlen ((const char *) sl.buf);
456	Send_With_Handling (ns, &sl);
457	free (sl.buf);
458	}
459
460	/**
461	* Sends requested face information.
462	* \param ns socket to send to
463	* \param params contains first and last index of face
464	*
465	* For each image in [start..stop] sends
466	* - checksum
467	* - name
468	*/
469	void
470	send_image_sums (NewSocket * ns, char *params)
471	{
472	int start, stop;
473	short i;
474	char qq;
475	char *cp, buf[MAX_BUF];
476	SockList sl;
477
478	sl.buf = (unsigned char *) malloc (MAXSOCKBUF);
479
480	start = atoi (params);
481	for (cp = params; *cp != '\0'; cp++)
482	if (*cp == ' ')
483	break;
484
485	stop = atoi (cp);
486	if (stop < start \|\| *cp == '\0' \|\| (stop - start) > 1000 \|\| stop >= nrofpixmaps)
487	{
488	sprintf (buf, "replyinfo image_sums %d %d", start, stop);
489	cs_write_string (ns, buf, strlen (buf));
490	return;
491	}
492	sprintf ((char *) sl.buf, "replyinfo image_sums %d %d ", start, stop);
493
494	sl.len = strlen ((const char *) sl.buf);
495
496	for (i = start; i <= stop; i++)
497	{
498	SockList_AddShort (&sl, i);
499	ns->faces_sent[i] \|= NS_FACESENT_FACE;
500
501	qq = get_face_fallback (ns->faceset, i);
502	SockList_AddInt (&sl, facesets[qq].faces[i].checksum);
503	SockList_AddChar (&sl, qq);
504
505	qq = strlen (new_faces[i].name);
506	SockList_AddChar (&sl, (char) (qq + 1));
507	strcpy ((char *) sl.buf + sl.len, new_faces[i].name);
508	sl.len += qq;
509	SockList_AddChar (&sl, 0);
510	}
511	/* It would make more sense to catch this pre-emptively in the code above.
512	* however, if this really happens, we probably just want to cut down the
513	* size to less than 1000, since that is what we claim the protocol would
514	* support.
515	*/
516	if (sl.len >= MAXSOCKBUF)
517	{
518	LOG (llevError, "send_image_send: buffer overrun, %d > %d\n", sl.len, MAXSOCKBUF);
519	abort ();
520	}
521	Send_With_Handling (ns, &sl);
522	free (sl.buf);
523	}