arospdf/splash/SplashT1Font.cc

   1 //========================================================================
   2 //
   3 // SplashT1Font.cc
   4 //
   5 //========================================================================
   6
   7 #include <aconf.h>
   8
   9 #if HAVE_T1LIB_H
  10
  11 #ifdef USE_GCC_PRAGMAS
  12 #pragma implementation
  13 #endif
  14
  15 #include <stdlib.h>
  16 #include <t1lib.h>
  17 #include "gmem.h"
  18 #include "SplashMath.h"
  19 #include "SplashGlyphBitmap.h"
  20 #include "SplashPath.h"
  21 #include "SplashT1FontEngine.h"
  22 #include "SplashT1FontFile.h"
  23 #include "SplashT1Font.h"
  24
  25 //------------------------------------------------------------------------
  26
  27 static Guchar bitReverse[256] = {
  28   0x00, 0x80, 0x40, 0xc0, 0x20, 0xa0, 0x60, 0xe0,
  29   0x10, 0x90, 0x50, 0xd0, 0x30, 0xb0, 0x70, 0xf0,
  30   0x08, 0x88, 0x48, 0xc8, 0x28, 0xa8, 0x68, 0xe8,
  31   0x18, 0x98, 0x58, 0xd8, 0x38, 0xb8, 0x78, 0xf8,
  32   0x04, 0x84, 0x44, 0xc4, 0x24, 0xa4, 0x64, 0xe4,
  33   0x14, 0x94, 0x54, 0xd4, 0x34, 0xb4, 0x74, 0xf4,
  34   0x0c, 0x8c, 0x4c, 0xcc, 0x2c, 0xac, 0x6c, 0xec,
  35   0x1c, 0x9c, 0x5c, 0xdc, 0x3c, 0xbc, 0x7c, 0xfc,
  36   0x02, 0x82, 0x42, 0xc2, 0x22, 0xa2, 0x62, 0xe2,
  37   0x12, 0x92, 0x52, 0xd2, 0x32, 0xb2, 0x72, 0xf2,
  38   0x0a, 0x8a, 0x4a, 0xca, 0x2a, 0xaa, 0x6a, 0xea,
  39   0x1a, 0x9a, 0x5a, 0xda, 0x3a, 0xba, 0x7a, 0xfa,
  40   0x06, 0x86, 0x46, 0xc6, 0x26, 0xa6, 0x66, 0xe6,
  41   0x16, 0x96, 0x56, 0xd6, 0x36, 0xb6, 0x76, 0xf6,
  42   0x0e, 0x8e, 0x4e, 0xce, 0x2e, 0xae, 0x6e, 0xee,
  43   0x1e, 0x9e, 0x5e, 0xde, 0x3e, 0xbe, 0x7e, 0xfe,
  44   0x01, 0x81, 0x41, 0xc1, 0x21, 0xa1, 0x61, 0xe1,
  45   0x11, 0x91, 0x51, 0xd1, 0x31, 0xb1, 0x71, 0xf1,
  46   0x09, 0x89, 0x49, 0xc9, 0x29, 0xa9, 0x69, 0xe9,
  47   0x19, 0x99, 0x59, 0xd9, 0x39, 0xb9, 0x79, 0xf9,
  48   0x05, 0x85, 0x45, 0xc5, 0x25, 0xa5, 0x65, 0xe5,
  49   0x15, 0x95, 0x55, 0xd5, 0x35, 0xb5, 0x75, 0xf5,
  50   0x0d, 0x8d, 0x4d, 0xcd, 0x2d, 0xad, 0x6d, 0xed,
  51   0x1d, 0x9d, 0x5d, 0xdd, 0x3d, 0xbd, 0x7d, 0xfd,
  52   0x03, 0x83, 0x43, 0xc3, 0x23, 0xa3, 0x63, 0xe3,
  53   0x13, 0x93, 0x53, 0xd3, 0x33, 0xb3, 0x73, 0xf3,
  54   0x0b, 0x8b, 0x4b, 0xcb, 0x2b, 0xab, 0x6b, 0xeb,
  55   0x1b, 0x9b, 0x5b, 0xdb, 0x3b, 0xbb, 0x7b, 0xfb,
  56   0x07, 0x87, 0x47, 0xc7, 0x27, 0xa7, 0x67, 0xe7,
  57   0x17, 0x97, 0x57, 0xd7, 0x37, 0xb7, 0x77, 0xf7,
  58   0x0f, 0x8f, 0x4f, 0xcf, 0x2f, 0xaf, 0x6f, 0xef,
  59   0x1f, 0x9f, 0x5f, 0xdf, 0x3f, 0xbf, 0x7f, 0xff
  60 };
  61
  62 //------------------------------------------------------------------------
  63 // SplashT1Font
  64 //------------------------------------------------------------------------
  65
  66 SplashT1Font::SplashT1Font(SplashT1FontFile *fontFileA, SplashCoord *matA,
  67                            SplashCoord *textMatA):
  68   SplashFont(fontFileA, matA, textMatA, fontFileA->engine->aa)
  69 {
  70   T1_TMATRIX matrix;
  71   BBox bbox;
  72   SplashCoord bbx0, bby0, bbx1, bby1;
  73   int x, y;
  74
  75   t1libID = T1_CopyFont(fontFileA->t1libID);
  76   outlineID = -1;
  77
  78   // compute font size
  79   size = (float)splashSqrt(mat[2]*mat[2] + mat[3]*mat[3]);
  80
  81   // transform the four corners of the font bounding box -- the min
  82   // and max values form the bounding box of the transformed font
  83   bbox = T1_GetFontBBox(t1libID);
  84   bbx0 = 0.001 * bbox.llx;
  85   bby0 = 0.001 * bbox.lly;
  86   bbx1 = 0.001 * bbox.urx;
  87   bby1 = 0.001 * bbox.ury;
  88   // some fonts are completely broken, so we fake it (with values
  89   // large enough that most glyphs should fit)
  90   if (bbx0 == 0 && bby0 == 0 && bbx1 == 0 && bby1 == 0) {
  91     bbx0 = bby0 = -0.5;
  92     bbx1 = bby1 = 1.5;
  93   }
  94   x = (int)(mat[0] * bbx0 + mat[2] * bby0);
  95   xMin = xMax = x;
  96   y = (int)(mat[1] * bbx0 + mat[3] * bby0);
  97   yMin = yMax = y;
  98   x = (int)(mat[0] * bbx0 + mat[2] * bby1);
  99   if (x < xMin) {
 100     xMin = x;
 101   } else if (x > xMax) {
 102     xMax = x;
 103   }
 104   y = (int)(mat[1] * bbx0 + mat[3] * bby1);
 105   if (y < yMin) {
 106     yMin = y;
 107   } else if (y > yMax) {
 108     yMax = y;
 109   }
 110   x = (int)(mat[0] * bbx1 + mat[2] * bby0);
 111   if (x < xMin) {
 112     xMin = x;
 113   } else if (x > xMax) {
 114     xMax = x;
 115   }
 116   y = (int)(mat[1] * bbx1 + mat[3] * bby0);
 117   if (y < yMin) {
 118     yMin = y;
 119   } else if (y > yMax) {
 120     yMax = y;
 121   }
 122   x = (int)(mat[0] * bbx1 + mat[2] * bby1);
 123   if (x < xMin) {
 124     xMin = x;
 125   } else if (x > xMax) {
 126     xMax = x;
 127   }
 128   y = (int)(mat[1] * bbx1 + mat[3] * bby1);
 129   if (y < yMin) {
 130     yMin = y;
 131   } else if (y > yMax) {
 132     yMax = y;
 133   }
 134   // This is a kludge: some buggy PDF generators embed fonts with
 135   // zero bounding boxes.
 136   if (xMax == xMin) {
 137     xMin = 0;
 138     xMax = (int)size;
 139   }
 140   if (yMax == yMin) {
 141     yMin = 0;
 142     yMax = (int)(1.2 * size);
 143   }
 144   // Another kludge: an unusually large xMin or yMin coordinate is
 145   // probably wrong.
 146   if (xMin > 0) {
 147     xMin = 0;
 148   }
 149   if (yMin > 0) {
 150     yMin = 0;
 151   }
 152   // Another kludge: t1lib doesn't correctly handle fonts with
 153   // real (non-integer) bounding box coordinates.
 154   if (xMax - xMin > 5000) {
 155     xMin = 0;
 156     xMax = (int)size;
 157   }
 158   if (yMax - yMin > 5000) {
 159     yMin = 0;
 160     yMax = (int)(1.2 * size);
 161   }
 162
 163   // transform the font
 164   matrix.cxx = (double)mat[0] / size;
 165   matrix.cxy = (double)mat[1] / size;
 166   matrix.cyx = (double)mat[2] / size;
 167   matrix.cyy = (double)mat[3] / size;
 168   T1_TransformFont(t1libID, &matrix);
 169 }
 170
 171 SplashT1Font::~SplashT1Font() {
 172   T1_DeleteFont(t1libID);
 173   if (outlineID >= 0) {
 174     T1_DeleteFont(outlineID);
 175   }
 176 }
 177
 178 GBool SplashT1Font::getGlyph(int c, int xFrac, int yFrac,
 179                              SplashGlyphBitmap *bitmap) {
 180   return SplashFont::getGlyph(c, 0, 0, bitmap);
 181 }
 182
 183 GBool SplashT1Font::makeGlyph(int c, int xFrac, int yFrac,
 184                               SplashGlyphBitmap *bitmap) {
 185   GLYPH *glyph;
 186   int n, i;
 187
 188   if (aa) {
 189     glyph = T1_AASetChar(t1libID, c, size, NULL);
 190   } else {
 191     glyph = T1_SetChar(t1libID, c, size, NULL);
 192   }
 193   if (!glyph) {
 194     return gFalse;
 195   }
 196
 197   bitmap->x = -glyph->metrics.leftSideBearing;
 198   bitmap->y = glyph->metrics.ascent;
 199   bitmap->w = glyph->metrics.rightSideBearing - glyph->metrics.leftSideBearing;
 200   bitmap->h = glyph->metrics.ascent - glyph->metrics.descent;
 201   bitmap->aa = aa;
 202   if (aa) {
 203     bitmap->data = (Guchar *)glyph->bits;
 204     bitmap->freeData = gFalse;
 205   } else {
 206     n = bitmap->h * ((bitmap->w + 7) >> 3);
 207     bitmap->data = (Guchar *)gmalloc(n);
 208     for (i = 0; i < n; ++i) {
 209       bitmap->data[i] = bitReverse[glyph->bits[i] & 0xff];
 210     }
 211     bitmap->freeData = gTrue;
 212   }
 213
 214   return gTrue;
 215 }
 216
 217 SplashPath *SplashT1Font::getGlyphPath(int c) {
 218   T1_TMATRIX matrix;
 219   SplashPath *path;
 220   T1_OUTLINE *outline;
 221   T1_PATHSEGMENT *seg;
 222   T1_BEZIERSEGMENT *bez;
 223   SplashCoord x, y, x1, y1;
 224   GBool needClose;
 225
 226   if (outlineID < 0) {
 227     outlineID = T1_CopyFont(((SplashT1FontFile *)fontFile)->t1libID);
 228     outlineSize = (float)splashSqrt(textMat[2]*textMat[2] +
 229                                     textMat[3]*textMat[3]);
 230     matrix.cxx = (double)textMat[0] / outlineSize;
 231     matrix.cxy = (double)textMat[1] / outlineSize;
 232     matrix.cyx = (double)textMat[2] / outlineSize;
 233     matrix.cyy = (double)textMat[3] / outlineSize;
 234     // t1lib doesn't seem to handle small sizes correctly here, so set
 235     // the size to 1000, and scale the resulting coordinates later
 236     outlineMul = (float)(outlineSize / 65536000.0);
 237     outlineSize = 1000;
 238     T1_TransformFont(outlineID, &matrix);
 239   }
 240
 241   path = new SplashPath();
 242   if ((outline = T1_GetCharOutline(outlineID, c, outlineSize, NULL))) {
 243     x = 0;
 244     y = 0;
 245     needClose = gFalse;
 246     for (seg = outline; seg; seg = seg->link) {
 247       switch (seg->type) {
 248       case T1_PATHTYPE_MOVE:
 249         if (needClose) {
 250           path->close();
 251           needClose = gFalse;
 252         }
 253         x += seg->dest.x * outlineMul;
 254         y += seg->dest.y * outlineMul;
 255         path->moveTo(x, -y);
 256         break;
 257       case T1_PATHTYPE_LINE:
 258         x += seg->dest.x * outlineMul;
 259         y += seg->dest.y * outlineMul;
 260         path->lineTo(x, -y);
 261         needClose = gTrue;
 262         break;
 263       case T1_PATHTYPE_BEZIER:
 264         bez = (T1_BEZIERSEGMENT *)seg;
 265         x1 = x + (SplashCoord)(bez->dest.x * outlineMul);
 266         y1 = y + (SplashCoord)(bez->dest.y * outlineMul);
 267         path->curveTo(x + (SplashCoord)(bez->B.x * outlineMul),
 268                       -(y + (SplashCoord)(bez->B.y * outlineMul)),
 269                       x + (SplashCoord)(bez->C.x * outlineMul),
 270                       -(y + (SplashCoord)(bez->C.y * outlineMul)),
 271                       x1, -y1);
 272         x = x1;
 273         y = y1;
 274         needClose = gTrue;
 275         break;
 276       }
 277     }
 278     if (needClose) {
 279       path->close();
 280     }
 281     T1_FreeOutline(outline);
 282   }
 283
 284   return path;
 285 }
 286
 287 #endif // HAVE_T1LIB_H