/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 */
 57static int
 58sGetc(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
 70static void
 71sUngetc(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
 91static void
 92ErrorMessage(
 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
139int
140main(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}