]> git.donarmstrong.com Git - lilypond.git/blob - buildscripts/mutopia-index.py
fixes. polishing: add spaces and dots.
[lilypond.git] / buildscripts / mutopia-index.py
1 #!@PYTHON@
2 # mutopia-index.py
3
4 name = 'mutopia-index'
5
6 import fnmatch
7 import os
8
9 _debug = 0
10
11 _prune = ['(*)']
12
13 def find(pattern, dir = os.curdir):
14         list = []
15         names = os.listdir(dir)
16         names.sort()
17         for name in names:
18                 if name in (os.curdir, os.pardir):
19                         continue
20                 fullname = os.path.join(dir, name)
21                 if fnmatch.fnmatch(name, pattern):
22                         list.append(fullname)
23                 if os.path.isdir(fullname) and not os.path.islink(fullname):
24                         for p in _prune:
25                                 if fnmatch.fnmatch(name, p):
26                                         if _debug: print "skip", `fullname`
27                                         break
28                         else:
29                                 if _debug: print "descend into", `fullname`
30                                 list = list + find(pattern, fullname)
31         return list
32
33
34 import re
35 import os
36 import sys
37 import stat
38
39 def gulp_file (fn):
40         try:
41                 f = open (fn)
42         except:
43                 raise 'not there' , fn
44         return f.read ()
45
46 def file_exist_b (fn):
47         try:
48                 f = open (fn)
49                 return 1
50         except:
51                 return 0
52
53
54 headertext= r"""
55 <p>You're looking at a page with some LilyPond samples.
56 These files are also included in the distribution. The output is
57 completely generated by LilyPond, without any touch up by humans.
58
59 <p>The PostScript files were generated using TeX and dvips at 600 dpi.
60 The pictures are 90 dpi anti-aliased snapshots of the printed output.
61 The images are in PNG format, and should be viewable with any current
62 browser.
63
64 <p>If you want a better impression of the appearance, do print out one of
65 the postscript files.
66 """
67
68 headertext_nopics= r"""
69 <p>Nothing to be seen here, move along.
70 """
71
72 #
73 # FIXME breaks on multiple strings.
74 #
75 def read_lilypond_header (fn):
76         s = open(fn).read ()
77         s = re.sub('%.*$', '', s)
78         s = re.sub('\n', ' ', s)                
79
80         dict = {}
81         m = re.search (r"""\\header\s*{([^}]*)}""", s)
82
83         if m:
84                         s = m.group(1)
85         else:
86                         return dict
87
88         while s:
89                 m = re.search (r"""\s*(\S+)\s*=\s*([^;]+)\s*;""", s)
90                 if m == None:
91                         s = ''
92                 else:
93                         s = s[m.end (0):]
94                         left  = m.group  (1)
95                         right = m.group (2)
96
97                         left = re.sub ('"', '', left)
98                         right = re.sub ('"', '', right)
99                         dict[left] = right
100
101         return dict
102
103 def help ():
104         sys.stdout.write (r"""Usage: mutopia-index [OPTIONS] INFILE OUTFILE
105 Generate index for mutopia.
106
107 Options:
108   -h, --help                 print this help
109   -o, --output=FILE          write output to file
110   -s, --subdirs=DIR          add subdir
111       --suffix=SUF           specify suffix
112       
113 """
114                                           )
115         sys.exit (0)
116
117 # ugh.
118 def gen_list(inputs, filename):
119         print "generating HTML list %s\n" % filename
120         if filename:
121                 list = open(filename, 'w')
122         else:
123                 list = sys.stdout
124         list.write ('<html><title>Rendered Examples</title>\n')
125         list.write ('<body bgcolor=white>\n')
126         
127         if inputs:
128                         list.write (headertext)
129         else:
130                         list.write (headertext_nopics)
131
132
133         for ex in inputs:
134                 (base, ext) = os.path.splitext (ex)
135                 (base, ext2) = os.path.splitext (base)          
136                 ext = ext2 + ext
137                 
138                 print '%s, ' % ex
139                 header = read_lilypond_header(ex)
140                 
141                 def read_dict(s, default, h =header):
142                                 try:
143                                         ret = h[s]
144                                 except KeyError:
145                                         ret = default
146                                 return ret
147                 head = read_dict('title', os.path.basename (base))
148                 composer = read_dict('composer', '')
149                 desc = read_dict('description', '')
150                 list.write('<hr>\n')
151                 list.write('<h1>%s</h1>\n' % head);
152                 if composer:
153                         list.write('<h2>%s</h2>\n' % composer)
154                 if desc:
155                         list.write('%s<p>' % desc)
156                 list.write ('<ul>\n')
157                 def list_item(filename, desc, type, l = list):
158                         if file_exist_b(filename):
159                                 
160                                 l.write ('<li><a href="%s">%s</a>' % (filename, desc))
161
162                                 # todo: include warning if it uses \include
163                                 # files.
164                                 
165                                 size=os.stat(filename)[stat.ST_SIZE]
166                                 kB=(size + 512) / 1024
167                                 if kB:
168                                         l.write (' (%s %d kB)' % (type, kB))
169                                 else:
170                                         l.write (' (%s %d characters)' % (type, size))
171                                 pictures = ['jpeg', 'png', 'xpm']
172                                 l.write ('\n')
173
174                 list_item(base + ext, 'The input', 'ASCII')
175                 for pageno in range(1,100):
176                         f  = base + '-page%d.png' % pageno
177                         if not file_exist_b (f):
178                                 break
179                         list_item(f, 'See a picture of page %d' % pageno, 'png')
180                 list_item(base + '.pdf', 'Print', 'PDF')
181                 list_item(base + '.ps.gz', 'Print', 'gzipped PostScript')
182                 list_item(base + '.midi', 'Listen', 'MIDI')
183                 list.write ("</ul>\n");
184
185         list.write('</body></html>\n');
186         list.close()
187
188 import getopt
189
190 (options, files) = getopt.getopt(sys.argv[1:], 
191   'ho:', ['help', 'output='])
192 outfile = 'examples.html'
193
194 subdirs =[]
195 for opt in options:
196         o = opt[0]
197         a = opt[1]
198         if o == '--help' or o == '-h':
199                 help()
200         elif o == '--output' or o == '-o':
201                 outfile = a
202
203 dirs  = []
204 for f in files:
205         dirs = dirs + find ('out-www', f)
206
207 if not dirs:
208         dirs = ['.']
209
210 allfiles = []
211
212 for d in dirs:
213         allfiles = allfiles + find ('*.ly.txt', d)
214
215 print allfiles
216
217 gen_list (allfiles, outfile)
218