www.pudn.com > giflib12.zip > GIFWEDGE.C

/***************************************************************************** 
*   "Gif-Lib" - Yet another gif library.				     * 
*									     * 
* Written by:  Gershon Elber				Ver 0.1, Jul. 1989   * 
****************************************************************************** 
* Program to create a test image of White and Red/Green/Blue levels for      * 
* test purposes. The Primary (RGB) and Secondary (YCM) are also displayed.   * 
* background.								     * 
* Options:								     * 
* -q : quite printing mode.						     * 
* -s Width Height : set image size.					     * 
* -l levels : number of color levels.					     * 
* -h : on line help.							     * 
****************************************************************************** 
* History:								     * 
* 4 Jan 90 - Version 1.0 by Gershon Elber.				     * 
*****************************************************************************/ 
 
#ifdef __MSDOS__ 
#include  
#include  
#endif /* __MSDOS__ */ 
 
#include  
#include  
#include  
#include "gif_lib.h" 
#include "getarg.h" 
 
#define PROGRAM_NAME	"GifWedge" 
 
#define DEFAULT_WIDTH	640 
#define DEFAULT_HEIGHT	350 
 
#define DEFAULT_NUM_LEVELS	16     /* Number of colors to gen the image. */ 
 
#ifdef __MSDOS__ 
extern unsigned int 
    _stklen = 16384;			     /* Increase default stack size. */ 
#endif /* __MSDOS__ */ 
 
#ifdef SYSV 
static char *VersionStr = 
        "Gif library module,\t\tGershon Elber\n\ 
	(C) Copyright 1989 Gershon Elber, Non commercial use only.\n"; 
static char 
    *CtrlStr = "GifWedge q%- l%-#Lvls!d s%-Width|Height!d!d h%-"; 
#else 
static char 
    *VersionStr = 
	PROGRAM_NAME 
	GIF_LIB_VERSION 
	"	Gershon Elber,	" 
	__DATE__ ",   " __TIME__ "\n" 
	"(C) Copyright 1989 Gershon Elber, Non commercial use only.\n"; 
static char 
    *CtrlStr = 
	PROGRAM_NAME 
	" q%- l%-#Lvls!d s%-Width|Height!d!d h%-"; 
#endif /* SYSV */ 
 
static int 
    NumLevels = DEFAULT_NUM_LEVELS, 
    ImageWidth = DEFAULT_WIDTH, 
    ImageHeight = DEFAULT_HEIGHT; 
 
static void QuitGifError(GifFileType *GifFile); 
 
/****************************************************************************** 
* Interpret the command line and scan the given GIF file.		      * 
******************************************************************************/ 
void main(int argc, char **argv) 
{ 
    int	i, j, l, c, Error, LevelStep, LogNumLevels, 
	Count = 0, LevelsFlag = FALSE, SizeFlag = FALSE, HelpFlag = FALSE; 
    GifRowType Line; 
    GifColorType *ColorMap; 
    GifFileType *GifFile; 
 
    if ((Error = GAGetArgs(argc, argv, CtrlStr, 
		&GifQuitePrint, &LevelsFlag, &NumLevels, 
		&SizeFlag, &ImageWidth, &ImageHeight, 
		&HelpFlag)) != FALSE) { 
	GAPrintErrMsg(Error); 
	GAPrintHowTo(CtrlStr); 
	exit(1); 
    } 
 
    if (HelpFlag) { 
	fprintf(stderr, VersionStr); 
	GAPrintHowTo(CtrlStr); 
	exit(0); 
    } 
 
    /* Make sure the number of levels is power of 2 (up to 32 levels.). */ 
    for (i = 1; i < 6; i++) if (NumLevels == (1 << i)) break; 
    if (i == 6) GIF_EXIT("#Lvls (-l option) is not power of 2 up to 32."); 
    LogNumLevels = i + 3;		       /* Multiple by 8 (see below). */ 
    LevelStep = 256 / NumLevels; 
 
    /* Make sure the image dimension is a multiple of NumLevels horizontally */ 
    /* and 7 (White, Red, Green, Blue and Yellow Cyan Magenta) vertically.   */ 
    ImageWidth = (ImageWidth / NumLevels) * NumLevels; 
    ImageHeight = (ImageHeight / 7) * 7; 
 
    /* Open stdout for the output file: */ 
    if ((GifFile = EGifOpenFileHandle(1)) == NULL) 
	QuitGifError(GifFile); 
 
    /* Dump out screen description with given size and generated color map:  */ 
    /* The color map has 7 NumLevels colors for White, Red, Green and then   */ 
    /* The secondary colors Yellow Cyan and magenta.			     */ 
    if ((ColorMap = (GifColorType *) 
	    malloc(8 * NumLevels * sizeof(GifColorType))) == NULL) 
	GIF_EXIT("Failed to allocate memory required, aborted."); 
 
    for (i = 0; i < 8; i++)				   /* Set color map. */ 
	for (j = 0; j < NumLevels; j++) { 
	    l = LevelStep * j; 
	    c = i * NumLevels + j; 
	    ColorMap[c].Red = (i == 0 || i == 1 || i == 4 || i == 6) * l; 
	    ColorMap[c].Green =	(i == 0 || i == 2 || i == 4 || i == 5) * l; 
	    ColorMap[c].Blue = (i == 0 || i == 3 || i == 5 || i == 6) * l; 
	} 
 
    if (EGifPutScreenDesc(GifFile, 
	ImageWidth, ImageHeight, LogNumLevels, 0, LogNumLevels, ColorMap) 
	== GIF_ERROR) 
	QuitGifError(GifFile); 
 
    /* Dump out the image descriptor: */ 
    if (EGifPutImageDesc(GifFile, 
	0, 0, ImageWidth, ImageHeight, FALSE, LogNumLevels, NULL) == GIF_ERROR) 
	QuitGifError(GifFile); 
 
    GifQprintf("\n%s: Image 1 at (%d, %d) [%dx%d]:     ", 
		    PROGRAM_NAME, GifFile -> ILeft, GifFile -> ITop, 
		    GifFile -> IWidth, GifFile -> IHeight); 
 
    /* Allocate one scan line to be used for all image.			     */ 
    if ((Line = (GifRowType) malloc(sizeof(GifPixelType) * ImageWidth)) == NULL) 
	GIF_EXIT("Failed to allocate memory required, aborted."); 
 
    /* Dump the pixels: */ 
    for (c = 0; c < 7; c++) { 
	for (i = 0, l = 0; i < NumLevels; i++) 
	    for (j = 0; j < ImageWidth / NumLevels; j++) 
		Line[l++] = i + NumLevels * c; 
	for (i = 0; i < ImageHeight / 7; i++) { 
	    if (EGifPutLine(GifFile, Line, ImageWidth) == GIF_ERROR) 
		QuitGifError(GifFile); 
	    GifQprintf("\b\b\b\b%-4d", Count++); 
	} 
    } 
 
    if (EGifCloseFile(GifFile) == GIF_ERROR) 
	QuitGifError(GifFile); 
} 
 
/****************************************************************************** 
* Close output file (if open), and exit.				      * 
******************************************************************************/ 
static void QuitGifError(GifFileType *GifFile) 
{ 
    PrintGifError(); 
    if (GifFile != NULL) DGifCloseFile(GifFile); 
    exit(1); 
}