external/giflib 4.1.6

1 files changed, 227 insertions, 0 deletions

diff --git a/giflib-4.1.6/util/gifinfo.c b/giflib-4.1.6/util/gifinfo.c
new file mode 100644
index 0000000..68421ed
--- /dev/null
+++ b/giflib-4.1.6/util/gifinfo.c
@@ -0,0 +1,227 @@
+/*****************************************************************************
+* "Gifinfo"								     *
+*									     *
+* Written by:  Martin Edlman			Ver 0.1.0, Jul. 1989	     *
+******************************************************************************
+* Program to display information (size and comments) in GIF file.	     *
+* uses libungif	on Linux. Not tried on other systems.			     *
+* Options:								     *
+* -h : on-line help.							     *
+* -f : format output string						     *
+*      \h - height							     *
+*      \w - width							     *
+*      \c - comment							     *
+*      \f - file name							     *
+*      Example: -f 'Image \f:\n Size: \wx\h\n Comment: \c\n'		     *
+******************************************************************************
+* History:								     *
+* 21 Jun 99 - Version 1.0 by Martin Edlman.				     *
+*****************************************************************************/
+
+#ifdef HAVE_CONFIG_H
+#include <config.h>
+#endif
+
+#ifdef __MSDOS__
+#include <graphics.h>
+#include <alloc.h>
+#include <io.h>
+#include <dos.h>
+#include <bios.h>
+#endif /* __MSDOS__ */
+
+#include <stdio.h>
+#include <stdlib.h>
+#include <ctype.h>
+#include <string.h>
+#ifdef HAVE_FCNTL_H
+#include <fcntl.h>
+#endif /* HAVE_FCNTL_H */
+#include "gif_lib.h"
+#include "getarg.h"
+
+#define PROGRAM_NAME	"GifInfo"
+
+#define DEFAULTFORMAT   "Size: \\wx\\h\\nComment: \\c\\n"
+
+
+#ifdef __MSDOS__
+extern unsigned int
+    _stklen = 16384;			     /* Increase default stack size. */
+#endif /* __MSDOS__ */
+
+#ifdef SYSV
+static char *VersionStr =
+        "Gif toolkit module,\t\tMartin Edlman\n\
+	(C) Copyright 1999 Martin Edlman.\n";
+static char
+    *CtrlStr = "GifInfo f%-Format!s h%- GifFile!*s";
+#else
+static char
+    *VersionStr =
+	PROGRAM_NAME
+	GIF_LIB_VERSION
+	"	Martin Edlman,	"
+	__DATE__ ",   " __TIME__ "\n"
+	"(C) Copyright 1999 Martin Edlman.\n";
+static char
+    *CtrlStr =
+	PROGRAM_NAME
+	" f%-Format!s h%- GifFile!*s";
+#endif /* SYSV */
+
+/* Make some variables global, so we could access them faster: */
+static int
+    HelpFlag = FALSE;
+
+/******************************************************************************
+* Interpret the command line and scan the given GIF file.		      *
+******************************************************************************/
+int main(int argc, char **argv)
+{
+    int	i, Error, NumFiles, NumFormats, Size, Width=0, Height=0, ExtCode;
+    GifRecordType RecordType;
+    GifByteType  *Extension;
+    char         *Format = NULL, *Comment;
+    char        **FileName = NULL;
+    GifRowType    RowBuffer;
+    GifFileType  *GifFile;
+
+    if ((Error = GAGetArgs(argc, argv, CtrlStr, &NumFormats, &Format,
+                           &HelpFlag, &NumFiles, &FileName)) != FALSE ||
+        (NumFiles > 1 && !HelpFlag)) {
+        if (Error)
+            GAPrintErrMsg(Error);
+	else if (NumFiles > 1)
+	    GIF_MESSAGE("Error in command line parsing - one GIF file please.");
+	GAPrintHowTo(CtrlStr);
+	exit(EXIT_FAILURE);
+    }
+
+    if (Format == NULL) {
+        Format = malloc(strlen(DEFAULTFORMAT)+1);
+        strcpy(Format, DEFAULTFORMAT);
+    }
+
+    if (HelpFlag) {
+	fprintf(stderr, VersionStr);
+	GAPrintHowTo(CtrlStr);
+	printf("Format: quoted text string used for formating of information\n");
+	printf("  Special characters for various information can be used\n");
+	printf("  \\f - filename of GIF file\n");
+	printf("  \\c - comment\n");
+	printf("  \\w - width of image\n");
+	printf("  \\h - height of image\n");
+	printf("  \\n - new line\n");
+	printf("  \\\\ - backslash\n");
+	printf("Default format will be used if not specified with -f:\n");
+	printf("  %s\n\n", DEFAULTFORMAT);
+	exit(EXIT_SUCCESS);
+    }
+    
+    if (NumFiles == 1) {
+	if ((GifFile = DGifOpenFileName(*FileName)) == NULL) {
+	    PrintGifError();
+	    exit(EXIT_FAILURE);
+	}
+    }
+    else {
+	/* Use the stdin instead: */
+
+#ifdef __MSDOS__
+	setmode(0, O_BINARY);
+#endif /* __MSDOS__ */
+	if ((GifFile = DGifOpenFileHandle(0)) == NULL) {
+	    PrintGifError();
+	    exit(EXIT_FAILURE);
+	}
+    }
+
+    Comment = (char*) malloc(1);
+    strcpy(Comment, "\0");
+
+    /* Allocate memory or one row which will be used as trash during reading
+       image*/
+    Size = GifFile->SWidth * sizeof(GifPixelType);/* Size in bytes one row.*/
+    if ((RowBuffer = (GifRowType) malloc(Size)) == NULL) /* First row. */
+	GIF_EXIT("Failed to allocate memory required, aborted.");
+
+    /* Scan the content of the GIF file and load the image(s) in: */
+    do {
+	if (DGifGetRecordType(GifFile, &RecordType) == GIF_ERROR) {
+	    PrintGifError();
+	    exit(EXIT_FAILURE);
+	}
+	switch (RecordType) {
+	    case IMAGE_DESC_RECORD_TYPE:
+		if (DGifGetImageDesc(GifFile) == GIF_ERROR) {
+		    PrintGifError();
+		    exit(EXIT_FAILURE);
+		}
+		Width = GifFile->Image.Width;
+		Height = GifFile->Image.Height;
+		if (GifFile->Image.Left + GifFile->Image.Width > GifFile->SWidth ||
+		   GifFile->Image.Top + GifFile->Image.Height > GifFile->SHeight) {
+		    fprintf(stderr, "Image %d is not confined to screen dimension, aborted.\n", GifFile->ImageCount);
+		    exit(EXIT_FAILURE);
+		}
+                /* We don't care about Interlaced as image is not interesting, read sequentialy */
+		for (i = 0; i < Height; i++) {
+		    GifQprintf("\b\b\b\b%-4d", i);
+		    if (DGifGetLine(GifFile, &RowBuffer[0], Width) == GIF_ERROR) {
+			PrintGifError();
+			exit(EXIT_FAILURE);
+		    }
+		}
+		break;
+	    case EXTENSION_RECORD_TYPE:
+		/* Skip any extension blocks in file except comments: */
+		if (DGifGetExtension(GifFile, &ExtCode, &Extension) == GIF_ERROR) {
+		    PrintGifError();
+		    exit(EXIT_FAILURE);
+		}
+		while (Extension != NULL) {
+		    if(ExtCode == COMMENT_EXT_FUNC_CODE) {
+			Extension[Extension[0]+1] = '\000';   /* Convert gif's pascal-like string */
+			Comment = (char*) realloc(Comment, strlen(Comment) + Extension[0] + 1);
+			strcat(Comment, (char*)Extension+1);
+		    }
+		    if (DGifGetExtensionNext(GifFile, &Extension) == GIF_ERROR) {
+			PrintGifError();
+			exit(EXIT_FAILURE);
+		    }
+		}
+		break;
+	    case TERMINATE_RECORD_TYPE:
+		break;
+	    default:		    /* Should be traps by DGifGetRecordType. */
+		break;
+	}
+    }
+    while (RecordType != TERMINATE_RECORD_TYPE);
+
+    while (Format[0] != '\0') {
+        if (Format[0] == '\\') {
+            Format++;
+            switch (Format[0]) {
+            case 'w': printf("%i",  Width);     break;
+            case 'h': printf("%i",  Height);    break;
+            case 'c': printf("%s",  Comment);   break;
+            case 'f': printf("%s", *FileName);  break;
+            case 'n': printf("\n");             break;
+            default:  printf("%c",  Format[0]); break;
+            }
+         }
+         else {
+            printf("%c", Format[0]);
+         }
+         Format++;
+    }
+
+    if (DGifCloseFile(GifFile) == GIF_ERROR) {
+	PrintGifError();
+	exit(EXIT_FAILURE);
+    }
+
+    return 0;
+}