/* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % AAA N N N N OOO TTTTT AAA TTTTT EEEEE % % A A NN N NN N O O T A A T E % % AAAAA N N N N N N O O T AAAAA T EEE % % A A N NN N NN O O T A A T E % % A A N N N N OOO T A A T EEEEE % % % % % % MagickCore Image Annotation Methods % % % % Software Design % % John Cristy % % July 1992 % % % % % % Copyright 1999-2010 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. % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % Digital Applications (www.digapp.com) contributed the stroked text algorithm. % It was written by Leonard Rosenthol. % % */ /* Include declarations. */ #include "magick/studio.h" #include "magick/annotate.h" #include "magick/attribute.h" #include "magick/cache-view.h" #include "magick/client.h" #include "magick/color.h" #include "magick/color-private.h" #include "magick/composite.h" #include "magick/composite-private.h" #include "magick/constitute.h" #include "magick/draw.h" #include "magick/draw-private.h" #include "magick/exception.h" #include "magick/exception-private.h" #include "magick/gem.h" #include "magick/geometry.h" #include "magick/image-private.h" #include "magick/log.h" #include "magick/quantum.h" #include "magick/quantum-private.h" #include "magick/property.h" #include "magick/resource_.h" #include "magick/statistic.h" #include "magick/string_.h" #include "magick/token-private.h" #include "magick/transform.h" #include "magick/type.h" #include "magick/utility.h" #include "magick/xwindow-private.h" #if defined(MAGICKCORE_FREETYPE_DELEGATE) #if defined(__MINGW32__) # undef interface #endif #if defined(MAGICKCORE_HAVE_FT2BUILD_H) # include #endif #if defined(FT_FREETYPE_H) # include FT_FREETYPE_H #else # include #endif #if defined(FT_GLYPH_H) # include FT_GLYPH_H #else # include #endif #if defined(FT_OUTLINE_H) # include FT_OUTLINE_H #else # include #endif #if defined(FT_BBOX_H) # include FT_BBOX_H #else # include #endif /* defined(FT_BBOX_H) */ #endif /* Forward declarations. */ static MagickBooleanType RenderType(Image *,const DrawInfo *,const PointInfo *,TypeMetric *), RenderPostscript(Image *,const DrawInfo *,const PointInfo *,TypeMetric *), RenderFreetype(Image *,const DrawInfo *,const char *,const PointInfo *, TypeMetric *), RenderX11(Image *,const DrawInfo *,const PointInfo *,TypeMetric *); /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % A n n o t a t e I m a g e % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % AnnotateImage() annotates an image with text. Optionally you can include % any of the following bits of information about the image by embedding % the appropriate special characters: % % %b file size in bytes. % %c comment. % %d directory in which the image resides. % %e extension of the image file. % %f original filename of the image. % %h height of image. % %i filename of the image. % %k number of unique colors. % %l image label. % %m image file format. % %n number of images in a image sequence. % %o output image filename. % %p page number of the image. % %q image depth (8 or 16). % %q image depth (8 or 16). % %s image scene number. % %t image filename without any extension. % %u a unique temporary filename. % %w image width. % %x x resolution of the image. % %y y resolution of the image. % % The format of the AnnotateImage method is: % % MagickBooleanType AnnotateImage(Image *image,DrawInfo *draw_info) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % */ MagickExport MagickBooleanType AnnotateImage(Image *image, const DrawInfo *draw_info) { char primitive[MaxTextExtent], **textlist; DrawInfo *annotate, *annotate_info; GeometryInfo geometry_info; MagickBooleanType status; PointInfo offset; RectangleInfo geometry; register ssize_t i; size_t length; TypeMetric metrics; size_t height, number_lines; assert(image != (Image *) NULL); assert(image->signature == MagickSignature); if (image->debug != MagickFalse) (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); assert(draw_info != (DrawInfo *) NULL); assert(draw_info->signature == MagickSignature); if (draw_info->text == (char *) NULL) return(MagickFalse); if (*draw_info->text == '\0') return(MagickTrue); textlist=StringToList(draw_info->text); if (textlist == (char **) NULL) return(MagickFalse); length=strlen(textlist[0]); for (i=1; textlist[i] != (char *) NULL; i++) if (strlen(textlist[i]) > length) length=strlen(textlist[i]); number_lines=(size_t) i; annotate=CloneDrawInfo((ImageInfo *) NULL,draw_info); annotate_info=CloneDrawInfo((ImageInfo *) NULL,draw_info); SetGeometry(image,&geometry); SetGeometryInfo(&geometry_info); if (annotate_info->geometry != (char *) NULL) { (void) ParsePageGeometry(image,annotate_info->geometry,&geometry, &image->exception); (void) ParseGeometry(annotate_info->geometry,&geometry_info); } if (SetImageStorageClass(image,DirectClass) == MagickFalse) return(MagickFalse); status=MagickTrue; for (i=0; textlist[i] != (char *) NULL; i++) { /* Position text relative to image. */ annotate_info->affine.tx=geometry_info.xi-image->page.x; annotate_info->affine.ty=geometry_info.psi-image->page.y; (void) CloneString(&annotate->text,textlist[i]); (void) GetTypeMetrics(image,annotate,&metrics); height=(ssize_t) (metrics.ascent-metrics.descent+ draw_info->interline_spacing+0.5); switch (annotate->gravity) { case UndefinedGravity: default: { offset.x=annotate_info->affine.tx+i*annotate_info->affine.ry*height; offset.y=annotate_info->affine.ty+i*annotate_info->affine.sy*height; break; } case NorthWestGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+i* annotate_info->affine.ry*height+annotate_info->affine.ry* (metrics.ascent+metrics.descent); offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+i* annotate_info->affine.sy*height+annotate_info->affine.sy* metrics.ascent; break; } case NorthGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+ geometry.width/2.0+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)/2.0+ annotate_info->affine.ry*(metrics.ascent+metrics.descent); offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+i* annotate_info->affine.sy*height+annotate_info->affine.sy* metrics.ascent-annotate_info->affine.rx*(metrics.width- metrics.bounds.x1)/2.0; break; } case NorthEastGravity: { offset.x=(geometry.width == 0 ? 1.0 : -1.0)*annotate_info->affine.tx+ geometry.width+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)+ annotate_info->affine.ry*(metrics.ascent+metrics.descent)-1.0; offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+i* annotate_info->affine.sy*height+annotate_info->affine.sy* metrics.ascent-annotate_info->affine.rx*(metrics.width- metrics.bounds.x1); break; } case WestGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+i* annotate_info->affine.ry*height+annotate_info->affine.ry* (metrics.ascent+metrics.descent-(number_lines-1.0)*height)/2.0; offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+ geometry.height/2.0+i*annotate_info->affine.sy*height+ annotate_info->affine.sy*(metrics.ascent+metrics.descent- (number_lines-1.0)*height)/2.0; break; } case StaticGravity: case CenterGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+ geometry.width/2.0+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)/2.0+ annotate_info->affine.ry*(metrics.ascent+metrics.descent- (number_lines-1)*height)/2.0; offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+ geometry.height/2.0+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1)/2.0+ annotate_info->affine.sy*(metrics.ascent+metrics.descent- (number_lines-1.0)*height)/2.0; break; } case EastGravity: { offset.x=(geometry.width == 0 ? 1.0 : -1.0)*annotate_info->affine.tx+ geometry.width+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)+ annotate_info->affine.ry*(metrics.ascent+metrics.descent- (number_lines-1.0)*height)/2.0-1.0; offset.y=(geometry.height == 0 ? -1.0 : 1.0)*annotate_info->affine.ty+ geometry.height/2.0+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1)+ annotate_info->affine.sy*(metrics.ascent+metrics.descent- (number_lines-1.0)*height)/2.0; break; } case SouthWestGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+i* annotate_info->affine.ry*height-annotate_info->affine.ry* (number_lines-1.0)*height; offset.y=(geometry.height == 0 ? 1.0 : -1.0)*annotate_info->affine.ty+ geometry.height+i*annotate_info->affine.sy*height- annotate_info->affine.sy*(number_lines-1.0)*height+metrics.descent; break; } case SouthGravity: { offset.x=(geometry.width == 0 ? -1.0 : 1.0)*annotate_info->affine.tx+ geometry.width/2.0+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)/2.0- annotate_info->affine.ry*(number_lines-1.0)*height/2.0; offset.y=(geometry.height == 0 ? 1.0 : -1.0)*annotate_info->affine.ty+ geometry.height+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1)/2.0- annotate_info->affine.sy*(number_lines-1.0)*height+metrics.descent; break; } case SouthEastGravity: { offset.x=(geometry.width == 0 ? 1.0 : -1.0)*annotate_info->affine.tx+ geometry.width+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)- annotate_info->affine.ry*(number_lines-1.0)*height-1.0; offset.y=(geometry.height == 0 ? 1.0 : -1.0)*annotate_info->affine.ty+ geometry.height+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1)- annotate_info->affine.sy*(number_lines-1.0)*height+metrics.descent; break; } } switch (annotate->align) { case LeftAlign: { offset.x=annotate_info->affine.tx+i*annotate_info->affine.ry*height; offset.y=annotate_info->affine.ty+i*annotate_info->affine.sy*height; break; } case CenterAlign: { offset.x=annotate_info->affine.tx+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1)/2.0; offset.y=annotate_info->affine.ty+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1)/2.0; break; } case RightAlign: { offset.x=annotate_info->affine.tx+i*annotate_info->affine.ry*height- annotate_info->affine.sx*(metrics.width+metrics.bounds.x1); offset.y=annotate_info->affine.ty+i*annotate_info->affine.sy*height- annotate_info->affine.rx*(metrics.width+metrics.bounds.x1); break; } default: break; } if (draw_info->undercolor.opacity != TransparentOpacity) { DrawInfo *undercolor_info; /* Text box. */ undercolor_info=CloneDrawInfo((ImageInfo *) NULL,(DrawInfo *) NULL); undercolor_info->fill=draw_info->undercolor; undercolor_info->affine=draw_info->affine; undercolor_info->affine.tx=offset.x-draw_info->affine.ry*metrics.ascent; undercolor_info->affine.ty=offset.y-draw_info->affine.sy*metrics.ascent; (void) FormatMagickString(primitive,MaxTextExtent, "rectangle 0,0 %g,%lu",metrics.origin.x,(unsigned long) height); (void) CloneString(&undercolor_info->primitive,primitive); (void) DrawImage(image,undercolor_info); (void) DestroyDrawInfo(undercolor_info); } annotate_info->affine.tx=offset.x; annotate_info->affine.ty=offset.y; (void) FormatMagickString(primitive,MaxTextExtent,"stroke-width %g " "line 0,0 %g,0",metrics.underline_thickness,metrics.width); if (annotate->decorate == OverlineDecoration) { annotate_info->affine.ty-=(draw_info->affine.sy*(metrics.ascent+ metrics.descent-metrics.underline_position)); (void) CloneString(&annotate_info->primitive,primitive); (void) DrawImage(image,annotate_info); } else if (annotate->decorate == UnderlineDecoration) { annotate_info->affine.ty-=(draw_info->affine.sy* metrics.underline_position); (void) CloneString(&annotate_info->primitive,primitive); (void) DrawImage(image,annotate_info); } /* Annotate image with text. */ status=RenderType(image,annotate,&offset,&metrics); if (status == MagickFalse) break; if (annotate->decorate == LineThroughDecoration) { annotate_info->affine.ty-=(draw_info->affine.sy*(height+ metrics.underline_position+metrics.descent)/2.0); (void) CloneString(&annotate_info->primitive,primitive); (void) DrawImage(image,annotate_info); } } /* Relinquish resources. */ annotate_info=DestroyDrawInfo(annotate_info); annotate=DestroyDrawInfo(annotate); for (i=0; textlist[i] != (char *) NULL; i++) textlist[i]=DestroyString(textlist[i]); textlist=(char **) RelinquishMagickMemory(textlist); return(status); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % F o r m a t M a g i c k C a p t i o n % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % FormatMagickCaption() formats a caption so that it fits within the image % width. It returns the number of lines in the formatted caption. % % The format of the FormatMagickCaption method is: % % ssize_t FormatMagickCaption(Image *image,DrawInfo *draw_info, % TypeMetric *metrics,char **caption) % % A description of each parameter follows. % % o image: The image. % % o caption: the caption. % % o draw_info: the draw info. % % o metrics: Return the font metrics in this structure. % */ MagickExport ssize_t FormatMagickCaption(Image *image,DrawInfo *draw_info, TypeMetric *metrics,char **caption) { MagickBooleanType status; register char *p, *q, *s; register ssize_t i; size_t width; q=draw_info->text; s=(char *) NULL; for (p=(*caption); GetUTFCode(p) != 0; p+=GetUTFOctets(p)) { if (IsUTFSpace(GetUTFCode(p)) != MagickFalse) s=p; for (i=0; i < (ssize_t) GetUTFOctets(p); i++) *q++=(*(p+i)); *q='\0'; status=GetTypeMetrics(image,draw_info,metrics); if (status == MagickFalse) break; width=(size_t) floor(metrics->width+0.5); if (GetUTFCode(p) != '\n') if (width <= image->columns) continue; if (s == (char *) NULL) { s=p; while ((IsUTFSpace(GetUTFCode(s)) == MagickFalse) && (GetUTFCode(s) != 0)) s+=GetUTFOctets(s); } if (GetUTFCode(s) != 0) { *s='\n'; p=s; } else { char *target; ssize_t n; /* No convenient line breaks-- insert newline. */ target=AcquireString(*caption); n=p-(*caption); CopyMagickString(target,*caption,n+1); ConcatenateMagickString(target,"\n",strlen(*caption)+1); ConcatenateMagickString(target,p,strlen(*caption)+2); (void) DestroyString(*caption); *caption=target; p=(*caption)+n; } s=(char *) NULL; q=draw_info->text; } i=0; for (p=(*caption); GetUTFCode(p) != 0; p+=GetUTFOctets(p)) if (GetUTFCode(p) == '\n') i++; return(i); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % G e t M u l t i l i n e T y p e M e t r i c s % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % GetMultilineTypeMetrics() returns the following information for the % specified font and text: % % character width % character height % ascender % descender % text width % text height % maximum horizontal advance % bounds: x1 % bounds: y1 % bounds: x2 % bounds: y2 % origin: x % origin: y % underline position % underline thickness % % This method is like GetTypeMetrics() but it returns the maximum text width % and height for multiple lines of text. % % The format of the GetMultilineTypeMetrics method is: % % MagickBooleanType GetMultilineTypeMetrics(Image *image, % const DrawInfo *draw_info,TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o metrics: Return the font metrics in this structure. % */ MagickExport MagickBooleanType GetMultilineTypeMetrics(Image *image, const DrawInfo *draw_info,TypeMetric *metrics) { char **textlist; DrawInfo *annotate_info; MagickBooleanType status; register ssize_t i; TypeMetric extent; assert(image != (Image *) NULL); assert(image->signature == MagickSignature); if (image->debug != MagickFalse) (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); assert(draw_info != (DrawInfo *) NULL); assert(draw_info->text != (char *) NULL); assert(draw_info->signature == MagickSignature); if (*draw_info->text == '\0') return(MagickFalse); annotate_info=CloneDrawInfo((ImageInfo *) NULL,draw_info); annotate_info->text=DestroyString(annotate_info->text); /* Convert newlines to multiple lines of text. */ textlist=StringToList(draw_info->text); if (textlist == (char **) NULL) return(MagickFalse); annotate_info->render=MagickFalse; (void) ResetMagickMemory(metrics,0,sizeof(*metrics)); (void) ResetMagickMemory(&extent,0,sizeof(extent)); /* Find the widest of the text lines. */ annotate_info->text=textlist[0]; status=GetTypeMetrics(image,annotate_info,&extent); *metrics=extent; for (i=1; textlist[i] != (char *) NULL; i++) { annotate_info->text=textlist[i]; status=GetTypeMetrics(image,annotate_info,&extent); if (extent.width > metrics->width) *metrics=extent; } metrics->height=(double) (i*(size_t) (metrics->ascent- metrics->descent+0.5)+(i-1)*draw_info->interline_spacing); /* Relinquish resources. */ annotate_info->text=(char *) NULL; annotate_info=DestroyDrawInfo(annotate_info); for (i=0; textlist[i] != (char *) NULL; i++) textlist[i]=DestroyString(textlist[i]); textlist=(char **) RelinquishMagickMemory(textlist); return(status); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % % G e t T y p e M e t r i c s % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % GetTypeMetrics() returns the following information for the specified font % and text: % % character width % character height % ascender % descender % text width % text height % maximum horizontal advance % bounds: x1 % bounds: y1 % bounds: x2 % bounds: y2 % origin: x % origin: y % underline position % underline thickness % % The format of the GetTypeMetrics method is: % % MagickBooleanType GetTypeMetrics(Image *image,const DrawInfo *draw_info, % TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o metrics: Return the font metrics in this structure. % */ MagickExport MagickBooleanType GetTypeMetrics(Image *image, const DrawInfo *draw_info,TypeMetric *metrics) { DrawInfo *annotate_info; MagickBooleanType status; PointInfo offset; assert(image != (Image *) NULL); assert(image->signature == MagickSignature); if (image->debug != MagickFalse) (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",image->filename); assert(draw_info != (DrawInfo *) NULL); assert(draw_info->text != (char *) NULL); assert(draw_info->signature == MagickSignature); annotate_info=CloneDrawInfo((ImageInfo *) NULL,draw_info); annotate_info->render=MagickFalse; (void) ResetMagickMemory(metrics,0,sizeof(*metrics)); offset.x=0.0; offset.y=0.0; status=RenderType(image,annotate_info,&offset,metrics); if (image->debug != MagickFalse) (void) LogMagickEvent(AnnotateEvent,GetMagickModule(),"Metrics: text: %s; " "width: %g; height: %g; ascent: %g; descent: %g; max advance: %g; " "bounds: %g,%g %g,%g; origin: %g,%g; pixels per em: %g,%g; " "underline position: %g; underline thickness: %g",annotate_info->text, metrics->width,metrics->height,metrics->ascent,metrics->descent, metrics->max_advance,metrics->bounds.x1,metrics->bounds.y1, metrics->bounds.x2,metrics->bounds.y2,metrics->origin.x,metrics->origin.y, metrics->pixels_per_em.x,metrics->pixels_per_em.y, metrics->underline_position,metrics->underline_thickness); annotate_info=DestroyDrawInfo(annotate_info); return(status); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % + R e n d e r T y p e % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % RenderType() renders text on the image. It also returns the bounding box of % the text relative to the image. % % The format of the RenderType method is: % % MagickBooleanType RenderType(Image *image,DrawInfo *draw_info, % const PointInfo *offset,TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o offset: (x,y) location of text relative to image. % % o metrics: bounding box of text. % */ static MagickBooleanType RenderType(Image *image,const DrawInfo *draw_info, const PointInfo *offset,TypeMetric *metrics) { const TypeInfo *type_info; DrawInfo *annotate_info; MagickBooleanType status; type_info=(const TypeInfo *) NULL; if (draw_info->font != (char *) NULL) { if (*draw_info->font == '@') { status=RenderFreetype(image,draw_info,draw_info->encoding,offset, metrics); return(status); } if (*draw_info->font == '-') return(RenderX11(image,draw_info,offset,metrics)); if (IsPathAccessible(draw_info->font) != MagickFalse) { status=RenderFreetype(image,draw_info,draw_info->encoding,offset, metrics); return(status); } type_info=GetTypeInfo(draw_info->font,&image->exception); if (type_info == (const TypeInfo *) NULL) (void) ThrowMagickException(&image->exception,GetMagickModule(), TypeWarning,"UnableToReadFont","`%s'",draw_info->font); } if ((type_info == (const TypeInfo *) NULL) && (draw_info->family != (const char *) NULL)) { type_info=GetTypeInfoByFamily(draw_info->family,draw_info->style, draw_info->stretch,draw_info->weight,&image->exception); if (type_info == (const TypeInfo *) NULL) (void) ThrowMagickException(&image->exception,GetMagickModule(), TypeWarning,"UnableToReadFont","`%s'",draw_info->family); } if (type_info == (const TypeInfo *) NULL) type_info=GetTypeInfoByFamily("Arial",draw_info->style, draw_info->stretch,draw_info->weight,&image->exception); if (type_info == (const TypeInfo *) NULL) type_info=GetTypeInfoByFamily("Helvetica",draw_info->style, draw_info->stretch,draw_info->weight,&image->exception); if (type_info == (const TypeInfo *) NULL) type_info=GetTypeInfoByFamily("Century Schoolbook",draw_info->style, draw_info->stretch,draw_info->weight,&image->exception); if (type_info == (const TypeInfo *) NULL) type_info=GetTypeInfoByFamily((const char *) NULL,draw_info->style, draw_info->stretch,draw_info->weight,&image->exception); if (type_info == (const TypeInfo *) NULL) type_info=GetTypeInfo("*",&image->exception); if (type_info == (const TypeInfo *) NULL) { status=RenderFreetype(image,draw_info,draw_info->encoding,offset,metrics); return(status); } annotate_info=CloneDrawInfo((ImageInfo *) NULL,draw_info); annotate_info->face=type_info->face; if (type_info->metrics != (char *) NULL) (void) CloneString(&annotate_info->metrics,type_info->metrics); if (type_info->glyphs != (char *) NULL) (void) CloneString(&annotate_info->font,type_info->glyphs); status=RenderFreetype(image,annotate_info,type_info->encoding,offset,metrics); annotate_info=DestroyDrawInfo(annotate_info); return(status); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % + R e n d e r F r e e t y p e % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % RenderFreetype() renders text on the image with a Truetype font. It also % returns the bounding box of the text relative to the image. % % The format of the RenderFreetype method is: % % MagickBooleanType RenderFreetype(Image *image,DrawInfo *draw_info, % const char *encoding,const PointInfo *offset,TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o encoding: the font encoding. % % o offset: (x,y) location of text relative to image. % % o metrics: bounding box of text. % */ #if defined(MAGICKCORE_FREETYPE_DELEGATE) static int TraceCubicBezier(FT_Vector *p,FT_Vector *q,FT_Vector *to, DrawInfo *draw_info) { AffineMatrix affine; char path[MaxTextExtent]; affine=draw_info->affine; (void) FormatMagickString(path,MaxTextExtent, "C%g,%g %g,%g %g,%g",affine.tx+p->x/64.0,affine.ty- p->y/64.0,affine.tx+q->x/64.0,affine.ty-q->y/64.0,affine.tx+to->x/64.0, affine.ty-to->y/64.0); (void) ConcatenateString(&draw_info->primitive,path); return(0); } static int TraceLineTo(FT_Vector *to,DrawInfo *draw_info) { AffineMatrix affine; char path[MaxTextExtent]; affine=draw_info->affine; (void) FormatMagickString(path,MaxTextExtent,"L%g,%g",affine.tx+ to->x/64.0,affine.ty-to->y/64.0); (void) ConcatenateString(&draw_info->primitive,path); return(0); } static int TraceMoveTo(FT_Vector *to,DrawInfo *draw_info) { AffineMatrix affine; char path[MaxTextExtent]; affine=draw_info->affine; (void) FormatMagickString(path,MaxTextExtent,"M%g,%g",affine.tx+ to->x/64.0,affine.ty-to->y/64.0); (void) ConcatenateString(&draw_info->primitive,path); return(0); } static int TraceQuadraticBezier(FT_Vector *control,FT_Vector *to, DrawInfo *draw_info) { AffineMatrix affine; char path[MaxTextExtent]; affine=draw_info->affine; (void) FormatMagickString(path,MaxTextExtent,"Q%g,%g %g,%g", affine.tx+control->x/64.0,affine.ty-control->y/64.0,affine.tx+to->x/64.0, affine.ty-to->y/64.0); (void) ConcatenateString(&draw_info->primitive,path); return(0); } static MagickBooleanType RenderFreetype(Image *image,const DrawInfo *draw_info, const char *encoding,const PointInfo *offset,TypeMetric *metrics) { #if !defined(FT_OPEN_PATHNAME) #define FT_OPEN_PATHNAME ft_open_pathname #endif typedef struct _GlyphInfo { FT_UInt id; FT_Vector origin; FT_Glyph image; } GlyphInfo; const char *value; double direction; DrawInfo *annotate_info; FT_BBox bounds; FT_BitmapGlyph bitmap; FT_Encoding encoding_type; FT_Error status; FT_Face face; FT_Int32 flags; FT_Library library; FT_Matrix affine; FT_Open_Args args; FT_Vector origin; GlyphInfo glyph, last_glyph; ssize_t code, y; PointInfo point, resolution; register char *p; static FT_Outline_Funcs OutlineMethods = { (FT_Outline_MoveTo_Func) TraceMoveTo, (FT_Outline_LineTo_Func) TraceLineTo, (FT_Outline_ConicTo_Func) TraceQuadraticBezier, (FT_Outline_CubicTo_Func) TraceCubicBezier, 0, 0 }; unsigned char *utf8; /* Initialize Truetype library. */ status=FT_Init_FreeType(&library); if (status != 0) ThrowBinaryException(TypeError,"UnableToInitializeFreetypeLibrary", image->filename); args.flags=FT_OPEN_PATHNAME; if (draw_info->font == (char *) NULL) args.pathname=ConstantString("helvetica"); else if (*draw_info->font != '@') args.pathname=ConstantString(draw_info->font); else args.pathname=ConstantString(draw_info->font+1); face=(FT_Face) NULL; status=FT_Open_Face(library,&args,(long) draw_info->face,&face); args.pathname=DestroyString(args.pathname); if (status != 0) { (void) FT_Done_FreeType(library); (void) ThrowMagickException(&image->exception,GetMagickModule(), TypeError,"UnableToReadFont","`%s'",draw_info->font); return(RenderPostscript(image,draw_info,offset,metrics)); } if ((draw_info->metrics != (char *) NULL) && (IsPathAccessible(draw_info->metrics) != MagickFalse)) (void) FT_Attach_File(face,draw_info->metrics); encoding_type=ft_encoding_unicode; status=FT_Select_Charmap(face,encoding_type); if ((status != 0) && (face->num_charmaps != 0)) status=FT_Set_Charmap(face,face->charmaps[0]); if (encoding != (const char *) NULL) { if (LocaleCompare(encoding,"AdobeCustom") == 0) encoding_type=ft_encoding_adobe_custom; if (LocaleCompare(encoding,"AdobeExpert") == 0) encoding_type=ft_encoding_adobe_expert; if (LocaleCompare(encoding,"AdobeStandard") == 0) encoding_type=ft_encoding_adobe_standard; if (LocaleCompare(encoding,"AppleRoman") == 0) encoding_type=ft_encoding_apple_roman; if (LocaleCompare(encoding,"BIG5") == 0) encoding_type=ft_encoding_big5; if (LocaleCompare(encoding,"GB2312") == 0) encoding_type=ft_encoding_gb2312; if (LocaleCompare(encoding,"Johab") == 0) encoding_type=ft_encoding_johab; #if defined(ft_encoding_latin_1) if (LocaleCompare(encoding,"Latin-1") == 0) encoding_type=ft_encoding_latin_1; #endif if (LocaleCompare(encoding,"Latin-2") == 0) encoding_type=ft_encoding_latin_2; if (LocaleCompare(encoding,"None") == 0) encoding_type=ft_encoding_none; if (LocaleCompare(encoding,"SJIScode") == 0) encoding_type=ft_encoding_sjis; if (LocaleCompare(encoding,"Symbol") == 0) encoding_type=ft_encoding_symbol; if (LocaleCompare(encoding,"Unicode") == 0) encoding_type=ft_encoding_unicode; if (LocaleCompare(encoding,"Wansung") == 0) encoding_type=ft_encoding_wansung; status=FT_Select_Charmap(face,encoding_type); if (status != 0) ThrowBinaryException(TypeError,"UnrecognizedFontEncoding",encoding); } /* Set text size. */ resolution.x=DefaultResolution; resolution.y=DefaultResolution; if (draw_info->density != (char *) NULL) { GeometryInfo geometry_info; MagickStatusType flags; flags=ParseGeometry(draw_info->density,&geometry_info); resolution.x=geometry_info.rho; resolution.y=geometry_info.sigma; if ((flags & SigmaValue) == 0) resolution.y=resolution.x; } status=FT_Set_Char_Size(face,(FT_F26Dot6) (64.0*draw_info->pointsize), (FT_F26Dot6) (64.0*draw_info->pointsize),(FT_UInt) resolution.x, (FT_UInt) resolution.y); metrics->pixels_per_em.x=face->size->metrics.x_ppem; metrics->pixels_per_em.y=face->size->metrics.y_ppem; metrics->ascent=(double) face->size->metrics.ascender/64.0; metrics->descent=(double) face->size->metrics.descender/64.0; metrics->width=0; metrics->origin.x=0; metrics->origin.y=0; metrics->height=(double) face->size->metrics.height/64.0; metrics->max_advance=0.0; if (face->size->metrics.max_advance > MagickEpsilon) metrics->max_advance=(double) face->size->metrics.max_advance/64.0; metrics->bounds.x1=0.0; metrics->bounds.y1=metrics->descent; metrics->bounds.x2=metrics->ascent+metrics->descent; metrics->bounds.y2=metrics->ascent+metrics->descent; metrics->underline_position=face->underline_position/64.0; metrics->underline_thickness=face->underline_thickness/64.0; if (*draw_info->text == '\0') { (void) FT_Done_Face(face); (void) FT_Done_FreeType(library); return(MagickTrue); } /* Compute bounding box. */ if (image->debug != MagickFalse) (void) LogMagickEvent(AnnotateEvent,GetMagickModule(),"Font %s; " "font-encoding %s; text-encoding %s; pointsize %g", draw_info->font != (char *) NULL ? draw_info->font : "none", encoding != (char *) NULL ? encoding : "none", draw_info->encoding != (char *) NULL ? draw_info->encoding : "none", draw_info->pointsize); flags=FT_LOAD_NO_BITMAP; value=GetImageProperty(image,"type:hinting"); if (LocaleCompare(value,"off") == 0) flags|=FT_LOAD_NO_HINTING; glyph.id=0; glyph.image=NULL; last_glyph.id=0; last_glyph.image=NULL; origin.x=0; origin.y=0; affine.xx=65536L; affine.yx=0L; affine.xy=0L; affine.yy=65536L; if (draw_info->render != MagickFalse) { affine.xx=(FT_Fixed) (65536L*draw_info->affine.sx+0.5); affine.yx=(FT_Fixed) (-65536L*draw_info->affine.rx+0.5); affine.xy=(FT_Fixed) (-65536L*draw_info->affine.ry+0.5); affine.yy=(FT_Fixed) (65536L*draw_info->affine.sy+0.5); } annotate_info=CloneDrawInfo((ImageInfo *) NULL,draw_info); (void) CloneString(&annotate_info->primitive,"path '"); if (draw_info->render != MagickFalse) { if (image->storage_class != DirectClass) (void) SetImageStorageClass(image,DirectClass); if (image->matte == MagickFalse) (void) SetImageAlphaChannel(image,OpaqueAlphaChannel); } direction=1.0; if (draw_info->direction == RightToLeftDirection) direction=(-1.0); point.x=0.0; point.y=0.0; for (p=draw_info->text; GetUTFCode(p) != 0; p+=GetUTFOctets(p)) if (GetUTFCode(p) < 0) break; utf8=(unsigned char *) NULL; if (GetUTFCode(p) == 0) p=draw_info->text; else { utf8=ConvertLatin1ToUTF8((unsigned char *) draw_info->text); if (utf8 != (unsigned char *) NULL) p=(char *) utf8; } for (code=0; GetUTFCode(p) != 0; p+=GetUTFOctets(p)) { /* Render UTF-8 sequence. */ glyph.id=FT_Get_Char_Index(face,GetUTFCode(p)); if (glyph.id == 0) glyph.id=FT_Get_Char_Index(face,'?'); if ((glyph.id != 0) && (last_glyph.id != 0)) { if (draw_info->kerning != 0.0) origin.x+=64.0*direction*draw_info->kerning; else if (FT_HAS_KERNING(face)) { FT_Vector kerning; status=FT_Get_Kerning(face,last_glyph.id,glyph.id, ft_kerning_default,&kerning); if (status == 0) origin.x+=direction*kerning.x; } } glyph.origin=origin; status=FT_Load_Glyph(face,glyph.id,flags); if (status != 0) continue; status=FT_Get_Glyph(face->glyph,&glyph.image); if (status != 0) continue; status=FT_Outline_Get_BBox(&((FT_OutlineGlyph) glyph.image)->outline, &bounds); if (status != 0) continue; if ((p == draw_info->text) || (bounds.xMin < metrics->bounds.x1)) metrics->bounds.x1=bounds.xMin; if ((p == draw_info->text) || (bounds.yMin < metrics->bounds.y1)) metrics->bounds.y1=bounds.yMin; if ((p == draw_info->text) || (bounds.xMax > metrics->bounds.x2)) metrics->bounds.x2=bounds.xMax; if ((p == draw_info->text) || (bounds.yMax > metrics->bounds.y2)) metrics->bounds.y2=bounds.yMax; if (draw_info->render != MagickFalse) if ((draw_info->stroke.opacity != TransparentOpacity) || (draw_info->stroke_pattern != (Image *) NULL)) { /* Trace the glyph. */ annotate_info->affine.tx=glyph.origin.x/64.0; annotate_info->affine.ty=glyph.origin.y/64.0; (void) FT_Outline_Decompose(&((FT_OutlineGlyph) glyph.image)-> outline,&OutlineMethods,annotate_info); } FT_Vector_Transform(&glyph.origin,&affine); (void) FT_Glyph_Transform(glyph.image,&affine,&glyph.origin); status=FT_Glyph_To_Bitmap(&glyph.image,ft_render_mode_normal, (FT_Vector *) NULL,MagickTrue); if (status != 0) continue; bitmap=(FT_BitmapGlyph) glyph.image; point.x=offset->x+bitmap->left; point.y=offset->y-bitmap->top; if (draw_info->render != MagickFalse) { CacheView *image_view; ExceptionInfo *exception; MagickBooleanType status; /* Rasterize the glyph. */ status=MagickTrue; exception=(&image->exception); image_view=AcquireCacheView(image); for (y=0; y < (ssize_t) bitmap->bitmap.rows; y++) { ssize_t x_offset, y_offset; MagickBooleanType active, sync; MagickRealType fill_opacity; PixelPacket fill_color; register ssize_t x; register PixelPacket *restrict q; register unsigned char *p; if (status == MagickFalse) continue; x_offset=(ssize_t) ceil(point.x-0.5); y_offset=(ssize_t) ceil(point.y+y-0.5); if ((y_offset < 0) || (y_offset >= (ssize_t) image->rows)) continue; q=(PixelPacket *) NULL; if ((x_offset < 0) || (x_offset >= (ssize_t) image->columns)) active=MagickFalse; else { q=GetCacheViewAuthenticPixels(image_view,x_offset,y_offset, bitmap->bitmap.width,1,exception); active=q != (PixelPacket *) NULL ? MagickTrue : MagickFalse; } p=bitmap->bitmap.buffer+y*bitmap->bitmap.width; for (x=0; x < (ssize_t) bitmap->bitmap.width; x++) { x_offset++; if ((*p == 0) || (x_offset < 0) || (x_offset >= (ssize_t) image->columns)) { p++; q++; continue; } fill_opacity=(MagickRealType) (*p)/(bitmap->bitmap.num_grays-1); if (draw_info->text_antialias == MagickFalse) fill_opacity=fill_opacity >= 0.5 ? 1.0 : 0.0; if (active == MagickFalse) q=GetCacheViewAuthenticPixels(image_view,x_offset,y_offset,1,1, exception); if (q == (PixelPacket *) NULL) { p++; q++; continue; } (void) GetFillColor(draw_info,x_offset,y_offset,&fill_color); fill_opacity=QuantumRange-fill_opacity*(QuantumRange- fill_color.opacity); MagickCompositeOver(&fill_color,fill_opacity,q,q->opacity,q); if (active == MagickFalse) { sync=SyncCacheViewAuthenticPixels(image_view,exception); if (sync == MagickFalse) status=MagickFalse; } p++; q++; } sync=SyncCacheViewAuthenticPixels(image_view,exception); if (sync == MagickFalse) status=MagickFalse; } image_view=DestroyCacheView(image_view); } if ((bitmap->left+bitmap->bitmap.width) > metrics->width) metrics->width=bitmap->left+bitmap->bitmap.width; if ((draw_info->interword_spacing != 0.0) && (IsUTFSpace(GetUTFCode(p)) != MagickFalse) && (IsUTFSpace(code) == MagickFalse)) origin.x+=64.0*direction*draw_info->interword_spacing; else origin.x+=direction*face->glyph->advance.x; metrics->origin.x=origin.x; metrics->origin.y=origin.y; if (last_glyph.id != 0) FT_Done_Glyph(last_glyph.image); last_glyph=glyph; code=GetUTFCode(p); } if (utf8 != (unsigned char *) NULL) utf8=(unsigned char *) RelinquishMagickMemory(utf8); if (last_glyph.id != 0) FT_Done_Glyph(last_glyph.image); if ((draw_info->stroke.opacity != TransparentOpacity) || (draw_info->stroke_pattern != (Image *) NULL)) { if (draw_info->render != MagickFalse) { /* Draw text stroke. */ annotate_info->linejoin=RoundJoin; annotate_info->affine.tx=offset->x; annotate_info->affine.ty=offset->y; (void) ConcatenateString(&annotate_info->primitive,"'"); (void) DrawImage(image,annotate_info); } } /* Determine font metrics. */ glyph.id=FT_Get_Char_Index(face,'_'); glyph.origin=origin; status=FT_Load_Glyph(face,glyph.id,flags); if (status == 0) { status=FT_Get_Glyph(face->glyph,&glyph.image); if (status == 0) { status=FT_Outline_Get_BBox(&((FT_OutlineGlyph) glyph.image)-> outline,&bounds); if (status == 0) { FT_Vector_Transform(&glyph.origin,&affine); (void) FT_Glyph_Transform(glyph.image,&affine,&glyph.origin); status=FT_Glyph_To_Bitmap(&glyph.image,ft_render_mode_normal, (FT_Vector *) NULL,MagickTrue); bitmap=(FT_BitmapGlyph) glyph.image; if (bitmap->left > metrics->width) metrics->width=bitmap->left; } } if (glyph.id != 0) FT_Done_Glyph(glyph.image); } metrics->width-=metrics->bounds.x1/64.0; metrics->bounds.x1/=64.0; metrics->bounds.y1/=64.0; metrics->bounds.x2/=64.0; metrics->bounds.y2/=64.0; metrics->origin.x/=64.0; metrics->origin.y/=64.0; /* Relinquish resources. */ annotate_info=DestroyDrawInfo(annotate_info); (void) FT_Done_Face(face); (void) FT_Done_FreeType(library); return(MagickTrue); } #else static MagickBooleanType RenderFreetype(Image *image,const DrawInfo *draw_info, const char *magick_unused(encoding),const PointInfo *offset, TypeMetric *metrics) { (void) ThrowMagickException(&image->exception,GetMagickModule(), MissingDelegateWarning,"DelegateLibrarySupportNotBuiltIn","`%s' (Freetype)", draw_info->font); return(RenderPostscript(image,draw_info,offset,metrics)); } #endif /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % + R e n d e r P o s t s c r i p t % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % RenderPostscript() renders text on the image with a Postscript font. It % also returns the bounding box of the text relative to the image. % % The format of the RenderPostscript method is: % % MagickBooleanType RenderPostscript(Image *image,DrawInfo *draw_info, % const PointInfo *offset,TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o offset: (x,y) location of text relative to image. % % o metrics: bounding box of text. % */ static inline size_t MagickMin(const size_t x,const size_t y) { if (x < y) return(x); return(y); } static char *EscapeParenthesis(const char *text) { char *buffer; register char *p; register ssize_t i; size_t escapes; escapes=0; buffer=AcquireString(text); p=buffer; for (i=0; i < (ssize_t) MagickMin(strlen(text),MaxTextExtent-escapes-1); i++) { if ((text[i] == '(') || (text[i] == ')')) { *p++='\\'; escapes++; } *p++=text[i]; } *p='\0'; return(buffer); } static MagickBooleanType RenderPostscript(Image *image, const DrawInfo *draw_info,const PointInfo *offset,TypeMetric *metrics) { char filename[MaxTextExtent], geometry[MaxTextExtent], *text; FILE *file; Image *annotate_image; ImageInfo *annotate_info; int unique_file; ssize_t y; MagickBooleanType identity; PointInfo extent, point, resolution; register ssize_t i; /* Render label with a Postscript font. */ if (image->debug != MagickFalse) (void) LogMagickEvent(AnnotateEvent,GetMagickModule(), "Font %s; pointsize %g",draw_info->font != (char *) NULL ? draw_info->font : "none",draw_info->pointsize); file=(FILE *) NULL; unique_file=AcquireUniqueFileResource(filename); if (unique_file != -1) file=fdopen(unique_file,"wb"); if ((unique_file == -1) || (file == (FILE *) NULL)) { ThrowFileException(&image->exception,FileOpenError,"UnableToOpenFile", filename); return(MagickFalse); } (void) fprintf(file,"%%!PS-Adobe-3.0\n"); (void) fprintf(file,"/ReencodeType\n"); (void) fprintf(file,"{\n"); (void) fprintf(file," findfont dup length\n"); (void) fprintf(file, " dict begin { 1 index /FID ne {def} {pop pop} ifelse } forall\n"); (void) fprintf(file, " /Encoding ISOLatin1Encoding def currentdict end definefont pop\n"); (void) fprintf(file,"} bind def\n"); /* Sample to compute bounding box. */ identity=(draw_info->affine.sx == draw_info->affine.sy) && (draw_info->affine.rx == 0.0) && (draw_info->affine.ry == 0.0) ? MagickTrue : MagickFalse; extent.x=0.0; extent.y=0.0; for (i=0; i <= (ssize_t) (strlen(draw_info->text)+2); i++) { point.x=fabs(draw_info->affine.sx*i*draw_info->pointsize+ draw_info->affine.ry*2.0*draw_info->pointsize); point.y=fabs(draw_info->affine.rx*i*draw_info->pointsize+ draw_info->affine.sy*2.0*draw_info->pointsize); if (point.x > extent.x) extent.x=point.x; if (point.y > extent.y) extent.y=point.y; } (void) fprintf(file,"%g %g moveto\n",identity != MagickFalse ? 0.0 : extent.x/2.0,extent.y/2.0); (void) fprintf(file,"%g %g scale\n",draw_info->pointsize, draw_info->pointsize); if ((draw_info->font == (char *) NULL) || (*draw_info->font == '\0') || (strchr(draw_info->font,'/') != (char *) NULL)) (void) fprintf(file, "/Times-Roman-ISO dup /Times-Roman ReencodeType findfont setfont\n"); else (void) fprintf(file,"/%s-ISO dup /%s ReencodeType findfont setfont\n", draw_info->font,draw_info->font); (void) fprintf(file,"[%g %g %g %g 0 0] concat\n", draw_info->affine.sx,-draw_info->affine.rx,-draw_info->affine.ry, draw_info->affine.sy); text=EscapeParenthesis(draw_info->text); if (identity == MagickFalse) (void) fprintf(file,"(%s) stringwidth pop -0.5 mul -0.5 rmoveto\n",text); (void) fprintf(file,"(%s) show\n",text); text=DestroyString(text); (void) fprintf(file,"showpage\n"); (void) fclose(file); (void) FormatMagickString(geometry,MaxTextExtent,"%ldx%ld+0+0!",(long) floor(extent.x+0.5),(long) floor(extent.y+0.5)); annotate_info=AcquireImageInfo(); (void) FormatMagickString(annotate_info->filename,MaxTextExtent,"ps:%s", filename); (void) CloneString(&annotate_info->page,geometry); if (draw_info->density != (char *) NULL) (void) CloneString(&annotate_info->density,draw_info->density); annotate_info->antialias=draw_info->text_antialias; annotate_image=ReadImage(annotate_info,&image->exception); CatchException(&image->exception); annotate_info=DestroyImageInfo(annotate_info); (void) RelinquishUniqueFileResource(filename); if (annotate_image == (Image *) NULL) return(MagickFalse); resolution.x=DefaultResolution; resolution.y=DefaultResolution; if (draw_info->density != (char *) NULL) { GeometryInfo geometry_info; MagickStatusType flags; flags=ParseGeometry(draw_info->density,&geometry_info); resolution.x=geometry_info.rho; resolution.y=geometry_info.sigma; if ((flags & SigmaValue) == 0) resolution.y=resolution.x; } if (identity == MagickFalse) (void) TransformImage(&annotate_image,"0x0",(char *) NULL); else { RectangleInfo crop_info; crop_info=GetImageBoundingBox(annotate_image,&annotate_image->exception); crop_info.height=(size_t) ((resolution.y/DefaultResolution)* ExpandAffine(&draw_info->affine)*draw_info->pointsize+0.5); crop_info.y=(ssize_t) ceil((resolution.y/DefaultResolution)*extent.y/8.0- 0.5); (void) FormatMagickString(geometry,MaxTextExtent,"%lux%lu%+ld%+ld", (unsigned long) crop_info.width,(unsigned long) crop_info.height, (long) crop_info.x,(long) crop_info.y); (void) TransformImage(&annotate_image,geometry,(char *) NULL); } metrics->pixels_per_em.x=(resolution.y/DefaultResolution)* ExpandAffine(&draw_info->affine)*draw_info->pointsize; metrics->pixels_per_em.y=metrics->pixels_per_em.x; metrics->ascent=metrics->pixels_per_em.x; metrics->descent=metrics->pixels_per_em.y/-5.0; metrics->width=(double) annotate_image->columns/ ExpandAffine(&draw_info->affine); metrics->height=1.152*metrics->pixels_per_em.x; metrics->max_advance=metrics->pixels_per_em.x; metrics->bounds.x1=0.0; metrics->bounds.y1=metrics->descent; metrics->bounds.x2=metrics->ascent+metrics->descent; metrics->bounds.y2=metrics->ascent+metrics->descent; metrics->underline_position=(-2.0); metrics->underline_thickness=1.0; if (draw_info->render == MagickFalse) { annotate_image=DestroyImage(annotate_image); return(MagickTrue); } if (draw_info->fill.opacity != TransparentOpacity) { ExceptionInfo *exception; MagickBooleanType sync; PixelPacket fill_color; CacheView *annotate_view; /* Render fill color. */ if (image->matte == MagickFalse) (void) SetImageAlphaChannel(image,OpaqueAlphaChannel); if (annotate_image->matte == MagickFalse) (void) SetImageAlphaChannel(annotate_image,OpaqueAlphaChannel); fill_color=draw_info->fill; exception=(&image->exception); annotate_view=AcquireCacheView(annotate_image); for (y=0; y < (ssize_t) annotate_image->rows; y++) { register ssize_t x; register PixelPacket *restrict q; q=GetCacheViewAuthenticPixels(annotate_view,0,y,annotate_image->columns, 1,exception); if (q == (PixelPacket *) NULL) break; for (x=0; x < (ssize_t) annotate_image->columns; x++) { (void) GetFillColor(draw_info,x,y,&fill_color); q->opacity=ClampToQuantum(QuantumRange-(((QuantumRange- (MagickRealType) PixelIntensityToQuantum(q))*(QuantumRange- fill_color.opacity))/QuantumRange)); q->red=fill_color.red; q->green=fill_color.green; q->blue=fill_color.blue; q++; } sync=SyncCacheViewAuthenticPixels(annotate_view,exception); if (sync == MagickFalse) break; } annotate_view=DestroyCacheView(annotate_view); (void) CompositeImage(image,OverCompositeOp,annotate_image, (ssize_t) ceil(offset->x-0.5),(ssize_t) ceil(offset->y-(metrics->ascent+ metrics->descent)-0.5)); } annotate_image=DestroyImage(annotate_image); return(MagickTrue); } /* %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % % % % % + R e n d e r X 1 1 % % % % % % % %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% % % RenderX11() renders text on the image with an X11 font. It also returns the % bounding box of the text relative to the image. % % The format of the RenderX11 method is: % % MagickBooleanType RenderX11(Image *image,DrawInfo *draw_info, % const PointInfo *offset,TypeMetric *metrics) % % A description of each parameter follows: % % o image: the image. % % o draw_info: the draw info. % % o offset: (x,y) location of text relative to image. % % o metrics: bounding box of text. % */ #if defined(MAGICKCORE_X11_DELEGATE) static MagickBooleanType RenderX11(Image *image,const DrawInfo *draw_info, const PointInfo *offset,TypeMetric *metrics) { MagickBooleanType status; static DrawInfo cache_info; static Display *display = (Display *) NULL; static XAnnotateInfo annotate_info; static XFontStruct *font_info; static XPixelInfo pixel; static XResourceInfo resource_info; static XrmDatabase resource_database; static XStandardColormap *map_info; static XVisualInfo *visual_info; size_t height, width; if (display == (Display *) NULL) { const char *client_name; ImageInfo *image_info; /* Open X server connection. */ display=XOpenDisplay(draw_info->server_name); if (display == (Display *) NULL) { ThrowXWindowException(XServerError,"UnableToOpenXServer", draw_info->server_name); return(MagickFalse); } /* Get user defaults from X resource database. */ (void) XSetErrorHandler(XError); image_info=AcquireImageInfo(); client_name=GetClientName(); resource_database=XGetResourceDatabase(display,client_name); XGetResourceInfo(image_info,resource_database,client_name,&resource_info); resource_info.close_server=MagickFalse; resource_info.colormap=PrivateColormap; resource_info.font=AcquireString(draw_info->font); resource_info.background_color=AcquireString("#ffffffffffff"); resource_info.foreground_color=AcquireString("#000000000000"); map_info=XAllocStandardColormap(); if (map_info == (XStandardColormap *) NULL) { ThrowXWindowException(ResourceLimitError,"MemoryAllocationFailed", image->filename); return(MagickFalse); } /* Initialize visual info. */ visual_info=XBestVisualInfo(display,map_info,&resource_info); if (visual_info == (XVisualInfo *) NULL) { ThrowXWindowException(XServerError,"UnableToGetVisual", image->filename); return(MagickFalse); } map_info->colormap=(Colormap) NULL; pixel.pixels=(unsigned long *) NULL; /* Initialize Standard Colormap info. */ XGetMapInfo(visual_info,XDefaultColormap(display,visual_info->screen), map_info); XGetPixelPacket(display,visual_info,map_info,&resource_info, (Image *) NULL,&pixel); pixel.annotate_context=XDefaultGC(display,visual_info->screen); /* Initialize font info. */ font_info=XBestFont(display,&resource_info,MagickFalse); if (font_info == (XFontStruct *) NULL) { ThrowXWindowException(XServerError,"UnableToLoadFont", draw_info->font); return(MagickFalse); } if ((map_info == (XStandardColormap *) NULL) || (visual_info == (XVisualInfo *) NULL) || (font_info == (XFontStruct *) NULL)) { XFreeResources(display,visual_info,map_info,&pixel,font_info, &resource_info,(XWindowInfo *) NULL); ThrowXWindowException(XServerError,"UnableToLoadFont", image->filename); return(MagickFalse); } cache_info=(*draw_info); } /* Initialize annotate info. */ XGetAnnotateInfo(&annotate_info); annotate_info.stencil=ForegroundStencil; if (cache_info.font != draw_info->font) { /* Type name has changed. */ (void) XFreeFont(display,font_info); (void) CloneString(&resource_info.font,draw_info->font); font_info=XBestFont(display,&resource_info,MagickFalse); if (font_info == (XFontStruct *) NULL) { ThrowXWindowException(XServerError,"UnableToLoadFont", draw_info->font); return(MagickFalse); } } if (image->debug != MagickFalse) (void) LogMagickEvent(AnnotateEvent,GetMagickModule(), "Font %s; pointsize %g",draw_info->font != (char *) NULL ? draw_info->font : "none",draw_info->pointsize); cache_info=(*draw_info); annotate_info.font_info=font_info; annotate_info.text=(char *) draw_info->text; annotate_info.width=(unsigned int) XTextWidth(font_info,draw_info->text, (int) strlen(draw_info->text)); annotate_info.height=(unsigned int) font_info->ascent+font_info->descent; metrics->pixels_per_em.x=(double) font_info->max_bounds.width; metrics->pixels_per_em.y=(double) font_info->ascent+font_info->descent; metrics->ascent=(double) font_info->ascent+4; metrics->descent=(double) (-font_info->descent); metrics->width=annotate_info.width/ExpandAffine(&draw_info->affine); metrics->height=font_info->ascent+font_info->descent; metrics->max_advance=(double) font_info->max_bounds.width; metrics->bounds.x1=0.0; metrics->bounds.y1=metrics->descent; metrics->bounds.x2=metrics->ascent+metrics->descent; metrics->bounds.y2=metrics->ascent+metrics->descent; metrics->underline_position=(-2.0); metrics->underline_thickness=1.0; if (draw_info->render == MagickFalse) return(MagickTrue); if (draw_info->fill.opacity == TransparentOpacity) return(MagickTrue); /* Render fill color. */ width=annotate_info.width; height=annotate_info.height; if ((draw_info->affine.rx != 0.0) || (draw_info->affine.ry != 0.0)) { if (((draw_info->affine.sx-draw_info->affine.sy) == 0.0) && ((draw_info->affine.rx+draw_info->affine.ry) == 0.0)) annotate_info.degrees=(180.0/MagickPI)* atan2(draw_info->affine.rx,draw_info->affine.sx); } (void) FormatMagickString(annotate_info.geometry,MaxTextExtent, "%lux%lu+%ld+%ld",(unsigned long) width,(unsigned long) height,(long) ceil(offset->x-0.5),(long) ceil(offset->y-metrics->ascent-metrics->descent+ draw_info->interline_spacing-0.5)); pixel.pen_color.red=ScaleQuantumToShort(draw_info->fill.red); pixel.pen_color.green=ScaleQuantumToShort(draw_info->fill.green); pixel.pen_color.blue=ScaleQuantumToShort(draw_info->fill.blue); status=XAnnotateImage(display,&pixel,&annotate_info,image); if (status == 0) { ThrowXWindowException(ResourceLimitError,"MemoryAllocationFailed", image->filename); return(MagickFalse); } return(MagickTrue); } #else static MagickBooleanType RenderX11(Image *image,const DrawInfo *draw_info, const PointInfo *offset,TypeMetric *metrics) { (void) draw_info; (void) offset; (void) metrics; (void) ThrowMagickException(&image->exception,GetMagickModule(), MissingDelegateError,"DelegateLibrarySupportNotBuiltIn","`%s' (X11)", image->filename); return(MagickFalse); } #endif