src/type42/t42drivr.c

   1 /****************************************************************************
   2  *
   3  * t42drivr.c
   4  *
   5  *   High-level Type 42 driver interface (body).
   6  *
   7  * Copyright (C) 2002-2019 by
   8  * Roberto Alameda.
   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   /**************************************************************************
  20    *
  21    * This driver implements Type42 fonts as described in the
  22    * Technical Note #5012 from Adobe, with these limitations:
  23    *
  24    * 1) CID Fonts are not currently supported.
  25    * 2) Incremental fonts making use of the GlyphDirectory keyword
  26    *    will be loaded, but the rendering will be using the TrueType
  27    *    tables.
  28    * 3) As for Type1 fonts, CDevProc is not supported.
  29    * 4) The Metrics dictionary is not supported.
  30    * 5) AFM metrics are not supported.
  31    *
  32    * In other words, this driver supports Type42 fonts derived from
  33    * TrueType fonts in a non-CID manner, as done by usual conversion
  34    * programs.
  35    *
  36    */
  37
  38
  39 #include "t42drivr.h"
  40 #include "t42objs.h"
  41 #include "t42error.h"
  42 #include FT_INTERNAL_DEBUG_H
  43
  44 #include FT_SERVICE_FONT_FORMAT_H
  45 #include FT_SERVICE_GLYPH_DICT_H
  46 #include FT_SERVICE_POSTSCRIPT_NAME_H
  47 #include FT_SERVICE_POSTSCRIPT_INFO_H
  48
  49 #undef  FT_COMPONENT
  50 #define FT_COMPONENT  t42
  51
  52
  53   /*
  54    *
  55    * GLYPH DICT SERVICE
  56    *
  57    */
  58
  59   static FT_Error
  60   t42_get_glyph_name( T42_Face    face,
  61                       FT_UInt     glyph_index,
  62                       FT_Pointer  buffer,
  63                       FT_UInt     buffer_max )
  64   {
  65     FT_STRCPYN( buffer, face->type1.glyph_names[glyph_index], buffer_max );
  66
  67     return FT_Err_Ok;
  68   }
  69
  70
  71   static FT_UInt
  72   t42_get_name_index( T42_Face          face,
  73                       const FT_String*  glyph_name )
  74   {
  75     FT_Int  i;
  76
  77
  78     for ( i = 0; i < face->type1.num_glyphs; i++ )
  79     {
  80       FT_String*  gname = face->type1.glyph_names[i];
  81
  82
  83       if ( glyph_name[0] == gname[0] && !ft_strcmp( glyph_name, gname ) )
  84         return (FT_UInt)ft_strtol( (const char *)face->type1.charstrings[i],
  85                                    NULL, 10 );
  86     }
  87
  88     return 0;
  89   }
  90
  91
  92   static const FT_Service_GlyphDictRec  t42_service_glyph_dict =
  93   {
  94     (FT_GlyphDict_GetNameFunc)  t42_get_glyph_name,    /* get_name   */
  95     (FT_GlyphDict_NameIndexFunc)t42_get_name_index     /* name_index */
  96   };
  97
  98
  99   /*
 100    *
 101    * POSTSCRIPT NAME SERVICE
 102    *
 103    */
 104
 105   static const char*
 106   t42_get_ps_font_name( T42_Face  face )
 107   {
 108     return (const char*)face->type1.font_name;
 109   }
 110
 111
 112   static const FT_Service_PsFontNameRec  t42_service_ps_font_name =
 113   {
 114     (FT_PsName_GetFunc)t42_get_ps_font_name   /* get_ps_font_name */
 115   };
 116
 117
 118   /*
 119    *
 120    * POSTSCRIPT INFO SERVICE
 121    *
 122    */
 123
 124   static FT_Error
 125   t42_ps_get_font_info( FT_Face          face,
 126                         PS_FontInfoRec*  afont_info )
 127   {
 128     *afont_info = ((T42_Face)face)->type1.font_info;
 129
 130     return FT_Err_Ok;
 131   }
 132
 133
 134   static FT_Error
 135   t42_ps_get_font_extra( FT_Face           face,
 136                          PS_FontExtraRec*  afont_extra )
 137   {
 138     *afont_extra = ((T42_Face)face)->type1.font_extra;
 139
 140     return FT_Err_Ok;
 141   }
 142
 143
 144   static FT_Int
 145   t42_ps_has_glyph_names( FT_Face  face )
 146   {
 147     FT_UNUSED( face );
 148
 149     return 1;
 150   }
 151
 152
 153   static FT_Error
 154   t42_ps_get_font_private( FT_Face         face,
 155                            PS_PrivateRec*  afont_private )
 156   {
 157     *afont_private = ((T42_Face)face)->type1.private_dict;
 158
 159     return FT_Err_Ok;
 160   }
 161
 162
 163   static const FT_Service_PsInfoRec  t42_service_ps_info =
 164   {
 165     (PS_GetFontInfoFunc)   t42_ps_get_font_info,    /* ps_get_font_info    */
 166     (PS_GetFontExtraFunc)  t42_ps_get_font_extra,   /* ps_get_font_extra   */
 167     (PS_HasGlyphNamesFunc) t42_ps_has_glyph_names,  /* ps_has_glyph_names  */
 168     (PS_GetFontPrivateFunc)t42_ps_get_font_private, /* ps_get_font_private */
 169     /* not implemented */
 170     (PS_GetFontValueFunc)  NULL                     /* ps_get_font_value   */
 171   };
 172
 173
 174   /*
 175    *
 176    * SERVICE LIST
 177    *
 178    */
 179
 180   static const FT_ServiceDescRec  t42_services[] =
 181   {
 182     { FT_SERVICE_ID_GLYPH_DICT,           &t42_service_glyph_dict },
 183     { FT_SERVICE_ID_POSTSCRIPT_FONT_NAME, &t42_service_ps_font_name },
 184     { FT_SERVICE_ID_POSTSCRIPT_INFO,      &t42_service_ps_info },
 185     { FT_SERVICE_ID_FONT_FORMAT,          FT_FONT_FORMAT_TYPE_42 },
 186     { NULL, NULL }
 187   };
 188
 189
 190   FT_CALLBACK_DEF( FT_Module_Interface )
 191   T42_Get_Interface( FT_Module         module,
 192                      const FT_String*  t42_interface )
 193   {
 194     FT_UNUSED( module );
 195
 196     return ft_service_list_lookup( t42_services, t42_interface );
 197   }
 198
 199
 200   const FT_Driver_ClassRec  t42_driver_class =
 201   {
 202     {
 203       FT_MODULE_FONT_DRIVER       |
 204       FT_MODULE_DRIVER_SCALABLE   |
 205 #ifdef TT_USE_BYTECODE_INTERPRETER
 206       FT_MODULE_DRIVER_HAS_HINTER,
 207 #else
 208       0,
 209 #endif
 210
 211       sizeof ( T42_DriverRec ),
 212
 213       "type42",
 214       0x10000L,
 215       0x20000L,
 216
 217       NULL,    /* module-specific interface */
 218
 219       T42_Driver_Init,          /* FT_Module_Constructor  module_init   */
 220       T42_Driver_Done,          /* FT_Module_Destructor   module_done   */
 221       T42_Get_Interface,        /* FT_Module_Requester    get_interface */
 222     },
 223
 224     sizeof ( T42_FaceRec ),
 225     sizeof ( T42_SizeRec ),
 226     sizeof ( T42_GlyphSlotRec ),
 227
 228     T42_Face_Init,              /* FT_Face_InitFunc  init_face */
 229     T42_Face_Done,              /* FT_Face_DoneFunc  done_face */
 230     T42_Size_Init,              /* FT_Size_InitFunc  init_size */
 231     T42_Size_Done,              /* FT_Size_DoneFunc  done_size */
 232     T42_GlyphSlot_Init,         /* FT_Slot_InitFunc  init_slot */
 233     T42_GlyphSlot_Done,         /* FT_Slot_DoneFunc  done_slot */
 234
 235     T42_GlyphSlot_Load,         /* FT_Slot_LoadFunc  load_glyph */
 236
 237     NULL,                       /* FT_Face_GetKerningFunc   get_kerning  */
 238     NULL,                       /* FT_Face_AttachFunc       attach_file  */
 239     NULL,                       /* FT_Face_GetAdvancesFunc  get_advances */
 240
 241     T42_Size_Request,           /* FT_Size_RequestFunc  request_size */
 242     T42_Size_Select             /* FT_Size_SelectFunc   select_size  */
 243   };
 244
 245
 246 /* END */