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-mutex-private.hh"
28#include "hb-open-file-private.hh"
29#include "hb-ot-layout-gdef-table.hh"
30#include "hb-ot-layout-gsubgpos-private.hh"
31
32#ifdef HAVE_GLIB
33#include <glib.h>
34#endif
35#include <stdlib.h>
36#include <stdio.h>
37
38
39using namespace OT;
40
41
42int
43main (int argc, char **argv)
44{
45  if (argc != 2) {
46    fprintf (stderr, "usage: %s font-file.ttf\n", argv[0]);
47    exit (1);
48  }
49
50  const char *font_data = NULL;
51  int len = 0;
52
53#ifdef HAVE_GLIB
54  GMappedFile *mf = g_mapped_file_new (argv[1], false, NULL);
55  font_data = g_mapped_file_get_contents (mf);
56  len = g_mapped_file_get_length (mf);
57#else
58  FILE *f = fopen (argv[1], "rb");
59  fseek (f, 0, SEEK_END);
60  len = ftell (f);
61  fseek (f, 0, SEEK_SET);
62  font_data = (const char *) malloc (len);
63  len = fread ((char *) font_data, 1, len, f);
64#endif
65
66  printf ("Opened font file %s: %d bytes long\n", argv[1], len);
67
68  const OpenTypeFontFile &ot = *CastP<OpenTypeFontFile> (font_data);
69
70  switch (ot.get_tag ()) {
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  default:
87    printf ("Unknown font format\n");
88    break;
89  }
90
91  int num_fonts = ot.get_face_count ();
92  printf ("%d font(s) found in file\n", num_fonts);
93  for (int n_font = 0; n_font < num_fonts; n_font++) {
94    const OpenTypeFontFace &font = ot.get_face (n_font);
95    printf ("Font %d of %d:\n", n_font, num_fonts);
96
97    int num_tables = font.get_table_count ();
98    printf ("  %d table(s) found in font\n", num_tables);
99    for (int n_table = 0; n_table < num_tables; n_table++) {
100      const OpenTypeTable &table = font.get_table (n_table);
101      printf ("  Table %2d of %2d: %.4s (0x%08x+0x%08x)\n", n_table, num_tables,
102	      (const char *)table.tag,
103	      (unsigned int) table.offset,
104	      (unsigned int) table.length);
105
106      switch (table.tag) {
107
108      case GSUBGPOS::GSUBTag:
109      case GSUBGPOS::GPOSTag:
110	{
111
112	const GSUBGPOS &g = *CastP<GSUBGPOS> (font_data + table.offset);
113
114	int num_scripts = g.get_script_count ();
115	printf ("    %d script(s) found in table\n", num_scripts);
116	for (int n_script = 0; n_script < num_scripts; n_script++) {
117	  const Script &script = g.get_script (n_script);
118	  printf ("    Script %2d of %2d: %.4s\n", n_script, num_scripts,
119	          (const char *)g.get_script_tag(n_script));
120
121	  if (!script.has_default_lang_sys())
122	    printf ("      No default language system\n");
123	  int num_langsys = script.get_lang_sys_count ();
124	  printf ("      %d language system(s) found in script\n", num_langsys);
125	  for (int n_langsys = script.has_default_lang_sys() ? -1 : 0; n_langsys < num_langsys; n_langsys++) {
126	    const LangSys &langsys = n_langsys == -1
127				   ? script.get_default_lang_sys ()
128				   : script.get_lang_sys (n_langsys);
129	    if (n_langsys == -1)
130	      printf ("      Default Language System\n");
131	    else
132	      printf ("      Language System %2d of %2d: %.4s\n", n_langsys, num_langsys,
133		      (const char *)script.get_lang_sys_tag (n_langsys));
134	    if (langsys.get_required_feature_index () == Index::NOT_FOUND_INDEX)
135	      printf ("        No required feature\n");
136
137	    int num_features = langsys.get_feature_count ();
138	    printf ("        %d feature(s) found in language system\n", num_features);
139	    for (int n_feature = 0; n_feature < num_features; n_feature++) {
140	      printf ("        Feature index %2d of %2d: %d\n", n_feature, num_features,
141	              langsys.get_feature_index (n_feature));
142	    }
143	  }
144	}
145
146	int num_features = g.get_feature_count ();
147	printf ("    %d feature(s) found in table\n", num_features);
148	for (int n_feature = 0; n_feature < num_features; n_feature++) {
149	  const Feature &feature = g.get_feature (n_feature);
150	  printf ("    Feature %2d of %2d: %.4s; %d lookup(s)\n", n_feature, num_features,
151	          (const char *)g.get_feature_tag(n_feature),
152		  feature.get_lookup_count());
153
154	  int num_lookups = feature.get_lookup_count ();
155	  printf ("        %d lookup(s) found in feature\n", num_lookups);
156	  for (int n_lookup = 0; n_lookup < num_lookups; n_lookup++) {
157	    printf ("        Lookup index %2d of %2d: %d\n", n_lookup, num_lookups,
158	            feature.get_lookup_index (n_lookup));
159	  }
160	}
161
162	int num_lookups = g.get_lookup_count ();
163	printf ("    %d lookup(s) found in table\n", num_lookups);
164	for (int n_lookup = 0; n_lookup < num_lookups; n_lookup++) {
165	  const Lookup &lookup = g.get_lookup (n_lookup);
166	  printf ("    Lookup %2d of %2d: type %d, props 0x%04X\n", n_lookup, num_lookups,
167	          lookup.get_type(), lookup.get_props());
168	}
169
170	}
171	break;
172
173      case GDEF::Tag:
174	{
175
176	const GDEF &gdef = *CastP<GDEF> (font_data + table.offset);
177
178	printf ("    Has %sglyph classes\n",
179		  gdef.has_glyph_classes () ? "" : "no ");
180	printf ("    Has %smark attachment types\n",
181		  gdef.has_mark_attachment_types () ? "" : "no ");
182	printf ("    Has %sattach points\n",
183		  gdef.has_attach_points () ? "" : "no ");
184	printf ("    Has %slig carets\n",
185		  gdef.has_lig_carets () ? "" : "no ");
186	printf ("    Has %smark sets\n",
187		  gdef.has_mark_sets () ? "" : "no ");
188	break;
189	}
190      }
191    }
192  }
193
194  return 0;
195}
196
197
198