1 /*
2  * Copyright © 2007,2008,2009  Red Hat, Inc.
3  *
4  *  This is part of HarfBuzz, a text shaping library.
5  *
6  * Permission is hereby granted, without written agreement and without
7  * license or royalty fees, to use, copy, modify, and distribute this
8  * software and its documentation for any purpose, provided that the
9  * above copyright notice and the following two paragraphs appear in
10  * all copies of this software.
11  *
12  * IN NO EVENT SHALL THE COPYRIGHT HOLDER BE LIABLE TO ANY PARTY FOR
13  * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES
14  * ARISING OUT OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN
15  * IF THE COPYRIGHT HOLDER HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH
16  * DAMAGE.
17  *
18  * THE COPYRIGHT HOLDER SPECIFICALLY DISCLAIMS ANY WARRANTIES, INCLUDING,
19  * BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND
20  * FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
21  * ON AN "AS IS" BASIS, AND THE COPYRIGHT HOLDER HAS NO OBLIGATION TO
22  * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
23  *
24  * Red Hat Author(s): Behdad Esfahbod
25  */
26 
27 #include "hb-static.cc"
28 #include "hb-open-file.hh"
29 #include "hb-ot-layout-gdef-table.hh"
30 #include "hb-ot-layout-gsubgpos.hh"
31 
32 #ifdef HAVE_GLIB
33 #include <glib.h>
34 #endif
35 #include <stdlib.h>
36 #include <stdio.h>
37 
38 
39 using namespace OT;
40 
41 #ifdef HB_NO_OPEN
42 #define hb_blob_create_from_file(x)  hb_blob_get_empty ()
43 #endif
44 
45 int
main(int argc,char ** argv)46 main (int argc, char **argv)
47 {
48   if (argc != 2)
49   {
50     fprintf (stderr, "usage: %s font-file.ttf\n", argv[0]);
51     exit (1);
52   }
53 
54   hb_blob_t *blob = hb_blob_create_from_file (argv[1]);
55   unsigned int len;
56   const char *font_data = hb_blob_get_data (blob, &len);
57   printf ("Opened font file %s: %d bytes long\n", argv[1], len);
58 
59   hb_blob_t *font_blob = hb_sanitize_context_t().sanitize_blob<OpenTypeFontFile> (blob);
60   const OpenTypeFontFile* sanitized = font_blob->as<OpenTypeFontFile> ();
61   if (!font_blob->data)
62   {
63     printf ("Sanitization of the file wasn't successful. Exit");
64     return 1;
65   }
66   const OpenTypeFontFile& ot = *sanitized;
67 
68 
69   switch (ot.get_tag ())
70   {
71   case OpenTypeFontFile::TrueTypeTag:
72     printf ("OpenType font with TrueType outlines\n");
73     break;
74   case OpenTypeFontFile::CFFTag:
75     printf ("OpenType font with CFF (Type1) outlines\n");
76     break;
77   case OpenTypeFontFile::TTCTag:
78     printf ("TrueType Collection of OpenType fonts\n");
79     break;
80   case OpenTypeFontFile::TrueTag:
81     printf ("Obsolete Apple TrueType font\n");
82     break;
83   case OpenTypeFontFile::Typ1Tag:
84     printf ("Obsolete Apple Type1 font in SFNT container\n");
85     break;
86   case OpenTypeFontFile::DFontTag:
87     printf ("DFont Mac Resource Fork\n");
88     break;
89   default:
90     printf ("Unknown font format\n");
91     break;
92   }
93 
94   int num_fonts = ot.get_face_count ();
95   printf ("%d font(s) found in file\n", num_fonts);
96   for (int n_font = 0; n_font < num_fonts; n_font++)
97   {
98     const OpenTypeFontFace &font = ot.get_face (n_font);
99     printf ("Font %d of %d:\n", n_font, num_fonts);
100 
101     int num_tables = font.get_table_count ();
102     printf ("  %d table(s) found in font\n", num_tables);
103     for (int n_table = 0; n_table < num_tables; n_table++)
104     {
105       const OpenTypeTable &table = font.get_table (n_table);
106       printf ("  Table %2d of %2d: %.4s (0x%08x+0x%08x)\n", n_table, num_tables,
107 	      (const char *) table.tag,
108 	      (unsigned int) table.offset,
109 	      (unsigned int) table.length);
110 
111       switch (table.tag)
112       {
113 
114       case HB_OT_TAG_GSUB:
115       case HB_OT_TAG_GPOS:
116 	{
117 
118 	const GSUBGPOS &g = *CastP<GSUBGPOS> (font_data + table.offset);
119 
120 	int num_scripts = g.get_script_count ();
121 	printf ("    %d script(s) found in table\n", num_scripts);
122 	for (int n_script = 0; n_script < num_scripts; n_script++)
123 	{
124 	  const Script &script = g.get_script (n_script);
125 	  printf ("    Script %2d of %2d: %.4s\n", n_script, num_scripts,
126 		  (const char *)g.get_script_tag(n_script));
127 
128 	  if (!script.has_default_lang_sys())
129 	    printf ("      No default language system\n");
130 	  int num_langsys = script.get_lang_sys_count ();
131 	  printf ("      %d language system(s) found in script\n", num_langsys);
132 	  for (int n_langsys = script.has_default_lang_sys() ? -1 : 0; n_langsys < num_langsys; n_langsys++) {
133 	    const LangSys &langsys = n_langsys == -1
134 				   ? script.get_default_lang_sys ()
135 				   : script.get_lang_sys (n_langsys);
136 	    if (n_langsys == -1)
137 	      printf ("      Default Language System\n");
138 	    else
139 	      printf ("      Language System %2d of %2d: %.4s\n", n_langsys, num_langsys,
140 		      (const char *)script.get_lang_sys_tag (n_langsys));
141 	    if (!langsys.has_required_feature ())
142 	      printf ("        No required feature\n");
143 	    else
144 	      printf ("        Required feature index: %d\n",
145 		      langsys.get_required_feature_index ());
146 
147 	    int num_features = langsys.get_feature_count ();
148 	    printf ("        %d feature(s) found in language system\n", num_features);
149 	    for (int n_feature = 0; n_feature < num_features; n_feature++)
150 	    {
151 	      printf ("        Feature index %2d of %2d: %d\n", n_feature, num_features,
152 		      langsys.get_feature_index (n_feature));
153 	    }
154 	  }
155 	}
156 
157 	int num_features = g.get_feature_count ();
158 	printf ("    %d feature(s) found in table\n", num_features);
159 	for (int n_feature = 0; n_feature < num_features; n_feature++)
160 	{
161 	  const Feature &feature = g.get_feature (n_feature);
162 	  int num_lookups = feature.get_lookup_count ();
163 	  printf ("    Feature %2d of %2d: %c%c%c%c\n", n_feature, num_features,
164 		  HB_UNTAG(g.get_feature_tag(n_feature)));
165 
166 	  printf ("        %d lookup(s) found in feature\n", num_lookups);
167 	  for (int n_lookup = 0; n_lookup < num_lookups; n_lookup++) {
168 	    printf ("        Lookup index %2d of %2d: %d\n", n_lookup, num_lookups,
169 		    feature.get_lookup_index (n_lookup));
170 	  }
171 	}
172 
173 	int num_lookups = g.get_lookup_count ();
174 	printf ("    %d lookup(s) found in table\n", num_lookups);
175 	for (int n_lookup = 0; n_lookup < num_lookups; n_lookup++)
176 	{
177 	  const Lookup &lookup = g.get_lookup (n_lookup);
178 	  printf ("    Lookup %2d of %2d: type %d, props 0x%04X\n", n_lookup, num_lookups,
179 		  lookup.get_type(), lookup.get_props());
180 	}
181 
182 	}
183 	break;
184 
185       case GDEF::tableTag:
186 	{
187 
188 	const GDEF &gdef = *CastP<GDEF> (font_data + table.offset);
189 
190 	printf ("    Has %sglyph classes\n",
191 		  gdef.has_glyph_classes () ? "" : "no ");
192 	printf ("    Has %smark attachment types\n",
193 		  gdef.has_mark_attachment_types () ? "" : "no ");
194 	printf ("    Has %sattach points\n",
195 		  gdef.has_attach_points () ? "" : "no ");
196 	printf ("    Has %slig carets\n",
197 		  gdef.has_lig_carets () ? "" : "no ");
198 	printf ("    Has %smark sets\n",
199 		  gdef.has_mark_sets () ? "" : "no ");
200 	break;
201 	}
202       }
203     }
204   }
205 
206   return 0;
207 }
208