cffdrivr.c revision f463818dd9146e11105c0572fb119e757eb47768
1beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/***************************************************************************/
2beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*                                                                         */
3beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*  cffdrivr.c                                                             */
4beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*                                                                         */
5beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*    OpenType font driver implementation (body).                          */
6beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*                                                                         */
7beca12a56c0772fc8263ad7ca12ca022b8671c1csbaig/*  Copyright 1996-2001, 2002, 2003, 2004, 2005, 2006, 2007 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 <ft2build.h>
20#include FT_FREETYPE_H
21#include FT_INTERNAL_DEBUG_H
22#include FT_INTERNAL_STREAM_H
23#include FT_INTERNAL_SFNT_H
24#include FT_TRUETYPE_IDS_H
25#include FT_SERVICE_POSTSCRIPT_CMAPS_H
26#include FT_SERVICE_POSTSCRIPT_INFO_H
27#include FT_SERVICE_TT_CMAP_H
28
29#include "cffdrivr.h"
30#include "cffgload.h"
31#include "cffload.h"
32#include "cffcmap.h"
33
34#include "cfferrs.h"
35
36#include FT_SERVICE_XFREE86_NAME_H
37#include FT_SERVICE_GLYPH_DICT_H
38
39  /*************************************************************************/
40  /*                                                                       */
41  /* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */
42  /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */
43  /* messages during execution.                                            */
44  /*                                                                       */
45#undef  FT_COMPONENT
46#define FT_COMPONENT  trace_cffdriver
47
48
49  /*************************************************************************/
50  /*************************************************************************/
51  /*************************************************************************/
52  /****                                                                 ****/
53  /****                                                                 ****/
54  /****                          F A C E S                              ****/
55  /****                                                                 ****/
56  /****                                                                 ****/
57  /*************************************************************************/
58  /*************************************************************************/
59  /*************************************************************************/
60
61
62#undef  PAIR_TAG
63#define PAIR_TAG( left, right )  ( ( (FT_ULong)left << 16 ) | \
64                                     (FT_ULong)right        )
65
66
67  /*************************************************************************/
68  /*                                                                       */
69  /* <Function>                                                            */
70  /*    cff_get_kerning                                                    */
71  /*                                                                       */
72  /* <Description>                                                         */
73  /*    A driver method used to return the kerning vector between two      */
74  /*    glyphs of the same face.                                           */
75  /*                                                                       */
76  /* <Input>                                                               */
77  /*    face        :: A handle to the source face object.                 */
78  /*                                                                       */
79  /*    left_glyph  :: The index of the left glyph in the kern pair.       */
80  /*                                                                       */
81  /*    right_glyph :: The index of the right glyph in the kern pair.      */
82  /*                                                                       */
83  /* <Output>                                                              */
84  /*    kerning     :: The kerning vector.  This is in font units for      */
85  /*                   scalable formats, and in pixels for fixed-sizes     */
86  /*                   formats.                                            */
87  /*                                                                       */
88  /* <Return>                                                              */
89  /*    FreeType error code.  0 means success.                             */
90  /*                                                                       */
91  /* <Note>                                                                */
92  /*    Only horizontal layouts (left-to-right & right-to-left) are        */
93  /*    supported by this function.  Other layouts, or more sophisticated  */
94  /*    kernings, are out of scope of this method (the basic driver        */
95  /*    interface is meant to be simple).                                  */
96  /*                                                                       */
97  /*    They can be implemented by format-specific interfaces.             */
98  /*                                                                       */
99  FT_CALLBACK_DEF( FT_Error )
100  cff_get_kerning( FT_Face     ttface,          /* TT_Face */
101                   FT_UInt     left_glyph,
102                   FT_UInt     right_glyph,
103                   FT_Vector*  kerning )
104  {
105    TT_Face       face = (TT_Face)ttface;
106    SFNT_Service  sfnt = (SFNT_Service)face->sfnt;
107
108
109    kerning->x = 0;
110    kerning->y = 0;
111
112    if ( sfnt )
113      kerning->x = sfnt->get_kerning( face, left_glyph, right_glyph );
114
115    return CFF_Err_Ok;
116  }
117
118
119#undef PAIR_TAG
120
121
122  /*************************************************************************/
123  /*                                                                       */
124  /* <Function>                                                            */
125  /*    Load_Glyph                                                         */
126  /*                                                                       */
127  /* <Description>                                                         */
128  /*    A driver method used to load a glyph within a given glyph slot.    */
129  /*                                                                       */
130  /* <Input>                                                               */
131  /*    slot        :: A handle to the target slot object where the glyph  */
132  /*                   will be loaded.                                     */
133  /*                                                                       */
134  /*    size        :: A handle to the source face size at which the glyph */
135  /*                   must be scaled, loaded, etc.                        */
136  /*                                                                       */
137  /*    glyph_index :: The index of the glyph in the font file.            */
138  /*                                                                       */
139  /*    load_flags  :: A flag indicating what to load for this glyph.  The */
140  /*                   FT_LOAD_??? constants can be used to control the    */
141  /*                   glyph loading process (e.g., whether the outline    */
142  /*                   should be scaled, whether to load bitmaps or not,   */
143  /*                   whether to hint the outline, etc).                  */
144  /*                                                                       */
145  /* <Return>                                                              */
146  /*    FreeType error code.  0 means success.                             */
147  /*                                                                       */
148  FT_CALLBACK_DEF( FT_Error )
149  Load_Glyph( FT_GlyphSlot  cffslot,        /* CFF_GlyphSlot */
150              FT_Size       cffsize,        /* CFF_Size      */
151              FT_UInt       glyph_index,
152              FT_Int32      load_flags )
153  {
154    FT_Error  error;
155    CFF_GlyphSlot  slot = (CFF_GlyphSlot)cffslot;
156    CFF_Size       size = (CFF_Size)cffsize;
157
158
159    if ( !slot )
160      return CFF_Err_Invalid_Slot_Handle;
161
162    /* check whether we want a scaled outline or bitmap */
163    if ( !size )
164      load_flags |= FT_LOAD_NO_SCALE | FT_LOAD_NO_HINTING;
165
166    if ( load_flags & FT_LOAD_NO_SCALE )
167      size = NULL;
168
169    /* reset the size object if necessary */
170    if ( size )
171    {
172      /* these two objects must have the same parent */
173      if ( cffsize->face != cffslot->face )
174        return CFF_Err_Invalid_Face_Handle;
175    }
176
177    /* now load the glyph outline if necessary */
178    error = cff_slot_load( slot, size, glyph_index, load_flags );
179
180    /* force drop-out mode to 2 - irrelevant now */
181    /* slot->outline.dropout_mode = 2; */
182
183    return error;
184  }
185
186
187 /*
188  *  GLYPH DICT SERVICE
189  *
190  */
191
192  static FT_Error
193  cff_get_glyph_name( CFF_Face    face,
194                      FT_UInt     glyph_index,
195                      FT_Pointer  buffer,
196                      FT_UInt     buffer_max )
197  {
198    CFF_Font            font   = (CFF_Font)face->extra.data;
199    FT_Memory           memory = FT_FACE_MEMORY( face );
200    FT_String*          gname;
201    FT_UShort           sid;
202    FT_Service_PsCMaps  psnames;
203    FT_Error            error;
204
205
206    FT_FACE_FIND_GLOBAL_SERVICE( face, psnames, POSTSCRIPT_CMAPS );
207    if ( !psnames )
208    {
209      FT_ERROR(( "cff_get_glyph_name:" ));
210      FT_ERROR(( " cannot get glyph name from CFF & CEF fonts\n" ));
211      FT_ERROR(( "                   " ));
212      FT_ERROR(( " without the `PSNames' module\n" ));
213      error = CFF_Err_Unknown_File_Format;
214      goto Exit;
215    }
216
217    /* first, locate the sid in the charset table */
218    sid = font->charset.sids[glyph_index];
219
220    /* now, lookup the name itself */
221    gname = cff_index_get_sid_string( &font->string_index, sid, psnames );
222
223    if ( gname )
224      FT_STRCPYN( buffer, gname, buffer_max );
225
226    FT_FREE( gname );
227    error = CFF_Err_Ok;
228
229    Exit:
230      return error;
231  }
232
233
234  static FT_UInt
235  cff_get_name_index( CFF_Face    face,
236                      FT_String*  glyph_name )
237  {
238    CFF_Font            cff;
239    CFF_Charset         charset;
240    FT_Service_PsCMaps  psnames;
241    FT_Memory           memory = FT_FACE_MEMORY( face );
242    FT_String*          name;
243    FT_UShort           sid;
244    FT_UInt             i;
245    FT_Int              result;
246
247
248    cff     = (CFF_FontRec *)face->extra.data;
249    charset = &cff->charset;
250
251    FT_FACE_FIND_GLOBAL_SERVICE( face, psnames, POSTSCRIPT_CMAPS );
252    if ( !psnames )
253      return 0;
254
255    for ( i = 0; i < cff->num_glyphs; i++ )
256    {
257      sid = charset->sids[i];
258
259      if ( sid > 390 )
260        name = cff_index_get_name( &cff->string_index, sid - 391 );
261      else
262        name = (FT_String *)psnames->adobe_std_strings( sid );
263
264      if ( !name )
265        continue;
266
267      result = ft_strcmp( glyph_name, name );
268
269      if ( sid > 390 )
270        FT_FREE( name );
271
272      if ( !result )
273        return i;
274    }
275
276    return 0;
277  }
278
279
280  static const FT_Service_GlyphDictRec  cff_service_glyph_dict =
281  {
282    (FT_GlyphDict_GetNameFunc)  cff_get_glyph_name,
283    (FT_GlyphDict_NameIndexFunc)cff_get_name_index,
284  };
285
286
287 /*
288  *  POSTSCRIPT INFO SERVICE
289  *
290  */
291
292  static FT_Int
293  cff_ps_has_glyph_names( FT_Face  face )
294  {
295    return ( face->face_flags & FT_FACE_FLAG_GLYPH_NAMES ) > 0;
296  }
297
298
299  static FT_Error
300  cff_ps_get_font_info( CFF_Face         face,
301                        PS_FontInfoRec*  afont_info )
302  {
303    CFF_Font  cff   = (CFF_Font)face->extra.data;
304    FT_Error  error = FT_Err_Ok;
305
306
307    if ( cff && cff->font_info == NULL )
308    {
309      CFF_FontRecDict  dict = &cff->top_font.font_dict;
310      PS_FontInfoRec  *font_info;
311      FT_Memory        memory = face->root.memory;
312
313
314      if ( FT_ALLOC( font_info, sizeof ( *font_info ) ) )
315        goto Fail;
316
317      font_info->version     = cff_index_get_sid_string( &cff->string_index,
318                                                         dict->version,
319                                                         cff->psnames );
320      font_info->notice      = cff_index_get_sid_string( &cff->string_index,
321                                                         dict->notice,
322                                                         cff->psnames );
323      font_info->full_name   = cff_index_get_sid_string( &cff->string_index,
324                                                         dict->full_name,
325                                                         cff->psnames );
326      font_info->family_name = cff_index_get_sid_string( &cff->string_index,
327                                                         dict->family_name,
328                                                         cff->psnames );
329      font_info->weight      = cff_index_get_sid_string( &cff->string_index,
330                                                         dict->weight,
331                                                         cff->psnames );
332      font_info->italic_angle        = dict->italic_angle;
333      font_info->is_fixed_pitch      = dict->is_fixed_pitch;
334      font_info->underline_position  = (FT_Short)dict->underline_position;
335      font_info->underline_thickness = (FT_Short)dict->underline_thickness;
336
337      cff->font_info = font_info;
338    }
339
340    *afont_info = *cff->font_info;
341
342  Fail:
343    return error;
344  }
345
346
347  static const FT_Service_PsInfoRec  cff_service_ps_info =
348  {
349    (PS_GetFontInfoFunc)   cff_ps_get_font_info,
350    (PS_HasGlyphNamesFunc) cff_ps_has_glyph_names,
351    (PS_GetFontPrivateFunc)NULL         /* unsupported with CFF fonts */
352  };
353
354
355  /*
356   * TT CMAP INFO
357   *
358   * If the charmap is a synthetic Unicode encoding cmap or
359   * a Type 1 standard (or expert) encoding cmap, hide TT CMAP INFO
360   * service defined in SFNT module.
361   *
362   * Otherwise call the service function in the sfnt module.
363   *
364   */
365  static FT_Error
366  cff_get_cmap_info( FT_CharMap    charmap,
367                     TT_CMapInfo  *cmap_info )
368  {
369    FT_CMap   cmap  = FT_CMAP( charmap );
370    FT_Error  error = CFF_Err_Ok;
371
372
373    cmap_info->language = 0;
374
375    if ( cmap->clazz != &cff_cmap_encoding_class_rec &&
376         cmap->clazz != &cff_cmap_unicode_class_rec  )
377    {
378      FT_Face             face    = FT_CMAP_FACE( cmap );
379      FT_Library          library = FT_FACE_LIBRARY( face );
380      FT_Module           sfnt    = FT_Get_Module( library, "sfnt" );
381      FT_Service_TTCMaps  service =
382        (FT_Service_TTCMaps)ft_module_get_service( sfnt,
383                                                   FT_SERVICE_ID_TT_CMAP );
384
385
386      if ( service && service->get_cmap_info )
387        error = service->get_cmap_info( charmap, cmap_info );
388    }
389
390    return error;
391  }
392
393
394  static const FT_Service_TTCMapsRec  cff_service_get_cmap_info =
395  {
396    (TT_CMap_Info_GetFunc)cff_get_cmap_info
397  };
398
399
400  /*************************************************************************/
401  /*************************************************************************/
402  /*************************************************************************/
403  /****                                                                 ****/
404  /****                                                                 ****/
405  /****                D R I V E R  I N T E R F A C E                   ****/
406  /****                                                                 ****/
407  /****                                                                 ****/
408  /*************************************************************************/
409  /*************************************************************************/
410  /*************************************************************************/
411
412  static const FT_ServiceDescRec  cff_services[] =
413  {
414    { FT_SERVICE_ID_XF86_NAME,       FT_XF86_FORMAT_CFF },
415    { FT_SERVICE_ID_POSTSCRIPT_INFO, &cff_service_ps_info },
416#ifndef FT_CONFIG_OPTION_NO_GLYPH_NAMES
417    { FT_SERVICE_ID_GLYPH_DICT,      &cff_service_glyph_dict },
418#endif
419    { FT_SERVICE_ID_TT_CMAP,         &cff_service_get_cmap_info },
420    { NULL, NULL }
421  };
422
423
424  FT_CALLBACK_DEF( FT_Module_Interface )
425  cff_get_interface( FT_Module    driver,       /* CFF_Driver */
426                     const char*  module_interface )
427  {
428    FT_Module            sfnt;
429    FT_Module_Interface  result;
430
431
432    result = ft_service_list_lookup( cff_services, module_interface );
433    if ( result != NULL )
434      return  result;
435
436    /* we pass our request to the `sfnt' module */
437    sfnt = FT_Get_Module( driver->library, "sfnt" );
438
439    return sfnt ? sfnt->clazz->get_interface( sfnt, module_interface ) : 0;
440  }
441
442
443  /* The FT_DriverInterface structure is defined in ftdriver.h. */
444
445  FT_CALLBACK_TABLE_DEF
446  const FT_Driver_ClassRec  cff_driver_class =
447  {
448    /* begin with the FT_Module_Class fields */
449    {
450      FT_MODULE_FONT_DRIVER       |
451      FT_MODULE_DRIVER_SCALABLE   |
452      FT_MODULE_DRIVER_HAS_HINTER,
453
454      sizeof( CFF_DriverRec ),
455      "cff",
456      0x10000L,
457      0x20000L,
458
459      0,   /* module-specific interface */
460
461      cff_driver_init,
462      cff_driver_done,
463      cff_get_interface,
464    },
465
466    /* now the specific driver fields */
467    sizeof( TT_FaceRec ),
468    sizeof( CFF_SizeRec ),
469    sizeof( CFF_GlyphSlotRec ),
470
471    cff_face_init,
472    cff_face_done,
473    cff_size_init,
474    cff_size_done,
475    cff_slot_init,
476    cff_slot_done,
477
478#ifdef FT_CONFIG_OPTION_OLD_INTERNALS
479    ft_stub_set_char_sizes,
480    ft_stub_set_pixel_sizes,
481#endif
482
483    Load_Glyph,
484
485    cff_get_kerning,
486    0,                      /* FT_Face_AttachFunc      */
487    0,                      /* FT_Face_GetAdvancesFunc */
488
489    cff_size_request,
490
491#ifdef TT_CONFIG_OPTION_EMBEDDED_BITMAPS
492    cff_size_select
493#else
494    0                       /* FT_Size_SelectFunc      */
495#endif
496  };
497
498
499/* END */
500