--- /dev/null
+#!@PYTHON@
+
+# mf-to-table.py -- convert spacing info in MF logs .ly and .tex
+#
+# source file of the GNU LilyPond music typesetter
+#
+# (c) 1997 Han-Wen Nienhuys <hanwen@stack.nl>
+
+import os
+import sys
+import getopt
+from string import *
+import regex
+import regsub
+import time
+
+sys.path.append ('@abs-step-bindir@')
+
+(options, files) = getopt.getopt(
+ sys.argv[1:], 'a:d:hl:o:p:t:',
+ ['afm=', 'outdir=', 'dep=', 'ly=', 'tex=', 'debug', 'help', 'package='])
+
+for opt in options:
+ o = opt[0]
+ a = opt[1]
+ if o == '-p' or o == '--package':
+ topdir = a
+
+sys.path.append (topdir + '/stepmake/bin')
+from packagepython import *
+package = Package (topdir)
+packager = Packager ()
+
+from packagepython import *
+from flower import *
+
+begin_autometric_re = regex.compile('@{')
+end_autometric_re = regex.compile('@}')
+include_re = regex.compile ('(\([a-zA-Z_0-9-]+\.mf\)')
+autometric_re = regex.compile('@{\(.*\)@}')
+version = '0.7'
+postfixes = ['log', 'dvi', '2602gf', 'tfm']
+
+class Feta_file(File):
+ """Read Feta metrics from a metafont log-file."""
+
+ def include_scan (self, line):
+ include_pos = include_re.search (line)
+ while include_pos <> -1:
+ self.dependencies.append (include_re.group (1))
+
+ line = line[include_pos + 1:]
+ include_pos = include_re.search (line)
+
+ def read_autometricline(self):
+ line = ''
+ while end_autometric_re.search(line) == -1 and not self.eof():
+ suf = File.readline(self)
+ self.include_scan (suf)
+ if begin_autometric_re.search(line) == -1:
+ line = ''
+ line = line + regsub.sub('\n','', suf)
+
+ if self.eof():
+ return ''
+
+ return line;
+ def readline(self):
+ """return what is enclosed in one @{ @} pair"""
+ line = '';
+ while autometric_re.search(line) == -1 and not self.eof():
+ line = self.read_autometricline()
+
+ if self.eof():
+ return '';
+
+ return autometric_re.group(1);
+ def __init__(self, nm):
+ File.__init__(self, nm)
+ self.dependencies = []
+ def do_file(infile_nm):
+ infile = readline();
+
+#
+# FIXME: should parse output for {} to do indenting.
+#
+class Indentable_file(File):
+ """Output file with support for indentation"""
+ def __init__(self,nm, mode):
+ File.__init__(self,nm,mode)
+ self.current_indent_ = 0
+ self.delta_indent_ = 4
+ def writeline (self, str):
+ File.write(self, str)
+ def writeeol(self):
+ File.write(self, '\n')
+ File.write(self, ' '* self.current_indent_)
+
+ def indent(self):
+ self.current_indent_ = self.delta_indent_ + self.current_indent_;
+ def dedent(self):
+ self.current_indent_ = self.current_indent_ - self.delta_indent_;
+ if self.current_indent_ < 0:
+ raise 'Nesting!'
+
+ def write(self, str):
+ lines = split(str, '\n')
+ for l in lines[:-1]:
+ self.writeline(l)
+ self.writeeol()
+ self.writeline (lines[-1])
+
+class Afm_file (File):
+ def print_f_dimen(self, f):
+ f = f * 1000
+
+ dimstr = '%.2f' % f
+
+ # try to mask rounding errors
+ if (dimstr == '-0.00'):
+ dimstr = '0.00'
+ self.write( dimstr +' ');
+
+ def neg_print_dimen(self, str):
+ self.print_f_dimen(-atof(str))
+ def print_dimen(self, str):
+ self.print_f_dimen(atof(str))
+ def def_symbol (self, code, lily_id, tex_id, xdim, ydim):
+ self.write ('C %s; N %s-%s; B ' % (code, self.groupname, lily_id))
+
+ self.neg_print_dimen(xdim [0])
+ self.neg_print_dimen(ydim [0])
+ self.print_dimen(xdim [1])
+ self.print_dimen(ydim [1])
+
+ self.write (';\n');
+
+ def start (self,nm):
+ self.write ('Start%s\n' % nm)
+ def end (self,nm):
+ self.write ('End%s\n' % nm)
+
+class Ly_file(Indentable_file):
+ """extra provisions for mozarella quirks"""
+ def print_lit(self, str):
+ self.write('\"%s\"\t' % str)
+
+ def print_f_dimen(self, f):
+ dimstr = '%.2f' % f
+
+ # try to mask rounding errors
+ if (dimstr == '-0.00'):
+ dimstr = '0.00'
+ self.write( dimstr +'\\pt\t');
+
+ def print_dimen(self, str):
+ self.print_f_dimen(atof(str))
+
+ def neg_print_dimen(self, str):
+ self.print_f_dimen(-atof(str));
+
+ def def_symbol(self, code, lily_id, tex_id, xdim, ydim):
+ self.print_lit(lily_id)
+ self.print_lit('\\\\' + tex_id)
+
+ self.neg_print_dimen(xdim [0])
+ self.print_dimen(xdim [1])
+ self.neg_print_dimen(ydim [0])
+ self.print_dimen(ydim [1])
+ self.write('\n')
+
+
+class Log_reader:
+ """Read logs, destill info, and put into output files"""
+ def output_label(self, line):
+
+ if not line:
+ return;
+ tags = split(line, '@:')
+ label = tags[0]
+ name = tags[1]
+ ly = self.lyfile
+ afm = self.afmfile
+ if tags[0] == 'font':
+ ly.indent()
+ ly.write("% name=\\symboltables {\n")
+ self.texfile.write("% name\n")
+
+ afm.write ('FontName %s\n' % name)
+ afm.start ('FontMetrics')
+ afm.start ('CharMetrics')
+
+ elif label == "group":
+ ly.indent()
+ ly.print_lit(name)
+ ly.write(' = \\table {\n')
+ self.texfile.write("% " + name + "\n")
+ afm.groupname = name
+ elif label == "puorg":
+ ly.dedent()
+ ly.write("}\n")
+ self.texfile.write("\n")
+ elif label == "tnof":
+ ly.dedent()
+ ly.write("% } % $name\n")
+ afm.end ('CharMetrics')
+ afm.end('FontMetrics');
+ elif label == "char":
+ code = tags[2]
+ id = tags [7]
+ texstr = tags [8]
+ xdim = tags[3:5]
+ ydim = tags[5:7]
+ ly.def_symbol(code, id, texstr, xdim, ydim)
+
+ self.texfile.write("\\fetdef\\%s{%s}\n" % (texstr, code))
+ afm.def_symbol (code, id, texstr, xdim, ydim)
+ else:
+ raise 'unknown label: ' + label
+
+ def writedeps (self, deps):
+ if not len (deps):
+ sys.stderr.write ('Huh, no main target??')
+ return
+ filename = deps[0]
+ split = os.path.splitext(filename)
+ basename=split[0];
+
+ targets = map (lambda x,y = basename, z = self.outdir: z + '/' + y + '.' + x, postfixes)
+ depstring = reduce(lambda x,y: x + ' ' + y, deps)
+ dependencies = map (lambda x, y=depstring: x + ': ' + y, targets)
+ for x in dependencies:
+ self.depfile.write (x + '\n')
+
+ def do_file(self,filenm):
+ self.lyfile.write ('\n% input from ' + filenm + '\n')
+ self.texfile.write ('\n% input from ' + filenm + '\n')
+ feta = Feta_file(filenm)
+ while not feta.eof():
+ line = feta.readline()
+ self.output_label(line)
+ feta.close()
+
+ self.writedeps (feta.dependencies)
+
+ def __init__(self, lyfile_nm, texfile_nm, depfile_nm, afmfile_nm):
+ self.lyfile = Ly_file(lyfile_nm, 'w')
+ self.texfile = Indentable_file(texfile_nm, 'w')
+ self.depfile = File (depfile_nm, 'w')
+ self.afmfile = Afm_file (afmfile_nm, 'w')
+ headerstr = '%% Creator: %s\n%% Automatically generated on\n%% Do not edit' % \
+ (program_id() )
+
+ self.lyfile.write(headerstr)
+ self.texfile.write(headerstr)
+ self.depfile.write ('# automatically generated by %s\n' % program_id ())
+
+ def close(self):
+ self.lyfile.close()
+ self.texfile.close()
+ self.depfile.close ()
+
+ def __del__(self):
+ self.close()
+
+def today_str():
+ return time.asctime(time.localtime(time.time()))
+
+def program_id():
+ return 'mf-to-table.py version ' + version;
+
+def identify():
+ sys.stdout.write(program_id() + '\n')
+
+def help():
+ sys.stdout.write("Usage: mf-to-table [options] LOGFILEs\n"
+ + "Generate mozarella metrics table from preparated feta log\n\n"
+ + "Options:\n"
+ + " -a, --afm=FILE .afm file\n"
+ + " -d, --dep=FILE print dependency info to FILE\n"
+ + " -h, --help print this help\n"
+ + " -l, --ly=FILE name output table\n"
+ + " -o, --outdir=DIR prefix for dependency info\n"
+ + " -p, --package=DIR specify package\n"
+ + " -t, --tex=FILE name output tex chardefs\n"
+ )
+ sys.exit (0)
+
+
+def main():
+ identify()
+
+ lyfile_nm = texfile_nm = '';
+ depfile_nm = ''
+ afmfile_nm = ''
+ outdir_prefix = '.'
+ for opt in options:
+ o = opt[0]
+ a = opt[1]
+ if o == '--dep' or o == '-d':
+ depfile_nm = a
+ elif o == '--outdir' or o == '-o':
+ outdir_prefix = a
+ elif o == '--ly' or o == '-l':
+ lyfile_nm = a
+ elif o == '--tex' or o == '-t':
+ texfile_nm = a
+ elif o== '--help' or o == '-h':
+ help()
+ elif o=='--afm' or o == '-a':
+ afmfile_nm = a
+ elif o == '--debug':
+ debug_b = 1
+ elif o == '-p' or o == '--package':
+ topdir = a
+ else:
+ print o
+ raise getopt.error
+
+ log_reader = Log_reader(lyfile_nm, texfile_nm, depfile_nm, afmfile_nm)
+ log_reader.outdir = outdir_prefix
+ for filenm in files:
+ log_reader.do_file(filenm)
+ log_reader.close()
+
+
+main()