reactos/lib/3rdparty/freetype/src/tools/test_afm.c

   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   }