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 add_log_enc_ly_tex_target (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))
27 #return (target + et, source + es)
28 return (target + et, source)
30 outdir = os.path.join (env['build'], reldir, env['out'])
31 tfm = Builder (action = ('(cd ' + outdir + ' && ' \
32 + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
33 + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
34 + ' input $$(basename $SOURCE);" ' \
35 + ' | grep -v "@\|>>")') % vars (),
38 emitter = add_log_enc_ly_tex_target)
40 ## How do do multiple targets? Does emitter not take care of this?
41 #log = Builder (action = ('(cd ' + outdir + ' && ' \
42 # + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
43 # + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
44 # + ' input $$(basename $SOURCE);" ' \
45 # + ' | grep -v "@\|>>")') % vars (),
48 #enc = Builder (action = ('(cd ' + outdir + ' && ' \
49 # + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
50 # + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
51 # + ' input $$(basename $SOURCE);" ' \
52 # + ' | grep -v "@\|>>")') % vars (),
55 #ly = Builder (action = ('(cd ' + outdir + ' && ' \
56 # + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
57 # + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
58 # + ' input $$(basename $SOURCE);" ' \
59 # + ' | grep -v "@\|>>")') % vars (),
62 #tex = Builder (action = ('(cd ' + outdir + ' && ' \
63 # + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
64 # + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
65 # + ' input $$(basename $SOURCE);" ' \
66 # + ' | grep -v "@\|>>")') % vars (),
70 afm = Builder (action = (sys.executable
71 + ' buildscripts/mf-to-table.py ' \
72 + ' --package=. --outdir=%(outdir)s '\
73 + ' --afm %(outdir)s/$$(basename $TARGET .afm).afm' \
74 + ' --enc %(outdir)s/$$(basename $TARGET .afm).enc' \
75 + ' --tex %(outdir)s/$$(basename $TARGET .afm).tex' \
76 + ' --ly %(outdir)s/$$(basename $TARGET .afm).ly'\
77 + ' %(outdir)s/$$(basename $SOURCE)') % vars (),
81 def add_enc_src (target, source, env):
82 base = os.path.splitext (str (target[0]))[0]
83 return (target, source + [base + '.enc'])
85 def encoding_opt (target):
86 base = os.path.splitext (os.path.basename (str (target[0])))[0]
87 enc = os.path.join (outdir, base + '.enc')
88 if os.path.exists (enc):
89 return ' --encoding=' + enc
92 # UGH, should fix --output option for mftrace
93 pfa = Builder (action = ('MFINPUTS=.:' + str (Dir ('#/mf')) \
94 + ' mftrace -I %(outdir)s --pfa' \
95 + ' --simplify --keep-trying' \
96 + ' $$(basename $SOURCE .mf) ' \
97 + ' && mv $$(basename $TARGET) $TARGET') % vars (),
100 emitter = add_enc_src)
102 def run_mftrace (target, source, env):
105 outdir = os.path.join (env['build'], reldir, env['out'])
106 command = ('MFINPUTS=.:' + str (Dir ('#/mf')) \
107 + ' mftrace -I %(outdir)s --pfa' \
108 + ' --simplify --keep-trying' \
109 + ' $(basename %(SOURCE)s .mf) ' \
110 + encoding_opt (target) \
111 + ' && mv $(basename %(TARGET)s) %(TARGET)s') \
113 return os.system (command)
115 xpfa = Builder (action = run_mftrace,
118 emitter = add_enc_src)
121 e = env.Copy (BUILDERS = {'Tfm' : tfm,
122 # 'Log' : log, 'Enc' : enc, 'Ly' : ly, 'Tex' : tex,
123 'Afm' : afm, 'Pfa' : pfa},
126 #mf_sources = ('feta16.mf',)
127 sources = map (lambda x: os.path.splitext (x)[0], mf_sources)
129 t = map (e.Tfm, sources)
130 a = map (e.Afm, sources)
131 p = map (e.Pfa, sources)
133 #map (lambda x: e.Depends (x + '.pfa', x + '.enc'), sources)
134 map (lambda x: e.Depends (x + '.pfa', x + '.log'), sources)
136 tfmdir = os.path.join (env['lilypondprefix'], 'fonts/tfm')
137 afmdir = os.path.join (env['lilypondprefix'], 'afm')
138 pfadir = os.path.join (env['lilypondprefix'], 'fonts/type1')
139 #ti = map (lambda x: env.Install (tfmdir, x[0]), t)
140 ti = map (lambda x: env.Install (tfmdir, x), t)
141 ai = map (lambda x: env.Install (afmdir, x), a)
142 pi = map (lambda x: env.Install (pfadir, x), p)
143 env.Alias ('install', tfmdir)
144 env.Alias ('install', afmdir)
145 env.Alias ('install', pfadir)