--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/src/gif_err.c	Mon Aug 13 08:45:50 2007 +0200
@@ -0,0 +1,156 @@
+/* Synched up with: Not in FSF. */
+
+/*****************************************************************************
+*   "Gif-Lib" - Yet another gif library.				     *
+*									     *
+* Written by:  Gershon Elber			IBM PC Ver 0.1,	Jun. 1989    *
+******************************************************************************
+* Handle error reporting for the GIF library.				     *
+******************************************************************************
+* History:								     *
+* 17 Jun 89 - Version 1.0 by Gershon Elber.				     *
+*****************************************************************************/
+
+#ifdef emacs
+#include <config.h>
+#endif
+
+#include <stdio.h>
+#include "gif_lib.h"
+
+#define PROGRAM_NAME	"GIF_LIBRARY"
+
+int _GifError;
+
+#ifndef emacs
+#ifdef SYSV
+static char *VersionStr =
+        "Gif library module,\t\tGershon Elber\n\
+	(C) Copyright 1989 Gershon Elber, Non commercial use only.\n";
+#else
+static char *VersionStr =
+	PROGRAM_NAME
+	"	IBMPC "
+	GIF_LIB_VERSION
+	"	Gershon Elber,	"
+	__DATE__ ",   " __TIME__ "\n"
+	"(C) Copyright 1989 Gershon Elber, Non commercial use only.\n";
+#endif /* SYSV */
+#endif /* !emacs */
+
+/*****************************************************************************
+* Return the last GIF error (0 if none) and reset the error.		     *
+*****************************************************************************/
+int GifLastError(void)
+{
+    int i = _GifError;
+
+    _GifError = 0;
+
+    return i;
+}
+
+/*****************************************************************************
+* Print the last GIF error to stderr.					     *
+*****************************************************************************/
+#ifdef emacs
+CONST char *EmacsPrintGifError(void)
+#else
+void PrintGifError(void)
+#endif
+{
+    CONST char *Err;
+
+    switch(_GifError) {
+	case E_GIF_ERR_OPEN_FAILED:
+	    Err = "Failed to open given file";
+	    break;
+	case E_GIF_ERR_WRITE_FAILED:
+	    Err = "Failed to Write to given file";
+	    break;
+	case E_GIF_ERR_HAS_SCRN_DSCR:
+	    Err = "Screen Descriptor already been set";
+	    break;
+	case E_GIF_ERR_HAS_IMAG_DSCR:
+	    Err = "Image Descriptor is still active";
+	    break;
+	case E_GIF_ERR_NO_COLOR_MAP:
+	    Err = "Neither Global Nor Local color map";
+	    break;
+	case E_GIF_ERR_DATA_TOO_BIG:
+	    Err = "#Pixels bigger than Width * Height";
+	    break;
+	case E_GIF_ERR_NOT_ENOUGH_MEM:
+	    Err = "Fail to allocate required memory";
+	    break;
+	case E_GIF_ERR_DISK_IS_FULL:
+	    Err = "Write failed (disk full?)";
+	    break;
+	case E_GIF_ERR_CLOSE_FAILED:
+	    Err = "Failed to close given file";
+	    break;
+	case E_GIF_ERR_NOT_WRITEABLE:
+	    Err = "Given file was not opened for write";
+	    break;
+	case D_GIF_ERR_OPEN_FAILED:
+	    Err = "Failed to open given file";
+	    break;
+	case D_GIF_ERR_READ_FAILED:
+	    Err = "Failed to Read from given file";
+	    break;
+	case D_GIF_ERR_NOT_GIF_FILE:
+	    Err = "Given file is NOT GIF file";
+	    break;
+	case D_GIF_ERR_NO_SCRN_DSCR:
+	    Err = "No Screen Descriptor detected";
+	    break;
+	case D_GIF_ERR_NO_IMAG_DSCR:
+	    Err = "No Image Descriptor detected";
+	    break;
+	case D_GIF_ERR_NO_COLOR_MAP:
+	    Err = "Neither Global Nor Local color map";
+	    break;
+	case D_GIF_ERR_WRONG_RECORD:
+	    Err = "Wrong record type detected";
+	    break;
+	case D_GIF_ERR_DATA_TOO_BIG:
+	    Err = "#Pixels bigger than Width * Height";
+	    break;
+	case D_GIF_ERR_NOT_ENOUGH_MEM:
+	    Err = "Fail to allocate required memory";
+	    break;
+	case D_GIF_ERR_CLOSE_FAILED:
+	    Err = "Failed to close given file";
+	    break;
+	case D_GIF_ERR_NOT_READABLE:
+	    Err = "Given file was not opened for read";
+	    break;
+	case D_GIF_ERR_IMAGE_DEFECT:
+	    Err = "Image is defective, decoding aborted";
+	    break;
+	case D_GIF_ERR_EOF_TOO_SOON:
+	    Err = "Image EOF detected, before image complete";
+	    break;
+	default:
+	    Err = NULL;
+	    break;
+    }
+#ifdef emacs
+    if (Err != NULL)
+      return Err;
+    else
+      return "Unknown error";
+#else
+    if (Err != NULL)
+	fprintf(stderr, "\nGIF-LIB error: %s.\n", Err);
+    else
+	fprintf(stderr, "\nGIF-LIB undefined error %d.\n", _GifError);
+#endif
+}
+
+void init_gif_err (void);
+void
+init_gif_err (void)
+{
+  _GifError = 0;
+}