]> git.donarmstrong.com Git - lilypond.git/blob - buildscripts/mf-to-table.py
release: 1.5.36
[lilypond.git] / buildscripts / mf-to-table.py
1 #!@PYTHON@
2
3 # mf-to-table.py -- convert spacing info in  MF logs .afm and .tex
4
5 # source file of the GNU LilyPond music typesetter
6
7 # (c) 1997 Han-Wen Nienhuys <hanwen@cs.uu.nl>
8
9 import os
10 import sys
11 import getopt
12 import string
13 import re
14 import time
15
16
17 postfixes = ['log', 'dvi', '2602gf', 'tfm']
18
19 def read_log_file (fn):
20         str = open (fn).read ()
21         str = re.sub ('\n', '', str)    
22         str = re.sub ('[\t ]+', ' ', str) 
23
24         deps = []
25         autolines = []
26         def include_func (match, d = deps):
27                 d.append (match.group (1))
28                 return ''
29
30         def auto_func (match, a = autolines):
31                 a.append (match.group (1))
32                 return ''
33
34         str = re.sub ('\(([a-zA-Z_0-9-]+\.mf)', include_func, str)
35         str = re.sub ('@{(.*?)@}', auto_func, str)
36
37         return (autolines, deps)
38
39
40
41 class Char_metric:
42         def __init__ (self):
43                 pass
44
45
46 def tfm_checksum (fn):
47         sys.stderr.write ("Reading checksum from `%s'\n" % fn) 
48         s = open (fn).read ()
49         s = s[ 12 * 2 : ]
50         cs_bytes = s[:4]
51
52         shift = 24
53         cs = 0
54         for b in cs_bytes:
55                 cs = cs  + (ord (b) << shift)
56                 shift = shift - 8
57
58         return cs
59   
60 def parse_logfile (fn):
61         (autolines, deps) = read_log_file (fn)
62         charmetrics = []
63         global_info = {}
64         group = ''
65
66         for l in autolines:
67                 tags = string.split(l, '@:')
68                 if tags[0] == 'group':
69                         group = tags[1]
70                 elif tags[0] == 'char':
71                         m = {
72                                 'description':  tags[1],
73                                 'name': group + '-' + tags[7],
74                                 'tex': tags[8],
75                                 'code': string.atoi (tags[2]),
76                                 'breapth':string.atof (tags[3]),
77                                 'width': string.atof (tags[4]),
78                                 'depth':string.atof (tags[5]),
79                                 'height':string.atof (tags[6])
80                                 }
81                         charmetrics.append (m)
82                 elif tags[0] == 'font':
83                         global_info['FontName'] = string.join (tags[1:])
84                         global_info['FontFamily']=tags[1]
85                         global_info['FontBBox'] = '0 0 1000 1000'
86                         global_info['Ascender'] = '0'
87                         global_info['Descender'] = '0'
88         
89         return (global_info, charmetrics, deps)
90
91
92 def write_afm_char_metric(file, charmetric):
93
94         f = 1000;
95         tup = (charmetric['code'],
96                (charmetric['width'] + charmetric['breapth'])*f,
97                 charmetric['name'],
98                 -charmetric['breapth'] *f,
99                 -charmetric['depth']*f,
100                 charmetric['width']*f,
101                 charmetric['height']*f)
102         
103         
104         file.write ('C %d ; WX %d ; N  %s ;  B %d %d %d %d ;\n'% tup)
105         
106 def write_afm_metric (file, global_info, charmetrics):
107         file.write (r"""
108 StartFontMetrics 2.0
109 Comment Automatically generated by mf-to-table.py
110 """)
111         for (k,v) in global_info.items():
112                 file.write ("%s %s\n" % (k,v))
113         file.write ('StartCharMetrics %d\n' % len(charmetrics ))
114         for m in charmetrics:
115                 write_afm_char_metric (file,m)
116         file.write ('EndCharMetrics\n')
117         file.write ('EndFontMetrics %d\n')
118
119
120 def write_tex_defs (file, global_info, charmetrics):
121         nm = global_info['FontFamily']
122         for m in charmetrics:
123                 file.write (r'''\def\%s%s{\char%d}%s''' % (nm, m['tex'], m['code'],'\n'))
124
125 def write_fontlist (file, global_info, charmetrics):
126         nm = global_info['FontFamily']
127         file.write (r"""
128 % Lilypond file to list all font symbols and the corresponding names
129 % Automatically generated by mf-to-table.py
130 \score{\notes{\fatText
131 """)
132         for m in charmetrics:
133                 escapedname=re.sub('_','\\\\\\\\_', m['name'])
134                 file.write ('s^#\'(lines (music \"%s\") \"%s\")\n' % (m['name'], escapedname))
135         file.write (r"""
136 }
137   \paper{
138     \translator{
139       \ScoreContext
140       \remove "Bar_number_engraver"
141       TextScript \override #'extra-extent-X = #'(-1 . 1)
142     }
143     \translator{
144       \StaffContext
145       \remove "Clef_engraver"
146       \remove "Key_engraver"
147       \remove "Time_signature_engraver"
148       \remove "Staff_symbol_engraver"
149     }
150   }
151 }
152 """)
153
154 def write_deps (file, deps, targets):
155         for t in targets:
156                 file.write ('%s '% t)
157         file.write (": ")
158         for d in deps:
159                 file.write ('%s ' % d)
160         file.write ('\n')
161
162 def help():
163     sys.stdout.write(r"""Usage: mf-to-table [options] LOGFILEs
164 Generate feta metrics table from preparated feta log\n
165 Options:
166   -a, --afm=FILE         .afm file
167   -d, --dep=FILE         print dependency info to FILE
168   -h, --help             print this help
169   -l, --ly=FILE          name output table
170   -o, --outdir=DIR       prefix for dependency info
171   -p, --package=DIR      specify package
172   -t, --tex=FILE         name output tex chardefs"""
173 )
174     sys.exit (0)
175
176
177
178 (options, files) = getopt.getopt(
179     sys.argv[1:], 'a:d:hl:o:p:t:', 
180     ['afm=', 'outdir=', 'dep=',  'tex=', 'ly=', 'debug', 'help', 'package='])
181
182
183 texfile_nm = ''
184 depfile_nm = ''
185 afmfile_nm = ''
186 lyfile_nm = ''
187 outdir_prefix = '.'
188
189 for opt in options:
190         o = opt[0]
191         a = opt[1]
192         if o == '--dep' or o == '-d':
193                 depfile_nm = a
194         elif o == '--outdir' or o == '-o':
195                 outdir_prefix = a
196         elif o == '--tex' or o == '-t':
197                 texfile_nm = a
198         elif o == '--ly' or o == '-':
199                 lyfile_nm = a
200         elif o== '--help' or o == '-h':
201                 help()
202         elif o=='--afm' or o == '-a':
203                 afmfile_nm = a
204         elif o == '--debug':
205                 debug_b = 1
206         elif o == '-p' or o == '--package':
207                 topdir = a
208         else:
209                 print o
210                 raise getopt.error
211
212 base = re.sub ('.tex$', '', texfile_nm)
213
214 for filenm in files:
215         (g,m, deps) =  parse_logfile (filenm)
216         cs = tfm_checksum (re.sub ('.log$', '.tfm', filenm))
217         afm = open (afmfile_nm, 'w')
218
219         afm.write ("TfmCheckSum %u\n" % cs) 
220         
221         write_afm_metric (afm, g,m)
222         write_tex_defs (open (texfile_nm, 'w'), g, m)
223         write_deps (open (depfile_nm, 'wb'), deps, [base + '.dvi', texfile_nm, afmfile_nm])
224         if lyfile_nm != '':
225                 write_fontlist(open (lyfile_nm, 'w'), g, m)
226
227
228