]> git.donarmstrong.com Git - lilypond.git/blobdiff - buildscripts/mf-to-table.py
release: 1.5.36
[lilypond.git] / buildscripts / mf-to-table.py
index c0ef406baa957baf4afb9c5ef31400805e36e31e..820dc6e6911cfe0bf53bc6c60b5891753ba033eb 100755 (executable)
@@ -122,6 +122,34 @@ def write_tex_defs (file, global_info, charmetrics):
        for m in charmetrics:
                file.write (r'''\def\%s%s{\char%d}%s''' % (nm, m['tex'], m['code'],'\n'))
 
+def write_fontlist (file, global_info, charmetrics):
+       nm = global_info['FontFamily']
+       file.write (r"""
+% Lilypond file to list all font symbols and the corresponding names
+% Automatically generated by mf-to-table.py
+\score{\notes{\fatText
+""")
+       for m in charmetrics:
+               escapedname=re.sub('_','\\\\\\\\_', m['name'])
+               file.write ('s^#\'(lines (music \"%s\") \"%s\")\n' % (m['name'], escapedname))
+       file.write (r"""
+}
+  \paper{
+    \translator{
+      \ScoreContext
+      \remove "Bar_number_engraver"
+      TextScript \override #'extra-extent-X = #'(-1 . 1)
+    }
+    \translator{
+      \StaffContext
+      \remove "Clef_engraver"
+      \remove "Key_engraver"
+      \remove "Time_signature_engraver"
+      \remove "Staff_symbol_engraver"
+    }
+  }
+}
+""")
 
 def write_deps (file, deps, targets):
        for t in targets:
@@ -149,12 +177,13 @@ Options:
 
 (options, files) = getopt.getopt(
     sys.argv[1:], 'a:d:hl:o:p:t:', 
-    ['afm=', 'outdir=', 'dep=',  'tex=', 'debug', 'help', 'package='])
+    ['afm=', 'outdir=', 'dep=',  'tex=', 'ly=', 'debug', 'help', 'package='])
 
 
 texfile_nm = ''
 depfile_nm = ''
 afmfile_nm = ''
+lyfile_nm = ''
 outdir_prefix = '.'
 
 for opt in options:
@@ -166,6 +195,8 @@ for opt in options:
                outdir_prefix = a
        elif o == '--tex' or o == '-t':
                texfile_nm = a
+       elif o == '--ly' or o == '-':
+               lyfile_nm = a
        elif o== '--help' or o == '-h':
                help()
        elif o=='--afm' or o == '-a':
@@ -190,5 +221,8 @@ for filenm in files:
        write_afm_metric (afm, g,m)
        write_tex_defs (open (texfile_nm, 'w'), g, m)
        write_deps (open (depfile_nm, 'wb'), deps, [base + '.dvi', texfile_nm, afmfile_nm])
+       if lyfile_nm != '':
+               write_fontlist(open (lyfile_nm, 'w'), g, m)
+