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 #ifdef __OS2__
  40 /* Visual Age cannot deal with old, non-ansi, code */
  41 int XpmCreateImageFromData(
  42   Display*       display
  43 , char**         data
  44 , XImage**       image_return
  45 , XImage**       shapeimage_return
  46 , XpmAttributes* attributes
  47 )
  48 #else
  49 int
  50 XpmCreateImageFromData(display, data, image_return,
  51                        shapeimage_return, attributes)
  52     Display *display;
  53     char **data;
  54     XImage **image_return;
  55     XImage **shapeimage_return;
  56     XpmAttributes *attributes;
  57 #endif
  58 {
  59     XpmImage image;
  60     XpmInfo info;
  61     int ErrorStatus;
  62     xpmData mdata;
  63
  64     xpmInitXpmImage(&image);
  65     xpmInitXpmInfo(&info);
  66
  67     /* open data */
  68     OpenArray(data, &mdata);
  69
  70     /* create an XpmImage from the file */
  71     if (attributes) {
  72         xpmInitAttributes(attributes);
  73         xpmSetInfoMask(&info, attributes);
  74         ErrorStatus = xpmParseDataAndCreate(display, &mdata,
  75                                             image_return, shapeimage_return,
  76                                             &image, &info, attributes);
  77     } else
  78         ErrorStatus = xpmParseDataAndCreate(display, &mdata,
  79                                             image_return, shapeimage_return,
  80                                             &image, NULL, attributes);
  81     if (attributes) {
  82         if (ErrorStatus >= 0)           /* no fatal error */
  83             xpmSetAttributes(attributes, &image, &info);
  84         XpmFreeXpmInfo(&info);
  85     }
  86
  87     /* free the XpmImage */
  88     XpmFreeXpmImage(&image);
  89
  90     return (ErrorStatus);
  91 }
  92
  93 #ifdef __OS2__
  94 /* Visual Age cannot deal with old, non-ansi, code */
  95 int
  96 XpmCreateXpmImageFromData(
  97   char**    data
  98 , XpmImage* image
  99 , XpmInfo*  info
 100 )
 101 #else
 102 int
 103 XpmCreateXpmImageFromData(data, image, info)
 104     char **data;
 105     XpmImage *image;
 106     XpmInfo *info;
 107 #endif
 108 {
 109     xpmData mdata;
 110     int ErrorStatus;
 111
 112     /* init returned values */
 113     xpmInitXpmImage(image);
 114     xpmInitXpmInfo(info);
 115
 116     /* open data */
 117     OpenArray(data, &mdata);
 118
 119     /* create the XpmImage from the XpmData */
 120     ErrorStatus = xpmParseData(&mdata, image, info);
 121
 122     return (ErrorStatus);
 123 }
 124
 125 /*
 126  * open the given array to be read or written as an xpmData which is returned
 127  */
 128 #ifdef __OS2__
 129 /* Visual Age cannot deal with old, non-ansi, code */
 130 static void OpenArray(char** data, xpmData* mdata)
 131 #else
 132 static void
 133 OpenArray(data, mdata)
 134     char **data;
 135     xpmData *mdata;
 136 #endif
 137 {
 138     mdata->type = XPMARRAY;
 139     mdata->stream.data = data;
 140     mdata->cptr = *data;
 141     mdata->line = 0;
 142     mdata->CommentLength = 0;
 143     mdata->Bcmt = mdata->Ecmt = NULL;
 144     mdata->Bos = mdata->Eos = '\0';
 145     mdata->format = 0;                  /* this can only be Xpm 2 or 3 */
 146 }