/***************************************************************************/ /* */ /* t1driver.c */ /* */ /* Type 1 driver interface (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 #include "t1driver.h" #include "t1gload.h" #include "t1load.h" #include "t1errors.h" #ifndef T1_CONFIG_OPTION_NO_AFM #include "t1afm.h" #endif #include FT_INTERNAL_DEBUG_H #include FT_INTERNAL_STREAM_H #include FT_INTERNAL_POSTSCRIPT_NAMES_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_t1driver static FT_Error t1_get_glyph_name( T1_Face face, FT_UInt glyph_index, FT_Pointer buffer, FT_UInt buffer_max ) { FT_String* gname; gname = face->type1.glyph_names[glyph_index]; if ( buffer_max > 0 ) { FT_UInt len = (FT_UInt)( ft_strlen( gname ) ); if (len >= buffer_max) len = buffer_max - 1; FT_MEM_COPY( buffer, gname, len ); ((FT_Byte*)buffer)[len] = 0; } return T1_Err_Ok; } /*************************************************************************/ /* */ /* */ /* t1_get_name_index */ /* */ /* */ /* Uses the Type 1 font's `glyph_names' table to find a given glyph */ /* name's glyph index. */ /* */ /* */ /* face :: A handle to the source face object. */ /* */ /* glyph_name :: The glyph name. */ /* */ /* */ /* Glyph index. 0 means `undefined character code'. */ /* */ static FT_UInt t1_get_name_index( T1_Face face, FT_String* glyph_name ) { FT_Int i; FT_String* gname; for ( i = 0; i < face->type1.num_glyphs; i++ ) { gname = face->type1.glyph_names[i]; if ( !ft_strcmp( glyph_name, gname ) ) return (FT_UInt)i; } return 0; } static const char* t1_get_ps_name( T1_Face face ) { return (const char*) face->type1.font_name; } /*************************************************************************/ /* */ /* */ /* Get_Interface */ /* */ /* */ /* Each driver can provide one or more extensions to the base */ /* FreeType API. These can be used to access format specific */ /* features (e.g., all TrueType/OpenType resources share a common */ /* file structure and common tables which can be accessed through the */ /* `sfnt' interface), or more simply generic ones (e.g., the */ /* `postscript names' interface which can be used to retrieve the */ /* PostScript name of a given glyph index). */ /* */ /* */ /* driver :: A handle to a driver object. */ /* */ /* */ /* interface :: A string designing the interface. Examples are */ /* `sfnt', `post_names', `charmaps', etc. */ /* */ /* */ /* A typeless pointer to the extension's interface (normally a table */ /* of function pointers). Returns NULL if the requested extension */ /* isn't available (i.e., wasn't compiled in the driver at build */ /* time). */ /* */ static FT_Module_Interface Get_Interface( FT_Driver driver, const FT_String* interface ) { FT_UNUSED( driver ); FT_UNUSED( interface ); if ( ft_strcmp( (const char*)interface, "glyph_name" ) == 0 ) return (FT_Module_Interface)t1_get_glyph_name; if ( ft_strcmp( (const char*)interface, "name_index" ) == 0 ) return (FT_Module_Interface)t1_get_name_index; if ( ft_strcmp( (const char*)interface, "postscript_name" ) == 0 ) return (FT_Module_Interface)t1_get_ps_name; #ifndef T1_CONFIG_OPTION_NO_MM_SUPPORT if ( ft_strcmp( (const char*)interface, "get_mm" ) == 0 ) return (FT_Module_Interface)T1_Get_Multi_Master; if ( ft_strcmp( (const char*)interface, "set_mm_design") == 0 ) return (FT_Module_Interface)T1_Set_MM_Design; if ( ft_strcmp( (const char*)interface, "set_mm_blend") == 0 ) return (FT_Module_Interface)T1_Set_MM_Blend; #endif return 0; } #ifndef T1_CONFIG_OPTION_NO_AFM /*************************************************************************/ /* */ /* */ /* Get_Kerning */ /* */ /* */ /* A driver method used to return the kerning vector between two */ /* glyphs of the same face. */ /* */ /* */ /* face :: A handle to the source face object. */ /* */ /* left_glyph :: The index of the left glyph in the kern pair. */ /* */ /* right_glyph :: The index of the right glyph in the kern pair. */ /* */ /* */ /* kerning :: The kerning vector. This is in font units for */ /* scalable formats, and in pixels for fixed-sizes */ /* formats. */ /* */ /* */ /* FreeType error code. 0 means success. */ /* */ /* */ /* Only horizontal layouts (left-to-right & right-to-left) are */ /* supported by this function. Other layouts, or more sophisticated */ /* kernings are out of scope of this method (the basic driver */ /* interface is meant to be simple). */ /* */ /* They can be implemented by format-specific interfaces. */ /* */ static FT_Error Get_Kerning( T1_Face face, FT_UInt left_glyph, FT_UInt right_glyph, FT_Vector* kerning ) { T1_AFM* afm; kerning->x = 0; kerning->y = 0; afm = (T1_AFM*)face->afm_data; if ( afm ) T1_Get_Kerning( afm, left_glyph, right_glyph, kerning ); return T1_Err_Ok; } #endif /* T1_CONFIG_OPTION_NO_AFM */ /*************************************************************************/ /* */ /* */ /* Get_Char_Index */ /* */ /* */ /* Uses a charmap to return a given character code's glyph index. */ /* */ /* */ /* charmap :: A handle to the source charmap object. */ /* */ /* charcode :: The character code. */ /* */ /* */ /* Glyph index. 0 means `undefined character code'. */ /* */ static FT_UInt Get_Char_Index( FT_CharMap charmap, FT_Long charcode ) { T1_Face face; FT_UInt result = 0; PSNames_Service psnames; face = (T1_Face)charmap->face; psnames = (PSNames_Service)face->psnames; if ( psnames ) switch ( charmap->encoding ) { /*******************************************************************/ /* */ /* Unicode encoding support */ /* */ case ft_encoding_unicode: /* use the `PSNames' module to synthetize the Unicode charmap */ result = psnames->lookup_unicode( &face->unicode_map, (FT_ULong)charcode ); /* the function returns 0xFFFF if the Unicode charcode has */ /* no corresponding glyph */ if ( result == 0xFFFFU ) result = 0; goto Exit; /*******************************************************************/ /* */ /* ISOLatin1 encoding support */ /* */ case ft_encoding_latin_1: /* ISOLatin1 is the first page of Unicode */ if ( charcode < 256 && psnames->unicode_value ) { result = psnames->lookup_unicode( &face->unicode_map, (FT_ULong)charcode ); /* the function returns 0xFFFF if the Unicode charcode has */ /* no corresponding glyph */ if ( result == 0xFFFFU ) result = 0; } goto Exit; /*******************************************************************/ /* */ /* Custom Type 1 encoding */ /* */ case ft_encoding_adobe_custom: { T1_Encoding encoding = &face->type1.encoding; if ( charcode >= encoding->code_first && charcode <= encoding->code_last ) result = encoding->char_index[charcode]; goto Exit; } /*******************************************************************/ /* */ /* Adobe Standard & Expert encoding support */ /* */ default: if ( charcode < 256 ) { FT_UInt code; FT_Int n; const char* glyph_name; code = psnames->adobe_std_encoding[charcode]; if ( charmap->encoding == ft_encoding_adobe_expert ) code = psnames->adobe_expert_encoding[charcode]; glyph_name = psnames->adobe_std_strings( code ); if ( !glyph_name ) break; for ( n = 0; n < face->type1.num_glyphs; n++ ) { const char* gname = face->type1.glyph_names[n]; if ( gname && gname[0] == glyph_name[0] && ft_strcmp( gname, glyph_name ) == 0 ) { result = n; break; } } } } Exit: return result; } /*************************************************************************/ /* */ /* */ /* Get_Next_Char */ /* */ /* */ /* Uses a charmap to return the next encoded char. */ /* */ /* */ /* charmap :: A handle to the source charmap object. */ /* */ /* charcode :: The character code. */ /* */ /* */ /* Next char code. 0 means `no more char codes'. */ /* */ static FT_Long Get_Next_Char( FT_CharMap charmap, FT_Long charcode ) { T1_Face face; PSNames_Service psnames; face = (T1_Face)charmap->face; psnames = (PSNames_Service)face->psnames; if ( psnames ) switch ( charmap->encoding ) { /*******************************************************************/ /* */ /* Unicode encoding support */ /* */ case ft_encoding_unicode: /* use the `PSNames' module to synthetize the Unicode charmap */ return psnames->next_unicode( &face->unicode_map, (FT_ULong)charcode ); /*******************************************************************/ /* */ /* ISOLatin1 encoding support */ /* */ case ft_encoding_latin_1: { FT_Long code; /* use the `PSNames' module to synthetize the Unicode charmap */ code = psnames->next_unicode( &face->unicode_map, (FT_ULong)charcode ); if ( code < 256 ) return code; break; } /*******************************************************************/ /* */ /* Custom Type 1 encoding */ /* */ case ft_encoding_adobe_custom: { T1_Encoding encoding = &face->type1.encoding; charcode++; if ( charcode < encoding->code_first ) charcode = encoding->code_first; while ( charcode <= encoding->code_last ) { if ( encoding->char_index[charcode] ) return charcode; charcode++; } } /*******************************************************************/ /* */ /* Adobe Standard & Expert encoding support */ /* */ default: while ( ++charcode < 256 ) { FT_UInt code; FT_Int n; const char* glyph_name; code = psnames->adobe_std_encoding[charcode]; if ( charmap->encoding == ft_encoding_adobe_expert ) code = psnames->adobe_expert_encoding[charcode]; glyph_name = psnames->adobe_std_strings( code ); if ( !glyph_name ) continue; for ( n = 0; n < face->type1.num_glyphs; n++ ) { const char* gname = face->type1.glyph_names[n]; if ( gname && gname[0] == glyph_name[0] && ft_strcmp( gname, glyph_name ) == 0 ) return charcode; } } } return 0; } FT_CALLBACK_TABLE_DEF const FT_Driver_ClassRec t1_driver_class = { { ft_module_font_driver | ft_module_driver_scalable | ft_module_driver_has_hinter, sizeof( FT_DriverRec ), "type1", 0x10000L, 0x20000L, 0, /* format interface */ (FT_Module_Constructor)T1_Driver_Init, (FT_Module_Destructor) T1_Driver_Done, (FT_Module_Requester) Get_Interface, }, sizeof( T1_FaceRec ), sizeof( T1_SizeRec ), sizeof( T1_GlyphSlotRec ), (FT_Face_InitFunc) T1_Face_Init, (FT_Face_DoneFunc) T1_Face_Done, (FT_Size_InitFunc) T1_Size_Init, (FT_Size_DoneFunc) T1_Size_Done, (FT_Slot_InitFunc) T1_GlyphSlot_Init, (FT_Slot_DoneFunc) T1_GlyphSlot_Done, (FT_Size_ResetPointsFunc) T1_Size_Reset, (FT_Size_ResetPixelsFunc) T1_Size_Reset, (FT_Slot_LoadFunc) T1_Load_Glyph, (FT_CharMap_CharIndexFunc)Get_Char_Index, #ifdef T1_CONFIG_OPTION_NO_AFM (FT_Face_GetKerningFunc) 0, (FT_Face_AttachFunc) 0, #else (FT_Face_GetKerningFunc) Get_Kerning, (FT_Face_AttachFunc) T1_Read_AFM, #endif (FT_Face_GetAdvancesFunc) 0, (FT_CharMap_CharNextFunc) Get_Next_Char }; #ifdef FT_CONFIG_OPTION_DYNAMIC_DRIVERS /*************************************************************************/ /* */ /* */ /* getDriverClass */ /* */ /* */ /* This function is used when compiling the TrueType driver as a */ /* shared library (`.DLL' or `.so'). It will be used by the */ /* high-level library of FreeType to retrieve the address of the */ /* driver's generic interface. */ /* */ /* It shouldn't be implemented in a static build, as each driver must */ /* have the same function as an exported entry point. */ /* */ /* */ /* The address of the TrueType's driver generic interface. The */ /* format-specific interface can then be retrieved through the method */ /* interface->get_format_interface. */ /* */ FT_EXPORT_DEF( const FT_Driver_Class ) getDriverClass( void ) { return &t1_driver_class; } #endif /* FT_CONFIG_OPTION_DYNAMIC_DRIVERS */ /* END */