/***************************************************************************/ | |
/* */ | |
/* cidparse.c */ | |
/* */ | |
/* CID-keyed Type1 parser (body). */ | |
/* */ | |
/* Copyright 1996-2015 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 FT_INTERNAL_DEBUG_H | |
#include FT_INTERNAL_OBJECTS_H | |
#include FT_INTERNAL_STREAM_H | |
#include "cidparse.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_cidparse | |
/*************************************************************************/ | |
/*************************************************************************/ | |
/*************************************************************************/ | |
/***** *****/ | |
/***** INPUT STREAM PARSER *****/ | |
/***** *****/ | |
/*************************************************************************/ | |
/*************************************************************************/ | |
/*************************************************************************/ | |
FT_LOCAL_DEF( FT_Error ) | |
cid_parser_new( CID_Parser* parser, | |
FT_Stream stream, | |
FT_Memory memory, | |
PSAux_Service psaux ) | |
{ | |
FT_Error error; | |
FT_ULong base_offset, offset, ps_len; | |
FT_Byte *cur, *limit; | |
FT_Byte *arg1, *arg2; | |
FT_MEM_ZERO( parser, sizeof ( *parser ) ); | |
psaux->ps_parser_funcs->init( &parser->root, 0, 0, memory ); | |
parser->stream = stream; | |
base_offset = FT_STREAM_POS(); | |
/* first of all, check the font format in the header */ | |
if ( FT_FRAME_ENTER( 31 ) ) | |
goto Exit; | |
if ( ft_strncmp( (char *)stream->cursor, | |
"%!PS-Adobe-3.0 Resource-CIDFont", 31 ) ) | |
{ | |
FT_TRACE2(( " not a CID-keyed font\n" )); | |
error = FT_THROW( Unknown_File_Format ); | |
} | |
FT_FRAME_EXIT(); | |
if ( error ) | |
goto Exit; | |
Again: | |
/* now, read the rest of the file until we find */ | |
/* `StartData' or `/sfnts' */ | |
{ | |
FT_Byte buffer[256 + 10]; | |
FT_ULong read_len = 256 + 10; | |
FT_Byte* p = buffer; | |
for ( offset = FT_STREAM_POS(); ; offset += 256 ) | |
{ | |
FT_ULong stream_len; | |
stream_len = stream->size - FT_STREAM_POS(); | |
if ( stream_len == 0 ) | |
{ | |
FT_TRACE2(( "cid_parser_new: no `StartData' keyword found\n" )); | |
error = FT_THROW( Invalid_File_Format ); | |
goto Exit; | |
} | |
read_len = FT_MIN( read_len, stream_len ); | |
if ( FT_STREAM_READ( p, read_len ) ) | |
goto Exit; | |
if ( read_len < 256 ) | |
p[read_len] = '\0'; | |
limit = p + read_len - 10; | |
for ( p = buffer; p < limit; p++ ) | |
{ | |
if ( p[0] == 'S' && ft_strncmp( (char*)p, "StartData", 9 ) == 0 ) | |
{ | |
/* save offset of binary data after `StartData' */ | |
offset += (FT_ULong)( p - buffer + 10 ); | |
goto Found; | |
} | |
else if ( p[1] == 's' && ft_strncmp( (char*)p, "/sfnts", 6 ) == 0 ) | |
{ | |
offset += (FT_ULong)( p - buffer + 7 ); | |
goto Found; | |
} | |
} | |
FT_MEM_MOVE( buffer, p, 10 ); | |
read_len = 256; | |
p = buffer + 10; | |
} | |
} | |
Found: | |
/* We have found the start of the binary data or the `/sfnts' token. */ | |
/* Now rewind and extract the frame corresponding to this PostScript */ | |
/* section. */ | |
ps_len = offset - base_offset; | |
if ( FT_STREAM_SEEK( base_offset ) || | |
FT_FRAME_EXTRACT( 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; | |
/* Finally, we check whether `StartData' or `/sfnts' was real -- */ | |
/* it could be in a comment or string. We also get the arguments */ | |
/* of `StartData' to find out whether the data is represented in */ | |
/* binary or hex format. */ | |
arg1 = parser->root.cursor; | |
cid_parser_skip_PS_token( parser ); | |
cid_parser_skip_spaces ( parser ); | |
arg2 = parser->root.cursor; | |
cid_parser_skip_PS_token( parser ); | |
cid_parser_skip_spaces ( parser ); | |
limit = parser->root.limit; | |
cur = parser->root.cursor; | |
while ( cur < limit ) | |
{ | |
if ( parser->root.error ) | |
{ | |
error = parser->root.error; | |
goto Exit; | |
} | |
if ( cur[0] == 'S' && ft_strncmp( (char*)cur, "StartData", 9 ) == 0 ) | |
{ | |
if ( ft_strncmp( (char*)arg1, "(Hex)", 5 ) == 0 ) | |
{ | |
FT_Long tmp = ft_atol( (const char *)arg2 ); | |
if ( tmp < 0 ) | |
{ | |
FT_ERROR(( "cid_parser_new: invalid length of hex data\n" )); | |
error = FT_THROW( Invalid_File_Format ); | |
} | |
else | |
parser->binary_length = (FT_ULong)tmp; | |
} | |
goto Exit; | |
} | |
else if ( cur[1] == 's' && ft_strncmp( (char*)cur, "/sfnts", 6 ) == 0 ) | |
{ | |
FT_TRACE2(( "cid_parser_new: cannot handle Type 11 fonts\n" )); | |
error = FT_THROW( Unknown_File_Format ); | |
goto Exit; | |
} | |
cid_parser_skip_PS_token( parser ); | |
cid_parser_skip_spaces ( parser ); | |
arg1 = arg2; | |
arg2 = cur; | |
cur = parser->root.cursor; | |
} | |
/* we haven't found the correct `StartData'; go back and continue */ | |
/* searching */ | |
FT_FRAME_RELEASE( parser->postscript ); | |
if ( !FT_STREAM_SEEK( offset ) ) | |
goto Again; | |
Exit: | |
return error; | |
} | |
FT_LOCAL_DEF( void ) | |
cid_parser_done( CID_Parser* parser ) | |
{ | |
/* always free the private dictionary */ | |
if ( parser->postscript ) | |
{ | |
FT_Stream stream = parser->stream; | |
FT_FRAME_RELEASE( parser->postscript ); | |
} | |
parser->root.funcs.done( &parser->root ); | |
} | |
/* END */ |