123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100101102103104105106107108109110111112113114115116117118119120121122123124125126127128129130131132133134135136137138139140141142143144145146147148149150151152153154155156157158159160161162163164165166167168169170171172173174175176177178179180181182183184185186187188189190191192193194195196197198199200201202203204205206207208209210211212213214215216217218219220221222223224225226227228229230231232233234235236237238239240241242243244245246247248249250251252253254255256257258259260261262263264265266267268269270271272273274275276277278279280281282283284285286287288289290291292293294295296297298299300301302303304305306307308309310311312313314315316317318319320321322323324325326327328329330331332333334335336337338339340341342343344345346347348349350351352353354355356357358359360361362363364365366367368369370371372373374375376377378379380381382383384385386387388389390391392393394395396397398399400401402403404405406407408409410411412413414415416417418419420421422423424425426427428429430431432433434435436437438439440441442443444445446447448449450451452453454455456457458459460461462463464465466467468469470471472473474475476477478479480481482483484485486487488489490491492493494495496497498499500501502503504505506507508509510511512513514515516517518519520521522523524525526527528529530531532533534535536537538539540541542543544545546547548549550551552553554555556557558559560561562563564565566567568569570571572573574575 |
- /***************************************************************************/
- /* */
- /* cffobjs.c */
- /* */
- /* OpenType objects manager (body). */
- /* */
- /* Copyright 1996-2001, 2002 by */
- /* David Turner, Robert Wilhelm, and Werner Lemberg. */
- /* */
- /* This file is part of the FreeType project, and may only be used, */
- /* modified, and distributed under the terms of the FreeType project */
- /* license, LICENSE.TXT. By continuing to use, modify, or distribute */
- /* this file you indicate that you have read the license and */
- /* understand and accept it fully. */
- /* */
- /***************************************************************************/
- #include <ft2build.h>
- #include FT_INTERNAL_DEBUG_H
- #include FT_INTERNAL_CALC_H
- #include FT_INTERNAL_STREAM_H
- #include FT_ERRORS_H
- #include FT_TRUETYPE_IDS_H
- #include FT_TRUETYPE_TAGS_H
- #include FT_INTERNAL_SFNT_H
- #include FT_INTERNAL_POSTSCRIPT_NAMES_H
- #include FT_INTERNAL_POSTSCRIPT_HINTS_H
- #include "cffobjs.h"
- #include "cffload.h"
- #include "cffcmap.h"
- #include "cfferrs.h"
- /*************************************************************************/
- /* */
- /* The macro FT_COMPONENT is used in trace mode. It is an implicit */
- /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
- /* messages during execution. */
- /* */
- #undef FT_COMPONENT
- #define FT_COMPONENT trace_cffobjs
- /*************************************************************************/
- /* */
- /* SIZE FUNCTIONS */
- /* */
- /* Note that we store the global hints in the size's "internal" root */
- /* field. */
- /* */
- /*************************************************************************/
- static PSH_Globals_Funcs
- cff_size_get_globals_funcs( CFF_Size size )
- {
- CFF_Face face = (CFF_Face)size->face;
- CFF_Font font = (CFF_FontRec *)face->extra.data;
- PSHinter_Service pshinter = (PSHinter_Service)font->pshinter;
- FT_Module module;
- module = FT_Get_Module( size->face->driver->root.library,
- "pshinter" );
- return ( module && pshinter && pshinter->get_globals_funcs )
- ? pshinter->get_globals_funcs( module )
- : 0;
- }
- FT_LOCAL_DEF( void )
- cff_size_done( CFF_Size size )
- {
- if ( size->internal )
- {
- PSH_Globals_Funcs funcs;
- funcs = cff_size_get_globals_funcs( size );
- if ( funcs )
- funcs->destroy( (PSH_Globals)size->internal );
- size->internal = 0;
- }
- }
- FT_LOCAL_DEF( FT_Error )
- cff_size_init( CFF_Size size )
- {
- FT_Error error = 0;
- PSH_Globals_Funcs funcs = cff_size_get_globals_funcs( size );
- if ( funcs )
- {
- PSH_Globals globals;
- CFF_Face face = (CFF_Face)size->face;
- CFF_Font font = (CFF_FontRec *)face->extra.data;
- CFF_SubFont subfont = &font->top_font;
- CFF_Private cpriv = &subfont->private_dict;
- PS_PrivateRec priv;
- /* IMPORTANT: The CFF and Type1 private dictionaries have */
- /* slightly different structures; we need to */
- /* synthetize a type1 dictionary on the fly here. */
- {
- FT_UInt n, count;
- FT_MEM_ZERO( &priv, sizeof ( priv ) );
- count = priv.num_blue_values = cpriv->num_blue_values;
- for ( n = 0; n < count; n++ )
- priv.blue_values[n] = (FT_Short)cpriv->blue_values[n];
- count = priv.num_other_blues = cpriv->num_other_blues;
- for ( n = 0; n < count; n++ )
- priv.other_blues[n] = (FT_Short)cpriv->other_blues[n];
- count = priv.num_family_blues = cpriv->num_family_blues;
- for ( n = 0; n < count; n++ )
- priv.family_blues[n] = (FT_Short)cpriv->family_blues[n];
- count = priv.num_family_other_blues = cpriv->num_family_other_blues;
- for ( n = 0; n < count; n++ )
- priv.family_other_blues[n] = (FT_Short)cpriv->family_other_blues[n];
- priv.blue_scale = cpriv->blue_scale;
- priv.blue_shift = (FT_Int)cpriv->blue_shift;
- priv.blue_fuzz = (FT_Int)cpriv->blue_fuzz;
- priv.standard_width[0] = (FT_UShort)cpriv->standard_width;
- priv.standard_height[0] = (FT_UShort)cpriv->standard_height;
- count = priv.num_snap_widths = cpriv->num_snap_widths;
- for ( n = 0; n < count; n++ )
- priv.snap_widths[n] = (FT_Short)cpriv->snap_widths[n];
- count = priv.num_snap_heights = cpriv->num_snap_heights;
- for ( n = 0; n < count; n++ )
- priv.snap_heights[n] = (FT_Short)cpriv->snap_heights[n];
- priv.force_bold = cpriv->force_bold;
- priv.language_group = cpriv->language_group;
- priv.lenIV = cpriv->lenIV;
- }
- error = funcs->create( size->face->memory, &priv, &globals );
- if ( !error )
- size->internal = (FT_Size_Internal)(void*)globals;
- }
- return error;
- }
- FT_LOCAL_DEF( FT_Error )
- cff_size_reset( CFF_Size size )
- {
- PSH_Globals_Funcs funcs = cff_size_get_globals_funcs( size );
- FT_Error error = 0;
- if ( funcs )
- error = funcs->set_scale( (PSH_Globals)size->internal,
- size->metrics.x_scale,
- size->metrics.y_scale,
- 0, 0 );
- return error;
- }
- /*************************************************************************/
- /* */
- /* SLOT FUNCTIONS */
- /* */
- /*************************************************************************/
- FT_LOCAL_DEF( void )
- cff_slot_done( CFF_GlyphSlot slot )
- {
- slot->root.internal->glyph_hints = 0;
- }
- FT_LOCAL_DEF( FT_Error )
- cff_slot_init( CFF_GlyphSlot slot )
- {
- CFF_Face face = (CFF_Face)slot->root.face;
- CFF_Font font = (CFF_FontRec *)face->extra.data;
- PSHinter_Service pshinter = (PSHinter_Service)font->pshinter;
- if ( pshinter )
- {
- FT_Module module;
- module = FT_Get_Module( slot->root.face->driver->root.library,
- "pshinter" );
- if ( module )
- {
- T2_Hints_Funcs funcs;
- funcs = pshinter->get_t2_funcs( module );
- slot->root.internal->glyph_hints = (void*)funcs;
- }
- }
- return 0;
- }
- /*************************************************************************/
- /* */
- /* FACE FUNCTIONS */
- /* */
- /*************************************************************************/
- static FT_String*
- cff_strcpy( FT_Memory memory,
- const FT_String* source )
- {
- FT_Error error;
- FT_String* result = 0;
- FT_Int len = (FT_Int)ft_strlen( source );
- if ( !FT_ALLOC( result, len + 1 ) )
- {
- FT_MEM_COPY( result, source, len );
- result[len] = 0;
- }
- FT_UNUSED( error );
- return result;
- }
- FT_LOCAL_DEF( FT_Error )
- cff_face_init( FT_Stream stream,
- CFF_Face face,
- FT_Int face_index,
- FT_Int num_params,
- FT_Parameter* params )
- {
- FT_Error error;
- SFNT_Service sfnt;
- PSNames_Service psnames;
- PSHinter_Service pshinter;
- FT_Bool pure_cff = 1;
- FT_Bool sfnt_format = 0;
- sfnt = (SFNT_Service)FT_Get_Module_Interface(
- face->root.driver->root.library, "sfnt" );
- if ( !sfnt )
- goto Bad_Format;
- psnames = (PSNames_Service)FT_Get_Module_Interface(
- face->root.driver->root.library, "psnames" );
- pshinter = (PSHinter_Service)FT_Get_Module_Interface(
- face->root.driver->root.library, "pshinter" );
- /* create input stream from resource */
- if ( FT_STREAM_SEEK( 0 ) )
- goto Exit;
- /* check that we have a valid OpenType file */
- error = sfnt->init_face( stream, face, face_index, num_params, params );
- if ( !error )
- {
- if ( face->format_tag != 0x4F54544FL ) /* `OTTO'; OpenType/CFF font */
- {
- FT_TRACE2(( "[not a valid OpenType/CFF font]\n" ));
- goto Bad_Format;
- }
- /* if we are performing a simple font format check, exit immediately */
- if ( face_index < 0 )
- return CFF_Err_Ok;
- sfnt_format = 1;
- /* now, the font can be either an OpenType/CFF font, or an SVG CEF */
- /* font in the later case; it doesn't have a `head' table */
- error = face->goto_table( face, TTAG_head, stream, 0 );
- if ( !error )
- {
- pure_cff = 0;
- /* load font directory */
- error = sfnt->load_face( stream, face,
- face_index, num_params, params );
- if ( error )
- goto Exit;
- }
- else
- {
- /* load the `cmap' table by hand */
- error = sfnt->load_charmaps( face, stream );
- if ( error )
- goto Exit;
- /* XXX: we don't load the GPOS table, as OpenType Layout */
- /* support will be added later to a layout library on top of */
- /* FreeType 2 */
- }
- /* now, load the CFF part of the file */
- error = face->goto_table( face, TTAG_CFF, stream, 0 );
- if ( error )
- goto Exit;
- }
- else
- {
- /* rewind to start of file; we are going to load a pure-CFF font */
- if ( FT_STREAM_SEEK( 0 ) )
- goto Exit;
- error = CFF_Err_Ok;
- }
- /* now load and parse the CFF table in the file */
- {
- CFF_Font cff;
- FT_Memory memory = face->root.memory;
- FT_Face root;
- FT_Int32 flags;
- if ( FT_NEW( cff ) )
- goto Exit;
- face->extra.data = cff;
- error = cff_font_load( stream, face_index, cff );
- if ( error )
- goto Exit;
- cff->pshinter = pshinter;
- cff->psnames = psnames;
- /* Complement the root flags with some interesting information. */
- /* Note that this is only necessary for pure CFF and CEF fonts. */
- root = &face->root;
- root->num_glyphs = cff->num_glyphs;
- if ( pure_cff )
- {
- CFF_FontRecDict dict = &cff->top_font.font_dict;
- /* we need the `PSNames' module for pure-CFF and CEF formats */
- if ( !psnames )
- {
- FT_ERROR(( "cff_face_init:" ));
- FT_ERROR(( " cannot open CFF & CEF fonts\n" ));
- FT_ERROR(( " " ));
- FT_ERROR(( " without the `PSNames' module\n" ));
- goto Bad_Format;
- }
- /* Set up num_faces. */
- root->num_faces = cff->num_faces;
- /* compute number of glyphs */
- if ( dict->cid_registry )
- root->num_glyphs = dict->cid_count;
- else
- root->num_glyphs = cff->charstrings_index.count;
- /* set global bbox, as well as EM size */
- root->bbox.xMin = dict->font_bbox.xMin >> 16;
- root->bbox.yMin = dict->font_bbox.yMin >> 16;
- root->bbox.xMax = ( dict->font_bbox.xMax + 0xFFFFU ) >> 16;
- root->bbox.yMax = ( dict->font_bbox.yMax + 0xFFFFU ) >> 16;
- root->ascender = (FT_Short)( root->bbox.yMax );
- root->descender = (FT_Short)( root->bbox.yMin );
- root->height = (FT_Short)(
- ( ( root->ascender - root->descender ) * 12 ) / 10 );
- if ( dict->units_per_em )
- root->units_per_EM = dict->units_per_em;
- else
- root->units_per_EM = 1000;
- /* retrieve font family & style name */
- root->family_name = cff_index_get_name( &cff->name_index, face_index );
- if ( dict->cid_registry )
- root->style_name = cff_strcpy( memory, "Regular" ); /* XXXX */
- else
- root->style_name = cff_index_get_sid_string( &cff->string_index,
- dict->weight,
- psnames );
- /*******************************************************************/
- /* */
- /* Compute face flags. */
- /* */
- flags = FT_FACE_FLAG_SCALABLE | /* scalable outlines */
- FT_FACE_FLAG_HORIZONTAL; /* horizontal data */
- if ( sfnt_format )
- flags |= FT_FACE_FLAG_SFNT;
- /* fixed width font? */
- if ( dict->is_fixed_pitch )
- flags |= FT_FACE_FLAG_FIXED_WIDTH;
- /* XXX: WE DO NOT SUPPORT KERNING METRICS IN THE GPOS TABLE FOR NOW */
- #if 0
- /* kerning available? */
- if ( face->kern_pairs )
- flags |= FT_FACE_FLAG_KERNING;
- #endif
- #ifndef FT_CONFIG_OPTION_NO_GLYPH_NAMES
- flags |= FT_FACE_FLAG_GLYPH_NAMES;
- #endif
- root->face_flags = flags;
- /*******************************************************************/
- /* */
- /* Compute style flags. */
- /* */
- flags = 0;
- if ( dict->italic_angle )
- flags |= FT_STYLE_FLAG_ITALIC;
- /* XXX: may not be correct */
- if ( cff->top_font.private_dict.force_bold )
- flags |= FT_STYLE_FLAG_BOLD;
- root->style_flags = flags;
- }
- /*******************************************************************/
- /* */
- /* Compute char maps. */
- /* */
- /* Try to synthetize a Unicode charmap if there is none available */
- /* already. If an OpenType font contains a Unicode "cmap", we */
- /* will use it, whatever be in the CFF part of the file. */
- {
- FT_CharMapRec cmaprec;
- FT_CharMap cmap;
- FT_UInt nn;
- CFF_Encoding encoding = &cff->encoding;
- for ( nn = 0; nn < (FT_UInt) root->num_charmaps; nn++ )
- {
- cmap = root->charmaps[nn];
- /* Windows Unicode (3,1)? */
- if ( cmap->platform_id == 3 && cmap->encoding_id == 1 )
- goto Skip_Unicode;
- /* Deprecated Unicode platform id? */
- if ( cmap->platform_id == 0 )
- goto Skip_Unicode; /* Standard Unicode (deprecated) */
- }
- /* we didn't find a Unicode charmap, synthetize one */
- cmaprec.face = root;
- cmaprec.platform_id = 3;
- cmaprec.encoding_id = 1;
- cmaprec.encoding = FT_ENCODING_UNICODE;
- nn = (FT_UInt) root->num_charmaps;
- FT_CMap_New( &cff_cmap_unicode_class_rec, NULL, &cmaprec, NULL );
- /* if no Unicode charmap was previously selected, select this one */
- if ( root->charmap == NULL && nn != (FT_UInt) root->num_charmaps )
- root->charmap = root->charmaps[nn];
- Skip_Unicode:
- if ( encoding->count > 0 )
- {
- FT_CMap_Class clazz;
- cmaprec.face = root;
- cmaprec.platform_id = 7; /* Adobe platform id */
- if ( encoding->offset == 0 )
- {
- cmaprec.encoding_id = 0;
- cmaprec.encoding = FT_ENCODING_ADOBE_STANDARD;
- clazz = &cff_cmap_encoding_class_rec;
- }
- else if ( encoding->offset == 1 )
- {
- cmaprec.encoding_id = 1;
- cmaprec.encoding = FT_ENCODING_ADOBE_EXPERT;
- clazz = &cff_cmap_encoding_class_rec;
- }
- else
- {
- cmaprec.encoding_id = 3;
- cmaprec.encoding = FT_ENCODING_ADOBE_CUSTOM;
- clazz = &cff_cmap_encoding_class_rec;
- }
- FT_CMap_New( clazz, NULL, &cmaprec, NULL );
- }
- }
- }
- Exit:
- return error;
- Bad_Format:
- error = CFF_Err_Unknown_File_Format;
- goto Exit;
- }
- FT_LOCAL_DEF( void )
- cff_face_done( CFF_Face face )
- {
- FT_Memory memory = face->root.memory;
- SFNT_Service sfnt = (SFNT_Service)face->sfnt;
- if ( sfnt )
- sfnt->done_face( face );
- {
- CFF_Font cff = (CFF_Font)face->extra.data;
- if ( cff )
- {
- cff_font_done( cff );
- FT_FREE( face->extra.data );
- }
- }
- }
- FT_LOCAL_DEF( FT_Error )
- cff_driver_init( CFF_Driver driver )
- {
- FT_UNUSED( driver );
- return CFF_Err_Ok;
- }
- FT_LOCAL_DEF( void )
- cff_driver_done( CFF_Driver driver )
- {
- FT_UNUSED( driver );
- }
- /* END */
|