9 reldir = str (Dir ('.').srcnode ())
11 #mf_sources = reduce (+,
12 mf_sources = reduce (lambda x, y: x + y,
15 'feta-braces-[a-z].mf',
17 'feta-nummer*[0-9].mf',
18 'parmesan[0-9]*.mf',)))
22 MFMODE = env['MFMODE']
23 def tfm_log_enc_ly_tex (target, source, env):
24 base = os.path.splitext (str (target[0]))[0]
25 et = (map (lambda x: base + x, ['.log', '.enc', '.ly', '.tex']))
26 #es = (map (lambda x: base + '.mf', et))
28 #return (target + et, source + es)
29 return (target + et, source)
31 outdir = os.path.join (env['build'], reldir, env['out'])
32 tfm = Builder (action = ('(cd ' + outdir + ' && ' \
33 + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
34 + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
35 + ' input $$(basename $SOURCE);" ' \
36 + ' | grep -v "@\|>>")') % vars (),
39 emitter = tfm_log_enc_ly_tex)
41 afm = Builder (action = (sys.executable
42 + ' buildscripts/mf-to-table.py ' \
43 + ' --package=. --outdir=%(outdir)s '\
44 + ' --afm %(outdir)s/$$(basename $TARGET .afm).afm' \
45 + ' --enc %(outdir)s/$$(basename $TARGET .afm).enc' \
46 + ' --tex %(outdir)s/$$(basename $TARGET .afm).tex' \
47 + ' --ly %(outdir)s/$$(basename $TARGET .afm).ly'\
48 + ' %(outdir)s/$$(basename $SOURCE)') % vars (),
52 # UGH, should fix --output option for mftrace
53 pfa = Builder (action = ('MFINPUTS=.:' + str (Dir ('#/mf')) \
54 + ' mftrace -I %(outdir)s --pfa' \
55 + ' --simplify --keep-trying' \
56 + ' $$(basename $SOURCE .mf) ' \
57 + ' && mv $$(basename $TARGET) $TARGET') % vars (),
62 e = env.Copy (BUILDERS = {'Tfm' : tfm,
63 #'Log' : log, 'Enc' : enc, 'Ly' : ly, 'Tex' : tex,
64 'Afm' : afm, 'Pfa' : pfa},
67 #mf_sources = ('feta16.mf',)
68 sources = map (lambda x: os.path.splitext (x)[0], mf_sources)
70 t = map (e.Tfm, sources)
71 a = map (e.Afm, sources)
72 p = map (e.Pfa, sources)
74 map (lambda x: e.Depends (x + '.pfa', x + '.log'), sources)
76 tfmdir = os.path.join (env['lilypondprefix'], 'fonts/tfm')
77 afmdir = os.path.join (env['lilypondprefix'], 'afm')
78 pfadir = os.path.join (env['lilypondprefix'], 'fonts/type1')
79 ti = map (lambda x: env.Install (tfmdir, x), t)
80 ai = map (lambda x: env.Install (afmdir, x), a)
81 pi = map (lambda x: env.Install (pfadir, x), p)
82 env.Alias ('install', tfmdir)
83 env.Alias ('install', afmdir)
84 env.Alias ('install', pfadir)