OLD | NEW |
| (Empty) |
1 /***************************************************************************/ | |
2 /* */ | |
3 /* cffobjs.c */ | |
4 /* */ | |
5 /* OpenType objects manager (body). */ | |
6 /* */ | |
7 /* Copyright 1996-2013 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 "../../include/ft2build.h" | |
20 | |
21 #include "../../include/freetype/internal/ftdebug.h" | |
22 #include "../../include/freetype/internal/ftcalc.h" | |
23 #include "../../include/freetype/internal/ftstream.h" | |
24 #include "../../include/freetype/fterrors.h" | |
25 #include "../../include/freetype/ttnameid.h" | |
26 #include "../../include/freetype/tttags.h" | |
27 #include "../../include/freetype/internal/sfnt.h" | |
28 #include "../../include/freetype/ftcffdrv.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_ULong top_upm = 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_ULong sub_upm = 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_ULong top_upm = 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_ULong sub_upm = 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 = 0; | |
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 && | |
523 face->format_tag != 0x00010000UL ) /* `OTTO'; OpenType/CFF f
ont */ | |
524 { | |
525 FT_TRACE2(( " not an OpenType/CFF font\n" )); | |
526 error = FT_THROW( Unknown_File_Format ); | |
527 goto Exit; | |
528 } | |
529 | |
530 /* if we are performing a simple font format check, exit immediately */ | |
531 if ( face_index < 0 ) | |
532 return FT_Err_Ok; | |
533 | |
534 sfnt_format = 1; | |
535 | |
536 /* now, the font can be either an OpenType/CFF font, or an SVG CEF */ | |
537 /* font; in the latter case it doesn't have a `head' table */ | |
538 error = face->goto_table( face, TTAG_head, stream, 0 ); | |
539 if ( !error ) | |
540 { | |
541 pure_cff = 0; | |
542 | |
543 /* load font directory */ | |
544 error = sfnt->load_face( stream, face, face_index, | |
545 num_params, params ); | |
546 if ( error ) | |
547 goto Exit; | |
548 } | |
549 else | |
550 { | |
551 /* load the `cmap' table explicitly */ | |
552 error = sfnt->load_cmap( face, stream ); | |
553 if ( error ) | |
554 goto Exit; | |
555 } | |
556 | |
557 /* now load the CFF part of the file */ | |
558 error = face->goto_table( face, TTAG_CFF, stream, 0 ); | |
559 if ( error ) | |
560 goto Exit; | |
561 } | |
562 else | |
563 { | |
564 /* rewind to start of file; we are going to load a pure-CFF font */ | |
565 if ( FT_STREAM_SEEK( 0 ) ) | |
566 goto Exit; | |
567 error = FT_Err_Ok; | |
568 } | |
569 | |
570 /* now load and parse the CFF table in the file */ | |
571 { | |
572 CFF_Font cff = NULL; | |
573 CFF_FontRecDict dict; | |
574 FT_Memory memory = cffface->memory; | |
575 FT_Int32 flags; | |
576 FT_UInt i; | |
577 | |
578 | |
579 if ( FT_NEW( cff ) ) | |
580 goto Exit; | |
581 | |
582 face->extra.data = cff; | |
583 error = cff_font_load( library, stream, face_index, cff, pure_cff ); | |
584 if ( error ) | |
585 goto Exit; | |
586 | |
587 cff->pshinter = pshinter; | |
588 cff->psnames = psnames; | |
589 | |
590 cffface->face_index = face_index; | |
591 | |
592 /* Complement the root flags with some interesting information. */ | |
593 /* Note that this is only necessary for pure CFF and CEF fonts; */ | |
594 /* SFNT based fonts use the `name' table instead. */ | |
595 | |
596 cffface->num_glyphs = cff->num_glyphs; | |
597 | |
598 dict = &cff->top_font.font_dict; | |
599 | |
600 /* we need the `PSNames' module for CFF and CEF formats */ | |
601 /* which aren't CID-keyed */ | |
602 if ( dict->cid_registry == 0xFFFFU && !psnames ) | |
603 { | |
604 FT_ERROR(( "cff_face_init:" | |
605 " cannot open CFF & CEF fonts\n" | |
606 " " | |
607 " without the `PSNames' module\n" )); | |
608 error = FT_THROW( Missing_Module ); | |
609 goto Exit; | |
610 } | |
611 | |
612 #ifdef FT_DEBUG_LEVEL_TRACE | |
613 { | |
614 FT_UInt idx; | |
615 FT_String* s; | |
616 | |
617 | |
618 FT_TRACE4(( "SIDs\n" )); | |
619 | |
620 /* dump string index, including default strings for convenience */ | |
621 for ( idx = 0; idx < cff->num_strings + 390; idx++ ) | |
622 { | |
623 s = cff_index_get_sid_string( cff, idx ); | |
624 if ( s ) | |
625 FT_TRACE4((" %5d %s\n", idx, s )); | |
626 } | |
627 } | |
628 #endif /* FT_DEBUG_LEVEL_TRACE */ | |
629 | |
630 if ( !dict->has_font_matrix ) | |
631 dict->units_per_em = pure_cff ? 1000 : face->root.units_per_EM; | |
632 | |
633 /* Normalize the font matrix so that `matrix->xx' is 1; the */ | |
634 /* scaling is done with `units_per_em' then (at this point, */ | |
635 /* it already contains the scaling factor, but without */ | |
636 /* normalization of the matrix). */ | |
637 /* */ | |
638 /* Note that the offsets must be expressed in integer font */ | |
639 /* units. */ | |
640 | |
641 { | |
642 FT_Matrix* matrix = &dict->font_matrix; | |
643 FT_Vector* offset = &dict->font_offset; | |
644 FT_ULong* upm = &dict->units_per_em; | |
645 FT_Fixed temp = FT_ABS( matrix->yy ); | |
646 | |
647 | |
648 if ( temp != 0x10000L ) | |
649 { | |
650 *upm = FT_DivFix( *upm, temp ); | |
651 | |
652 matrix->xx = FT_DivFix( matrix->xx, temp ); | |
653 matrix->yx = FT_DivFix( matrix->yx, temp ); | |
654 matrix->xy = FT_DivFix( matrix->xy, temp ); | |
655 matrix->yy = FT_DivFix( matrix->yy, temp ); | |
656 offset->x = FT_DivFix( offset->x, temp ); | |
657 offset->y = FT_DivFix( offset->y, temp ); | |
658 } | |
659 | |
660 offset->x >>= 16; | |
661 offset->y >>= 16; | |
662 } | |
663 | |
664 for ( i = cff->num_subfonts; i > 0; i-- ) | |
665 { | |
666 CFF_FontRecDict sub = &cff->subfonts[i - 1]->font_dict; | |
667 CFF_FontRecDict top = &cff->top_font.font_dict; | |
668 | |
669 FT_Matrix* matrix; | |
670 FT_Vector* offset; | |
671 FT_ULong* upm; | |
672 FT_Fixed temp; | |
673 | |
674 | |
675 if ( sub->has_font_matrix ) | |
676 { | |
677 FT_Long scaling; | |
678 | |
679 | |
680 /* if we have a top-level matrix, */ | |
681 /* concatenate the subfont matrix */ | |
682 | |
683 if ( top->has_font_matrix ) | |
684 { | |
685 if ( top->units_per_em > 1 && sub->units_per_em > 1 ) | |
686 scaling = FT_MIN( top->units_per_em, sub->units_per_em ); | |
687 else | |
688 scaling = 1; | |
689 | |
690 FT_Matrix_Multiply_Scaled( &top->font_matrix, | |
691 &sub->font_matrix, | |
692 scaling ); | |
693 FT_Vector_Transform_Scaled( &sub->font_offset, | |
694 &top->font_matrix, | |
695 scaling ); | |
696 | |
697 sub->units_per_em = FT_MulDiv( sub->units_per_em, | |
698 top->units_per_em, | |
699 scaling ); | |
700 } | |
701 } | |
702 else | |
703 { | |
704 sub->font_matrix = top->font_matrix; | |
705 sub->font_offset = top->font_offset; | |
706 | |
707 sub->units_per_em = top->units_per_em; | |
708 } | |
709 | |
710 matrix = &sub->font_matrix; | |
711 offset = &sub->font_offset; | |
712 upm = &sub->units_per_em; | |
713 temp = FT_ABS( matrix->yy ); | |
714 | |
715 if ( temp != 0x10000L ) | |
716 { | |
717 *upm = FT_DivFix( *upm, temp ); | |
718 | |
719 matrix->xx = FT_DivFix( matrix->xx, temp ); | |
720 matrix->yx = FT_DivFix( matrix->yx, temp ); | |
721 matrix->xy = FT_DivFix( matrix->xy, temp ); | |
722 matrix->yy = FT_DivFix( matrix->yy, temp ); | |
723 offset->x = FT_DivFix( offset->x, temp ); | |
724 offset->y = FT_DivFix( offset->y, temp ); | |
725 } | |
726 | |
727 offset->x >>= 16; | |
728 offset->y >>= 16; | |
729 } | |
730 | |
731 if ( pure_cff ) | |
732 { | |
733 char* style_name = NULL; | |
734 | |
735 | |
736 /* set up num_faces */ | |
737 cffface->num_faces = cff->num_faces; | |
738 | |
739 /* compute number of glyphs */ | |
740 if ( dict->cid_registry != 0xFFFFU ) | |
741 cffface->num_glyphs = cff->charset.max_cid + 1; | |
742 else | |
743 cffface->num_glyphs = cff->charstrings_index.count; | |
744 | |
745 /* set global bbox, as well as EM size */ | |
746 cffface->bbox.xMin = dict->font_bbox.xMin >> 16; | |
747 cffface->bbox.yMin = dict->font_bbox.yMin >> 16; | |
748 /* no `U' suffix here to 0xFFFF! */ | |
749 cffface->bbox.xMax = ( dict->font_bbox.xMax + 0xFFFF ) >> 16; | |
750 cffface->bbox.yMax = ( dict->font_bbox.yMax + 0xFFFF ) >> 16; | |
751 | |
752 cffface->units_per_EM = (FT_UShort)( dict->units_per_em ); | |
753 | |
754 cffface->ascender = (FT_Short)( cffface->bbox.yMax ); | |
755 cffface->descender = (FT_Short)( cffface->bbox.yMin ); | |
756 | |
757 cffface->height = (FT_Short)( ( cffface->units_per_EM * 12 ) / 10 ); | |
758 if ( cffface->height < cffface->ascender - cffface->descender ) | |
759 cffface->height = (FT_Short)( cffface->ascender - cffface->descender )
; | |
760 | |
761 cffface->underline_position = | |
762 (FT_Short)( dict->underline_position >> 16 ); | |
763 cffface->underline_thickness = | |
764 (FT_Short)( dict->underline_thickness >> 16 ); | |
765 | |
766 /* retrieve font family & style name */ | |
767 cffface->family_name = cff_index_get_name( cff, face_index ); | |
768 if ( cffface->family_name ) | |
769 { | |
770 char* full = cff_index_get_sid_string( cff, | |
771 dict->full_name ); | |
772 char* fullp = full; | |
773 char* family = cffface->family_name; | |
774 char* family_name = NULL; | |
775 | |
776 | |
777 remove_subset_prefix( cffface->family_name ); | |
778 | |
779 if ( dict->family_name ) | |
780 { | |
781 family_name = cff_index_get_sid_string( cff, | |
782 dict->family_name ); | |
783 if ( family_name ) | |
784 family = family_name; | |
785 } | |
786 | |
787 /* We try to extract the style name from the full name. */ | |
788 /* We need to ignore spaces and dashes during the search. */ | |
789 if ( full && family ) | |
790 { | |
791 while ( *fullp ) | |
792 { | |
793 /* skip common characters at the start of both strings */ | |
794 if ( *fullp == *family ) | |
795 { | |
796 family++; | |
797 fullp++; | |
798 continue; | |
799 } | |
800 | |
801 /* ignore spaces and dashes in full name during comparison */ | |
802 if ( *fullp == ' ' || *fullp == '-' ) | |
803 { | |
804 fullp++; | |
805 continue; | |
806 } | |
807 | |
808 /* ignore spaces and dashes in family name during comparison */ | |
809 if ( *family == ' ' || *family == '-' ) | |
810 { | |
811 family++; | |
812 continue; | |
813 } | |
814 | |
815 if ( !*family && *fullp ) | |
816 { | |
817 /* The full name begins with the same characters as the */ | |
818 /* family name, with spaces and dashes removed. In this */ | |
819 /* case, the remaining string in `fullp' will be used as */ | |
820 /* the style name. */ | |
821 style_name = cff_strcpy( memory, fullp ); | |
822 | |
823 /* remove the style part from the family name (if present) */ | |
824 remove_style( cffface->family_name, style_name ); | |
825 } | |
826 break; | |
827 } | |
828 } | |
829 } | |
830 else | |
831 { | |
832 char *cid_font_name = | |
833 cff_index_get_sid_string( cff, | |
834 dict->cid_font_name ); | |
835 | |
836 | |
837 /* do we have a `/FontName' for a CID-keyed font? */ | |
838 if ( cid_font_name ) | |
839 cffface->family_name = cff_strcpy( memory, cid_font_name ); | |
840 } | |
841 | |
842 if ( style_name ) | |
843 cffface->style_name = style_name; | |
844 else | |
845 /* assume "Regular" style if we don't know better */ | |
846 cffface->style_name = cff_strcpy( memory, (char *)"Regular" ); | |
847 | |
848 /*******************************************************************/ | |
849 /* */ | |
850 /* Compute face flags. */ | |
851 /* */ | |
852 flags = FT_FACE_FLAG_SCALABLE | /* scalable outlines */ | |
853 FT_FACE_FLAG_HORIZONTAL | /* horizontal data */ | |
854 FT_FACE_FLAG_HINTER; /* has native hinter */ | |
855 | |
856 if ( sfnt_format ) | |
857 flags |= FT_FACE_FLAG_SFNT; | |
858 | |
859 /* fixed width font? */ | |
860 if ( dict->is_fixed_pitch ) | |
861 flags |= FT_FACE_FLAG_FIXED_WIDTH; | |
862 | |
863 /* XXX: WE DO NOT SUPPORT KERNING METRICS IN THE GPOS TABLE FOR NOW */ | |
864 #if 0 | |
865 /* kerning available? */ | |
866 if ( face->kern_pairs ) | |
867 flags |= FT_FACE_FLAG_KERNING; | |
868 #endif | |
869 | |
870 cffface->face_flags = flags; | |
871 | |
872 /*******************************************************************/ | |
873 /* */ | |
874 /* Compute style flags. */ | |
875 /* */ | |
876 flags = 0; | |
877 | |
878 if ( dict->italic_angle ) | |
879 flags |= FT_STYLE_FLAG_ITALIC; | |
880 | |
881 { | |
882 char *weight = cff_index_get_sid_string( cff, | |
883 dict->weight ); | |
884 | |
885 | |
886 if ( weight ) | |
887 if ( !ft_strcmp( weight, "Bold" ) || | |
888 !ft_strcmp( weight, "Black" ) ) | |
889 flags |= FT_STYLE_FLAG_BOLD; | |
890 } | |
891 | |
892 /* double check */ | |
893 if ( !(flags & FT_STYLE_FLAG_BOLD) && cffface->style_name ) | |
894 if ( !ft_strncmp( cffface->style_name, "Bold", 4 ) || | |
895 !ft_strncmp( cffface->style_name, "Black", 5 ) ) | |
896 flags |= FT_STYLE_FLAG_BOLD; | |
897 | |
898 if ( !(flags & FT_STYLE_FLAG_ITALIC) && cffface->style_name ) | |
899 if ( !ft_strncmp( cffface->style_name, "Italic", 6 ) ) | |
900 flags |= FT_STYLE_FLAG_ITALIC; | |
901 | |
902 cffface->style_flags = flags; | |
903 } | |
904 | |
905 | |
906 #ifndef FT_CONFIG_OPTION_NO_GLYPH_NAMES | |
907 /* CID-keyed CFF fonts don't have glyph names -- the SFNT loader */ | |
908 /* has unset this flag because of the 3.0 `post' table. */ | |
909 if ( dict->cid_registry == 0xFFFFU ) | |
910 cffface->face_flags |= FT_FACE_FLAG_GLYPH_NAMES; | |
911 #endif | |
912 | |
913 if ( dict->cid_registry != 0xFFFFU && pure_cff ) | |
914 cffface->face_flags |= FT_FACE_FLAG_CID_KEYED; | |
915 | |
916 | |
917 /*******************************************************************/ | |
918 /* */ | |
919 /* Compute char maps. */ | |
920 /* */ | |
921 | |
922 /* Try to synthesize a Unicode charmap if there is none available */ | |
923 /* already. If an OpenType font contains a Unicode "cmap", we */ | |
924 /* will use it, whatever be in the CFF part of the file. */ | |
925 { | |
926 FT_CharMapRec cmaprec; | |
927 FT_CharMap cmap; | |
928 FT_UInt nn; | |
929 CFF_Encoding encoding = &cff->encoding; | |
930 | |
931 | |
932 for ( nn = 0; nn < (FT_UInt)cffface->num_charmaps; nn++ ) | |
933 { | |
934 cmap = cffface->charmaps[nn]; | |
935 | |
936 /* Windows Unicode? */ | |
937 if ( cmap->platform_id == TT_PLATFORM_MICROSOFT && | |
938 cmap->encoding_id == TT_MS_ID_UNICODE_CS ) | |
939 goto Skip_Unicode; | |
940 | |
941 /* Apple Unicode platform id? */ | |
942 if ( cmap->platform_id == TT_PLATFORM_APPLE_UNICODE ) | |
943 goto Skip_Unicode; /* Apple Unicode */ | |
944 } | |
945 | |
946 /* since CID-keyed fonts don't contain glyph names, we can't */ | |
947 /* construct a cmap */ | |
948 if ( pure_cff && cff->top_font.font_dict.cid_registry != 0xFFFFU ) | |
949 goto Exit; | |
950 | |
951 #ifdef FT_MAX_CHARMAP_CACHEABLE | |
952 if ( nn + 1 > FT_MAX_CHARMAP_CACHEABLE ) | |
953 { | |
954 FT_ERROR(( "cff_face_init: no Unicode cmap is found, " | |
955 "and too many subtables (%d) to add synthesized cmap\n", | |
956 nn )); | |
957 goto Exit; | |
958 } | |
959 #endif | |
960 | |
961 /* we didn't find a Unicode charmap -- synthesize one */ | |
962 cmaprec.face = cffface; | |
963 cmaprec.platform_id = TT_PLATFORM_MICROSOFT; | |
964 cmaprec.encoding_id = TT_MS_ID_UNICODE_CS; | |
965 cmaprec.encoding = FT_ENCODING_UNICODE; | |
966 | |
967 nn = (FT_UInt)cffface->num_charmaps; | |
968 | |
969 error = FT_CMap_New( &CFF_CMAP_UNICODE_CLASS_REC_GET, NULL, | |
970 &cmaprec, NULL ); | |
971 if ( error && | |
972 FT_ERR_NEQ( error, No_Unicode_Glyph_Name ) ) | |
973 goto Exit; | |
974 error = FT_Err_Ok; | |
975 | |
976 /* if no Unicode charmap was previously selected, select this one */ | |
977 if ( cffface->charmap == NULL && nn != (FT_UInt)cffface->num_charmaps ) | |
978 cffface->charmap = cffface->charmaps[nn]; | |
979 | |
980 Skip_Unicode: | |
981 #ifdef FT_MAX_CHARMAP_CACHEABLE | |
982 if ( nn > FT_MAX_CHARMAP_CACHEABLE ) | |
983 { | |
984 FT_ERROR(( "cff_face_init: Unicode cmap is found, " | |
985 "but too many preceding subtables (%d) to access\n", | |
986 nn - 1 )); | |
987 goto Exit; | |
988 } | |
989 #endif | |
990 if ( encoding->count > 0 ) | |
991 { | |
992 FT_CMap_Class clazz; | |
993 | |
994 | |
995 cmaprec.face = cffface; | |
996 cmaprec.platform_id = TT_PLATFORM_ADOBE; /* Adobe platform id */ | |
997 | |
998 if ( encoding->offset == 0 ) | |
999 { | |
1000 cmaprec.encoding_id = TT_ADOBE_ID_STANDARD; | |
1001 cmaprec.encoding = FT_ENCODING_ADOBE_STANDARD; | |
1002 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET; | |
1003 } | |
1004 else if ( encoding->offset == 1 ) | |
1005 { | |
1006 cmaprec.encoding_id = TT_ADOBE_ID_EXPERT; | |
1007 cmaprec.encoding = FT_ENCODING_ADOBE_EXPERT; | |
1008 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET; | |
1009 } | |
1010 else | |
1011 { | |
1012 cmaprec.encoding_id = TT_ADOBE_ID_CUSTOM; | |
1013 cmaprec.encoding = FT_ENCODING_ADOBE_CUSTOM; | |
1014 clazz = &CFF_CMAP_ENCODING_CLASS_REC_GET; | |
1015 } | |
1016 | |
1017 error = FT_CMap_New( clazz, NULL, &cmaprec, NULL ); | |
1018 } | |
1019 } | |
1020 } | |
1021 | |
1022 Exit: | |
1023 return error; | |
1024 } | |
1025 | |
1026 | |
1027 FT_LOCAL_DEF( void ) | |
1028 cff_face_done( FT_Face cffface ) /* CFF_Face */ | |
1029 { | |
1030 CFF_Face face = (CFF_Face)cffface; | |
1031 FT_Memory memory; | |
1032 SFNT_Service sfnt; | |
1033 | |
1034 | |
1035 if ( !face ) | |
1036 return; | |
1037 | |
1038 memory = cffface->memory; | |
1039 sfnt = (SFNT_Service)face->sfnt; | |
1040 | |
1041 if ( sfnt ) | |
1042 sfnt->done_face( face ); | |
1043 | |
1044 { | |
1045 CFF_Font cff = (CFF_Font)face->extra.data; | |
1046 | |
1047 | |
1048 if ( cff ) | |
1049 { | |
1050 cff_font_done( cff ); | |
1051 FT_FREE( face->extra.data ); | |
1052 } | |
1053 } | |
1054 } | |
1055 | |
1056 | |
1057 FT_LOCAL_DEF( FT_Error ) | |
1058 cff_driver_init( FT_Module module ) /* CFF_Driver */ | |
1059 { | |
1060 CFF_Driver driver = (CFF_Driver)module; | |
1061 | |
1062 | |
1063 /* set default property values */ | |
1064 #ifdef CFF_CONFIG_OPTION_OLD_ENGINE | |
1065 driver->hinting_engine = FT_CFF_HINTING_FREETYPE; | |
1066 #else | |
1067 driver->hinting_engine = FT_CFF_HINTING_ADOBE; | |
1068 #endif | |
1069 driver->no_stem_darkening = FALSE; | |
1070 | |
1071 return FT_Err_Ok; | |
1072 } | |
1073 | |
1074 | |
1075 FT_LOCAL_DEF( void ) | |
1076 cff_driver_done( FT_Module module ) /* CFF_Driver */ | |
1077 { | |
1078 FT_UNUSED( module ); | |
1079 } | |
1080 | |
1081 | |
1082 /* END */ | |
OLD | NEW |