]> git.donarmstrong.com Git - lilypond.git/blob - buildscripts/makelsr.py
Merge branch 'master' of ssh://jomand@git.sv.gnu.org/srv/git/lilypond
[lilypond.git] / buildscripts / makelsr.py
1 #!/usr/bin/python
2
3 import sys
4 import os
5 import glob
6 import re
7
8 USAGE = '''  Usage: makelsr.py LSR_SNIPPETS_DIR
9 This script must be run from top of the source tree;
10 it updates snippets input/lsr with snippets in input/new or LSR_SNIPPETS_DIR.
11 '''
12
13 LY_HEADER_LSR = '''%%%% Do not edit this file; it is auto-generated from LSR http://lsr.dsi.unimi.it
14 %%%% This file is in the public domain.
15 %%%% Tags: %(tags)s
16 '''
17
18 LY_HEADER_NEW = '''%%%% Do not edit this file; it is auto-generated from input/new
19 '''
20
21 DEST = os.path.join ('input', 'lsr')
22 NEW_LYS = os.path.join ('input', 'new')
23
24 TAGS = []
25 # NR 1
26 TAGS.extend (['pitches', 'rhythms', 'expressive-marks',
27 'repeats', 'simultaneous-notes', 'staff-notation',
28 'editorial-and-educational-use', 'text'])
29 # NR 2
30 TAGS.extend (['vocal-music', 'chords', 'piano-music',
31 'percussion', 'guitar', 'strings', 'bagpipes', 'ancient-notation'])
32
33 # other
34 TAGS.extend (['contexts-and-engravers', 'tweaks-and-overrides',
35 'paper-and-layout', 'breaks', 'spacing', 'midi', 'titles', 'template'])
36
37 def exit_with_usage (n=0):
38         sys.stderr.write (USAGE)
39         sys.exit (n)
40
41 try:
42         in_dir = sys.argv[1]
43 except:
44         exit_with_usage (2)
45
46 if not (os.path.isdir (DEST) and os.path.isdir (NEW_LYS)):
47         exit_with_usage (3)
48
49 unsafe = []
50 unconverted = []
51 notags_files = []
52
53 # mark the section that will be printed verbatim by lilypond-book
54 end_header_re = re.compile ('(\\header {.*?}\n)\n', re.M | re.S)
55
56 def mark_verbatim_section (ly_code):
57         return end_header_re.sub ('\\1% begin verbatim\n', ly_code)
58
59 def copy_ly (srcdir, name, tags):
60         global unsafe
61         global unconverted
62         dest = os.path.join (DEST, name)
63         f = open (dest, 'w')
64         if in_dir in srcdir:
65                 h = LY_HEADER_LSR
66         else:
67                 h = LY_HEADER_NEW
68         f.write (h % ', '.join (tags))
69         f.write (mark_verbatim_section (open (os.path.join (srcdir, name)).read ()))
70         f.close ()
71         e = os.system('convert-ly -e ' + dest)
72         if e:
73                 unconverted.append (dest)
74         if os.path.exists (dest + '~'):
75                 os.remove (dest + '~')
76         # -V seems to make unsafe snippets fail nicer/sooner
77         e = os.system ('nice lilypond -V -dno-print-pages -dsafe -o /tmp/lsrtest ' + dest)
78         if e:
79                 unsafe.append (dest)
80
81 def read_source_with_dirs (src):
82         s = {}
83         l = {}
84         for tag in TAGS:
85                 srcdir = os.path.join (src, tag)
86                 l[tag] = set (map (os.path.basename, glob.glob (os.path.join (srcdir, '*.ly'))))
87                 for f in l[tag]:
88                         if f in s.keys ():
89                                 s[f][1].append (tag)
90                         else:
91                                 s[f] = (srcdir, [tag])
92         return s, l
93
94
95 tags_re = re.compile ('lsrtags\\s*=\\s*"(.+?)"')
96
97 def read_source (src):
98         s = {}
99         l = dict ([(tag, set()) for tag in TAGS])
100         for f in glob.glob (os.path.join (src, '*.ly')):
101                 m = tags_re.search (open (f, 'r').read ())
102                 if m:
103                         file_tags = [tag.strip() for tag in m.group (1). split(',')]
104                         s[f] = (src, file_tags)
105                         [l[tag].add (f) for tag in file_tags if tag in TAGS]
106                 else:
107                         notags_files.append (f)
108         return s, l
109
110
111 def dump_file_list (file, list):
112         f = open (file, 'w')
113         f.write ('\n'.join (list) + '\n')
114
115 ## clean out existing lys and generated files
116 map (os.remove, glob.glob (os.path.join (DEST, '*.ly')) +
117      glob.glob (os.path.join (DEST, '*.snippet-list')))
118
119 # read LSR source where tags are defined by subdirs
120 snippets, tag_lists = read_source_with_dirs (in_dir)
121 # read input/new where tags are directly
122 s, l = read_source (NEW_LYS)
123 snippets.update (s)
124 for t in TAGS:
125         tag_lists[t].update (l[t])
126
127 for (name, (srcdir, tags)) in snippets.items ():
128         copy_ly (srcdir, name, tags)
129
130 for (tag, file_set) in tag_lists.items ():
131         dump_file_list (os.path.join (DEST, tag + '.snippet-list'), file_set)
132
133 if unconverted:
134         sys.stderr.write ('These files could not be converted successfully by convert-ly:\n')
135         sys.stderr.write ('\n'.join (unconverted) + '\n\n')
136
137 if notags_files:
138         sys.stderr.write ('No tags could be found in these files:\n')
139         sys.stderr.write ('\n'.join (notags_files) + '\n\n')
140
141 dump_file_list ('lsr-unsafe.txt', unsafe)
142 sys.stderr.write ('''
143
144 Unsafe files printed in lsr-unsafe.txt: CHECK MANUALLY!
145   xargs git-diff < lsr-unsafe.txt
146
147 ''')
148