src/xpm/crifrdat.c

   1 /*
   2  * Copyright (C) 1989-95 GROUPE BULL
   3  *
   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:
  10  *
  11  * The above copyright notice and this permission notice shall be included in
  12  * all copies or substantial portions of the Software.
  13  *
  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.
  20  *
  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.
  24  */
  25
  26 /*****************************************************************************\
  27 *  CrIFrData.c:                                                               *
  28 *                                                                             *
  29 *  XPM library                                                                *
  30 *  Parse an Xpm array and create the image and possibly its mask              *
  31 *                                                                             *
  32 *  Developed by Arnaud Le Hors                                                *
  33 \*****************************************************************************/
  34
  35 #include "XpmI.h"
  36
  37 LFUNC(OpenArray, void, (char **data, xpmData *mdata));
  38
  39 int
  40 XpmCreateImageFromData(display, data, image_return,
  41                        shapeimage_return, attributes)
  42     Display *display;
  43     char **data;
  44     XImage **image_return;
  45     XImage **shapeimage_return;
  46     XpmAttributes *attributes;
  47 {
  48     XpmImage image;
  49     XpmInfo info;
  50     int ErrorStatus;
  51     xpmData mdata;
  52
  53     xpmInitXpmImage(&image);
  54     xpmInitXpmInfo(&info);
  55
  56     /* open data */
  57     OpenArray(data, &mdata);
  58
  59     /* create an XpmImage from the file */
  60     if (attributes) {
  61         xpmInitAttributes(attributes);
  62         xpmSetInfoMask(&info, attributes);
  63         ErrorStatus = xpmParseDataAndCreate(display, &mdata,
  64                                             image_return, shapeimage_return,
  65                                             &image, &info, attributes);
  66     } else
  67         ErrorStatus = xpmParseDataAndCreate(display, &mdata,
  68                                             image_return, shapeimage_return,
  69                                             &image, NULL, attributes);
  70     if (attributes) {
  71         if (ErrorStatus >= 0)           /* no fatal error */
  72             xpmSetAttributes(attributes, &image, &info);
  73         XpmFreeXpmInfo(&info);
  74     }
  75
  76     /* free the XpmImage */
  77     XpmFreeXpmImage(&image);
  78
  79     return (ErrorStatus);
  80 }
  81
  82 int
  83 XpmCreateXpmImageFromData(data, image, info)
  84     char **data;
  85     XpmImage *image;
  86     XpmInfo *info;
  87 {
  88     xpmData mdata;
  89     int ErrorStatus;
  90
  91     /* init returned values */
  92     xpmInitXpmImage(image);
  93     xpmInitXpmInfo(info);
  94
  95     /* open data */
  96     OpenArray(data, &mdata);
  97
  98     /* create the XpmImage from the XpmData */
  99     ErrorStatus = xpmParseData(&mdata, image, info);
 100
 101     return (ErrorStatus);
 102 }
 103
 104 /*
 105  * open the given array to be read or written as an xpmData which is returned
 106  */
 107 static void
 108 OpenArray(data, mdata)
 109     char **data;
 110     xpmData *mdata;
 111 {
 112     mdata->type = XPMARRAY;
 113     mdata->stream.data = data;
 114     mdata->cptr = *data;
 115     mdata->line = 0;
 116     mdata->CommentLength = 0;
 117     mdata->Bcmt = mdata->Ecmt = NULL;
 118     mdata->Bos = mdata->Eos = '\0';
 119     mdata->format = 0;                  /* this can only be Xpm 2 or 3 */
 120 }