home *** CD-ROM | disk | FTP | other *** search
- /*****************************************************************************
- * "Gif-Lib" - Yet another gif library. *
- * *
- * Written by: Gershon Elber Ver 0.1, Jun. 1991 *
- ******************************************************************************
- * Program to convert 24bits RGB files to GIF format. *
- * Options: *
- * -q : quite printing mode. *
- * -c #colors : in power of two, i.e. 7 will allow upto 128 colors in output. *
- * -1 : one file holding RGBRGB.. triples of bytes *
- * -s Width Height : specifies size of raw image. *
- * -h : on line help. *
- ******************************************************************************
- * History: *
- * 15 Jun 91 - Version 1.0 by Gershon Elber. *
- *****************************************************************************/
-
- #ifdef __MSDOS__
- #include <graphics.h>
- #include <stdlib.h>
- #include <alloc.h>
- #include <io.h>
- #include <dos.h>
- #include <bios.h>
- #endif /* __MSDOS__ */
-
- #include <stdio.h>
- #include <ctype.h>
- #include <string.h>
- #include <fcntl.h>
- #include "gif_lib.h"
- #include "getarg.h"
-
- #define PROGRAM_NAME "RGB2Gif"
-
- #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 = "RGB2Gif q%- c%-#Colors!d 1%- s!-Width|Height!d!d h%- RGBFile!*s";
- #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%- c%-#Colors!d 1%- s!-Width|Height!d!d h%- RGBFile!*s";
- #endif /* SYSV */
-
- /* Make some variables global, so we could access them faster: */
- static int
- ColorFlag = FALSE,
- ExpNumOfColors = 8,
- OneFileFlag = FALSE,
- HelpFlag = FALSE,
- ColorMapSize = 256;
-
- static void LoadRGB(char *FileName,
- int OneFileFlag,
- GifByteType **RedBuffer,
- GifByteType **GreenBuffer,
- GifByteType **BlueBuffer,
- int Width, int Height);
- static void SaveGif(GifByteType *OutputBuffer,
- GifColorType *OutputColorMap,
- int ExpColorMapSize, int Width, int Height);
- static void QuitGifError(GifFileType *GifFile);
-
- /******************************************************************************
- * Interpret the command line and scan the given GIF file. *
- ******************************************************************************/
- void main(int argc, char **argv)
- {
- int Error, NumFiles, Width, Height, SizeFlag;
- char **FileName = NULL;
- GifByteType *RedBuffer = NULL, *GreenBuffer = NULL, *BlueBuffer = NULL,
- *OutputBuffer = NULL;
- GifColorType *OutputColorMap = NULL;
-
- if ((Error = GAGetArgs(argc, argv, CtrlStr, &GifQuitePrint,
- &ColorFlag, &ExpNumOfColors, &OneFileFlag,
- &SizeFlag, &Width, &Height, &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(1);
- }
-
- if (HelpFlag) {
- fprintf(stderr, VersionStr);
- GAPrintHowTo(CtrlStr);
- exit(0);
- }
-
- ColorMapSize = 1 << ExpNumOfColors;
-
- if (NumFiles == 1) {
- LoadRGB(*FileName, OneFileFlag,
- &RedBuffer, &GreenBuffer, &BlueBuffer, Width, Height);
- }
- else {
- LoadRGB(NULL, OneFileFlag,
- &RedBuffer, &GreenBuffer, &BlueBuffer, Width, Height);
- }
-
- if ((OutputColorMap = (GifColorType *) malloc(ColorMapSize *
- sizeof(GifColorType))) == NULL ||
- (OutputBuffer = (GifByteType *) malloc(Width * Height *
- sizeof(GifByteType))) == NULL)
- GIF_EXIT("Failed to allocate memory required, aborted.");
-
- if (QuantizeBuffer(Width, Height, &ColorMapSize,
- RedBuffer, GreenBuffer, BlueBuffer,
- OutputBuffer, OutputColorMap) == GIF_ERROR)
- QuitGifError(NULL);
- free((char *) RedBuffer);
- free((char *) GreenBuffer);
- free((char *) BlueBuffer);
-
- SaveGif(OutputBuffer, OutputColorMap, ExpNumOfColors, Width, Height);
- }
-
- /******************************************************************************
- * Load RGB file into internal frame buffer. *
- ******************************************************************************/
- static void LoadRGB(char *FileName,
- int OneFileFlag,
- GifByteType **RedBuffer,
- GifByteType **GreenBuffer,
- GifByteType **BlueBuffer,
- int Width, int Height)
- {
- int i, j;
- unsigned long Size;
- GifByteType *RedP, *GreenP, *BlueP;
- FILE *f[3];
-
- Size = ((long) Width) * Height * sizeof(GifByteType);
- #ifdef __MSDOS__
- if (Size > 65500L)
- GIF_EXIT("Can't allocate more than 64k.");
- #endif /* __MSDOS__ */
-
- if ((*RedBuffer = (GifByteType *) malloc((unsigned int) Size)) == NULL ||
- (*GreenBuffer = (GifByteType *) malloc((unsigned int) Size)) == NULL ||
- (*BlueBuffer = (GifByteType *) malloc((unsigned int) Size)) == NULL)
- GIF_EXIT("Failed to allocate memory required, aborted.");
-
- RedP = *RedBuffer;
- GreenP = *GreenBuffer;
- BlueP = *BlueBuffer;
-
- if (FileName != NULL) {
- char OneFileName[80];
-
- if (OneFileFlag) {
- #ifdef __MSDOS__
- if ((f[0] = fopen(FileName, "rb")) == NULL)
- #else
- if ((f[0] = fopen(FileName, "r")) == NULL)
- #endif /* __MSDOS__ */
- GIF_EXIT("Can't open input file name.");
- }
- else {
- static char *Postfixes[] = { ".R", ".G", ".B" };
-
- for (i = 0; i < 3; i++) {
- strcpy(OneFileName, FileName);
- strcat(OneFileName, Postfixes[i]);
-
- #ifdef __MSDOS__
- if ((f[i] = fopen(OneFileName, "rb")) == NULL)
- #else
- if ((f[i] = fopen(OneFileName, "r")) == NULL)
- #endif /* __MSDOS__ */
- GIF_EXIT("Can't open input file name.");
- }
- }
- }
- else {
- OneFileFlag = TRUE;
-
- #ifdef __MSDOS__
- setmode(0, O_BINARY);
- #endif /* __MSDOS__ */
-
- f[0] = stdin;
- }
-
- GifQprintf("\n%s: RGB image: ", PROGRAM_NAME);
-
- if (OneFileFlag) {
- GifByteType *Buffer, *BufferP;
-
- if ((Buffer = (GifByteType *) malloc(Width * 3)) == NULL)
- GIF_EXIT("Failed to allocate memory required, aborted.");
-
- for (i = 0; i < Height; i++) {
- GifQprintf("\b\b\b\b%-4d", i);
- if (fread(Buffer, Width * 3, 1, f[0]) != 1)
- GIF_EXIT("Input file(s) terminated prematurly.");
- for (j = 0, BufferP = Buffer; j < Width; j++) {
- *RedP++ = *BufferP++;
- *GreenP++ = *BufferP++;
- *BlueP++ = *BufferP++;
- }
- }
-
- free((char *) Buffer);
- fclose(f[0]);
- }
- else {
- for (i = 0; i < Height; i++) {
- GifQprintf("\b\b\b\b%-4d", i);
- if (fread(RedP, Width, 1, f[0]) != 1 ||
- fread(GreenP, Width, 1, f[1]) != 1 ||
- fread(BlueP, Width, 1, f[2]) != 1)
- GIF_EXIT("Input file(s) terminated prematurly.");
- RedP += Width;
- GreenP += Width;
- BlueP += Width;
- }
-
- fclose(f[0]);
- fclose(f[1]);
- fclose(f[2]);
- }
- }
-
- /******************************************************************************
- * Save the GIF resulting image. *
- ******************************************************************************/
- static void SaveGif(GifByteType *OutputBuffer,
- GifColorType *OutputColorMap,
- int ExpColorMapSize, int Width, int Height)
- {
- int i;
- GifFileType *GifFile;
- GifByteType *Ptr = OutputBuffer;
-
- /* Open stdout for the output file: */
- if ((GifFile = EGifOpenFileHandle(1)) == NULL)
- QuitGifError(GifFile);
-
- if (EGifPutScreenDesc(GifFile,
- Width, Height, ExpColorMapSize, 0, ExpColorMapSize,
- OutputColorMap) == GIF_ERROR ||
- EGifPutImageDesc(GifFile,
- 0, 0, Width, Height, FALSE, ExpColorMapSize, 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);
-
- for (i = 0; i < Height; i++) {
- if (EGifPutLine(GifFile, Ptr, Width) == GIF_ERROR)
- QuitGifError(GifFile);
- GifQprintf("\b\b\b\b%-4d", Height - i - 1);
-
- Ptr += Width;
- }
-
- if (EGifCloseFile(GifFile) == GIF_ERROR)
- QuitGifError(GifFile);
- }
-
- /******************************************************************************
- * Close output file (if open), and exit. *
- ******************************************************************************/
- static void QuitGifError(GifFileType *GifFile)
- {
- PrintGifError();
- if (GifFile != NULL) EGifCloseFile(GifFile);
- exit(1);
- }
-