buildscripts/builder.py

   1 # -*-python-*-
   2
   3 import os
   4 import string
   5
   6 Import ('env')
   7
   8 def verbose_opt (env, opt):
   9         if env['verbose']:
  10                 return opt
  11         return ''
  12
  13 srcdir = env['srcdir']
  14 build = env['build']
  15 def join_path (path, infix=os.pathsep, prefix = ''):
  16         def dir (x):
  17                 if x and x[0] == '#':
  18                         return srcdir + x[1:]
  19                 return x
  20         return string.join (map (lambda x: prefix + dir (x), path), infix)
  21
  22 verbose = verbose_opt (env, ' --verbose')
  23 MAKEINFO_INCLUDES = join_path (env['MAKEINFO_PATH'], '', ' -I')
  24 MAKEINFO = env['MAKEINFO']
  25 a = ('%(MAKEINFO)s%(verbose)s %(MAKEINFO_INCLUDES)s'\
  26      ' --no-split --no-headers --output=$TARGET $SOURCE') % vars ()
  27 texi2txt = Builder (action = a, suffix = '.txt', src_suffix = '.texi')
  28 env.Append (BUILDERS = {'Texi2txt': texi2txt})
  29
  30
  31 PYTHON = env['PYTHON']
  32 ABC2LY_PY = env['ABC2LY_PY']
  33 LILYPOND_PY = env['LILYPOND_PY']
  34 LILYPOND_BIN = env['LILYPOND_BIN']
  35 LILYPOND_BOOK = env['LILYPOND_BOOK']
  36 LILYPOND_BOOK_FLAGS = env['LILYPOND_BOOK_FLAGS']
  37 LILYPOND_BOOK_FORMAT = env['LILYPOND_BOOK_FORMAT']
  38 LILYPOND_BOOK_INCLUDES = join_path (env['LILYPOND_BOOK_PATH'], '',
  39                                     ' --include=')
  40 LILYPONDPREFIX = env['LILYPONDPREFIX']
  41
  42 env.Append (ENV = {'PATH' : os.environ['PATH']})
  43 if os.environ.has_key ('LD_LIBRARY_PATH'):
  44         env.Append (ENV = {'LD_LIBRARY_PATH' : os.environ['LD_LIBRARY_PATH']})
  45 if os.environ.has_key ('GUILE_LOAD_PATH'):
  46         env.Append (ENV = {'GUILE_LOAD_PATH' : os.environ['GUILE_LOAD_PATH']})
  47
  48 if os.environ.has_key ('TEXMF'):
  49         env.Append (ENV = {'TEXMF' : os.environ['TEXMF']})
  50 env.Append (ENV = {'TEXMF' : '{' + LILYPONDPREFIX + ',' \
  51                    + os.popen ('kpsexpand \$TEXMF').read ()[:-1] + '}' })
  52
  53 verbose = verbose_opt (env, ' --verbose')
  54 a = (r'''rm -f $$(grep -LF '\lilypondend' ${TARGET.dir}/lily-*.tex 2>/dev/null); ''' \
  55      + 'LILYPONDPREFIX=%(LILYPONDPREFIX)s '\
  56      + '%(PYTHON)s %(LILYPOND_BOOK)s%(verbose)s'\
  57      + ' --include=${TARGET.dir} %(LILYPOND_BOOK_INCLUDES)s'\
  58      + r""" --process='%(LILYPOND_BIN)s %(LILYPOND_BOOK_INCLUDES)s'"""\
  59      + ' --output=${TARGET.dir} --format=%(LILYPOND_BOOK_FORMAT)s\
  60      %(LILYPOND_BOOK_FLAGS)s\
  61      $SOURCE') % vars ()
  62 tely2texi = Builder (action = a, suffix = '.texi', src_suffix = '.tely')
  63 env.Append (BUILDERS = {'Tely2texi': tely2texi})
  64
  65 TEXINFO_PAPERSIZE_OPTION = env['TEXINFO_PAPERSIZE_OPTION']
  66 a = '(cd ${TARGET.dir} &&\
  67  texi2dvi --batch %(TEXINFO_PAPERSIZE_OPTION)s ${SOURCE.file})' % vars ()
  68 texi2dvi = Builder (action = a, suffix = '.dvi', src_suffix = '.texi')
  69 env.Append (BUILDERS = {'Texi2dvi': texi2dvi})
  70
  71 env.Append (DVIPSFLAGS = '-Ppdf -u+lilypond.map -u+ec-mftrace.map')
  72
  73 DVIPS_PAPERSIZE = 'a4'
  74 DVIPSFLAGS = env['DVIPSFLAGS']
  75 a = ('set -x; dvips %(DVIPSFLAGS)s' \
  76      + ' -o ${TARGET}.pdfps'\
  77      + ' -t %(DVIPS_PAPERSIZE)s $SOURCE &&'\
  78      + ' ps2pdf -sPAPERSIZE=%(DVIPS_PAPERSIZE)s ${TARGET}.pdfps $TARGET') \
  79      % vars ()
  80 dvi2pdf = Builder (action = a, suffix = '.pdf', src_suffix = '.dvi')
  81 env.Append (BUILDERS = {'Dvi2pdf': dvi2pdf})
  82
  83 a = 'convert $SOURCE $TARGET'
  84 png2eps = Builder (action = a, suffix = '.eps', src_suffix = '.png')
  85 env.Append (BUILDERS = {'Png2eps': png2eps})
  86
  87 def add_ps_target (target, source, env):
  88         base = os.path.splitext (str (target[0]))[0]
  89         return (target + [base + '.ps'], source)
  90
  91 a = ('LILYPONDPREFIX=%(LILYPONDPREFIX)s '\
  92      + '%(PYTHON)s %(LILYPOND_PY)s%(verbose)s'\
  93      + ' --include=${TARGET.dir}'\
  94      + ' --output=${TARGET.base}'\
  95      + ' $SOURCE') % vars ()
  96 lilypond = Builder (action = a, suffix = '.pdf', src_suffix = '.ly')
  97 ##                  emitter = add_ps_target)
  98 env.Append (BUILDERS = {'LilyPond': lilypond})
  99
 100 #verbose = verbose_opt (env, ' --verbose')
 101 verbose = ''
 102 a = ('LILYPONDPREFIX=%(LILYPONDPREFIX)s '\
 103      + '%(PYTHON)s %(ABC2LY_PY)s%(verbose)s'\
 104 #     + ' --include=${TARGET.dir}'\
 105      + ' --strict'\
 106      + ' --output=${TARGET.base}'\
 107      + ' $SOURCE') % vars ()
 108 abc2ly = Builder (action = a, suffix = '.ly', src_suffix = '.abc')
 109 env.Append (BUILDERS = {'Abc2ly': abc2ly})
 110
 111
 112 MFMODE = env['MFMODE']
 113 def add_log_target (target, source, env):
 114         base = os.path.splitext (str (target[0]))[0]
 115         return (target + [base + '.log'], source)
 116
 117 def add_enc_ly_tex_target (target, source, env):
 118         base = os.path.splitext (str (target[0]))[0]
 119         return (target + [base + '.enc', base + '.tex', base + 'list.ly'],
 120                 source)
 121
 122 def add_suffixes (target, source, env, target_suffixes, src_suffixes):
 123         base = os.path.splitext (str (target[0]))[0]
 124         return (target + map (lambda x: base + x, target_suffixes),
 125                 source + map (lambda x: base + x, src_suffixes))
 126
 127 #outdir = os.path.join (env['build'], reldir, env['out'])
 128 outdir = '${TARGET.dir}'
 129 scrdir = env['srcdir']
 130 #MFINPUTS = '.:' + str (Dir ('#/mf'))
 131 #MFINPUTS = '.:${SOURCE.dir}'
 132 a = ('(cd ${TARGET.dir} &&'\
 133 #     + ' MFINPUTS=.:${SOURCE.dir}'\
 134      + ' MFINPUTS=.:${SOURCE.dir}:%(srcdir)s/${SOURCE.dir}'\
 135      + ' mf "\\mode:=%(MFMODE)s; nonstopmode;'\
 136      + ' input ${SOURCE.filebase};" ' \
 137      + ' | grep -v "@\|>>")') % vars ()
 138 tfm = Builder (action = a, suffix = '.tfm', src_suffix = '.mf',
 139 #              emitter = lambda t, s, e: add_suffixes (t, s, e, ['.log'], []))
 140                emitter = add_log_target)
 141 env.Append (BUILDERS = {'TFM': tfm})
 142
 143 MF_TO_TABLE_PY = env['MF_TO_TABLE_PY']
 144 #verbose = verbose_opt (env, ' --verbose')
 145 verbose = ''
 146 a = ('%(PYTHON)s %(MF_TO_TABLE_PY)s%(verbose)s'\
 147      + ' --outdir=${TARGET.dir}'\
 148      + ' --afm=${TARGET.base}.afm' \
 149      + ' --enc=${TARGET.base}.enc' \
 150      + ' --tex=${TARGET.base}.tex' \
 151      + ' --ly=${TARGET.base}list.ly'\
 152      + ' ${TARGET.base}.log') % vars ()
 153 afm = Builder (action = a, suffix = '.afm', src_suffix = '.log',
 154                emitter = add_enc_ly_tex_target)
 155 env.Append (BUILDERS = {'AFM': afm})
 156
 157 def add_enc_src (target, source, env):
 158         base = os.path.splitext (str (target[0]))[0]
 159         return (target, source + [base + '.enc'])
 160
 161 def encoding_opt (target):
 162         base = os.path.splitext (os.path.basename (str (target[0])))[0]
 163         enc = base + '.enc'
 164         if os.path.exists (os.path.join (outdir, enc)):
 165                 return ' --encoding=' + enc
 166         return ''
 167
 168 # UGH, should fix --output option for mftrace
 169 verbose = verbose_opt (env, ' --verbose')
 170 a = ('(cd ${TARGET.dir} && '
 171      + ' if test -e ${SOURCE.filebase}.enc; then encoding="--encoding=${SOURCE.filebase}.enc"; fi;' \
 172 #     + ' MFINPUTS=.:${TARGET.dir}:${SOURCE.dir}'\
 173 # ugrh
 174      + ' MFINPUTS=%(srcdir)s/mf}:.:'\
 175      + ' mftrace --pfa --simplify --keep-trying $$encoding%(verbose)s'\
 176      + ' --include=${TARGET.dir}'\
 177      + ' ${SOURCE.file})') % vars ()
 178
 179 pfa = Builder (action = a,
 180                suffix = '.pfa',
 181                src_suffix = '.mf',
 182                emitter = add_enc_src)
 183
 184 def run_mftrace (target, source, env):
 185         TARGET = target[0]
 186         SOURCE = source[0]
 187         mf = os.path.basename (str (source[0]))
 188         base = os.path.splitext (os.path.basename (str (target[0])))[0]
 189         enc = base + '.enc'
 190         encoding = encoding_opt (target)
 191         verbose = verbose_opt (env, ' --verbose')
 192         command = ('(cd $$(dirname %(TARGET)s && '
 193                    + ' MFINPUTS=.:$$(dirname %(TARGET)s):$$(dirname %(SOURCE)s'\
 194                    + ' mftrace --pfa --simplify --keep-trying%(verbose)s'\
 195                    + ' --include=${TARGET.dir}'\
 196                    + ' %(encoding)s %(mf)s)') % vars ()
 197         return os.system (command)
 198
 199 xpfa = Builder (action = run_mftrace, suffix = '.pfa', src_suffix = '.mf',
 200                emitter = add_enc_src)
 201 env.Append (BUILDERS = {'PFA': pfa})
 202
 203