kc3-lang/freetype/src/type1z/z1driver.c

• Show log

  Commit

• Hash : 5fe4c00e
  Author :
  Date : 2000-07-26T19:04:08
  

  - fixed the incorrect SO extension for Visual C++ - disabled the TrueType interpreter by default - disabled the "type1" driver, "type1z" is now used by default (the internal driver name is "type1" now !!)

Download

• src/type1z/z1driver.c

• /***************************************************************************/
  /*                                                                         */
  /*  z1driver.c                                                             */
  /*                                                                         */
  /*    Experimental Type 1 driver interface (body).                         */
  /*                                                                         */
  /*  Copyright 1996-2000 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.                                        */
  /*                                                                         */
  /***************************************************************************/
  
  
  #ifdef FT_FLAT_COMPILE
  
  #include "z1driver.h"
  #include "z1gload.h"
  #include "z1load.h"
  #include "z1afm.h"
  
  #else
  
  #include <type1z/z1driver.h>
  #include <type1z/z1gload.h>
  #include <type1z/z1load.h>
  #include <type1z/z1afm.h>
  
  #endif
  
  
  #include <freetype/internal/ftdebug.h>
  #include <freetype/internal/ftstream.h>
  #include <freetype/internal/psnames.h>
  
  #include <string.h>     /* for strcmp() */
  
  
    /*************************************************************************/
    /*                                                                       */
    /* 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_z1driver
  
  
    static
    FT_Error  get_z1_glyph_name( T1_Face     face,
                                 FT_UInt     glyph_index,
                                 FT_Pointer  buffer,
                                 FT_UInt     buffer_max )
    {
      FT_String*  gname;
      
  
      gname = face->type1.glyph_names[glyph_index];
  
      if ( buffer_max > 0 )
      {
        FT_UInt  len = strlen( gname );
        
  
        if (len >= buffer_max)
          len = buffer_max - 1;
          
        MEM_Copy( buffer, gname, len );
        ((FT_Byte*)buffer)[len] = 0;
      }
  
      return T1_Err_Ok;
    }                                  
  
  
    /*************************************************************************/
    /*                                                                       */
    /* <Function>                                                            */
    /*    Get_Interface                                                      */
    /*                                                                       */
    /* <Description>                                                         */
    /*    Each driver can provide one or more extensions to the base         */
    /*    FreeType API.  These can be used to access format specific         */
    /*    features (e.g., all TrueType/OpenType resources share a common     */
    /*    file structure and common tables which can be accessed through the */
    /*    `sfnt' interface), or more simply generic ones (e.g., the          */
    /*    `postscript names' interface which can be used to retrieve the     */
    /*     PostScript name of a given glyph index).                          */
    /*                                                                       */
    /* <InOut>                                                               */
    /*    driver    :: A handle to a driver object.                          */
    /*                                                                       */
    /* <Input>                                                               */
    /*    interface :: A string designing the interface.  Examples are       */
    /*                 `sfnt', `post_names', `charmaps', etc.                */
    /*                                                                       */
    /* <Return>                                                              */
    /*    A typeless pointer to the extension's interface (normally a table  */
    /*    of function pointers).  Returns NULL if the requested extension    */
    /*    isn't available (i.e., wasn't compiled in the driver at build      */
    /*    time).                                                             */
    /*                                                                       */
    static
    FT_Module_Interface  Get_Interface( FT_Driver         driver,
                                        const FT_String*  interface )
    {
      FT_UNUSED( driver );
      FT_UNUSED( interface );
  
      if ( strcmp( (const char*)interface, "glyph_name" ) == 0 )
        return (FT_Module_Interface)get_z1_glyph_name;
  
  #ifndef Z1_CONFIG_OPTION_NO_MM_SUPPORT
      if ( strcmp( (const char*)interface, "get_mm" ) == 0 )
        return (FT_Module_Interface)Z1_Get_Multi_Master;
  
      if ( strcmp( (const char*)interface, "set_mm_design") == 0 )
        return (FT_Module_Interface)Z1_Set_MM_Design;
  
      if ( strcmp( (const char*)interface, "set_mm_blend") == 0 )
        return (FT_Module_Interface)Z1_Set_MM_Blend;
  #endif
      return 0;
    }
  
  
  #ifndef Z1_CONFIG_OPTION_NO_AFM
  
    /*************************************************************************/
    /*                                                                       */
    /* <Function>                                                            */
    /*    Get_Kerning                                                        */
    /*                                                                       */
    /* <Description>                                                         */
    /*    A driver method used to return the kerning vector between two      */
    /*    glyphs of the same face.                                           */
    /*                                                                       */
    /* <Input>                                                               */
    /*    face        :: A handle to the source face object.                 */
    /*                                                                       */
    /*    left_glyph  :: The index of the left glyph in the kern pair.       */
    /*                                                                       */
    /*    right_glyph :: The index of the right glyph in the kern pair.      */
    /*                                                                       */
    /* <Output>                                                              */
    /*    kerning     :: The kerning vector.  This is in font units for      */
    /*                   scalable formats, and in pixels for fixed-sizes     */
    /*                   formats.                                            */
    /*                                                                       */
    /* <Return>                                                              */
    /*    FreeType error code.  0 means success.                             */
    /*                                                                       */
    /* <Note>                                                                */
    /*    Only horizontal layouts (left-to-right & right-to-left) are        */
    /*    supported by this function.  Other layouts, or more sophisticated  */
    /*    kernings are out of scope of this method (the basic driver         */
    /*    interface is meant to be simple).                                  */
    /*                                                                       */
    /*    They can be implemented by format-specific interfaces.             */
    /*                                                                       */
    static
    FT_Error  Get_Kerning( T1_Face     face,
                           FT_UInt     left_glyph,
                           FT_UInt     right_glyph,
                           FT_Vector*  kerning )
    {
      Z1_AFM*  afm;
  
  
      kerning->x = 0;
      kerning->y = 0;
  
      afm = (Z1_AFM*)face->afm_data;
      if ( afm )
        Z1_Get_Kerning( afm, left_glyph, right_glyph, kerning );
  
      return T1_Err_Ok;
    }
  
  
  #endif /* T1_CONFIG_OPTION_NO_AFM */
  
  
    /*************************************************************************/
    /*                                                                       */
    /* <Function>                                                            */
    /*    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  Get_Char_Index( FT_CharMap  charmap,
                             FT_Long     charcode )
    {
      T1_Face             face;
      FT_UInt             result = 0;
      PSNames_Interface*  psnames;
  
  
      face    = (T1_Face)charmap->face;
      psnames = (PSNames_Interface*)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] &&
                   strcmp( gname, glyph_name ) == 0   )
              {
                result = n;
                break;
              }
            }
          }
        }
    Exit:
      return result;
    }
  
  
    const FT_Driver_Class  t1_driver_class =
    {
      {
        ft_module_font_driver | ft_module_driver_scalable,
        sizeof( FT_DriverRec ),
  
        "type1",
        0x10000L,
        0x20000L,
  
        0,   /* format interface */
  
        (FT_Module_Constructor)Z1_Init_Driver,
        (FT_Module_Destructor) Z1_Done_Driver,
        (FT_Module_Requester)  Get_Interface,
      },
  
      sizeof( T1_FaceRec ),
      sizeof( Z1_SizeRec ),
      sizeof( Z1_GlyphSlotRec ),
  
      (FTDriver_initFace)     Z1_Init_Face,
      (FTDriver_doneFace)     Z1_Done_Face,
      (FTDriver_initSize)     0,
      (FTDriver_doneSize)     0,
      (FTDriver_initGlyphSlot)0,
      (FTDriver_doneGlyphSlot)0,
  
      (FTDriver_setCharSizes) 0,
      (FTDriver_setPixelSizes)0,
      (FTDriver_loadGlyph)    Z1_Load_Glyph,
      (FTDriver_getCharIndex) Get_Char_Index,
  
  #ifdef Z1_CONFIG_OPTION_NO_AFM
      (FTDriver_getKerning)   0,
      (FTDriver_attachFile)   0,
  #else
      (FTDriver_getKerning)   Get_Kerning,
      (FTDriver_attachFile)   Z1_Read_AFM,
  #endif
      (FTDriver_getAdvances)  0
    };
  
  
  #ifdef FT_CONFIG_OPTION_DYNAMIC_DRIVERS
  
    EXPORT_FUNC( const FT_Driver_Class* )  getDriverClass( void )
    {
      return &t1z_driver_class;
    }
  
  #endif /* FT_CONFIG_OPTION_DYNAMIC_DRIVERS */
  
  
  /* END */
  

Download