src/psaux/t1cmap.c

   1 /***************************************************************************/
   2 /*                                                                         */
   3 /*  t1cmap.c                                                               */
   4 /*                                                                         */
   5 /*    Type 1 character map support (body).                                 */
   6 /*                                                                         */
   7 /*  Copyright 2002, 2003, 2006, 2007, 2012 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
  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    = 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 )
  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 )
  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 )
  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 )
 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 )
 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 )
 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   = 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 )
 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 )
 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 )
 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 * )
 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 )
 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                                    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 )
 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 )
 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 )
 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 */