#include "MagickCore/attribute.h"
#include "MagickCore/cache.h"
#include "MagickCore/color.h"
+#include "MagickCore/color-private.h"
+#include "MagickCore/colorspace-private.h"
#include "MagickCore/compare.h"
#include "MagickCore/constitute.h"
#include "MagickCore/draw.h"
#include "MagickCore/geometry.h"
#include "MagickCore/histogram.h"
#include "MagickCore/image.h"
-#include "MagickCore/image.h"
#include "MagickCore/layer.h"
#include "MagickCore/locale-private.h"
#include "MagickCore/list.h"
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
-% CloneImageProperties() clones one or more image properties.
+% CloneImageProperties() clones all the image properties to another image.
%
% The format of the CloneImageProperties method is:
%
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
-% DefineImageProperty() associates a key/value pair with an image property.
+% DefineImageProperty() associates an assignment string of the form
+% "key=value" with per-image artifact. It is equivelent to
+% SetImageProperity().
%
% The format of the DefineImageProperty method is:
%
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
-% DestroyImageProperties() releases memory associated with image property
-% values.
+% DestroyImageProperties() destroys all properities and associated memory
+% attached to the given image.
%
% The format of the DestroyDefines method is:
%
%
% GetImageProperty() gets a value associated with an image property.
%
+% The returned string is a constant string in the tree and should NOT be
+% freed by the caller.
+%
% The format of the GetImageProperty method is:
%
% const char *GetImageProperty(const Image *image,const char *key,
if ((count != 0) && ((size_t) count <= length))
{
resource=(char *) NULL;
- if (~(1UL*count) >= (MaxTextExtent-1))
+ if (~((size_t) count) >= (MaxTextExtent-1))
resource=(char *) AcquireQuantumMemory((size_t) count+MaxTextExtent,
sizeof(*resource));
if (resource != (char *) NULL)
We have the resource of interest.
*/
attribute=(char *) NULL;
- if (~(1UL*count) >= (MaxTextExtent-1))
+ if (~((size_t) count) >= (MaxTextExtent-1))
attribute=(char *) AcquireQuantumMemory((size_t) count+MaxTextExtent,
sizeof(*attribute));
if (attribute != (char *) NULL)
{ 0x1001c, "exif:GPSAreaInformation" },
{ 0x1001d, "exif:GPSDateStamp" },
{ 0x1001e, "exif:GPSDifferential" },
- { 0x0000, NULL}
+ { 0x00000, (const char *) NULL }
};
const StringInfo
case EXIF_FMT_STRING:
{
value=(char *) NULL;
- if (~(1UL*number_bytes) >= 1)
+ if (~((size_t) number_bytes) >= 1)
value=(char *) AcquireQuantumMemory((size_t) number_bytes+1UL,
sizeof(*value));
if (value != (char *) NULL)
if (value != (char *) NULL)
{
char
- key[MaxTextExtent];
+ *key;
register const char
*p;
- (void) CopyMagickString(key,property,MaxTextExtent);
+ key=AcquireString(property);
+ if (level == 2)
+ (void) SubstituteString(&key,"exif:","exif:thumbnail:");
switch (all)
{
case 1:
if (p == (const char *) NULL)
(void) SetImageProperty((Image *) image,key,value,exception);
value=DestroyString(value);
+ key=DestroyString(key);
status=MagickTrue;
}
}
FxInfo
*fx_info;
- MagickRealType
+ double
alpha;
MagickStatusType
image->properties);
return(p);
}
- if (LocaleNCompare("fx:",property,3) != 0)
+ if (LocaleNCompare("fx:",property,3) != 0) /* NOT %[fx:..] !!!! */
{
p=(const char *) GetValueFromSplayTree((SplayTreeInfo *)
image->properties,property);
fx_info=AcquireFxInfo(image,property+6,exception);
status=FxEvaluateChannelExpression(fx_info,RedPixelChannel,0,0,
&alpha,exception);
- pixel.red=(MagickRealType) QuantumRange*alpha;
+ pixel.red=(double) QuantumRange*alpha;
status|=FxEvaluateChannelExpression(fx_info,GreenPixelChannel,0,0,
&alpha,exception);
- pixel.green=(MagickRealType) QuantumRange*alpha;
+ pixel.green=(double) QuantumRange*alpha;
status|=FxEvaluateChannelExpression(fx_info,BluePixelChannel,0,0,
&alpha,exception);
- pixel.blue=(MagickRealType) QuantumRange*alpha;
+ pixel.blue=(double) QuantumRange*alpha;
if (image->colorspace == CMYKColorspace)
{
status|=FxEvaluateChannelExpression(fx_info,BlackPixelChannel,0,0,
&alpha,exception);
- pixel.black=(MagickRealType) QuantumRange*alpha;
+ pixel.black=(double) QuantumRange*alpha;
}
status|=FxEvaluateChannelExpression(fx_info,AlphaPixelChannel,0,0,
&alpha,exception);
- pixel.alpha=(MagickRealType) QuantumRange*(1.0-alpha);
+ pixel.alpha=(double) QuantumRange*(1.0-alpha);
fx_info=DestroyFxInfo(fx_info);
if( IfMagickTrue(status) )
{
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
% GetMagickProperty() gets attributes or calculated values that is associated
-% with a fixed known property name, or single letter properity.
+% with a fixed known property name, or single letter property.
%
-% This does not return, special profile or properity expressions. Nor does it
-% return free-form properity strings, unless referenced by a single letter
-% properity name.
+% This does not return, special profile or property expressions. Nor does it
+% return free-form property strings, unless referenced by a single letter
+% property name.
%
-% The returned string should be freed using DestoryString() when finished.
+% The returned string is stored as the image artifact 'get-property' (not as
+% another property), and as such should not be freed. Later calls however
+% will overwrite this value so if needed for a longer period a copy should be
+% made. This artifact can be deleted when no longer required.
%
% The format of the GetMagickProperty method is:
%
% const char *GetMagickProperty(const ImageInfo *image_info,Image *image,
-% const char *properity,ExceptionInfo *exception)
+% const char *property,ExceptionInfo *exception)
%
% A description of each parameter follows:
%
Image *image,const char letter,ExceptionInfo *exception)
{
char
- value[MaxTextExtent],
- *clone;
-
- if (image != (Image *) NULL && image->debug != MagickFalse)
- (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
- image->filename);
+ value[MaxTextExtent];
- *value='\0';
- clone=(char *)NULL;
+ const char
+ *string;
+ if (image != (Image *) NULL && IfMagickTrue(image->debug))
+ (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
+ *value='\0'; /* formatted string */
+ string=(char *) NULL; /* constant string reference */
switch (letter)
{
-
case 'b': /* image size read in - in bytes */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
ConcatenateMagickString(value,"B",MaxTextExtent);
break;
}
- case 'c': /* image comment property */
+ case 'c': /* image comment property - empty string by default */
{
- clone=ConstantString(GetImageProperty(image,"comment",exception));
+ string=GetImageProperty(image,"comment",exception);
+ if (string == (const char *) NULL)
+ string="";
break;
}
case 'd': /* Directory component of filename */
case 'g': /* Image geometry, canvas and offset %Wx%H+%X+%Y */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20gx%.20g%+.20g%+.20g",
- (double) image->page.width,(double) image->page.height,
- (double) image->page.x,(double) image->page.y);
+ (double) image->page.width,(double) image->page.height,
+ (double) image->page.x,(double) image->page.y);
break;
}
case 'h': /* Image height (current) */
{
- (void) FormatLocaleString(value,MaxTextExtent,"%.20g",
- (double) (image->rows != 0 ? image->rows : image->magick_rows));
+ (void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
+ (image->rows != 0 ? image->rows : image->magick_rows));
break;
}
case 'i': /* Filename last used for image (read or write) */
{
- clone=ConstantString(image->filename);
+ string=image->filename;
break;
}
case 'k': /* Number of unique colors */
{
- /* FUTURE: ensure this does not generate the formated comment! */
+ /*
+ FUTURE: ensure this does not generate the formatted comment!
+ */
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- GetNumberColors(image,(FILE *) NULL,exception));
+ GetNumberColors(image,(FILE *) NULL,exception));
break;
}
- case 'l': /* Image label */
+ case 'l': /* Image label property - empty string by default */
{
- clone=ConstantString(GetImageProperty(image,"label",exception));
+ string=GetImageProperty(image,"label",exception);
+ if ( string == (const char *)NULL)
+ string="";
break;
}
case 'm': /* Image format (file magick) */
{
- clone=ConstantString(image->magick);
+ string=image->magick;
break;
}
case 'n': /* Number of images in the list. */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- GetImageListLength(image));
+ GetImageListLength(image));
break;
}
case 'o': /* Output Filename - for delegate use only */
{
- clone=ConstantString(image_info->filename);
+ string=image_info->filename;
break;
}
case 'p': /* Image index in current image list -- As 'n' OBSOLETE */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- GetImageIndexInList(image));
+ GetImageIndexInList(image));
break;
}
case 'q': /* Quantum depth of image in memory */
if (IfMagickTrue(IsImageGray(image,exception)))
colorspace=GRAYColorspace;
(void) FormatLocaleString(value,MaxTextExtent,"%s %s %s",
- CommandOptionToMnemonic(MagickClassOptions,(ssize_t)image->storage_class),
+ CommandOptionToMnemonic(MagickClassOptions,(ssize_t) image->storage_class),
CommandOptionToMnemonic(MagickColorspaceOptions,(ssize_t) colorspace),
- IfMagickTrue(image->matte)?"Matte":"");
+ image->alpha_trait == BlendPixelTrait ? "Matte" : "");
break;
}
case 's': /* Image scene number */
{
if (image_info->number_scenes != 0)
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image_info->scene);
+ image_info->scene);
else
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->scene);
+ image->scene);
break;
}
case 't': /* Base filename without directory or extention */
}
case 'u': /* Unique filename */
{
- clone=ConstantString(image_info->unique);
+ string=image_info->unique;
break;
}
case 'w': /* Image width (current) */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- (image->columns != 0 ? image->columns : image->magick_columns));
+ (image->columns != 0 ? image->columns : image->magick_columns));
break;
}
case 'x': /* Image horizontal resolution (with units) */
{
(void) FormatLocaleString(value,MaxTextExtent,"%g %s",
- image->resolution.x,CommandOptionToMnemonic(
- MagickResolutionOptions,(ssize_t)image->units));
+ image->resolution.x,CommandOptionToMnemonic(
+ MagickResolutionOptions,(ssize_t)image->units));
break;
}
case 'y': /* Image vertical resolution (with units) */
{
(void) FormatLocaleString(value,MaxTextExtent,"%g %s",
- image->resolution.y,CommandOptionToMnemonic(
- MagickResolutionOptions,(ssize_t)image->units));
+ image->resolution.y,CommandOptionToMnemonic(MagickResolutionOptions,
+ (ssize_t) image->units));
break;
}
case 'z': /* Image depth as read in */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->depth);
+ image->depth);
break;
}
case 'A': /* Image alpha channel */
{
(void) FormatLocaleString(value,MaxTextExtent,"%s",
- CommandOptionToMnemonic(MagickBooleanOptions,(ssize_t)
- image->matte));
+ CommandOptionToMnemonic(MagickBooleanOptions,(ssize_t) image->alpha_trait));
break;
}
case 'C': /* Image compression method. */
case 'D': /* Image dispose method. */
{
(void) FormatLocaleString(value,MaxTextExtent,"%s",
- CommandOptionToMnemonic(MagickDisposeOptions,(ssize_t)
- image->dispose));
+ CommandOptionToMnemonic(MagickDisposeOptions,(ssize_t) image->dispose));
break;
}
case 'G': /* Image size as geometry = "%wx%h" */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20gx%.20g",
- (double)image->magick_columns,(double) image->magick_rows);
+ (double)image->magick_columns,(double) image->magick_rows);
break;
}
case 'H': /* layer canvas height */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->page.height);
+ image->page.height);
break;
}
case 'M': /* Magick filename - filename given incl. coder & read mods */
{
- clone=ConstantString(image->magick_filename);
+ string=image->magick_filename;
break;
}
case 'O': /* layer canvas offset with sign = "+%X+%Y" */
{
- (void) FormatLocaleString(value,MaxTextExtent,"%+ld%+ld",
- (long) image->page.x,(long) image->page.y);
+ (void) FormatLocaleString(value,MaxTextExtent,"%+ld%+ld",(long)
+ image->page.x,(long) image->page.y);
break;
}
case 'P': /* layer canvas page size = "%Wx%H" */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20gx%.20g",
- (double) image->page.width,(double) image->page.height);
+ (double) image->page.width,(double) image->page.height);
break;
}
case 'Q': /* image compression quality */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->quality);
+ image->quality);
break;
}
case 'S': /* Image scenes ???? */
{
if (image_info->number_scenes == 0)
- clone=ConstantString("2147483647");
+ string="2147483647";
else
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image_info->scene+image_info->number_scenes);
+ image_info->scene+image_info->number_scenes);
break;
}
case 'T': /* image time delay for animations */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->delay);
+ image->delay);
break;
}
case 'W': /* layer canvas width */
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->page.width);
+ image->page.width);
break;
}
case 'X': /* layer canvas X offset */
{
- (void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->page.x);
+ (void) FormatLocaleString(value,MaxTextExtent,"%+.20g",(double)
+ image->page.x);
break;
}
case 'Y': /* layer canvas Y offset */
{
- (void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->page.y);
+ (void) FormatLocaleString(value,MaxTextExtent,"%+.20g",(double)
+ image->page.y);
break;
}
case 'Z': /* Zero filename ??? */
{
- clone=ConstantString(image_info->zero);
+ string=image_info->zero;
break;
}
case '@': /* Trim bounding box, without Trimming! */
page=GetImageBoundingBox(image,exception);
(void) FormatLocaleString(value,MaxTextExtent,"%.20gx%.20g%+.20g%+.20g",
- (double) page.width,(double) page.height,
- (double) page.x,(double) page.y);
+ (double) page.width,(double) page.height,(double) page.x,(double)
+ page.y);
break;
}
case '#': /* Image signature */
{
(void) SignatureImage(image,exception);
- clone=ConstantString(GetImageProperty(image,"signature",exception));
+ string=GetImageProperty(image,"signature",exception);
break;
}
case '%': /* percent escaped */
{
- clone=ConstantString("%");
+ string="%";
break;
}
}
if (*value != '\0')
- clone=ConstantString(value);
- return(clone);
+ string=value;
+ if (string != (char *) NULL)
+ {
+ (void) SetImageArtifact(image,"get-property",string);
+ return(GetImageArtifact(image,"get-property"));
+ }
+ return((char *)NULL);
}
MagickExport const char *GetMagickProperty(const ImageInfo *image_info,
Image *image,const char *property,ExceptionInfo *exception)
{
char
- value[MaxTextExtent],
- filename[MaxTextExtent];
+ value[MaxTextExtent];
- assert(property[0] != '\0');
- if ( property[1] == '\0') /* single letter properity request */
- return( GetMagickPropertyLetter(image_info,image,*property,exception) );
+ const char
+ *string;
- *value='\0';
+ assert(property[0] != '\0');
+ if (property[1] == '\0') /* single letter property request */
+ return(GetMagickPropertyLetter(image_info,image,*property,exception));
+ if ((image != (Image *) NULL) && IfMagickTrue(image->debug))
+ (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
+ *value='\0'; /* formated string */
+ string=(char *) NULL; /* constant string reference */
switch (*property)
{
case 'b':
{
- if ((LocaleNCompare("base",property,4) == 0) ||
- (LocaleNCompare("basename",property,8) == 0) )
+ if ((LocaleCompare("base",property) == 0) ||
+ (LocaleCompare("basename",property) == 0) )
{
- GetPathComponent(image->magick_filename,BasePath,filename);
- (void) CopyMagickString(value,filename,MaxTextExtent);
+ GetPathComponent(image->magick_filename,BasePath,value);
break;
}
break;
}
case 'c':
{
- if (LocaleNCompare("channels",property,8) == 0)
+ if (LocaleCompare("channels",property) == 0)
{
- /*
- Image channels.
- */
+ /* FUTURE: return actual image channels */
(void) FormatLocaleString(value,MaxTextExtent,"%s",
CommandOptionToMnemonic(MagickColorspaceOptions,(ssize_t)
image->colorspace));
LocaleLower(value);
- if( IfMagickTrue(image->matte) )
+ if( image->alpha_trait == BlendPixelTrait )
(void) ConcatenateMagickString(value,"a",MaxTextExtent);
break;
}
- if (LocaleNCompare("colorspace",property,10) == 0)
+ if (LocaleCompare("colorspace",property) == 0)
{
ColorspaceType
colorspace;
- /*
- Image storage class and colorspace.
- */
+ /* FUTURE: return actual colorspace - no 'gray' stuff */
colorspace=image->colorspace;
if( IfMagickTrue(IsImageGray(image,exception)) )
colorspace=GRAYColorspace;
- (void) FormatLocaleString(value,MaxTextExtent,"%s",
- CommandOptionToMnemonic(MagickColorspaceOptions,(ssize_t)
- colorspace));
+ string=CommandOptionToMnemonic(MagickColorspaceOptions,(ssize_t)
+ colorspace);
break;
}
- if (LocaleNCompare("copyright",property,9) == 0)
+ if (LocaleCompare("copyright",property) == 0)
{
(void) CopyMagickString(value,GetMagickCopyright(),MaxTextExtent);
break;
}
case 'd':
{
- if (LocaleNCompare("depth",property,5) == 0)
+ if (LocaleCompare("depth",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
image->depth);
break;
}
- if (LocaleNCompare("directory",property,9) == 0)
+ if (LocaleCompare("directory",property) == 0)
{
- GetPathComponent(image->magick_filename,HeadPath,filename);
- (void) CopyMagickString(value,filename,MaxTextExtent);
+ GetPathComponent(image->magick_filename,HeadPath,value);
break;
}
break;
}
case 'e':
{
- if (LocaleNCompare("extension",property,9) == 0)
+ if (LocaleCompare("extension",property) == 0)
{
- GetPathComponent(image->magick_filename,ExtensionPath,filename);
- (void) CopyMagickString(value,filename,MaxTextExtent);
+ GetPathComponent(image->magick_filename,ExtensionPath,value);
break;
}
break;
}
case 'g':
{
- if (LocaleNCompare("group",property,5) == 0)
+ if (LocaleCompare("gamma",property) == 0)
{
- (void) FormatLocaleString(value,MaxTextExtent,"0x%lx",
- (unsigned long) image_info->group);
+ (void) FormatLocaleString(value,MaxTextExtent,"%.*g",
+ GetMagickPrecision(),image->gamma);
+ break;
+ }
+ if ( (image_info != (ImageInfo *) NULL) &&
+ (LocaleCompare("group",property) == 0) )
+ {
+ (void) FormatLocaleString(value,MaxTextExtent,"0x%lx",(unsigned long)
+ image_info->group);
break;
}
break;
}
case 'h':
{
- if (LocaleNCompare("height",property,6) == 0)
+ if (LocaleCompare("height",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",
image->magick_rows != 0 ? (double) image->magick_rows : 256.0);
}
case 'i':
{
- if (LocaleNCompare("input",property,5) == 0)
+ if (LocaleCompare("input",property) == 0)
{
- (void) CopyMagickString(value,image->filename,MaxTextExtent);
+ string=image->filename;
break;
}
break;
}
case 'k':
{
- if (LocaleNCompare("kurtosis",property,8) == 0)
+ if (LocaleCompare("kurtosis",property) == 0)
{
double
kurtosis,
}
case 'm':
{
- if (LocaleNCompare("magick",property,6) == 0)
+ if (LocaleCompare("magick",property) == 0)
{
- (void) CopyMagickString(value,image->magick,MaxTextExtent);
+ string=image->magick;
break;
}
- if (LocaleNCompare("max",property,3) == 0)
+ if (LocaleCompare("max",property) == 0)
{
double
maximum,
GetMagickPrecision(),maximum);
break;
}
- if (LocaleNCompare("mean",property,4) == 0)
+ if (LocaleCompare("mean",property) == 0)
{
double
mean,
standard_deviation;
- (void) GetImageMean(image,&mean,&standard_deviation,
- exception);
+ (void) GetImageMean(image,&mean,&standard_deviation,exception);
(void) FormatLocaleString(value,MaxTextExtent,"%.*g",
GetMagickPrecision(),mean);
break;
}
- if (LocaleNCompare("min",property,3) == 0)
+ if (LocaleCompare("min",property) == 0)
{
double
maximum,
}
case 'o':
{
- if (LocaleNCompare("opaque",property,6) == 0)
+ if (LocaleCompare("opaque",property) == 0)
{
MagickBooleanType
opaque;
opaque=IsImageOpaque(image,exception);
- (void) CopyMagickString(value,IfMagickTrue(opaque)?"true":"false",
- MaxTextExtent);
+ (void) CopyMagickString(value,IfMagickTrue(opaque) ? "true" : "false",
+ MaxTextExtent);
break;
}
- if (LocaleNCompare("orientation",property,11) == 0)
+ if (LocaleCompare("orientation",property) == 0)
{
- (void) FormatLocaleString(value,MaxTextExtent,"%s",
- CommandOptionToMnemonic(MagickOrientationOptions,(ssize_t)
- image->orientation));
+ string=CommandOptionToMnemonic(MagickOrientationOptions,(ssize_t)
+ image->orientation);
break;
}
- if (LocaleNCompare("output",property,6) == 0)
+ if ((image_info != (ImageInfo *) NULL) &&
+ (LocaleCompare("output",property) == 0))
{
(void) CopyMagickString(value,image_info->filename,MaxTextExtent);
break;
}
case 'p':
{
- if (LocaleNCompare("page",property,4) == 0)
+ if (LocaleCompare("page",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
GetImageIndexInList(image)+1);
}
case 'r':
{
- /* FUTURE: Obsolete */
- if (LocaleNCompare("resolution.x",property,11) == 0)
+ /* This matches %[fx:resolution.x] */
+ if (LocaleCompare("resolution.x",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%g",
image->resolution.x);
break;
}
- /* FUTURE: Obsolete */
- if (LocaleNCompare("resolution.y",property,11) == 0)
+ /* This matches %[fx:resolution.y] */
+ if (LocaleCompare("resolution.y",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%g",
image->resolution.y);
}
case 's':
{
- if (LocaleNCompare("scene",property,5) == 0)
+ if (LocaleCompare("scene",property) == 0)
{
- if (image_info->number_scenes != 0)
+ if ((image_info != (ImageInfo *) NULL) &&
+ (image_info->number_scenes != 0))
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image_info->scene);
+ image_info->scene);
else
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
- image->scene);
+ image->scene);
break;
}
- if (LocaleNCompare("scenes",property,6) == 0)
+ if (LocaleCompare("scenes",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
GetImageListLength(image));
break;
}
- if (LocaleNCompare("size",property,4) == 0)
+ if (LocaleCompare("size",property) == 0)
{
char
format[MaxTextExtent];
(void) FormatLocaleString(value,MaxTextExtent,"%sB",format);
break;
}
- if (LocaleNCompare("skewness",property,8) == 0)
+ if (LocaleCompare("skewness",property) == 0)
{
double
kurtosis,
GetMagickPrecision(),skewness);
break;
}
- if (LocaleNCompare("standard-deviation",property,18) == 0)
+ if (LocaleCompare("standard-deviation",property) == 0)
{
double
mean,
standard_deviation;
- (void) GetImageMean(image,&mean,&standard_deviation,
- exception);
+ (void) GetImageMean(image,&mean,&standard_deviation,exception);
(void) FormatLocaleString(value,MaxTextExtent,"%.*g",
GetMagickPrecision(),standard_deviation);
break;
}
break;
}
+ case 't':
+ {
+ if (LocaleCompare("type",property) == 0)
+ {
+ string=CommandOptionToMnemonic(MagickTypeOptions,(ssize_t)
+ GetImageType(image,exception));
+ break;
+ }
+ break;
+ }
case 'u':
{
- if (LocaleNCompare("unique",property,6) == 0)
+ if ((image_info != (ImageInfo *) NULL) &&
+ (LocaleCompare("unique",property) == 0))
{
- (void) CopyMagickString(filename,image_info->unique,MaxTextExtent);
- (void) CopyMagickString(value,filename,MaxTextExtent);
+ string=image_info->unique;
break;
}
break;
}
case 'v':
{
- if (LocaleNCompare("version",property,7) == 0)
+ if (LocaleCompare("version",property) == 0)
{
- (void) CopyMagickString(value,GetMagickVersion((size_t *) NULL),
- MaxTextExtent);
+ string=GetMagickVersion((size_t *) NULL);
break;
}
break;
}
case 'w':
{
- if (LocaleNCompare("width",property,5) == 0)
+ if (LocaleCompare("width",property) == 0)
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",(double)
(image->magick_columns != 0 ? image->magick_columns : 256));
}
break;
}
- case 'x': /* ( X resolution, (with units) */
+ case 'x': /* FUTURE: Obsolete X resolution */
{
- if ((LocaleNCompare("xresolution",property,11) == 0) ||
- (LocaleNCompare("x-resolution",property,12) == 0) )
+ if ((LocaleCompare("xresolution",property) == 0) ||
+ (LocaleCompare("x-resolution",property) == 0) )
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",
- image->resolution.x);
+ image->resolution.x);
break;
}
break;
}
- case 'y': /* ( Y resolution, (with units) */
+ case 'y': /* FUTURE: Obsolete Y resolution */
{
- if ((LocaleNCompare("yresolution",property,11) == 0) ||
- (LocaleNCompare("y-resolution",property,12) == 0) )
+ if ((LocaleCompare("yresolution",property) == 0) ||
+ (LocaleCompare("y-resolution",property) == 0) )
{
(void) FormatLocaleString(value,MaxTextExtent,"%.20g",
- image->resolution.y);
+ image->resolution.y);
break;
}
break;
}
case 'z':
{
- if (LocaleNCompare("zero",property,4) == 0)
+ if ((image_info != (ImageInfo *) NULL) &&
+ (LocaleCompare("zero",property) == 0))
{
- (void) CopyMagickString(filename,image_info->zero,MaxTextExtent);
- (void) CopyMagickString(value,filename,MaxTextExtent);
+ string=image_info->zero;
break;
}
break;
}
}
- if (*value == '\0')
- return(NULL);
- return(ConstantString(value));
+ if (*value != '\0')
+ string=value;
+ if (string != (char *)NULL)
+ {
+ (void) SetImageArtifact(image,"get-property", string);
+ return(GetImageArtifact(image,"get-property"));
+ }
+ return((char *)NULL);
}
\f
/*
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
-% GetNextImageProperty() gets the next free-form string properity name.
+% GetNextImageProperty() gets the next free-form string property name.
%
% The format of the GetNextImageProperty method is:
%
% the appropriate image property and returns the interpreted text.
%
% This searches for and replaces
-% %x where 'x' is a single letter, case sensitive).
-% %[type:...] where 'type' is specifically known prefix.
-% %[name] where 'name' is a specifically known attribute, calculated
-% value, or free-form properity string name, or a free-form
-% global option string setting.
-% \n \r replaced by newline, return
-% < < replaced by '<', '>' resp.
+% \n \r \% replaced by newline, return, and percent resp.
+% < > & replaced by '<', '>', '&' resp.
+% %% replaced by percent
%
-% If 'name' is a 'glob-expresion' (containing '*' or '?' characters) it is used
-% as a search pattern to print "name=value\n" pairs of free-form string
-% properities. Some 'type' properities may also allow 'glob-expressions'.
+% %x %[x] where 'x' is a single letter properity, case sensitive).
+% %[type:name] where 'type' a is special and known prefix.
+% %[name] where 'name' is a specifically known attribute, calculated
+% value, or a per-image property string name, or a per-image
+% 'artifact' (as generated from a global option).
+% It may contain ':' as long as the prefix is not special.
%
-% The returned string must be freeds using DestoryString() or
-% RelinquishMagickMemory().
+% Single letter % substitutions will only happen if the character before the
+% percent is NOT a number. But braced substitutions will always be performed.
+% This prevents the typical usage of percent in a interpreted geometry
+% argument from being substituted when the percent is a geometry flag.
+%
+% If 'glob-expresions' ('*' or '?' characters) is used for 'name' it may be
+% used as a search pattern to print multiple lines of "name=value\n" pairs of
+% the associacted set of properities.
+%
+% The returned string must be freed using DestoryString() by the caller.
%
% The format of the InterpretImageProperties method is:
%
-% char *InterpretImageProperties(const ImageInfo *image_info,Image *image,
-% const char *embed_text,ExceptionInfo *exception)
+% char *InterpretImageProperties(const ImageInfo *image_info,
+% Image *image,const char *embed_text,ExceptionInfo *exception)
%
% A description of each parameter follows:
%
Image *image,const char *embed_text,ExceptionInfo *exception)
{
char
- *interpret_text,
- *text;
-
- const char
- *value;
+ *interpret_text;
register char
*q;
register const char
*p;
- register ssize_t
- i;
-
size_t
extent,
length;
+ MagickBooleanType
+ number;
+
assert(image != (Image *) NULL);
assert(image->signature == MagickSignature);
if( IfMagickTrue(image->debug) )
(void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
- if ((embed_text == (const char *) NULL) || (*embed_text == '\0'))
+ if ((embed_text == (const char *) NULL))
return((char *) NULL);
- text=(char *) embed_text;
+ p=embed_text;
+
+ if (*p == '\0')
+ return(ConstantString(""));
/* handle a '@' replace string from file */
- if ((*text == '@') && ((*(text+1) == '-') ||
- IfMagickTrue(IsPathAccessible(text+1))))
- return(FileToString(embed_text+1,~0,exception));
+ if (*p == '@') {
+ p++;
+ if (*p != '-' && IfMagickFalse(IsPathAccessible(p)) ) {
+ (void) ThrowMagickException(exception,GetMagickModule(),
+ OptionError,"UnableToAccessPath","%s",p);
+ return((char *) NULL);
+ }
+ return(FileToString(p,~0,exception));
+ }
+
/*
Translate any embedded format characters.
*/
- interpret_text=AcquireString(text);
- extent=MaxTextExtent;
- p=text;
- for (q=interpret_text; *p != '\0'; p++)
+ interpret_text=AcquireString(embed_text); /* new string with extra space */
+ extent=MaxTextExtent; /* how many extra space */
+ number=MagickFalse; /* is last char a number? */
+ for (q=interpret_text; *p!='\0'; number=IsMagickTrue(isdigit(*p)),p++)
{
*q='\0';
if ((size_t) (q-interpret_text+MaxTextExtent) >= extent)
interpret_text=(char *) ResizeQuantumMemory(interpret_text,extent+
MaxTextExtent+1,sizeof(*interpret_text));
if (interpret_text == (char *) NULL)
- break;
+ return((char *) NULL);
q=interpret_text+strlen(interpret_text);
}
/*
- Process backslash escapes
+ Look for the various escapes, (and handle other specials)
*/
- if ((*p == '\\') && (*(p+1) == 'r')) /* convert to RETURN */
- {
- *q++='\r';
- p++;
- continue;
- }
- if ((*p == '\\') && (*(p+1) == 'n')) /* convert to NEWLINE */
- {
- *q++='\n';
- p++;
- continue;
- }
-#if 0
- /* FUTURE: end of line removal! */
- if ((*p == '\\') && (*(p+1) == '\n')) /* EOL removal UNIX,MacOSX */
- {
- p+=2;
+ switch (*p) {
+ case '\\':
+ switch (*(p+1)) {
+ case '\0':
+ continue;
+ case 'r': /* convert to RETURN */
+ *q++='\r';
+ p++;
+ continue;
+ case 'n': /* convert to NEWLINE */
+ *q++='\n';
+ p++;
+ continue;
+ case '\n': /* EOL removal UNIX,MacOSX */
+ p++;
+ continue;
+ case '\r': /* EOL removal DOS,Windows */
+ p++;
+ if (*p == '\n') /* return-newline EOL */
+ p++;
+ continue;
+ default:
+ p++;
+ *q++=(*p);
+ continue;
+ }
+ continue; /* never reached! */
+ case '&':
+ if (LocaleNCompare("<",p,4) == 0)
+ *q++='<', p+=3;
+ else if (LocaleNCompare(">",p,4) == 0)
+ *q++='>', p+=3;
+ else if (LocaleNCompare("&",p,5) == 0)
+ *q++='&', p+=4;
+ else
+ *q++=(*p);
continue;
- }
- if ((*p == '\\') && (*(p+1) == '\r')) /* EOL removal DOS,Windows */
- {
- p+=2;
- if (*p == '\n' )
- p++;
- }
-#endif
- if (*p == '\\') /* escaped backslash */
- {
- p++;
- *q++=(*p);
+ case '%':
+ break; /* continue to next set of handlers */
+ default:
+ *q++=(*p); /* any thing else is 'as normal' */
continue;
- }
- if (*p != '%') /* usless escape - remove -- no if needed? */
- {
- *q++=(*p);
+ }
+ p++; /* advance beyond the percent */
+
+ /*
+ Doubled Percent - or percent at end of string
+ */
+ if ( *p == '\0' )
+ p--;
+ if ( *p == '%' ) {
+ *q++='%';
continue;
}
- p++;
- /* Handle percent escape */
- /* single letter escapes, without multi-character brace wrapper */
+ /*
+ Single letter escapes %c
+ */
if ( *p != '[' ) {
+ const char
+ *value;
+
+ /* But only if not preceeded by a number! */
+ if ( IfMagickTrue(number) ) {
+ *q++='%'; /* do NOT substitute the percent */
+ p--; /* back up one */
+ continue;
+ }
value=GetMagickPropertyLetter(image_info,image,*p, exception);
if (value != (char *) NULL) {
length=strlen(value);
interpret_text=(char *) ResizeQuantumMemory(interpret_text,
extent+MaxTextExtent,sizeof(*interpret_text));
if (interpret_text == (char *) NULL)
- break;
+ return((char *)NULL);
q=interpret_text+strlen(interpret_text);
}
(void) CopyMagickString(q,value,extent);
q+=length;
- value=DestroyString((char *)value); /* must be destoryed */
+ continue;
}
-#if 0
- else {
- /* FUTURE: Warn about unknown percent escape */
- fprintf(stderr, "UNKNOWN ESCAPE: \"%%%c\"\n", *p);
+ (void) ThrowMagickException(exception,GetMagickModule(),
+ OptionWarning,"UnknownImageProperty","\"%%%c\"",*p);
+ continue;
+ }
+
+ /*
+ Braced Percent Escape %[...]
+ */
+ {
+ char
+ pattern[MaxTextExtent];
+
+ const char
+ *key,
+ *value;
+
+ register ssize_t
+ len;
+
+ ssize_t
+ depth;
+
+ /* get the string framed by the %[...] */
+ p++; /* advance p to just inside the opening brace */
+ depth=1;
+ if ( *p == ']' ) {
+ (void) ThrowMagickException(exception,GetMagickModule(),
+ OptionWarning,"UnknownImageProperty","\"%%[]\"");
+ break;
}
-#endif
- }
- else /* multi-character percent escape %[....] */
- do { /* brace block, enable use of 'break' */
-
- char
- pattern[MaxTextExtent];
-
- const char
- *key,
- *value;
-
- ssize_t
- depth;
-
- /* get the string from framed by [..] */
-#if 1
- if (strchr(p,']') == (char *) NULL)
- break; /* FUTURE: escape %[..] missing final brace */
-#endif
- depth=1;
- p++;
- /* FUTURE: refactor into sub-routine looking for 'break' character
- * Full recursion? Or only as needed?
- */
- for (i=0; (i < (MaxTextExtent-1L)) && (*p != '\0'); i++)
- {
- if (*p == '[')
- depth++;
- if (*p == ']')
- depth--;
- if (depth <= 0)
- break;
- pattern[i]=(*p++);
- }
- pattern[i]='\0';
-#if 0
- if ( depth != 0 ) {
- /* FUTURE: WARN missing final ']' for "%[...]" */
- pattern[7] = '\0'; /* truncate escape pattern for error */
- fprintf(stderr, "Unbalanced Escape Brace: \"%%[%s...\"\n",pattern);
- p--;
- break;
+ for (len=0; len<(MaxTextExtent-1L) && (*p != '\0');)
+ {
+ /* skip escaped braces within braced pattern */
+ if ( (*p == '\\') && (*(p+1) != '\0') ) {
+ pattern[len++]=(*p++);
+ pattern[len++]=(*p++);
+ continue;
}
- fprintf(stderr, "MULTI-CHAR ESCAPE: \"%%[%s]\"\n", pattern);
-#endif
+ if (*p == '[')
+ depth++;
+ if (*p == ']')
+ depth--;
+ if (depth <= 0)
+ break;
+ pattern[len++]=(*p++);
+ }
+ pattern[len]='\0';
+ /* Check for unmatched final ']' for "%[...]" */
+ if ( depth != 0 ) {
+ if (len >= 64) { /* truncate string for error message */
+ pattern[61] = '.';
+ pattern[62] = '.';
+ pattern[63] = '.';
+ pattern[64] = '\0';
+ }
+ (void) ThrowMagickException(exception,GetMagickModule(),
+ OptionError,"UnbalancedBraces","\"%%[%s\"",pattern);
+ interpret_text=DestroyString(interpret_text);
+ return((char *)NULL);
+ }
- /* Try a Special Properity String, or a special prefix,
- * such as: %[exif:...] %[fx:...] %[pixel:...]
- */
- value=GetImageProperty(image,pattern,exception);
- if (value != (const char *) NULL)
- {
- length=strlen(value);
- if ((size_t) (q-interpret_text+length+1) >= extent)
- {
- extent+=length;
- interpret_text=(char *) ResizeQuantumMemory(interpret_text,
- extent+MaxTextExtent,sizeof(*interpret_text));
- if (interpret_text == (char *) NULL)
- break;
- q=interpret_text+strlen(interpret_text);
- }
- (void) CopyMagickString(q,value,extent);
- q+=length;
- break;
- }
- /* Handle properity 'glob' patterns - by iteration
- * Such as: %[*] %[my_property:*] %[filename:size]
- * Also does wrapped single letters: %[b] %[G] %[g]
- */
- if( IfMagickTrue(IsGlob(pattern)) )
- {
- ResetImagePropertyIterator(image);
- key=GetNextImageProperty(image);
- while (key != (const char *) NULL)
+ /*
+ Special Property Prefixes
+ such as: %[exif:...] %[fx:...] %[pixel:...]
+ Otherwise a free-form property string
+ */
+ value=GetImageProperty(image,pattern,exception);
+ if (value != (const char *) NULL)
+ {
+ length=strlen(value);
+ if ((size_t) (q-interpret_text+length+1) >= extent)
{
- if( IfMagickTrue(GlobExpression(key,pattern,MagickTrue)) )
- {
- value=GetImageProperty(image,key,exception);
- if (value != (const char *) NULL)
- {
- length=strlen(key)+strlen(value)+2;
- if ((size_t) (q-interpret_text+length+1) >= extent)
- {
- extent+=length;
- interpret_text=(char *) ResizeQuantumMemory(
- interpret_text,extent+MaxTextExtent,
- sizeof(*interpret_text));
- if (interpret_text == (char *) NULL)
- break;
- q=interpret_text+strlen(interpret_text);
- }
- q+=FormatLocaleString(q,extent,"%s=%s\n",key,value);
- }
- }
- key=GetNextImageProperty(image);
+ extent+=length;
+ interpret_text=(char *) ResizeQuantumMemory(interpret_text,
+ extent+MaxTextExtent,sizeof(*interpret_text));
+ if (interpret_text == (char *) NULL)
+ return((char *)NULL);
+ q=interpret_text+strlen(interpret_text);
}
- break;
- }
- /* Look for a known property or image attribute
- Such as %[basename] %[denisty] %[delay]
- */
- value=GetMagickProperty(image_info,image,pattern,exception);
- if (value != (const char *) NULL)
+ (void) CopyMagickString(q,value,extent);
+ q+=length;
+ continue;
+ }
+ /*
+ Handle property 'glob' patterns
+ Such as: %[*] %[user:array_??] %[filename:e*]
+ */
+ if( IfMagickTrue(IsGlob(pattern)) )
+ {
+ ResetImagePropertyIterator(image);
+ key=GetNextImageProperty(image);
+ while (key != (const char *) NULL)
{
- length=strlen(value);
- if ((size_t) (q-interpret_text+length+1) >= extent)
+ if( IfMagickTrue(GlobExpression(key,pattern,MagickTrue)) )
{
- extent+=length;
- interpret_text=(char *) ResizeQuantumMemory(interpret_text,
- extent+MaxTextExtent,sizeof(*interpret_text));
- if (interpret_text == (char *) NULL)
- break;
- q=interpret_text+strlen(interpret_text);
- }
- (void) CopyMagickString(q,value,extent);
- q+=length;
- value=DestroyString((char *)value); /* must be destoryed */
- break;
- }
- if (image_info == (ImageInfo *) NULL)
- break;
- /* Look for artifact of this name */
- value=GetImageOption(image_info,pattern);
- if (value != (char *) NULL)
- {
- length=strlen(value);
- if ((size_t) (q-interpret_text+length+1) >= extent)
- {
- extent+=length;
- interpret_text=(char *) ResizeQuantumMemory(interpret_text,
- extent+MaxTextExtent,sizeof(*interpret_text));
- if (interpret_text == (char *) NULL)
- break;
- q=interpret_text+strlen(interpret_text);
+ value=GetImageProperty(image,key,exception);
+ if (value != (const char *) NULL)
+ {
+ length=strlen(key)+strlen(value)+2;
+ if ((size_t) (q-interpret_text+length+1) >= extent)
+ {
+ extent+=length;
+ interpret_text=(char *) ResizeQuantumMemory(
+ interpret_text,extent+MaxTextExtent,
+ sizeof(*interpret_text));
+ if (interpret_text == (char *) NULL)
+ return((char *)NULL);
+ q=interpret_text+strlen(interpret_text);
+ }
+ q+=FormatLocaleString(q,extent,"%s=%s\n",key,value);
+ }
}
- (void) CopyMagickString(q,value,extent);
- q+=length;
- break;
+ key=GetNextImageProperty(image);
}
- /* Look for option of this name */
+ continue;
+ }
+ /*
+ Look for a known property or image attribute
+ Such as %[basename] %[denisty] %[delay]
+ Also does wrapped single letters: %[b] %[G] %[g]
+ */
+ value=GetMagickProperty(image_info,image,pattern,exception);
+ if (value != (const char *) NULL)
+ {
+ length=strlen(value);
+ if ((size_t) (q-interpret_text+length+1) >= extent)
+ {
+ extent+=length;
+ interpret_text=(char *) ResizeQuantumMemory(interpret_text,
+ extent+MaxTextExtent,sizeof(*interpret_text));
+ if (interpret_text == (char *) NULL)
+ return((char *)NULL);
+ q=interpret_text+strlen(interpret_text);
+ }
+ (void) CopyMagickString(q,value,extent);
+ q+=length;
+ continue;
+ }
+ /*
+ Look for a per-image Artifact (user option, post-interpreted)
+ */
+ value=GetImageArtifact(image,pattern);
+ if (value != (char *) NULL)
+ {
+ length=strlen(value);
+ if ((size_t) (q-interpret_text+length+1) >= extent)
+ {
+ extent+=length;
+ interpret_text=(char *) ResizeQuantumMemory(interpret_text,
+ extent+MaxTextExtent,sizeof(*interpret_text));
+ if (interpret_text == (char *) NULL)
+ return((char *)NULL);
+ q=interpret_text+strlen(interpret_text);
+ }
+ (void) CopyMagickString(q,value,extent);
+ q+=length;
+ continue;
+ }
+ /*
+ Look for user option of this name (should never match in CLI usage)
+ */
+ if (image_info != (ImageInfo *) NULL) {
value=GetImageOption(image_info,pattern);
if (value != (char *) NULL)
{
interpret_text=(char *) ResizeQuantumMemory(interpret_text,
extent+MaxTextExtent,sizeof(*interpret_text));
if (interpret_text == (char *) NULL)
- break;
+ return((char *)NULL);
q=interpret_text+strlen(interpret_text);
}
(void) CopyMagickString(q,value,extent);
q+=length;
- break;
+ continue;
}
-#if 0
- /* FUTURE: unknown multi-character percent escape */
- fprintf(stderr, "UNKNOWN ESCAPE: \"%%[%s]\"\n", pattern);
-#endif
- } while(0); /* End Brace Block and handling %[....] */
- }
+ }
+ /*
+ Failed to find any match anywhere!
+ */
+ if (len >= 64) { /* truncate string for error message */
+ pattern[61] = '.';
+ pattern[62] = '.';
+ pattern[63] = '.';
+ pattern[64] = '\0';
+ }
+ (void) ThrowMagickException(exception,GetMagickModule(),
+ OptionWarning,"UnknownImageProperty","\"%%[%s]\"",pattern);
+ /* continue */
+ } /* Braced Percent Escape */
+
+ } /* for each char in 'embed_text' */
*q='\0';
- if (text != (const char *) embed_text)
- text=DestroyString(text);
- (void) SubstituteString(&interpret_text,"<","<");
- (void) SubstituteString(&interpret_text,">",">");
return(interpret_text);
}
\f
% RemoveImageProperty() removes a property from the image and returns its
% value.
%
+% In this case the ConstantString() value returned should be freed by the
+% caller when finished.
+%
% The format of the RemoveImageProperty method is:
%
% char *RemoveImageProperty(Image *image,const char *property)
% %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%
-% SetImageProperty() saves teh given string value either to specific known
-% attribute or to a freeform properity string.
+% SetImageProperty() saves the given string value either to specific known
+% attribute or to a freeform property string.
%
-% Attempting to set a properity that is normally calculated will produce
+% Attempting to set a property that is normally calculated will produce
% an exception.
%
% The format of the SetImageProperty method is:
if( IfMagickTrue(image->debug) )
(void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
+ /* Create splay-tree */
if (image->properties == (void *) NULL)
image->properties=NewSplayTree(CompareSplayTreeString,
RelinquishMagickMemory,RelinquishMagickMemory);
- if ((value == (const char *) NULL) || (*value == '\0'))
+
+ /* Delete property if NULL -- empty string values are valid! */
+ if ((value == (const char *) NULL))
return(DeleteImageProperty(image,property));
status=MagickTrue;
+ /* Do not 'set' single letter properties - read only shorthand */
if (strlen(property) <= 1)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
return(MagickFalse);
}
- /* FUTURE: These should produce 'illegal settings'
- + test for binary chars in name,
- + first letter must be a alphabetic
- + special prefix
+
+ /* FUTURE: These should produce a 'illegal settings' error
+ + binary chars in property key
+ + single letter property keys (read only)
+ + known special prefixes (read only, they don't get saved!)
*/
switch (*property)
case 'B':
case 'b':
{
- if (LocaleCompare(property,"background") == 0)
+ if (LocaleCompare("background",property) == 0)
{
(void) QueryColorCompliance(value,AllCompliance,
&image->background_color,exception);
case 'C':
case 'c':
{
- if (LocaleCompare(property,"channels") == 0)
+ if (LocaleCompare("channels",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
status=MagickFalse;
break;
}
- if (LocaleCompare(property,"colorspace") == 0)
+ if (LocaleCompare("colorspace",property) == 0)
{
ssize_t
colorspace;
value);
if (colorspace < 0)
break;
- (void) SetImageColorspace(image,(ColorspaceType) colorspace,
- exception);
+ image->colorspace=(ColorspaceType) colorspace;
+ image->rendering_intent=UndefinedIntent;
+ image->gamma=1.000f;
+ ResetMagickMemory(&image->chromaticity,0,sizeof(image->chromaticity));
+ if (IssRGBColorspace(image->colorspace) != MagickFalse)
+ {
+ image->rendering_intent=PerceptualIntent;
+ image->gamma=1.000f/2.200f;
+ image->chromaticity.red_primary.x=0.6400f;
+ image->chromaticity.red_primary.y=0.3300f;
+ image->chromaticity.red_primary.z=0.0300f;
+ image->chromaticity.green_primary.x=0.3000f;
+ image->chromaticity.green_primary.y=0.6000f;
+ image->chromaticity.green_primary.z=0.1000f;
+ image->chromaticity.blue_primary.x=0.1500f;
+ image->chromaticity.blue_primary.y=0.0600f;
+ image->chromaticity.blue_primary.z=0.7900f;
+ image->chromaticity.white_point.x=0.3127f;
+ image->chromaticity.white_point.y=0.3290f;
+ image->chromaticity.white_point.z=0.3583f;
+ }
break;
}
- if (LocaleCompare(property,"compose") == 0)
+ if (LocaleCompare("compose",property) == 0)
{
ssize_t
compose;
image->compose=(CompositeOperator) compose;
break;
}
- if (LocaleCompare(property,"compress") == 0)
+ if (LocaleCompare("compress",property) == 0)
{
ssize_t
compression;
image->compression=(CompressionType) compression;
break;
}
- if (LocaleCompare(property,"copyright") == 0)
+ if (LocaleCompare("copyright",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
case 'D':
case 'd':
{
- if (LocaleCompare(property,"delay") == 0)
+ if (LocaleCompare("delay",property) == 0)
{
GeometryInfo
geometry_info;
image->ticks_per_second=(ssize_t) floor(geometry_info.sigma+0.5);
break;
}
- if (LocaleCompare(property,"density") == 0)
+ if (LocaleCompare("density",property) == 0)
{
GeometryInfo
geometry_info;
if ((flags & SigmaValue) == 0)
image->resolution.y=image->resolution.x;
}
- if (LocaleCompare(property,"depth") == 0)
+ if (LocaleCompare("depth",property) == 0)
{
image->depth=StringToUnsignedLong(value);
break;
}
- if (LocaleCompare(property,"dispose") == 0)
+ if (LocaleCompare("dispose",property) == 0)
{
ssize_t
dispose;
case 'G':
case 'g':
{
- if (LocaleCompare(property,"gravity") == 0)
+ if (LocaleCompare("gamma",property) == 0)
+ {
+ image->gamma=StringToDouble(value,(char **) NULL);
+ break;
+ }
+ if (LocaleCompare("gravity",property) == 0)
{
ssize_t
gravity;
}
case 'H':
case 'h':
- if (LocaleCompare(property,"height") == 0)
+ if (LocaleCompare("height",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
case 'I':
case 'i':
{
- if (LocaleCompare(property,"intent") == 0)
+ if (LocaleCompare("intent",property) == 0)
{
ssize_t
rendering_intent;
image->rendering_intent=(RenderingIntent) rendering_intent;
break;
}
- if (LocaleCompare(property,"interpolate") == 0)
+ if (LocaleCompare("interpolate",property) == 0)
{
ssize_t
interpolate;
}
case 'K':
case 'k':
- if (LocaleCompare(property,"kurtosis") == 0)
+ if (LocaleCompare("kurtosis",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
case 'L':
case 'l':
{
- if (LocaleCompare(property,"loop") == 0)
+ if (LocaleCompare("loop",property) == 0)
{
image->iterations=StringToUnsignedLong(value);
break;
}
case 'M':
case 'm':
- if ( (LocaleCompare(property,"magick") == 0) ||
- (LocaleCompare(property,"max") == 0) ||
- (LocaleCompare(property,"mean") == 0) ||
- (LocaleCompare(property,"min") == 0) ||
- (LocaleCompare(property,"min") == 0) )
- {
- (void) ThrowMagickException(exception,GetMagickModule(),
- OptionError,"SetReadOnlyProperty","'%s'",property);
+ if ( (LocaleCompare("magick",property) == 0) ||
+ (LocaleCompare("max",property) == 0) ||
+ (LocaleCompare("mean",property) == 0) ||
+ (LocaleCompare("min",property) == 0) ||
+ (LocaleCompare("min",property) == 0) )
+ {
+ (void) ThrowMagickException(exception,GetMagickModule(),OptionError,
+ "SetReadOnlyProperty","'%s'",property);
status=MagickFalse;
break;
}
case 'O':
case 'o':
- if (LocaleCompare(property,"opaque") == 0)
+ if (LocaleCompare("opaque",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
case 'P':
case 'p':
{
- if (LocaleCompare(property,"page") == 0)
+ if (LocaleCompare("page",property) == 0)
{
char
*geometry;
geometry=DestroyString(geometry);
break;
}
- if (LocaleCompare(property,"profile") == 0)
+ if (LocaleCompare("profile",property) == 0)
{
ImageInfo
*image_info;
case 'R':
case 'r':
{
- if (LocaleCompare(property,"rendering-intent") == 0)
+ if (LocaleCompare("rendering-intent",property) == 0)
{
ssize_t
rendering_intent;
}
case 'S':
case 's':
- if ( (LocaleCompare(property,"size") == 0) ||
- (LocaleCompare(property,"skewness") == 0) ||
- (LocaleCompare(property,"scenes") == 0) ||
- (LocaleCompare(property,"standard-deviation") == 0) )
+ if ( (LocaleCompare("size",property) == 0) ||
+ (LocaleCompare("skewness",property) == 0) ||
+ (LocaleCompare("scenes",property) == 0) ||
+ (LocaleCompare("standard-deviation",property) == 0) )
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
case 'T':
case 't':
{
- if (LocaleCompare(property,"tile-offset") == 0)
+ if (LocaleCompare("tile-offset",property) == 0)
{
char
*geometry;
case 'U':
case 'u':
{
- if (LocaleCompare(property,"units") == 0)
+ if (LocaleCompare("units",property) == 0)
{
ssize_t
units;
}
case 'V':
case 'v':
- if (LocaleCompare(property,"version") == 0)
+ if (LocaleCompare("version",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);
}
case 'W':
case 'w':
- if (LocaleCompare(property,"width") == 0)
+ if (LocaleCompare("width",property) == 0)
{
(void) ThrowMagickException(exception,GetMagickModule(),
OptionError,"SetReadOnlyProperty","'%s'",property);