4 * Copyright (C) 2011-2014 by Werner Lemberg.
6 * This file is part of the ttfautohint library, and may only be used,
7 * modified, and distributed under the terms given in `COPYING'. By
8 * continuing to use, modify, or distribute this file you indicate that you
9 * have read `COPYING' and understand and accept it fully.
11 * The file `COPYING' mentioned in the previous paragraph is distributed
12 * with the ttfautohint library.
16 /* originally file `afloader.c' (2011-Mar-28) from FreeType */
18 /* heavily modified 2011 by Werner Lemberg <wl@gnu.org> */
30 /* from file `ftobjs.h' (2011-Mar-28) from FreeType */
31 typedef struct FT_Slot_InternalRec_
33 TA_GlyphLoader loader
;
35 FT_Bool glyph_transformed
;
36 FT_Matrix glyph_matrix
;
37 FT_Vector glyph_delta
;
39 } FT_GlyphSlot_InternalRec
;
42 /* initialize glyph loader */
45 ta_loader_init(FONT
* font
)
47 TA_Loader loader
= font
->loader
;
50 memset(loader
, 0, sizeof (TA_LoaderRec
));
52 ta_glyph_hints_init(&loader
->hints
);
54 _ta_debug_hints
= &loader
->hints
;
56 return TA_GlyphLoader_New(&loader
->gloader
);
60 /* reset glyph loader and compute globals if necessary */
63 ta_loader_reset(FONT
* font
,
66 FT_Error error
= FT_Err_Ok
;
67 TA_Loader loader
= font
->loader
;
71 loader
->globals
= (TA_FaceGlobals
)face
->autohint
.data
;
73 TA_GlyphLoader_Rewind(loader
->gloader
);
75 if (loader
->globals
== NULL
)
77 error
= ta_face_globals_new(face
, &loader
->globals
, font
);
80 face
->autohint
.data
= (FT_Pointer
)loader
->globals
;
81 face
->autohint
.finalizer
= (FT_Generic_Finalizer
)ta_face_globals_free
;
89 /* finalize glyph loader */
92 ta_loader_done(FONT
* font
)
94 TA_Loader loader
= font
->loader
;
97 ta_glyph_hints_done(&loader
->hints
);
100 loader
->globals
= NULL
;
103 _ta_debug_hints
= NULL
;
105 TA_GlyphLoader_Done(loader
->gloader
);
106 loader
->gloader
= NULL
;
110 /* load a single glyph component; this routine calls itself recursively, */
111 /* if necessary, and does the main work of `ta_loader_load_glyph' */
114 ta_loader_load_g(TA_Loader loader
,
121 FT_Face face
= loader
->face
;
122 TA_GlyphLoader gloader
= loader
->gloader
;
123 TA_ScriptMetrics metrics
= loader
->metrics
;
124 TA_GlyphHints hints
= &loader
->hints
;
125 FT_GlyphSlot slot
= face
->glyph
;
127 FT_Slot_Internal internal
= slot
->internal
;
132 flags
= load_flags
| FT_LOAD_LINEAR_DESIGN
;
133 error
= FT_Load_Glyph(face
, glyph_index
, flags
);
138 loader
->transformed
= internal
->glyph_transformed
;
139 if (loader
->transformed
)
144 loader
->trans_matrix
= internal
->glyph_matrix
;
145 loader
->trans_delta
= internal
->glyph_delta
;
147 inverse
= loader
->trans_matrix
;
148 FT_Matrix_Invert(&inverse
);
149 FT_Vector_Transform(&loader
->trans_delta
, &inverse
);
153 switch (slot
->format
)
155 case FT_GLYPH_FORMAT_OUTLINE
:
156 /* translate the loaded glyph when an internal transform is needed */
157 if (loader
->transformed
)
158 FT_Outline_Translate(&slot
->outline
,
159 loader
->trans_delta
.x
,
160 loader
->trans_delta
.y
);
162 /* copy the outline points in the loader's current extra points */
163 /* which are used to keep original glyph coordinates */
164 error
= TA_GLYPHLOADER_CHECK_POINTS(gloader
,
165 slot
->outline
.n_points
+ 4,
166 slot
->outline
.n_contours
);
170 memcpy(gloader
->current
.outline
.points
,
171 slot
->outline
.points
,
172 slot
->outline
.n_points
* sizeof (FT_Vector
));
173 memcpy(gloader
->current
.outline
.contours
,
174 slot
->outline
.contours
,
175 slot
->outline
.n_contours
* sizeof (short));
176 memcpy(gloader
->current
.outline
.tags
,
178 slot
->outline
.n_points
* sizeof (char));
180 gloader
->current
.outline
.n_points
= slot
->outline
.n_points
;
181 gloader
->current
.outline
.n_contours
= slot
->outline
.n_contours
;
183 /* compute original horizontal phantom points */
184 /* (and ignore vertical ones) */
185 loader
->pp1
.x
= hints
->x_delta
;
186 loader
->pp1
.y
= hints
->y_delta
;
187 loader
->pp2
.x
= FT_MulFix(slot
->metrics
.horiAdvance
,
188 hints
->x_scale
) + hints
->x_delta
;
189 loader
->pp2
.y
= hints
->y_delta
;
191 /* be sure to check for spacing glyphs */
192 if (slot
->outline
.n_points
== 0)
195 /* now load the slot image into the auto-outline */
196 /* and run the automatic hinting process */
198 TA_WritingSystemClass writing_system_class
=
199 ta_writing_system_classes
200 [metrics
->script_class
->writing_system
];
203 if (writing_system_class
->script_hints_apply
)
204 writing_system_class
->script_hints_apply(hints
,
205 &gloader
->current
.outline
,
209 /* we now need to adjust the metrics according to the change in */
210 /* width/positioning that occurred during the hinting process */
211 if (scaler
->render_mode
!= FT_RENDER_MODE_LIGHT
)
213 FT_Pos old_rsb
, old_lsb
, new_lsb
;
214 FT_Pos pp1x_uh
, pp2x_uh
;
215 TA_AxisHints axis
= &hints
->axis
[TA_DIMENSION_HORZ
];
217 TA_Edge edge1
= axis
->edges
; /* leftmost edge */
218 TA_Edge edge2
= edge1
+ axis
->num_edges
- 1; /* rightmost edge */
221 if (axis
->num_edges
> 1 && TA_HINTS_DO_ADVANCE(hints
))
223 old_rsb
= loader
->pp2
.x
- edge2
->opos
;
224 old_lsb
= edge1
->opos
;
225 new_lsb
= edge1
->pos
;
227 /* remember unhinted values to later account */
228 /* for rounding errors */
229 pp1x_uh
= new_lsb
- old_lsb
;
230 pp2x_uh
= edge2
->pos
+ old_rsb
;
232 /* prefer too much space over too little space */
233 /* for very small sizes */
239 loader
->pp1
.x
= TA_PIX_ROUND(pp1x_uh
);
240 loader
->pp2
.x
= TA_PIX_ROUND(pp2x_uh
);
242 if (loader
->pp1
.x
>= new_lsb
245 if (loader
->pp2
.x
<= edge2
->pos
249 slot
->lsb_delta
= loader
->pp1
.x
- pp1x_uh
;
250 slot
->rsb_delta
= loader
->pp2
.x
- pp2x_uh
;
254 FT_Pos pp1x
= loader
->pp1
.x
;
255 FT_Pos pp2x
= loader
->pp2
.x
;
258 loader
->pp1
.x
= TA_PIX_ROUND(pp1x
);
259 loader
->pp2
.x
= TA_PIX_ROUND(pp2x
);
261 slot
->lsb_delta
= loader
->pp1
.x
- pp1x
;
262 slot
->rsb_delta
= loader
->pp2
.x
- pp2x
;
267 FT_Pos pp1x
= loader
->pp1
.x
;
268 FT_Pos pp2x
= loader
->pp2
.x
;
271 loader
->pp1
.x
= TA_PIX_ROUND(pp1x
+ hints
->xmin_delta
);
272 loader
->pp2
.x
= TA_PIX_ROUND(pp2x
+ hints
->xmax_delta
);
274 slot
->lsb_delta
= loader
->pp1
.x
- pp1x
;
275 slot
->rsb_delta
= loader
->pp2
.x
- pp2x
;
278 /* good, we simply add the glyph to our loader's base */
279 TA_GlyphLoader_Add(gloader
);
282 case FT_GLYPH_FORMAT_COMPOSITE
:
284 FT_UInt nn
, num_subglyphs
= slot
->num_subglyphs
;
285 FT_UInt num_base_subgs
, start_point
;
286 TA_SubGlyph subglyph
;
289 start_point
= gloader
->base
.outline
.n_points
;
291 /* first of all, copy the subglyph descriptors in the glyph loader */
292 error
= TA_GlyphLoader_CheckSubGlyphs(gloader
, num_subglyphs
);
296 memcpy(gloader
->current
.subglyphs
,
298 num_subglyphs
* sizeof (TA_SubGlyphRec
));
300 gloader
->current
.num_subglyphs
= num_subglyphs
;
301 num_base_subgs
= gloader
->base
.num_subglyphs
;
303 /* now read each subglyph independently */
304 for (nn
= 0; nn
< num_subglyphs
; nn
++)
308 FT_UInt num_points
, num_new_points
, num_base_points
;
311 /* gloader.current.subglyphs can change during glyph loading due */
312 /* to re-allocation -- we must recompute the current subglyph on */
314 subglyph
= gloader
->base
.subglyphs
+ num_base_subgs
+ nn
;
319 num_base_points
= gloader
->base
.outline
.n_points
;
321 error
= ta_loader_load_g(loader
, scaler
, subglyph
->index
,
322 load_flags
, depth
+ 1);
326 /* recompute subglyph pointer */
327 subglyph
= gloader
->base
.subglyphs
+ num_base_subgs
+ nn
;
329 if (subglyph
->flags
& FT_SUBGLYPH_FLAG_USE_MY_METRICS
)
340 num_points
= gloader
->base
.outline
.n_points
;
341 num_new_points
= num_points
- num_base_points
;
343 /* now perform the transformation required for this subglyph */
344 if (subglyph
->flags
& (FT_SUBGLYPH_FLAG_SCALE
345 | FT_SUBGLYPH_FLAG_XY_SCALE
346 | FT_SUBGLYPH_FLAG_2X2
))
348 FT_Vector
* cur
= gloader
->base
.outline
.points
+ num_base_points
;
349 FT_Vector
* limit
= cur
+ num_new_points
;
352 for (; cur
< limit
; cur
++)
353 FT_Vector_Transform(cur
, &subglyph
->transform
);
357 if (!(subglyph
->flags
& FT_SUBGLYPH_FLAG_ARGS_ARE_XY_VALUES
))
359 FT_Int k
= subglyph
->arg1
;
360 FT_UInt l
= subglyph
->arg2
;
365 if (start_point
+ k
>= num_base_points
366 || l
>= (FT_UInt
)num_new_points
)
368 error
= FT_Err_Invalid_Composite
;
372 l
+= num_base_points
;
374 /* for now, only use the current point coordinates; */
375 /* we eventually may consider another approach */
376 p1
= gloader
->base
.outline
.points
+ start_point
+ k
;
377 p2
= gloader
->base
.outline
.points
+ start_point
+ l
;
384 x
= FT_MulFix(subglyph
->arg1
, hints
->x_scale
) + hints
->x_delta
;
385 y
= FT_MulFix(subglyph
->arg2
, hints
->y_scale
) + hints
->y_delta
;
392 FT_Outline dummy
= gloader
->base
.outline
;
395 dummy
.points
+= num_base_points
;
396 dummy
.n_points
= (short)num_new_points
;
398 FT_Outline_Translate(&dummy
, x
, y
);
405 /* we don't support other formats (yet?) */
406 error
= FT_Err_Unimplemented_Feature
;
416 vvector
.x
= slot
->metrics
.vertBearingX
- slot
->metrics
.horiBearingX
;
417 vvector
.y
= slot
->metrics
.vertBearingY
- slot
->metrics
.horiBearingY
;
418 vvector
.x
= FT_MulFix(vvector
.x
, metrics
->scaler
.x_scale
);
419 vvector
.y
= FT_MulFix(vvector
.y
, metrics
->scaler
.y_scale
);
421 /* transform the hinted outline if needed */
422 if (loader
->transformed
)
424 FT_Outline_Transform(&gloader
->base
.outline
, &loader
->trans_matrix
);
425 FT_Vector_Transform(&vvector
, &loader
->trans_matrix
);
428 /* we must translate our final outline by -pp1.x */
429 /* and compute the new metrics */
431 FT_Outline_Translate(&gloader
->base
.outline
, -loader
->pp1
.x
, 0);
433 FT_Outline_Get_CBox(&gloader
->base
.outline
, &bbox
);
435 bbox
.xMin
= TA_PIX_FLOOR(bbox
.xMin
);
436 bbox
.yMin
= TA_PIX_FLOOR(bbox
.yMin
);
437 bbox
.xMax
= TA_PIX_CEIL(bbox
.xMax
);
438 bbox
.yMax
= TA_PIX_CEIL(bbox
.yMax
);
440 slot
->metrics
.width
= bbox
.xMax
- bbox
.xMin
;
441 slot
->metrics
.height
= bbox
.yMax
- bbox
.yMin
;
442 slot
->metrics
.horiBearingX
= bbox
.xMin
;
443 slot
->metrics
.horiBearingY
= bbox
.yMax
;
445 slot
->metrics
.vertBearingX
= TA_PIX_FLOOR(bbox
.xMin
+ vvector
.x
);
446 slot
->metrics
.vertBearingY
= TA_PIX_FLOOR(bbox
.yMax
+ vvector
.y
);
448 /* for mono-width fonts (like Andale, Courier, etc.) we need */
449 /* to keep the original rounded advance width; ditto for */
450 /* digits if all have the same advance width */
451 if (scaler
->render_mode
!= FT_RENDER_MODE_LIGHT
452 && (FT_IS_FIXED_WIDTH(slot
->face
)
453 || (ta_face_globals_is_digit(loader
->globals
, glyph_index
)
454 && metrics
->digits_have_same_width
)))
456 slot
->metrics
.horiAdvance
= FT_MulFix(slot
->metrics
.horiAdvance
,
457 metrics
->scaler
.x_scale
);
459 /* set delta values to 0, otherwise code that uses them */
460 /* is going to ruin the fixed advance width */
466 /* non-spacing glyphs must stay as-is */
467 if (slot
->metrics
.horiAdvance
)
468 slot
->metrics
.horiAdvance
= loader
->pp2
.x
- loader
->pp1
.x
;
471 slot
->metrics
.vertAdvance
= FT_MulFix(slot
->metrics
.vertAdvance
,
472 metrics
->scaler
.y_scale
);
474 slot
->metrics
.horiAdvance
= TA_PIX_ROUND(slot
->metrics
.horiAdvance
);
475 slot
->metrics
.vertAdvance
= TA_PIX_ROUND(slot
->metrics
.vertAdvance
);
478 /* now copy outline into glyph slot */
479 TA_GlyphLoader_Rewind(internal
->loader
);
480 error
= TA_GlyphLoader_CopyPoints(internal
->loader
, gloader
);
484 /* reassign all outline fields except flags to protect them */
485 slot
->outline
.n_contours
= internal
->loader
->base
.outline
.n_contours
;
486 slot
->outline
.n_points
= internal
->loader
->base
.outline
.n_points
;
487 slot
->outline
.points
= internal
->loader
->base
.outline
.points
;
488 slot
->outline
.tags
= internal
->loader
->base
.outline
.tags
;
489 slot
->outline
.contours
= internal
->loader
->base
.outline
.contours
;
491 slot
->format
= FT_GLYPH_FORMAT_OUTLINE
;
503 ta_loader_load_glyph(FONT
* font
,
509 FT_Size size
= face
->size
;
510 TA_Loader loader
= font
->loader
;
515 return FT_Err_Invalid_Argument
;
517 memset(&scaler
, 0, sizeof (TA_ScalerRec
));
520 scaler
.x_scale
= size
->metrics
.x_scale
;
521 scaler
.x_delta
= 0; /* XXX: TODO: add support for sub-pixel hinting */
522 scaler
.y_scale
= size
->metrics
.y_scale
;
523 scaler
.y_delta
= 0; /* XXX: TODO: add support for sub-pixel hinting */
525 scaler
.render_mode
= FT_LOAD_TARGET_MODE(load_flags
);
526 scaler
.flags
= 0; /* XXX: fix this */
528 /* XXX this is an ugly hack of ttfautohint: */
529 /* bit 29 triggers vertical hinting only */
530 if (load_flags
& (1 << 29))
531 scaler
.flags
|= TA_SCALER_FLAG_NO_HORIZONTAL
;
533 /* note that the fallback script can't be changed anymore */
534 /* after the first call of `ta_loader_load_glyph' */
535 error
= ta_loader_reset(font
, face
);
538 TA_ScriptMetrics metrics
;
539 FT_UInt options
= TA_SCRIPT_NONE
;
542 #ifdef FT_OPTION_AUTOFIT2
543 /* XXX: undocumented hook to activate the latin2 hinter */
544 if (load_flags
& (1UL << 20))
545 options
= TA_SCRIPT_LTN2
;
548 error
= ta_face_globals_get_metrics(loader
->globals
, gindex
,
552 TA_WritingSystemClass writing_system_class
=
553 ta_writing_system_classes
554 [metrics
->script_class
->writing_system
];
557 loader
->metrics
= metrics
;
559 if (writing_system_class
->script_metrics_scale
)
560 writing_system_class
->script_metrics_scale(metrics
, &scaler
);
562 metrics
->scaler
= scaler
;
564 load_flags
|= FT_LOAD_NO_SCALE
565 | FT_LOAD_IGNORE_TRANSFORM
;
566 load_flags
&= ~FT_LOAD_RENDER
;
568 if (writing_system_class
->script_hints_init
)
570 error
= writing_system_class
->script_hints_init(&loader
->hints
,
576 error
= ta_loader_load_g(loader
, &scaler
, gindex
, load_flags
, 0);
585 ta_loader_register_hints_recorder(TA_Loader loader
,
586 TA_Hints_Recorder hints_recorder
,
589 loader
->hints
.recorder
= hints_recorder
;
590 loader
->hints
.user
= user
;
593 /* end of taloader.c */