]> granicus.if.org Git - imagemagick/blobdiff - coders/caption.c
(no commit message)
[imagemagick] / coders / caption.c
index 357ecaab7c10f7a73cdfd7147134c3244a1dcab0..602839d7b3994bf32ccf1af6a0d595c6706c1a56 100644 (file)
 %                             Read Text Caption.                              %
 %                                                                             %
 %                              Software Design                                %
-%                                John Cristy                                  %
+%                                   Cristy                                    %
 %                               February 2002                                 %
 %                                                                             %
 %                                                                             %
-%  Copyright 1999-2011 ImageMagick Studio LLC, a non-profit organization      %
+%  Copyright 1999-2014 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  %
@@ -41,6 +41,7 @@
 */
 #include "MagickCore/studio.h"
 #include "MagickCore/annotate.h"
+#include "MagickCore/artifact.h"
 #include "MagickCore/blob.h"
 #include "MagickCore/blob-private.h"
 #include "MagickCore/composite-private.h"
 #include "MagickCore/string_.h"
 #include "MagickCore/string-private.h"
 #include "MagickCore/utility.h"
-#if defined(MAGICKCORE_PANGOFT2_DELEGATE)
-#include <pango/pango.h>
-#include <pango/pangoft2.h>
-#include <pango/pango-features.h>
-#endif
 \f
 /*
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 %    o exception: return any errors or warnings in this structure.
 %
 */
