kc3-lang/freetype/src/cid/cidparse.c

• Show log

  Commit

• Hash : 3d568ac7
  Author :
  Date : 2000-10-11T14:59:46
  

  A fix from Yamano'uchi to get correct font names.

Download

• src/cid/cidparse.c

• /***************************************************************************/
  /*                                                                         */
  /*  cidparse.c                                                             */
  /*                                                                         */
  /*    CID-keyed Type1 parser (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.                                        */
  /*                                                                         */
  /***************************************************************************/
  
  
  #include <freetype/internal/ftdebug.h>
  #include <freetype/internal/ftcalc.h>
  #include <freetype/internal/ftobjs.h>
  #include <freetype/internal/ftstream.h>
  #include <freetype/internal/t1errors.h>
  
  
  #ifdef FT_FLAT_COMPILE
  
  #include "cidparse.h"
  
  #else
  
  #include <cid/cidparse.h>
  
  #endif
  
  
  #include <string.h>     /* for strncmp() */
  
  
    /*************************************************************************/
    /*                                                                       */
    /* 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_cidparse
  
  
    /*************************************************************************/
    /*************************************************************************/
    /*************************************************************************/
    /*****                                                               *****/
    /*****                    INPUT STREAM PARSER                        *****/
    /*****                                                               *****/
    /*************************************************************************/
    /*************************************************************************/
    /*************************************************************************/
  
  
    LOCAL_FUNC
    FT_Error  CID_New_Parser( CID_Parser*       parser,
                              FT_Stream         stream,
                              FT_Memory         memory,
                              PSAux_Interface*  psaux )
    {
      FT_Error  error;
      FT_ULong  base_offset, offset, ps_len;
      FT_Byte   buffer[256 + 10];
      FT_Int    buff_len;
  
  
      MEM_Set( parser, 0, sizeof ( *parser ) );
      psaux->t1_parser_funcs->init( &parser->root, 0, 0, memory );
      
      parser->stream = stream;
  
      base_offset = FILE_Pos();
  
      /* first of all, check the font format in the  header */
      if ( ACCESS_Frame( 31 ) )
        goto Exit;
  
      if ( strncmp( (char *)stream->cursor,
                    "%!PS-Adobe-3.0 Resource-CIDFont", 31 ) )
      {
        FT_TRACE2(( "[not a valid CID-keyed font]\n" ));
        error = FT_Err_Unknown_File_Format;
      }
  
      FORGET_Frame();
      if ( error )
        goto Exit;
  
      /* now, read the rest of the file, until we find a `StartData' */
      buff_len = 256;
      for (;;)
      {
        FT_Byte   *p, *limit = buffer + 256;
        FT_ULong  top_position;
  
  
        /* fill input buffer */
        buff_len -= 256;
        if ( buff_len > 0 )
          MEM_Move( buffer, limit, buff_len );
  
        p = buffer + buff_len;
  
        if ( FILE_Read( p, 256 + 10 - buff_len ) )
          goto Exit;
  
        top_position = FILE_Pos() - buff_len;
        buff_len = 256 + 10;
  
        /* look for `StartData' */
        for ( p = buffer; p < limit; p++ )
        {
          if ( p[0] == 'S' && strncmp( (char*)p, "StartData", 9 ) == 0 )
          {
            /* save offset of binary data after `StartData' */
            offset = top_position - ( limit - p ) + 10;
            goto Found;
          }
        }
      }
  
    Found:
      /* we have found the start of the binary data.  We will now        */
      /* rewind and extract the frame of corresponding to the Postscript */
      /* section                                                         */
  
      ps_len = offset - base_offset;
      if ( FILE_Seek( base_offset )                    ||
           EXTRACT_Frame( ps_len, parser->postscript ) )
        goto Exit;
  
      parser->data_offset    = offset;
      parser->postscript_len = ps_len;
      parser->root.base      = parser->postscript;
      parser->root.cursor    = parser->postscript;
      parser->root.limit     = parser->root.cursor + ps_len;
      parser->num_dict       = -1;
  
    Exit:
      return error;
    }
  
  
    LOCAL_FUNC
    void  CID_Done_Parser( CID_Parser*  parser )
    {
      /* always free the private dictionary */
      if ( parser->postscript )
      {
        FT_Stream  stream = parser->stream;
  
  
        RELEASE_Frame( parser->postscript );
      }
      parser->root.funcs.done( &parser->root );
    }
  
  
  /* END */
  

Download