X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=buildscripts%2Fmf-to-table.py;h=e8984600aed2cf6607bc9878eff48f7a657a40c4;hb=cdcafc06490dcf4affcba8a1e9fecdfc6c573d0f;hp=4d4b505197d1469b1b98914af14595ac21b90224;hpb=1e7180500336cb41a34525d5f363e3828e7c51a5;p=lilypond.git

diff --git a/buildscripts/mf-to-table.py b/buildscripts/mf-to-table.py
index 4d4b505197..e8984600ae 100644
--- a/buildscripts/mf-to-table.py
+++ b/buildscripts/mf-to-table.py
@@ -1,327 +1,259 @@
 #!@PYTHON@
 
-# mf-to-table.py -- convert spacing info in  MF logs .ly and .tex
-# 
+# mf-to-table.py -- convert spacing info in MF logs . and .tex
+#
 # source file of the GNU LilyPond music typesetter
-# 
-# (c) 1997 Han-Wen Nienhuys <hanwen@cs.uu.nl>
+#
+# (c) 1997--2006 Han-Wen Nienhuys <hanwen@cs.uu.nl>
 
 import os
 import sys
 import getopt
-from string import *
-import regex
-import regsub
+import string
+import re
 import time
 
+def read_log_file (fn):
+    str = open (fn).read ()
+    str = re.sub ('\n', '', str)
+    str = re.sub ('[\t ]+', ' ', str)
 
-(options, files) = getopt.getopt(
-    sys.argv[1:], 'a:d:hl:o:p:t:', 
-    ['afm=', 'outdir=', 'dep=', 'ly=', 'tex=', 'debug', 'help', 'package='])
+    deps = []
+    autolines = []
+    def include_func (match, d = deps):
+        d.append (match.group (1))
+        return ''
 
-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)
-            line = regsub.sub('\r','', line)
-
-	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();
+    def auto_func (match, a = autolines):
+        a.append (match.group (1))
+        return ''
 
-#
-# 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))
+    str = re.sub ('\(([a-zA-Z_0-9-]+\.mf)', include_func, str)
+    str = re.sub ('@{(.*?)@}', auto_func, str)
+
+    return (autolines, deps)
+
+
+class Char_metric:
+    def __init__ (self):
+        pass
+
+font_family = 'feta'
+
+def parse_logfile (fn):
+    (autolines, deps) = read_log_file (fn)
+    charmetrics = []
     
-    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')
+    global_info = {
+        'filename' : os.path.splitext (os.path.basename (fn))[0]
+        }
+    group = ''
+
+    for l in autolines:
+        tags = string.split (l, '@:')
+        if tags[0] == 'group':
+            group = tags[1]
+        elif tags[0] == 'puorg':
+            group = ''
+        elif tags[0] == 'char':
+            name = tags[9]
+
+            name = re.sub ('-', 'M', name)
+            if group:
+                name = group + '.' + name
+            m = {
+                'description': tags[1],
+                'name': name,
+                'code': string.atoi (tags[2]),
+                'breapth': string.atof (tags[3]),
+                'width': string.atof (tags[4]),
+                'depth': string.atof (tags[5]),
+                'height': string.atof (tags[6]),
+                'wx': string.atof (tags[7]),
+                'wy': string.atof (tags[8]),
+            }
+            charmetrics.append (m)
+        elif tags[0] == 'font':
+            global font_family
+            font_family = (tags[3])
+            # To omit 'GNU' (foundry) from font name proper:
+            # name = tags[2:]
+            #urg
+            if 0: # testing
+                tags.append ('Regular')
+
+            encoding = re.sub (' ','-', tags[5])
+            tags = tags[:-1]
+            name = tags[1:]
+            global_info['design_size'] = string.atof (tags[4])
+            global_info['FontName'] = string.join (name, '-')
+            global_info['FullName'] = string.join (name,' ')
+            global_info['FamilyName'] = string.join (name[1:-1],
+                                '-')
+            if 1:
+                global_info['Weight'] = tags[4]
+            else: # testing
+                global_info['Weight'] = tags[-1]
+
+            global_info['FontBBox'] = '0 0 1000 1000'
+            global_info['Ascender'] = '0'
+            global_info['Descender'] = '0'
+            global_info['EncodingScheme'] = encoding
+
+        elif tags[0] == 'parameter':
+            global_info[tags[1]] = tags[2];
+            
+    return (global_info, charmetrics, deps)
+
+
+
+def write_tex_defs (file, global_info, charmetrics):
+    nm = font_family
+    for m in charmetrics:
+        
+        texname = re.sub ('[_.]', 'X',  m['name'])
+        def digit_to_letter (match):
+            return chr (ord (match.group(1)) - ord ('0') + ord ('A'))
+        texname = re.sub ('([0-9])', digit_to_letter, texname)
+        file.write (r'''\gdef\%s%s{\char%d}%%%s''' % \
+              (nm, texname, m['code'],'\n'))
+    file.write ('\\endinput\n')
+
+
+def write_character_lisp_table (file, global_info, charmetrics):
+
+    def conv_char_metric (charmetric):
+        f = 1.0
+        s = """(%s .
+((bbox . (%f %f %f %f))
+(subfont . "%s")
+(subfont-index . %d)
+(attachment . (%f . %f))))
+""" %(charmetric['name'],
+   -charmetric['breapth'] * f,
+   -charmetric['depth'] * f,
+   charmetric['width'] * f,
+   charmetric['height'] * f,
+   global_info['filename'],
+   charmetric['code'],
+   charmetric['wx'],
+   charmetric['wy'])
+
+        return s
+
+    for c in charmetrics:
+        file.write (conv_char_metric (c))
+
+
+def write_global_lisp_table (file, global_info):
+    str = ''
+
+    keys = ['staffsize', 'stafflinethickness', 'staff_space',
+        'linethickness', 'black_notehead_width', 'ledgerlinethickness',
+        'design_size', 
+        'blot_diameter'
+        ]
+    for k in keys:
+        if global_info.has_key (k):
+            str = str + "(%s . %s)\n" % (k,global_info[k])
+
+    file.write (str)
+
     