-#if defined(MAGICKCORE_PANGOFT2_DELEGATE)
-static void PangoSubstitute(FcPattern *pattern,void *context)
-{
-  const char
-    *option;
-
-  option=(const char *) context;
-  if (option == (const char *) NULL)
-    return;
-  FcPatternDel(pattern,FC_HINTING);
-  FcPatternAddBool(pattern, FC_HINTING,LocaleCompare(option,"none") != 0);
-  FcPatternDel(pattern,FC_AUTOHINT);
-  FcPatternAddBool(pattern,FC_AUTOHINT,LocaleCompare(option,"auto") == 0);
-}
-
-static Image *ReadCAPTIONImage(const ImageInfo *image_info,
-  ExceptionInfo *exception)
-{
-  char
-    *caption,
-    *property;
-
-  const char
-    *option;
-
-  DrawInfo
-    *draw_info;
-
-  FT_Bitmap
-    *canvas;
-
-  Image
-    *image;
-
-  PangoAlignment
-    align;
-
-  PangoContext
-    *context;
-
-  PangoFontDescription
-    *description;
-
-  PangoFontMap
-    *fontmap;
-
-  PangoGravity
-    gravity;
-
-  PangoLayout
-    *layout;
-
-  PangoRectangle
-    extent;
-
-  PixelInfo
-    fill_color;
-
-  RectangleInfo
-    page;
-
-  register Quantum
-    *q;
-
-  register unsigned char
-    *p;
-
-  ssize_t
-    y;
-
-  /*
-    Initialize Image structure.
-  */
-  assert(image_info != (const ImageInfo *) NULL);
-  assert(image_info->signature == MagickSignature);
-  if (image_info->debug != MagickFalse)
-    (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
-      image_info->filename);
-  assert(exception != (ExceptionInfo *) NULL);
-  assert(exception->signature == MagickSignature);
-  image=AcquireImage(image_info,exception);
-  (void) ResetImagePage(image,"0x0+0+0");
-  /*
-    Get context.
-  */
-  fontmap=(PangoFontMap *) pango_ft2_font_map_new();
-  pango_ft2_font_map_set_resolution((PangoFT2FontMap *) fontmap,
-    image->resolution.x,image->resolution.y);
-  option=GetImageOption(image_info,"caption:hinting");
-  pango_ft2_font_map_set_default_substitute((PangoFT2FontMap *) fontmap,
-    PangoSubstitute,(char *) option,NULL);
-  context=pango_font_map_create_context(fontmap);
-  option=GetImageOption(image_info,"caption:language");
-  if (option != (const char *) NULL)
-    pango_context_set_language(context,pango_language_from_string(option));
-  draw_info=CloneDrawInfo(image_info,(DrawInfo *) NULL);
-  pango_context_set_base_dir(context,draw_info->direction ==
-    RightToLeftDirection ? PANGO_DIRECTION_RTL : PANGO_DIRECTION_LTR);
-  switch (draw_info->gravity)
-  {
-    case NorthGravity: gravity=PANGO_GRAVITY_NORTH; break;
-    case WestGravity: gravity=PANGO_GRAVITY_WEST; break;
-    case EastGravity: gravity=PANGO_GRAVITY_EAST; break;
-    case SouthGravity: gravity=PANGO_GRAVITY_SOUTH; break;
-    default: gravity=PANGO_GRAVITY_AUTO; break;
-  }
-  pango_context_set_base_gravity(context,gravity);
-  option=GetImageOption(image_info,"caption:gravity-hint");
-  if (option != (const char *) NULL)
-    {
-      if (LocaleCompare(option,"line") == 0)
-        pango_context_set_gravity_hint(context,PANGO_GRAVITY_HINT_LINE);
-      if (LocaleCompare(option,"natural") == 0)
-        pango_context_set_gravity_hint(context,PANGO_GRAVITY_HINT_NATURAL);
-      if (LocaleCompare(option,"strong") == 0)
-        pango_context_set_gravity_hint(context,PANGO_GRAVITY_HINT_STRONG);
-    }
-  /*
-    Configure layout.
-  */
-  layout=pango_layout_new(context);
-  option=GetImageOption(image_info,"caption:auto-dir");
-  if (option != (const char *) NULL)
-    pango_layout_set_auto_dir(layout,1);
-  option=GetImageOption(image_info,"caption:ellipsize");
-  if (option != (const char *) NULL)
-    {
-      if (LocaleCompare(option,"end") == 0)
-        pango_layout_set_ellipsize(layout,PANGO_ELLIPSIZE_END);
-      if (LocaleCompare(option,"middle") == 0)
-        pango_layout_set_ellipsize(layout,PANGO_ELLIPSIZE_MIDDLE);
-      if (LocaleCompare(option,"none") == 0)
-        pango_layout_set_ellipsize(layout,PANGO_ELLIPSIZE_NONE);
-      if (LocaleCompare(option,"start") == 0)
-        pango_layout_set_ellipsize(layout,PANGO_ELLIPSIZE_START);
-    }
-  option=GetImageOption(image_info,"caption:justify");
-  if ((option != (const char *) NULL) && (IsMagickTrue(option) != MagickFalse))
-    pango_layout_set_justify(layout,1);
-  option=GetImageOption(image_info,"caption:single-paragraph");
-  if ((option != (const char *) NULL) && (IsMagickTrue(option) != MagickFalse))
-    pango_layout_set_single_paragraph_mode(layout,1);
-  option=GetImageOption(image_info,"caption:wrap");
-  if (option != (const char *) NULL)
-    {
-      if (LocaleCompare(option,"char") == 0)
-        pango_layout_set_wrap(layout,PANGO_WRAP_CHAR);
-      if (LocaleCompare(option,"word") == 0)
-        pango_layout_set_wrap(layout,PANGO_WRAP_WORD);
-      if (LocaleCompare(option,"word-char") == 0)
-        pango_layout_set_wrap(layout,PANGO_WRAP_WORD_CHAR);
-    }
-  option=GetImageOption(image_info,"caption:indent");
-  if (option != (const char *) NULL)
-    pango_layout_set_indent(layout,(StringToLong(option)*image->resolution.x*
-      PANGO_SCALE+36)/72);
-  switch (draw_info->align)
-  {
-    case CenterAlign: align=PANGO_ALIGN_CENTER; break;
-    case RightAlign: align=PANGO_ALIGN_RIGHT; break;
-    case LeftAlign:
-    default: align=PANGO_ALIGN_LEFT; break;
-  }
-  if ((align != PANGO_ALIGN_CENTER) &&
-      (draw_info->direction == RightToLeftDirection))
-    align=(PangoAlignment) (PANGO_ALIGN_LEFT+PANGO_ALIGN_RIGHT-align);
-  pango_layout_set_alignment(layout,align);
-  description=pango_font_description_from_string(draw_info->font ==
-    (char *) NULL ? "helvetica" : draw_info->font);
-  pango_font_description_set_size(description,PANGO_SCALE*draw_info->pointsize);
-  pango_layout_set_font_description(layout,description);
-  pango_font_description_free(description);
-  property=InterpretImageProperties(image_info,image,image_info->filename,
-    exception);
-  (void) SetImageProperty(image,"caption",property,exception);
-  property=DestroyString(property);
-  caption=ConstantString(GetImageProperty(image,"caption",exception));
-  /*
-    Render caption.
-  */
-  option=GetImageOption(image_info,"caption:markup");
-  if ((option != (const char *) NULL) && (IsMagickTrue(option) != MagickFalse))
-    pango_layout_set_markup(layout,caption,-1);
-  else
-    pango_layout_set_text(layout,caption,-1);
-  pango_layout_context_changed(layout);
-  page.x=0;
-  page.y=0;
-  if (image_info->page != (char *) NULL)
-    (void) ParseAbsoluteGeometry(image_info->page,&page);
-  if (image->columns == 0)
-    {
-      pango_layout_get_pixel_extents(layout,NULL,&extent);
-      image->columns=extent.x+extent.width;
-    }
-  else
-    {
-      image->columns-=2*page.x;
-      pango_layout_set_width(layout,(PANGO_SCALE*image->columns*
-        image->resolution.x+36.0)/72.0);
-    }
-  if (image->rows == 0)
-    {
-      pango_layout_get_pixel_extents(layout,NULL,&extent);
-      image->rows=extent.y+extent.height;
-    }
-  else
-    {
-      image->rows-=2*page.y;
-      pango_layout_set_height(layout,(PANGO_SCALE*image->rows*
-        image->resolution.y+36.0)/72.0);
-    }
-  /*
-    Create canvas.
-  */
-  canvas=(FT_Bitmap *) AcquireMagickMemory(sizeof(*canvas));
-  if (canvas == (FT_Bitmap *) NULL)
-    {
-      draw_info=DestroyDrawInfo(draw_info);
-      ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
-    }
-  canvas->width=image->columns;
-  canvas->pitch=(canvas->width+3) & ~3;
-  canvas->rows=image->rows;
-  canvas->buffer=(unsigned char *) AcquireQuantumMemory(canvas->pitch,
-    canvas->rows*sizeof(*canvas->buffer));
-  if (canvas->buffer == (unsigned char *) NULL)
-    {
-      draw_info=DestroyDrawInfo(draw_info);
-      canvas=(FT_Bitmap *) RelinquishMagickMemory(canvas);
-      ThrowReaderException(ResourceLimitError,"MemoryAllocationFailed");
-    }
-  canvas->num_grays=256;
-  canvas->pixel_mode=ft_pixel_mode_grays;
-  ResetMagickMemory(canvas->buffer,0x00,canvas->pitch*canvas->rows);
-  pango_ft2_render_layout(canvas,layout,0,0);
-  /*
-    Convert caption to image.
-  */
-  image->columns+=2*page.x;
-  image->rows+=2*page.y;
-  if (SetImageBackgroundColor(image,exception) == MagickFalse)
-    {
-      draw_info=DestroyDrawInfo(draw_info);
-      canvas->buffer=(unsigned char *) RelinquishMagickMemory(canvas->buffer);
-      canvas=(FT_Bitmap *) RelinquishMagickMemory(canvas);
-      caption=DestroyString(caption);
-      image=DestroyImageList(image);
-      return((Image *) NULL);
-    }
-  GetPixelInfo(image,&fill_color);
-  p=canvas->buffer;
-  for (y=page.y; y < (ssize_t) (image->rows-page.y); y++)
-  {
-    register ssize_t
-      x;
-
-    q=GetAuthenticPixels(image,0,y,image->columns,1,exception);
-    if (q == (Quantum *) NULL)
-      break;
-    q+=page.x*GetPixelChannels(image);
-    for (x=page.x; x < (ssize_t) (image->columns-page.x); x++)
-    {
-      MagickRealType
-        fill_opacity;
-
-      (void) GetFillColor(draw_info,x,y,&fill_color,exception);
-      fill_opacity=(*p)*fill_color.alpha/canvas->num_grays;
-      if (draw_info->text_antialias == MagickFalse)
-        fill_opacity=fill_opacity >= 0.5 ? 1.0 : 0.0;
-      CompositePixelOver(image,&fill_color,fill_opacity,q,
-        GetPixelAlpha(image,q),q);
-      p++;
-      q+=GetPixelChannels(image);
-    }
-    for ( ; x < (ssize_t) ((canvas->width+3) & ~3); x++)
-      p++;
-  }
-  /*
-    Relinquish resources.
-  */
-  draw_info=DestroyDrawInfo(draw_info);
-  canvas->buffer=(unsigned char *) RelinquishMagickMemory(canvas->buffer);
-  canvas=(FT_Bitmap *) RelinquishMagickMemory(canvas);
-  caption=DestroyString(caption);
-  return(GetFirstImageInList(image));
-}
-#else
 static Image *ReadCAPTIONImage(const ImageInfo *image_info,
   ExceptionInfo *exception)
 {
   char
     *caption,
     geometry[MaxTextExtent],
-    *property;
+    *property,
+    *text;
 
   const char
-    *gravity;
+    *gravity,
+    *option;
 
   DrawInfo
     *draw_info;
@@ -400,6 +110,7 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
     *image;
 
   MagickBooleanType
+    split,
     status;
 
   register ssize_t
@@ -423,14 +134,21 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
   assert(exception != (ExceptionInfo *) NULL);
   assert(exception->signature == MagickSignature);
   image=AcquireImage(image_info,exception);
-  if (image->columns == 0)
-    ThrowReaderException(OptionError,"MustSpecifyImageSize");
   (void) ResetImagePage(image,"0x0+0+0");
   /*
     Format caption.
   */
-  property=InterpretImageProperties(image_info,image,image_info->filename,
-    exception);
+  option=GetImageOption(image_info,"filename");
+  if (option == (const char *) NULL)
+    property=InterpretImageProperties((ImageInfo *) image_info,image,
+      image_info->filename,exception);
+  else
+    if (LocaleNCompare(option,"caption:",8) == 0)
+      property=InterpretImageProperties((ImageInfo *) image_info,image,option+8,
+        exception);
+    else
+      property=InterpretImageProperties((ImageInfo *) image_info,image,option,
+        exception);
   (void) SetImageProperty(image,"caption",property,exception);
   property=DestroyString(property);
   caption=ConstantString(GetImageProperty(image,"caption",exception));
@@ -440,19 +158,51 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
   if (gravity != (char *) NULL)
     draw_info->gravity=(GravityType) ParseCommandOption(MagickGravityOptions,
       MagickFalse,gravity);
-  if ((*caption != '\0') && (image->rows != 0) &&
-      (image_info->pointsize == 0.0))
+  split=MagickFalse;
+  if (image->columns == 0)
+    {
+      text=AcquireString(caption);
+      i=FormatMagickCaption(image,draw_info,split,&metrics,&text,
+        exception);
+      (void) CloneString(&draw_info->text,text);
+      text=DestroyString(text);
+      (void) FormatLocaleString(geometry,MaxTextExtent,"%+g%+g",
+        -metrics.bounds.x1,metrics.ascent);
+      if (draw_info->gravity == UndefinedGravity)
+        (void) CloneString(&draw_info->geometry,geometry);
+      status=GetMultilineTypeMetrics(image,draw_info,&metrics,exception);
+      width=(size_t) floor(metrics.width+draw_info->stroke_width+0.5);
+      image->columns=width;
+    }
+  if (image->rows == 0)
+    {
+      split=MagickTrue;
+      text=AcquireString(caption);
+      i=FormatMagickCaption(image,draw_info,split,&metrics,&text,
+        exception);
+      (void) CloneString(&draw_info->text,text);
+      text=DestroyString(text);
+      (void) FormatLocaleString(geometry,MaxTextExtent,"%+g%+g",
+        -metrics.bounds.x1,metrics.ascent);
+      if (draw_info->gravity == UndefinedGravity)
+        (void) CloneString(&draw_info->geometry,geometry);
+      status=GetMultilineTypeMetrics(image,draw_info,&metrics,exception);
+      image->rows=(size_t) ((i+1)*(metrics.ascent-metrics.descent+
+        draw_info->interline_spacing+draw_info->stroke_width)+0.5);
+    }
+  if (fabs(image_info->pointsize) < MagickEpsilon)
     {
-      char
-        *text;
+      double
+        high,
+        low;
 
       /*
-        Scale text to fit bounding box.
+        Auto fit text into bounding box.
       */
-      for ( ; ; )
+      for ( ; ; draw_info->pointsize*=2.0)
       {
         text=AcquireString(caption);
-        i=FormatMagickCaption(image,draw_info,MagickFalse,&metrics,&text,
+        i=FormatMagickCaption(image,draw_info,split,&metrics,&text,
           exception);
         (void) CloneString(&draw_info->text,text);
         text=DestroyString(text);
@@ -461,18 +211,24 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
         if (draw_info->gravity == UndefinedGravity)
           (void) CloneString(&draw_info->geometry,geometry);
         status=GetMultilineTypeMetrics(image,draw_info,&metrics,exception);
-        (void) status;
         width=(size_t) floor(metrics.width+draw_info->stroke_width+0.5);
         height=(size_t) floor(metrics.height+draw_info->stroke_width+0.5);
-        if ((width > (image->columns+1)) || (height > (image->rows+1)))
-          break;
-        draw_info->pointsize*=2.0;
+        if ((image->columns != 0) && (image->rows != 0))
+          {
+            if ((width >= image->columns) && (height >= image->rows))
+              break;
+          }
+        else
+          if (((image->columns != 0) && (width >= image->columns)) ||
+              ((image->rows != 0) && (height >= image->rows)))
+            break;
       }
-      draw_info->pointsize/=2.0;
-      for ( ; ; )
+      high=draw_info->pointsize;
+      for (low=1.0; (high-low) > 0.5; )
       {
+        draw_info->pointsize=(low+high)/2.0;
         text=AcquireString(caption);
-        i=FormatMagickCaption(image,draw_info,MagickFalse,&metrics,&text,
+        i=FormatMagickCaption(image,draw_info,split,&metrics,&text,
           exception);
         (void) CloneString(&draw_info->text,text);
         text=DestroyString(text);
@@ -483,19 +239,24 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
         status=GetMultilineTypeMetrics(image,draw_info,&metrics,exception);
         width=(size_t) floor(metrics.width+draw_info->stroke_width+0.5);
         height=(size_t) floor(metrics.height+draw_info->stroke_width+0.5);
-        if ((width > (image->columns+1)) || (height > (image->rows+1)))
-          break;
-        draw_info->pointsize++;
+        if ((image->columns != 0) && (image->rows != 0))
+          {
+            if ((width < image->columns) && (height < image->rows))
+              low=draw_info->pointsize+0.5;
+            else
+              high=draw_info->pointsize-0.5;
+          }
+        else
+          if (((image->columns != 0) && (width < image->columns)) ||
+              ((image->rows != 0) && (height < image->rows)))
+            low=draw_info->pointsize+0.5;
+          else
+            high=draw_info->pointsize-0.5;
       }
-      draw_info->pointsize--;
+      draw_info->pointsize=(low+high)/2.0-0.5;
     }
-  i=FormatMagickCaption(image,draw_info,MagickTrue,&metrics,&caption,exception);
-  if (image->rows == 0)
-    image->rows=(size_t) ((i+1)*(metrics.ascent-metrics.descent+
-      draw_info->interline_spacing+draw_info->stroke_width)+0.5);
-  if (image->rows == 0)
-    image->rows=(size_t) ((i+1)*draw_info->pointsize+
-      draw_info->interline_spacing+draw_info->stroke_width+0.5);
+  (void) CloneString(&draw_info->text,caption);
+  i=FormatMagickCaption(image,draw_info,split,&metrics,&caption,exception);
   if (SetImageBackgroundColor(image,exception) == MagickFalse)
     {
       image=DestroyImageList(image);
@@ -520,12 +281,16 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
           metrics.ascent+draw_info->stroke_width/2.0);
       draw_info->geometry=AcquireString(geometry);
     }
-  (void) AnnotateImage(image,draw_info,exception);
+  status=AnnotateImage(image,draw_info,exception);
   draw_info=DestroyDrawInfo(draw_info);
   caption=DestroyString(caption);
+  if (status == MagickFalse)
+    {
+      image=DestroyImageList(image);
+      return((Image *) NULL);
+    }
   return(GetFirstImageInList(image));
 }
-#endif
 \f
 /*
 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
@@ -552,22 +317,12 @@ static Image *ReadCAPTIONImage(const ImageInfo *image_info,
 */
 ModuleExport size_t RegisterCAPTIONImage(void)
 {
-  char
-    version[MaxTextExtent];
-
   MagickInfo
     *entry;
 
-  *version='\0';
-#if defined(PANGO_VERSION_STRING)
-  (void) FormatLocaleString(version,MaxTextExtent,"(Pangoft2 %s)",
-    PANGO_VERSION_STRING);
-#endif
   entry=SetMagickInfo("CAPTION");
   entry->decoder=(DecodeImageHandler *) ReadCAPTIONImage;
   entry->description=ConstantString("Caption");
-  if (*version != '\0')
-    entry->version=ConstantString(version);
   entry->adjoin=MagickFalse;
   entry->module=ConstantString("CAPTION");
   (void) RegisterMagickInfo(entry);