cxpm/cxpm.c

   1 /*
   2  * Copyright (C) 1998 Arnaud LE HORS
   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  * Arnaud LE HORS BE LIABLE FOR ANY CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER
  18  * IN 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 Arnaud LE HORS 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 Arnaud LE HORS.
  24  */
  25
  26 /*****************************************************************************\
  27 * cxpm.c:                                                                     *
  28 *                                                                             *
  29 *  Check XPM File program                                                     *
  30 *                                                                             *
  31 *  Developed by Arnaud Le Hors                                                *
  32 \*****************************************************************************/
  33
  34 #define CXPMPROG
  35
  36 #ifdef HAVE_CONFIG_H
  37 #include <config.h>
  38 #endif
  39 #include "XpmI.h"
  40 #ifdef USE_GETTEXT
  41 #include <locale.h>
  42 #include <libintl.h>
  43 #else
  44 #define gettext(a) (a)
  45 #endif
  46
  47 #undef xpmGetC
  48 #define xpmGetC(data) sGetc(data, data->stream.file)
  49 #define Getc sGetc
  50 #define Ungetc sUngetc
  51
  52
  53 /*
  54  * special getc and ungetc counting read lines and characters
  55  * note that 's' could stand both for "special" and "slow" ;-)
  56  */
  57 static int
  58 sGetc(xpmData *data, FILE *file)
  59 {
  60     int c = getc(data->stream.file);
  61     if (c == '\n') {
  62         data->lineNum++;
  63         data->charNum = 0;
  64     } else {
  65         data->charNum++;
  66     }
  67     return c;
  68 }
  69
  70 static void
  71 sUngetc(xpmData *data, int c, FILE *file)
  72 {
  73     ungetc(c, data->stream.file);
  74     if (c == '\n') {
  75         data->lineNum--;
  76         data->charNum = 0;
  77     } else {
  78         data->charNum--;
  79     }
  80 }
  81
  82 /* include all the code we need (yeah, I know, quite ugly...) */
  83 #include "data.c"
  84 #include "parse.c"
  85 #include "RdFToI.c"     /* only for OpenReadFile and xpmDataClose */
  86 #include "hashtab.c"
  87 #include "misc.c"
  88 #include "Attrib.c"
  89 #include "Image.c"
  90
  91 static void
  92 ErrorMessage(
  93     int ErrorStatus,
  94     xpmData *data)
  95
  96 {
  97     char *error = NULL;
  98
  99     switch (ErrorStatus) {
 100     case XpmSuccess:
 101         return;
 102     case XpmOpenFailed:
 103         /* L10N_Comments : Error produced when filename does not exist
 104            or insufficient permissions to open (i.e. cxpm /no/such/file ) */
 105         error = gettext("Cannot open file");
 106         break;
 107     case XpmFileInvalid:
 108         /* L10N_Comments : Error produced when filename can be read, but
 109            is not an XPM file (i.e. cxpm /dev/null ) */
 110         error = gettext("Invalid XPM file");
 111         break;
 112     case XpmNoMemory:
 113         /* L10N_Comments : Error produced when filename can be read, but
 114            is too big for memory
 115            (i.e. limit datasize 32 ; cxpm /usr/dt/backdrops/Crochet.pm ) */
 116         error = gettext("Not enough memory");
 117         break;
 118     case XpmColorFailed:
 119         /* L10N_Comments : Error produced when filename can be read, but
 120            contains an invalid color specification (need to create test case)*/
 121         error = gettext("Failed to parse color");
 122         break;
 123     }
 124
 125     if (error) {
 126         /* L10N_Comments : Wrapper around above Xpm errors - %s is
 127            replaced with the contents of the error message retrieved above */
 128         fprintf(stderr, gettext("Xpm Error: %s.\n"), error);
 129         if (ErrorStatus == XpmFileInvalid && data)
 130         /* L10N_Comments : Error produced when filename can be read, but
 131            is not an XPM file (i.e. cxpm /dev/null ) */
 132           fprintf(stderr, gettext("Error found line %d near character %d\n"),
 133                   data->lineNum + 1,
 134                   data->charNum + 1);
 135         exit(1);
 136     }
 137 }
 138
 139 int
 140 main(int argc, char **argv)
 141 {
 142     XpmImage image;
 143     char *filename;
 144     int ErrorStatus;
 145     xpmData data;
 146
 147 #ifdef USE_GETTEXT
 148     setlocale(LC_ALL,"");
 149     bindtextdomain("cxpm",LOCALEDIR);
 150     textdomain("cxpm");
 151 #endif
 152
 153     if (argc > 1) {
 154         if (!strcmp(argv[1], "-?") || !strncmp(argv[1], "-h", 2)) {
 155             /* L10N_Comments : Usage message produced by running cxpm -h
 156                 %s will be replaced by argv[0] (program name) */
 157             fprintf(stderr, gettext("Usage: %s [filename]\n"), argv[0]);
 158             exit(1);
 159         }
 160         filename = argv[1];
 161     } else {
 162         filename = NULL;
 163     }
 164
 165     xpmInitXpmImage(&image);
 166
 167     if ((ErrorStatus = OpenReadFile(filename, &data)) != XpmSuccess)
 168         ErrorMessage(ErrorStatus, NULL);
 169
 170     ErrorStatus = xpmParseData(&data, &image, NULL);
 171     ErrorMessage(ErrorStatus, &data);
 172
 173     xpmDataClose(&data);
 174     XpmFreeXpmImage(&image);
 175
 176     exit(0);
 177 }