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