/***************************************************************************//*                                                                         *//*  cidriver.c                                                             *//*                                                                         *//*    CID driver interface (body).                                         *//*                                                                         *//*  Copyright 1996-2001, 2002 by                                           *//*  David Turner, Robert Wilhelm, and Werner Lemberg.                      *//*                                                                         *//*  This file is part of the FreeType project, and may only be used,       *//*  modified, and distributed under the terms of the FreeType project      *//*  license, LICENSE.TXT.  By continuing to use, modify, or distribute     *//*  this file you indicate that you have read the license and              *//*  understand and accept it fully.                                        *//*                                                                         *//***************************************************************************/#include <ft2build.h>#include "cidriver.h"#include "cidgload.h"#include FT_INTERNAL_DEBUG_H#include FT_INTERNAL_STREAM_H#include FT_INTERNAL_POSTSCRIPT_NAMES_H#include "ciderrs.h"  /*************************************************************************/  /*                                                                       */  /* The macro FT_COMPONENT is used in trace mode.  It is an implicit      */  /* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log  */  /* messages during execution.                                            */  /*                                                                       */#undef  FT_COMPONENT#define FT_COMPONENT  trace_ciddriver  static const char*  cid_get_postscript_name( CID_Face  face )  {    const char*  result = face->cid.cid_font_name;        if ( result && result[0] == '/' )      result++;          return result;  }  static FT_Module_Interface  CID_Get_Interface( FT_Driver         driver,                     const FT_String*  cid_interface )  {    FT_UNUSED( driver );    FT_UNUSED( cid_interface );    if ( ft_strcmp( (const char*)cid_interface, "postscript_name" ) == 0 )      return (FT_Module_Interface)cid_get_postscript_name;    return 0;  }#if 0 /* unimplemented yet */  static FT_Error  cid_Get_Kerning( T1_Face     face,                   FT_UInt     left_glyph,                   FT_UInt     right_glyph,                   FT_Vector*  kerning )  {    CID_AFM*  afm;    kerning->x = 0;    kerning->y = 0;    afm = (CID_AFM*)face->afm_data;    if ( afm )      CID_Get_Kerning( afm, left_glyph, right_glyph, kerning );    return CID_Err_Ok;  }#endif /* 0 */  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    Cid_Get_Char_Index                                                 */  /*                                                                       */  /* <Description>                                                         */  /*    Uses a charmap to return a given character code's glyph index.     */  /*                                                                       */  /* <Input>                                                               */  /*    charmap  :: A handle to the source charmap object.                 */  /*                                                                       */  /*    charcode :: The character code.                                    */  /*                                                                       */  /* <Return>                                                              */  /*    Glyph index.  0 means `undefined character code'.                  */  /*                                                                       */  static FT_UInt  CID_Get_Char_Index( FT_CharMap  charmap,                      FT_Long     charcode )  {    T1_Face          face;    FT_UInt          result = 0;    PSNames_Service  psnames;    face = (T1_Face)charmap->face;    psnames = (PSNames_Service)face->psnames;    if ( psnames )      switch ( charmap->encoding )      {        /*******************************************************************/        /*                                                                 */        /* Unicode encoding support                                        */        /*                                                                 */      case ft_encoding_unicode:        /* use the `PSNames' module to synthetize the Unicode charmap */        result = psnames->lookup_unicode( &face->unicode_map,                                          (FT_ULong)charcode );        /* the function returns 0xFFFF if the Unicode charcode has */        /* no corresponding glyph.                                 */        if ( result == 0xFFFF )          result = 0;        goto Exit;        /*******************************************************************/        /*                                                                 */        /* Custom Type 1 encoding                                          */        /*                                                                 */      case ft_encoding_adobe_custom:        {          T1_Encoding  encoding = &face->type1.encoding;          if ( charcode >= encoding->code_first &&               charcode <= encoding->code_last  )            result = encoding->char_index[charcode];          goto Exit;        }        /*******************************************************************/        /*                                                                 */        /* Adobe Standard & Expert encoding support                        */        /*                                                                 */      default:        if ( charcode < 256 )        {          FT_UInt      code;          FT_Int       n;          const char*  glyph_name;          code = psnames->adobe_std_encoding[charcode];          if ( charmap->encoding == ft_encoding_adobe_expert )            code = psnames->adobe_expert_encoding[charcode];          glyph_name = psnames->adobe_std_strings( code );          if ( !glyph_name )            break;          for ( n = 0; n < face->type1.num_glyphs; n++ )          {            const char*  gname = face->type1.glyph_names[n];            if ( gname && gname[0] == glyph_name[0] &&                 ft_strcmp( gname, glyph_name ) == 0   )            {              result = n;              break;            }          }        }      }  Exit:    return result;  }  /*************************************************************************/  /*                                                                       */  /* <Function>                                                            */  /*    Cid_Get_Next_Char                                                  */  /*                                                                       */  /* <Description>                                                         */  /*    Uses a charmap to return the next encoded char after.              */  /*                                                                       */  /* <Input>                                                               */  /*    charmap  :: A handle to the source charmap object.                 */  /*                                                                       */  /*    charcode :: The character code.                                    */  /*                                                                       */  /* <Return>                                                              */  /*    Next char code.  0 means `no more char codes'.                     */  /*                                                                       */  static FT_Long  CID_Get_Next_Char( FT_CharMap  charmap,                     FT_Long     charcode )  {    T1_Face          face;    PSNames_Service  psnames;    face    = (T1_Face)charmap->face;    psnames = (PSNames_Service)face->psnames;    if ( psnames )      switch ( charmap->encoding )      {        /*******************************************************************/        /*                                                                 */        /* Unicode encoding support                                        */        /*                                                                 */      case ft_encoding_unicode:        /* use the `PSNames' module to synthetize the Unicode charmap */        return psnames->next_unicode (&face->unicode_map,                                      (FT_ULong)charcode );        /*******************************************************************/        /*                                                                 */        /* Custom Type 1 encoding                                          */        /*                                                                 */      case ft_encoding_adobe_custom:        {          T1_Encoding  encoding = &face->type1.encoding;          charcode++;          if ( charcode < encoding->code_first )            charcode = encoding->code_first;          while ( charcode <= encoding->code_last )          {            if ( encoding->char_index[charcode] )              return charcode;            charcode++;          }        }        break;        /*******************************************************************/        /*                                                                 */        /* Adobe Standard & Expert encoding support                        */        /*                                                                 */      default:        while ( ++charcode < 256 )        {          FT_UInt      code;          FT_Int       n;          const char*  glyph_name;          code = psnames->adobe_std_encoding[charcode];          if ( charmap->encoding == ft_encoding_adobe_expert )            code = psnames->adobe_expert_encoding[charcode];          glyph_name = psnames->adobe_std_strings( code );          if ( !glyph_name )            continue;          for ( n = 0; n < face->type1.num_glyphs; n++ )          {            const char*  gname = face->type1.glyph_names[n];            if ( gname && gname[0] == glyph_name[0] &&                 ft_strcmp( gname, glyph_name ) == 0   )            {              return charcode;            }          }        }      }    return 0;  }  FT_CALLBACK_TABLE_DEF  const FT_Driver_ClassRec  t1cid_driver_class =  {    /* first of all, the FT_Module_Class fields */    {      ft_module_font_driver       |      ft_module_driver_scalable   |      ft_module_driver_has_hinter ,            sizeof( FT_DriverRec ),      "t1cid",   /* module name           */      0x10000L,  /* version 1.0 of driver */      0x20000L,  /* requires FreeType 2.0 */      0,      (FT_Module_Constructor)CID_Driver_Init,      (FT_Module_Destructor) CID_Driver_Done,      (FT_Module_Requester)  CID_Get_Interface    },    /* then the other font drivers fields */    sizeof( CID_FaceRec ),    sizeof( CID_SizeRec ),    sizeof( CID_GlyphSlotRec ),    (FT_Face_InitFunc)        CID_Face_Init,    (FT_Face_DoneFunc)        CID_Face_Done,    (FT_Size_InitFunc)        CID_Size_Init,    (FT_Size_DoneFunc)        CID_Size_Done,    (FT_Slot_InitFunc)        CID_GlyphSlot_Init,    (FT_Slot_DoneFunc)        CID_GlyphSlot_Done,    (FT_Size_ResetPointsFunc) CID_Size_Reset,    (FT_Size_ResetPixelsFunc) CID_Size_Reset,    (FT_Slot_LoadFunc)        CID_Load_Glyph,    (FT_CharMap_CharIndexFunc)CID_Get_Char_Index,    (FT_Face_GetKerningFunc)  0,    (FT_Face_AttachFunc)      0,    (FT_Face_GetAdvancesFunc) 0,        (FT_CharMap_CharNextFunc) CID_Get_Next_Char  };/* END */