#include <ft2build.h>#include FT_SYSTEM_STREAM_H#include <stdio.h> /* the ISO/ANSI standard stream object */  typedef struct FT_StdStreamRec_  {    FT_StreamRec  stream;    FILE*         file;    const char*   pathname;    } FT_StdStreamRec, *FT_StdStream; /* read bytes from a standard stream */  static FT_ULong  ft_std_stream_read( FT_StdStream   stream,                      FT_Byte*       buffer,                      FT_ULong       size )  {    long   read_bytes;        read_bytes = fread( buffer, 1, size, stream->file );    if ( read_bytes < 0 )      read_bytes = 0;          return (FT_ULong) read_bytes;  } /* seek the standard stream to a new position */  static FT_Error  ft_std_stream_seek( FT_StdStream   stream,                      FT_ULong       pos )  {    return ( fseek( stream->file, pos, SEEK_SET ) < 0 )         ? FT_Err_Stream_Seek         : FT_Err_Ok;  }     /* close a standard stream */    static void  ft_std_stream_done( FT_StdStream  stream )  {    fclose( stream->file );    stream->file     = NULL;    stream->pathname = NULL;  } /* open a standard stream from a given pathname */  static void  ft_std_stream_init( FT_StdStream  stream,                      const char*   pathname )  {    FT_ASSERT( pathname != NULL );    stream->file = fopen( pathname, "rb" );    if ( stream->file == NULL )    {      FT_ERROR(( "iso.stream.init: could not open '%s'\n", pathname ));      FT_XTHROW( FT_Err_Stream_Open );    }        /* compute total size in bytes */    fseek( file, 0, SEEK_END );    FT_STREAM__SIZE(stream) = ftell( file );    fseek( file, 0, SEEK_SET );        stream->pathname = pathname;    stream->pos      = 0;        FT_TRACE1(( "iso.stream.init: opened '%s' (%ld bytes) succesfully\n",                 pathname, FT_STREAM__SIZE(stream) ));  }                   static void  ft_std_stream_class_init( FT_ClassRec*  _clazz )  {    FT_StreamClassRec*  clazz = FT_STREAM_CLASS(_clazz);        clazz->stream_read = (FT_Stream_ReadFunc) ft_std_stream_read;    clazz->stream_seek = (FT_Stream_SeekFunc) ft_std_stream_seek;  }  static const FT_TypeRec  ft_std_stream_type;  {    "StreamClass",    NULL,        sizeof( FT_ClassRec ),    ft_stream_class_init,    NULL,        sizeof( FT_StdStreamRec ),    ft_std_stream_init,    ft_std_stream_done,    NULL,  };    FT_EXPORT_DEF( FT_Stream )  ft_std_stream_new( FT_Memory    memory,                     const char*  pathname )  {    FT_Class  clazz;        clazz = ft_class_from_type( memory, &ft_std_stream_type );        return (FT_Stream) ft_object_new( clazz, pathname );  }                       FT_EXPORT_DEF( void )  ft_std_stream_create( FT_Memory    memory,                        const char*  pathname,                        FT_Stream*   astream )  {    FT_Class  clazz;        clazz = ft_class_from_type( memory, &ft_std_stream_type );        ft_object_create( clazz, pathname, FT_OBJECT_P(astream) );  }