- (autolines, deps) = read_log_file (fn)
- charmetrics = []
- global_info = {}
- group = ''
-
- for l in autolines:
- tags = string.split(l, '@:')
- if tags[0] == 'group':
- group = tags[1]
- elif tags[0] == 'char':
- m = {
- 'description': tags[1],
- 'name': group + '-' + tags[9],
- 'tex': tags[10],
- 'code': string.atoi (tags[2]),
- 'breapth':string.atof (tags[3]),
- 'width': string.atof (tags[4]),
- 'depth':string.atof (tags[5]),
- 'height':string.atof (tags[6]),
- 'wx': string.atof (tags[7]),
- 'wy':string.atof (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['DesignSize'] = string.atof (tags[4])
- global_info['FontName'] = string.join (name,'-')
- global_info['FullName'] = string.join (name,' ')
- global_info['FamilyName'] = string.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
-
- 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:
- file.write (r'''\gdef\%s%s{\char%d}%%%s''' % (nm, m['tex'], m['code'],'\n'))
- file.write ('\\endinput\n')
-
-def write_ps_encoding (name, file, global_info, charmetrics):
- encs = ['.notdef'] * 256
- for m in charmetrics:
- encs[m['code']] = m['tex']
-
- file.write ('/%s [\n' % name)
- for m in range(0,256):
- file.write (' /%s %% %d\n' % (encs[m], m))
- file.write ('] def\n')
-
-def write_fontlist (file, global_info, charmetrics):
- ##nm = global_info['FontFamily']
- nm = font_family
- per_line = 3
- file.write (r"""
-%% LilyPond file to list all font symbols and the corresponding names
-%% Automatically generated by mf-to-table.py
-\score{ \lyrics \new 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" " %s" } 4 \n' % (scm_string, tex_string))
-
- if (count % 3) ==0:
- file.write ('\skip 8 \\break\n')
- file.write (r"""
-}
- \paper{
- interscoreline = 1.0
- indent = 0.0 \cm
- \context {
- \LyricsContext
- \override SeparationItem #'padding = #2
- minimumVerticalExtent = ##f
- }
- \context {
- \ScoreContext
- \remove "Bar_number_engraver"
- }
- }
- }
-""")
-
-def write_deps (file, deps, targets):
-
-
- for t in targets:
- t = re.sub ( '^\\./', '', t)
- file.write ('%s '% t)
- file.write (": ")
- for d in deps:
- file.write ('%s ' % d)
- file.write ('\n')
-
-def help():
+ 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 ():