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