7 * Add @nodes, split at sections?
17 program_name
= 'lys-to-tely'
19 include_snippets
= '@lysnippets'
20 fragment_options
= 'printfilename,texidoc'
21 help_text
= r
"""Usage: %(program_name)s [OPTIONS]... LY-FILE...
22 Construct tely doc from LY-FILEs.
25 -h, --help print this help
26 -f, --fragment-options=OPTIONS use OPTIONS as lilypond-book fragment
28 -o, --output=NAME write tely doc to NAME
29 -t, --title=TITLE set tely doc title TITLE
30 --template=TEMPLATE use TEMPLATE as Texinfo template file,
31 instead of standard template; TEMPLATE should contain a command
32 '%(include_snippets)s' to tell where to insert LY-FILEs. When this
33 option is used, NAME and TITLE are ignored.
37 sys
.stdout
.write ( text
)
40 (options
, files
) = getopt
.getopt (sys
.argv
[1:], 'f:hn:t:',
41 ['fragment-options=', 'help', 'name=', 'title=', 'template='])
45 template
= '''\input texinfo
46 @setfilename %%(name)s.info
49 @documentencoding utf-8
54 @finalout @c we do not want black boxes.
58 @author Han-Wen Nienhuys and Jan Nieuwenhuizen
68 ''' % include_snippets
73 if o
== '-h' or o
== '--help':
74 # We can't use vars () inside a function, as that only contains all
75 # local variables and none of the global variables! Thus we have to
76 # generate the help text here and pass it to the function...
77 help (help_text
% vars ())
78 elif o
== '-n' or o
== '--name':
80 elif o
== '-t' or o
== '--title':
82 elif o
== '-f' or o
== '--fragment-options':
84 elif o
== '--template':
85 template
= open (a
, 'r').read ()
87 raise Exception ('unknown option: ' + o
)
89 texi_file_re
= re
.compile ('.*\.i?te(ly|xi)$')
92 if texi_file_re
.match (n
):
93 # We have a texi include file, simply include it:
94 s
= r
"@include %s" % os
.path
.basename (n
)
96 # Assume it's a lilypond file -> create image etc.
104 @lilypondfile[%s]{%s}
105 """ % (os
.path
.basename (n
), fragment_options
, n
)
109 dir = os
.path
.dirname (name
) or "."
110 # don't strip .tely extension, input/lsr uses .itely
111 name
= os
.path
.basename (name
)
112 template
= template
% vars ()
114 s
= "\n".join (map (name2line
, files
))
115 s
= template
.replace (include_snippets
, s
, 1)
116 f
= "%s/%s" % (dir, name
)
117 sys
.stderr
.write ("%s: writing %s..." % (program_name
, f
))
121 sys
.stderr
.write ('\n')
123 # not Unix philosophy, but hey, at least we notice when
124 # we don't distribute any .ly files.
125 sys
.stderr
.write ("No files specified. Doing nothing")