#!@PYTHON@ # mf-to-table.py -- convert spacing info in MF logs . # This file is part of LilyPond, the GNU music typesetter. # # Copyright (C) 1997--2010 Han-Wen Nienhuys # # LilyPond is free software: you can redistribute it and/or modify # it under the terms of the GNU General Public License as published by # the Free Software Foundation, either version 3 of the License, or # (at your option) any later version. # # LilyPond is distributed in the hope that it will be useful, # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the # GNU General Public License for more details. # # You should have received a copy of the GNU General Public License # along with LilyPond. If not, see . import os import sys import getopt import re import time def read_log_file (fn): str = open (fn).read () str = re.sub ('\n', '', str) str = re.sub ('[\t ]+', ' ', str) deps = [] autolines = [] def include_func (match, d = deps): d.append (match.group (1)) return '' def auto_func (match, a = autolines): a.append (match.group (1)) return '' str = re.sub ('\\(([/a-z.A-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 = [] global_info = { 'filename' : os.path.splitext (os.path.basename (fn))[0] } group = '' for l in autolines: tags = l.split ('@:') if tags[0] == 'group': group = tags[1] elif tags[0] == 'puorg': group = '' elif tags[0] == 'char': name = tags[9] if group: name = group + '.' + name m = { 'description': tags[1], 'name': name, 'code': int (tags[2]), 'breapth': float (tags[3]), 'width': float (tags[4]), 'depth': float (tags[5]), 'height': float (tags[6]), 'wx': float (tags[7]), 'wy': float (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'] = float (tags[4]) global_info['FontName'] = '-'.join (name) global_info['FullName'] = ' '.join (name) global_info['FamilyName'] = '-'.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 character_lisp_table (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 s = '' for c in charmetrics: s += conv_char_metric (c) return s def global_lisp_table (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]) return str def ps_encoding (name, global_info, charmetrics): encs = ['.notdef'] * 256 for m in charmetrics: encs[m['code']] = m['name'] s = ('/%s [\n' % name) for m in range (0, 256): s += (' /%s %% %d\n' % (encs[m], m)) s += ('] def\n') return s def get_deps (deps, targets): s = '' for t in targets: t = re.sub ( '^\\./', '', t) s += ('%s '% t) s += (": ") for d in deps: s += ('%s ' % d) s += ('\n') return s 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 """) sys.exit (0) (options, files) = \ getopt.getopt (sys.argv[1:], 'a:d:ho:p:t:', ['enc=', 'outdir=', 'dep=', 'lisp=', 'global-lisp=', 'debug', 'help', 'package=']) global_lisp_nm = '' char_lisp_nm = '' enc_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 == '--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 = os.path.splitext (lyfile_nm)[0] for filenm in files: (g, m, deps) = parse_logfile (filenm) enc_name = 'FetaEncoding' if re.search ('parmesan', filenm): enc_name = 'ParmesanEncoding' elif re.search ('feta-noteheads', filenm): enc_name = 'FetaNoteheadsEncoding' elif re.search ('feta-brace', filenm): enc_name = 'FetaBraceEncoding' elif re.search ('feta-alphabet', filenm): enc_name = 'FetaAlphabetEncoding'; open (enc_nm, 'w').write (ps_encoding (enc_name, g, m)) open (char_lisp_nm, 'w').write (character_lisp_table (g, m)) open (global_lisp_nm, 'w').write (global_lisp_table (g)) if depfile_nm: open (depfile_nm, 'wb').write (get_deps (deps, [base + '.log', base + '.dvi', base + '.pfa', depfile_nm, base + '.pfb']))