blob: d324948c4112693aa2b219b32002b18591ea72ea [file] [log] [blame]
/*
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %
% %
% %
% IIIII DDDD EEEEE N N TTTTT IIIII FFFFF Y Y %
% I D D E NN N T I F Y Y %
% I D D EEE N N N T I FFF Y %
% I D D E N NN T I F Y %
% IIIII DDDD EEEEE N N T IIIII F Y %
% %
% %
% Identify an Image Format and Characteristics. %
% %
% Software Design %
% John Cristy %
% September 1994 %
% %
% %
% Copyright 1999-2008 ImageMagick Studio LLC, a non-profit organization %
% dedicated to making software imaging solutions freely available. %
% %
% You may not use this file except in compliance with the License. You may %
% obtain a copy of the License at %
% %
% http://www.imagemagick.org/script/license.php %
% %
% Unless required by applicable law or agreed to in writing, software %
% distributed under the License is distributed on an "AS IS" BASIS, %
% WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied. %
% See the License for the specific language governing permissions and %
% limitations under the License. %
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% Identify describes the format and characteristics of one or more image
% files. It will also report if an image is incomplete or corrupt.
%
%
*/
/*
Include declarations.
*/
#include "magick/studio.h"
#include "magick/annotate.h"
#include "magick/artifact.h"
#include "magick/attribute.h"
#include "magick/blob.h"
#include "magick/cache.h"
#include "magick/client.h"
#include "magick/coder.h"
#include "magick/color.h"
#include "magick/configure.h"
#include "magick/constitute.h"
#include "magick/decorate.h"
#include "magick/delegate.h"
#include "magick/draw.h"
#include "magick/effect.h"
#include "magick/exception.h"
#include "magick/exception-private.h"
#include "magick/feature.h"
#include "magick/gem.h"
#include "magick/geometry.h"
#include "magick/histogram.h"
#include "magick/identify.h"
#include "magick/image.h"
#include "magick/image-private.h"
#include "magick/list.h"
#include "magick/locale_.h"
#include "magick/log.h"
#include "magick/magic.h"
#include "magick/magick.h"
#include "magick/memory_.h"
#include "magick/module.h"
#include "magick/monitor.h"
#include "magick/montage.h"
#include "magick/option.h"
#include "magick/pixel-private.h"
#include "magick/prepress.h"
#include "magick/profile.h"
#include "magick/property.h"
#include "magick/quantize.h"
#include "magick/quantum.h"
#include "magick/random_.h"
#include "magick/registry.h"
#include "magick/resize.h"
#include "magick/resource_.h"
#include "magick/signature.h"
#include "magick/statistic.h"
#include "magick/string_.h"
#include "magick/string-private.h"
#include "magick/timer.h"
#include "magick/utility.h"
#include "magick/version.h"
#if defined(MAGICKCORE_LCMS_DELEGATE)
#if defined(MAGICKCORE_HAVE_LCMS_LCMS_H)
#include <lcms/lcms.h>
#else
#include "lcms.h"
#endif
#endif
/*
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
% %
% %
% %
% I d e n t i f y I m a g e %
% %
% %
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% IdentifyImage() identifies an image by printing its attributes to the file.
% Attributes include the image width, height, size, and others.
%
% The format of the IdentifyImage method is:
%
% MagickBooleanType IdentifyImage(Image *image,FILE *file,
% const MagickBooleanType verbose)
%
% A description of each parameter follows:
%
% o image: the image.
%
% o file: the file, typically stdout.
%
% o verbose: A value other than zero prints more detailed information
% about the image.
%
*/
static int PrintChannelFeatures(FILE *file,const ChannelType channel,
const char *name,const double scale,const ChannelFeatures *channel_features)
{
#define FeaturesFormat " %s:\n" \
" angular second moment:\n" \
" %g, %g, %g, %g\n" \
" contrast:\n" \
" %g, %g, %g, %g\n"
int
status;
status=fprintf(file,FeaturesFormat,name,
channel_features[channel].angular_second_moment[0],
channel_features[channel].angular_second_moment[1],
channel_features[channel].angular_second_moment[2],
channel_features[channel].angular_second_moment[3],
channel_features[channel].contrast[0],
channel_features[channel].contrast[1],
channel_features[channel].contrast[2],
channel_features[channel].contrast[3]);
return(status);
}
static int PrintChannelStatistics(FILE *file,const ChannelType channel,
const char *name,const double scale,
const ChannelStatistics *channel_statistics)
{
#define StatisticsFormat " %s:\n min: " QuantumFormat \
" (%g)\n max: " QuantumFormat " (%g)\n" \
" mean: %g (%g)\n standard deviation: %g (%g)\n" \
" kurtosis: %g\n skewness: %g\n"
double
maxima,
mean,
minima;
int
status;
minima=channel_statistics[channel].minima;
maxima=channel_statistics[channel].maxima;
mean=channel_statistics[channel].mean;
if (channel == AlphaChannel)
{
minima=QuantumRange-minima;
maxima=QuantumRange-maxima;
mean=QuantumRange-mean;
}
status=fprintf(file,StatisticsFormat,name,(Quantum) (scale*minima),minima/
(double) QuantumRange,(Quantum) (maxima/scale),maxima/(double) QuantumRange,
scale*mean,mean/(double) QuantumRange,
scale*channel_statistics[channel].standard_deviation,
channel_statistics[channel].standard_deviation/(double)
QuantumRange,channel_statistics[channel].kurtosis,
channel_statistics[channel].skewness);
return(status);
}
MagickExport MagickBooleanType IdentifyImage(Image *image,FILE *file,
const MagickBooleanType verbose)
{
char
color[MaxTextExtent],
format[MaxTextExtent],
key[MaxTextExtent];
ChannelFeatures
*channel_features;
ChannelStatistics
*channel_statistics;
ColorspaceType
colorspace;
const char
*artifact,
*name,
*property,
*registry,
*value;
const MagickInfo
*magick_info;
const PixelPacket
*pixels;
double
elapsed_time,
user_time;
ExceptionInfo
*exception;
ImageType
type;
long
y;
MagickBooleanType
ping;
register long
i,
x;
unsigned long
distance,
scale;
assert(image != (Image *) NULL);
assert(image->signature == MagickSignature);
if (image->debug != MagickFalse)
(void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
if (file == (FILE *) NULL)
file=stdout;
*format='\0';
elapsed_time=GetElapsedTime(&image->timer);
user_time=GetUserTime(&image->timer);
GetTimerInfo(&image->timer);
if (verbose == MagickFalse)
{
/*
Display summary info about the image.
*/
if (*image->magick_filename != '\0')
if (LocaleCompare(image->magick_filename,image->filename) != 0)
(void) fprintf(file,"%s=>",image->magick_filename);
if ((GetPreviousImageInList(image) == (Image *) NULL) &&
(GetNextImageInList(image) == (Image *) NULL) && (image->scene == 0))
(void) fprintf(file,"%s ",image->filename);
else
(void) fprintf(file,"%s[%lu] ",image->filename,image->scene);
(void) fprintf(file,"%s ",image->magick);
if ((image->magick_columns != 0) || (image->magick_rows != 0))
if ((image->magick_columns != image->columns) ||
(image->magick_rows != image->rows))
(void) fprintf(file,"%lux%lu=>",image->magick_columns,
image->magick_rows);
(void) fprintf(file,"%lux%lu ",image->columns,image->rows);
if ((image->page.width != 0) || (image->page.height != 0) ||
(image->page.x != 0) || (image->page.y != 0))
(void) fprintf(file,"%lux%lu%+ld%+ld ",image->page.width,
image->page.height,image->page.x,image->page.y);
(void) fprintf(file,"%lu-bit ",image->depth);
if (image->type != UndefinedType)
(void) fprintf(file,"%s ",MagickOptionToMnemonic(MagickTypeOptions,
(long) image->type));
if (image->storage_class == DirectClass)
{
(void) fprintf(file,"DirectClass ");
if (image->total_colors != 0)
{
(void) FormatMagickSize(image->total_colors,MagickFalse,format);
(void) fprintf(file,"%s ",format);
}
}
else
if (image->total_colors <= image->colors)
(void) fprintf(file,"PseudoClass %luc ",image->colors);
else
(void) fprintf(file,"PseudoClass %lu=>%luc ",image->total_colors,
image->colors);
if (image->error.mean_error_per_pixel != 0.0)
(void) fprintf(file,"%ld/%f/%fdb ",(long)
(image->error.mean_error_per_pixel+0.5),
image->error.normalized_mean_error,
image->error.normalized_maximum_error);
if (GetBlobSize(image) != 0)
{
(void) FormatMagickSize(GetBlobSize(image),MagickFalse,format);
(void) fprintf(file,"%s ",format);
}
(void) fprintf(file,"%0.3fu %ld:%02ld.%03ld",user_time,(long)
(elapsed_time/60.0),(long) floor(fmod(elapsed_time,60.0)),
(long) (1000.0*(elapsed_time-floor(elapsed_time))));
(void) fprintf(file,"\n");
(void) fflush(file);
return(ferror(file) != 0 ? MagickFalse : MagickTrue);
}
/*
Display verbose info about the image.
*/
exception=AcquireExceptionInfo();
pixels=GetVirtualPixels(image,0,0,1,1,exception);
exception=DestroyExceptionInfo(exception);
ping=pixels == (const PixelPacket *) NULL ? MagickTrue : MagickFalse;
type=GetImageType(image,&image->exception);
(void) SignatureImage(image);
(void) fprintf(file,"Image: %s\n",image->filename);
if (*image->magick_filename != '\0')
if (LocaleCompare(image->magick_filename,image->filename) != 0)
{
char
filename[MaxTextExtent];
GetPathComponent(image->magick_filename,TailPath,filename);
(void) fprintf(file," Base filename: %s\n",filename);
}
magick_info=GetMagickInfo(image->magick,&image->exception);
if ((magick_info == (const MagickInfo *) NULL) ||
(*GetMagickDescription(magick_info) == '\0'))
(void) fprintf(file," Format: %s\n",image->magick);
else
(void) fprintf(file," Format: %s (%s)\n",image->magick,
GetMagickDescription(magick_info));
(void) fprintf(file," Class: %s\n",MagickOptionToMnemonic(MagickClassOptions,
(long) image->storage_class));
(void) fprintf(file," Geometry: %lux%lu%+ld%+ld\n",image->columns,
image->rows,image->tile_offset.x,image->tile_offset.y);
if ((image->magick_columns != 0) || (image->magick_rows != 0))
if ((image->magick_columns != image->columns) ||
(image->magick_rows != image->rows))
(void) fprintf(file," Base geometry: %lux%lu\n",image->magick_columns,
image->magick_rows);
if ((image->x_resolution != 0.0) && (image->y_resolution != 0.0))
{
(void) fprintf(file," Resolution: %gx%g\n",image->x_resolution,
image->y_resolution);
(void) fprintf(file," Print size: %gx%g\n",(double) image->columns/
image->x_resolution,(double) image->rows/image->y_resolution);
}
(void) fprintf(file," Units: %s\n",MagickOptionToMnemonic(
MagickResolutionOptions,(long) image->units));
(void) fprintf(file," Type: %s\n",MagickOptionToMnemonic(MagickTypeOptions,
(long) type));
if (image->type != UndefinedType)
(void) fprintf(file," Base type: %s\n",MagickOptionToMnemonic(
MagickTypeOptions,(long) image->type));
(void) fprintf(file," Endianess: %s\n",MagickOptionToMnemonic(
MagickEndianOptions,(long) image->endian));
/*
Detail channel depth and extrema.
*/
(void) fprintf(file," Colorspace: %s\n",MagickOptionToMnemonic(
MagickColorspaceOptions,(long) image->colorspace));
channel_statistics=(ChannelStatistics *) NULL;
if (ping == MagickFalse)
channel_statistics=GetImageChannelStatistics(image,&image->exception);
if (channel_statistics != (ChannelStatistics *) NULL)
{
unsigned long
depth;
depth=GetImageDepth(image,&image->exception);
if (image->depth == depth)
(void) fprintf(file," Depth: %lu-bit\n",image->depth);
else
(void) fprintf(file," Depth: %lu/%lu-bit\n",image->depth,depth);
(void) fprintf(file," Channel depth:\n");
colorspace=image->colorspace;
if (IsGrayImage(image,&image->exception) != MagickFalse)
colorspace=GRAYColorspace;
switch (colorspace)
{
case RGBColorspace:
default:
{
(void) fprintf(file," red: %lu-bit\n",
channel_statistics[RedChannel].depth);
(void) fprintf(file," green: %lu-bit\n",
channel_statistics[GreenChannel].depth);
(void) fprintf(file," blue: %lu-bit\n",
channel_statistics[BlueChannel].depth);
if (image->matte != MagickFalse)
(void) fprintf(file," alpha: %lu-bit\n",
channel_statistics[OpacityChannel].depth);
break;
}
case CMYKColorspace:
{
(void) fprintf(file," cyan: %lu-bit\n",
channel_statistics[CyanChannel].depth);
(void) fprintf(file," magenta: %lu-bit\n",
channel_statistics[MagentaChannel].depth);
(void) fprintf(file," yellow: %lu-bit\n",
channel_statistics[YellowChannel].depth);
(void) fprintf(file," black: %lu-bit\n",
channel_statistics[BlackChannel].depth);
if (image->matte != MagickFalse)
(void) fprintf(file," alpha: %lu-bit\n",
channel_statistics[OpacityChannel].depth);
break;
}
case GRAYColorspace:
{
(void) fprintf(file," gray: %lu-bit\n",
channel_statistics[GrayChannel].depth);
if (image->matte != MagickFalse)
(void) fprintf(file," alpha: %lu-bit\n",
channel_statistics[OpacityChannel].depth);
break;
}
}
scale=1;
if (image->depth <= MAGICKCORE_QUANTUM_DEPTH)
scale=QuantumRange/((unsigned long) QuantumRange >> ((unsigned long)
MAGICKCORE_QUANTUM_DEPTH-image->depth));
(void) fprintf(file," Channel statistics:\n");
switch (colorspace)
{
case RGBColorspace:
default:
{
(void) PrintChannelStatistics(file,RedChannel,"Red",1.0/scale,
channel_statistics);
(void) PrintChannelStatistics(file,GreenChannel,"Green",1.0/scale,
channel_statistics);
(void) PrintChannelStatistics(file,BlueChannel,"Blue",1.0/scale,
channel_statistics);
break;
}
case CMYKColorspace:
{
(void) PrintChannelStatistics(file,CyanChannel,"Cyan",1.0/scale,
channel_statistics);
(void) PrintChannelStatistics(file,MagentaChannel,"Magenta",1.0/scale,
channel_statistics);
(void) PrintChannelStatistics(file,YellowChannel,"Yellow",1.0/scale,
channel_statistics);
(void) PrintChannelStatistics(file,BlackChannel,"Black",1.0/scale,
channel_statistics);
break;
}
case GRAYColorspace:
{
(void) PrintChannelStatistics(file,GrayChannel,"Gray",1.0/scale,
channel_statistics);
break;
}
}
if (image->matte != MagickFalse)
(void) PrintChannelStatistics(file,AlphaChannel,"Alpha",1.0/scale,
channel_statistics);
if (colorspace != GRAYColorspace)
{
(void) fprintf(file," Image statistics:\n");
(void) PrintChannelStatistics(file,AllChannels,"Overall",1.0/scale,
channel_statistics);
}
channel_statistics=(ChannelStatistics *) RelinquishMagickMemory(
channel_statistics);
}
channel_features=(ChannelFeatures *) NULL;
artifact=GetImageArtifact(image,"identify:features");
if ((ping == MagickFalse) && (artifact != (const char *) NULL))
{
distance=StringToUnsignedLong(artifact);
channel_features=GetImageChannelFeatures(image,distance,
&image->exception);
}
if (channel_features != (ChannelFeatures *) NULL)
{
(void) fprintf(file," Channel features (horizontal, vertical, left and right diagonals):\n");
switch (colorspace)
{
case RGBColorspace:
default:
{
(void) PrintChannelFeatures(file,RedChannel,"Red",1.0/scale,
channel_features);
(void) PrintChannelFeatures(file,GreenChannel,"Green",1.0/scale,
channel_features);
(void) PrintChannelFeatures(file,BlueChannel,"Blue",1.0/scale,
channel_features);
break;
}
case CMYKColorspace:
{
(void) PrintChannelFeatures(file,CyanChannel,"Cyan",1.0/scale,
channel_features);
(void) PrintChannelFeatures(file,MagentaChannel,"Magenta",1.0/
scale,channel_features);
(void) PrintChannelFeatures(file,YellowChannel,"Yellow",1.0/scale,
channel_features);
(void) PrintChannelFeatures(file,BlackChannel,"Black",1.0/scale,
channel_features);
break;
}
case GRAYColorspace:
{
(void) PrintChannelFeatures(file,GrayChannel,"Gray",1.0/scale,
channel_features);
break;
}
}
if (image->matte != MagickFalse)
(void) PrintChannelFeatures(file,AlphaChannel,"Alpha",1.0/scale,
channel_features);
if (colorspace != GRAYColorspace)
{
(void) fprintf(file," Image features:\n");
(void) PrintChannelFeatures(file,AllChannels,"Overall",1.0/scale,
channel_features);
}
channel_features=(ChannelFeatures *) RelinquishMagickMemory(
channel_features);
}
if (ping == MagickFalse)
{
if (image->colorspace == CMYKColorspace)
(void) fprintf(file," Total ink density: %.0f%%\n",100.0*
GetImageTotalInkDensity(image)/(double) QuantumRange);
x=0;
if (image->matte != MagickFalse)
{
register const IndexPacket
*indexes;
register const PixelPacket
*p;
p=(PixelPacket *) NULL;
indexes=(IndexPacket *) NULL;
for (y=0; y < (long) image->rows; y++)
{
p=GetVirtualPixels(image,0,y,image->columns,1,exception);
if (p == (const PixelPacket *) NULL)
break;
indexes=GetVirtualIndexQueue(image);
for (x=0; x < (long) image->columns; x++)
{
if (p->opacity == (Quantum) TransparentOpacity)
break;
p++;
}
if (x < (long) image->columns)
break;
}
if ((x < (long) image->columns) || (y < (long) image->rows))
{
char
tuple[MaxTextExtent];
MagickPixelPacket
pixel;
GetMagickPixelPacket(image,&pixel);
SetMagickPixelPacket(image,p,indexes+x,&pixel);
(void) QueryMagickColorname(image,&pixel,SVGCompliance,tuple,
&image->exception);
(void) fprintf(file," Alpha: %s ",tuple);
GetColorTuple(&pixel,MagickTrue,tuple);
(void) fprintf(file," %s\n",tuple);
}
}
artifact=GetImageArtifact(image,"identify:unique");
if ((artifact != (const char *) NULL) &&
(IsMagickTrue(artifact) != MagickFalse))
(void) fprintf(file," Colors: %lu\n",GetNumberColors(image,
(FILE *) NULL,&image->exception));
if (IsHistogramImage(image,&image->exception) != MagickFalse)
{
(void) fprintf(file," Histogram:\n");
(void) GetNumberColors(image,file,&image->exception);
}
}
if (image->storage_class == PseudoClass)
{
(void) fprintf(file," Colormap: %lu\n",image->colors);
if (image->colors <= 1024)
{
char
color[MaxTextExtent],
hex[MaxTextExtent],
tuple[MaxTextExtent];
MagickPixelPacket
pixel;
register PixelPacket
*restrict p;
GetMagickPixelPacket(image,&pixel);
p=image->colormap;
for (i=0; i < (long) image->colors; i++)
{
SetMagickPixelPacket(image,p,(IndexPacket *) NULL,&pixel);
(void) CopyMagickString(tuple,"(",MaxTextExtent);
ConcatenateColorComponent(&pixel,RedChannel,X11Compliance,tuple);
(void) ConcatenateMagickString(tuple,",",MaxTextExtent);
ConcatenateColorComponent(&pixel,GreenChannel,X11Compliance,tuple);
(void) ConcatenateMagickString(tuple,",",MaxTextExtent);
ConcatenateColorComponent(&pixel,BlueChannel,X11Compliance,tuple);
if (pixel.colorspace == CMYKColorspace)
{
(void) ConcatenateMagickString(tuple,",",MaxTextExtent);
ConcatenateColorComponent(&pixel,IndexChannel,X11Compliance,
tuple);
}
if (pixel.matte != MagickFalse)
{
(void) ConcatenateMagickString(tuple,",",MaxTextExtent);
ConcatenateColorComponent(&pixel,OpacityChannel,X11Compliance,
tuple);
}
(void) ConcatenateMagickString(tuple,")",MaxTextExtent);
(void) QueryMagickColorname(image,&pixel,SVGCompliance,color,
&image->exception);
GetColorTuple(&pixel,MagickTrue,hex);
(void) fprintf(file," %8ld: %s %s %s\n",i,tuple,hex,color);
p++;
}
}
}
if (image->error.mean_error_per_pixel != 0.0)
(void) fprintf(file," Mean error per pixel: %g\n",
image->error.mean_error_per_pixel);
if (image->error.normalized_mean_error != 0.0)
(void) fprintf(file," Normalized mean error: %g\n",
image->error.normalized_mean_error);
if (image->error.normalized_maximum_error != 0.0)
(void) fprintf(file," Normalized maximum error: %g\n",
image->error.normalized_maximum_error);
(void) fprintf(file," Rendering intent: %s\n",MagickOptionToMnemonic(
MagickIntentOptions,(long) image->rendering_intent));
if (image->gamma != 0.0)
(void) fprintf(file," Gamma: %g\n",image->gamma);
if ((image->chromaticity.red_primary.x != 0.0) ||
(image->chromaticity.green_primary.x != 0.0) ||
(image->chromaticity.blue_primary.x != 0.0) ||
(image->chromaticity.white_point.x != 0.0))
{
/*
Display image chromaticity.
*/
(void) fprintf(file," Chromaticity:\n");
(void) fprintf(file," red primary: (%g,%g)\n",
image->chromaticity.red_primary.x,image->chromaticity.red_primary.y);
(void) fprintf(file," green primary: (%g,%g)\n",
image->chromaticity.green_primary.x,
image->chromaticity.green_primary.y);
(void) fprintf(file," blue primary: (%g,%g)\n",
image->chromaticity.blue_primary.x,image->chromaticity.blue_primary.y);
(void) fprintf(file," white point: (%g,%g)\n",
image->chromaticity.white_point.x,image->chromaticity.white_point.y);
}
if ((image->extract_info.width*image->extract_info.height) != 0)
(void) fprintf(file," Tile geometry: %lux%lu%+ld%+ld\n",
image->extract_info.width,image->extract_info.height,
image->extract_info.x,image->extract_info.y);
(void) fprintf(file," Interlace: %s\n",MagickOptionToMnemonic(
MagickInterlaceOptions,(long) image->interlace));
(void) QueryColorname(image,&image->background_color,SVGCompliance,color,
&image->exception);
(void) fprintf(file," Background color: %s\n",color);
(void) QueryColorname(image,&image->border_color,SVGCompliance,color,
&image->exception);
(void) fprintf(file," Border color: %s\n",color);
(void) QueryColorname(image,&image->matte_color,SVGCompliance,color,
&image->exception);
(void) fprintf(file," Matte color: %s\n",color);
(void) QueryColorname(image,&image->transparent_color,SVGCompliance,color,
&image->exception);
(void) fprintf(file," Transparent color: %s\n",color);
(void) fprintf(file," Compose: %s\n",MagickOptionToMnemonic(
MagickComposeOptions,(long) image->compose));
if ((image->page.width != 0) || (image->page.height != 0) ||
(image->page.x != 0) || (image->page.y != 0))
(void) fprintf(file," Page geometry: %lux%lu%+ld%+ld\n",image->page.width,
image->page.height,image->page.x,image->page.y);
if ((image->page.x != 0) || (image->page.y != 0))
(void) fprintf(file," Origin geometry: %+ld%+ld\n",image->page.x,
image->page.y);
(void) fprintf(file," Dispose: %s\n",MagickOptionToMnemonic(
MagickDisposeOptions,(long) image->dispose));
if (image->delay != 0)
(void) fprintf(file," Delay: %lux%ld\n",image->delay,
image->ticks_per_second);
if (image->iterations != 1)
(void) fprintf(file," Iterations: %lu\n",image->iterations);
if ((image->next != (Image *) NULL) || (image->previous != (Image *) NULL))
(void) fprintf(file," Scene: %lu of %lu\n",image->scene,
GetImageListLength(image));
else
if (image->scene != 0)
(void) fprintf(file," Scene: %lu\n",image->scene);
(void) fprintf(file," Compression: %s\n",MagickOptionToMnemonic(
MagickCompressOptions,(long) image->compression));
if (image->quality != UndefinedCompressionQuality)
(void) fprintf(file," Quality: %lu\n",image->quality);
(void) fprintf(file," Orientation: %s\n",MagickOptionToMnemonic(
MagickOrientationOptions,(long) image->orientation));
if (image->montage != (char *) NULL)
(void) fprintf(file," Montage: %s\n",image->montage);
if (image->directory != (char *) NULL)
{
Image
*tile;
ImageInfo
*image_info;
register char
*p,
*q;
WarningHandler
handler;
/*
Display visual image directory.
*/
image_info=AcquireImageInfo();
(void) CloneString(&image_info->size,"64x64");
(void) fprintf(file," Directory:\n");
for (p=image->directory; *p != '\0'; p++)
{
q=p;
while ((*q != '\n') && (*q != '\0'))
q++;
(void) CopyMagickString(image_info->filename,p,(size_t) (q-p+1));
p=q;
(void) fprintf(file," %s",image_info->filename);
handler=SetWarningHandler((WarningHandler) NULL);
tile=ReadImage(image_info,&image->exception);
(void) SetWarningHandler(handler);
if (tile == (Image *) NULL)
{
(void) fprintf(file,"\n");
continue;
}
(void) fprintf(file," %lux%lu %s\n",tile->magick_columns,
tile->magick_rows,tile->magick);
(void) SignatureImage(tile);
ResetImagePropertyIterator(tile);
property=GetNextImageProperty(tile);
while (property != (const char *) NULL)
{
(void) fprintf(file," %s:\n",property);
value=GetImageProperty(tile,property);
if (value != (const char *) NULL)
(void) fprintf(file,"%s\n",value);
property=GetNextImageProperty(tile);
}
tile=DestroyImage(tile);
}
image_info=DestroyImageInfo(image_info);
}
(void) GetImageProperty(image,"exif:*");
ResetImagePropertyIterator(image);
property=GetNextImageProperty(image);
if (property != (const char *) NULL)
{
/*
Display image properties.
*/
(void) fprintf(file," Properties:\n");
while (property != (const char *) NULL)
{
(void) fprintf(file," %c",*property);
if (strlen(property) > 1)
(void) fprintf(file,"%s: ",property+1);
if (strlen(property) > 80)
(void) fputc('\n',file);
value=GetImageProperty(image,property);
if (value != (const char *) NULL)
(void) fprintf(file,"%s\n",value);
property=GetNextImageProperty(image);
}
}
(void) FormatMagickString(key,MaxTextExtent,"8BIM:1999,2998:#1");
value=GetImageProperty(image,key);
if (value != (const char *) NULL)
{
/*
Display clipping path.
*/
(void) fprintf(file," Clipping path: ");
if (strlen(value) > 80)
(void) fputc('\n',file);
(void) fprintf(file,"%s\n",value);
}
ResetImageProfileIterator(image);
name=GetNextImageProfile(image);
if (name != (char *) NULL)
{
const StringInfo
*profile;
/*
Identify image profiles.
*/
(void) fprintf(file," Profiles:\n");
while (name != (char *) NULL)
{
profile=GetImageProfile(image,name);
if (profile == (StringInfo *) NULL)
continue;
(void) fprintf(file," Profile-%s: %lu bytes\n",name,(unsigned long)
GetStringInfoLength(profile));
#if defined(MAGICKCORE_LCMS_DELEGATE)
if ((LocaleCompare(name,"icc") == 0) ||
(LocaleCompare(name,"icm") == 0))
{
cmsHPROFILE
icc_profile;
icc_profile=cmsOpenProfileFromMem(GetStringInfoDatum(profile),
(DWORD) GetStringInfoLength(profile));
if (icc_profile != (cmsHPROFILE *) NULL)
{
const char
*name;
name=cmsTakeProductName(icc_profile);
if (name != (const char *) NULL)
(void) fprintf(file," %s\n",name);
(void) cmsCloseProfile(icc_profile);
}
}
#endif
if (LocaleCompare(name,"iptc") == 0)
{
char
*attribute,
**attribute_list;
const char
*tag;
long
dataset,
record,
sentinel;
register long
j;
size_t
length,
profile_length;
profile_length=GetStringInfoLength(profile);
for (i=0; i < (long) profile_length; i+=(long) length)
{
length=1;
sentinel=GetStringInfoDatum(profile)[i++];
if (sentinel != 0x1c)
continue;
dataset=GetStringInfoDatum(profile)[i++];
record=GetStringInfoDatum(profile)[i++];
switch (record)
{
case 5: tag="Image Name"; break;
case 7: tag="Edit Status"; break;
case 10: tag="Priority"; break;
case 15: tag="Category"; break;
case 20: tag="Supplemental Category"; break;
case 22: tag="Fixture Identifier"; break;
case 25: tag="Keyword"; break;
case 30: tag="Release Date"; break;
case 35: tag="Release Time"; break;
case 40: tag="Special Instructions"; break;
case 45: tag="Reference Service"; break;
case 47: tag="Reference Date"; break;
case 50: tag="Reference Number"; break;
case 55: tag="Created Date"; break;
case 60: tag="Created Time"; break;
case 65: tag="Originating Program"; break;
case 70: tag="Program Version"; break;
case 75: tag="Object Cycle"; break;
case 80: tag="Byline"; break;
case 85: tag="Byline Title"; break;
case 90: tag="City"; break;
case 95: tag="Province State"; break;
case 100: tag="Country Code"; break;
case 101: tag="Country"; break;
case 103: tag="Original Transmission Reference"; break;
case 105: tag="Headline"; break;
case 110: tag="Credit"; break;
case 115: tag="Src"; break;
case 116: tag="Copyright String"; break;
case 120: tag="Caption"; break;
case 121: tag="Local Caption"; break;
case 122: tag="Caption Writer"; break;
case 200: tag="Custom Field 1"; break;
case 201: tag="Custom Field 2"; break;
case 202: tag="Custom Field 3"; break;
case 203: tag="Custom Field 4"; break;
case 204: tag="Custom Field 5"; break;
case 205: tag="Custom Field 6"; break;
case 206: tag="Custom Field 7"; break;
case 207: tag="Custom Field 8"; break;
case 208: tag="Custom Field 9"; break;
case 209: tag="Custom Field 10"; break;
case 210: tag="Custom Field 11"; break;
case 211: tag="Custom Field 12"; break;
case 212: tag="Custom Field 13"; break;
case 213: tag="Custom Field 14"; break;
case 214: tag="Custom Field 15"; break;
case 215: tag="Custom Field 16"; break;
case 216: tag="Custom Field 17"; break;
case 217: tag="Custom Field 18"; break;
case 218: tag="Custom Field 19"; break;
case 219: tag="Custom Field 20"; break;
default: tag="unknown"; break;
}
(void) fprintf(file," %s[%ld,%ld]: ",tag,dataset,record);
length=(size_t) (GetStringInfoDatum(profile)[i++] << 8);
length|=GetStringInfoDatum(profile)[i++];
attribute=(char *) NULL;
if (~length >= MaxTextExtent)
attribute=(char *) AcquireQuantumMemory(length+
MaxTextExtent,sizeof(*attribute));
if (attribute != (char *) NULL)
{
(void) CopyMagickString(attribute,(char *)
GetStringInfoDatum(profile)+i,length+1);
attribute_list=StringToList(attribute);
if (attribute_list != (char **) NULL)
{
for (j=0; attribute_list[j] != (char *) NULL; j++)
{
(void) fputs(attribute_list[j],file);
(void) fputs("\n",file);
attribute_list[j]=(char *) RelinquishMagickMemory(
attribute_list[j]);
}
attribute_list=(char **) RelinquishMagickMemory(
attribute_list);
}
attribute=DestroyString(attribute);
}
}
}
if (image->debug != MagickFalse)
PrintStringInfo(file,name,profile);
name=GetNextImageProfile(image);
}
}
ResetImageArtifactIterator(image);
artifact=GetNextImageArtifact(image);
if (artifact != (const char *) NULL)
{
/*
Display image artifacts.
*/
(void) fprintf(file," Artifacts:\n");
while (artifact != (const char *) NULL)
{
(void) fprintf(file," %c",*artifact);
if (strlen(artifact) > 1)
(void) fprintf(file,"%s: ",artifact+1);
if (strlen(artifact) > 80)
(void) fputc('\n',file);
value=GetImageArtifact(image,artifact);
if (value != (const char *) NULL)
(void) fprintf(file,"%s\n",value);
artifact=GetNextImageArtifact(image);
}
}
ResetImageRegistryIterator();
registry=GetNextImageRegistry();
if (registry != (const char *) NULL)
{
/*
Display image registry.
*/
(void) fprintf(file," Registry:\n");
while (registry != (const char *) NULL)
{
(void) fprintf(file," %c",*registry);
if (strlen(registry) > 1)
(void) fprintf(file,"%s: ",registry+1);
if (strlen(registry) > 80)
(void) fputc('\n',file);
value=(const char *) GetImageRegistry(StringRegistryType,registry,
&image->exception);
if (value != (const char *) NULL)
(void) fprintf(file,"%s\n",value);
registry=GetNextImageRegistry();
}
}
(void) fprintf(file," Tainted: %s\n",MagickOptionToMnemonic(
MagickBooleanOptions,(long) image->taint));
(void) FormatMagickSize(GetBlobSize(image),MagickFalse,format);
(void) fprintf(file," Filesize: %s\n",format);
(void) FormatMagickSize((MagickSizeType) image->columns*image->rows,
MagickFalse,format);
(void) fprintf(file," Number pixels: %s\n",format);
(void) FormatMagickSize((MagickSizeType) ((double) image->columns*image->rows/
elapsed_time+0.5),MagickFalse,format);
(void) fprintf(file," Pixels per second: %s\n",format);
(void) fprintf(file," User time: %0.3fu\n",user_time);
(void) fprintf(file," Elapsed time: %ld:%02ld.%03ld\n",(long)
(elapsed_time/60.0),(long) ceil(fmod(elapsed_time,60.0)),(long)
(1000.0*(elapsed_time-floor(elapsed_time))));
(void) fprintf(file," Version: %s\n",GetMagickVersion((unsigned long *)
NULL));
(void) fflush(file);
return(ferror(file) != 0 ? MagickFalse : MagickTrue);
}