/plugins/ImageMagick-6.3.2/coders/svg.c
C | 4256 lines | 3759 code | 192 blank | 305 comment | 954 complexity | 52537d1ad8c6371a664884897946fa37 MD5 | raw file
Possible License(s): MPL-2.0-no-copyleft-exception, LGPL-2.1
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % SSSSS V V GGGG %
- % SS V V G %
- % SSS V V G GG %
- % SS V V G G %
- % SSSSS V GGG %
- % %
- % %
- % Read/Write Scalable Vector Graphics Format. %
- % %
- % Software Design %
- % John Cristy %
- % William Radcliffe %
- % March 2000 %
- % %
- % %
- % Copyright 1999-2006 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. %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- %
- */
- /*
- Include declarations.
- */
- #include "magick/studio.h"
- #include "magick/annotate.h"
- #include "magick/blob.h"
- #include "magick/blob-private.h"
- #include "magick/constitute.h"
- #include "magick/composite-private.h"
- #include "magick/draw.h"
- #include "magick/exception.h"
- #include "magick/exception-private.h"
- #include "magick/gem.h"
- #include "magick/image.h"
- #include "magick/image-private.h"
- #include "magick/list.h"
- #include "magick/log.h"
- #include "magick/magick.h"
- #include "magick/memory_.h"
- #include "magick/quantum.h"
- #include "magick/property.h"
- #include "magick/resource_.h"
- #include "magick/static.h"
- #include "magick/string_.h"
- #include "magick/token.h"
- #include "magick/utility.h"
- #if defined(HasXML)
- # if defined(__WINDOWS__)
- # if defined(__MINGW32__)
- # define _MSC_VER
- # endif
- # include <win32config.h>
- # endif
- # include <libxml/parser.h>
- # include <libxml/xmlmemory.h>
- # include <libxml/parserInternals.h>
- # include <libxml/xmlerror.h>
- #endif
- #if defined(HasAUTOTRACE)
- #include "types.h"
- #include "image-header.h"
- #include "fit.h"
- #include "output.h"
- #include "pxl-outline.h"
- #include "atquantize.h"
- #include "thin-image.h"
- char
- *version_string = "AutoTrace version 0.24a";
- #endif
- #if defined(HasRSVG)
- #include "librsvg/rsvg.h"
- #endif
- /*
- Define declarations.
- */
- #define MVGPrintf (void) fprintf
- /*
- Typedef declarations.
- */
- typedef struct _BoundingBox
- {
- double
- x,
- y,
- width,
- height;
- } BoundingBox;
- typedef struct _ElementInfo
- {
- double
- cx,
- cy,
- major,
- minor,
- angle;
- } ElementInfo;
- typedef struct _SVGInfo
- {
- FILE
- *file;
- ExceptionInfo
- *exception;
- Image
- *image;
- const ImageInfo
- *image_info;
- AffineMatrix
- affine;
- unsigned long
- width,
- height;
- char
- *size,
- *title,
- *comment;
- int
- n;
- double
- *scale,
- pointsize;
- ElementInfo
- element;
- SegmentInfo
- segment;
- BoundingBox
- bounds,
- view_box;
- PointInfo
- radius;
- char
- *stop_color,
- *offset,
- *text,
- *vertices,
- *url;
- #if defined(HasXML)
- xmlParserCtxtPtr
- parser;
- xmlDocPtr
- document;
- #endif
- } SVGInfo;
- /*
- Forward declarations.
- */
- static MagickBooleanType
- WriteSVGImage(const ImageInfo *,Image *);
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % I s S V G %
- % %
- % %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- % IsSVG()() returns MagickTrue if the image format type, identified by the
- % magick string, is SVG.
- %
- % The format of the ReadSVGImage method is:
- %
- % MagickBooleanType IsSVG(const unsigned char *magick,const size_t length)
- %
- % A description of each parameter follows:
- %
- % o magick: This string is generally the first few bytes of an image file
- % or blob.
- %
- % o length: Specifies the length of the magick string.
- %
- %
- */
- static MagickBooleanType IsSVG(const unsigned char *magick,const size_t length)
- {
- if (length < 4)
- return(MagickFalse);
- if (LocaleNCompare((char *) magick,"?xml",4) == 0)
- return(MagickTrue);
- return(MagickFalse);
- }
- #if defined(HasXML)
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % R e a d S V G I m a g e %
- % %
- % %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- % ReadSVGImage() reads a Scalable Vector Gaphics file and returns it. It
- % allocates the memory necessary for the new Image structure and returns a
- % pointer to the new image.
- %
- % The format of the ReadSVGImage method is:
- %
- % Image *ReadSVGImage(const ImageInfo *image_info,ExceptionInfo *exception)
- %
- % A description of each parameter follows:
- %
- % o image_info: The image info.
- %
- % o exception: return any errors or warnings in this structure.
- %
- */
- static double GetUserSpaceCoordinateValue(const SVGInfo *svg_info,int type,
- const char *string)
- {
- char
- *p,
- token[MaxTextExtent];
- double
- value;
- (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",string);
- assert(string != (const char *) NULL);
- p=(char *) string;
- GetMagickToken(p,&p,token);
- value=atof(token);
- if (strchr(token,'%') != (char *) NULL)
- {
- double
- alpha,
- beta;
- if (type > 0)
- return(svg_info->view_box.width*value/100.0);
- if (type < 0)
- return(svg_info->view_box.height*value/100.0);
- alpha=value-svg_info->view_box.width;
- beta=value-svg_info->view_box.height;
- return(hypot(alpha,beta)/sqrt(2.0)/100.0);
- }
- GetMagickToken(p,&p,token);
- if (LocaleNCompare(token,"cm",2) == 0)
- return(DefaultResolution*svg_info->scale[0]/2.54*value);
- if (LocaleNCompare(token,"em",2) == 0)
- return(svg_info->pointsize*value);
- if (LocaleNCompare(token,"ex",2) == 0)
- return(svg_info->pointsize*value/2.0);
- if (LocaleNCompare(token,"in",2) == 0)
- return(DefaultResolution*svg_info->scale[0]*value);
- if (LocaleNCompare(token,"mm",2) == 0)
- return(DefaultResolution*svg_info->scale[0]/25.4*value);
- if (LocaleNCompare(token,"pc",2) == 0)
- return(DefaultResolution*svg_info->scale[0]/6.0*value);
- if (LocaleNCompare(token,"pt",2) == 0)
- return(svg_info->scale[0]*value);
- if (LocaleNCompare(token,"px",2) == 0)
- return(value);
- return(value);
- }
- static char **GetStyleTokens(void *context,const char *text,int *number_tokens)
- {
- char
- **tokens;
- register const char
- *p,
- *q;
- register long
- i;
- SVGInfo
- *svg_info;
- svg_info=(SVGInfo *) context;
- *number_tokens=0;
- if (text == (const char *) NULL)
- return((char **) NULL);
- /*
- Determine the number of arguments.
- */
- for (p=text; *p != '\0'; p++)
- if ((*p == ':') || (*p == ';'))
- (*number_tokens)++;
- tokens=(char **) AcquireMagickMemory((*number_tokens+2)*sizeof(*tokens));
- if (tokens == (char **) NULL)
- {
- (void) ThrowMagickException(svg_info->exception,GetMagickModule(),
- ResourceLimitError,"MemoryAllocationFailed","`%s'",text);
- return((char **) NULL);
- }
- /*
- Convert string to an ASCII list.
- */
- i=0;
- p=text;
- for (q=p; *q != '\0'; q++)
- {
- if ((*q != ':') && (*q != ';') && (*q != '\0'))
- continue;
- tokens[i]=AcquireString(p);
- (void) CopyMagickString(tokens[i],p,(size_t) (q-p+1));
- StripString(tokens[i++]);
- p=q+1;
- }
- tokens[i]=AcquireString(p);
- (void) CopyMagickString(tokens[i],p,(size_t) (q-p+1));
- StripString(tokens[i++]);
- tokens[i]=(char *) NULL;
- return(tokens);
- }
- static char **GetTransformTokens(void *context,const char *text,
- int *number_tokens)
- {
- char
- **tokens;
- register const char
- *p,
- *q;
- register long
- i;
- SVGInfo
- *svg_info;
- svg_info=(SVGInfo *) context;
- *number_tokens=0;
- if (text == (const char *) NULL)
- return((char **) NULL);
- /*
- Determine the number of arguments.
- */
- for (p=text; *p != '\0'; p++)
- {
- if (*p == '(')
- (*number_tokens)+=2;
- }
- tokens=(char **) AcquireMagickMemory((*number_tokens+2)*sizeof(*tokens));
- if (tokens == (char **) NULL)
- {
- (void) ThrowMagickException(svg_info->exception,GetMagickModule(),
- ResourceLimitError,"MemoryAllocationFailed","`%s'",text);
- return((char **) NULL);
- }
- /*
- Convert string to an ASCII list.
- */
- i=0;
- p=text;
- for (q=p; *q != '\0'; q++)
- {
- if ((*q != '(') && (*q != ')') && (*q != '\0'))
- continue;
- tokens[i]=AcquireString(p);
- (void) CopyMagickString(tokens[i],p,(size_t) (q-p+1));
- StripString(tokens[i++]);
- p=q+1;
- }
- tokens[i]=AcquireString(p);
- (void) CopyMagickString(tokens[i],p,(size_t) (q-p+1));
- StripString(tokens[i++]);
- tokens[i]=(char *) NULL;
- return(tokens);
- }
- #if defined(__cplusplus) || defined(c_plusplus)
- extern "C" {
- #endif
- static int SVGIsStandalone(void *context)
- {
- SVGInfo
- *svg_info;
- /*
- Is this document tagged standalone?
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.SVGIsStandalone()");
- svg_info=(SVGInfo *) context;
- return(svg_info->document->standalone == 1);
- }
- static int SVGHasInternalSubset(void *context)
- {
- SVGInfo
- *svg_info;
- /*
- Does this document has an internal subset?
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.SVGHasInternalSubset()");
- svg_info=(SVGInfo *) context;
- return(svg_info->document->intSubset != NULL);
- }
- static int SVGHasExternalSubset(void *context)
- {
- SVGInfo
- *svg_info;
- /*
- Does this document has an external subset?
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.SVGHasExternalSubset()");
- svg_info=(SVGInfo *) context;
- return(svg_info->document->extSubset != NULL);
- }
- static void SVGInternalSubset(void *context,const xmlChar *name,
- const xmlChar *external_id,const xmlChar *system_id)
- {
- SVGInfo
- *svg_info;
- /*
- Does this document has an internal subset?
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.internalSubset(%s, %s, %s)",(char *) name,
- (external_id != (const xmlChar *) NULL ? (char *) external_id : "none"),
- (system_id != (const xmlChar *) NULL ? (char *) system_id : "none"));
- svg_info=(SVGInfo *) context;
- (void) xmlCreateIntSubset(svg_info->document,name,external_id,system_id);
- }
- static xmlParserInputPtr SVGResolveEntity(void *context,
- const xmlChar *public_id,const xmlChar *system_id)
- {
- SVGInfo
- *svg_info;
- xmlParserInputPtr
- stream;
- /*
- Special entity resolver, better left to the parser, it has more
- context than the application layer. The default behaviour is to
- not resolve the entities, in that case the ENTITY_REF nodes are
- built in the structure (and the parameter values).
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.resolveEntity(%s, %s)",
- (public_id != (const xmlChar *) NULL ? (char *) public_id : "none"),
- (system_id != (const xmlChar *) NULL ? (char *) system_id : "none"));
- svg_info=(SVGInfo *) context;
- stream=xmlLoadExternalEntity((const char *) system_id,(const char *)
- public_id,svg_info->parser);
- return(stream);
- }
- static xmlEntityPtr SVGGetEntity(void *context,const xmlChar *name)
- {
- SVGInfo
- *svg_info;
- /*
- Get an entity by name.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.SVGGetEntity(%s)",
- name);
- svg_info=(SVGInfo *) context;
- return(xmlGetDocEntity(svg_info->document,name));
- }
- static xmlEntityPtr SVGGetParameterEntity(void *context,const xmlChar *name)
- {
- SVGInfo
- *svg_info;
- /*
- Get a parameter entity by name.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.getParameterEntity(%s)",name);
- svg_info=(SVGInfo *) context;
- return(xmlGetParameterEntity(svg_info->document,name));
- }
- static void SVGEntityDeclaration(void *context,const xmlChar *name,int type,
- const xmlChar *public_id,const xmlChar *system_id,xmlChar *content)
- {
- SVGInfo
- *svg_info;
- /*
- An entity definition has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.entityDecl(%s, %d, %s, %s, %s)",name,type,
- public_id != (xmlChar *) NULL ? (char *) public_id : "none",
- system_id != (xmlChar *) NULL ? (char *) system_id : "none",content);
- svg_info=(SVGInfo *) context;
- if (svg_info->parser->inSubset == 1)
- (void) xmlAddDocEntity(svg_info->document,name,type,public_id,system_id,
- content);
- else
- if (svg_info->parser->inSubset == 2)
- (void) xmlAddDtdEntity(svg_info->document,name,type,public_id,system_id,
- content);
- }
- static void SVGAttributeDeclaration(void *context,const xmlChar *element,
- const xmlChar *name,int type,int value,const xmlChar *default_value,
- xmlEnumerationPtr tree)
- {
- SVGInfo
- *svg_info;
- xmlChar
- *fullname,
- *prefix;
- xmlParserCtxtPtr
- parser;
- /*
- An attribute definition has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.attributeDecl(%s, %s, %d, %d, %s, ...)",element,name,type,value,
- default_value);
- svg_info=(SVGInfo *) context;
- fullname=(xmlChar *) NULL;
- prefix=(xmlChar *) NULL;
- parser=svg_info->parser;
- fullname=(xmlChar *) xmlSplitQName(parser,name,&prefix);
- if (parser->inSubset == 1)
- (void) xmlAddAttributeDecl(&parser->vctxt,svg_info->document->intSubset,
- element,fullname,prefix,(xmlAttributeType) type,
- (xmlAttributeDefault) value,default_value,tree);
- else
- if (parser->inSubset == 2)
- (void) xmlAddAttributeDecl(&parser->vctxt,svg_info->document->extSubset,
- element,fullname,prefix,(xmlAttributeType) type,
- (xmlAttributeDefault) value,default_value,tree);
- if (prefix != (xmlChar *) NULL)
- xmlFree(prefix);
- if (fullname != (xmlChar *) NULL)
- xmlFree(fullname);
- }
- static void SVGElementDeclaration(void *context,const xmlChar *name,int type,
- xmlElementContentPtr content)
- {
- SVGInfo
- *svg_info;
- xmlParserCtxtPtr
- parser;
- /*
- An element definition has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.elementDecl(%s, %d, ...)",name,type);
- svg_info=(SVGInfo *) context;
- parser=svg_info->parser;
- if (parser->inSubset == 1)
- (void) xmlAddElementDecl(&parser->vctxt,svg_info->document->intSubset,
- name,(xmlElementTypeVal) type,content);
- else
- if (parser->inSubset == 2)
- (void) xmlAddElementDecl(&parser->vctxt,svg_info->document->extSubset,
- name,(xmlElementTypeVal) type,content);
- }
- static void SVGNotationDeclaration(void *context,const xmlChar *name,
- const xmlChar *public_id,const xmlChar *system_id)
- {
- SVGInfo
- *svg_info;
- xmlParserCtxtPtr
- parser;
- /*
- What to do when a notation declaration has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.notationDecl(%s, %s, %s)",name,
- public_id != (const xmlChar *) NULL ? (char *) public_id : "none",
- system_id != (const xmlChar *) NULL ? (char *) system_id : "none");
- svg_info=(SVGInfo *) context;
- parser=svg_info->parser;
- if (parser->inSubset == 1)
- (void) xmlAddNotationDecl(&parser->vctxt,svg_info->document->intSubset,
- name,public_id,system_id);
- else
- if (parser->inSubset == 2)
- (void) xmlAddNotationDecl(&parser->vctxt,svg_info->document->intSubset,
- name,public_id,system_id);
- }
- static void SVGUnparsedEntityDeclaration(void *context,const xmlChar *name,
- const xmlChar *public_id,const xmlChar *system_id,const xmlChar *notation)
- {
- SVGInfo
- *svg_info;
- /*
- What to do when an unparsed entity declaration is parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.unparsedEntityDecl(%s, %s, %s, %s)",name,
- public_id != (xmlChar *) NULL ? (char *) public_id : "none",
- system_id != (xmlChar *) NULL ? (char *) system_id : "none",notation);
- svg_info=(SVGInfo *) context;
- (void) xmlAddDocEntity(svg_info->document,name,
- XML_EXTERNAL_GENERAL_UNPARSED_ENTITY,public_id,system_id,notation);
- }
- static void SVGSetDocumentLocator(void *context,xmlSAXLocatorPtr location)
- {
- SVGInfo
- *svg_info;
- /*
- Receive the document locator at startup, actually xmlDefaultSAXLocator.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.setDocumentLocator()");
- svg_info=(SVGInfo *) context;
- }
- static void SVGStartDocument(void *context)
- {
- SVGInfo
- *svg_info;
- xmlParserCtxtPtr
- parser;
- /*
- Called when the document start being processed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.startDocument()");
- svg_info=(SVGInfo *) context;
- GetExceptionInfo(svg_info->exception);
- parser=svg_info->parser;
- svg_info->document=xmlNewDoc(parser->version);
- if (svg_info->document == (xmlDocPtr) NULL)
- return;
- if (parser->encoding == NULL)
- svg_info->document->encoding=(const xmlChar *) NULL;
- else
- svg_info->document->encoding=xmlStrdup(parser->encoding);
- svg_info->document->standalone=parser->standalone;
- }
- static void SVGEndDocument(void *context)
- {
- SVGInfo
- *svg_info;
- /*
- Called when the document end has been detected.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.endDocument()");
- svg_info=(SVGInfo *) context;
- if (svg_info->offset != (char *) NULL)
- svg_info->offset=(char *) RelinquishMagickMemory(svg_info->offset);
- if (svg_info->stop_color != (char *) NULL)
- svg_info->stop_color=(char *) RelinquishMagickMemory(svg_info->stop_color);
- if (svg_info->scale != (double *) NULL)
- svg_info->scale=(double *) RelinquishMagickMemory(svg_info->scale);
- if (svg_info->text != (char *) NULL)
- svg_info->text=(char *) RelinquishMagickMemory(svg_info->text);
- if (svg_info->vertices != (char *) NULL)
- svg_info->vertices=(char *) RelinquishMagickMemory(svg_info->vertices);
- if (svg_info->url != (char *) NULL)
- svg_info->url=(char *) RelinquishMagickMemory(svg_info->url);
- #if defined(HasXML)
- if (svg_info->document != (xmlDocPtr) NULL)
- {
- xmlFreeDoc(svg_info->document);
- svg_info->document=(xmlDocPtr) NULL;
- }
- #endif
- }
- static void SVGStartElement(void *context,const xmlChar *name,
- const xmlChar **attributes)
- {
- char
- *color,
- id[MaxTextExtent],
- *p,
- token[MaxTextExtent],
- **tokens,
- *units;
- const char
- *keyword,
- *value;
- int
- number_tokens;
- SVGInfo
- *svg_info;
- register long
- i,
- j;
- /*
- Called when an opening tag has been processed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.startElement(%s",
- name);
- svg_info=(SVGInfo *) context;
- svg_info->n++;
- svg_info->scale=(double *) ResizeMagickMemory(svg_info->scale,
- (svg_info->n+1)*sizeof(*svg_info->scale));
- if (svg_info->scale == (double *) NULL)
- {
- (void) ThrowMagickException(svg_info->exception,GetMagickModule(),
- ResourceLimitError,"MemoryAllocationFailed","`%s'",name);
- return;
- }
- svg_info->scale[svg_info->n]=svg_info->scale[svg_info->n-1];
- color=AcquireString("none");
- units=AcquireString("userSpaceOnUse");
- value=(const char *) NULL;
- if (attributes != (const xmlChar **) NULL)
- for (i=0; (attributes[i] != (const xmlChar *) NULL); i+=2)
- {
- keyword=(const char *) attributes[i];
- value=(const char *) attributes[i+1];
- switch (*keyword)
- {
- case 'C':
- case 'c':
- {
- if (LocaleCompare(keyword,"cx") == 0)
- {
- svg_info->element.cx=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"cy") == 0)
- {
- svg_info->element.cy=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'F':
- case 'f':
- {
- if (LocaleCompare(keyword,"fx") == 0)
- {
- svg_info->element.major=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"fy") == 0)
- {
- svg_info->element.minor=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'H':
- case 'h':
- {
- if (LocaleCompare(keyword,"height") == 0)
- {
- svg_info->bounds.height=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'I':
- case 'i':
- {
- if (LocaleCompare(keyword,"id") == 0)
- {
- (void) CopyMagickString(id,value,MaxTextExtent);
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare(keyword,"r") == 0)
- {
- svg_info->element.angle=
- GetUserSpaceCoordinateValue(svg_info,0,value);
- break;
- }
- break;
- }
- case 'W':
- case 'w':
- {
- if (LocaleCompare(keyword,"width") == 0)
- {
- svg_info->bounds.width=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- break;
- }
- case 'X':
- case 'x':
- {
- if (LocaleCompare(keyword,"x") == 0)
- {
- svg_info->bounds.x=GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"x1") == 0)
- {
- svg_info->segment.x1=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"x2") == 0)
- {
- svg_info->segment.x2=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- break;
- }
- case 'Y':
- case 'y':
- {
- if (LocaleCompare(keyword,"y") == 0)
- {
- svg_info->bounds.y=GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"y1") == 0)
- {
- svg_info->segment.y1=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"y2") == 0)
- {
- svg_info->segment.y2=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- default:
- break;
- }
- }
- switch (*name)
- {
- case 'C':
- case 'c':
- {
- if (LocaleCompare((char *) name,"circle") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"clipPath") == 0)
- {
- MVGPrintf(svg_info->file,"push clip-path '%s'\n",id);
- break;
- }
- break;
- }
- case 'D':
- case 'd':
- {
- if (LocaleCompare((char *) name,"defs") == 0)
- {
- MVGPrintf(svg_info->file,"push defs\n");
- break;
- }
- break;
- }
- case 'E':
- case 'e':
- {
- if (LocaleCompare((char *) name,"ellipse") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'G':
- case 'g':
- {
- if (LocaleCompare((char *) name,"g") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'I':
- case 'i':
- {
- if (LocaleCompare((char *) name,"image") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'L':
- case 'l':
- {
- if (LocaleCompare((char *) name,"line") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"linearGradient") == 0)
- {
- MVGPrintf(svg_info->file,"push gradient '%s' linear %g,%g %g,%g\n",id,
- svg_info->segment.x1,svg_info->segment.y1,svg_info->segment.x2,
- svg_info->segment.y2);
- break;
- }
- break;
- }
- case 'P':
- case 'p':
- {
- if (LocaleCompare((char *) name,"path") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"pattern") == 0)
- {
- MVGPrintf(svg_info->file,"push pattern '%s' %g,%g %g,%g\n",id,
- svg_info->bounds.x,svg_info->bounds.y,svg_info->bounds.width,
- svg_info->bounds.height);
- break;
- }
- if (LocaleCompare((char *) name,"polygon") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"polyline") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare((char *) name,"radialGradient") == 0)
- {
- MVGPrintf(svg_info->file,"push gradient '%s' radial %g,%g %g,%g %g\n",
- id,svg_info->element.cx,svg_info->element.cy,
- svg_info->element.major,svg_info->element.minor,
- svg_info->element.angle);
- break;
- }
- if (LocaleCompare((char *) name,"rect") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare((char *) name,"svg") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- case 'T':
- case 't':
- {
- if (LocaleCompare((char *) name,"text") == 0)
- {
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"tspan") == 0)
- {
- if (*svg_info->text != '\0')
- {
- DrawInfo
- *draw_info;
- TypeMetric
- metrics;
- char
- *text;
- text=EscapeString(svg_info->text,'\'');
- MVGPrintf(svg_info->file,"text %g,%g '%s'\n",svg_info->bounds.x,
- svg_info->bounds.y,text);
- text=(char *) RelinquishMagickMemory(text);
- draw_info=CloneDrawInfo(svg_info->image_info,(DrawInfo *) NULL);
- draw_info->pointsize=svg_info->pointsize;
- draw_info->text=AcquireString(svg_info->text);
- (void) ConcatenateString(&draw_info->text," ");
- GetTypeMetrics(svg_info->image,draw_info,&metrics);
- svg_info->bounds.x+=metrics.width;
- draw_info=DestroyDrawInfo(draw_info);
- *svg_info->text='\0';
- }
- MVGPrintf(svg_info->file,"push graphic-context\n");
- break;
- }
- break;
- }
- default:
- break;
- }
- if (attributes != (const xmlChar **) NULL)
- for (i=0; (attributes[i] != (const xmlChar *) NULL); i+=2)
- {
- keyword=(const char *) attributes[i];
- value=(const char *) attributes[i+1];
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " %s = %s",keyword,value);
- switch (*keyword)
- {
- case 'A':
- case 'a':
- {
- if (LocaleCompare(keyword,"angle") == 0)
- {
- MVGPrintf(svg_info->file,"angle %g\n",
- GetUserSpaceCoordinateValue(svg_info,0,value));
- break;
- }
- break;
- }
- case 'C':
- case 'c':
- {
- if (LocaleCompare(keyword,"clip-path") == 0)
- {
- MVGPrintf(svg_info->file,"clip-path '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"clip-rule") == 0)
- {
- MVGPrintf(svg_info->file,"clip-rule '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"clipPathUnits") == 0)
- {
- (void) CloneString(&units,value);
- MVGPrintf(svg_info->file,"clip-units '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"color") == 0)
- {
- (void) CloneString(&color,value);
- break;
- }
- if (LocaleCompare(keyword,"cx") == 0)
- {
- svg_info->element.cx=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"cy") == 0)
- {
- svg_info->element.cy=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'D':
- case 'd':
- {
- if (LocaleCompare(keyword,"d") == 0)
- {
- (void) CloneString(&svg_info->vertices,value);
- break;
- }
- if (LocaleCompare(keyword,"dx") == 0)
- {
- svg_info->bounds.x+=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"dy") == 0)
- {
- svg_info->bounds.y+=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'F':
- case 'f':
- {
- if (LocaleCompare(keyword,"fill") == 0)
- {
- if (LocaleCompare(value,"currentColor") == 0)
- {
- MVGPrintf(svg_info->file,"fill '%s'\n",color);
- break;
- }
- MVGPrintf(svg_info->file,"fill '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fillcolor") == 0)
- {
- MVGPrintf(svg_info->file,"fill '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fill-rule") == 0)
- {
- MVGPrintf(svg_info->file,"fill-rule '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fill-opacity") == 0)
- {
- MVGPrintf(svg_info->file,"fill-opacity '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-family") == 0)
- {
- MVGPrintf(svg_info->file,"font-family '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-stretch") == 0)
- {
- MVGPrintf(svg_info->file,"font-stretch '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-style") == 0)
- {
- MVGPrintf(svg_info->file,"font-style '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-size") == 0)
- {
- svg_info->pointsize=GetUserSpaceCoordinateValue(svg_info,0,value);
- MVGPrintf(svg_info->file,"font-size %g\n",svg_info->pointsize);
- break;
- }
- if (LocaleCompare(keyword,"font-weight") == 0)
- {
- MVGPrintf(svg_info->file,"font-weight '%s'\n",value);
- break;
- }
- break;
- }
- case 'G':
- case 'g':
- {
- if (LocaleCompare(keyword,"gradientTransform") == 0)
- {
- AffineMatrix
- affine,
- current,
- transform;
- GetAffineMatrix(&transform);
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," ");
- tokens=GetTransformTokens(context,value,&number_tokens);
- for (j=0; j < (number_tokens-1); j+=2)
- {
- keyword=(char *) tokens[j];
- if (keyword == (char *) NULL)
- continue;
- value=(char *) tokens[j+1];
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " %s: %s",keyword,value);
- current=transform;
- GetAffineMatrix(&affine);
- switch (*keyword)
- {
- case 'M':
- case 'm':
- {
- if (LocaleCompare(keyword,"matrix") == 0)
- {
- p=(char *) value;
- GetMagickToken(p,&p,token);
- affine.sx=atof(value);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.rx=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.ry=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.sy=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.tx=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.ty=atof(token);
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare(keyword,"rotate") == 0)
- {
- double
- angle;
- angle=GetUserSpaceCoordinateValue(svg_info,0,value);
- affine.sx=cos(DegreesToRadians(fmod(angle,360.0)));
- affine.rx=sin(DegreesToRadians(fmod(angle,360.0)));
- affine.ry=(-sin(DegreesToRadians(fmod(angle,360.0))));
- affine.sy=cos(DegreesToRadians(fmod(angle,360.0)));
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare(keyword,"scale") == 0)
- {
- for (p=(char *) value; *p != '\0'; p++)
- if ((isspace((int) ((unsigned char) *p)) != 0) ||
- (*p == ','))
- break;
- affine.sx=GetUserSpaceCoordinateValue(svg_info,1,value);
- affine.sy=affine.sx;
- if (*p != '\0')
- affine.sy=
- GetUserSpaceCoordinateValue(svg_info,-1,p+1);
- svg_info->scale[svg_info->n]=ExpandAffine(&affine);
- break;
- }
- if (LocaleCompare(keyword,"skewX") == 0)
- {
- affine.sx=svg_info->affine.sx;
- affine.ry=tan(DegreesToRadians(fmod(
- GetUserSpaceCoordinateValue(svg_info,1,value),
- 360.0)));
- affine.sy=svg_info->affine.sy;
- break;
- }
- if (LocaleCompare(keyword,"skewY") == 0)
- {
- affine.sx=svg_info->affine.sx;
- affine.rx=tan(DegreesToRadians(fmod(
- GetUserSpaceCoordinateValue(svg_info,-1,value),
- 360.0)));
- affine.sy=svg_info->affine.sy;
- break;
- }
- break;
- }
- case 'T':
- case 't':
- {
- if (LocaleCompare(keyword,"translate") == 0)
- {
- for (p=(char *) value; *p != '\0'; p++)
- if ((isspace((int) ((unsigned char) *p)) != 0) ||
- (*p == ','))
- break;
- affine.tx=GetUserSpaceCoordinateValue(svg_info,1,value);
- affine.ty=affine.tx;
- if (*p != '\0')
- affine.ty=
- GetUserSpaceCoordinateValue(svg_info,-1,p+1);
- break;
- }
- break;
- }
- default:
- break;
- }
- transform.sx=current.sx*affine.sx+current.ry*affine.rx;
- transform.rx=current.rx*affine.sx+current.sy*affine.rx;
- transform.ry=current.sx*affine.ry+current.ry*affine.sy;
- transform.sy=current.rx*affine.ry+current.sy*affine.sy;
- transform.tx=current.sx*affine.tx+current.ry*affine.ty+
- current.tx;
- transform.ty=current.rx*affine.tx+current.sy*affine.ty+
- current.ty;
- }
- MVGPrintf(svg_info->file,"affine %g %g %g %g %g %g\n",
- transform.sx,transform.rx,transform.ry,transform.sy,
- transform.tx,transform.ty);
- for (j=0; tokens[j] != (char *) NULL; j++)
- tokens[j]=(char *) RelinquishMagickMemory(tokens[j]);
- tokens=(char **) RelinquishMagickMemory(tokens);
- break;
- }
- if (LocaleCompare(keyword,"gradientUnits") == 0)
- {
- (void) CloneString(&units,value);
- MVGPrintf(svg_info->file,"gradient-units '%s'\n",value);
- break;
- }
- break;
- }
- case 'H':
- case 'h':
- {
- if (LocaleCompare(keyword,"height") == 0)
- {
- svg_info->bounds.height=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"href") == 0)
- {
- (void) CloneString(&svg_info->url,value);
- break;
- }
- break;
- }
- case 'M':
- case 'm':
- {
- if (LocaleCompare(keyword,"major") == 0)
- {
- svg_info->element.major=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"minor") == 0)
- {
- svg_info->element.minor=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'O':
- case 'o':
- {
- if (LocaleCompare(keyword,"offset") == 0)
- {
- (void) CloneString(&svg_info->offset,value);
- break;
- }
- if (LocaleCompare(keyword,"opacity") == 0)
- {
- MVGPrintf(svg_info->file,"opacity '%s'\n",value);
- break;
- }
- break;
- }
- case 'P':
- case 'p':
- {
- if (LocaleCompare(keyword,"path") == 0)
- {
- (void) CloneString(&svg_info->url,value);
- break;
- }
- if (LocaleCompare(keyword,"points") == 0)
- {
- (void) CloneString(&svg_info->vertices,value);
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare(keyword,"r") == 0)
- {
- svg_info->element.major=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- svg_info->element.minor=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"rotate") == 0)
- {
- double
- angle;
- angle=GetUserSpaceCoordinateValue(svg_info,0,value);
- MVGPrintf(svg_info->file,"translate %g,%g\n",svg_info->bounds.x,
- svg_info->bounds.y);
- svg_info->bounds.x=0;
- svg_info->bounds.y=0;
- MVGPrintf(svg_info->file,"rotate %g\n",angle);
- break;
- }
- if (LocaleCompare(keyword,"rx") == 0)
- {
- if (LocaleCompare((char *) name,"ellipse") == 0)
- svg_info->element.major=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- else
- svg_info->radius.x=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"ry") == 0)
- {
- if (LocaleCompare((char *) name,"ellipse") == 0)
- svg_info->element.minor=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- else
- svg_info->radius.y=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare(keyword,"stop-color") == 0)
- {
- (void) CloneString(&svg_info->stop_color,value);
- break;
- }
- if (LocaleCompare(keyword,"stroke") == 0)
- {
- if (LocaleCompare(value,"currentColor") == 0)
- {
- MVGPrintf(svg_info->file,"stroke '%s'\n",color);
- break;
- }
- MVGPrintf(svg_info->file,"stroke '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-antialiasing") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-antialias %d\n",
- LocaleCompare(value,"true") == 0);
- break;
- }
- if (LocaleCompare(keyword,"stroke-dasharray") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-dasharray %s\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-dashoffset") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-dashoffset %s\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-linecap") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-linecap '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-linejoin") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-linejoin '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-miterlimit") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-miterlimit '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-opacity") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-opacity '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-width") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-width %g\n",
- GetUserSpaceCoordinateValue(svg_info,1,value));
- break;
- }
- if (LocaleCompare(keyword,"style") == 0)
- {
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," ");
- tokens=GetStyleTokens(context,value,&number_tokens);
- for (j=0; j < (number_tokens-1); j+=2)
- {
- keyword=(char *) tokens[j];
- value=(char *) tokens[j+1];
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " %s: %s",keyword,value);
- switch (*keyword)
- {
- case 'C':
- case 'c':
- {
- if (LocaleCompare(keyword,"clip-path") == 0)
- {
- MVGPrintf(svg_info->file,"clip-path '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"clip-rule") == 0)
- {
- MVGPrintf(svg_info->file,"clip-rule '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"clipPathUnits") == 0)
- {
- (void) CloneString(&units,value);
- MVGPrintf(svg_info->file,"clip-units '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"color") == 0)
- {
- (void) CloneString(&color,value);
- break;
- }
- break;
- }
- case 'F':
- case 'f':
- {
- if (LocaleCompare(keyword,"fill") == 0)
- {
- if (LocaleCompare(value,"currentColor") == 0)
- {
- MVGPrintf(svg_info->file,"fill '%s'\n",color);
- break;
- }
- MVGPrintf(svg_info->file,"fill '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fillcolor") == 0)
- {
- MVGPrintf(svg_info->file,"fill '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fill-rule") == 0)
- {
- MVGPrintf(svg_info->file,"fill-rule '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"fill-opacity") == 0)
- {
- MVGPrintf(svg_info->file,"fill-opacity '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-family") == 0)
- {
- MVGPrintf(svg_info->file,"font-family '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-stretch") == 0)
- {
- MVGPrintf(svg_info->file,"font-stretch '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-style") == 0)
- {
- MVGPrintf(svg_info->file,"font-style '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"font-size") == 0)
- {
- svg_info->pointsize=GetUserSpaceCoordinateValue(
- svg_info,0,value);
- MVGPrintf(svg_info->file,"font-size %g\n",
- svg_info->pointsize);
- break;
- }
- if (LocaleCompare(keyword,"font-weight") == 0)
- {
- MVGPrintf(svg_info->file,"font-weight '%s'\n",value);
- break;
- }
- break;
- }
- case 'O':
- case 'o':
- {
- if (LocaleCompare(keyword,"offset") == 0)
- {
- MVGPrintf(svg_info->file,"offset %g\n",
- GetUserSpaceCoordinateValue(svg_info,1,value));
- break;
- }
- if (LocaleCompare(keyword,"opacity") == 0)
- {
- MVGPrintf(svg_info->file,"opacity '%s'\n",value);
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare(keyword,"stop-color") == 0)
- {
- (void) CloneString(&svg_info->stop_color,value);
- break;
- }
- if (LocaleCompare(keyword,"stroke") == 0)
- {
- if (LocaleCompare(value,"currentColor") == 0)
- {
- MVGPrintf(svg_info->file,"stroke '%s'\n",color);
- break;
- }
- MVGPrintf(svg_info->file,"stroke '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-antialiasing") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-antialias %d\n",
- LocaleCompare(value,"true") == 0);
- break;
- }
- if (LocaleCompare(keyword,"stroke-dasharray") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-dasharray %s\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-dashoffset") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-dashoffset %s\n",
- value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-linecap") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-linecap '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-linejoin") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-linejoin '%s'\n",
- value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-miterlimit") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-miterlimit '%s'\n",
- value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-opacity") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-opacity '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"stroke-width") == 0)
- {
- MVGPrintf(svg_info->file,"stroke-width %g\n",
- GetUserSpaceCoordinateValue(svg_info,1,value));
- break;
- }
- break;
- }
- case 't':
- case 'T':
- {
- if (LocaleCompare(keyword,"text-align") == 0)
- {
- MVGPrintf(svg_info->file,"text-align '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"text-anchor") == 0)
- {
- MVGPrintf(svg_info->file,"text-anchor '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"text-decoration") == 0)
- {
- if (LocaleCompare(value,"underline") == 0)
- MVGPrintf(svg_info->file,"decorate underline\n");
- if (LocaleCompare(value,"line-through") == 0)
- MVGPrintf(svg_info->file,"decorate line-through\n");
- if (LocaleCompare(value,"overline") == 0)
- MVGPrintf(svg_info->file,"decorate overline\n");
- break;
- }
- if (LocaleCompare(keyword,"text-antialiasing") == 0)
- {
- MVGPrintf(svg_info->file,"text-antialias %d\n",
- LocaleCompare(value,"true") == 0);
- break;
- }
- break;
- }
- default:
- break;
- }
- }
- for (j=0; tokens[j] != (char *) NULL; j++)
- tokens[j]=(char *) RelinquishMagickMemory(tokens[j]);
- tokens=(char **) RelinquishMagickMemory(tokens);
- break;
- }
- break;
- }
- case 'T':
- case 't':
- {
- if (LocaleCompare(keyword,"text-align") == 0)
- {
- MVGPrintf(svg_info->file,"text-align '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"text-anchor") == 0)
- {
- MVGPrintf(svg_info->file,"text-anchor '%s'\n",value);
- break;
- }
- if (LocaleCompare(keyword,"text-decoration") == 0)
- {
- if (LocaleCompare(value,"underline") == 0)
- MVGPrintf(svg_info->file,"decorate underline\n");
- if (LocaleCompare(value,"line-through") == 0)
- MVGPrintf(svg_info->file,"decorate line-through\n");
- if (LocaleCompare(value,"overline") == 0)
- MVGPrintf(svg_info->file,"decorate overline\n");
- break;
- }
- if (LocaleCompare(keyword,"text-antialiasing") == 0)
- {
- MVGPrintf(svg_info->file,"text-antialias %d\n",
- LocaleCompare(value,"true") == 0);
- break;
- }
- if (LocaleCompare(keyword,"transform") == 0)
- {
- AffineMatrix
- affine,
- current,
- transform;
- GetAffineMatrix(&transform);
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," ");
- tokens=GetTransformTokens(context,value,&number_tokens);
- for (j=0; j < (number_tokens-1); j+=2)
- {
- keyword=(char *) tokens[j];
- value=(char *) tokens[j+1];
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " %s: %s",keyword,value);
- current=transform;
- GetAffineMatrix(&affine);
- switch (*keyword)
- {
- case 'M':
- case 'm':
- {
- if (LocaleCompare(keyword,"matrix") == 0)
- {
- p=(char *) value;
- GetMagickToken(p,&p,token);
- affine.sx=atof(value);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.rx=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.ry=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.sy=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.tx=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- affine.ty=atof(token);
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare(keyword,"rotate") == 0)
- {
- double
- angle;
- angle=GetUserSpaceCoordinateValue(svg_info,0,value);
- affine.sx=cos(DegreesToRadians(fmod(angle,360.0)));
- affine.rx=sin(DegreesToRadians(fmod(angle,360.0)));
- affine.ry=(-sin(DegreesToRadians(fmod(angle,360.0))));
- affine.sy=cos(DegreesToRadians(fmod(angle,360.0)));
- affine.tx=svg_info->bounds.x;
- affine.ty=svg_info->bounds.y;
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare(keyword,"scale") == 0)
- {
- for (p=(char *) value; *p != '\0'; p++)
- if ((isspace((int) ((unsigned char) *p)) != 0) ||
- (*p == ','))
- break;
- affine.sx=GetUserSpaceCoordinateValue(svg_info,1,value);
- affine.sy=affine.sx;
- if (*p != '\0')
- affine.sy=GetUserSpaceCoordinateValue(svg_info,-1,
- p+1);
- svg_info->scale[svg_info->n]=ExpandAffine(&affine);
- break;
- }
- if (LocaleCompare(keyword,"skewX") == 0)
- {
- affine.sx=svg_info->affine.sx;
- affine.ry=tan(DegreesToRadians(fmod(
- GetUserSpaceCoordinateValue(svg_info,1,value),
- 360.0)));
- affine.sy=svg_info->affine.sy;
- break;
- }
- if (LocaleCompare(keyword,"skewY") == 0)
- {
- affine.sx=svg_info->affine.sx;
- affine.rx=tan(DegreesToRadians(fmod(
- GetUserSpaceCoordinateValue(svg_info,-1,value),
- 360.0)));
- affine.sy=svg_info->affine.sy;
- break;
- }
- break;
- }
- case 'T':
- case 't':
- {
- if (LocaleCompare(keyword,"translate") == 0)
- {
- for (p=(char *) value; *p != '\0'; p++)
- if ((isspace((int) ((unsigned char) *p)) != 0) ||
- (*p == ','))
- break;
- affine.tx=GetUserSpaceCoordinateValue(svg_info,1,value);
- affine.ty=affine.tx;
- if (*p != '\0')
- affine.ty=GetUserSpaceCoordinateValue(svg_info,-1,
- p+1);
- break;
- }
- break;
- }
- default:
- break;
- }
- transform.sx=current.sx*affine.sx+current.ry*affine.rx;
- transform.rx=current.rx*affine.sx+current.sy*affine.rx;
- transform.ry=current.sx*affine.ry+current.ry*affine.sy;
- transform.sy=current.rx*affine.ry+current.sy*affine.sy;
- transform.tx=current.sx*affine.tx+current.ry*affine.ty+
- current.tx;
- transform.ty=current.rx*affine.tx+current.sy*affine.ty+
- current.ty;
- }
- MVGPrintf(svg_info->file,"affine %g %g %g %g %g %g\n",
- transform.sx,transform.rx,transform.ry,transform.sy,
- transform.tx,transform.ty);
- for (j=0; tokens[j] != (char *) NULL; j++)
- tokens[j]=(char *) RelinquishMagickMemory(tokens[j]);
- tokens=(char **) RelinquishMagickMemory(tokens);
- break;
- }
- break;
- }
- case 'V':
- case 'v':
- {
- if (LocaleCompare(keyword,"verts") == 0)
- {
- (void) CloneString(&svg_info->vertices,value);
- break;
- }
- if (LocaleCompare(keyword,"viewBox") == 0)
- {
- p=(char *) value;
- GetMagickToken(p,&p,token);
- svg_info->view_box.x=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- svg_info->view_box.y=atof(token);
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- svg_info->view_box.width=atof(token);
- if (svg_info->bounds.width == 0)
- svg_info->bounds.width=svg_info->view_box.width;
- GetMagickToken(p,&p,token);
- if (*token == ',')
- GetMagickToken(p,&p,token);
- svg_info->view_box.height=atof(token);
- if (svg_info->bounds.height == 0)
- svg_info->bounds.height=svg_info->view_box.height;
- break;
- }
- break;
- }
- case 'W':
- case 'w':
- {
- if (LocaleCompare(keyword,"width") == 0)
- {
- svg_info->bounds.width=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- break;
- }
- case 'X':
- case 'x':
- {
- if (LocaleCompare(keyword,"x") == 0)
- {
- svg_info->bounds.x=GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"xlink:href") == 0)
- {
- (void) CloneString(&svg_info->url,value);
- break;
- }
- if (LocaleCompare(keyword,"x1") == 0)
- {
- svg_info->segment.x1=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- if (LocaleCompare(keyword,"x2") == 0)
- {
- svg_info->segment.x2=
- GetUserSpaceCoordinateValue(svg_info,1,value);
- break;
- }
- break;
- }
- case 'Y':
- case 'y':
- {
- if (LocaleCompare(keyword,"y") == 0)
- {
- svg_info->bounds.y=GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"y1") == 0)
- {
- svg_info->segment.y1=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- if (LocaleCompare(keyword,"y2") == 0)
- {
- svg_info->segment.y2=
- GetUserSpaceCoordinateValue(svg_info,-1,value);
- break;
- }
- break;
- }
- default:
- break;
- }
- }
- if (LocaleCompare((char *) name,"svg") == 0)
- {
- if (svg_info->document->encoding != (const xmlChar *) NULL)
- MVGPrintf(svg_info->file,"encoding \"%s\"\n",
- (char *) svg_info->document->encoding);
- if (attributes != (const xmlChar **) NULL)
- {
- double
- sx,
- sy;
- if ((svg_info->view_box.width == 0.0) ||
- (svg_info->view_box.height == 0.0))
- svg_info->view_box=svg_info->bounds;
- svg_info->width=(unsigned long) (svg_info->bounds.width+0.5);
- svg_info->height=(unsigned long) (svg_info->bounds.height+0.5);
- MVGPrintf(svg_info->file,"viewbox 0 0 %lu %lu\n",svg_info->width,
- svg_info->height);
- sx=(double) svg_info->width/svg_info->view_box.width;
- sy=(double) svg_info->height/svg_info->view_box.height;
- MVGPrintf(svg_info->file,"affine %g 0 0 %g %g %g\n",sx,sy,
- -sx*svg_info->view_box.x,-sy*svg_info->view_box.y);
- }
- }
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," )");
- units=(char *) RelinquishMagickMemory(units);
- if (color != (char *) NULL)
- color=(char *) RelinquishMagickMemory(color);
- }
- static void SVGEndElement(void *context,const xmlChar *name)
- {
- SVGInfo
- *svg_info;
- /*
- Called when the end of an element has been detected.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.endElement(%s)",name);
- svg_info=(SVGInfo *) context;
- switch (*name)
- {
- case 'C':
- case 'c':
- {
- if (LocaleCompare((char *) name,"circle") == 0)
- {
- MVGPrintf(svg_info->file,"circle %g,%g %g,%g\n",svg_info->element.cx,
- svg_info->element.cy,svg_info->element.cx,svg_info->element.cy+
- svg_info->element.minor);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"clipPath") == 0)
- {
- MVGPrintf(svg_info->file,"pop clip-path\n");
- break;
- }
- break;
- }
- case 'D':
- case 'd':
- {
- if (LocaleCompare((char *) name,"defs") == 0)
- {
- MVGPrintf(svg_info->file,"pop defs\n");
- break;
- }
- if (LocaleCompare((char *) name,"desc") == 0)
- {
- register char
- *p;
- if (*svg_info->text == '\0')
- break;
- (void) fputc('#',svg_info->file);
- for (p=svg_info->text; *p != '\0'; p++)
- {
- (void) fputc(*p,svg_info->file);
- if (*p == '\n')
- (void) fputc('#',svg_info->file);
- }
- (void) fputc('\n',svg_info->file);
- *svg_info->text='\0';
- break;
- }
- break;
- }
- case 'E':
- case 'e':
- {
- if (LocaleCompare((char *) name,"ellipse") == 0)
- {
- double
- angle;
- angle=svg_info->element.angle;
- MVGPrintf(svg_info->file,"ellipse %g,%g %g,%g 0,360\n",
- svg_info->element.cx,svg_info->element.cy,
- angle == 0.0 ? svg_info->element.major : svg_info->element.minor,
- angle == 0.0 ? svg_info->element.minor : svg_info->element.major);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'G':
- case 'g':
- {
- if (LocaleCompare((char *) name,"g") == 0)
- {
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'I':
- case 'i':
- {
- if (LocaleCompare((char *) name,"image") == 0)
- {
- MVGPrintf(svg_info->file,"image Over %g,%g %g,%g '%s'\n",
- svg_info->bounds.x,svg_info->bounds.y,svg_info->bounds.width,
- svg_info->bounds.height,svg_info->url);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'L':
- case 'l':
- {
- if (LocaleCompare((char *) name,"line") == 0)
- {
- MVGPrintf(svg_info->file,"line %g,%g %g,%g\n",svg_info->segment.x1,
- svg_info->segment.y1,svg_info->segment.x2,svg_info->segment.y2);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"linearGradient") == 0)
- {
- MVGPrintf(svg_info->file,"pop gradient\n");
- break;
- }
- break;
- }
- case 'P':
- case 'p':
- {
- if (LocaleCompare((char *) name,"pattern") == 0)
- {
- MVGPrintf(svg_info->file,"pop pattern\n");
- break;
- }
- if (LocaleCompare((char *) name,"path") == 0)
- {
- MVGPrintf(svg_info->file,"path '%s'\n",svg_info->vertices);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"polygon") == 0)
- {
- MVGPrintf(svg_info->file,"polygon %s\n",svg_info->vertices);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"polyline") == 0)
- {
- MVGPrintf(svg_info->file,"polyline %s\n",svg_info->vertices);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'R':
- case 'r':
- {
- if (LocaleCompare((char *) name,"radialGradient") == 0)
- {
- MVGPrintf(svg_info->file,"pop gradient\n");
- break;
- }
- if (LocaleCompare((char *) name,"rect") == 0)
- {
- if ((svg_info->radius.x == 0.0) && (svg_info->radius.y == 0.0))
- {
- MVGPrintf(svg_info->file,"rectangle %g,%g %g,%g\n",
- svg_info->bounds.x,svg_info->bounds.y,
- svg_info->bounds.x+svg_info->bounds.width,
- svg_info->bounds.y+svg_info->bounds.height);
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (svg_info->radius.x == 0.0)
- svg_info->radius.x=svg_info->radius.y;
- if (svg_info->radius.y == 0.0)
- svg_info->radius.y=svg_info->radius.x;
- MVGPrintf(svg_info->file,"roundRectangle %g,%g %g,%g %g,%g\n",
- svg_info->bounds.x,svg_info->bounds.y,svg_info->bounds.x+
- svg_info->bounds.width,svg_info->bounds.y+svg_info->bounds.height,
- svg_info->radius.x,svg_info->radius.y);
- svg_info->radius.x=0.0;
- svg_info->radius.y=0.0;
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'S':
- case 's':
- {
- if (LocaleCompare((char *) name,"stop") == 0)
- {
- MVGPrintf(svg_info->file,"stop-color '%s' %s\n",svg_info->stop_color,
- svg_info->offset);
- break;
- }
- if (LocaleCompare((char *) name,"svg") == 0)
- {
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- break;
- }
- case 'T':
- case 't':
- {
- if (LocaleCompare((char *) name,"text") == 0)
- {
- if (*svg_info->text != '\0')
- {
- char
- *text;
- text=EscapeString(svg_info->text,'\'');
- StripString(text);
- MVGPrintf(svg_info->file,"text %g,%g '%s'\n",svg_info->bounds.x,
- svg_info->bounds.y,text);
- text=(char *) RelinquishMagickMemory(text);
- *svg_info->text='\0';
- }
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"tspan") == 0)
- {
- if (*svg_info->text != '\0')
- {
- DrawInfo
- *draw_info;
- TypeMetric
- metrics;
- char
- *text;
- text=EscapeString(svg_info->text,'\'');
- StripString(text);
- MVGPrintf(svg_info->file,"text %g,%g '%s'\n",svg_info->bounds.x,
- svg_info->bounds.y,text);
- text=(char *) RelinquishMagickMemory(text);
- draw_info=CloneDrawInfo(svg_info->image_info,(DrawInfo *) NULL);
- draw_info->pointsize=svg_info->pointsize;
- draw_info->text=AcquireString(svg_info->text);
- (void) ConcatenateString(&draw_info->text," ");
- GetTypeMetrics(svg_info->image,draw_info,&metrics);
- svg_info->bounds.x+=metrics.width;
- draw_info=DestroyDrawInfo(draw_info);
- *svg_info->text='\0';
- }
- MVGPrintf(svg_info->file,"pop graphic-context\n");
- break;
- }
- if (LocaleCompare((char *) name,"title") == 0)
- {
- if (*svg_info->text == '\0')
- break;
- (void) CloneString(&svg_info->title,svg_info->text);
- *svg_info->text='\0';
- break;
- }
- break;
- }
- default:
- break;
- }
- *svg_info->text='\0';
- (void) ResetMagickMemory(&svg_info->element,0,sizeof(svg_info->element));
- (void) ResetMagickMemory(&svg_info->segment,0,sizeof(svg_info->segment));
- svg_info->n--;
- }
- static void SVGCharacters(void *context,const xmlChar *c,int length)
- {
- register char
- *p;
- register long
- i;
- SVGInfo
- *svg_info;
- /*
- Receiving some characters from the parser.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.characters(%s,%d)",c,length);
- svg_info=(SVGInfo *) context;
- if (svg_info->text != (char *) NULL)
- svg_info->text=(char *) ResizeMagickMemory(svg_info->text,
- strlen(svg_info->text)+length+MaxTextExtent);
- else
- {
- svg_info->text=(char *) AcquireMagickMemory(length+MaxTextExtent);
- if (svg_info->text != (char *) NULL)
- *svg_info->text='\0';
- }
- if (svg_info->text == (char *) NULL)
- return;
- p=svg_info->text+strlen(svg_info->text);
- for (i=0; i < length; i++)
- *p++=c[i];
- *p='\0';
- }
- static void SVGReference(void *context,const xmlChar *name)
- {
- SVGInfo
- *svg_info;
- xmlParserCtxtPtr
- parser;
- /*
- Called when an entity reference is detected.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.reference(%s)",
- name);
- svg_info=(SVGInfo *) context;
- parser=svg_info->parser;
- if (*name == '#')
- (void) xmlAddChild(parser->node,xmlNewCharRef(svg_info->document,name));
- else
- (void) xmlAddChild(parser->node,xmlNewReference(svg_info->document,name));
- }
- static void SVGIgnorableWhitespace(void *context,const xmlChar *c,int length)
- {
- SVGInfo
- *svg_info;
- /*
- Receiving some ignorable whitespaces from the parser.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.ignorableWhitespace(%.30s, %d)",c,length);
- svg_info=(SVGInfo *) context;
- }
- static void SVGProcessingInstructions(void *context,const xmlChar *target,
- const xmlChar *data)
- {
- SVGInfo
- *svg_info;
- /*
- A processing instruction has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.processingInstruction(%s, %s)",target,data);
- svg_info=(SVGInfo *) context;
- }
- static void SVGComment(void *context,const xmlChar *value)
- {
- SVGInfo
- *svg_info;
- /*
- A comment has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.comment(%s)",
- value);
- svg_info=(SVGInfo *) context;
- if (svg_info->comment != (char *) NULL)
- (void) ConcatenateString(&svg_info->comment,"\n");
- (void) ConcatenateString(&svg_info->comment,(char *) value);
- }
- static void SVGWarning(void *context,const char *format,...)
- {
- char
- *message,
- reason[MaxTextExtent];
- SVGInfo
- *svg_info;
- va_list
- operands;
- /**
- Display and format a warning messages, gives file, line, position and
- extra parameters.
- */
- va_start(operands,format);
- svg_info=(SVGInfo *) context;
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.warning: ");
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),format,operands);
- #if !defined(HAVE_VSNPRINTF)
- (void) vsprintf(reason,format,operands);
- #else
- (void) vsnprintf(reason,MaxTextExtent,format,operands);
- #endif
- message=GetExceptionMessage(errno);
- (void) ThrowMagickException(svg_info->exception,GetMagickModule(),
- DelegateWarning,reason,"`%s`",message);
- message=(char *) RelinquishMagickMemory(message);
- va_end(operands);
- }
- static void SVGError(void *context,const char *format,...)
- {
- char
- *message,
- reason[MaxTextExtent];
- SVGInfo
- *svg_info;
- va_list
- operands;
- /*
- Display and format a error formats, gives file, line, position and
- extra parameters.
- */
- va_start(operands,format);
- svg_info=(SVGInfo *) context;
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.error: ");
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),format,operands);
- #if !defined(HAVE_VSNPRINTF)
- (void) vsprintf(reason,format,operands);
- #else
- (void) vsnprintf(reason,MaxTextExtent,format,operands);
- #endif
- message=GetExceptionMessage(errno);
- (void) ThrowMagickException(svg_info->exception,GetMagickModule(),CoderError,
- reason,"`%s`",message);
- message=(char *) RelinquishMagickMemory(message);
- va_end(operands);
- }
- static void SVGCDataBlock(void *context,const xmlChar *value,int length)
- {
- SVGInfo
- *svg_info;
- xmlNodePtr
- child;
- xmlParserCtxtPtr
- parser;
- /*
- Called when a pcdata block has been parsed.
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule()," SAX.pcdata(%s, %d)",
- value,length);
- svg_info=(SVGInfo *) context;
- parser=svg_info->parser;
- child=xmlGetLastChild(parser->node);
- if ((child != (xmlNodePtr) NULL) && (child->type == XML_CDATA_SECTION_NODE))
- {
- xmlTextConcat(child,value,length);
- return;
- }
- (void) xmlAddChild(parser->node,xmlNewCDataBlock(parser->myDoc,value,length));
- }
- static void SVGExternalSubset(void *context,const xmlChar *name,
- const xmlChar *external_id,const xmlChar *system_id)
- {
- SVGInfo
- *svg_info;
- xmlParserCtxt
- parser_context;
- xmlParserCtxtPtr
- parser;
- xmlParserInputPtr
- input;
- /*
- Does this document has an external subset?
- */
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),
- " SAX.externalSubset(%s, %s, %s)",name,
- (external_id != (const xmlChar *) NULL ? (char *) external_id : "none"),
- (system_id != (const xmlChar *) NULL ? (char *) system_id : "none"));
- svg_info=(SVGInfo *) context;
- parser=svg_info->parser;
- if (((external_id == NULL) && (system_id == NULL)) ||
- ((parser->validate == 0) || (parser->wellFormed == 0) ||
- (svg_info->document == 0)))
- return;
- input=SVGResolveEntity(context,external_id,system_id);
- if (input == NULL)
- return;
- (void) xmlNewDtd(svg_info->document,name,external_id,system_id);
- parser_context=(*parser);
- parser->inputTab=(xmlParserInputPtr *) xmlMalloc(5*sizeof(*parser->inputTab));
- if (parser->inputTab == (xmlParserInputPtr *) NULL)
- {
- parser->errNo=XML_ERR_NO_MEMORY;
- parser->input=parser_context.input;
- parser->inputNr=parser_context.inputNr;
- parser->inputMax=parser_context.inputMax;
- parser->inputTab=parser_context.inputTab;
- return;
- }
- parser->inputNr=0;
- parser->inputMax=5;
- parser->input=NULL;
- xmlPushInput(parser,input);
- (void) xmlSwitchEncoding(parser,xmlDetectCharEncoding(parser->input->cur,4));
- if (input->filename == (char *) NULL)
- input->filename=(char *) xmlStrdup(system_id);
- input->line=1;
- input->col=1;
- input->base=parser->input->cur;
- input->cur=parser->input->cur;
- input->free=NULL;
- xmlParseExternalSubset(parser,external_id,system_id);
- while (parser->inputNr > 1)
- (void) xmlPopInput(parser);
- xmlFreeInputStream(parser->input);
- xmlFree(parser->inputTab);
- parser->input=parser_context.input;
- parser->inputNr=parser_context.inputNr;
- parser->inputMax=parser_context.inputMax;
- parser->inputTab=parser_context.inputTab;
- }
- #if defined(HasRSVG)
- static void SVGSetImageSize(int *width,int *height,gpointer context)
- {
- Image
- *image;
- image=(Image *) context;
- *width=(int) (*width*image->x_resolution/72.0);
- *height=(int) (*height*image->y_resolution/72.0);
- }
- #endif
- #if defined(__cplusplus) || defined(c_plusplus)
- }
- #endif
- static Image *ReadSVGImage(const ImageInfo *image_info,ExceptionInfo *exception)
- {
- xmlSAXHandler
- SAXModules =
- {
- SVGInternalSubset,
- SVGIsStandalone,
- SVGHasInternalSubset,
- SVGHasExternalSubset,
- SVGResolveEntity,
- SVGGetEntity,
- SVGEntityDeclaration,
- SVGNotationDeclaration,
- SVGAttributeDeclaration,
- SVGElementDeclaration,
- SVGUnparsedEntityDeclaration,
- SVGSetDocumentLocator,
- SVGStartDocument,
- SVGEndDocument,
- SVGStartElement,
- SVGEndElement,
- SVGReference,
- SVGCharacters,
- SVGIgnorableWhitespace,
- SVGProcessingInstructions,
- SVGComment,
- SVGWarning,
- SVGError,
- SVGError,
- SVGGetParameterEntity,
- SVGCDataBlock,
- SVGExternalSubset
- };
- char
- filename[MaxTextExtent];
- FILE
- *file;
- Image
- *image;
- int
- status,
- unique_file;
- long
- n;
- SVGInfo
- svg_info;
- unsigned char
- message[MaxTextExtent];
- xmlSAXHandlerPtr
- sax_handler;
- /*
- Open image file.
- */
- assert(image_info != (const ImageInfo *) NULL);
- assert(image_info->signature == MagickSignature);
- assert(exception != (ExceptionInfo *) NULL);
- if (image_info->debug != MagickFalse)
- (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
- image_info->filename);
- assert(exception->signature == MagickSignature);
- image=AllocateImage(image_info);
- status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
- if (status == MagickFalse)
- {
- image=DestroyImageList(image);
- return((Image *) NULL);
- }
- #if defined(HasRSVG)
- {
- GdkPixbuf
- *pixel_info;
- GError
- *error;
- long
- y;
- PixelPacket
- fill_color;
- QuantumInfo
- quantum_info;
- register const guchar
- *p;
- register long
- x;
- register PixelPacket
- *q;
- RsvgHandle
- *svg_info;
- svg_info=rsvg_handle_new();
- if (svg_info == (RsvgHandle *) NULL)
- ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
- rsvg_handle_set_size_callback(svg_info,SVGSetImageSize,image,NULL);
- rsvg_handle_set_dpi_x_y(svg_info,
- image->x_resolution == 0.0 ? 72.0 : image->x_resolution,
- image->y_resolution == 0.0 ? 72.0 : image->y_resolution);
- error=(GError *) NULL;
- while ((n=ReadBlob(image,MaxTextExtent,message)) != 0)
- (void) rsvg_handle_write(svg_info,message,n,&error);
- rsvg_handle_close(svg_info,&error);
- if (error != (GError *) NULL)
- g_error_free(error);
- pixel_info=rsvg_handle_get_pixbuf(svg_info);
- rsvg_handle_free(svg_info);
- if (pixel_info == (GdkPixbuf *) NULL)
- {
- rsvg_handle_free(svg_info);
- ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
- }
- image->columns=gdk_pixbuf_get_width(pixel_info);
- image->rows=gdk_pixbuf_get_height(pixel_info);
- image->matte=MagickTrue;
- (void) SetImageBackgroundColor(image);
- GetQuantumInfo(image_info,&quantum_info);
- p=gdk_pixbuf_get_pixels(pixel_info);
- for (y=0; y < (long) image->rows; y++)
- {
- q=GetImagePixels(image,0,y,image->columns,1);
- if (q == (PixelPacket *) NULL)
- break;
- for (x=0; x < (long) image->columns; x++)
- {
- fill_color.red=ScaleCharToQuantum(*p++);
- fill_color.green=ScaleCharToQuantum(*p++);
- fill_color.blue=ScaleCharToQuantum(*p++);
- fill_color.opacity=QuantumRange-ScaleCharToQuantum(*p++);
- MagickCompositeOver(&fill_color,fill_color.opacity,q,(MagickRealType)
- q->opacity,q);
- q++;
- }
- if (SyncImagePixels(image) == MagickFalse)
- break;
- if (image->previous == (Image *) NULL)
- if ((image->progress_monitor != (MagickProgressMonitor) NULL) &&
- (QuantumTick(y,image->rows) != MagickFalse))
- {
- status=image->progress_monitor(LoadImageTag,y,image->rows,
- image->client_data);
- if (status == MagickFalse)
- break;
- }
- }
- g_object_unref(G_OBJECT(pixel_info));
- CloseBlob(image);
- return(GetFirstImageInList(image));
- }
- #endif
- /*
- Open draw file.
- */
- file=(FILE *) NULL;
- unique_file=AcquireUniqueFileResource(filename);
- if (unique_file != -1)
- file=fdopen(unique_file,"w");
- if ((unique_file == -1) || (file == (FILE *) NULL))
- {
- (void) CopyMagickString(image->filename,filename,MaxTextExtent);
- ThrowFileException(exception,FileOpenError,"UnableToCreateTemporaryFile",
- image->filename);
- image=DestroyImageList(image);
- return((Image *) NULL);
- }
- /*
- Parse SVG file.
- */
- (void) ResetMagickMemory(&svg_info,0,sizeof(svg_info));
- svg_info.file=file;
- svg_info.exception=exception;
- svg_info.image=image;
- svg_info.image_info=image_info;
- svg_info.text=AcquireString("");
- svg_info.scale=(double *) AcquireMagickMemory(sizeof(*svg_info.scale));
- if (svg_info.scale == (double *) NULL)
- ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
- GetAffineMatrix(&svg_info.affine);
- svg_info.scale[0]=ExpandAffine(&svg_info.affine);
- svg_info.bounds.width=image->columns;
- svg_info.bounds.height=image->rows;
- if (image_info->size != (char *) NULL)
- (void) CloneString(&svg_info.size,image_info->size);
- if (image->debug != MagickFalse)
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),"begin SAX");
- xmlInitParser();
- (void) xmlSubstituteEntitiesDefault(1);
- sax_handler=(&SAXModules);
- n=ReadBlob(image,MaxTextExtent,message);
- if (n > 0)
- {
- svg_info.parser=xmlCreatePushParserCtxt(sax_handler,&svg_info,(char *)
- message,n,image->filename);
- while ((n=ReadBlob(image,MaxTextExtent,message)) != 0)
- {
- status=xmlParseChunk(svg_info.parser,(char *) message,(int) n,0);
- if (status != 0)
- break;
- }
- }
- (void) xmlParseChunk(svg_info.parser,(char *) message,0,1);
- xmlFreeParserCtxt(svg_info.parser);
- if (image->debug != MagickFalse)
- (void) LogMagickEvent(CoderEvent,GetMagickModule(),"end SAX");
- xmlCleanupParser();
- (void) fclose(file);
- CloseBlob(image);
- image->columns=svg_info.width;
- image->rows=svg_info.height;
- if (exception->severity >= ErrorException)
- {
- image=DestroyImage(image);
- return((Image *) NULL);
- }
- if (image_info->ping == MagickFalse)
- {
- ImageInfo
- *read_info;
- /*
- Draw image.
- */
- image=DestroyImage(image);
- image=(Image *) NULL;
- read_info=CloneImageInfo(image_info);
- SetImageInfoBlob(read_info,(void *) NULL,0);
- (void) FormatMagickString(read_info->filename,MaxTextExtent,"mvg:%s",
- filename);
- image=ReadImage(read_info,exception);
- read_info=DestroyImageInfo(read_info);
- if (image != (Image *) NULL)
- (void) CopyMagickString(image->filename,image_info->filename,
- MaxTextExtent);
- }
- /*
- Free resources.
- */
- if (svg_info.title != (char *) NULL)
- {
- if (image != (Image *) NULL)
- (void) SetImageProperty(image,"title",svg_info.title);
- svg_info.title=(char *) RelinquishMagickMemory(svg_info.title);
- }
- if (svg_info.comment != (char *) NULL)
- {
- if (image != (Image *) NULL)
- (void) SetImageProperty(image,"Comment",svg_info.comment);
- svg_info.comment=(char *) RelinquishMagickMemory(svg_info.comment);
- }
- (void) RelinquishUniqueFileResource(filename);
- return(GetFirstImageInList(image));
- }
- #endif
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % R e g i s t e r S V G I m a g e %
- % %
- % %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- % RegisterSVGImage() adds attributes for the SVG image format to
- % the list of supported formats. The attributes include the image format
- % tag, a method to read and/or write the format, whether the format
- % supports the saving of more than one frame to the same file or blob,
- % whether the format supports native in-memory I/O, and a brief
- % description of the format.
- %
- % The format of the RegisterSVGImage method is:
- %
- % RegisterSVGImage(void)
- %
- */
- ModuleExport void RegisterSVGImage(void)
- {
- char
- version[MaxTextExtent];
- MagickInfo
- *entry;
- #if defined(HasRSVG)
- rsvg_init();
- #endif
- *version='\0';
- #if defined(LIBXML_DOTTED_VERSION)
- (void) CopyMagickString(version,"XML " LIBXML_DOTTED_VERSION,MaxTextExtent);
- #endif
- entry=SetMagickInfo("SVG");
- #if defined(HasXML)
- entry->decoder=(DecoderHandler *) ReadSVGImage;
- #endif
- entry->encoder=(EncoderHandler *) WriteSVGImage;
- entry->seekable_stream=MagickFalse;
- entry->description=ConstantString("Scalable Vector Graphics");
- if (*version != '\0')
- entry->version=ConstantString(version);
- entry->magick=(MagickHandler *) IsSVG;
- entry->module=ConstantString("SVG");
- (void) RegisterMagickInfo(entry);
- *version='\0';
- #if defined(LIBXML_DOTTED_VERSION)
- (void) CopyMagickString(version,"XML " LIBXML_DOTTED_VERSION,MaxTextExtent);
- #endif
- entry=SetMagickInfo("SVGZ");
- #if defined(HasXML)
- entry->decoder=(DecoderHandler *) ReadSVGImage;
- #endif
- entry->encoder=(EncoderHandler *) WriteSVGImage;
- entry->seekable_stream=MagickFalse;
- entry->description=ConstantString("Compressed Scalable Vector Graphics");
- if (*version != '\0')
- entry->version=ConstantString(version);
- entry->magick=(MagickHandler *) IsSVG;
- entry->module=ConstantString("SVG");
- (void) RegisterMagickInfo(entry);
- }
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % U n r e g i s t e r S V G I m a g e %
- % %
- % %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- % UnregisterSVGImage() removes format registrations made by the
- % SVG module from the list of supported formats.
- %
- % The format of the UnregisterSVGImage method is:
- %
- % UnregisterSVGImage(void)
- %
- */
- ModuleExport void UnregisterSVGImage(void)
- {
- (void) UnregisterMagickInfo("SVG");
- (void) UnregisterMagickInfo("SVGZ");
- }
- /*
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- % %
- % %
- % %
- % W r i t e S V G I m a g e %
- % %
- % %
- % %
- %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
- %
- % WriteSVGImage() writes a image in the SVG - XML based W3C standard
- % format.
- %
- % The format of the WriteSVGImage method is:
- %
- % MagickBooleanType WriteSVGImage(const ImageInfo *image_info,Image *image)
- %
- % A description of each parameter follows.
- %
- % o image_info: The image info.
- %
- % o image: The image.
- %
- %
- */
- #if defined(HasAUTOTRACE)
- static MagickBooleanType WriteSVGImage(const ImageInfo *image_info,Image *image)
- {
- FILE
- *output_file;
- fitting_opts_type
- fit_info;
- image_header_type
- image_header;
- bitmap_type
- bitmap;
- ImageType
- image_type;
- long
- j;
- MagickOffsetType
- number_pixels;
- pixel_outline_list_type
- pixels;
- PixelPacket
- p;
- PixelPacket
- *pixel;
- QuantizeObj
- *quantize_info;
- spline_list_array_type
- splines;
- output_write
- output_writer;
- register long
- i;
- unsigned long
- number_planes,
- point,
- thin;
- thin=MagickFalse;
- quantize_info=(QuantizeObj *) NULL;
- pixel=(&p);
- fit_info=new_fitting_opts();
- output_writer=output_get_handler("svg");
- if (output_writer == NULL)
- ThrowWriterException(DelegateError,"UnableToWriteSVGFormat");
- image_type=GetImageType(image);
- number_planes=3;
- if ((image_type == BilevelType) || (image_type == GrayscaleType))
- number_planes=1;
- bitmap.np=number_planes;
- bitmap.dimensions.width=image->columns;
- bitmap.dimensions.height=image->rows;
- number_pixels=image->columns*image->rows;
- if (number_pixels != (size_t) number_pixels)
- ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
- bitmap.bitmap=(unsigned char *)
- AcquireMagickMemory(number_planes*image->columns*image->rows);
- if (bitmap.bitmap == (unsigned char *) NULL)
- ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
- point=0;
- for (j=0; j < image->rows; j++)
- {
- for (i=0; i < image->columns; i++)
- {
- p=GetOnePixel(image,i,j);
- bitmap.bitmap[point++]=pixel->red;
- if (number_planes == 3)
- {
- bitmap.bitmap[point++]=pixel->green;
- bitmap.bitmap[point++]=pixel->blue;
- }
- }
- }
- image_header.width=DIMENSIONS_WIDTH(bitmap.dimensions);
- image_header.height=DIMENSIONS_HEIGHT(bitmap.dimensions);
- if ((fit_info.color_count > 0) && (BITMAP_PLANES(bitmap) == 3))
- quantize(bitmap.bitmap,bitmap.bitmap,DIMENSIONS_WIDTH(bitmap.dimensions),
- DIMENSIONS_HEIGHT(bitmap.dimensions),fit_info.color_count,
- fit_info.bgColor,&quantize_info);
- if (thin)
- thin_image(&bitmap);
- pixels=find_outline_pixels (bitmap);
- (bitmap.bitmap=(char *) RelinquishMagickMemory((bitmap.bitmap);
- splines=fitted_splines(pixels,&fit_info);
- output_file=MagickOpenStream(image->filename,"w");
- if (output_file == (FILE *) NULL)
- return(status);
- output_writer(output_file,image->filename,0,0,image_header.width,
- image_header.height,splines);
- return(MagickTrue);
- }
- #else
- static void AffineToTransform(Image *image,AffineMatrix *affine)
- {
- char
- transform[MaxTextExtent];
- if ((fabs(affine->tx) < MagickEpsilon) && (fabs(affine->ty) < MagickEpsilon))
- {
- if ((fabs(affine->rx) < MagickEpsilon) &&
- (fabs(affine->ry) < MagickEpsilon))
- {
- if ((fabs(affine->sx-1.0) < MagickEpsilon) &&
- (fabs(affine->sy-1.0) < MagickEpsilon))
- {
- (void) WriteBlobString(image,"\">\n");
- return;
- }
- (void) FormatMagickString(transform,MaxTextExtent,
- "\" transform=\"scale(%g,%g)\">\n",affine->sx,affine->sy);
- (void) WriteBlobString(image,transform);
- return;
- }
- else
- {
- if ((fabs(affine->sx-affine->sy) < MagickEpsilon) &&
- (fabs(affine->rx+affine->ry) < MagickEpsilon) &&
- (fabs(affine->sx*affine->sx+affine->rx*affine->rx-1.0) <
- 2*MagickEpsilon))
- {
- double
- theta;
- theta=(180.0/MagickPI)*atan2(affine->rx,affine->sx);
- (void) FormatMagickString(transform,MaxTextExtent,
- "\" transform=\"rotate(%g)\">\n",theta);
- (void) WriteBlobString(image,transform);
- return;
- }
- }
- }
- else
- {
- if ((fabs(affine->sx-1.0) < MagickEpsilon) &&
- (fabs(affine->rx) < MagickEpsilon) &&
- (fabs(affine->ry) < MagickEpsilon) &&
- (fabs(affine->sy-1.0) < MagickEpsilon))
- {
- (void) FormatMagickString(transform,MaxTextExtent,
- "\" transform=\"translate(%g,%g)\">\n",affine->tx,affine->ty);
- (void) WriteBlobString(image,transform);
- return;
- }
- }
- (void) FormatMagickString(transform,MaxTextExtent,
- "\" transform=\"matrix(%g %g %g %g %g %g)\">\n",affine->sx,affine->rx,
- affine->ry,affine->sy,affine->tx,affine->ty);
- (void) WriteBlobString(image,transform);
- }
- static MagickBooleanType IsPoint(const char *point)
- {
- char
- *p;
- long
- value;
- value=strtol(point,&p,10);
- return(p != point ? MagickTrue : MagickFalse);
- }
- static MagickBooleanType WriteSVGImage(const ImageInfo *image_info,Image *image)
- {
- #define BezierQuantum 200
- AffineMatrix
- affine;
- char
- keyword[MaxTextExtent],
- message[MaxTextExtent],
- name[MaxTextExtent],
- *p,
- *q,
- *token,
- type[MaxTextExtent];
- const char
- *value;
- int
- n;
- long
- j;
- MagickBooleanType
- active,
- status;
- PointInfo
- point;
- PrimitiveInfo
- *primitive_info;
- PrimitiveType
- primitive_type;
- register long
- x;
- register long
- i;
- size_t
- length;
- SVGInfo
- svg_info;
- unsigned long
- number_points;
- /*
- Open output image file.
- */
- assert(image_info != (const ImageInfo *) NULL);
- assert(image_info->signature == MagickSignature);
- assert(image != (Image *) NULL);
- assert(image->signature == MagickSignature);
- if (image->debug != MagickFalse)
- (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename);
- value=GetImageProperty(image,"[MVG]");
- if (value == (char *) NULL)
- ThrowWriterException(CoderError,"NoImageVectorGraphics");
- status=OpenBlob(image_info,image,WriteBinaryBlobMode,&image->exception);
- if (status == MagickFalse)
- return(status);
- /*
- Write SVG header.
- */
- (void) WriteBlobString(image,"<?xml version=\"1.0\" standalone=\"no\"?>\n");
- (void) WriteBlobString(image,
- "<!DOCTYPE svg PUBLIC \"-//W3C//DTD SVG 20010904//EN\"\n");
- (void) WriteBlobString(image,
- " \"http://www.w3.org/TR/2001/REC-SVG-20010904/DTD/svg10.dtd\">\n");
- (void) FormatMagickString(message,MaxTextExtent,
- "<svg width=\"%lu\" height=\"%lu\">\n",image->columns,image->rows);
- (void) WriteBlobString(image,message);
- /*
- Allocate primitive info memory.
- */
- number_points=2047;
- primitive_info=(PrimitiveInfo *)
- AcquireMagickMemory(number_points*sizeof(*primitive_info));
- if (primitive_info == (PrimitiveInfo *) NULL)
- ThrowWriterException(ResourceLimitError,"MemoryAllocationFailed");
- GetAffineMatrix(&affine);
- token=AcquireString(value);
- active=MagickFalse;
- n=0;
- status=MagickTrue;
- for (q=(char *) value; *q != '\0'; )
- {
- /*
- Interpret graphic primitive.
- */
- GetMagickToken(q,&q,keyword);
- if (*keyword == '\0')
- break;
- if (*keyword == '#')
- {
- /*
- Comment.
- */
- if (active != MagickFalse)
- {
- AffineToTransform(image,&affine);
- active=MagickFalse;
- }
- (void) WriteBlobString(image,"<desc>");
- (void) WriteBlobString(image,keyword+1);
- for ( ; (*q != '\n') && (*q != '\0'); q++)
- switch (*q)
- {
- case '<': (void) WriteBlobString(image,"<"); break;
- case '>': (void) WriteBlobString(image,">"); break;
- case '&': (void) WriteBlobString(image,"&"); break;
- default: (void) WriteBlobByte(image,*q); break;
- }
- (void) WriteBlobString(image,"</desc>\n");
- continue;
- }
- primitive_type=UndefinedPrimitive;
- switch (*keyword)
- {
- case ';':
- break;
- case 'a':
- case 'A':
- {
- if (LocaleCompare("affine",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- affine.sx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.rx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.ry=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.sy=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.tx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.ty=atof(token);
- break;
- }
- if (LocaleCompare("angle",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- affine.rx=atof(token);
- affine.ry=atof(token);
- break;
- }
- if (LocaleCompare("arc",keyword) == 0)
- {
- primitive_type=ArcPrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'b':
- case 'B':
- {
- if (LocaleCompare("bezier",keyword) == 0)
- {
- primitive_type=BezierPrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'c':
- case 'C':
- {
- if (LocaleCompare("clip-path",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "clip-path:url(#%s);",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("clip-rule",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "clip-rule:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("clip-units",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "clipPathUnits=%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("circle",keyword) == 0)
- {
- primitive_type=CirclePrimitive;
- break;
- }
- if (LocaleCompare("color",keyword) == 0)
- {
- primitive_type=ColorPrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'd':
- case 'D':
- {
- if (LocaleCompare("decorate",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "text-decoration:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'e':
- case 'E':
- {
- if (LocaleCompare("ellipse",keyword) == 0)
- {
- primitive_type=EllipsePrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'f':
- case 'F':
- {
- if (LocaleCompare("fill",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"fill:%s;",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("fill-rule",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "fill-rule:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("fill-opacity",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "fill-opacity:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("font-family",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "font-family:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("font-stretch",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "font-stretch:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("font-style",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "font-style:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("font-size",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "font-size:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("font-weight",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "font-weight:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'g':
- case 'G':
- {
- if (LocaleCompare("gradient-units",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- break;
- }
- if (LocaleCompare("text-align",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "text-align %s ",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("text-anchor",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "text-anchor %s ",token);
- (void) WriteBlobString(image,message);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'i':
- case 'I':
- {
- if (LocaleCompare("image",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- primitive_type=ImagePrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'l':
- case 'L':
- {
- if (LocaleCompare("line",keyword) == 0)
- {
- primitive_type=LinePrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'm':
- case 'M':
- {
- if (LocaleCompare("matte",keyword) == 0)
- {
- primitive_type=MattePrimitive;
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'o':
- case 'O':
- {
- if (LocaleCompare("opacity",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"opacity %s ",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'p':
- case 'P':
- {
- if (LocaleCompare("path",keyword) == 0)
- {
- primitive_type=PathPrimitive;
- break;
- }
- if (LocaleCompare("point",keyword) == 0)
- {
- primitive_type=PointPrimitive;
- break;
- }
- if (LocaleCompare("polyline",keyword) == 0)
- {
- primitive_type=PolylinePrimitive;
- break;
- }
- if (LocaleCompare("polygon",keyword) == 0)
- {
- primitive_type=PolygonPrimitive;
- break;
- }
- if (LocaleCompare("pop",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- if (LocaleCompare("clip-path",token) == 0)
- {
- (void) WriteBlobString(image,"</clipPath>\n");
- break;
- }
- if (LocaleCompare("defs",token) == 0)
- {
- (void) WriteBlobString(image,"</defs>\n");
- break;
- }
- if (LocaleCompare("gradient",token) == 0)
- {
- (void) FormatMagickString(message,MaxTextExtent,
- "</%sGradient>\n",type);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("graphic-context",token) == 0)
- {
- n--;
- if (n < 0)
- ThrowWriterException(DrawError,
- "UnbalancedGraphicContextPushPop");
- (void) WriteBlobString(image,"</g>\n");
- }
- if (LocaleCompare("pattern",token) == 0)
- {
- (void) WriteBlobString(image,"</pattern>\n");
- break;
- }
- if (LocaleCompare("defs",token) == 0)
- (void) WriteBlobString(image,"</g>\n");
- break;
- }
- if (LocaleCompare("push",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- if (LocaleCompare("clip-path",token) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "<clipPath id=\"%s\">\n",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("defs",token) == 0)
- {
- (void) WriteBlobString(image,"<defs>\n");
- break;
- }
- if (LocaleCompare("gradient",token) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) CopyMagickString(name,token,MaxTextExtent);
- GetMagickToken(q,&q,token);
- (void) CopyMagickString(type,token,MaxTextExtent);
- GetMagickToken(q,&q,token);
- svg_info.segment.x1=atof(token);
- svg_info.element.cx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.segment.y1=atof(token);
- svg_info.element.cy=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.segment.x2=atof(token);
- svg_info.element.major=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.segment.y2=atof(token);
- svg_info.element.minor=atof(token);
- (void) FormatMagickString(message,MaxTextExtent,
- "<%sGradient id=\"%s\" x1=\"%g\" y1=\"%g\" x2=\"%g\" "
- "y2=\"%g\">\n",type,name,svg_info.segment.x1,
- svg_info.segment.y1,svg_info.segment.x2,svg_info.segment.y2);
- if (LocaleCompare(type,"radial") == 0)
- {
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.element.angle=atof(token);
- (void) FormatMagickString(message,MaxTextExtent,
- "<%sGradient id=\"%s\" cx=\"%g\" cy=\"%g\" r=\"%g\" "
- "fx=\"%g\" fy=\"%g\">\n",type,name,svg_info.element.cx,
- svg_info.element.cy,svg_info.element.angle,
- svg_info.element.major,svg_info.element.minor);
- }
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("graphic-context",token) == 0)
- {
- n++;
- if (active)
- {
- AffineToTransform(image,&affine);
- active=MagickFalse;
- }
- (void) WriteBlobString(image,"<g style=\"");
- active=MagickTrue;
- }
- if (LocaleCompare("pattern",token) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) CopyMagickString(name,token,MaxTextExtent);
- GetMagickToken(q,&q,token);
- svg_info.bounds.x=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.bounds.y=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.bounds.width=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- svg_info.bounds.height=atof(token);
- (void) FormatMagickString(message,MaxTextExtent,
- "<pattern id=\"%s\" x=\"%g\" y=\"%g\" width=\"%g\" "
- "height=\"%g\">\n",name,svg_info.bounds.x,svg_info.bounds.y,
- svg_info.bounds.width,svg_info.bounds.height);
- (void) WriteBlobString(image,message);
- break;
- }
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'r':
- case 'R':
- {
- if (LocaleCompare("rectangle",keyword) == 0)
- {
- primitive_type=RectanglePrimitive;
- break;
- }
- if (LocaleCompare("roundRectangle",keyword) == 0)
- {
- primitive_type=RoundRectanglePrimitive;
- break;
- }
- if (LocaleCompare("rotate",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"rotate(%s) ",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 's':
- case 'S':
- {
- if (LocaleCompare("scale",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- affine.sx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.sy=atof(token);
- break;
- }
- if (LocaleCompare("skewX",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"skewX(%s) ",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("skewY",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"skewY(%s) ",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stop-color",keyword) == 0)
- {
- char
- color[MaxTextExtent];
- GetMagickToken(q,&q,token);
- (void) CopyMagickString(color,token,MaxTextExtent);
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- " <stop offset=\"%s\" stop-color=\"%s\" />\n",token,color);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"stroke:%s;",
- token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-antialias",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-antialias:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-dasharray",keyword) == 0)
- {
- if (IsPoint(q))
- {
- long
- k;
- p=q;
- GetMagickToken(p,&p,token);
- for (k=0; IsPoint(token); k++)
- GetMagickToken(p,&p,token);
- (void) WriteBlobString(image,"stroke-dasharray:");
- for (j=0; j < k; j++)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,"%s ",
- token);
- (void) WriteBlobString(image,message);
- }
- (void) WriteBlobString(image,";");
- break;
- }
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-dasharray:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-dashoffset",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-dashoffset:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-linecap",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-linecap:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-linejoin",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-linejoin:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-miterlimit",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-miterlimit:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-opacity",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-opacity:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("stroke-width",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "stroke-width:%s;",token);
- (void) WriteBlobString(image,message);
- continue;
- }
- status=MagickFalse;
- break;
- }
- case 't':
- case 'T':
- {
- if (LocaleCompare("text",keyword) == 0)
- {
- primitive_type=TextPrimitive;
- break;
- }
- if (LocaleCompare("text-antialias",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- "text-antialias:%s;",token);
- (void) WriteBlobString(image,message);
- break;
- }
- if (LocaleCompare("tspan",keyword) == 0)
- {
- primitive_type=TextPrimitive;
- break;
- }
- if (LocaleCompare("translate",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- affine.tx=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- affine.ty=atof(token);
- break;
- }
- status=MagickFalse;
- break;
- }
- case 'v':
- case 'V':
- {
- if (LocaleCompare("viewbox",keyword) == 0)
- {
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- GetMagickToken(q,&q,token);
- break;
- }
- status=MagickFalse;
- break;
- }
- default:
- {
- status=MagickFalse;
- break;
- }
- }
- if (status == MagickFalse)
- break;
- if (primitive_type == UndefinedPrimitive)
- continue;
- /*
- Parse the primitive attributes.
- */
- i=0;
- j=0;
- for (x=0; *q != '\0'; x++)
- {
- /*
- Define points.
- */
- if (IsPoint(q) == MagickFalse)
- break;
- GetMagickToken(q,&q,token);
- point.x=atof(token);
- GetMagickToken(q,&q,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- point.y=atof(token);
- GetMagickToken(q,(char **) NULL,token);
- if (*token == ',')
- GetMagickToken(q,&q,token);
- primitive_info[i].primitive=primitive_type;
- primitive_info[i].point=point;
- primitive_info[i].coordinates=0;
- primitive_info[i].method=FloodfillMethod;
- i++;
- if (i < (long) (number_points-6*BezierQuantum-360))
- continue;
- number_points+=6*BezierQuantum+360;
- primitive_info=(PrimitiveInfo *) ResizeMagickMemory(primitive_info,
- number_points*sizeof(*primitive_info));
- if (primitive_info == (PrimitiveInfo *) NULL)
- {
- (void) ThrowMagickException(&image->exception,GetMagickModule(),
- ResourceLimitError,"MemoryAllocationFailed","`%s'",image->filename);
- break;
- }
- }
- primitive_info[j].primitive=primitive_type;
- primitive_info[j].coordinates=x;
- primitive_info[j].method=FloodfillMethod;
- primitive_info[j].text=(char *) NULL;
- if (active)
- {
- AffineToTransform(image,&affine);
- active=MagickFalse;
- }
- active=MagickFalse;
- switch (primitive_type)
- {
- case PointPrimitive:
- default:
- {
- if (primitive_info[j].coordinates != 1)
- {
- status=MagickFalse;
- break;
- }
- break;
- }
- case LinePrimitive:
- {
- if (primitive_info[j].coordinates != 2)
- {
- status=MagickFalse;
- break;
- }
- (void) FormatMagickString(message,MaxTextExtent,
- " <line x1=\"%g\" y1=\"%g\" x2=\"%g\" y2=\"%g\"/>\n",
- primitive_info[j].point.x,primitive_info[j].point.y,
- primitive_info[j+1].point.x,primitive_info[j+1].point.y);
- (void) WriteBlobString(image,message);
- break;
- }
- case RectanglePrimitive:
- {
- if (primitive_info[j].coordinates != 2)
- {
- status=MagickFalse;
- break;
- }
- (void) FormatMagickString(message,MaxTextExtent,
- " <rect x=\"%g\" y=\"%g\" width=\"%g\" height=\"%g\"/>\n",
- primitive_info[j].point.x,primitive_info[j].point.y,
- primitive_info[j+1].point.x-primitive_info[j].point.x,
- primitive_info[j+1].point.y-primitive_info[j].point.y);
- (void) WriteBlobString(image,message);
- break;
- }
- case RoundRectanglePrimitive:
- {
- if (primitive_info[j].coordinates != 3)
- {
- status=MagickFalse;
- break;
- }
- (void) FormatMagickString(message,MaxTextExtent,
- " <rect x=\"%g\" y=\"%g\" width=\"%g\" height=\"%g\" rx=\"%g\" "
- "ry=\"%g\"/>\n",primitive_info[j].point.x,primitive_info[j].point.y,
- primitive_info[j+1].point.x-primitive_info[j].point.x,
- primitive_info[j+1].point.y-primitive_info[j].point.y,
- primitive_info[j+2].point.x,primitive_info[j+2].point.y);
- (void) WriteBlobString(image,message);
- break;
- }
- case ArcPrimitive:
- {
- if (primitive_info[j].coordinates != 3)
- {
- status=MagickFalse;
- break;
- }
- break;
- }
- case EllipsePrimitive:
- {
- if (primitive_info[j].coordinates != 3)
- {
- status=MagickFalse;
- break;
- }
- (void) FormatMagickString(message,MaxTextExtent,
- " <ellipse cx=\"%g\" cy=\"%g\" rx=\"%g\" ry=\"%g\"/>\n",
- primitive_info[j].point.x,primitive_info[j].point.y,
- primitive_info[j+1].point.x,primitive_info[j+1].point.y);
- (void) WriteBlobString(image,message);
- break;
- }
- case CirclePrimitive:
- {
- double
- alpha,
- beta;
- if (primitive_info[j].coordinates != 2)
- {
- status=MagickFalse;
- break;
- }
- alpha=primitive_info[j+1].point.x-primitive_info[j].point.x;
- beta=primitive_info[j+1].point.y-primitive_info[j].point.y;
- (void) FormatMagickString(message,MaxTextExtent,
- " <circle cx=\"%g\" cy=\"%g\" r=\"%g\"/>\n",
- primitive_info[j].point.x,primitive_info[j].point.y,
- hypot(alpha,beta));
- (void) WriteBlobString(image,message);
- break;
- }
- case PolylinePrimitive:
- {
- if (primitive_info[j].coordinates < 2)
- {
- status=MagickFalse;
- break;
- }
- (void) CopyMagickString(message," <polyline points=\"",MaxTextExtent);
- (void) WriteBlobString(image,message);
- length=strlen(message);
- for ( ; j < i; j++)
- {
- (void) FormatMagickString(message,MaxTextExtent,"%g,%g ",
- primitive_info[j].point.x,primitive_info[j].point.y);
- length+=strlen(message);
- if (length >= 80)
- {
- (void) WriteBlobString(image,"\n ");
- length=strlen(message)+5;
- }
- (void) WriteBlobString(image,message);
- }
- (void) WriteBlobString(image,"\"/>\n");
- break;
- }
- case PolygonPrimitive:
- {
- if (primitive_info[j].coordinates < 3)
- {
- status=MagickFalse;
- break;
- }
- primitive_info[i]=primitive_info[j];
- primitive_info[i].coordinates=0;
- primitive_info[j].coordinates++;
- i++;
- (void) CopyMagickString(message," <polygon points=\"",MaxTextExtent);
- (void) WriteBlobString(image,message);
- length=strlen(message);
- for ( ; j < i; j++)
- {
- (void) FormatMagickString(message,MaxTextExtent,"%g,%g ",
- primitive_info[j].point.x,primitive_info[j].point.y);
- length+=strlen(message);
- if (length >= 80)
- {
- (void) WriteBlobString(image,"\n ");
- length=strlen(message)+5;
- }
- (void) WriteBlobString(image,message);
- }
- (void) WriteBlobString(image,"\"/>\n");
- break;
- }
- case BezierPrimitive:
- {
- if (primitive_info[j].coordinates < 3)
- {
- status=MagickFalse;
- break;
- }
- break;
- }
- case PathPrimitive:
- {
- int
- number_attributes;
- GetMagickToken(q,&q,token);
- number_attributes=1;
- for (p=token; *p != '\0'; p++)
- if (isalpha((int) *p))
- number_attributes++;
- if (i > (long) (number_points-6*BezierQuantum*number_attributes-1))
- {
- number_points+=6*BezierQuantum*number_attributes;
- primitive_info=(PrimitiveInfo *) ResizeMagickMemory(primitive_info,
- number_points*sizeof(*primitive_info));
- if (primitive_info == (PrimitiveInfo *) NULL)
- {
- (void) ThrowMagickException(&image->exception,GetMagickModule(),
- ResourceLimitError,"MemoryAllocationFailed","`%s'",
- image->filename);
- break;
- }
- }
- (void) WriteBlobString(image," <path d=\"");
- (void) WriteBlobString(image,token);
- (void) WriteBlobString(image,"\"/>\n");
- break;
- }
- case ColorPrimitive:
- case MattePrimitive:
- {
- if (primitive_info[j].coordinates != 1)
- {
- status=MagickFalse;
- break;
- }
- GetMagickToken(q,&q,token);
- if (LocaleCompare("point",token) == 0)
- primitive_info[j].method=PointMethod;
- if (LocaleCompare("replace",token) == 0)
- primitive_info[j].method=ReplaceMethod;
- if (LocaleCompare("floodfill",token) == 0)
- primitive_info[j].method=FloodfillMethod;
- if (LocaleCompare("filltoborder",token) == 0)
- primitive_info[j].method=FillToBorderMethod;
- if (LocaleCompare("reset",token) == 0)
- primitive_info[j].method=ResetMethod;
- break;
- }
- case TextPrimitive:
- {
- register char
- *p;
- if (primitive_info[j].coordinates != 1)
- {
- status=MagickFalse;
- break;
- }
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- " <text x=\"%g\" y=\"%g\">",primitive_info[j].point.x,
- primitive_info[j].point.y);
- (void) WriteBlobString(image,message);
- for (p=token; *p != '\0'; p++)
- switch (*p)
- {
- case '<': (void) WriteBlobString(image,"<"); break;
- case '>': (void) WriteBlobString(image,">"); break;
- case '&': (void) WriteBlobString(image,"&"); break;
- default: (void) WriteBlobByte(image,*p); break;
- }
- (void) WriteBlobString(image,"</text>\n");
- break;
- }
- case ImagePrimitive:
- {
- if (primitive_info[j].coordinates != 2)
- {
- status=MagickFalse;
- break;
- }
- GetMagickToken(q,&q,token);
- (void) FormatMagickString(message,MaxTextExtent,
- " <image x=\"%g\" y=\"%g\" width=\"%g\" height=\"%g\" "
- "xlink:href=\"%s\"/>\n",primitive_info[j].point.x,
- primitive_info[j].point.y,primitive_info[j+1].point.x,
- primitive_info[j+1].point.y,token);
- (void) WriteBlobString(image,message);
- break;
- }
- }
- if (primitive_info == (PrimitiveInfo *) NULL)
- break;
- primitive_info[i].primitive=UndefinedPrimitive;
- if (status == MagickFalse)
- break;
- }
- (void) WriteBlobString(image,"</svg>\n");
- /*
- Free resources.
- */
- token=(char *) RelinquishMagickMemory(token);
- if (primitive_info != (PrimitiveInfo *) NULL)
- primitive_info=(PrimitiveInfo *) RelinquishMagickMemory(primitive_info);
- CloseBlob(image);
- return(status);
- }
- #endif