/* (c) SPDsoft & GTIC 16 julio 1993*/
#include <stdlib.h>
#include <string.h>
#include <stdio.h>
#include "pict.h"
#ifdef THINK_C
#include <console.h>
#endif
#define MAX_PICT	32
#ifdef MYGETOPT
char getopt( int	argc, char	*argv[], char *format );
#endif

void	usage(char *name);
void	fatalError(char *name,char *str);

void	usage(char *name)
{
	fprintf(stderr,
	"usage: %s [-v] files...\n",name);
	exit(-1);
}

void	fatalError(char *name,char *str)
{
	fprintf(stderr,
	"%s: Fatal Error: %s. bye...\n",name,str);
	exit(-2);
}

main(int argc,char *argv[])
{
	unsigned int first=0, last=0, NumOfSFrames;
	char Verbose=0;

	Pict pictIn;
	int	np,i,j,opcion;
	int	theError=0;

	extern char     *optarg;
	extern int      optind,opterr;

#ifdef THINK_C
	argc = ccommand(&argv);
#endif
	while ( (opcion=getopt(argc,argv,"vh")) != EOF )
	{
		switch(opcion)
		{
			case 'v':	printf("%s:v. 22 octubre 1993\n",argv[0]);
					Verbose=1;
					break;
			defatult:	usage(argv[0]);
		}
	}

	if ( theError!=0)
		usage(argv[0]);

	first=optind;
	last=argc-1;
	NumOfSFrames=last-first+1;

	if ( NumOfSFrames==0 ) usage(argv[0]);

	for(i=first;i<=last;i++)
	{
		pictIn = pict_open(argv[i],P_READ,0,0,0,NULL);

		if ( Verbose )
		{
		printf("%s:\tName\t%s\n",argv[0],argv[i]);
		printf("%s:\tMode\t%d\t",argv[0],pictIn->clr_mode);
                switch(pictIn->clr_mode)
                {
                        case M_MONO:    printf("MONO\n");
                                        break;
                        case M_RGB8:    printf("RGB 8 Bits\n");
                                        break;
                        case M_RGB24:   printf("RGB 24 Bits\n");
                                        break;
                        case M_RGBA32:  printf("RGB 24 Bits + ALPHA\n");
                                        break;
                        default:
                                        printf("????\n");
                }
		printf("%s:\tHeight\t%d\n",argv[0],pictIn->image_H);
		printf("%s:\tWidth\t%d\n",argv[0],pictIn->image_W);
		}
		else
		printf("%s\t%d\t%d\t%d\n",argv[i],
		pictIn->clr_mode,pictIn->image_H,pictIn->image_W );

		pict_close(pictIn);
		free(pictIn);
	}
}