struct treenode* handle_UND_treenode (int attr,int line,int column,int cnt, ... ) {
struct treenode *now=new_treenode();
now->attr=attr; now->line=line; now->column=column;
if (cnt) {
va_list ap;
va_start(ap,cnt);
struct treenode* tmp=now;
int j;
for (j=0;j<cnt;j++) {
struct treenode** t2=va_arg(ap,struct treenode **);
assert((*t2)->attr);
if ((*t2)->right_child!=NULL) {
Print_Name((*t2)->right_child->attr);
printf("\n");
}
assert((*t2)->right_child==NULL);
if (j) assert(tmp->right_child==NULL);
else assert(tmp->left_child==NULL);
if (j) tmp->right_child=*t2;
else tmp->left_child=*t2;
tmp=*t2;
}
va_end(ap);
}
return now;
}
void display(struct treenode* v) {
if (v==NULL) return ;
if (v->column>=0) {
int i;
for (i=0;i<indent;i++) printf(" ");
Print_Name(v->attr);
if (v->attr>8000)
printf(" (%d)\n",v->line);
else {
if (v->value==NULL) printf("\n");
else printf(": %s\n",v->value);
}
}
indent+=2;
display(v->left_child);
indent-=2;
display(v->right_child);
}
int
main( int argc,
char* argv[] )
{
int i, file;
char filename[128 + 4];
char alt_filename[128 + 4];
char* execname;
int num_faces;
int option;
FT_Library library; /* the FreeType library */
FT_Face face; /* the font face */
execname = ft_basename( argv[0] );
while ( 1 )
{
option = getopt( argc, argv, "dl:nv" );
if ( option == -1 )
break;
switch ( option )
{
case 'd':
debug = 1;
break;
case 'l':
trace_level = atoi( optarg );
if ( trace_level < 1 || trace_level > 7 )
usage( execname );
break;
case 'n':
name_tables = 1;
break;
case 'v':
verbose = 1;
break;
default:
usage( execname );
break;
}
}
argc -= optind;
argv += optind;
if ( argc != 1 )
usage( execname );
#if FREETYPE_MAJOR == 2 && FREETYPE_MINOR == 0 && FREETYPE_PATCH <= 8
if ( debug )
{
# ifdef FT_DEBUG_LEVEL_TRACE
FT_SetTraceLevel( trace_any, (FT_Byte)trace_level );
# else
trace_level = 0;
# endif
}
#elif 0
/* "setenv/putenv" is not ANSI and I don't want to mess */
/* with this portability issue right now */
if ( debug )
{
char temp[32];
sprintf( temp, "any=%d", trace_level );
setenv( "FT2_DEBUG", temp );
}
#endif
file = 0;
/* Initialize engine */
error = FT_Init_FreeType( &library );
if ( error )
PanicZ( "Could not initialize FreeType library" );
filename[128] = '\0';
alt_filename[128] = '\0';
strncpy( filename, argv[file], 128 );
strncpy( alt_filename, argv[file], 128 );
/* try to load the file name as is, first */
error = FT_New_Face( library, argv[file], 0, &face );
if ( !error )
goto Success;
#ifndef macintosh
i = strlen( argv[file] );
while ( i > 0 && argv[file][i] != '\\' && argv[file][i] != '/' )
{
if ( argv[file][i] == '.' )
i = 0;
i--;
}
if ( i >= 0 )
{
strncpy( filename + strlen( filename ), ".ttf", 4 );
strncpy( alt_filename + strlen( alt_filename ), ".ttc", 4 );
}
#endif
/* Load face */
error = FT_New_Face( library, filename, 0, &face );
if ( error )
PanicZ( "Could not open face." );
Success:
num_faces = face->num_faces;
FT_Done_Face( face );
printf( "There %s %d %s in this file.\n",
num_faces == 1 ? (char *)"is" : (char *)"are",
num_faces,
num_faces == 1 ? (char *)"face" : (char *)"faces" );
for ( i = 0; i < num_faces; i++ )
{
error = FT_New_Face( library, filename, i, &face );
if ( error )
PanicZ( "Could not open face." );
printf( "\n----- Face number: %d -----\n\n", i );
Print_Name( face );
printf( "\n" );
Print_Type( face );
printf( " glyph count: %ld\n", face->num_glyphs );
if ( name_tables && FT_IS_SFNT( face ) )
{
printf( "\n" );
Print_Sfnt_Names( face );
}
if ( face->num_fixed_sizes )
{
printf( "\n" );
Print_Fixed( face );
}
if ( face->num_charmaps )
{
printf( "\n" );
Print_Charmaps( face );
}
FT_Done_Face( face );
}
FT_Done_FreeType( library );
exit( 0 ); /* for safety reasons */
return 0; /* never reached */
}
