#!/usr/bin/env python

# This file is free software; as a special exception the author gives
# unlimited permission to copy and/or distribute it, with or without
# modifications, as long as this notice is preserved.
#
# This program is distributed in the hope that it will be useful, but
# WITHOUT ANY WARRANTY, to the extent permitted by law; without even the
# implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.


# unfinished script that create a lilypond-book document
# over all the lessonfiles.

import pygtk
pygtk.require("2.0")

import sys, re, os, os.path
sys.path.append(".")

import src, src.dataparser, src.lessonfile

def tex_subst(s):
    return s.replace("&", "\&").replace("#", "\#")

def so2ly(s, musicformat):
    re_staff = re.compile("\\\\staff")
    re_addvoice = re.compile("\\\\addvoice")
    v = re_staff.split(s)
    v = filter(lambda i: i!="", v)
    v = map(lambda s, r=re_addvoice: r.split(s), v)
    retval = "\\score{\n  <"
    i = ''
    for s in v:
        i = i + 'i'
        retval = retval + "\n    \\context Staff=%s<" % i
        for vo in s:
            i = i + 'i'
            if musicformat == 'chord':
                m = "< %s >" % vo
            else:
                m = vo
            retval = retval + "\n      \\context Voice=%s\\notes{%s}" % (i, m)
        retval = retval + "\n    >"
    retval = retval + "\n  >\n}"
    return retval

def write_header(of, header, filename):
    of.write("\n\\subsection{%s}" % tex_subst(header.title))
    of.write("\n\\begin{itemize}")
    of.write("\n\\item filename: %s" % filename)
    of.write("\n\\item description: %s" % header.description)
    of.write("\n\\item content: %s" % header.content)
    of.write("\n\\item musicformat: %s" % header.musicformat)
    of.write("\n\\end{itemize}")

def write_questions(of, header, questions):
    for q in questions:
        of.write("""'%s':
\\begin[11pt, eps, singleline]{lilypond}
%s
\\end{lilypond}
,
""" % (tex_subst(q.get('name', '')), so2ly(q['music'], header.musicformat)))

predef = {'dictation': 'dictation',
                      'progression': 'progression',
                      'harmony': 'harmony',
                      'chord-voicing': 'chord-voicing',
                      'sing-chord': 'sing-chord',
                      'chord': 'chord',
                      'id-by-name': 'id-by-name',
                      'satb': 'satb',
                      'horiz': 'horiz',
                      'vertic': 'vertic',
                      'yes': 1,
                      'no': 0,
                      'tempo': (60, 4)}

def write_file(of, filename):
    parser = src.dataparser.Dataparser(predef, ('tempo',))
    parser.parse_file(filename)

    questions = filter(lambda e: e['blocktype'] == 'question', parser.m_blocks)
    header = src.lessonfile._Header(
          filter(lambda e: e['blocktype'] == 'header', parser.m_blocks)[0])

    write_header(of, header, filename)
    write_questions(of, header, questions)


of = open("lessonfiles.tex", "w")
of.write(r"""\documentclass[a4paper, 12pt]{article}
\begin{document}
""")

for filename in sys.argv[1:]:
    if os.path.isfile(filename) and not filename.endswith('Makefile'):
        write_file(of, filename)

of.write("\n\\end{document}")
of.close()