-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"
-		     )
+def write_ps_encoding (name, file, global_info, charmetrics):
+    encs = ['.notdef'] * 256
+    for m in charmetrics:
+        encs[m['code']] = m['name']
+
+    file.write ('/%s [\n' % name)
+    for m in range (0, 256):
+        file.write ('  /%s %% %d\n' % (encs[m], m))
+    file.write ('] def\n')
+
+
+def write_deps (file, deps, targets):
+    for t in targets:
+        t = re.sub ( '^\\./', '', t)
+        file.write ('%s '% t)
+    file.write (": ")
+    for d in deps:
+        file.write ('%s ' % d)
+    file.write ('\n')
+
+
+def help ():
+    sys.stdout.write(r"""Usage: mf-to-table [OPTIONS] LOGFILEs
+
+Generate feta metrics table from preparated feta log.
+
+Options:
+ -d, --dep=FILE         print dependency info to FILE
+ -h, --help             print this help
+ -l, --ly=FILE          name output table
+ -o, --outdir=DIR       prefix for dependency info
+ -p, --package=DIR      specify package
+ -t, --tex=FILE         name output tex chardefs
+
+ """)
     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()
+(options, files) = \
+ getopt.getopt (sys.argv[1:],
+        'a:d:ho:p:t:',
+        ['enc=',  'outdir=', 'dep=', 'lisp=',
+         'global-lisp=',
+         'tex=', 'debug', 'help', 'package='])
+
+global_lisp_nm = ''
+char_lisp_nm = ''
+enc_nm = ''
+texfile_nm = ''
+depfile_nm = ''
+lyfile_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 == '--tex' or o == '-t':
+        texfile_nm = a
+    elif o == '--lisp': 
+        char_lisp_nm = a
+    elif o == '--global-lisp': 
+        global_lisp_nm = a
+    elif o == '--enc':
+        enc_nm = a
+    elif o== '--help' or o == '-h':
+        help()
+    elif o == '--debug':
+        debug_b = 1
+    else:
+        print o
+        raise getopt.error
+
+base = re.sub ('.tex$', '', texfile_nm)
+
+for filenm in files:
+    (g, m, deps) = parse_logfile (filenm)
+
+    write_tex_defs (open (texfile_nm, 'w'), g, m)
+    enc_name = 'FetaEncoding'
+    if re.search ('parmesan', filenm):
+        enc_name = 'ParmesanEncoding'
+    elif re.search ('feta-brace', filenm):
+        enc_name = 'FetaBraceEncoding'
+    elif re.search ('feta-alphabet', filenm):
+        enc_name = 'FetaAlphabetEncoding';
+
+    write_ps_encoding (enc_name, open (enc_nm, 'w'), g, m)
+    write_character_lisp_table (open (char_lisp_nm, 'w'), g, m)  
+    write_global_lisp_table (open (global_lisp_nm, 'w'), g)  
+    if depfile_nm:
+        write_deps (open (depfile_nm, 'wb'), deps,
+              [base + '.log', base + '.dvi', base + '.pfa',
+              base + '.pfb', texfile_nm])