Edit
kc3-lang/freetype/src/psaux/t1cmap.c
Alexei Podtelezhnikov
- src/psaux/t1cmap.c
-
/**************************************************************************** * * t1cmap.c * * Type 1 character map support (body). * * Copyright (C) 2002-2024 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 "t1cmap.h" #include <freetype/internal/ftdebug.h> #include "psauxerr.h" /*************************************************************************/ /*************************************************************************/ /***** *****/ /***** TYPE1 STANDARD (AND EXPERT) ENCODING CMAPS *****/ /***** *****/ /*************************************************************************/ /*************************************************************************/ static void t1_cmap_std_init( T1_CMapStd cmap, FT_Int is_expert ) { T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; cmap->num_glyphs = (FT_UInt)face->type1.num_glyphs; cmap->glyph_names = (const char* const*)face->type1.glyph_names; cmap->sid_to_string = psnames->adobe_std_strings; cmap->code_to_sid = is_expert ? psnames->adobe_expert_encoding : psnames->adobe_std_encoding; FT_ASSERT( cmap->code_to_sid ); } FT_CALLBACK_DEF( void ) t1_cmap_std_done( FT_CMap cmap_ ) /* T1_CMapStd */ { T1_CMapStd cmap = (T1_CMapStd)cmap_; cmap->num_glyphs = 0; cmap->glyph_names = NULL; cmap->sid_to_string = NULL; cmap->code_to_sid = NULL; } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_std_char_index( FT_CMap cmap, /* T1_CMapStd */ FT_UInt32 char_code ) { T1_CMapStd t1cmap = (T1_CMapStd)cmap; FT_UInt result = 0; if ( char_code < 256 ) { FT_UInt code, n; const char* glyph_name; /* convert character code to Adobe SID string */ code = t1cmap->code_to_sid[char_code]; glyph_name = t1cmap->sid_to_string( code ); /* look for the corresponding glyph name */ for ( n = 0; n < t1cmap->num_glyphs; n++ ) { const char* gname = t1cmap->glyph_names[n]; if ( gname && gname[0] == glyph_name[0] && ft_strcmp( gname, glyph_name ) == 0 ) { result = n; break; } } } return result; } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_std_char_next( FT_CMap cmap, FT_UInt32 *pchar_code ) { FT_UInt result = 0; FT_UInt32 char_code = *pchar_code + 1; while ( char_code < 256 ) { result = t1_cmap_std_char_index( cmap, char_code ); if ( result != 0 ) goto Exit; char_code++; } char_code = 0; Exit: *pchar_code = char_code; return result; } FT_CALLBACK_DEF( FT_Error ) t1_cmap_standard_init( FT_CMap cmap, /* T1_CMapStd */ FT_Pointer pointer ) { T1_CMapStd t1cmap = (T1_CMapStd)cmap; FT_UNUSED( pointer ); t1_cmap_std_init( t1cmap, 0 ); return 0; } FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec t1_cmap_standard_class_rec = { sizeof ( T1_CMapStdRec ), (FT_CMap_InitFunc) t1_cmap_standard_init, /* init */ (FT_CMap_DoneFunc) t1_cmap_std_done, /* done */ (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, /* char_index */ (FT_CMap_CharNextFunc) t1_cmap_std_char_next, /* char_next */ (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ (FT_CMap_VariantListFunc) NULL, /* variant_list */ (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ }; FT_CALLBACK_DEF( FT_Error ) t1_cmap_expert_init( FT_CMap cmap, /* T1_CMapStd */ FT_Pointer pointer ) { T1_CMapStd t1cmap = (T1_CMapStd)cmap; FT_UNUSED( pointer ); t1_cmap_std_init( t1cmap, 1 ); return 0; } FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec t1_cmap_expert_class_rec = { sizeof ( T1_CMapStdRec ), (FT_CMap_InitFunc) t1_cmap_expert_init, /* init */ (FT_CMap_DoneFunc) t1_cmap_std_done, /* done */ (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, /* char_index */ (FT_CMap_CharNextFunc) t1_cmap_std_char_next, /* char_next */ (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ (FT_CMap_VariantListFunc) NULL, /* variant_list */ (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ }; /*************************************************************************/ /*************************************************************************/ /***** *****/ /***** TYPE1 CUSTOM ENCODING CMAP *****/ /***** *****/ /*************************************************************************/ /*************************************************************************/ FT_CALLBACK_DEF( FT_Error ) t1_cmap_custom_init( FT_CMap cmap, /* T1_CMapCustom */ FT_Pointer pointer ) { T1_CMapCustom t1cmap = (T1_CMapCustom)cmap; T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); T1_Encoding encoding = &face->type1.encoding; FT_UNUSED( pointer ); t1cmap->first = (FT_UInt)encoding->code_first; t1cmap->count = (FT_UInt)encoding->code_last - t1cmap->first; t1cmap->indices = encoding->char_index; FT_ASSERT( t1cmap->indices ); FT_ASSERT( encoding->code_first <= encoding->code_last ); return 0; } FT_CALLBACK_DEF( void ) t1_cmap_custom_done( FT_CMap cmap ) /* T1_CMapCustom */ { T1_CMapCustom t1cmap = (T1_CMapCustom)cmap; t1cmap->indices = NULL; t1cmap->first = 0; t1cmap->count = 0; } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_custom_char_index( FT_CMap cmap, /* T1_CMapCustom */ FT_UInt32 char_code ) { T1_CMapCustom t1cmap = (T1_CMapCustom)cmap; FT_UInt result = 0; if ( char_code >= t1cmap->first && char_code < ( t1cmap->first + t1cmap->count ) ) result = t1cmap->indices[char_code]; return result; } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_custom_char_next( FT_CMap cmap, /* T1_CMapCustom */ FT_UInt32 *pchar_code ) { T1_CMapCustom t1cmap = (T1_CMapCustom)cmap; FT_UInt result = 0; FT_UInt32 char_code = *pchar_code; char_code++; if ( char_code < t1cmap->first ) char_code = t1cmap->first; for ( ; char_code < ( t1cmap->first + t1cmap->count ); char_code++ ) { result = t1cmap->indices[char_code]; if ( result != 0 ) goto Exit; } char_code = 0; Exit: *pchar_code = char_code; return result; } FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec t1_cmap_custom_class_rec = { sizeof ( T1_CMapCustomRec ), (FT_CMap_InitFunc) t1_cmap_custom_init, /* init */ (FT_CMap_DoneFunc) t1_cmap_custom_done, /* done */ (FT_CMap_CharIndexFunc)t1_cmap_custom_char_index, /* char_index */ (FT_CMap_CharNextFunc) t1_cmap_custom_char_next, /* char_next */ (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ (FT_CMap_VariantListFunc) NULL, /* variant_list */ (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ }; /*************************************************************************/ /*************************************************************************/ /***** *****/ /***** TYPE1 SYNTHETIC UNICODE ENCODING CMAP *****/ /***** *****/ /*************************************************************************/ /*************************************************************************/ FT_CALLBACK_DEF( const char * ) psaux_get_glyph_name( void* face_, FT_UInt idx ) { T1_Face face = (T1_Face)face_; return face->type1.glyph_names[idx]; } FT_CALLBACK_DEF( FT_Error ) t1_cmap_unicode_init( FT_CMap cmap, /* PS_Unicodes */ FT_Pointer pointer ) { PS_Unicodes unicodes = (PS_Unicodes)cmap; T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); FT_Memory memory = FT_FACE_MEMORY( face ); FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; FT_UNUSED( pointer ); if ( !psnames->unicodes_init ) return FT_THROW( Unimplemented_Feature ); return psnames->unicodes_init( memory, unicodes, (FT_UInt)face->type1.num_glyphs, &psaux_get_glyph_name, (PS_FreeGlyphNameFunc)NULL, (FT_Pointer)face ); } FT_CALLBACK_DEF( void ) t1_cmap_unicode_done( FT_CMap cmap ) /* PS_Unicodes */ { PS_Unicodes unicodes = (PS_Unicodes)cmap; FT_Face face = FT_CMAP_FACE( cmap ); FT_Memory memory = FT_FACE_MEMORY( face ); FT_FREE( unicodes->maps ); unicodes->num_maps = 0; } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_unicode_char_index( FT_CMap cmap, /* PS_Unicodes */ FT_UInt32 char_code ) { PS_Unicodes unicodes = (PS_Unicodes)cmap; T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; return psnames->unicodes_char_index( unicodes, char_code ); } FT_CALLBACK_DEF( FT_UInt ) t1_cmap_unicode_char_next( FT_CMap cmap, /* PS_Unicodes */ FT_UInt32 *pchar_code ) { PS_Unicodes unicodes = (PS_Unicodes)cmap; T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; return psnames->unicodes_char_next( unicodes, pchar_code ); } FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec t1_cmap_unicode_class_rec = { sizeof ( PS_UnicodesRec ), (FT_CMap_InitFunc) t1_cmap_unicode_init, /* init */ (FT_CMap_DoneFunc) t1_cmap_unicode_done, /* done */ (FT_CMap_CharIndexFunc)t1_cmap_unicode_char_index, /* char_index */ (FT_CMap_CharNextFunc) t1_cmap_unicode_char_next, /* char_next */ (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ (FT_CMap_VariantListFunc) NULL, /* variant_list */ (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ }; /* END */