X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=buildscripts%2Fmf-to-table.py;h=f675e989001d60e0b42da9eb7189c32e0f44c776;hb=ee968fb42f641b0d10059cd46ed7dc79f53ce5b1;hp=6f5e83c392fba2fd2f5d8aa01ca5fa4df21415aa;hpb=31cda3af3d826589a0246b818f1bf19861aeae3d;p=lilypond.git diff --git a/buildscripts/mf-to-table.py b/buildscripts/mf-to-table.py index 6f5e83c392..f675e98900 100644 --- a/buildscripts/mf-to-table.py +++ b/buildscripts/mf-to-table.py @@ -1,10 +1,10 @@ #!@PYTHON@ -# mf-to-table.py -- convert spacing info in MF logs .afm and .tex +# mf-to-table.py -- convert spacing info in MF logs . and .tex # # source file of the GNU LilyPond music typesetter # -# (c) 1997--2004 Han-Wen Nienhuys +# (c) 1997--2006 Han-Wen Nienhuys import os import sys @@ -56,14 +56,15 @@ def tfm_checksum (fn): return cs - -## ugh. What's font_family supposed to be? It's not an afm thing. font_family = 'feta' def parse_logfile (fn): (autolines, deps) = read_log_file (fn) charmetrics = [] - global_info = {} + + global_info = { + 'filename' : os.path.splitext (os.path.basename (fn))[0] + } group = '' for l in autolines: @@ -102,8 +103,8 @@ def parse_logfile (fn): encoding = re.sub (' ','-', tags[5]) tags = tags[:-1] name = tags[1:] - global_info['DesignSize'] = string.atof (tags[4]) - global_info['FontName'] = string.join (name,'-') + 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], '-') @@ -123,37 +124,8 @@ def parse_logfile (fn): return (global_info, charmetrics, deps) -def write_afm_char_metric (file, charmetric): - f = 1000; - tup = (charmetric['code'], - charmetric['name'], - -charmetric['breapth'] * f, - -charmetric['depth'] * f, - charmetric['width'] * f, - charmetric['height'] * f, - charmetric['wx'] * f, - charmetric['wy'] * f) - - file.write ('C %d ; N %s ; B %d %d %d %d ; W %d %d ;\n' % tup) - - -def write_afm_header (file): - file.write ("StartFontMetrics 2.0\n") - file.write ("Comment Automatically generated by mf-to-table.py\n") - - -def write_afm_metric (file, global_info, charmetrics): - for (k, v) in global_info.items(): - file.write ("%s %s\n" % (k, v)) - file.write ('StartCharMetrics %d\n' % len(charmetrics )) - for m in charmetrics: - write_afm_char_metric (file, m) - file.write ('EndCharMetrics\n') - file.write ('EndFontMetrics\n') - def write_tex_defs (file, global_info, charmetrics): - ## nm = global_info['FontFamily'] nm = font_family for m in charmetrics: @@ -172,14 +144,18 @@ def write_character_lisp_table (file, global_info, charmetrics): 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, - charmetric['wx'], - charmetric['wy']) + -charmetric['breapth'] * f, + -charmetric['depth'] * f, + charmetric['width'] * f, + charmetric['height'] * f, + global_info['filename'], + charmetric['code'], + charmetric['wx'], + charmetric['wy']) return s @@ -192,6 +168,7 @@ def write_global_lisp_table (file, global_info): keys = ['staffsize', 'stafflinethickness', 'staff_space', 'linethickness', 'black_notehead_width', 'ledgerlinethickness', + 'design_size', 'blot_diameter' ] for k in keys: @@ -212,55 +189,6 @@ def write_ps_encoding (name, file, global_info, charmetrics): file.write ('] def\n') -def write_fontlist (file, global_info, charmetrics): - ## nm = global_info['FontFamily'] - nm = font_family - per_line = 2 - file.write ( -r"""%% LilyPond file to list all font symbols and the corresponding names -%% Automatically generated by mf-to-table.py - -\score { - \lyrics { \time %d/8 -""" % (2 * per_line + 1)) - - count = 0 - for m in charmetrics: - count += 1 - - ## \musicglyph and \markup require "_" to be escaped - ## differently - scm_string = re.sub ('_', r'_', m['name']) - tex_string = re.sub ('_', r'\\_' , m['name']) - - ## prevent TeX from interpreting "--" as long dash - tex_string = re.sub ('--','-{}-', tex_string) - - file.write (''' \\markup { \\raise #0.75 \\vcenter - \\musicglyph #"%s" - \\typewriter " %s" } 4\n''' % (scm_string, tex_string)) - - if (count % per_line) == 0: - file.write (' \\skip 8 \\break\n') - file.write (r""" } - - \layout { - interscoreline = 1.0 - indent = 0.0 \cm - \context { - \Lyrics - \override SeparationItem #'padding = #2 - minimumVerticalExtent = ##f - } - \context { - \Score - \remove "Bar_number_engraver" - } - } -} -""") - - def write_deps (file, deps, targets): for t in targets: t = re.sub ( '^\\./', '', t) @@ -277,7 +205,6 @@ def help (): Generate feta metrics table from preparated feta log. Options: - -a, --afm=FILE specify .afm file -d, --dep=FILE print dependency info to FILE -h, --help print this help -l, --ly=FILE name output table @@ -291,17 +218,16 @@ Options: (options, files) = \ getopt.getopt (sys.argv[1:], - 'a:d:hl:o:p:t:', - ['enc=', 'afm=', 'outdir=', 'dep=', 'lisp=', + 'a:d:ho:p:t:', + ['enc=', 'outdir=', 'dep=', 'lisp=', 'global-lisp=', - 'tex=', 'ly=', 'debug', 'help', 'package=']) + 'tex=', 'debug', 'help', 'package=']) global_lisp_nm = '' char_lisp_nm = '' enc_nm = '' texfile_nm = '' depfile_nm = '' -afmfile_nm = '' lyfile_nm = '' outdir_prefix = '.' @@ -320,12 +246,8 @@ for opt in options: global_lisp_nm = a elif o == '--enc': enc_nm = a - elif o == '--ly' or o == '-l': - lyfile_nm = a elif o== '--help' or o == '-h': help() - elif o=='--afm' or o == '-a': - afmfile_nm = a elif o == '--debug': debug_b = 1 else: @@ -337,15 +259,6 @@ base = re.sub ('.tex$', '', texfile_nm) for filenm in files: (g, m, deps) = parse_logfile (filenm) cs = tfm_checksum (re.sub ('.log$', '.tfm', filenm)) - afm = open (afmfile_nm, 'w') - - write_afm_header (afm) - afm.write ("Comment TfmCheckSum %d\n" % cs) - afm.write ("Comment DesignSize %.2f\n" % g['DesignSize']) - - del g['DesignSize'] - - write_afm_metric (afm, g, m) write_tex_defs (open (texfile_nm, 'w'), g, m) enc_name = 'FetaEncoding' @@ -353,13 +266,13 @@ for filenm in files: 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 + '.dvi', base + '.pfa', base + '.pfb', - texfile_nm, afmfile_nm]) - if lyfile_nm: - write_fontlist (open (lyfile_nm, 'w'), g, m) + [base + '.log', base + '.dvi', base + '.pfa', + base + '.pfb', texfile_nm])