3 # mf-to-table.py -- convert spacing info in MF logs .afm and .tex
5 # source file of the GNU LilyPond music typesetter
7 # (c) 1997 Han-Wen Nienhuys <hanwen@cs.uu.nl>
17 postfixes = ['log', 'dvi', '2602gf', 'tfm']
19 def read_log_file (fn):
20 str = open (fn).read ()
21 str = re.sub ('\n', '', str)
22 str = re.sub ('[\t ]+', ' ', str)
26 def include_func (match, d = deps):
27 d.append (match.group (1))
30 def auto_func (match, a = autolines):
31 a.append (match.group (1))
34 str = re.sub ('\(([a-zA-Z_0-9-]+\.mf)', include_func, str)
35 str = re.sub ('@{(.*?)@}', auto_func, str)
37 return (autolines, deps)
46 def tfm_checksum (fn):
47 sys.stderr.write ("Reading checksum from `%s'\n" % fn)
55 cs = cs + (ord (b) << shift)
60 def parse_logfile (fn):
61 (autolines, deps) = read_log_file (fn)
67 tags = string.split(l, '@:')
68 if tags[0] == 'group':
70 elif tags[0] == 'char':
72 'description': tags[1],
73 'name': group + '-' + tags[7],
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])
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'
89 return (global_info, charmetrics, deps)
92 def write_afm_char_metric(file, charmetric):
95 tup = (charmetric['code'],
96 (charmetric['width'] + charmetric['breapth'])*f,
98 -charmetric['breapth'] *f,
99 -charmetric['depth']*f,
100 charmetric['width']*f,
101 charmetric['height']*f)
104 file.write ('C %d ; WX %d ; N %s ; B %d %d %d %d ;\n'% tup)
106 def write_afm_metric (file, global_info, charmetrics):
109 Comment Automatically generated by mf-to-table.py
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')
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'))
125 def write_ps_encoding (file, global_info, charmetrics):
126 encs = ['.notdef'] * 256
127 for m in charmetrics:
128 encs[m['code']] = m['tex']
130 file.write ('/FetaEncoding [\n')
131 for m in range(0,256):
132 file.write (' /%s %% %d\n' % (encs[m], m))
133 file.write ('] def\n')
135 def write_fontlist (file, global_info, charmetrics):
136 nm = global_info['FontFamily']
138 % Lilypond file to list all font symbols and the corresponding names
139 % Automatically generated by mf-to-table.py
140 \score{\notes{\fatText
142 for m in charmetrics:
143 escapedname=re.sub('_','\\\\\\\\_', m['name'])
144 file.write ('s^#\'(lines (music \"%s\") \"%s\")\n' % (m['name'], escapedname))
150 \remove "Bar_number_engraver"
151 TextScript \override #'extra-extent-X = #'(-1 . 1)
155 \remove "Clef_engraver"
156 \remove "Key_engraver"
157 \remove "Time_signature_engraver"
158 \remove "Staff_symbol_engraver"
164 def write_deps (file, deps, targets):
166 file.write ('%s '% t)
169 file.write ('%s ' % d)
173 sys.stdout.write(r"""Usage: mf-to-table [options] LOGFILEs
174 Generate feta metrics table from preparated feta log\n
176 -a, --afm=FILE .afm file
177 -d, --dep=FILE print dependency info to FILE
178 -h, --help print this help
179 -l, --ly=FILE name output table
180 -o, --outdir=DIR prefix for dependency info
181 -p, --package=DIR specify package
182 -t, --tex=FILE name output tex chardefs"""
188 (options, files) = getopt.getopt(
189 sys.argv[1:], 'a:d:hl:o:p:t:',
190 ['enc=', 'afm=', 'outdir=', 'dep=', 'tex=', 'ly=', 'debug', 'help', 'package='])
203 if o == '--dep' or o == '-d':
205 elif o == '--outdir' or o == '-o':
207 elif o == '--tex' or o == '-t':
211 elif o == '--ly' or o == '-':
213 elif o== '--help' or o == '-h':
215 elif o=='--afm' or o == '-a':
219 elif o == '-p' or o == '--package':
225 base = re.sub ('.tex$', '', texfile_nm)
228 (g,m, deps) = parse_logfile (filenm)
229 cs = tfm_checksum (re.sub ('.log$', '.tfm', filenm))
230 afm = open (afmfile_nm, 'w')
232 afm.write ("TfmCheckSum %u\n" % cs)
234 write_afm_metric (afm, g,m)
235 write_tex_defs (open (texfile_nm, 'w'), g, m)
236 write_ps_encoding (open (enc_nm, 'w'), g, m)
238 write_deps (open (depfile_nm, 'wb'), deps, [base + '.dvi', texfile_nm, afmfile_nm])
240 write_fontlist(open (lyfile_nm, 'w'), g, m)