1 /***************************************************************************/
5 /* PostScript hinter global hinting management (body). */
6 /* Inspired by the new auto-hinter module. */
8 /* Copyright 2001, 2002, 2003, 2004, 2006 by */
9 /* David Turner, Robert Wilhelm, and Werner Lemberg. */
11 /* This file is part of the FreeType project, and may only be used */
12 /* modified and distributed under the terms of the FreeType project */
13 /* license, LICENSE.TXT. By continuing to use, modify, or distribute */
14 /* this file you indicate that you have read the license and */
15 /* understand and accept it fully. */
17 /***************************************************************************/
21 #include FT_FREETYPE_H
22 #include FT_INTERNAL_OBJECTS_H
26 PSH_Globals ps_debug_globals
= 0;
30 /*************************************************************************/
31 /*************************************************************************/
33 /***** STANDARD WIDTHS *****/
35 /*************************************************************************/
36 /*************************************************************************/
39 /* scale the widths/heights table */
41 psh_globals_scale_widths( PSH_Globals globals
,
44 PSH_Dimension dim
= &globals
->dimension
[direction
];
45 PSH_Widths stdw
= &dim
->stdw
;
46 FT_UInt count
= stdw
->count
;
47 PSH_Width width
= stdw
->widths
;
48 PSH_Width stand
= width
; /* standard width/height */
49 FT_Fixed scale
= dim
->scale_mult
;
54 width
->cur
= FT_MulFix( width
->org
, scale
);
55 width
->fit
= FT_PIX_ROUND( width
->cur
);
60 for ( ; count
> 0; count
--, width
++ )
65 w
= FT_MulFix( width
->org
, scale
);
66 dist
= w
- stand
->cur
;
75 width
->fit
= FT_PIX_ROUND( w
);
83 /* org_width is is font units, result in device pixels, 26.6 format */
84 FT_LOCAL_DEF( FT_Pos
)
85 psh_dimension_snap_width( PSH_Dimension dimension
,
89 FT_Pos width
= FT_MulFix( org_width
, dimension
->scale_mult
);
90 FT_Pos best
= 64 + 32 + 2;
91 FT_Pos reference
= width
;
94 for ( n
= 0; n
< dimension
->stdw
.count
; n
++ )
100 w
= dimension
->stdw
.widths
[n
].cur
;
111 if ( width
>= reference
)
114 if ( width
< reference
)
120 if ( width
> reference
)
130 /*************************************************************************/
131 /*************************************************************************/
133 /***** BLUE ZONES *****/
135 /*************************************************************************/
136 /*************************************************************************/
139 psh_blues_set_zones_0( PSH_Blues target
,
143 PSH_Blue_Table top_table
,
144 PSH_Blue_Table bot_table
)
146 FT_UInt count_top
= top_table
->count
;
147 FT_UInt count_bot
= bot_table
->count
;
153 for ( ; read_count
> 1; read_count
-= 2 )
155 FT_Int reference
, delta
;
157 PSH_Blue_Zone zones
, zone
;
161 /* read blue zone entry, and select target top/bottom zone */
163 if ( first
|| is_others
)
166 delta
= read
[0] - reference
;
168 zones
= bot_table
->zones
;
175 delta
= read
[1] - reference
;
177 zones
= top_table
->zones
;
182 /* insert into sorted table */
184 for ( ; count
> 0; count
--, zone
++ )
186 if ( reference
< zone
->org_ref
)
189 if ( reference
== zone
->org_ref
)
191 FT_Int delta0
= zone
->org_delta
;
194 /* we have two zones on the same reference position -- */
195 /* only keep the largest one */
198 if ( delta
< delta0
)
199 zone
->org_delta
= delta
;
203 if ( delta
> delta0
)
204 zone
->org_delta
= delta
;
210 for ( ; count
> 0; count
-- )
211 zone
[count
] = zone
[count
-1];
213 zone
->org_ref
= reference
;
214 zone
->org_delta
= delta
;
225 top_table
->count
= count_top
;
226 bot_table
->count
= count_bot
;
230 /* Re-read blue zones from the original fonts and store them into out */
231 /* private structure. This function re-orders, sanitizes and */
232 /* fuzz-expands the zones as well. */
234 psh_blues_set_zones( PSH_Blues target
,
237 FT_UInt count_others
,
238 FT_Short
* other_blues
,
242 PSH_Blue_Table top_table
, bot_table
;
243 FT_Int count_top
, count_bot
;
248 top_table
= &target
->family_top
;
249 bot_table
= &target
->family_bottom
;
253 top_table
= &target
->normal_top
;
254 bot_table
= &target
->normal_bottom
;
257 /* read the input blue zones, and build two sorted tables */
258 /* (one for the top zones, the other for the bottom zones) */
259 top_table
->count
= 0;
260 bot_table
->count
= 0;
262 /* first, the blues */
263 psh_blues_set_zones_0( target
, 0,
264 count
, blues
, top_table
, bot_table
);
265 psh_blues_set_zones_0( target
, 1,
266 count_others
, other_blues
, top_table
, bot_table
);
268 count_top
= top_table
->count
;
269 count_bot
= bot_table
->count
;
271 /* sanitize top table */
274 PSH_Blue_Zone zone
= top_table
->zones
;
277 for ( count
= count_top
; count
> 0; count
--, zone
++ )
284 delta
= zone
[1].org_ref
- zone
[0].org_ref
;
285 if ( zone
->org_delta
> delta
)
286 zone
->org_delta
= delta
;
289 zone
->org_bottom
= zone
->org_ref
;
290 zone
->org_top
= zone
->org_delta
+ zone
->org_ref
;
294 /* sanitize bottom table */
297 PSH_Blue_Zone zone
= bot_table
->zones
;
300 for ( count
= count_bot
; count
> 0; count
--, zone
++ )
307 delta
= zone
[0].org_ref
- zone
[1].org_ref
;
308 if ( zone
->org_delta
< delta
)
309 zone
->org_delta
= delta
;
312 zone
->org_top
= zone
->org_ref
;
313 zone
->org_bottom
= zone
->org_delta
+ zone
->org_ref
;
317 /* expand top and bottom tables with blue fuzz */
319 FT_Int dim
, top
, bot
, delta
;
323 zone
= top_table
->zones
;
326 for ( dim
= 1; dim
>= 0; dim
-- )
330 /* expand the bottom of the lowest zone normally */
331 zone
->org_bottom
-= fuzz
;
333 /* expand the top and bottom of intermediate zones; */
334 /* checking that the interval is smaller than the fuzz */
337 for ( count
--; count
> 0; count
-- )
339 bot
= zone
[1].org_bottom
;
342 if ( delta
< 2 * fuzz
)
343 zone
[0].org_top
= zone
[1].org_bottom
= top
+ delta
/ 2;
346 zone
[0].org_top
= top
+ fuzz
;
347 zone
[1].org_bottom
= bot
- fuzz
;
354 /* expand the top of the highest zone normally */
355 zone
->org_top
= top
+ fuzz
;
357 zone
= bot_table
->zones
;
364 /* reset the blues table when the device transform changes */
366 psh_blues_scale_zones( PSH_Blues blues
,
372 PSH_Blue_Table table
= 0;
375 /* Determine whether we need to suppress overshoots or */
376 /* not. We simply need to compare the vertical scale */
377 /* parameter to the raw bluescale value. Here is why: */
379 /* We need to suppress overshoots for all pointsizes. */
380 /* At 300dpi that satisfies: */
382 /* pointsize < 240*bluescale + 0.49 */
384 /* This corresponds to: */
386 /* pixelsize < 1000*bluescale + 49/24 */
388 /* scale*EM_Size < 1000*bluescale + 49/24 */
390 /* However, for normal Type 1 fonts, EM_Size is 1000! */
391 /* We thus only check: */
393 /* scale < bluescale + 49/24000 */
395 /* which we shorten to */
397 /* "scale < bluescale" */
399 /* Note that `blue_scale' is stored 1000 times its real */
400 /* value, and that `scale' converts from font units to */
401 /* fractional pixels. */
404 /* 1000 / 64 = 125 / 8 */
405 if ( scale
>= 0x20C49BAL
)
406 blues
->no_overshoots
= FT_BOOL( scale
< blues
->blue_scale
* 8 / 125 );
408 blues
->no_overshoots
= FT_BOOL( scale
* 125 < blues
->blue_scale
* 8 );
411 /* The blue threshold is the font units distance under */
412 /* which overshoots are suppressed due to the BlueShift */
413 /* even if the scale is greater than BlueScale. */
415 /* It is the smallest distance such that */
417 /* dist <= BlueShift && dist*scale <= 0.5 pixels */
420 FT_Int threshold
= blues
->blue_shift
;
423 while ( threshold
> 0 && FT_MulFix( threshold
, scale
) > 32 )
426 blues
->blue_threshold
= threshold
;
429 for ( num
= 0; num
< 4; num
++ )
437 table
= &blues
->normal_top
;
440 table
= &blues
->normal_bottom
;
443 table
= &blues
->family_top
;
446 table
= &blues
->family_bottom
;
451 count
= table
->count
;
452 for ( ; count
> 0; count
--, zone
++ )
454 zone
->cur_top
= FT_MulFix( zone
->org_top
, scale
) + delta
;
455 zone
->cur_bottom
= FT_MulFix( zone
->org_bottom
, scale
) + delta
;
456 zone
->cur_ref
= FT_MulFix( zone
->org_ref
, scale
) + delta
;
457 zone
->cur_delta
= FT_MulFix( zone
->org_delta
, scale
);
459 /* round scaled reference position */
460 zone
->cur_ref
= FT_PIX_ROUND( zone
->cur_ref
);
463 if ( zone
->cur_ref
> zone
->cur_top
)
465 else if ( zone
->cur_ref
< zone
->cur_bottom
)
471 /* process the families now */
473 for ( num
= 0; num
< 2; num
++ )
475 PSH_Blue_Zone zone1
, zone2
;
476 FT_UInt count1
, count2
;
477 PSH_Blue_Table normal
, family
;
483 normal
= &blues
->normal_top
;
484 family
= &blues
->family_top
;
488 normal
= &blues
->normal_bottom
;
489 family
= &blues
->family_bottom
;
492 zone1
= normal
->zones
;
493 count1
= normal
->count
;
495 for ( ; count1
> 0; count1
--, zone1
++ )
497 /* try to find a family zone whose reference position is less */
498 /* than 1 pixel far from the current zone */
499 zone2
= family
->zones
;
500 count2
= family
->count
;
502 for ( ; count2
> 0; count2
--, zone2
++ )
507 Delta
= zone1
->org_ref
- zone2
->org_ref
;
511 if ( FT_MulFix( Delta
, scale
) < 64 )
513 zone1
->cur_top
= zone2
->cur_top
;
514 zone1
->cur_bottom
= zone2
->cur_bottom
;
515 zone1
->cur_ref
= zone2
->cur_ref
;
516 zone1
->cur_delta
= zone2
->cur_delta
;
526 psh_blues_snap_stem( PSH_Blues blues
,
529 PSH_Alignment alignment
)
531 PSH_Blue_Table table
;
538 alignment
->align
= PSH_BLUE_ALIGN_NONE
;
540 no_shoots
= blues
->no_overshoots
;
542 /* look up stem top in top zones table */
543 table
= &blues
->normal_top
;
544 count
= table
->count
;
547 for ( ; count
> 0; count
--, zone
++ )
549 delta
= stem_top
- zone
->org_bottom
;
550 if ( delta
< -blues
->blue_fuzz
)
553 if ( stem_top
<= zone
->org_top
+ blues
->blue_fuzz
)
555 if ( no_shoots
|| delta
<= blues
->blue_threshold
)
557 alignment
->align
|= PSH_BLUE_ALIGN_TOP
;
558 alignment
->align_top
= zone
->cur_ref
;
564 /* look up stem bottom in bottom zones table */
565 table
= &blues
->normal_bottom
;
566 count
= table
->count
;
567 zone
= table
->zones
+ count
-1;
569 for ( ; count
> 0; count
--, zone
-- )
571 delta
= zone
->org_top
- stem_bot
;
572 if ( delta
< -blues
->blue_fuzz
)
575 if ( stem_bot
>= zone
->org_bottom
- blues
->blue_fuzz
)
577 if ( no_shoots
|| delta
< blues
->blue_threshold
)
579 alignment
->align
|= PSH_BLUE_ALIGN_BOT
;
580 alignment
->align_bot
= zone
->cur_ref
;
588 /*************************************************************************/
589 /*************************************************************************/
591 /***** GLOBAL HINTS *****/
593 /*************************************************************************/
594 /*************************************************************************/
597 psh_globals_destroy( PSH_Globals globals
)
604 memory
= globals
->memory
;
605 globals
->dimension
[0].stdw
.count
= 0;
606 globals
->dimension
[1].stdw
.count
= 0;
608 globals
->blues
.normal_top
.count
= 0;
609 globals
->blues
.normal_bottom
.count
= 0;
610 globals
->blues
.family_top
.count
= 0;
611 globals
->blues
.family_bottom
.count
= 0;
616 ps_debug_globals
= 0;
623 psh_globals_new( FT_Memory memory
,
625 PSH_Globals
*aglobals
)
631 if ( !FT_NEW( globals
) )
637 globals
->memory
= memory
;
639 /* copy standard widths */
641 PSH_Dimension dim
= &globals
->dimension
[1];
642 PSH_Width write
= dim
->stdw
.widths
;
645 write
->org
= priv
->standard_width
[0];
648 read
= priv
->snap_widths
;
649 for ( count
= priv
->num_snap_widths
; count
> 0; count
-- )
656 dim
->stdw
.count
= priv
->num_snap_widths
+ 1;
659 /* copy standard heights */
661 PSH_Dimension dim
= &globals
->dimension
[0];
662 PSH_Width write
= dim
->stdw
.widths
;
665 write
->org
= priv
->standard_height
[0];
667 read
= priv
->snap_heights
;
668 for ( count
= priv
->num_snap_heights
; count
> 0; count
-- )
675 dim
->stdw
.count
= priv
->num_snap_heights
+ 1;
678 /* copy blue zones */
679 psh_blues_set_zones( &globals
->blues
, priv
->num_blue_values
,
680 priv
->blue_values
, priv
->num_other_blues
,
681 priv
->other_blues
, priv
->blue_fuzz
, 0 );
683 psh_blues_set_zones( &globals
->blues
, priv
->num_family_blues
,
684 priv
->family_blues
, priv
->num_family_other_blues
,
685 priv
->family_other_blues
, priv
->blue_fuzz
, 1 );
687 globals
->blues
.blue_scale
= priv
->blue_scale
;
688 globals
->blues
.blue_shift
= priv
->blue_shift
;
689 globals
->blues
.blue_fuzz
= priv
->blue_fuzz
;
691 globals
->dimension
[0].scale_mult
= 0;
692 globals
->dimension
[0].scale_delta
= 0;
693 globals
->dimension
[1].scale_mult
= 0;
694 globals
->dimension
[1].scale_delta
= 0;
697 ps_debug_globals
= globals
;
706 FT_LOCAL_DEF( FT_Error
)
707 psh_globals_set_scale( PSH_Globals globals
,
713 PSH_Dimension dim
= &globals
->dimension
[0];
716 dim
= &globals
->dimension
[0];
717 if ( x_scale
!= dim
->scale_mult
||
718 x_delta
!= dim
->scale_delta
)
720 dim
->scale_mult
= x_scale
;
721 dim
->scale_delta
= x_delta
;
723 psh_globals_scale_widths( globals
, 0 );
726 dim
= &globals
->dimension
[1];
727 if ( y_scale
!= dim
->scale_mult
||
728 y_delta
!= dim
->scale_delta
)
730 dim
->scale_mult
= y_scale
;
731 dim
->scale_delta
= y_delta
;
733 psh_globals_scale_widths( globals
, 1 );
734 psh_blues_scale_zones( &globals
->blues
, y_scale
, y_delta
);
742 psh_globals_funcs_init( PSH_Globals_FuncsRec
* funcs
)
744 funcs
->create
= psh_globals_new
;
745 funcs
->set_scale
= psh_globals_set_scale
;
746 funcs
->destroy
= psh_globals_destroy
;