1 /*

     2  * gcc -DFT2_BUILD_LIBRARY -I../../include -o test_afm test_afm.c \

     3  *     -L../../objs/.libs -lfreetype -lz -static

     4  */

     5 #include <ft2build.h>

     6 #include FT_FREETYPE_H

     7 #include FT_INTERNAL_STREAM_H

     8 #include FT_INTERNAL_POSTSCRIPT_AUX_H

     9 

    10   void dump_fontinfo( AFM_FontInfo  fi )

    11   {

    12     FT_Int  i;

    13 

    14 

    15     printf( "This AFM is for %sCID font.\n\n",

    16             ( fi->IsCIDFont ) ? "" : "non-" );

    17 

    18     printf( "FontBBox: %.2f %.2f %.2f %.2f\n", fi->FontBBox.xMin / 65536.,

    19                                                fi->FontBBox.yMin / 65536.,

    20                                                fi->FontBBox.xMax / 65536.,

    21                                                fi->FontBBox.yMax / 65536. );

    22     printf( "Ascender: %.2f\n", fi->Ascender / 65536. );

    23     printf( "Descender: %.2f\n\n", fi->Descender / 65536. );

    24 

    25     if ( fi->NumTrackKern )

    26       printf( "There are %d sets of track kernings:\n",

    27               fi->NumTrackKern );

    28     else

    29       printf( "There is no track kerning.\n" );

    30 

    31     for ( i = 0; i < fi->NumTrackKern; i++ )

    32     {

    33       AFM_TrackKern  tk = fi->TrackKerns + i;

    34 

    35 

    36       printf( "\t%2d: %5.2f %5.2f %5.2f %5.2f\n", tk->degree,

    37                                                   tk->min_ptsize / 65536.,

    38                                                   tk->min_kern / 65536.,

    39                                                   tk->max_ptsize / 65536.,

    40                                                   tk->max_kern / 65536. );

    41     }

    42 

    43     printf( "\n" );

    44 

    45     if ( fi->NumKernPair )

    46       printf( "There are %d kerning pairs:\n",

    47               fi->NumKernPair );

    48     else

    49       printf( "There is no kerning pair.\n" );

    50 

    51     for ( i = 0; i < fi->NumKernPair; i++ )

    52     {

    53       AFM_KernPair  kp = fi->KernPairs + i;

    54 

    55 

    56       printf( "\t%3d + %3d => (%4d, %4d)\n", kp->index1,

    57                                              kp->index2,

    58                                              kp->x,

    59                                              kp->y );

    60     }

    61 

    62   }

    63 

    64   int

    65   dummy_get_index( const char*  name,

    66                    FT_Offset    len,

    67                    void*        user_data )

    68   {

    69     if ( len )

    70       return name[0];

    71     else

    72       return 0;

    73   }

    74 

    75   FT_Error

    76   parse_afm( FT_Library    library,

    77              FT_Stream     stream,

    78              AFM_FontInfo  fi )

    79   {

    80     PSAux_Service  psaux;

    81     AFM_ParserRec  parser;

    82     FT_Error       error = FT_Err_Ok;

    83 

    84 

    85     psaux = (PSAux_Service)FT_Get_Module_Interface( library, "psaux" );

    86     if ( !psaux || !psaux->afm_parser_funcs )

    87       return -1;

    88 

    89     error = FT_Stream_EnterFrame( stream, stream->size );

    90     if ( error )

    91       return error;

    92 

    93     error = psaux->afm_parser_funcs->init( &parser,

    94                                            library->memory,

    95                                            stream->cursor,

    96                                            stream->limit );

    97     if ( error )

    98       return error;

    99 

   100     parser.FontInfo = fi;

   101     parser.get_index = dummy_get_index;

   102 

   103     error = psaux->afm_parser_funcs->parse( &parser );

   104 

   105     psaux->afm_parser_funcs->done( &parser );

   106 

   107     return error;

   108   }

   109 

   110 

   111   int main( int    argc,

   112             char** argv )

   113   {

   114     FT_Library       library;

   115     FT_StreamRec     stream;

   116     FT_Error         error = FT_Err_Ok;

   117     AFM_FontInfoRec  fi;

   118 

   119 

   120     if ( argc < 2 )

   121       return FT_Err_Invalid_Argument;

   122 

   123     error = FT_Init_FreeType( &library );

   124     if ( error )

   125       return error;

   126 

   127     FT_ZERO( &stream );

   128     error = FT_Stream_Open( &stream, argv[1] );

   129     if ( error )

   130       goto Exit;

   131     stream.memory = library->memory;

   132 

   133     FT_ZERO( &fi );

   134     error = parse_afm( library, &stream, &fi );

   135 

   136     if ( !error )

   137     {

   138       FT_Memory  memory = library->memory;

   139 

   140 

   141       dump_fontinfo( &fi );

   142 

   143       if ( fi.KernPairs )

   144         FT_FREE( fi.KernPairs );

   145       if ( fi.TrackKerns )

   146         FT_FREE( fi.TrackKerns );

   147     }

   148     else

   149       printf( "parse error\n" );

   150 

   151     FT_Stream_Close( &stream );

   152 

   153   Exit:

   154     FT_Done_FreeType( library );

   155 

   156     return error;

   157   }