1/***************************************************************************/
2/*                                                                         */
3/*  t42drivr.c                                                             */
4/*                                                                         */
5/*    High-level Type 42 driver interface (body).                          */
6/*                                                                         */
7/*  Copyright 2002-2018 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  trace_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                      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 */
247