src/freetype/truetype/ttpload.c

/***************************************************************************/
/*                                                                         */
/*  ttpload.h                                                              */
/*                                                                         */
/*    TrueType glyph data/program tables loader (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/ftobjs.h>
#include <freetype/internal/ftstream.h>
#include <freetype/tttags.h>

#ifdef FT_FLAT_COMPILE
#include "ttpload.h"
#else
#include <truetype/ttpload.h>
#endif

#include <freetype/internal/tterrors.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_ttpload


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
  /*    TT_Load_Locations                                                  */
  /*                                                                       */
  /* <Description>                                                         */
  /*    Loads the locations table.                                         */
  /*                                                                       */
  /* <InOut>                                                               */
  /*    face   :: A handle to the target face object.                      */
  /*                                                                       */
  /* <Input>                                                               */
  /*    stream :: The input stream.                                        */
  /*                                                                       */
  /* <Return>                                                              */
  /*    FreeType error code.  0 means success.                             */
  /*                                                                       */
  LOCAL_FUNC
  FT_Error  TT_Load_Locations( TT_Face    face,
                               FT_Stream  stream )
  {
    FT_Error   error;
    FT_Memory  memory = stream->memory;
    FT_Short   LongOffsets;
    FT_ULong   table_len;


    FT_TRACE2(( "Locations " ));
    LongOffsets = face->header.Index_To_Loc_Format;

    error = face->goto_table( face, TTAG_loca, stream, &table_len );
    if ( error )
    {
      error = TT_Err_Locations_Missing;
      goto Exit;
    }

    if ( LongOffsets != 0 )
    {
      face->num_locations = (FT_UShort)( table_len >> 2 );

      FT_TRACE2(( "(32bit offsets): %12d ", face->num_locations ));

      if ( ALLOC_ARRAY( face->glyph_locations,
                        face->num_locations,
                        FT_Long ) )
        goto Exit;

      if ( ACCESS_Frame( face->num_locations * 4L ) )
        goto Exit;

      {
        FT_Long*  loc   = face->glyph_locations;
        FT_Long*  limit = loc + face->num_locations;


        for ( ; loc < limit; loc++ )
          *loc = GET_Long();
      }

      FORGET_Frame();
    }
    else
    {
      face->num_locations = (FT_UShort)( table_len >> 1 );

      FT_TRACE2(( "(16bit offsets): %12d ", face->num_locations ));

      if ( ALLOC_ARRAY( face->glyph_locations,
                        face->num_locations,
                        FT_Long ) )
        goto Exit;

      if ( ACCESS_Frame( face->num_locations * 2L ) )
        goto Exit;
      {
        FT_Long*  loc   = face->glyph_locations;
        FT_Long*  limit = loc + face->num_locations;


        for ( ; loc < limit; loc++ )
          *loc = (FT_Long)( (FT_ULong)GET_UShort() * 2 );
      }
      FORGET_Frame();
    }

    FT_TRACE2(( "loaded\n" ));

  Exit:
    return error;
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
  /*    TT_Load_CVT                                                        */
  /*                                                                       */
  /* <Description>                                                         */
  /*    Loads the control value table into a face object.                  */
  /*                                                                       */
  /* <InOut>                                                               */
  /*    face   :: A handle to the target face object.                      */
  /*                                                                       */
  /* <Input>                                                               */
  /*    stream :: A handle to the input stream.                            */
  /*                                                                       */
  /* <Return>                                                              */
  /*    FreeType error code.  0 means success.                             */
  /*                                                                       */
  LOCAL_FUNC
  FT_Error  TT_Load_CVT( TT_Face    face,
                         FT_Stream  stream )
  {
    FT_Error   error;
    FT_Memory  memory = stream->memory;
    FT_ULong   table_len;


    FT_TRACE2(( "CVT " ));

    error = face->goto_table( face, TTAG_cvt, stream, &table_len );
    if ( error )
    {
      FT_TRACE2(( "is missing!\n" ));

      face->cvt_size = 0;
      face->cvt      = NULL;
      error          = TT_Err_Ok;

      goto Exit;
    }

    face->cvt_size = table_len / 2;

    if ( ALLOC_ARRAY( face->cvt,
                      face->cvt_size,
                      FT_Short ) )
      goto Exit;

    if ( ACCESS_Frame( face->cvt_size * 2L ) )
      goto Exit;

    {
      FT_Short*  cur   = face->cvt;
      FT_Short*  limit = cur + face->cvt_size;


      for ( ; cur <  limit; cur++ )
        *cur = GET_Short();
    }

    FORGET_Frame();
    FT_TRACE2(( "loaded\n" ));

  Exit:
    return error;
  }


  /*************************************************************************/
  /*                                                                       */
  /* <Function>                                                            */
  /*    TT_Load_Progams                                                    */
  /*                                                                       */
  /* <Description>                                                         */
  /*    Loads the font program and the cvt program.                        */
  /*                                                                       */
  /* <InOut>                                                               */
  /*    face   :: A handle to the target face object.                      */
  /*                                                                       */
  /* <Input>                                                               */
  /*    stream :: A handle to the input stream.                            */
  /*                                                                       */
  /* <Return>                                                              */
  /*    FreeType error code.  0 means success.                             */
  /*                                                                       */
  LOCAL_FUNC
  FT_Error  TT_Load_Programs( TT_Face    face,
                              FT_Stream  stream )
  {
    FT_Error   error;
    FT_ULong   table_len;


    FT_TRACE2(( "Font program " ));

    /* The font program is optional */
    error = face->goto_table( face, TTAG_fpgm, stream, &table_len );
    if ( error )
    {
      face->font_program      = NULL;
      face->font_program_size = 0;

      FT_TRACE2(( "is missing!\n" ));
    }
    else
    {
      face->font_program_size = table_len;
      if ( EXTRACT_Frame( table_len, face->font_program ) )
        goto Exit;

      FT_TRACE2(( "loaded, %12d bytes\n", face->font_program_size ));
    }

    FT_TRACE2(( "Prep program " ));

    error = face->goto_table( face, TTAG_prep, stream, &table_len );
    if ( error )
    {
      face->cvt_program      = NULL;
      face->cvt_program_size = 0;
      error                  = TT_Err_Ok;

      FT_TRACE2(( "is missing!\n" ));
    }
    else
    {
      face->cvt_program_size = table_len;
      if ( EXTRACT_Frame( table_len, face->cvt_program ) )
        goto Exit;

      FT_TRACE2(( "loaded, %12d bytes\n", face->cvt_program_size ));
    }

  Exit:
    return error;
  }


/* END */
Commit	Line	Data
	1	/***************************************************************************/
	2	/* */
	3	/* ttpload.h */
	4	/* */
	5	/* TrueType glyph data/program tables loader (body). */
	6	/* */
	7	/* Copyright 1996-2000 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 <freetype/internal/ftdebug.h>
	20	#include <freetype/internal/ftobjs.h>
	21	#include <freetype/internal/ftstream.h>
	22	#include <freetype/tttags.h>
	23
	24	#ifdef FT_FLAT_COMPILE
	25	#include "ttpload.h"
	26	#else
	27	#include <truetype/ttpload.h>
	28	#endif
	29
	30	#include <freetype/internal/tterrors.h>
	31
	32
	33	/*************************************************************************/
	34	/* */
	35	/* The macro FT_COMPONENT is used in trace mode. It is an implicit */
	36	/* parameter of the FT_TRACE() and FT_ERROR() macros, used to print/log */
	37	/* messages during execution. */
	38	/* */
	39	#undef FT_COMPONENT
	40	#define FT_COMPONENT trace_ttpload
	41
	42
	43	/*************************************************************************/
	44	/* */
	45	/* <Function> */
	46	/* TT_Load_Locations */
	47	/* */
	48	/* <Description> */
	49	/* Loads the locations table. */
	50	/* */
	51	/* <InOut> */
	52	/* face :: A handle to the target face object. */
	53	/* */
	54	/* <Input> */
	55	/* stream :: The input stream. */
	56	/* */
	57	/* <Return> */
	58	/* FreeType error code. 0 means success. */
	59	/* */
	60	LOCAL_FUNC
	61	FT_Error TT_Load_Locations( TT_Face face,
	62	FT_Stream stream )
	63	{
	64	FT_Error error;
	65	FT_Memory memory = stream->memory;
	66	FT_Short LongOffsets;
	67	FT_ULong table_len;
	68
	69
	70	FT_TRACE2(( "Locations " ));
	71	LongOffsets = face->header.Index_To_Loc_Format;
	72
	73	error = face->goto_table( face, TTAG_loca, stream, &table_len );
	74	if ( error )
	75	{
	76	error = TT_Err_Locations_Missing;
	77	goto Exit;
	78	}
	79
	80	if ( LongOffsets != 0 )
	81	{
	82	face->num_locations = (FT_UShort)( table_len >> 2 );
	83
	84	FT_TRACE2(( "(32bit offsets): %12d ", face->num_locations ));
	85
	86	if ( ALLOC_ARRAY( face->glyph_locations,
	87	face->num_locations,
	88	FT_Long ) )
	89	goto Exit;
	90
	91	if ( ACCESS_Frame( face->num_locations * 4L ) )
	92	goto Exit;
	93
	94	{
	95	FT_Long* loc = face->glyph_locations;
	96	FT_Long* limit = loc + face->num_locations;
	97
	98
	99	for ( ; loc < limit; loc++ )
	100	*loc = GET_Long();
	101	}
	102
	103	FORGET_Frame();
	104	}
	105	else
	106	{
	107	face->num_locations = (FT_UShort)( table_len >> 1 );
	108
	109	FT_TRACE2(( "(16bit offsets): %12d ", face->num_locations ));
	110
	111	if ( ALLOC_ARRAY( face->glyph_locations,
	112	face->num_locations,
	113	FT_Long ) )
	114	goto Exit;
	115
	116	if ( ACCESS_Frame( face->num_locations * 2L ) )
	117	goto Exit;
	118	{
	119	FT_Long* loc = face->glyph_locations;
	120	FT_Long* limit = loc + face->num_locations;
	121
	122
	123	for ( ; loc < limit; loc++ )
	124	loc = (FT_Long)( (FT_ULong)GET_UShort() 2 );
	125	}
	126	FORGET_Frame();
	127	}
	128
	129	FT_TRACE2(( "loaded\n" ));
	130
	131	Exit:
	132	return error;
	133	}
	134
	135
	136	/*************************************************************************/
	137	/* */
	138	/* <Function> */
	139	/* TT_Load_CVT */
	140	/* */
	141	/* <Description> */
	142	/* Loads the control value table into a face object. */
	143	/* */
	144	/* <InOut> */
	145	/* face :: A handle to the target face object. */
	146	/* */
	147	/* <Input> */
	148	/* stream :: A handle to the input stream. */
	149	/* */
	150	/* <Return> */
	151	/* FreeType error code. 0 means success. */
	152	/* */
	153	LOCAL_FUNC
	154	FT_Error TT_Load_CVT( TT_Face face,
	155	FT_Stream stream )
	156	{
	157	FT_Error error;
	158	FT_Memory memory = stream->memory;
	159	FT_ULong table_len;
	160
	161
	162	FT_TRACE2(( "CVT " ));
	163
	164	error = face->goto_table( face, TTAG_cvt, stream, &table_len );
	165	if ( error )
	166	{
	167	FT_TRACE2(( "is missing!\n" ));
	168
	169	face->cvt_size = 0;
	170	face->cvt = NULL;
	171	error = TT_Err_Ok;
	172
	173	goto Exit;
	174	}
	175
	176	face->cvt_size = table_len / 2;
	177
	178	if ( ALLOC_ARRAY( face->cvt,
	179	face->cvt_size,
	180	FT_Short ) )
	181	goto Exit;
	182
	183	if ( ACCESS_Frame( face->cvt_size * 2L ) )
	184	goto Exit;
	185
	186	{
	187	FT_Short* cur = face->cvt;
	188	FT_Short* limit = cur + face->cvt_size;
	189
	190
	191	for ( ; cur < limit; cur++ )
	192	*cur = GET_Short();
	193	}
	194
	195	FORGET_Frame();
	196	FT_TRACE2(( "loaded\n" ));
	197
	198	Exit:
	199	return error;
	200	}
	201
	202
	203	/*************************************************************************/
	204	/* */
	205	/* <Function> */
	206	/* TT_Load_Progams */
	207	/* */
	208	/* <Description> */
	209	/* Loads the font program and the cvt program. */
	210	/* */
	211	/* <InOut> */
	212	/* face :: A handle to the target face object. */
	213	/* */
	214	/* <Input> */
	215	/* stream :: A handle to the input stream. */
	216	/* */
	217	/* <Return> */
	218	/* FreeType error code. 0 means success. */
	219	/* */
	220	LOCAL_FUNC
	221	FT_Error TT_Load_Programs( TT_Face face,
	222	FT_Stream stream )
	223	{
	224	FT_Error error;
	225	FT_ULong table_len;
	226
	227
	228	FT_TRACE2(( "Font program " ));
	229
	230	/* The font program is optional */
	231	error = face->goto_table( face, TTAG_fpgm, stream, &table_len );
	232	if ( error )
	233	{
	234	face->font_program = NULL;
	235	face->font_program_size = 0;
	236
	237	FT_TRACE2(( "is missing!\n" ));
	238	}
	239	else
	240	{
	241	face->font_program_size = table_len;
	242	if ( EXTRACT_Frame( table_len, face->font_program ) )
	243	goto Exit;
	244
	245	FT_TRACE2(( "loaded, %12d bytes\n", face->font_program_size ));
	246	}
	247
	248	FT_TRACE2(( "Prep program " ));
	249
	250	error = face->goto_table( face, TTAG_prep, stream, &table_len );
	251	if ( error )
	252	{
	253	face->cvt_program = NULL;
	254	face->cvt_program_size = 0;
	255	error = TT_Err_Ok;
	256
	257	FT_TRACE2(( "is missing!\n" ));
	258	}
	259	else
	260	{
	261	face->cvt_program_size = table_len;
	262	if ( EXTRACT_Frame( table_len, face->cvt_program ) )
	263	goto Exit;
	264
	265	FT_TRACE2(( "loaded, %12d bytes\n", face->cvt_program_size ));
	266	}
	267
	268	Exit:
	269	return error;
	270	}
	271
	272
	273	/* END */