]> git.donarmstrong.com Git - lilypond.git/blob - stepmake/bin/add-html-footer.py
patch::: 1.5.9.jcn3
[lilypond.git] / stepmake / bin / add-html-footer.py
1 #!@PYTHON@
2
3 """
4 Print a nice footer.  add the top of the ChangeLog file (up to the ********)
5 """
6 import re
7 import sys
8 import os
9 import time
10 import string 
11 import getopt
12
13 gcos = "unknown"
14 index_url=''
15 top_url=''
16 changelog_file=''
17 package_name = ''
18 package_version = ''
19
20 mail_address = '(address unknown)'
21 try:
22         mail_address= os.environ['MAILADDRESS']
23 except KeyError:
24         pass
25
26 webmaster= mail_address
27 try:
28         webmaster= os.environ['WEBMASTER']
29 except KeyError:
30         pass
31
32 header_file = ''
33 footer_file = ''
34 default_header = r"""
35 """
36
37 default_footer = r"""<hr>Please take me <a href=@INDEX@>back to the index</a>
38 of @PACKAGE_NAME@
39 """
40
41 built = r"""<hr>
42 <p><font size="-1">
43 This page was built from @PACKAGE_NAME@-@PACKAGE_VERSION@ by<br>
44 </font>
45 <address><font size="-1">@GCOS@ &lt;<a href="mailto:%s">@MAIL_ADDRESS@</a>&gt;,
46 @LOCALTIME@.</font></address>"""
47
48
49 def gulp_file (f):
50         try:
51                 i = open(f)
52                 i.seek (0, 2)
53                 n = i.tell ()
54                 i.seek (0,0)
55         except:
56                 sys.stderr.write ("can't open file: %s\n" % f)
57                 return ''
58         s = i.read (n)
59         if len (s) <= 0:
60                 sys.stderr.write ("gulped empty file: %s\n" % f)
61         i.close ()
62         return s
63
64 def help ():
65         sys.stdout.write (r"""Usage: add-html-footer [OPTION]... HTML-FILE
66 Add header, footer and top of ChangLog file (up to the ********) to HTML-FILE
67
68 Options:
69   --changelog=FILE          use FILE as ChangeLog [ChangeLog]
70   --footer=FILE             use FILE as footer
71   --header=FILE             use FILE as header
72   -h, --help                print this help
73   --index=URL               set homepage to URL
74   --name=NAME               set package_name to NAME
75   --version=VERSION         set package version to VERSION
76 """)
77         sys.exit (0)
78
79 (options, files) = getopt.getopt(sys.argv[1:], 'h', [
80         'changelog=', 'footer=', 'header=', 'help', 'index=',
81         'name=', 'version=']) 
82
83 for opt in options:
84         o = opt[0]
85         a = opt[1]
86         if o == '--changelog':
87                 changelog_file = a
88         elif o == '--footer':
89                 footer_file = a
90         elif o == '--header':
91                 header_file = a
92         elif o == '-h' or o == '--help':
93                 help ()
94         # urg, this is top!
95         elif o == '--index':
96                 index_url = a
97         elif o == '--name':
98                 package_name = a
99         elif o == '--version':
100                 package_version = a
101         else:
102                 raise 'unknown opt ', o
103
104 #burp?
105 def set_gcos ():
106         global gcos
107         os.environ["CONFIGSUFFIX"] = 'www';
108         if os.name == 'nt':
109                 import ntpwd
110                 pw = ntpwd.getpwname(os.environ['USERNAME'])
111         else:
112                 import pwd
113                 if os.environ.has_key('FAKEROOTKEY'):
114                         pw = pwd.getpwnam (os.environ['LOGNAME'])
115                 else:
116                         pw = pwd.getpwuid (os.getuid())
117
118         f = pw[4]
119         f = string.split (f, ',')[0]
120         gcos = f 
121
122 def compose (default, file):
123         s = default
124         if file:
125                 s = gulp_file (file)
126         return s
127
128 set_gcos ()
129 localtime = time.strftime ('%c %Z', time.localtime (time.time ()))
130
131 if os.path.basename (index_url) != "index.html":
132         index_url = os.path.join (index_url , "index.html")
133 top_url = os.path.dirname (index_url) + "/"
134
135 header = compose (default_header, header_file)
136 footer = compose (default_footer, footer_file) + built
137 header_tag = '<!-- header_tag -->'
138 footer_tag = '<!-- footer_tag -->'
139
140 # Python < 1.5.2 compatibility
141 #
142 # On most platforms, this is equivalent to
143 #`normpath(join(os.getcwd()), PATH)'.  *Added in Python version 1.5.2*
144 if os.path.__dict__.has_key ('abspath'):
145         abspath = os.path.abspath
146 else:
147         def abspath (path):
148                 return os.path.normpath (os.path.join (os.getcwd (), path))
149
150
151 def remove_self_ref (s):        
152         self_url = abspath (os.getcwd () + '/' + f)
153         #sys.stderr.write ('url0: %s\n' % self_url)
154         self_url = re.sub ('.*' + string.lower (package_name) + '[^/]*/',
155                          '', self_url)
156         #sys.stderr.write ('url1: %s\n' % self_url)
157         
158         #urg, ugly lily-specific toplevel index hack
159         self_url = re.sub ('.*topdocs/out-www/index.html', 'index.html', self_url)
160         #sys.stderr.write ('url2: %s\n' % self_url)
161
162         m = re.match ('.*?(<a href="[\./]*' + self_url + '#?[^"]*">)([^<]*)(</a>)',
163                       s, re.DOTALL)
164         while m:
165                 #sys.stderr.write ('self: %s\n' % m.group (2))
166                 s = s[:m.start (1)] + m.group (2) + s[m.end (3):]
167                 m = re.match ('.*?(<a href="[\./]*' + self_url + '#?[^"]*">)([^<]*)(</a>)',
168                               s, re.DOTALL)
169         return s
170
171 def do_file (f):
172         s = gulp_file (f)
173
174         if changelog_file:
175                 changes = gulp_file (changelog_file)
176                 # urg?
177                 #m = re.search ('^\\\\*\\\\*', changes)
178                 m = re.search (r'\*\*\*', changes)
179                 if m:
180                         changes = changes[:m.start (0)]
181                 s = re.sub ('top_of_ChangeLog', '<pre>\n'+ changes  + '\n</pre>\n', s)
182
183         if re.search (header_tag, s) == None:
184                 body = '<BODY BGCOLOR=WHITE TEXT=BLACK>'
185                 s = re.sub ('(?i)<body>', body, s)
186                 if re.search ('(?i)<BODY', s):
187                         s = re.sub ('(?i)<body[^>]*>', body + header, s, 1)
188                 elif re.search ('(?i)<html', s):                
189                         s = re.sub ('(?i)<html>', '<HTML>' + header, s, 1)
190                 else:
191                         s = header + s
192
193                 s = header_tag + '\n' + s
194
195                 if re.search ('(?i)<!DOCTYPE', s) == None:
196                         doctype = '<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">\n'
197                         s = doctype + s
198
199         if re.search (footer_tag, s) == None:
200                 s = s + footer_tag + '\n'
201
202                 if re.search ('(?i)</body', s):
203                         s = re.sub ('(?i)</body>', footer + '</BODY>', s, 1)
204                 elif re.search ('(?i)</html', s):               
205                         s = re.sub ('(?i)</html>', footer + '</HTML>', s, 1)
206                 else:
207                         s = s + footer
208
209         #URUGRGOUSNGUOUNRIU
210         index = index_url
211         top = top_url
212         if os.path.basename (f) == "index.html":
213                 cwd = os.getcwd ()
214                 if os.path.basename (cwd) == "topdocs":
215                         index = "index.html"
216                         top = ""
217
218                 # don't cause ///////index.html entries in log files.
219                 #       index = "./index.html"
220                 #       top = "./"
221
222         s = re.sub ('@INDEX@', index, s)
223         s = re.sub ('@TOP@', top, s)
224         s = re.sub ('@PACKAGE_NAME@', package_name, s)
225         s = re.sub ('@PACKAGE_VERSION@', package_version, s)
226         s = re.sub ('@WEBMASTER@', webmaster, s)
227         s = re.sub ('@GCOS@', gcos, s)
228         s = re.sub ('@LOCALTIME@', localtime, s)
229         s = re.sub ('@MAIL_ADDRESS@', mail_address, s)
230
231         m = re.match ('.*?<!-- (@[a-zA-Z0-9_-]*@)=(.*?) -->', s, re.DOTALL)
232         while m:
233                 at_var = m.group (1)
234                 at_val = m.group (2)
235                 #sys.stderr.write ('at: %s -> %s\n' % (at_var, at_val))
236                 s = re.sub (at_var, at_val, s)
237                 m = re.match ('.*?<!-- (@[a-zA-Z0-9_-]*@)=(.*?) -->', s, re.DOTALL)
238
239         # urg
240         # maybe find first node?
241         fallback_web_title = '-- --'
242         m = re.match ('.*?<title>\(.*?\)</title>', s, re.DOTALL)
243         if m:
244                 fallback_web_title = m.group (1)
245         s = re.sub ('@WEB-TITLE@', fallback_web_title, s)
246         
247         s = remove_self_ref (s)
248
249         open (f, 'w').write (s)
250
251
252 for f in files:
253         do_file (f)
254