2 * Copyright (C) 1989-95 GROUPE BULL
4 * Permission is hereby granted, free of charge, to any person obtaining a copy
5 * of this software and associated documentation files (the "Software"), to
6 * deal in the Software without restriction, including without limitation the
7 * rights to use, copy, modify, merge, publish, distribute, sublicense, and/or
8 * sell copies of the Software, and to permit persons to whom the Software is
9 * furnished to do so, subject to the following conditions:
11 * The above copyright notice and this permission notice shall be included in
12 * all copies or substantial portions of the Software.
14 * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, EXPRESS OR
15 * IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF MERCHANTABILITY,
16 * FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. IN NO EVENT SHALL
17 * GROUPE BULL BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN
18 * AN ACTION OF CONTRACT, TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN
19 * CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE.
21 * Except as contained in this notice, the name of GROUPE BULL shall not be
22 * used in advertising or otherwise to promote the sale, use or other dealings
23 * in this Software without prior written authorization from GROUPE BULL.
26 /*****************************************************************************\
30 * Parse an Xpm array and create the image and possibly its mask *
32 * Developed by Arnaud Le Hors *
33 \*****************************************************************************/
40 LFUNC(OpenArray, void, (char **data, xpmData *mdata));
43 XpmCreateImageFromData(
46 XImage **image_return,
47 XImage **shapeimage_return,
48 XpmAttributes *attributes)
55 xpmInitXpmImage(&image);
56 xpmInitXpmInfo(&info);
59 OpenArray(data, &mdata);
61 /* create an XpmImage from the file */
63 xpmInitAttributes(attributes);
64 xpmSetInfoMask(&info, attributes);
65 ErrorStatus = xpmParseDataAndCreate(display, &mdata,
66 image_return, shapeimage_return,
67 &image, &info, attributes);
69 ErrorStatus = xpmParseDataAndCreate(display, &mdata,
70 image_return, shapeimage_return,
71 &image, NULL, attributes);
73 if (ErrorStatus >= 0) /* no fatal error */
74 xpmSetAttributes(attributes, &image, &info);
75 XpmFreeXpmInfo(&info);
78 /* free the XpmImage */
79 XpmFreeXpmImage(&image);
85 XpmCreateXpmImageFromData(
93 /* init returned values */
94 xpmInitXpmImage(image);
98 OpenArray(data, &mdata);
100 /* create the XpmImage from the XpmData */
101 ErrorStatus = xpmParseData(&mdata, image, info);
103 return (ErrorStatus);
107 * open the given array to be read or written as an xpmData which is returned
114 mdata->type = XPMARRAY;
115 mdata->stream.data = data;
118 mdata->CommentLength = 0;
119 mdata->Bcmt = mdata->Ecmt = NULL;
120 mdata->Bos = mdata->Eos = '\0';
121 mdata->format = 0; /* this can only be Xpm 2 or 3 */