1 /***************************************************************************/ 2 /* */ 3 /* t1cmap.c */ 4 /* */ 5 /* Type 1 character map support (body). */ 6 /* */ 7 /* Copyright 2002-2015 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 != NULL ); 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, 140 (FT_CMap_DoneFunc) t1_cmap_std_done, 141 (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, 142 (FT_CMap_CharNextFunc) t1_cmap_std_char_next, 143 144 NULL, NULL, NULL, NULL, NULL 145 }; 146 147 148 FT_CALLBACK_DEF( FT_Error ) t1_cmap_expert_init(T1_CMapStd cmap,FT_Pointer pointer)149 t1_cmap_expert_init( T1_CMapStd cmap, 150 FT_Pointer pointer ) 151 { 152 FT_UNUSED( pointer ); 153 154 155 t1_cmap_std_init( cmap, 1 ); 156 return 0; 157 } 158 159 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 160 t1_cmap_expert_class_rec = 161 { 162 sizeof ( T1_CMapStdRec ), 163 164 (FT_CMap_InitFunc) t1_cmap_expert_init, 165 (FT_CMap_DoneFunc) t1_cmap_std_done, 166 (FT_CMap_CharIndexFunc)t1_cmap_std_char_index, 167 (FT_CMap_CharNextFunc) t1_cmap_std_char_next, 168 169 NULL, NULL, NULL, NULL, NULL 170 }; 171 172 173 /*************************************************************************/ 174 /*************************************************************************/ 175 /***** *****/ 176 /***** TYPE1 CUSTOM ENCODING CMAP *****/ 177 /***** *****/ 178 /*************************************************************************/ 179 /*************************************************************************/ 180 181 182 FT_CALLBACK_DEF( FT_Error ) t1_cmap_custom_init(T1_CMapCustom cmap,FT_Pointer pointer)183 t1_cmap_custom_init( T1_CMapCustom cmap, 184 FT_Pointer pointer ) 185 { 186 T1_Face face = (T1_Face)FT_CMAP_FACE( cmap ); 187 T1_Encoding encoding = &face->type1.encoding; 188 189 FT_UNUSED( pointer ); 190 191 192 cmap->first = (FT_UInt)encoding->code_first; 193 cmap->count = (FT_UInt)encoding->code_last - cmap->first; 194 cmap->indices = encoding->char_index; 195 196 FT_ASSERT( cmap->indices != NULL ); 197 FT_ASSERT( encoding->code_first <= encoding->code_last ); 198 199 return 0; 200 } 201 202 203 FT_CALLBACK_DEF( void ) t1_cmap_custom_done(T1_CMapCustom cmap)204 t1_cmap_custom_done( T1_CMapCustom cmap ) 205 { 206 cmap->indices = NULL; 207 cmap->first = 0; 208 cmap->count = 0; 209 } 210 211 212 FT_CALLBACK_DEF( FT_UInt ) t1_cmap_custom_char_index(T1_CMapCustom cmap,FT_UInt32 char_code)213 t1_cmap_custom_char_index( T1_CMapCustom cmap, 214 FT_UInt32 char_code ) 215 { 216 FT_UInt result = 0; 217 218 219 if ( ( char_code >= cmap->first ) && 220 ( char_code < ( cmap->first + cmap->count ) ) ) 221 result = cmap->indices[char_code]; 222 223 return result; 224 } 225 226 227 FT_CALLBACK_DEF( FT_UInt32 ) t1_cmap_custom_char_next(T1_CMapCustom cmap,FT_UInt32 * pchar_code)228 t1_cmap_custom_char_next( T1_CMapCustom cmap, 229 FT_UInt32 *pchar_code ) 230 { 231 FT_UInt result = 0; 232 FT_UInt32 char_code = *pchar_code; 233 234 235 ++char_code; 236 237 if ( char_code < cmap->first ) 238 char_code = cmap->first; 239 240 for ( ; char_code < ( cmap->first + cmap->count ); char_code++ ) 241 { 242 result = cmap->indices[char_code]; 243 if ( result != 0 ) 244 goto Exit; 245 } 246 247 char_code = 0; 248 249 Exit: 250 *pchar_code = char_code; 251 return result; 252 } 253 254 255 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 256 t1_cmap_custom_class_rec = 257 { 258 sizeof ( T1_CMapCustomRec ), 259 260 (FT_CMap_InitFunc) t1_cmap_custom_init, 261 (FT_CMap_DoneFunc) t1_cmap_custom_done, 262 (FT_CMap_CharIndexFunc)t1_cmap_custom_char_index, 263 (FT_CMap_CharNextFunc) t1_cmap_custom_char_next, 264 265 NULL, NULL, NULL, NULL, NULL 266 }; 267 268 269 /*************************************************************************/ 270 /*************************************************************************/ 271 /***** *****/ 272 /***** TYPE1 SYNTHETIC UNICODE ENCODING CMAP *****/ 273 /***** *****/ 274 /*************************************************************************/ 275 /*************************************************************************/ 276 277 FT_CALLBACK_DEF( const char * ) psaux_get_glyph_name(T1_Face face,FT_UInt idx)278 psaux_get_glyph_name( T1_Face face, 279 FT_UInt idx ) 280 { 281 return face->type1.glyph_names[idx]; 282 } 283 284 285 FT_CALLBACK_DEF( FT_Error ) t1_cmap_unicode_init(PS_Unicodes unicodes,FT_Pointer pointer)286 t1_cmap_unicode_init( PS_Unicodes unicodes, 287 FT_Pointer pointer ) 288 { 289 T1_Face face = (T1_Face)FT_CMAP_FACE( unicodes ); 290 FT_Memory memory = FT_FACE_MEMORY( face ); 291 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 292 293 FT_UNUSED( pointer ); 294 295 296 return psnames->unicodes_init( memory, 297 unicodes, 298 (FT_UInt)face->type1.num_glyphs, 299 (PS_GetGlyphNameFunc)&psaux_get_glyph_name, 300 (PS_FreeGlyphNameFunc)NULL, 301 (FT_Pointer)face ); 302 } 303 304 305 FT_CALLBACK_DEF( void ) t1_cmap_unicode_done(PS_Unicodes unicodes)306 t1_cmap_unicode_done( PS_Unicodes unicodes ) 307 { 308 FT_Face face = FT_CMAP_FACE( unicodes ); 309 FT_Memory memory = FT_FACE_MEMORY( face ); 310 311 312 FT_FREE( unicodes->maps ); 313 unicodes->num_maps = 0; 314 } 315 316 317 FT_CALLBACK_DEF( FT_UInt ) t1_cmap_unicode_char_index(PS_Unicodes unicodes,FT_UInt32 char_code)318 t1_cmap_unicode_char_index( PS_Unicodes unicodes, 319 FT_UInt32 char_code ) 320 { 321 T1_Face face = (T1_Face)FT_CMAP_FACE( unicodes ); 322 FT_Service_PsCMaps psnames = (FT_Service_PsCMaps)face->psnames; 323 324 325 return psnames->unicodes_char_index( unicodes, char_code ); 326 } 327 328 329 FT_CALLBACK_DEF( FT_UInt32 ) t1_cmap_unicode_char_next(PS_Unicodes unicodes,FT_UInt32 * pchar_code)330 t1_cmap_unicode_char_next( PS_Unicodes unicodes, 331 FT_UInt32 *pchar_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_next( unicodes, pchar_code ); 338 } 339 340 341 FT_CALLBACK_TABLE_DEF const FT_CMap_ClassRec 342 t1_cmap_unicode_class_rec = 343 { 344 sizeof ( PS_UnicodesRec ), 345 346 (FT_CMap_InitFunc) t1_cmap_unicode_init, 347 (FT_CMap_DoneFunc) t1_cmap_unicode_done, 348 (FT_CMap_CharIndexFunc)t1_cmap_unicode_char_index, 349 (FT_CMap_CharNextFunc) t1_cmap_unicode_char_next, 350 351 NULL, NULL, NULL, NULL, NULL 352 }; 353 354 355 /* END */ 356