1 /**************************************************************************** 2 * 3 * t1cmap.c 4 * 5 * Type 1 character map support (body). 6 * 7 * Copyright 2002-2018 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 "t1cmap.h" 20 21 #include FT_INTERNAL_DEBUG_H 22 23 #include "psauxerr.h" 24 25 26 /*************************************************************************/ 27 /*************************************************************************/ 28 /***** *****/ 29 /***** TYPE1 STANDARD (AND EXPERT) ENCODING CMAPS *****/ 30 /***** *****/ 31 /*************************************************************************/ 32 /*************************************************************************/ 33 34 static void t1_cmap_std_init(T1_CMapStd cmap,FT_Int is_expert)35 t1_cmap_std_init( T1_CMapStd cmap, 36 FT_Int is_expert ) 37 { 38 T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); 39 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 40 41 42 cmap->num_glyphs = (FT_UInt)face->type1.num_glyphs; 43 cmap->glyph_names = (const char* const*)face->type1.glyph_names; 44 cmap->sid_to_string = psnames->adobe_std_strings; 45 cmap->code_to_sid = is_expert ? psnames->adobe_expert_encoding 46 : psnames->adobe_std_encoding; 47 48 FT_ASSERT( cmap->code_to_sid ); 49 } 50 51 52 FT_CALLBACK_DEF( void ) t1_cmap_std_done(T1_CMapStd cmap)53 t1_cmap_std_done( T1_CMapStd cmap ) 54 { 55 cmap->num_glyphs = 0; 56 cmap->glyph_names = NULL; 57 cmap->sid_to_string = NULL; 58 cmap->code_to_sid = NULL; 59 } 60 61 62 FT_CALLBACK_DEF( FT_UInt ) t1_cmap_std_char_index(T1_CMapStd cmap,FT_UInt32 char_code)63 t1_cmap_std_char_index( T1_CMapStd cmap, 64 FT_UInt32 char_code ) 65 { 66 FT_UInt result = 0; 67 68 69 if ( char_code < 256 ) 70 { 71 FT_UInt code, n; 72 const char* glyph_name; 73 74 75 /* convert character code to Adobe SID string */ 76 code = cmap->code_to_sid[char_code]; 77 glyph_name = cmap->sid_to_string( code ); 78 79 /* look for the corresponding glyph name */ 80 for ( n = 0; n < cmap->num_glyphs; n++ ) 81 { 82 const char* gname = cmap->glyph_names[n]; 83 84 85 if ( gname && gname[0] == glyph_name[0] && 86 ft_strcmp( gname, glyph_name ) == 0 ) 87 { 88 result = n; 89 break; 90 } 91 } 92 } 93 94 return result; 95 } 96 97 98 FT_CALLBACK_DEF( FT_UInt32 ) t1_cmap_std_char_next(T1_CMapStd cmap,FT_UInt32 * pchar_code)99 t1_cmap_std_char_next( T1_CMapStd cmap, 100 FT_UInt32 *pchar_code ) 101 { 102 FT_UInt result = 0; 103 FT_UInt32 char_code = *pchar_code + 1; 104 105 106 while ( char_code < 256 ) 107 { 108 result = t1_cmap_std_char_index( cmap, char_code ); 109 if ( result != 0 ) 110 goto Exit; 111 112 char_code++; 113 } 114 char_code = 0; 115 116 Exit: 117 *pchar_code = char_code; 118 return result; 119 } 120 121 122 FT_CALLBACK_DEF( FT_Error ) t1_cmap_standard_init(T1_CMapStd cmap,FT_Pointer pointer)123 t1_cmap_standard_init( T1_CMapStd cmap, 124 FT_Pointer pointer ) 125 { 126 FT_UNUSED( pointer ); 127 128 129 t1_cmap_std_init( cmap, 0 ); 130 return 0; 131 } 132 133 134 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 135 t1_cmap_standard_class_rec = 136 { 137 sizeof ( T1_CMapStdRec ), 138 139 (FT_CMap_InitFunc) t1_cmap_standard_init, /* init */ 140 (FT_CMap_DoneFunc) t1_cmap_std_done, /* done */ 141 (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, /* char_index */ 142 (FT_CMap_CharNextFunc) t1_cmap_std_char_next, /* char_next */ 143 144 (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ 145 (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ 146 (FT_CMap_VariantListFunc) NULL, /* variant_list */ 147 (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ 148 (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ 149 }; 150 151 152 FT_CALLBACK_DEF( FT_Error ) t1_cmap_expert_init(T1_CMapStd cmap,FT_Pointer pointer)153 t1_cmap_expert_init( T1_CMapStd cmap, 154 FT_Pointer pointer ) 155 { 156 FT_UNUSED( pointer ); 157 158 159 t1_cmap_std_init( cmap, 1 ); 160 return 0; 161 } 162 163 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 164 t1_cmap_expert_class_rec = 165 { 166 sizeof ( T1_CMapStdRec ), 167 168 (FT_CMap_InitFunc) t1_cmap_expert_init, /* init */ 169 (FT_CMap_DoneFunc) t1_cmap_std_done, /* done */ 170 (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, /* char_index */ 171 (FT_CMap_CharNextFunc) t1_cmap_std_char_next, /* char_next */ 172 173 (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ 174 (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ 175 (FT_CMap_VariantListFunc) NULL, /* variant_list */ 176 (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ 177 (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ 178 }; 179 180 181 /*************************************************************************/ 182 /*************************************************************************/ 183 /***** *****/ 184 /***** TYPE1 CUSTOM ENCODING CMAP *****/ 185 /***** *****/ 186 /*************************************************************************/ 187 /*************************************************************************/ 188 189 190 FT_CALLBACK_DEF( FT_Error ) t1_cmap_custom_init(T1_CMapCustom cmap,FT_Pointer pointer)191 t1_cmap_custom_init( T1_CMapCustom cmap, 192 FT_Pointer pointer ) 193 { 194 T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); 195 T1_Encoding encoding = &face->type1.encoding; 196 197 FT_UNUSED( pointer ); 198 199 200 cmap->first = (FT_UInt)encoding->code_first; 201 cmap->count = (FT_UInt)encoding->code_last - cmap->first; 202 cmap->indices = encoding->char_index; 203 204 FT_ASSERT( cmap->indices ); 205 FT_ASSERT( encoding->code_first <= encoding->code_last ); 206 207 return 0; 208 } 209 210 211 FT_CALLBACK_DEF( void ) t1_cmap_custom_done(T1_CMapCustom cmap)212 t1_cmap_custom_done( T1_CMapCustom cmap ) 213 { 214 cmap->indices = NULL; 215 cmap->first = 0; 216 cmap->count = 0; 217 } 218 219 220 FT_CALLBACK_DEF( FT_UInt ) t1_cmap_custom_char_index(T1_CMapCustom cmap,FT_UInt32 char_code)221 t1_cmap_custom_char_index( T1_CMapCustom cmap, 222 FT_UInt32 char_code ) 223 { 224 FT_UInt result = 0; 225 226 227 if ( ( char_code >= cmap->first ) && 228 ( char_code < ( cmap->first + cmap->count ) ) ) 229 result = cmap->indices[char_code]; 230 231 return result; 232 } 233 234 235 FT_CALLBACK_DEF( FT_UInt32 ) t1_cmap_custom_char_next(T1_CMapCustom cmap,FT_UInt32 * pchar_code)236 t1_cmap_custom_char_next( T1_CMapCustom cmap, 237 FT_UInt32 *pchar_code ) 238 { 239 FT_UInt result = 0; 240 FT_UInt32 char_code = *pchar_code; 241 242 243 char_code++; 244 245 if ( char_code < cmap->first ) 246 char_code = cmap->first; 247 248 for ( ; char_code < ( cmap->first + cmap->count ); char_code++ ) 249 { 250 result = cmap->indices[char_code]; 251 if ( result != 0 ) 252 goto Exit; 253 } 254 255 char_code = 0; 256 257 Exit: 258 *pchar_code = char_code; 259 return result; 260 } 261 262 263 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 264 t1_cmap_custom_class_rec = 265 { 266 sizeof ( T1_CMapCustomRec ), 267 268 (FT_CMap_InitFunc) t1_cmap_custom_init, /* init */ 269 (FT_CMap_DoneFunc) t1_cmap_custom_done, /* done */ 270 (FT_CMap_CharIndexFunc)t1_cmap_custom_char_index, /* char_index */ 271 (FT_CMap_CharNextFunc) t1_cmap_custom_char_next, /* char_next */ 272 273 (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ 274 (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ 275 (FT_CMap_VariantListFunc) NULL, /* variant_list */ 276 (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ 277 (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ 278 }; 279 280 281 /*************************************************************************/ 282 /*************************************************************************/ 283 /***** *****/ 284 /***** TYPE1 SYNTHETIC UNICODE ENCODING CMAP *****/ 285 /***** *****/ 286 /*************************************************************************/ 287 /*************************************************************************/ 288 289 FT_CALLBACK_DEF( const char * ) psaux_get_glyph_name(T1_Face face,FT_UInt idx)290 psaux_get_glyph_name( T1_Face face, 291 FT_UInt idx ) 292 { 293 return face->type1.glyph_names[idx]; 294 } 295 296 297 FT_CALLBACK_DEF( FT_Error ) t1_cmap_unicode_init(PS_Unicodes unicodes,FT_Pointer pointer)298 t1_cmap_unicode_init( PS_Unicodes unicodes, 299 FT_Pointer pointer ) 300 { 301 T1_Face face = (T1_Face)FT_CMAP_FACE( unicodes ); 302 FT_Memory memory = FT_FACE_MEMORY( face ); 303 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 304 305 FT_UNUSED( pointer ); 306 307 308 return psnames->unicodes_init( memory, 309 unicodes, 310 (FT_UInt)face->type1.num_glyphs, 311 (PS_GetGlyphNameFunc)&psaux_get_glyph_name, 312 (PS_FreeGlyphNameFunc)NULL, 313 (FT_Pointer)face ); 314 } 315 316 317 FT_CALLBACK_DEF( void ) t1_cmap_unicode_done(PS_Unicodes unicodes)318 t1_cmap_unicode_done( PS_Unicodes unicodes ) 319 { 320 FT_Face face = FT_CMAP_FACE( unicodes ); 321 FT_Memory memory = FT_FACE_MEMORY( face ); 322 323 324 FT_FREE( unicodes->maps ); 325 unicodes->num_maps = 0; 326 } 327 328 329 FT_CALLBACK_DEF( FT_UInt ) t1_cmap_unicode_char_index(PS_Unicodes unicodes,FT_UInt32 char_code)330 t1_cmap_unicode_char_index( PS_Unicodes unicodes, 331 FT_UInt32 char_code ) 332 { 333 T1_Face face = (T1_Face)FT_CMAP_FACE( unicodes ); 334 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 335 336 337 return psnames->unicodes_char_index( unicodes, char_code ); 338 } 339 340 341 FT_CALLBACK_DEF( FT_UInt32 ) t1_cmap_unicode_char_next(PS_Unicodes unicodes,FT_UInt32 * pchar_code)342 t1_cmap_unicode_char_next( PS_Unicodes unicodes, 343 FT_UInt32 *pchar_code ) 344 { 345 T1_Face face = (T1_Face)FT_CMAP_FACE( unicodes ); 346 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 347 348 349 return psnames->unicodes_char_next( unicodes, pchar_code ); 350 } 351 352 353 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 354 t1_cmap_unicode_class_rec = 355 { 356 sizeof ( PS_UnicodesRec ), 357 358 (FT_CMap_InitFunc) t1_cmap_unicode_init, /* init */ 359 (FT_CMap_DoneFunc) t1_cmap_unicode_done, /* done */ 360 (FT_CMap_CharIndexFunc)t1_cmap_unicode_char_index, /* char_index */ 361 (FT_CMap_CharNextFunc) t1_cmap_unicode_char_next, /* char_next */ 362 363 (FT_CMap_CharVarIndexFunc) NULL, /* char_var_index */ 364 (FT_CMap_CharVarIsDefaultFunc)NULL, /* char_var_default */ 365 (FT_CMap_VariantListFunc) NULL, /* variant_list */ 366 (FT_CMap_CharVariantListFunc) NULL, /* charvariant_list */ 367 (FT_CMap_VariantCharListFunc) NULL /* variantchar_list */ 368 }; 369 370 371 /* END */ 372