# -*-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']
-#ugh
-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')
-
-# How do do multiple targets?
-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')
-
-# How do do multiple targets?
-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')
-
-# How do do multiple targets?
-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')
-
-# How do do multiple targets?
-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')
-
-# UGH, should fix --output option for mftrace
-pfa = Builder (action = ('mftrace -I%(outdir)s --pfa --simplify --keep-trying'\
- + ' $$(basename $SOURCE .mf) ' \
- + ' && mv $$(basename $TARGET) $TARGET') % vars (),
- suffix = '.pfa',
- src_suffix = '.mf')
-
-
-xpfa = Builder (action = ('mftrace -I%(outdir)s --pfa --simplify --keep-trying'\
- + ' $$(basename $SOURCE .log) ' \
- + ' && mv $$(basename $TARGET) $TARGET') % vars (),
- suffix = '.pfa',
- src_suffix = '.log')
-
-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)
-
-#ugh?
-w = map (e.Log, sources)
-x = map (e.Enc, sources)
-y = map (e.Ly, sources)
-z = map (e.Tex, sources)
-
-#map (lambda x: e.Depends (x + '.log', x + '.mf'), sources)
-#map (lambda x: e.Depends (x + '.afm', x + '.log'), 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 = env.Install (tfmdir, t)
-ai = env.Install (afmdir, a)
-pi = env.Install (pfadir, 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')
projects / lilypond.git / blobdiff