# -*-python-*-
-import glob
import os
+import re
import string
-import sys
-
-here = os.getcwd ()
-reldir = str (Dir ('.').srcnode ())
-os.chdir (reldir)
-#mf_sources = reduce (+,
-mf_sources = reduce (lambda x, y: x + y,
- map (glob.glob,
- ('feta[0-9]*.mf',
- 'feta-braces-[a-z].mf',
- 'feta-din*[0-9].mf',
- 'feta-nummer*[0-9].mf',
- 'parmesan[0-9]*.mf',)))
-os.chdir (here)
-
-Import ('env')
-MFMODE = env['MFMODE']
-def add_log_enc_ly_tex_target (target, source, env):
- base = os.path.splitext (str (target[0]))[0]
- et = (map (lambda x: base + x, ['.log', '.enc', '.ly', '.tex']))
- #es = (map (lambda x: base + '.mf', et))
- #return (target + et, source + es)
- return (target + et, source)
-
-outdir = os.path.join (env['build'], reldir, env['out'])
-tfm = Builder (action = ('(cd ' + outdir + ' && ' \
- + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
- + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
- + ' input $$(basename $SOURCE);" ' \
- + ' | grep -v "@\|>>")') % vars (),
- suffix = '.tfm',
- src_suffix = '.mf',
- emitter = add_log_enc_ly_tex_target)
-
-## How do do multiple targets? Does emitter not take care of this?
-#log = Builder (action = ('(cd ' + outdir + ' && ' \
-# + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
-# + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
-# + ' input $$(basename $SOURCE);" ' \
-# + ' | grep -v "@\|>>")') % vars (),
-# suffix = '.log',
-# src_suffix = '.mf')
-#enc = Builder (action = ('(cd ' + outdir + ' && ' \
-# + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
-# + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
-# + ' input $$(basename $SOURCE);" ' \
-# + ' | grep -v "@\|>>")') % vars (),
-# suffix = '.enc',
-# src_suffix = '.mf')
-#ly = Builder (action = ('(cd ' + outdir + ' && ' \
-# + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
-# + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
-# + ' input $$(basename $SOURCE);" ' \
-# + ' | grep -v "@\|>>")') % vars (),
-# suffix = '.ly',
-# src_suffix = '.mf')
-#tex = Builder (action = ('(cd ' + outdir + ' && ' \
-# + 'MFINPUTS=.:' + str (Dir ('#/mf')) \
-# + ' mf "\\mode:=%(MFMODE)s; nonstopmode; ' \
-# + ' input $$(basename $SOURCE);" ' \
-# + ' | grep -v "@\|>>")') % vars (),
-# suffix = '.tex',
-# src_suffix = '.mf')
-
-afm = Builder (action = (sys.executable
- + ' buildscripts/mf-to-table.py ' \
- + ' --package=. --outdir=%(outdir)s '\
- + ' --afm %(outdir)s/$$(basename $TARGET .afm).afm' \
- + ' --enc %(outdir)s/$$(basename $TARGET .afm).enc' \
- + ' --tex %(outdir)s/$$(basename $TARGET .afm).tex' \
- + ' --ly %(outdir)s/$$(basename $TARGET .afm).ly'\
- + ' %(outdir)s/$$(basename $SOURCE)') % vars (),
- suffix = '.afm',
- src_suffix = '.log')
-
-def add_enc_src (target, source, env):
- base = os.path.splitext (str (target[0]))[0]
- return (target, source + [base + '.enc'])
-
-def encoding_opt (target):
- base = os.path.splitext (os.path.basename (str (target[0])))[0]
- enc = os.path.join (outdir, base + '.enc')
- if os.path.exists (enc):
- return ' --encoding=' + enc
- return ''
-
-# UGH, should fix --output option for mftrace
-pfa = Builder (action = ('MFINPUTS=.:' + str (Dir ('#/mf')) \
- + ' mftrace -I %(outdir)s --pfa' \
- + ' --simplify --keep-trying' \
- + ' $$(basename $SOURCE .mf) ' \
- + ' && mv $$(basename $TARGET) $TARGET') % vars (),
- suffix = '.pfa',
- src_suffix = '.mf',
- emitter = add_enc_src)
-
-def run_mftrace (target, source, env):
- TARGET = target[0]
- SOURCE = source[0]
- outdir = os.path.join (env['build'], reldir, env['out'])
- command = ('MFINPUTS=.:' + str (Dir ('#/mf')) \
- + ' mftrace -I %(outdir)s --pfa' \
- + ' --simplify --keep-trying' \
- + ' $(basename %(SOURCE)s .mf) ' \
- + encoding_opt (target) \
- + ' && mv $(basename %(TARGET)s) %(TARGET)s') \
- % vars ()
- return os.system (command)
-
-xpfa = Builder (action = run_mftrace,
- suffix = '.pfa',
- src_suffix = '.mf',
- emitter = add_enc_src)
-
-
-e = env.Copy (BUILDERS = {'Tfm' : tfm,
-# 'Log' : log, 'Enc' : enc, 'Ly' : ly, 'Tex' : tex,
- 'Afm' : afm, 'Pfa' : pfa},
- MFINPUTS = '#/mf')
-
-#mf_sources = ('feta16.mf',)
-sources = map (lambda x: os.path.splitext (x)[0], mf_sources)
-
-t = map (e.Tfm, sources)
-a = map (e.Afm, sources)
-p = map (e.Pfa, sources)
-
-#map (lambda x: e.Depends (x + '.pfa', x + '.enc'), sources)
-map (lambda x: e.Depends (x + '.pfa', x + '.log'), sources)
-
-tfmdir = os.path.join (env['lilypondprefix'], 'fonts/tfm')
-afmdir = os.path.join (env['lilypondprefix'], 'afm')
-pfadir = os.path.join (env['lilypondprefix'], 'fonts/type1')
-#ti = map (lambda x: env.Install (tfmdir, x[0]), t)
-ti = map (lambda x: env.Install (tfmdir, x), t)
-ai = map (lambda x: env.Install (afmdir, x), a)
-pi = map (lambda x: env.Install (pfadir, x), p)
-env.Alias ('install', tfmdir)
-env.Alias ('install', afmdir)
-env.Alias ('install', pfadir)
+Import ('env', 'base_glob', 'install')
+feta = reduce (lambda x, y: x + y,
+ map (lambda x: base_glob (x),
+ ('feta[0-9]*.mf',
+ 'feta-alphabet*[0-9].mf',
+ 'feta-braces-[a-z]*.mf',
+ 'parmesan[0-9]*.mf',)))
+feta = base_glob ('feta[0-9][0-9]*.mf')
+feta_alphabet = base_glob ('feta-alphabet[0-9][0-9]*.mf')
+feta_braces = base_glob ('feta-braces-[a-z].mf')
+parmesan = base_glob ('parmesan[0-9][0-9]*.mf')
+
+fonts = feta + feta_alphabet + feta_braces + parmesan
+
+feta_sizes = map (lambda x: re.sub ('feta([0-9]+)', '\\1', x), feta)
+otfs = map (lambda x: 'emmentaler-' + x, feta_sizes) + ['aybabtu']
+
+t = map (env.TFM, fonts)
+g = map (env.GTABLE, fonts)
+p = map (env.PFA, fonts)
+e = map (lambda x: x + '.enc', fonts)
+s = map (lambda x: x + '.svg', fonts)
+o = map (env.OTF, otfs)
+
+# Emmentaler
+a = '''cat ${SOURCE} \
+$$(echo ${SOURCE} | grep -v brace | sed s/feta/parmesan/) \
+$$(echo ${SOURCE} | grep -v brace | sed s/feta/feta-alphabet/) \
+> ${TARGET}'''
+otf_table = Builder (action = a, suffix = '.otf-table',
+ # barf
+ src_suffix = '.lisp')
+env.Append (BUILDERS = {'OTF_TABLE': otf_table})
+f = map (env.OTF_TABLE, feta)
+g = map (env.OTF_TABLE, feta_braces)
+
+map (lambda x: env.Depends ('feta' + x + '.otf-table',
+ ['parmesan' + x + '.lisp',
+ 'feta-alphabet' + x + '.lisp']), feta_sizes)
+
+map (lambda x: env.Depends ('emmentaler-' + x + '.otf',
+ 'feta' + x + '.otf-table'),
+ feta_sizes)
+
+map (lambda x: env.Depends ('emmentaler-' + x + '.otf',
+ ['feta' + x + '.pfa',
+ 'parmesan' + x + '.pfa',
+ 'feta-alphabet' + x + '.pfa']), feta_sizes)
+
+for i in feta_sizes:
+ env.Command ('emmentaler-%(i)s.pe' % locals (),
+ '$srcdir/buildscripts/gen-emmentaler-scripts.py',
+ '$PYTHON $srcdir/buildscripts/gen-emmentaler-scripts.py --dir=${TARGET.dir}')
+
+map (lambda x: env.Depends (x + '.pfa', x + '.enc'), feta)
+
+
+# Aybabtu
+
+feta_braces_pfa = map (lambda x: x + '.pfa', feta_braces)
+
+env.AT_COPY ('aybabtu.pe.in')
+env.Command ('aybabtu.fontname', '', 'echo -n aybabtu > $TARGET')
+env.Command ('aybabtu.subfonts',
+ map (lambda x: x + '.mf', feta_braces),
+ 'echo ${SOURCES.filebase} > $TARGET')
+
+env.Command ('aybabtu.otf-table',
+ map (lambda x: x + '.otf-table', feta_braces),
+ 'cd ${TARGET.dir} && cat ${SOURCES.file} > ${TARGET.file}')
+
+env.Command ('aybabtu.otf-gtable',
+ map (lambda x: x + '.otf-gtable', feta_braces),
+ 'echo "(design_size . 20)" > $TARGET')
+
+env.Depends ('aybabtu.otf',
+ feta_braces_pfa
+ + ['aybabtu.subfonts',
+ 'aybabtu.fontname',
+ 'aybabtu.otf-table',
+ 'aybabtu.otf-gtable'])
+
+## FIXME: building only a few fonts does not seem to work anymore.
+## what is essential these days, aybabtu/emmentaler are needed always?
+mf_essential = ['feta16', 'feta20', 'parmesan16', ]
+pfa_essential = map (env.PFA, mf_essential) + ['emmentaler-20.otf']
+env.Alias ('mf-essential', pfa_essential)
+env.Alias ('mf-essential', 'fonts.cache-1')
+
+env['fonts'] = string.join (fonts)
+env['feta_sizes'] = string.join (feta_sizes)
+
+env.Alias ('mf', pfa_essential + p + map (lambda x: x[0], o))
+env.Alias ('mf', s)
+env.Alias ('mf', 'fonts.cache-1')
+
+install (t, env['sharedir_package_version'] + '/fonts/tfm')
+install (p, env['sharedir_package_version'] + '/fonts/type1')
+install (o, env['sharedir_package_version'] + '/fonts/otf')
+install (e, env['sharedir_package_version'] + '/ps')
+install (s, env['sharedir_package_version'] + '/fonts/svg')