granicus.if.org Git - imagemagick/blob - coders/ttf.c

   1 /*
   2 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
   3 %                                                                             %
   4 %                                                                             %
   5 %                                                                             %
   6 %                            TTTTT  TTTTT  FFFFF                              %
   7 %                              T      T    F                                  %
   8 %                              T      T    FFF                                %
   9 %                              T      T    F                                  %
  10 %                              T      T    F                                  %
  11 %                                                                             %
  12 %                                                                             %
  13 %             Return A Preview For A TrueType or Postscript Font              %
  14 %                                                                             %
  15 %                              Software Design                                %
  16 %                                   Cristy                                    %
  17 %                                 July 1992                                   %
  18 %                                                                             %
  19 %                                                                             %
  20 %  Copyright 1999-2018 ImageMagick Studio LLC, a non-profit organization      %
  21 %  dedicated to making software imaging solutions freely available.           %
  22 %                                                                             %
  23 %  You may not use this file except in compliance with the License.  You may  %
  24 %  obtain a copy of the License at                                            %
  25 %                                                                             %
  26 %    https://www.imagemagick.org/script/license.php                           %
  27 %                                                                             %
  28 %  Unless required by applicable law or agreed to in writing, software        %
  29 %  distributed under the License is distributed on an "AS IS" BASIS,          %
  30 %  WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.   %
  31 %  See the License for the specific language governing permissions and        %
  32 %  limitations under the License.                                             %
  33 %                                                                             %
  34 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  35 %
  36 %
  37 */
  38 \f
  39 /*
  40   Include declarations.
  41 */
  42 #include "MagickCore/studio.h"
  43 #include "MagickCore/blob.h"
  44 #include "MagickCore/blob-private.h"
  45 #include "MagickCore/draw.h"
  46 #include "MagickCore/exception.h"
  47 #include "MagickCore/exception-private.h"
  48 #include "MagickCore/image.h"
  49 #include "MagickCore/image-private.h"
  50 #include "MagickCore/list.h"
  51 #include "MagickCore/magick.h"
  52 #include "MagickCore/memory_.h"
  53 #include "MagickCore/quantum-private.h"
  54 #include "MagickCore/static.h"
  55 #include "MagickCore/string_.h"
  56 #include "MagickCore/module.h"
  57 #include "MagickCore/type.h"
  58 #include "MagickWand/MagickWand.h"
  59 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
  60 #include <ft2build.h>
  61 #if defined(FT_FREETYPE_H)
  62 #  include FT_FREETYPE_H
  63 #else
  64 #  include <freetype/freetype.h>
  65 #endif
  66 #endif
  67 \f
  68 /*
  69 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  70 %                                                                             %
  71 %                                                                             %
  72 %                                                                             %
  73 %   I s P F A                                                                 %
  74 %                                                                             %
  75 %                                                                             %
  76 %                                                                             %
  77 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  78 %
  79 %  IsPFA()() returns MagickTrue if the image format type, identified by the
  80 %  magick string, is PFA.
  81 %
  82 %  The format of the IsPFA method is:
  83 %
  84 %      MagickBooleanType IsPFA(const unsigned char *magick,const size_t length)
  85 %
  86 %  A description of each parameter follows:
  87 %
  88 %    o magick: compare image format pattern against these bytes.
  89 %
  90 %    o length: Specifies the length of the magick string.
  91 %
  92 %
  93 */
  94 static MagickBooleanType IsPFA(const unsigned char *magick,const size_t length)
  95 {
  96   if (length < 14)
  97     return(MagickFalse);
  98   if (LocaleNCompare((char *) magick,"%!PS-AdobeFont",14) == 0)
  99     return(MagickTrue);
 100   return(MagickFalse);
 101 }
 102 \f
 103 /*
 104 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 105 %                                                                             %
 106 %                                                                             %
 107 %                                                                             %
 108 %   I s T T F                                                                 %
 109 %                                                                             %
 110 %                                                                             %
 111 %                                                                             %
 112 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 113 %
 114 %  IsTTF()() returns MagickTrue if the image format type, identified by the
 115 %  magick string, is TTF.
 116 %
 117 %  The format of the IsTTF method is:
 118 %
 119 %      MagickBooleanType IsTTF(const unsigned char *magick,const size_t length)
 120 %
 121 %  A description of each parameter follows:
 122 %
 123 %    o magick: compare image format pattern against these bytes.
 124 %
 125 %    o length: Specifies the length of the magick string.
 126 %
 127 %
 128 */
 129 static MagickBooleanType IsTTF(const unsigned char *magick,const size_t length)
 130 {
 131   if (length < 5)
 132     return(MagickFalse);
 133   if (((int) magick[0] == 0x00) && ((int) magick[1] == 0x01) &&
 134       ((int) magick[2] == 0x00) && ((int) magick[3] == 0x00) &&
 135       ((int) magick[4] == 0x00))
 136     return(MagickTrue);
 137   return(MagickFalse);
 138 }
 139 \f
 140 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 141 /*
 142 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 143 %                                                                             %
 144 %                                                                             %
 145 %                                                                             %
 146 %   R e a d T T F I m a g e                                                   %
 147 %                                                                             %
 148 %                                                                             %
 149 %                                                                             %
 150 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 151 %
 152 %  ReadTTFImage() reads a TrueType font file and returns it.  It
 153 %  allocates the memory necessary for the new Image structure and returns a
 154 %  pointer to the new image.
 155 %
 156 %  The format of the ReadTTFImage method is:
 157 %
 158 %      Image *ReadTTFImage(const ImageInfo *image_info,ExceptionInfo *exception)
 159 %
 160 %  A description of each parameter follows:
 161 %
 162 %    o image_info: the image info.
 163 %
 164 %    o exception: return any errors or warnings in this structure.
 165 %
 166 */
 167 static Image *ReadTTFImage(const ImageInfo *image_info,ExceptionInfo *exception)
 168 {
 169   char
 170     buffer[MagickPathExtent],
 171     *text;
 172
 173   const char
 174     *Text = (char *)
 175       "abcdefghijklmnopqrstuvwxyz\n"
 176       "ABCDEFGHIJKLMNOPQRSTUVWXYZ\n"
 177       "0123456789.:,;(*!?}^)#${%^&-+@\n";
 178
 179   const TypeInfo
 180     *type_info;
 181
 182   DrawInfo
 183     *draw_info;
 184
 185   Image
 186     *image;
 187
 188   MagickBooleanType
 189     status;
 190
 191   PixelInfo
 192     background_color;
 193
 194   register ssize_t
 195     i,
 196     x;
 197
 198   register Quantum
 199     *q;
 200
 201   ssize_t
 202     y;
 203
 204   /*
 205     Open image file.
 206   */
 207   assert(image_info != (const ImageInfo *) NULL);
 208   assert(image_info->signature == MagickCoreSignature);
 209   if (image_info->debug != MagickFalse)
 210     (void) LogMagickEvent(TraceEvent,GetMagickModule(),"%s",
 211       image_info->filename);
 212   assert(exception != (ExceptionInfo *) NULL);
 213   assert(exception->signature == MagickCoreSignature);
 214   image=AcquireImage(image_info,exception);
 215   image->columns=800;
 216   image->rows=480;
 217   type_info=GetTypeInfo(image_info->filename,exception);
 218   if ((type_info != (const TypeInfo *) NULL) &&
 219       (type_info->glyphs != (char *) NULL))
 220     (void) CopyMagickString(image->filename,type_info->glyphs,MagickPathExtent);
 221   status=OpenBlob(image_info,image,ReadBinaryBlobMode,exception);
 222   if (status == MagickFalse)
 223     {
 224       image=DestroyImageList(image);
 225       return((Image *) NULL);
 226     }
 227   status=SetImageExtent(image,image->columns,image->rows,exception);
 228   if (status == MagickFalse)
 229     return(DestroyImageList(image));
 230   /*
 231     Color canvas with background color
 232   */
 233   background_color=image_info->background_color;
 234   for (y=0; y < (ssize_t) image->rows; y++)
 235   {
 236     q=QueueAuthenticPixels(image,0,y,image->columns,1,exception);
 237     if (q == (Quantum *) NULL)
 238       break;
 239     for (x=0; x < (ssize_t) image->columns; x++)
 240     {
 241       SetPixelViaPixelInfo(image,&background_color,q);
 242       q+=GetPixelChannels(image);
 243     }
 244     if (SyncAuthenticPixels(image,exception) == MagickFalse)
 245       break;
 246   }
 247   (void) CopyMagickString(image->magick,image_info->magick,MagickPathExtent);
 248   (void) CopyMagickString(image->filename,image_info->filename,
 249     MagickPathExtent);
 250   /*
 251     Prepare drawing commands
 252   */
 253   y=20;
 254   draw_info=CloneDrawInfo(image_info,(DrawInfo *) NULL);
 255   draw_info->font=AcquireString(image->filename);
 256   ConcatenateString(&draw_info->primitive,"push graphic-context\n");
 257   (void) FormatLocaleString(buffer,MagickPathExtent,
 258     " viewbox 0 0 %.20g %.20g\n",(double) image->columns,(double) image->rows);
 259   ConcatenateString(&draw_info->primitive,buffer);
 260   ConcatenateString(&draw_info->primitive," font-size 18\n");
 261   (void) FormatLocaleString(buffer,MagickPathExtent," text 10,%.20g '",
 262     (double) y);
 263   ConcatenateString(&draw_info->primitive,buffer);
 264   text=EscapeString(Text,'"');
 265   ConcatenateString(&draw_info->primitive,text);
 266   text=DestroyString(text);
 267   (void) FormatLocaleString(buffer,MagickPathExtent,"'\n");
 268   ConcatenateString(&draw_info->primitive,buffer);
 269   y+=20*(ssize_t) MultilineCensus((char *) Text)+20;
 270   for (i=12; i <= 72; i+=6)
 271   {
 272     y+=i+12;
 273     ConcatenateString(&draw_info->primitive," font-size 18\n");
 274     (void) FormatLocaleString(buffer,MagickPathExtent,
 275       " text 10,%.20g '%.20g'\n",(double) y,(double) i);
 276     ConcatenateString(&draw_info->primitive,buffer);
 277     (void) FormatLocaleString(buffer,MagickPathExtent," font-size %.20g\n",
 278       (double) i);
 279     ConcatenateString(&draw_info->primitive,buffer);
 280     (void) FormatLocaleString(buffer,MagickPathExtent," text 50,%.20g "
 281       "'That which does not destroy me, only makes me stronger.'\n",(double) y);
 282     ConcatenateString(&draw_info->primitive,buffer);
 283     if (i >= 24)
 284       i+=6;
 285   }
 286   ConcatenateString(&draw_info->primitive,"pop graphic-context");
 287   (void) DrawImage(image,draw_info,exception);
 288   /*
 289     Relinquish resources.
 290   */
 291   draw_info=DestroyDrawInfo(draw_info);
 292   (void) CloseBlob(image);
 293   return(GetFirstImageInList(image));
 294 }
 295 #endif /* MAGICKCORE_FREETYPE_DELEGATE */
 296 \f
 297 /*
 298 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 299 %                                                                             %
 300 %                                                                             %
 301 %                                                                             %
 302 %   R e g i s t e r T T F I m a g e                                           %
 303 %                                                                             %
 304 %                                                                             %
 305 %                                                                             %
 306 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 307 %
 308 %  RegisterTTFImage() adds attributes for the TTF image format to
 309 %  the list of supported formats.  The attributes include the image format
 310 %  tag, a method to read and/or write the format, whether the format
 311 %  supports the saving of more than one frame to the same file or blob,
 312 %  whether the format supports native in-memory I/O, and a brief
 313 %  description of the format.
 314 %
 315 %  The format of the RegisterTTFImage method is:
 316 %
 317 %      size_t RegisterTTFImage(void)
 318 %
 319 */
 320 ModuleExport size_t RegisterTTFImage(void)
 321 {
 322   char
 323     version[MagickPathExtent];
 324
 325   MagickInfo
 326     *entry;
 327
 328   *version='\0';
 329 #if defined(FREETYPE_MAJOR) && defined(FREETYPE_MINOR) && defined(FREETYPE_PATCH)
 330   (void) FormatLocaleString(version,MagickPathExtent,"Freetype %d.%d.%d",
 331     FREETYPE_MAJOR,FREETYPE_MINOR,FREETYPE_PATCH);
 332 #endif
 333   entry=AcquireMagickInfo("TTF","DFONT","Multi-face font package");
 334 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 335   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 336 #endif
 337   entry->magick=(IsImageFormatHandler *) IsTTF;
 338   entry->flags^=CoderAdjoinFlag;
 339   if (*version != '\0')
 340     entry->version=ConstantString(version);
 341   (void) RegisterMagickInfo(entry);
 342   entry=AcquireMagickInfo("TTF","PFA","Postscript Type 1 font (ASCII)");
 343 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 344   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 345 #endif
 346   entry->magick=(IsImageFormatHandler *) IsPFA;
 347   entry->flags^=CoderAdjoinFlag;
 348   if (*version != '\0')
 349     entry->version=ConstantString(version);
 350   (void) RegisterMagickInfo(entry);
 351   entry=AcquireMagickInfo("TTF","PFB","Postscript Type 1 font (binary)");
 352 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 353   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 354 #endif
 355   entry->magick=(IsImageFormatHandler *) IsPFA;
 356   entry->flags^=CoderAdjoinFlag;
 357   if (*version != '\0')
 358     entry->version=ConstantString(version);
 359   (void) RegisterMagickInfo(entry);
 360   entry=AcquireMagickInfo("TTF","OTF","Open Type font");
 361 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 362   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 363 #endif
 364   entry->magick=(IsImageFormatHandler *) IsTTF;
 365   entry->flags^=CoderAdjoinFlag;
 366   if (*version != '\0')
 367     entry->version=ConstantString(version);
 368   (void) RegisterMagickInfo(entry);
 369   entry=AcquireMagickInfo("TTF","TTC","TrueType font collection");
 370 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 371   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 372 #endif
 373   entry->magick=(IsImageFormatHandler *) IsTTF;
 374   entry->flags^=CoderAdjoinFlag;
 375   if (*version != '\0')
 376     entry->version=ConstantString(version);
 377   (void) RegisterMagickInfo(entry);
 378   entry=AcquireMagickInfo("TTF","TTF","TrueType font");
 379 #if defined(MAGICKCORE_FREETYPE_DELEGATE)
 380   entry->decoder=(DecodeImageHandler *) ReadTTFImage;
 381 #endif
 382   entry->magick=(IsImageFormatHandler *) IsTTF;
 383   entry->flags^=CoderAdjoinFlag;
 384   if (*version != '\0')
 385     entry->version=ConstantString(version);
 386   (void) RegisterMagickInfo(entry);
 387   return(MagickImageCoderSignature);
 388 }
 389 \f
 390 /*
 391 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 392 %                                                                             %
 393 %                                                                             %
 394 %                                                                             %
 395 %   U n r e g i s t e r T T F I m a g e                                       %
 396 %                                                                             %
 397 %                                                                             %
 398 %                                                                             %
 399 %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
 400 %
 401 %  UnregisterTTFImage() removes format registrations made by the
 402 %  TTF module from the list of supported formats.
 403 %
 404 %  The format of the UnregisterTTFImage method is:
 405 %
 406 %      UnregisterTTFImage(void)
 407 %
 408 */
 409 ModuleExport void UnregisterTTFImage(void)
 410 {
 411   (void) UnregisterMagickInfo("TTF");
 412   (void) UnregisterMagickInfo("TTC");
 413   (void) UnregisterMagickInfo("OTF");
 414   (void) UnregisterMagickInfo("PFA");
 415   (void) UnregisterMagickInfo("PFB");
 416   (void) UnregisterMagickInfo("PFA");
 417   (void) UnregisterMagickInfo("DFONT");
 418 }