projects / reactos.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
history | raw | HEAD
[FREETYPE] Update to v2.6.3. CORE-10964
[reactos.git] / reactos / lib / 3rdparty / freetype / src / cff / cffobjs.c
1 /***************************************************************************/
2 /* */
3 /* cffobjs.c */
4 /* */
5 /* OpenType objects manager (body). */
6 /* */
7 /* Copyright 1996-2016 by */
8 /* David Turner, Robert Wilhelm, and Werner Lemberg. */
9 /* */
10 /* This file is part of the FreeType project, and may only be used, */
11 /* modified, and distributed under the terms of the FreeType project */
12 /* license, LICENSE.TXT. By continuing to use, modify, or distribute */
13 /* this file you indicate that you have read the license and */
14 /* understand and accept it fully. */
15 /* */
16 /***************************************************************************/
17
18
19 #include <ft2build.h>
20
21 #include FT_INTERNAL_DEBUG_H
22 #include FT_INTERNAL_CALC_H
23 #include FT_INTERNAL_STREAM_H
24 #include FT_ERRORS_H
25 #include FT_TRUETYPE_IDS_H
26 #include FT_TRUETYPE_TAGS_H
27 #include FT_INTERNAL_SFNT_H
28 #include FT_CFF_DRIVER_H
29
30 #include "cffobjs.h"
31 #include "cffload.h"
32 #include "cffcmap.h"
33 #include "cffpic.h"
34
35 #include "cfferrs.h"
36
37
38 /*************************************************************************/
39 /* */
40 /* The macro FT_COMPONENT is used in trace mode. It is an implicit */
41 /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
42 /* messages during execution. */
43 /* */
44 #undef FT_COMPONENT
45 #define FT_COMPONENT trace_cffobjs
46
47
48 /*************************************************************************/
49 /* */
50 /* SIZE FUNCTIONS */
51 /* */
52 /* Note that we store the global hints in the size's `internal' root */
53 /* field. */
54 /* */
55 /*************************************************************************/
56
57
58 static PSH_Globals_Funcs
59 cff_size_get_globals_funcs( CFF_Size size )
60 {
61 CFF_Face face = (CFF_Face)size->root.face;
62 CFF_Font font = (CFF_Font)face->extra.data;
63 PSHinter_Service pshinter = font->pshinter;
64 FT_Module module;
65
66
67 module = FT_Get_Module( size->root.face->driver->root.library,
68 "pshinter" );
69 return ( module && pshinter && pshinter->get_globals_funcs )
70 ? pshinter->get_globals_funcs( module )
71 : 0;
72 }
73
74
75 FT_LOCAL_DEF( void )
76 cff_size_done( FT_Size cffsize ) /* CFF_Size */
77 {
78 CFF_Size size = (CFF_Size)cffsize;
79 CFF_Face face = (CFF_Face)size->root.face;
80 CFF_Font font = (CFF_Font)face->extra.data;
81 CFF_Internal internal = (CFF_Internal)cffsize->internal;
82
83
84 if ( internal )
85 {
86 PSH_Globals_Funcs funcs;
87
88
89 funcs = cff_size_get_globals_funcs( size );
90 if ( funcs )
91 {
92 FT_UInt i;
93
94
95 funcs->destroy( internal->topfont );
96
97 for ( i = font->num_subfonts; i > 0; i-- )
98 funcs->destroy( internal->subfonts[i - 1] );
99 }
100
101 /* `internal' is freed by destroy_size (in ftobjs.c) */
102 }
103 }
104
105
106 /* CFF and Type 1 private dictionaries have slightly different */
107 /* structures; we need to synthesize a Type 1 dictionary on the fly */
108
109 static void
110 cff_make_private_dict( CFF_SubFont subfont,
111 PS_Private priv )
112 {
113 CFF_Private cpriv = &subfont->private_dict;
114 FT_UInt n, count;
115
116
117 FT_MEM_ZERO( priv, sizeof ( *priv ) );
118
119 count = priv->num_blue_values = cpriv->num_blue_values;
120 for ( n = 0; n < count; n++ )
121 priv->blue_values[n] = (FT_Short)cpriv->blue_values[n];
122
123 count = priv->num_other_blues = cpriv->num_other_blues;
124 for ( n = 0; n < count; n++ )
125 priv->other_blues[n] = (FT_Short)cpriv->other_blues[n];
126
127 count = priv->num_family_blues = cpriv->num_family_blues;
128 for ( n = 0; n < count; n++ )
129 priv->family_blues[n] = (FT_Short)cpriv->family_blues[n];
130
131 count = priv->num_family_other_blues = cpriv->num_family_other_blues;
132 for ( n = 0; n < count; n++ )
133 priv->family_other_blues[n] = (FT_Short)cpriv->family_other_blues[n];
134
135 priv->blue_scale = cpriv->blue_scale;
136 priv->blue_shift = (FT_Int)cpriv->blue_shift;
137 priv->blue_fuzz = (FT_Int)cpriv->blue_fuzz;
138
139 priv->standard_width[0] = (FT_UShort)cpriv->standard_width;
140 priv->standard_height[0] = (FT_UShort)cpriv->standard_height;
141
142 count = priv->num_snap_widths = cpriv->num_snap_widths;
143 for ( n = 0; n < count; n++ )
144 priv->snap_widths[n] = (FT_Short)cpriv->snap_widths[n];
145
146 count = priv->num_snap_heights = cpriv->num_snap_heights;
147 for ( n = 0; n < count; n++ )
148 priv->snap_heights[n] = (FT_Short)cpriv->snap_heights[n];
149
150 priv->force_bold = cpriv->force_bold;
151 priv->language_group = cpriv->language_group;
152 priv->lenIV = cpriv->lenIV;
153 }
154
155
156 FT_LOCAL_DEF( FT_Error )
157 cff_size_init( FT_Size cffsize ) /* CFF_Size */
158 {
159 CFF_Size size = (CFF_Size)cffsize;
160 FT_Error error = FT_Err_Ok;
161 PSH_Globals_Funcs funcs = cff_size_get_globals_funcs( size );
162
163
164 if ( funcs )
165 {
166 CFF_Face face = (CFF_Face)cffsize->face;
167 CFF_Font font = (CFF_Font)face->extra.data;
168 CFF_Internal internal = NULL;
169
170 PS_PrivateRec priv;
171 FT_Memory memory = cffsize->face->memory;
172
173 FT_UInt i;
174
175
176 if ( FT_NEW( internal ) )
177 goto Exit;
178
179 cff_make_private_dict( &font->top_font, &priv );
180 error = funcs->create( cffsize->face->memory, &priv,
181 &internal->topfont );
182 if ( error )
183 goto Exit;
184
185 for ( i = font->num_subfonts; i > 0; i-- )
186 {
187 CFF_SubFont sub = font->subfonts[i - 1];
188
189
190 cff_make_private_dict( sub, &priv );
191 error = funcs->create( cffsize->face->memory, &priv,
192 &internal->subfonts[i - 1] );
193 if ( error )
194 goto Exit;
195 }
196
197 cffsize->internal = (FT_Size_Internal)(void*)internal;
198 }
199
200 size->strike_index = 0xFFFFFFFFUL;
201
202 Exit:
203 return error;
204 }
205
206
207 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
208
209 FT_LOCAL_DEF( FT_Error )
210 cff_size_select( FT_Size size,
211 FT_ULong strike_index )
212 {
213 CFF_Size cffsize = (CFF_Size)size;
214 PSH_Globals_Funcs funcs;
215
216
217 cffsize->strike_index = strike_index;
218
219 FT_Select_Metrics( size->face, strike_index );
220
221 funcs = cff_size_get_globals_funcs( cffsize );
222
223 if ( funcs )
224 {
225 CFF_Face face = (CFF_Face)size->face;
226 CFF_Font font = (CFF_Font)face->extra.data;
227 CFF_Internal internal = (CFF_Internal)size->internal;
228
229 FT_Long top_upm = (FT_Long)font->top_font.font_dict.units_per_em;
230 FT_UInt i;
231
232
233 funcs->set_scale( internal->topfont,
234 size->metrics.x_scale, size->metrics.y_scale,
235 0, 0 );
236
237 for ( i = font->num_subfonts; i > 0; i-- )
238 {
239 CFF_SubFont sub = font->subfonts[i - 1];
240 FT_Long sub_upm = (FT_Long)sub->font_dict.units_per_em;
241 FT_Pos x_scale, y_scale;
242
243
244 if ( top_upm != sub_upm )
245 {
246 x_scale = FT_MulDiv( size->metrics.x_scale, top_upm, sub_upm );
247 y_scale = FT_MulDiv( size->metrics.y_scale, top_upm, sub_upm );
248 }
249 else
250 {
251 x_scale = size->metrics.x_scale;
252 y_scale = size->metrics.y_scale;
253 }
254
255 funcs->set_scale( internal->subfonts[i - 1],
256 x_scale, y_scale, 0, 0 );
257 }
258 }
259
260 return FT_Err_Ok;
261 }
262
263 #endif /* TT_CONFIG_OPTION_EMBEDDED_BITMAPS */
264
265
266 FT_LOCAL_DEF( FT_Error )
267 cff_size_request( FT_Size size,
268 FT_Size_Request req )
269 {
270 CFF_Size cffsize = (CFF_Size)size;
271 PSH_Globals_Funcs funcs;
272
273
274 #ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
275
276 if ( FT_HAS_FIXED_SIZES( size->face ) )
277 {
278 CFF_Face cffface = (CFF_Face)size->face;
279 SFNT_Service sfnt = (SFNT_Service)cffface->sfnt;
280 FT_ULong strike_index;
281
282
283 if ( sfnt->set_sbit_strike( cffface, req, &strike_index ) )
284 cffsize->strike_index = 0xFFFFFFFFUL;
285 else
286 return cff_size_select( size, strike_index );
287 }
288
289 #endif /* TT_CONFIG_OPTION_EMBEDDED_BITMAPS */
290
291 FT_Request_Metrics( size->face, req );
292
293 funcs = cff_size_get_globals_funcs( cffsize );
294
295 if ( funcs )
296 {
297 CFF_Face cffface = (CFF_Face)size->face;
298 CFF_Font font = (CFF_Font)cffface->extra.data;
299 CFF_Internal internal = (CFF_Internal)size->internal;
300
301 FT_Long top_upm = (FT_Long)font->top_font.font_dict.units_per_em;
302 FT_UInt i;
303
304
305 funcs->set_scale( internal->topfont,
306 size->metrics.x_scale, size->metrics.y_scale,
307 0, 0 );
308
309 for ( i = font->num_subfonts; i > 0; i-- )
310 {
311 CFF_SubFont sub = font->subfonts[i - 1];
312 FT_Long sub_upm = (FT_Long)sub->font_dict.units_per_em;
313 FT_Pos x_scale, y_scale;
314
315
316 if ( top_upm != sub_upm )
317 {
318 x_scale = FT_MulDiv( size->metrics.x_scale, top_upm, sub_upm );
319 y_scale = FT_MulDiv( size->metrics.y_scale, top_upm, sub_upm );
320 }
321 else
322 {
323 x_scale = size->metrics.x_scale;
324 y_scale = size->metrics.y_scale;
325 }
326
327 funcs->set_scale( internal->subfonts[i - 1],
328 x_scale, y_scale, 0, 0 );
329 }
330 }
331
332 return FT_Err_Ok;
333 }
334
335
336 /*************************************************************************/
337 /* */
338 /* SLOT FUNCTIONS */
339 /* */
340 /*************************************************************************/
341
342 FT_LOCAL_DEF( void )
343 cff_slot_done( FT_GlyphSlot slot )
344 {
345 slot->internal->glyph_hints = NULL;
346 }
347
348
349 FT_LOCAL_DEF( FT_Error )
350 cff_slot_init( FT_GlyphSlot slot )
351 {
352 CFF_Face face = (CFF_Face)slot->face;
353 CFF_Font font = (CFF_Font)face->extra.data;
354 PSHinter_Service pshinter = font->pshinter;
355
356
357 if ( pshinter )
358 {
359 FT_Module module;
360
361
362 module = FT_Get_Module( slot->face->driver->root.library,
363 "pshinter" );
364 if ( module )
365 {
366 T2_Hints_Funcs funcs;
367
368
369 funcs = pshinter->get_t2_funcs( module );
370 slot->internal->glyph_hints = (void*)funcs;
371 }
372 }
373
374 return FT_Err_Ok;
375 }
376
377
378 /*************************************************************************/
379 /* */
380 /* FACE FUNCTIONS */
381 /* */
382 /*************************************************************************/
383
384 static FT_String*
385 cff_strcpy( FT_Memory memory,
386 const FT_String* source )
387 {
388 FT_Error error;
389 FT_String* result;
390
391
392 (void)FT_STRDUP( result, source );
393
394 FT_UNUSED( error );
395
396 return result;
397 }
398
399
400 /* Strip all subset prefixes of the form `ABCDEF+'. Usually, there */
401 /* is only one, but font names like `APCOOG+JFABTD+FuturaBQ-Bold' */
402 /* have been seen in the wild. */
403
404 static void
405 remove_subset_prefix( FT_String* name )
406 {
407 FT_Int32 idx = 0;
408 FT_Int32 length = (FT_Int32)strlen( name ) + 1;
409 FT_Bool continue_search = 1;
410
411
412 while ( continue_search )
413 {
414 if ( length >= 7 && name[6] == '+' )
415 {
416 for ( idx = 0; idx < 6; idx++ )
417 {
418 /* ASCII uppercase letters */
419 if ( !( 'A' <= name[idx] && name[idx] <= 'Z' ) )
420 continue_search = 0;
421 }
422
423 if ( continue_search )
424 {
425 for ( idx = 7; idx < length; idx++ )
426 name[idx - 7] = name[idx];
427 length -= 7;
428 }
429 }
430 else
431 continue_search = 0;
432 }
433 }
434
435
436 /* Remove the style part from the family name (if present). */
437
438 static void
439 remove_style( FT_String* family_name,
440 const FT_String* style_name )
441 {
442 FT_Int32 family_name_length, style_name_length;
443
444
445 family_name_length = (FT_Int32)strlen( family_name );
446 style_name_length = (FT_Int32)strlen( style_name );
447
448 if ( family_name_length > style_name_length )
449 {
450 FT_Int idx;
451
452
453 for ( idx = 1; idx <= style_name_length; ++idx )
454 {
455 if ( family_name[family_name_length - idx] !=
456 style_name[style_name_length - idx] )
457 break;
458 }
459
460 if ( idx > style_name_length )
461 {
462 /* family_name ends with style_name; remove it */
463 idx = family_name_length - style_name_length - 1;
464
465 /* also remove special characters */
466 /* between real family name and style */
467 while ( idx > 0 &&
468 ( family_name[idx] == '-' ||
469 family_name[idx] == ' ' ||
470 family_name[idx] == '_' ||
471 family_name[idx] == '+' ) )
472 --idx;
473
474 if ( idx > 0 )
475 family_name[idx + 1] = '\0';
476 }
477 }
478 }
479
480
481 FT_LOCAL_DEF( FT_Error )
482 cff_face_init( FT_Stream stream,
483 FT_Face cffface, /* CFF_Face */
484 FT_Int face_index,
485 FT_Int num_params,
486 FT_Parameter* params )
487 {
488 CFF_Face face = (CFF_Face)cffface;
489 FT_Error error;
490 SFNT_Service sfnt;
491 FT_Service_PsCMaps psnames;
492 PSHinter_Service pshinter;
493 FT_Bool pure_cff = 1;
494 FT_Bool sfnt_format = 0;
495 FT_Library library = cffface->driver->root.library;
496
497
498 sfnt = (SFNT_Service)FT_Get_Module_Interface(
499 library, "sfnt" );
500 if ( !sfnt )
501 {
502 FT_ERROR(( "cff_face_init: cannot access `sfnt' module\n" ));
503 error = FT_THROW( Missing_Module );
504 goto Exit;
505 }
506
507 FT_FACE_FIND_GLOBAL_SERVICE( face, psnames, POSTSCRIPT_CMAPS );
508
509 pshinter = (PSHinter_Service)FT_Get_Module_Interface(
510 library, "pshinter" );
511
512 FT_TRACE2(( "CFF driver\n" ));
513
514 /* create input stream from resource */
515 if ( FT_STREAM_SEEK( 0 ) )
516 goto Exit;
517
518 /* check whether we have a valid OpenType file */
519 error = sfnt->init_face( stream, face, face_index, num_params, params );
520 if ( !error )
521 {
522 if ( face->format_tag != TTAG_OTTO ) /* `OTTO'; OpenType/CFF font */
523 {
524 FT_TRACE2(( " not an OpenType/CFF font\n" ));
525 error = FT_THROW( Unknown_File_Format );
526 goto Exit;
527 }
528
529 /* if we are performing a simple font format check, exit immediately */
530 if ( face_index < 0 )
531 return FT_Err_Ok;
532
533 sfnt_format = 1;
534
535 /* now, the font can be either an OpenType/CFF font, or an SVG CEF */
536 /* font; in the latter case it doesn't have a `head' table */
537 error = face->goto_table( face, TTAG_head, stream, 0 );
538 if ( !error )
539 {
540 pure_cff = 0;
541
542 /* load font directory */
543 error = sfnt->load_face( stream, face, face_index,
544 num_params, params );
545 if ( error )
546 goto Exit;
547 }
548 else
549 {
550 /* load the `cmap' table explicitly */
551 error = sfnt->load_cmap( face, stream );
552 if ( error )
553 goto Exit;
554 }
555
556 /* now load the CFF part of the file */
557 error = face->goto_table( face, TTAG_CFF, stream, 0 );
558 if ( error )
559 goto Exit;
560 }
561 else
562 {
563 /* rewind to start of file; we are going to load a pure-CFF font */
564 if ( FT_STREAM_SEEK( 0 ) )
565 goto Exit;
566 error = FT_Err_Ok;
567 }
568
569 /* now load and parse the CFF table in the file */
570 {
571 CFF_Font cff = NULL;
572 CFF_FontRecDict dict;
573 FT_Memory memory = cffface->memory;
574 FT_Int32 flags;
575 FT_UInt i;
576
577
578 if ( FT_NEW( cff ) )
579 goto Exit;
580
581 face->extra.data = cff;
582 error = cff_font_load( library, stream, face_index, cff, pure_cff );
583 if ( error )
584 goto Exit;
585
586 /* if we are performing a simple font format check, exit immediately */
587 /* (this is here for pure CFF) */
588 if ( face_index < 0 )
589 {
590 cffface->num_faces = (FT_Long)cff->num_faces;
591 return FT_Err_Ok;
592 }
593
594 cff->pshinter = pshinter;
595 cff->psnames = psnames;
596
597 cffface->face_index = face_index & 0xFFFF;
598
599 /* Complement the root flags with some interesting information. */
600 /* Note that this is only necessary for pure CFF and CEF fonts; */
601 /* SFNT based fonts use the `name' table instead. */
602
603 cffface->num_glyphs = (FT_Long)cff->num_glyphs;
604
605 dict = &cff->top_font.font_dict;
606
607 /* we need the `PSNames' module for CFF and CEF formats */
608 /* which aren't CID-keyed */
609 if ( dict->cid_registry == 0xFFFFU && !psnames )
610 {
611 FT_ERROR(( "cff_face_init:"
612 " cannot open CFF & CEF fonts\n"
613 " "
614 " without the `PSNames' module\n" ));
615 error = FT_THROW( Missing_Module );
616 goto Exit;
617 }
618
619 #ifdef FT_DEBUG_LEVEL_TRACE
620 {
621 FT_UInt idx;
622 FT_String* s;
623
624
625 FT_TRACE4(( "SIDs\n" ));
626
627 /* dump string index, including default strings for convenience */
628 for ( idx = 0; idx < cff->num_strings + 390; idx++ )
629 {
630 s = cff_index_get_sid_string( cff, idx );
631 if ( s )
632 FT_TRACE4((" %5d %s\n", idx, s ));
633 }
634 }
635 #endif /* FT_DEBUG_LEVEL_TRACE */
636
637 if ( !dict->has_font_matrix )
638 dict->units_per_em = pure_cff ? 1000 : face->root.units_per_EM;
639
640 /* Normalize the font matrix so that `matrix->yy' is 1; the */
641 /* scaling is done with `units_per_em' then (at this point, */
642 /* it already contains the scaling factor, but without */
643 /* normalization of the matrix). */
644 /* */
645 /* Note that the offsets must be expressed in integer font */
646 /* units. */
647
648 {
649 FT_Matrix* matrix = &dict->font_matrix;
650 FT_Vector* offset = &dict->font_offset;
651 FT_ULong* upm = &dict->units_per_em;
652 FT_Fixed temp = FT_ABS( matrix->yy );
653
654
655 if ( temp != 0x10000L )
656 {
657 *upm = (FT_ULong)FT_DivFix( (FT_Long)*upm, temp );
658
659 matrix->xx = FT_DivFix( matrix->xx, temp );
660 matrix->yx = FT_DivFix( matrix->yx, temp );
661 matrix->xy = FT_DivFix( matrix->xy, temp );
662 matrix->yy = FT_DivFix( matrix->yy, temp );
663 offset->x = FT_DivFix( offset->x, temp );
664 offset->y = FT_DivFix( offset->y, temp );
665 }
666
667 offset->x >>= 16;
668 offset->y >>= 16;
669 }
670
671 for ( i = cff->num_subfonts; i > 0; i-- )
672 {
673 CFF_FontRecDict sub = &cff->subfonts[i - 1]->font_dict;
674 CFF_FontRecDict top = &cff->top_font.font_dict;
675
676 FT_Matrix* matrix;
677 FT_Vector* offset;
678 FT_ULong* upm;
679 FT_Fixed temp;
680
681
682 if ( sub->has_font_matrix )
683 {
684 FT_Long scaling;
685
686
687 /* if we have a top-level matrix, */
688 /* concatenate the subfont matrix */
689
690 if ( top->has_font_matrix )
691 {
692 if ( top->units_per_em > 1 && sub->units_per_em > 1 )
693 scaling = (FT_Long)FT_MIN( top->units_per_em,
694 sub->units_per_em );
695 else
696 scaling = 1;
697
698 FT_Matrix_Multiply_Scaled( &top->font_matrix,
699 &sub->font_matrix,
700 scaling );
701 FT_Vector_Transform_Scaled( &sub->font_offset,
702 &top->font_matrix,
703 scaling );
704
705 sub->units_per_em = (FT_ULong)
706 FT_MulDiv( (FT_Long)sub->units_per_em,
707 (FT_Long)top->units_per_em,
708 scaling );
709 }
710 }
711 else
712 {
713 sub->font_matrix = top->font_matrix;
714 sub->font_offset = top->font_offset;
715
716 sub->units_per_em = top->units_per_em;
717 }
718
719 matrix = &sub->font_matrix;
720 offset = &sub->font_offset;
721 upm = &sub->units_per_em;
722 temp = FT_ABS( matrix->yy );
723
724 if ( temp != 0x10000L )
725 {
726 *upm = (FT_ULong)FT_DivFix( (FT_Long)*upm, temp );
727
728 matrix->xx = FT_DivFix( matrix->xx, temp );
729 matrix->yx = FT_DivFix( matrix->yx, temp );
730 matrix->xy = FT_DivFix( matrix->xy, temp );
731 matrix->yy = FT_DivFix( matrix->yy, temp );
732 offset->x = FT_DivFix( offset->x, temp );
733 offset->y = FT_DivFix( offset->y, temp );
734 }
735
736 offset->x >>= 16;
737 offset->y >>= 16;
738 }
739
740 if ( pure_cff )
741 {
742 char* style_name = NULL;
743
744
745 /* set up num_faces */
746 cffface->num_faces = (FT_Long)cff->num_faces;
747
748 /* compute number of glyphs */
749 if ( dict->cid_registry != 0xFFFFU )
750 cffface->num_glyphs = (FT_Long)( cff->charset.max_cid + 1 );
751 else
752 cffface->num_glyphs = (FT_Long)cff->charstrings_index.count;
753
754 /* set global bbox, as well as EM size */
755 cffface->bbox.xMin = dict->font_bbox.xMin >> 16;
756 cffface->bbox.yMin = dict->font_bbox.yMin >> 16;
757 /* no `U' suffix here to 0xFFFF! */
758 cffface->bbox.xMax = ( dict->font_bbox.xMax + 0xFFFF ) >> 16;
759 cffface->bbox.yMax = ( dict->font_bbox.yMax + 0xFFFF ) >> 16;
760
761 cffface->units_per_EM = (FT_UShort)( dict->units_per_em );
762
763 cffface->ascender = (FT_Short)( cffface->bbox.yMax );
764 cffface->descender = (FT_Short)( cffface->bbox.yMin );
765
766 cffface->height = (FT_Short)( ( cffface->units_per_EM * 12 ) / 10 );
767 if ( cffface->height < cffface->ascender - cffface->descender )
768 cffface->height = (FT_Short)( cffface->ascender - cffface->descender );
769
770 cffface->underline_position =
771 (FT_Short)( dict->underline_position >> 16 );
772 cffface->underline_thickness =
773 (FT_Short)( dict->underline_thickness >> 16 );
774
775 /* retrieve font family & style name */
776 cffface->family_name = cff_index_get_name(
777 cff,
778 (FT_UInt)( face_index & 0xFFFF ) );
779 if ( cffface->family_name )
780 {
781 char* full = cff_index_get_sid_string( cff,
782 dict->full_name );
783 char* fullp = full;
784 char* family = cffface->family_name;
785 char* family_name = NULL;
786
787
788 remove_subset_prefix( cffface->family_name );
789
790 if ( dict->family_name )
791 {
792 family_name = cff_index_get_sid_string( cff,
793 dict->family_name );
794 if ( family_name )
795 family = family_name;
796 }
797
798 /* We try to extract the style name from the full name. */
799 /* We need to ignore spaces and dashes during the search. */
800 if ( full && family )
801 {
802 while ( *fullp )
803 {
804 /* skip common characters at the start of both strings */
805 if ( *fullp == *family )
806 {
807 family++;
808 fullp++;
809 continue;
810 }
811
812 /* ignore spaces and dashes in full name during comparison */
813 if ( *fullp == ' ' || *fullp == '-' )
814 {
815 fullp++;
816 continue;
817 }
818
819 /* ignore spaces and dashes in family name during comparison */
820 if ( *family == ' ' || *family == '-' )
821 {
822 family++;
823 continue;
824 }
825
826 if ( !*family && *fullp )
827 {
828 /* The full name begins with the same characters as the */
829 /* family name, with spaces and dashes removed. In this */
830 /* case, the remaining string in `fullp' will be used as */
831 /* the style name. */
832 style_name = cff_strcpy( memory, fullp );
833
834 /* remove the style part from the family name (if present) */
835 remove_style( cffface->family_name, style_name );
836 }
837 break;
838 }
839 }
840 }
841 else
842 {
843 char *cid_font_name =
844 cff_index_get_sid_string( cff,
845 dict->cid_font_name );
846
847
848 /* do we have a `/FontName' for a CID-keyed font? */
849 if ( cid_font_name )
850 cffface->family_name = cff_strcpy( memory, cid_font_name );
851 }
852
853 if ( style_name )
854 cffface->style_name = style_name;
855 else
856 /* assume "Regular" style if we don't know better */
857 cffface->style_name = cff_strcpy( memory, (char *)"Regular" );
858
859 /*******************************************************************/
860 /* */
861 /* Compute face flags. */
862 /* */
863 flags = FT_FACE_FLAG_SCALABLE | /* scalable outlines */
864 FT_FACE_FLAG_HORIZONTAL | /* horizontal data */
865 FT_FACE_FLAG_HINTER; /* has native hinter */
866
867 if ( sfnt_format )
868 flags |= FT_FACE_FLAG_SFNT;
869
870 /* fixed width font? */
871 if ( dict->is_fixed_pitch )
872 flags |= FT_FACE_FLAG_FIXED_WIDTH;
873
874 /* XXX: WE DO NOT SUPPORT KERNING METRICS IN THE GPOS TABLE FOR NOW */
875 #if 0
876 /* kerning available? */
877 if ( face->kern_pairs )
878 flags |= FT_FACE_FLAG_KERNING;
879 #endif
880
881 cffface->face_flags |= flags;
882
883 /*******************************************************************/
884 /* */
885 /* Compute style flags. */
886 /* */
887 flags = 0;
888
889 if ( dict->italic_angle )
890 flags |= FT_STYLE_FLAG_ITALIC;
891
892 {
893 char *weight = cff_index_get_sid_string( cff,
894 dict->weight );
895
896
897 if ( weight )
898 if ( !ft_strcmp( weight, "Bold" ) ||
899 !ft_strcmp( weight, "Black" ) )
900 flags |= FT_STYLE_FLAG_BOLD;
901 }
902
903 /* double check */
904 if ( !(flags & FT_STYLE_FLAG_BOLD) && cffface->style_name )
905 if ( !ft_strncmp( cffface->style_name, "Bold", 4 ) ||
906 !ft_strncmp( cffface->style_name, "Black", 5 ) )
907 flags |= FT_STYLE_FLAG_BOLD;
908
909 cffface->style_flags = flags;
910 }
911
912
913 #ifndef FT_CONFIG_OPTION_NO_GLYPH_NAMES
914 /* CID-keyed CFF fonts don't have glyph names -- the SFNT loader */
915 /* has unset this flag because of the 3.0 `post' table. */
916 if ( dict->cid_registry == 0xFFFFU )
917 cffface->face_flags |= FT_FACE_FLAG_GLYPH_NAMES;
918 #endif
919
920 if ( dict->cid_registry != 0xFFFFU && pure_cff )
921 cffface->face_flags |= FT_FACE_FLAG_CID_KEYED;
922
923
924 /*******************************************************************/
925 /* */
926 /* Compute char maps. */
927 /* */
928
929 /* Try to synthesize a Unicode charmap if there is none available */
930 /* already. If an OpenType font contains a Unicode "cmap", we */
931 /* will use it, whatever be in the CFF part of the file. */
932 {
933 FT_CharMapRec cmaprec;
934 FT_CharMap cmap;
935 FT_UInt nn;
936 CFF_Encoding encoding = &cff->encoding;
937
938
939 for ( nn = 0; nn < (FT_UInt)cffface->num_charmaps; nn++ )
940 {
941 cmap = cffface->charmaps[nn];
942
943 /* Windows Unicode? */
944 if ( cmap->platform_id == TT_PLATFORM_MICROSOFT &&
945 cmap->encoding_id == TT_MS_ID_UNICODE_CS )
946 goto Skip_Unicode;
947
948 /* Apple Unicode platform id? */
949 if ( cmap->platform_id == TT_PLATFORM_APPLE_UNICODE )
950 goto Skip_Unicode; /* Apple Unicode */
951 }
952
953 /* since CID-keyed fonts don't contain glyph names, we can't */
954 /* construct a cmap */
955 if ( pure_cff && cff->top_font.font_dict.cid_registry != 0xFFFFU )
956 goto Exit;
957
958 /* we didn't find a Unicode charmap -- synthesize one */
959 cmaprec.face = cffface;
960 cmaprec.platform_id = TT_PLATFORM_MICROSOFT;
961 cmaprec.encoding_id = TT_MS_ID_UNICODE_CS;
962 cmaprec.encoding = FT_ENCODING_UNICODE;
963
964 nn = (FT_UInt)cffface->num_charmaps;
965
966 error = FT_CMap_New( &CFF_CMAP_UNICODE_CLASS_REC_GET, NULL,
967 &cmaprec, NULL );
968 if ( error &&
969 FT_ERR_NEQ( error, No_Unicode_Glyph_Name ) )
970 goto Exit;
971 error = FT_Err_Ok;
972
973 /* if no Unicode charmap was previously selected, select this one */
974 if ( cffface->charmap == NULL && nn != (FT_UInt)cffface->num_charmaps )
975 cffface->charmap = cffface->charmaps[nn];
976
977 Skip_Unicode:
978 if ( encoding->count > 0 )
979 {
980 FT_CMap_Class clazz;
981
982
983 cmaprec.face = cffface;
984 cmaprec.platform_id = TT_PLATFORM_ADOBE; /* Adobe platform id */
985
986 if ( encoding->offset == 0 )
987 {
988 cmaprec.encoding_id = TT_ADOBE_ID_STANDARD;
989 cmaprec.encoding = FT_ENCODING_ADOBE_STANDARD;
990 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET;
991 }
992 else if ( encoding->offset == 1 )
993 {
994 cmaprec.encoding_id = TT_ADOBE_ID_EXPERT;
995 cmaprec.encoding = FT_ENCODING_ADOBE_EXPERT;
996 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET;
997 }
998 else
999 {
1000 cmaprec.encoding_id = TT_ADOBE_ID_CUSTOM;
1001 cmaprec.encoding = FT_ENCODING_ADOBE_CUSTOM;
1002 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET;
1003 }
1004
1005 error = FT_CMap_New( clazz, NULL, &cmaprec, NULL );
1006 }
1007 }
1008 }
1009
1010 Exit:
1011 return error;
1012 }
1013
1014
1015 FT_LOCAL_DEF( void )
1016 cff_face_done( FT_Face cffface ) /* CFF_Face */
1017 {
1018 CFF_Face face = (CFF_Face)cffface;
1019 FT_Memory memory;
1020 SFNT_Service sfnt;
1021
1022
1023 if ( !face )
1024 return;
1025
1026 memory = cffface->memory;
1027 sfnt = (SFNT_Service)face->sfnt;
1028
1029 if ( sfnt )
1030 sfnt->done_face( face );
1031
1032 {
1033 CFF_Font cff = (CFF_Font)face->extra.data;
1034
1035
1036 if ( cff )
1037 {
1038 cff_font_done( cff );
1039 FT_FREE( face->extra.data );
1040 }
1041 }
1042 }
1043
1044
1045 FT_LOCAL_DEF( FT_Error )
1046 cff_driver_init( FT_Module module ) /* CFF_Driver */
1047 {
1048 CFF_Driver driver = (CFF_Driver)module;
1049
1050
1051 /* set default property values, cf. `ftcffdrv.h' */
1052 #ifdef CFF_CONFIG_OPTION_OLD_ENGINE
1053 driver->hinting_engine = FT_CFF_HINTING_FREETYPE;
1054 #else
1055 driver->hinting_engine = FT_CFF_HINTING_ADOBE;
1056 #endif
1057
1058 driver->no_stem_darkening = TRUE;
1059
1060 driver->darken_params[0] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_X1;
1061 driver->darken_params[1] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_Y1;
1062 driver->darken_params[2] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_X2;
1063 driver->darken_params[3] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_Y2;
1064 driver->darken_params[4] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_X3;
1065 driver->darken_params[5] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_Y3;
1066 driver->darken_params[6] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_X4;
1067 driver->darken_params[7] = CFF_CONFIG_OPTION_DARKENING_PARAMETER_Y4;
1068
1069 return FT_Err_Ok;
1070 }
1071
1072
1073 FT_LOCAL_DEF( void )
1074 cff_driver_done( FT_Module module ) /* CFF_Driver */
1075 {
1076 FT_UNUSED( module );
1077 }
1078
1079
1080 /* END */
A free Windows-compatible Operating System