scripts/mudela-book.py

   1 #!@PYTHON@
   2 #
   3 # The bugs you find are made by Tom Cato Amundsen <tomcato@xoommail.com>
   4 # Send patches/questions/bugreports to a mailinglist:
   5 #  gnu-music-discuss@gnu.org
   6 #  bug-gnu-music@gnu.org
   7 #  help-gnu-music@gnu.org
   8 #
   9 #  TODO:
  10 # * center option (??)
  11 # * make mudela-book understand usepackage{geometry}
  12 # * check that linewidth set in \paper is not wider than actual linewidth?
  13 # * the following fails because mudelabook doesn't care that the
  14 #   last } after \end{mudela} finishes the marginpar:
  15 #     \marginpar{
  16 #     \begin{mudela}
  17 #        c d e f g
  18 #     \end{mudela}}
  19 # * force-verbatim is maybe not that useful since latex fails with footnotes,
  20 #   marginpars and others
  21 # log:
  22 # 0.3:
  23 #   rewrite in Python.
  24 # 0.4:
  25 #   much rewritten by new author. I think the work has been split more
  26 #   logical between different classes.
  27 # 0.4.1:
  28 #   - cleanup
  29 #   - speedup, do all mudela parsing at the same time to avoid multiple
  30 #     guile startup that takes some seconds on my computer
  31 # 0.4.2:
  32 #   - fixed default latex fontsize, it should be 10pt not 11pt
  33 #   - verbatim option no longer visible
  34 #   - mudela-book produces .dvi output
  35 #   - change to use castingalgorithm = \Gourlay instead of \Wordwrap. It gives
  36 #     better result on small linewidths.
  37 #   - mudela-book-doc.doc rewritten
  38 # 0.5:
  39 #   - junked floating and fragment options, added eps option
  40 #   - mudela-book will scan the mudela code to find out if it has to add
  41 #     paper-definition and \score{\notes{...}}
  42 #   - possible to define commands that look like this: \mudela{ c d e }
  43 #   - don't produce .dvi output, it was a silly idea...
  44 # 0.5.1:
  45 #   - removed init/mudela-book-defs.py, \mudela is defined inside mudela-book
  46 #   - fragment and nonfragment options will override autodetection of type of
  47 #     in mudela-block (voice contents or complete code)
  48 # 0.5.2:
  49 #   - fixed verbatim option behaviour: don't show \begin{mudela} \end{mudela}
  50 #     and show both mudela code and music
  51 #   - veryverbatim option, same as verbatim but show \begin{mudela}
  52 #     and \end{mudela}. (saves keystrokes in mudela-book-doc.doc)
  53 #   - intertext="bla bla bla" option
  54 #   - mudela-book now understand latex \begin{verbatim}
  55 # 0.5.3:
  56 #   - bf: \mudela{ \times 2/3{...} }
  57 #        * \t in \times is not tab character and
  58 #        * dont treat the first '}' as command ending
  59 # 0.5.4: (Mats B)
  60 #   - .fly and .sly files in \mudelafile{} are treated as standalone Lilypond.
  61 #   - Fragments, .fly and .sly files are in \relative mode.
  62 # 0.5.5: (Mats B)
  63 #   - bf: Default fragments have linewidth=-1.0
  64 #   - Added 'singleline' and 'multiline' options.
  65 # 0.5.6:
  66 #   - \mudelafile{} set linewidth correct, -1 for .sly and texlinewidth for .fly
  67 #   - changes to Mudela_output
  68 #   - changed RE to search for pre/postMudelaExample to make it possible to
  69 #     comment out a definition.
  70 #   - use sys.stderr and sys.stdout instead of print
  71 import os
  72 import string
  73 import re
  74 import getopt
  75 import sys
  76
  77 outdir = 'out'
  78 initfile = ''
  79 program_version = '0.5.6'
  80 include_path = ['.']
  81
  82 out_files = []
  83
  84 fontsize_i2a = {11:'eleven', 13:'thirteen', 16:'sixteen',
  85                 20:'twenty', 26:'twentysix'}
  86 fontsize_pt2i = {'11pt':11, '13pt':13, '16pt':16, '20pt':20, '26pt':26}
  87
  88 # perhaps we can do without this?
  89
  90 begin_mudela_re = re.compile ('^ *\\\\begin{mudela}')
  91 begin_verbatim_re = re.compile ('^ *\\\\begin{verbatim}')
  92 end_verbatim_re = re.compile ('^ *\\\\end{verbatim}')
  93 extract_papersize_re = re.compile('\\\\documentclass[\[, ]*(\w*)paper[\w ,]*\]\{\w*\}')
  94 extract_fontsize_re = re.compile('[ ,\[]*([0-9]*)pt')
  95 begin_mudela_opts_re = re.compile('\[[^\]]*\]')
  96 end_mudela_re = re.compile ('^ *\\\\end{mudela}')
  97 section_re = re.compile ('\\\\section')
  98 chapter_re = re.compile ('\\\\chapter')
  99 input_re = re.compile ('^\\\\input{([^}]*)')
 100 include_re = re.compile ('^\\\\include{([^}]*)')
 101 begin_document_re = re.compile ('^ *\\\\begin{document}')
 102 documentclass_re = re.compile('\\\\documentclass')
 103 twocolumn_re = re.compile('\\\\twocolumn')
 104 onecolumn_re = re.compile('\\\\onecolumn')
 105 mudela_file_re = re.compile('\\\\mudelafile{([^}]+)}')
 106 file_ext_re = re.compile('.+\\.([^.}]+$)')
 107 preMudelaExample_re = re.compile('^\s*\\\\def\\\\preMudelaExample')
 108 postMudelaExample_re = re.compile('^\s*\\\\def\\\\postMudelaExample')
 109 boundingBox_re = re.compile('%%BoundingBox: ([0-9]+) ([0-9]+) ([0-9]+) ([0-9]+)')
 110 intertext_re = re.compile("intertext=\"([^\"]*)\"")
 111
 112 def file_exist_b(name):
 113     try:
 114         f = open(name)
 115     except IOError:
 116         return 0
 117     f.close ()
 118     return 1
 119
 120 def ps_dimention(fname):
 121     fd = open(fname)
 122     lines = fd.readlines()
 123     for line in lines:
 124         s = boundingBox_re.search(line)
 125         if s:
 126             break
 127     return (int(s.groups()[2])-int(s.groups()[0]),
 128             int(s.groups()[3])-int(s.groups()[1]))
 129
 130
 131 def find_file (name):
 132     for a in include_path:
 133         try:
 134             nm = os.path.join (a, name)
 135             f = open (nm)
 136             return nm
 137         except IOError:
 138             pass
 139     return ''
 140
 141
 142 class CompileStatus:
 143     pass
 144 class SomethingIsSeriouslyBroken:
 145     pass
 146
 147 def file_mtime (name):
 148     return os.stat (name)[8] #mod time
 149
 150 def need_recompile_b(infile, outfile):
 151     indate = file_mtime (infile)
 152     try:
 153         outdate = file_mtime (outfile)
 154         return indate > outdate
 155     except os.error:
 156         return 1
 157
 158 #
 159 # executes os.system(command) if infile is newer than
 160 # outfile or outfile don't exist
 161 #
 162 def compile (command, workingdir, infile, outfile):
 163     "Test if infile is newer than outfile. If so, cd to workingdir"
 164     "and execute command"
 165     indate = file_mtime (workingdir+infile)
 166     try:
 167         outdate = file_mtime (workingdir+outfile)
 168         recompile = indate > outdate
 169
 170     except os.error:
 171         recompile = 1
 172
 173     if recompile:
 174         sys.stderr.write ('invoking `%s\'\n' % command)
 175         if workingdir == '':
 176             status = os.system (command)
 177         else:
 178             status = os.system ('cd %s; %s' %(workingdir, command))
 179         if status:
 180             raise CompileStatus
 181
 182 class Properties:
 183     #
 184     # init
 185     #
 186     def __init__(self):
 187         self.__linewidth = {
 188             1: {'a4':{10: 345, 11: 360, 12: 390},
 189                 'a5':{10: 276, 11: 276, 12: 276},
 190                 'b5':{10: 345, 11: 356, 12: 356},
 191                 'letter':{10: 345, 11: 360, 12: 390},
 192                 'legal': {10: 345, 11: 360, 12: 390},
 193                 'executive':{10: 345, 11: 360, 12: 379}},
 194             2: {'a4':{10: 167, 11: 175, 12: 190},
 195                 'a5':{10: 133, 11: 133, 12: 133},
 196                 'b5':{10: 167, 11: 173, 12: 173},
 197                 'letter':{10: 167, 11: 175, 12: 190},
 198                 'legal':{10: 167, 11: 175, 12: 190},
 199                 'executive':{10: 167, 11: 175, 12: 184}}}
 200         # >0 --> force all mudela to this pt size
 201         self.force_mudela_fontsize = 0
 202         self.force_verbatim_b = 0
 203         self.__data = {
 204             'mudela-fontsize' : {'init': 16},
 205             'papersize' : {'init': 'a4'},
 206             'num-column' : {'init': 1},
 207             'tex-fontsize' : {'init': 10}
 208             }
 209     def clear_for_new_file(self):
 210         for var in self.__data.keys():
 211             self.__data[var] = {'init': self.__data[var]['init']}
 212     def clear_for_new_block(self):
 213         for var in self.__data.keys():
 214             if self.__data[var].has_key('block'):
 215                 del self.__data[var]['block']
 216     def __get_variable(self, var):
 217         if self.__data[var].has_key('block'):
 218             return self.__data[var]['block']
 219         elif self.__data[var].has_key('file'):
 220             return self.__data[var]['file']
 221         else:
 222             return self.__data[var]['init']
 223     def setPapersize(self, size, requester):
 224         self.__data['papersize'][requester] = size
 225     def getPapersize(self):
 226         return self.__get_variable('papersize')
 227     def setMudelaFontsize(self, size, requester):
 228         self.__data['mudela-fontsize'][requester] = size
 229     def getMudelaFontsize(self):
 230         if self.force_mudela_fontsize:
 231             return self.force_mudela_fontsize
 232         return self.__get_variable('mudela-fontsize')
 233     def setTexFontsize(self, size, requester):
 234         self.__data['tex-fontsize'][requester] = size
 235     def getTexFontsize(self):
 236         return self.__get_variable('tex-fontsize')
 237     def setNumColumn(self, num, requester):
 238         self.__data['num-column'][requester] = num
 239     def getNumColumn(self):
 240         return self.__get_variable('num-column')
 241     def getLineWidth(self):
 242         return self.__linewidth[self.getNumColumn()][self.getPapersize()][self.getTexFontsize()]
 243
 244
 245 class Mudela_output:
 246     """ Using only self.code_type to deside both value of linewith and
 247     if we have to put code into \score{...} was silly. Now we use:
 248     self.code_type:  show us what need to be added.
 249                         None : init value
 250                         'NOTES' : add \context Voice{ ... }
 251                         'CONTEXT' : add \score{ ... }
 252                         'COMPLETE' : jupp
 253     self.single_line_b:   0 : linewidth=-1  1: linewith=textwidth
 254     """
 255     def __init__ (self, basename):
 256         self.basename = basename
 257         self.temp_filename = "%s/%s" %(outdir, 'mudela-temp.ly')
 258         self.file = open (self.temp_filename, 'w')
 259         self.__lines = []
 260         # 'tex' or 'eps'
 261         self.graphic_type = 'tex'
 262         self.code_type = None
 263         self.single_line_b = 1
 264         self.optlist = []
 265     def write (self, line):
 266         # match only if there is nothing but whitespace before \begin.
 267         # we should not have to do this RE for every line
 268         if re.search('^\s*\\\\begin{mudela}', line):
 269             r  = begin_mudela_opts_re.search(line)
 270             if r:
 271                 o = r.group()[1:-1]
 272                 self.optlist =  re.compile('[\s,]*').split(o)
 273             else:
 274                 self.optlist = []
 275         else: # ugh this is NOT bulletproof...
 276             if not self.code_type:
 277                 if re.search('^\s*%', line) or re.search('^\s*$', line):
 278                     pass
 279                 elif re.search('^\s*\\\\context', line):
 280                     self.code_type = 'CONTEXT'
 281                     self.single_line_b = 0
 282                 elif re.search('^\s*\\\\score', line) or \
 283                      re.search('^\s*\\\\paper', line) or \
 284                      re.search('^\s*\\\\header', line) or \
 285                      re.search('^\s*\\\\version', line) or \
 286                      re.search('^\s*\\\\include', line) or \
 287                      re.search('^\s*[A-Za-z]*\s*=', line):
 288                     self.code_type = 'COMPLETE'
 289                     self.single_line_b = 0
 290                 else:
 291                     self.code_type = 'NOTES'
 292                     self.single_line_b = 1
 293             self.__lines.append(line)
 294     def write_red_tape(self):
 295         if 'eps' in self.optlist:
 296             self.graphic_type = 'eps'
 297             #self.single_line_b = 1
 298         if 'fragment' in self.optlist:
 299             self.code_type = 'NOTES'
 300         if 'nonfragment' in self.optlist:
 301             self.code_type = 'COMPLETE'
 302         if 'multiline' in self.optlist:
 303             self.single_line_b = 0
 304         for pt in fontsize_pt2i.keys():
 305             if pt in self.optlist:
 306                 Props.setMudelaFontsize(fontsize_pt2i[pt], 'block')
 307         self.file.write ('\\include \"paper%d.ly\"\n' \
 308                          % Props.getMudelaFontsize())
 309
 310         s = fontsize_i2a[Props.getMudelaFontsize()]
 311         if 'singleline' in self.optlist:
 312             self.single_line_b = 1
 313         if self.single_line_b:
 314             linewidth_str = 'linewidth = -1.\cm;'
 315         else:
 316             linewidth_str = 'linewidth = %i.\\pt;' % Props.getLineWidth()
 317         self.file.write("\\paper {"
 318                         + "\\paper_%s " % s
 319                         + linewidth_str
 320                         + "castingalgorithm = \Gourlay; \n}")
 321                         #+ "castingalgorithm = \Wordwrap; indent = 2.\cm; \n}")
 322         if self.code_type == 'CONTEXT':
 323             self.file.write('\\score{\n\\notes\\relative c{')
 324         if self.code_type == 'NOTES' :
 325             self.file.write('\\score{\n\\notes\\relative c{\\context Voice{')
 326     def close (self):
 327         self.write_red_tape()
 328         for l in self.__lines:
 329             self.file.write(l)
 330         if self.code_type == 'CONTEXT':
 331             self.file.write('}}')
 332         elif self.code_type == 'NOTES':
 333             self.file.write('}}}')
 334         self.file.close()
 335
 336         inf = outdir + self.basename + '.ly'
 337         outf = outdir + self.basename + '.tex'
 338         if not os.path.isfile(inf):
 339             status = 1
 340         else:
 341             status = os.system ('diff -q %s %s' % (self.temp_filename, inf))
 342         if status:
 343             os.rename (self.temp_filename, inf)
 344
 345         recompile_b =  need_recompile_b(inf, outf)
 346         if recompile_b:
 347             out_files.append((self.graphic_type, inf))
 348         return recompile_b
 349
 350     def insert_me_string(self):
 351         "ugh the name of this function is wrong"
 352         if self.graphic_type == 'tex':
 353             return ['tex', self.basename]
 354         elif self.graphic_type == 'eps':
 355             return ['eps', self.basename]
 356         else:
 357             raise SomethingIsSeriouslyBroken
 358
 359 class Tex_output:
 360     def __init__ (self, name):
 361         self.output_fn = '%s/%s' % (outdir, name)
 362         self.__lines = []
 363     def open_verbatim (self, line, level):
 364         self.__lines.append('\\begin{verbatim}\n')
 365         if level == 2:
 366             s = re.sub('veryverbatim[\s,]*', '', line)
 367             s = re.sub('intertext=\"([^\"]*)\"[\s,]*', '', s)
 368             s = re.sub(',\s*\]', ']', s)
 369             s = re.sub('\[\]', '', s)
 370             self.__lines.append(s);
 371     def close_verbatim (self):
 372         self.__lines.append('\\end{verbatim}\n')
 373     def write (self, s):
 374         self.__lines.append(s)
 375     def create_graphics(self):
 376         s = ''
 377         g_vec = []
 378         for line in self.__lines:
 379             if type(line)==type([]):
 380                 g_vec.append(line)
 381         for g in g_vec:
 382             if need_recompile_b(outdir+g[1]+'.ly', outdir+g[1]+'.tex'):
 383                     s = s + ' ' + g[1]+'.ly'
 384         if s != '':
 385             e = os.system('cd %s; lilypond %s' %(outdir, s))
 386             if e:
 387                 sys.stderr.write("error: lilypond exited with value %i\n" % e)
 388                 sys.exit(e)
 389         for g in g_vec:
 390             if g[0] == 'eps':
 391                 compile('tex %s' % g[1]+'.tex', outdir, g[1]+'.tex', g[1]+'.dvi')
 392                 compile('dvips -E -o %s %s' %(g[1]+'.eps', g[1]+'.dvi'), outdir,
 393                         g[1]+'.dvi', g[1]+'.eps')
 394     def write_outfile(self):
 395         file = open(self.output_fn+'.latex', 'w')
 396         file.write('% Created by mudela-book\n')
 397         last_line = None
 398         for line in self.__lines:
 399             if type(line)==type([]):
 400                 if last_line == '\n':
 401                     file.write(r'\vspace{0.5cm}')
 402                 if line[0] == 'tex':
 403                     file.write('\\preMudelaExample \\input %s \\postMudelaExample\n'\
 404                                % (line[1]+'.tex'))
 405                 if line[0] == 'eps':
 406                     ps_dim = ps_dimention(outdir+line[1]+'.eps')
 407                     file.write('\\noindent\\parbox{%ipt}{\includegraphics{%s}}\n' \
 408                                % (ps_dim[0], line[1]+'.eps'))
 409             else:
 410                 file.write(line)
 411             if type(last_line)==type([]):
 412                 if line=='\n':
 413                     file.write(r'\vspace{0.5cm}')
 414             last_line = line
 415         file.close()
 416
 417 # given parameter s="\mudela[some options]{CODE} some text and commands"
 418 # it returns a tuple:
 419 #    (CODE, integer)
 420 # where the last number is the index of the ending '}'
 421 def extract_command(s):
 422     start_found_b = 0
 423     count = 0
 424     start = 0
 425     for idx in range(len(s)):
 426         if s[idx] == '{':
 427             if not start_found_b:
 428                 start = idx
 429                 start_found_b = 1
 430             count = count + 1
 431         if s[idx] == '}':
 432             count = count - 1
 433         if (start_found_b == 1) and (count == 0):
 434             break
 435     return s[start+1:idx], idx
 436
 437 class Tex_input:
 438     def __init__ (self, filename):
 439         for fn in [filename, filename+'.tex', filename+'.doc']:
 440             try:
 441                 self.infile = open (fn)
 442                 self.filename = fn
 443                 return
 444             except:
 445                 continue
 446         raise IOError
 447
 448     def get_lines (self):
 449         lines = self.infile.readlines ()
 450         (retlines, retdeps) = ([],[self.filename])
 451         for line in lines:
 452             r_inp = input_re.search (line)
 453             r_inc = include_re.search (line)
 454
 455             # Filename rules for \input :
 456             # input: no .tex ext
 457             # 1. will search for file with exact that name (tex-input.my will be found)
 458             # 2. will search for file with .tex ext, (tex-input.my
 459             #    will find tex-input.my.tex)
 460             # input: with .tex ext
 461             # 1. will find exact match
 462
 463             # Filename rules for \include :
 464             # 1. will only find files with name given to \include + .tex ext
 465             if r_inp:
 466                 try:
 467                     t = Tex_input (r_inp.groups()[0])
 468                     ls = t.get_lines ()
 469                     retlines = retlines + ls[0]
 470                     retdeps = retdeps + ls[1]
 471                 except:
 472                     sys.stderr.write("warning: can't find %s, let's hope latex will\n" % r_inp.groups()[0])
 473                     retlines.append (line)
 474             elif r_inc:
 475                 try:
 476                     t = Tex_input (r_inc.groups()[0]+'.tex')
 477                     ls =t.get_lines ()
 478                     ls[0].insert(0, '\\newpage\n')
 479                     ls[0].append('\\newpage\n')
 480                     retlines = retlines + ls[0]
 481                     retdeps = retdeps + ls[1]
 482                 except:
 483                     sys.stderr.write("warning: can't find %s, let's hope latex will" % r_inc.groups()[0])
 484                     retlines.append (line)
 485             else:
 486                 # This code should be rewritten, it looks terrible
 487                 r_mud = defined_mudela_cmd_re.search(line)
 488                 if r_mud:
 489                     # TODO document this
 490                     ss = "\\\\verb(?P<xx>[^a-zA-Z])\s*\\\\%s\s*(?P=xx)" \
 491                          % re.escape(r_mud.group()[1:])
 492                     # just append the line if the command is inside \verb|..|
 493                     if re.search(ss, line):
 494                         retlines.append(line)
 495                         continue
 496                     while 1:
 497                         opts = r_mud.groups()[2]
 498                         cmd_start_idx = r_mud.span()[0]
 499                         if cmd_start_idx > 0:
 500                             retlines.append(line[:cmd_start_idx])
 501
 502                         cmd_data, rest_idx = extract_command(line[cmd_start_idx:])
 503                         rest_idx = rest_idx + cmd_start_idx + 1
 504                         if opts == None:
 505                             opts = ''
 506                         else:
 507                             opts = ', '+opts
 508
 509                         v = string.split(defined_mudela_cmd[r_mud.groups()[0]], '\n')
 510                         for l in v[1:-1]:
 511                             l = string.replace(l, '\\fontoptions', opts)
 512                             l = string.replace(l, '\\maininput', cmd_data)
 513                             retlines.append(l)
 514                         r_mud = defined_mudela_cmd_re.search(line[rest_idx:])
 515                         if not r_mud:
 516                             rs = line[rest_idx:]
 517                             while rs[0] == " ":
 518                                 rs = rs[1:]
 519                             if rs != "\n":
 520                                 retlines.append(line[rest_idx:])
 521                             break;
 522                         line = line[rest_idx:]
 523                 else:
 524                     retlines.append (line)
 525         return (retlines, retdeps)
 526
 527
 528 class Main_tex_input(Tex_input):
 529     def __init__ (self, name, outname):
 530
 531         Tex_input.__init__ (self, name) # ugh
 532         self.outname = outname
 533         self.chapter = 0
 534         self.section = 0
 535         self.fine_count =0
 536         self.mudtex = Tex_output (self.outname)
 537         self.mudela = None
 538         self.deps = []
 539         self.verbatim = 0
 540         # set to 'mudela' when we are processing mudela code,
 541         # both verbatim and graphic-to-be
 542         self.mode = 'latex'
 543     def set_sections (self, l):
 544         if section_re.search (l):
 545             self.section = self.section + 1
 546         if chapter_re.search (l):
 547             self.section = 0
 548             self.chapter = self.chapter + 1
 549
 550     def gen_basename (self):
 551         return '%s-%d.%d.%d' % (self.outname, self.chapter,
 552                                 self.section, self.fine_count)
 553     def extract_papersize_from_documentclass(self, line):
 554         pre = extract_papersize_re.search(line)
 555         if not pre:
 556             return None
 557         return pre.groups()[0]
 558     def extract_fontsize_from_documentclass(self, line):
 559         r = extract_fontsize_re.search(line)
 560         if r:
 561             return int(r.groups()[0])
 562     def do_it(self):
 563         preMudelaDef = postMudelaDef = 0
 564         (lines, self.deps) = self.get_lines ()
 565         #HACK
 566         latex_verbatim = 0
 567         for line in lines:
 568             if documentclass_re.search (line):
 569                 p = self.extract_papersize_from_documentclass (line)
 570                 if p:
 571                     Props.setPapersize(p, 'file')
 572                 f = self.extract_fontsize_from_documentclass (line)
 573                 if f:
 574                     Props.setTexFontsize (f, 'file')
 575             elif twocolumn_re.search (line):
 576                 Props.setNumColumn (2, 'file')
 577             elif onecolumn_re.search (line):
 578                 Props.setNumColumn (1, 'file')
 579             elif preMudelaExample_re.search (line):
 580                 preMudelaDef = 1
 581             elif postMudelaExample_re.search (line):
 582                 postMudelaDef = 1
 583             elif begin_verbatim_re.search (line):
 584                 latex_verbatim = 1
 585             elif end_verbatim_re.search (line):
 586                 latex_verbatim = 0
 587             elif begin_document_re.search (line):
 588                 if not preMudelaDef:
 589                     self.mudtex.write ('\\def\\preMudelaExample{}\n')
 590                 if not postMudelaDef:
 591                     self.mudtex.write ('\\def\\postMudelaExample{}\n')
 592
 593             elif mudela_file_re.search(line):
 594                 r = mudela_file_re.search(line)
 595
 596                 self.mudela = Mudela_output(self.gen_basename())
 597                 fn = r.group (1)
 598                 full_path = find_file (fn)
 599                 if not full_path:
 600                     sys.stderr.write("error: can't find file '%s'\n" % fn)
 601                     sys.exit (1)
 602
 603                 f = open (full_path, 'r')
 604                 lines =f.readlines ()
 605                 self.mudela.write ('%% This is a copy of file %s\n' % full_path)
 606                 for x in lines:
 607                     self.mudela.write (x)
 608                 r = file_ext_re.search(fn)
 609                 if r:
 610                     if r.group(1) == 'fly':
 611                         self.mudela.optlist.append('multiline')
 612                 stat =self.mudela.close ()
 613                 if stat:
 614                         sys.stdout.write("(File %s needs recompiling)\n" % full_path)
 615                 self.mudtex.write (self.mudela.insert_me_string())
 616                 self.deps.append (full_path)
 617                 del self.mudela
 618                 self.mudela = None
 619                 self.fine_count = self.fine_count + 1
 620                 continue
 621             elif begin_mudela_re.search (line) and not latex_verbatim:
 622                 Props.clear_for_new_block()
 623                 if __debug__:
 624                     if self.mode == 'mudela':
 625                         raise AssertionError
 626                 self.mode = 'mudela'
 627                 r  = begin_mudela_opts_re.search (line)
 628                 if r:
 629                     o = r.group()[1:][:-1]
 630                     optlist =  re.compile('[ ,]*').split(o)
 631                     m = intertext_re.search(r.group())
 632                     if m:
 633                         self.intertext = m.groups()[0]
 634                     else:
 635                         self.intertext = None
 636                 else:
 637                     optlist = []
 638                 if ('veryverbatim' in optlist):
 639                     self.verbatim = 2
 640                 elif ('verbatim' in optlist) or (Props.force_verbatim_b):
 641                     self.verbatim = 1
 642                 else:
 643                     self.verbatim = 0
 644                 if self.verbatim:
 645                     self.mudtex.open_verbatim (line, self.verbatim)
 646                 self.mudela = Mudela_output (self.gen_basename ())
 647                 self.mudela.write (line)
 648                 continue
 649             elif end_mudela_re.search (line) and not latex_verbatim:
 650                 if __debug__:
 651                     if self.mode != 'mudela':
 652                         raise AssertionError
 653
 654                 if self.verbatim:
 655                     if self.verbatim == 2:
 656                         self.mudtex.write (line)
 657                     self.mudtex.close_verbatim ()
 658                 self.mudela.close ()
 659                 if self.verbatim and self.intertext:
 660                     self.mudtex.write(self.intertext)
 661                 self.mudtex.write (self.mudela.insert_me_string())
 662                 del self.mudela
 663                 self.mudela = None
 664                 self.fine_count = self.fine_count + 1
 665                 self.mode = 'latex'
 666                 continue
 667
 668
 669             if self.mode == 'mudela':
 670                 self.mudela.write (line)
 671                 if self.verbatim:
 672                     self.mudtex.write (line)
 673             else:
 674                 self.mudtex.write (line)
 675                 self.set_sections(line)
 676         self.mudtex.create_graphics()
 677         self.mudtex.write_outfile()
 678         del self.mudtex
 679
 680
 681 def help():
 682     sys.stdout.write("""Usage: mudela-book [options] FILE\n
 683 Generate hybrid LaTeX input from Latex + mudela
 684 Options:\n
 685   -h, --help                     print this help
 686   -d, --outdir=DIR               directory to put generated files
 687   -o, --outname=FILE             prefix for filenames
 688   --default-mudela-fontsize=??pt default fontsize for music
 689   --force-mudela-fontsize=??pt   force fontsize for all inline mudela
 690   --force-verbatim               make all mudela verbatim\n
 691   --dependencies                 write dependencies
 692   --include                      include path
 693   --init                         mudela-book initfile
 694   """
 695                      )
 696     sys.exit (0)
 697
 698
 699 def write_deps (fn, out,  deps):
 700         out_fn = os.path.join (outdir, fn)
 701
 702         sys.stdout.write('writing `%s\'\n' % out_fn)
 703
 704         f = open (out_fn, 'w')
 705         target = re.sub (os.sep + os.sep, os.sep, os.path.join (outdir, out + '.latex'))
 706         f.write ('%s: %s\n'% (target,
 707                               reduce (lambda x,y: x + ' '+ y, deps)))
 708         f.close ()
 709
 710 def identify():
 711     sys.stderr.write ('This is %s version %s\n' % ('mudela-book', program_version))
 712
 713 def main():
 714     global outdir, initfile, defined_mudela_cmd, defined_mudela_cmd_re
 715     outname = ''
 716     try:
 717         (options, files) = getopt.getopt(
 718             sys.argv[1:], 'hd:o:I:', ['outdir=', 'outname=',
 719                                     'default-mudela-fontsize=',
 720                                     'force-mudela-fontsize=',
 721                                     'help', 'dependencies', 'include=',
 722                                     'force-verbatim', 'init='])
 723     except getopt.error, msg:
 724         sys.stderr.write("error: %s" % msg)
 725         sys.exit(1)
 726
 727     do_deps = 0
 728     for opt in options:
 729         o = opt[0]
 730         a = opt[1]
 731         if o == '--include' or o == '-I':
 732             include_path.append (a)
 733         elif o == '--outname' or o == '-o':
 734             if len(files) > 1:
 735                 #HACK
 736                 sys.stderr.write("Mudela-book is confused by --outname on multiple files")
 737                 sys.exit(1)
 738             outname = a
 739         elif o == '--outdir' or o == '-d':
 740             outdir = a
 741         elif o == '--help' or o == '-h':
 742             help ()
 743         elif o == '--dependencies':
 744             do_deps = 1
 745         elif o == '--default-mudela-fontsize':
 746             if not fontsize_pt2i.has_key(a):
 747                 sys.stderr.write("Error: invalid fontsize: %s" % a)
 748                 sys.stderr.write("  accepted fontsizes are: 11pt, 13pt, 16pt, 20pt, 26pt")
 749                 sys.exit()
 750             Props.setMudelaFontsize(fontsize_pt2i[a], 'init')
 751         elif o == '--force-mudela-fontsize':
 752             if not fontsize_pt2i.has_key(a):
 753                 sys.stderr.write("Error: invalid fontsize: %s" % a)
 754                 sys.stderr.write("  accepted fontsizes are: 11pt, 13pt, 16pt, 20pt, 26pt")
 755                 sys.exit()
 756             Props.force_mudela_fontsize = fontsize_pt2i[a]
 757         elif o == '--force-verbatim':
 758             Props.force_verbatim_b = 1
 759         elif o == '--init':
 760             initfile =  a
 761     if outdir[-1:] != '/':
 762         outdir = outdir + '/'
 763
 764     # r""" ... """ means: leave escape seqs alone.
 765     defined_mudela_cmd = {'mudela': r"""
 766 \begin{mudela}[eps, singleline \fontoptions]
 767   \context Staff <
 768     \context Voice{
 769       \maininput
 770     }
 771   >
 772 \end{mudela}
 773 """}
 774     if initfile != '':
 775         f = open(initfile)
 776         s = f.read()
 777         f.close()
 778         d = eval(s)
 779         for i in d.keys():
 780             defined_mudela_cmd[i] = d[i]
 781         del d
 782
 783     c = string.join (defined_mudela_cmd.keys(), '|')
 784
 785     defined_mudela_cmd_re = re.compile("\\\\(%s)(\[(\d*pt)\])*{([^}]*)}" %c)
 786
 787     if not os.path.isdir(outdir):
 788         os.system('mkdir %s' % outdir)
 789
 790     for input_filename in files:
 791         Props.clear_for_new_file()
 792         if outname:
 793             my_outname = outname
 794         else:
 795             my_outname = os.path.basename(os.path.splitext(input_filename)[0])
 796         my_depname = my_outname + '.dep'
 797         inp = Main_tex_input (input_filename, my_outname)
 798         inp.do_it ()
 799         if do_deps:
 800             write_deps (my_depname, my_outname, inp.deps)
 801
 802 identify()
 803 Props = Properties()
 804 main()