4 Script to automate some parts of checking NEW packages
6 @contact: Debian FTP Master <ftpmaster@debian.org>
7 @copyright: 2000, 2001, 2002, 2003, 2006 James Troup <james@nocrew.org>
8 @copyright: 2009 Joerg Jaspert <joerg@debian.org>
9 @license: GNU General Public License version 2 or later
12 # This program is free software; you can redistribute it and/or modify
13 # it under the terms of the GNU General Public License as published by
14 # the Free Software Foundation; either version 2 of the License, or
15 # (at your option) any later version.
17 # This program is distributed in the hope that it will be useful,
18 # but WITHOUT ANY WARRANTY; without even the implied warranty of
19 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
20 # GNU General Public License for more details.
22 # You should have received a copy of the GNU General Public License
23 # along with this program; if not, write to the Free Software
24 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
26 ################################################################################
28 # <Omnic> elmo wrote docs?!!?!?!?!?!?!
29 # <aj> as if he wasn't scary enough before!!
30 # * aj imagines a little red furry toy sitting hunched over a computer
31 # tapping furiously and giggling to himself
32 # <aj> eventually he stops, and his heads slowly spins around and you
33 # see this really evil grin and then he sees you, and picks up a
34 # knife from beside the keyboard and throws it at you, and as you
35 # breathe your last breath, he starts giggling again
36 # <aj> but i should be telling this to my psychiatrist, not you guys,
39 ################################################################################
47 import apt_pkg, apt_inst
48 from daklib import database
49 from daklib import utils
50 from daklib.regexes import html_escaping, re_html_escaping, re_version, re_spacestrip, \
51 re_contrib, re_nonfree, re_localhost, re_newlinespace, \
52 re_package, re_doc_directory
54 ################################################################################
59 Cnf = utils.get_conf()
60 projectB = pg.connect(Cnf["DB::Name"], Cnf["DB::Host"], int(Cnf["DB::Port"]))
61 database.init(Cnf, projectB)
63 printed_copyrights = {}
65 # default is to not output html.
68 ################################################################################
70 def usage (exit_code=0):
71 print """Usage: dak examine-package [PACKAGE]...
74 -h, --help show this help and exit
75 -H, --html-output output html page with inspection result
76 -f, --file-name filename for the html page
78 PACKAGE can be a .changes, .dsc, .deb or .udeb filename."""
82 ################################################################################
83 # probably xml.sax.saxutils would work as well
85 def escape_if_needed(s):
87 return re_html_escaping.sub(lambda x: html_escaping.get(x.group(0)), s)
91 def headline(s, level=2, bodyelement=None):
95 <tr><th colspan="2" class="title" onclick="toggle('%(bodyelement)s', 'table-row-group', 'table-row-group')">%(title)s <span class="toggle-msg">(click to toggle)</span></th></tr>
96 </thead>"""%{"bodyelement":bodyelement,"title":utils.html_escape(s)}
98 print "<h%d>%s</h%d>" % (level, utils.html_escape(s), level)
100 print "---- %s ----" % (s)
102 # Colour definitions, 'end' isn't really for use
106 'contrib': "\033[33m",
107 'nonfree': "\033[31m",
111 'maintainer': "\033[32m"}
114 'main': ('<span style="color: aqua">',"</span>"),
115 'contrib': ('<span style="color: yellow">',"</span>"),
116 'nonfree': ('<span style="color: red">',"</span>"),
117 'arch': ('<span style="color: green">',"</span>"),
118 'bold': ('<span style="font-weight: bold">',"</span>"),
119 'maintainer': ('<span style="color: green">',"</span>")}
121 def colour_output(s, colour):
123 return ("%s%s%s" % (html_colours[colour][0], utils.html_escape(s), html_colours[colour][1]))
125 return ("%s%s%s" % (ansi_colours[colour], s, ansi_colours['end']))
127 def escaped_text(s, strip=False):
131 return "<pre>%s</pre>" % (s)
135 def formatted_text(s, strip=False):
139 return "<pre>%s</pre>" % (utils.html_escape(s))
145 return """<tr><td>"""+s+"""</td></tr>"""
149 def format_field(k,v):
151 return """<tr><td class="key">%s:</td><td class="val">%s</td></tr>"""%(k,v)
153 return "%s: %s"%(k,v)
155 def foldable_output(title, elementnameprefix, content, norow=False):
156 d = {'elementnameprefix':elementnameprefix}
158 print """<div id="%(elementnameprefix)s-wrap"><a name="%(elementnameprefix)s" />
159 <table class="infobox rfc822">"""%d
160 headline(title, bodyelement="%(elementnameprefix)s-body"%d)
162 print """ <tbody id="%(elementnameprefix)s-body" class="infobody">"""%d
166 print output_row(content)
168 print """</tbody></table></div>"""
170 ################################################################################
172 def get_depends_parts(depend) :
173 v_match = re_version.match(depend)
175 d_parts = { 'name' : v_match.group(1), 'version' : v_match.group(2) }
177 d_parts = { 'name' : depend , 'version' : '' }
180 def get_or_list(depend) :
181 or_list = depend.split("|")
184 def get_comma_list(depend) :
185 dep_list = depend.split(",")
188 def split_depends (d_str) :
189 # creates a list of lists of dictionaries of depends (package,version relation)
191 d_str = re_spacestrip.sub('',d_str)
193 # first split depends string up amongs comma delimiter
194 dep_list = get_comma_list(d_str)
196 while d < len(dep_list):
197 # put depends into their own list
198 depends_tree.append([dep_list[d]])
201 while d < len(depends_tree):
203 # split up Or'd depends into a multi-item list
204 depends_tree[d] = get_or_list(depends_tree[d][0])
205 while k < len(depends_tree[d]):
206 # split depends into {package, version relation}
207 depends_tree[d][k] = get_depends_parts(depends_tree[d][k])
212 def read_control (filename):
219 deb_file = utils.open_file(filename)
221 extracts = apt_inst.debExtractControl(deb_file)
222 control = apt_pkg.ParseSection(extracts)
224 print formatted_text("can't parse control info")
230 control_keys = control.keys()
232 if control.has_key("Depends"):
233 depends_str = control.Find("Depends")
234 # create list of dependancy lists
235 depends = split_depends(depends_str)
237 if control.has_key("Recommends"):
238 recommends_str = control.Find("Recommends")
239 recommends = split_depends(recommends_str)
241 if control.has_key("Section"):
242 section_str = control.Find("Section")
244 c_match = re_contrib.search(section_str)
245 nf_match = re_nonfree.search(section_str)
248 section = colour_output(section_str, 'contrib')
251 section = colour_output(section_str, 'nonfree')
254 section = colour_output(section_str, 'main')
255 if control.has_key("Architecture"):
256 arch_str = control.Find("Architecture")
257 arch = colour_output(arch_str, 'arch')
259 if control.has_key("Maintainer"):
260 maintainer = control.Find("Maintainer")
261 localhost = re_localhost.search(maintainer)
264 maintainer = colour_output(maintainer, 'maintainer')
266 maintainer = escape_if_needed(maintainer)
268 return (control, control_keys, section, depends, recommends, arch, maintainer)
270 def read_changes_or_dsc (suite, filename):
273 dsc_file = utils.open_file(filename)
275 dsc = utils.parse_changes(filename)
277 return formatted_text("can't parse .dsc control info")
280 filecontents = strip_pgp_signature(filename)
282 for l in filecontents.split('\n'):
283 m = re.match(r'([-a-zA-Z0-9]*):', l)
285 keysinorder.append(m.group(1))
288 if k in ("build-depends","build-depends-indep"):
289 dsc[k] = create_depends_string(suite, split_depends(dsc[k]))
290 elif k == "architecture":
291 if (dsc["architecture"] != "any"):
292 dsc['architecture'] = colour_output(dsc["architecture"], 'arch')
293 elif k in ("files","changes","description"):
295 dsc[k] = formatted_text(dsc[k], strip=True)
297 dsc[k] = ('\n'+'\n'.join(map(lambda x: ' '+x, dsc[k].split('\n')))).rstrip()
299 dsc[k] = escape_if_needed(dsc[k])
301 keysinorder = filter(lambda x: not x.lower().startswith('checksums-'), keysinorder)
303 filecontents = '\n'.join(map(lambda x: format_field(x,dsc[x.lower()]), keysinorder))+'\n'
306 def create_depends_string (suite, depends_tree):
308 if suite == 'experimental':
309 suite_where = " in ('experimental','unstable')"
311 suite_where = " ='%s'" % suite
314 for l in depends_tree:
315 if (comma_count >= 2):
321 # doesn't do version lookup yet.
323 q = projectB.query("SELECT DISTINCT(b.package), b.version, c.name, su.suite_name FROM binaries b, files fi, location l, component c, bin_associations ba, suite su WHERE b.package='%s' AND b.file = fi.id AND fi.location = l.id AND l.component = c.id AND ba.bin=b.id AND ba.suite = su.id AND su.suite_name %s ORDER BY b.version desc" % (d['name'], suite_where))
329 if d['version'] != '' :
330 adepends += " (%s)" % (d['version'])
332 if i[2] == "contrib":
333 result += colour_output(adepends, "contrib")
334 elif i[2] == "non-free":
335 result += colour_output(adepends, "nonfree")
337 result += colour_output(adepends, "main")
340 if d['version'] != '' :
341 adepends += " (%s)" % (d['version'])
342 result += colour_output(adepends, "bold")
347 def output_deb_info(suite, filename, packagename):
348 (control, control_keys, section, depends, recommends, arch, maintainer) = read_control(filename)
351 return formatted_text("no control info")
353 for key in control_keys :
355 field_value = create_depends_string(suite, depends)
356 elif key == 'Recommends':
357 field_value = create_depends_string(suite, recommends)
358 elif key == 'Section':
359 field_value = section
360 elif key == 'Architecture':
362 elif key == 'Maintainer':
363 field_value = maintainer
364 elif key == 'Description':
366 field_value = formatted_text(control.Find(key), strip=True)
368 desc = control.Find(key)
369 desc = re_newlinespace.sub('\n ', desc)
370 field_value = escape_if_needed(desc)
372 field_value = escape_if_needed(control.Find(key))
373 to_print += " "+format_field(key,field_value)+'\n'
376 def do_command (command, filename, escaped=0):
377 o = os.popen("%s %s" % (command, filename))
379 return escaped_text(o.read())
381 return formatted_text(o.read())
383 def do_lintian (filename):
385 return do_command("lintian --show-overrides --color html", filename, 1)
387 return do_command("lintian --show-overrides --color always", filename, 1)
389 def get_copyright (deb_filename):
390 package = re_package.sub(r'\1', deb_filename)
391 o = os.popen("dpkg-deb -c %s | egrep 'usr(/share)?/doc/[^/]*/copyright' | awk '{print $6}' | head -n 1" % (deb_filename))
392 cright = o.read()[:-1]
395 return formatted_text("WARNING: No copyright found, please check package manually.")
397 doc_directory = re_doc_directory.sub(r'\1', cright)
398 if package != doc_directory:
399 return formatted_text("WARNING: wrong doc directory (expected %s, got %s)." % (package, doc_directory))
401 o = os.popen("dpkg-deb --fsys-tarfile %s | tar xvOf - %s 2>/dev/null" % (deb_filename, cright))
403 copyrightmd5 = md5.md5(cright).hexdigest()
406 if printed_copyrights.has_key(copyrightmd5) and printed_copyrights[copyrightmd5] != "%s (%s)" % (package, deb_filename):
407 res += formatted_text( "NOTE: Copyright is the same as %s.\n\n" % \
408 (printed_copyrights[copyrightmd5]))
410 printed_copyrights[copyrightmd5] = "%s (%s)" % (package, deb_filename)
411 return res+formatted_text(cright)
413 def check_dsc (suite, dsc_filename):
414 (dsc) = read_changes_or_dsc(suite, dsc_filename)
415 foldable_output(dsc_filename, "dsc", dsc, norow=True)
416 foldable_output("lintian check for %s" % dsc_filename, "source-lintian", do_lintian(dsc_filename))
418 def check_deb (suite, deb_filename):
419 filename = os.path.basename(deb_filename)
420 packagename = filename.split('_')[0]
422 if filename.endswith(".udeb"):
428 foldable_output("control file for %s" % (filename), "binary-%s-control"%packagename,
429 output_deb_info(suite, deb_filename, packagename), norow=True)
432 foldable_output("skipping lintian check for udeb", "binary-%s-lintian"%packagename,
435 foldable_output("lintian check for %s" % (filename), "binary-%s-lintian"%packagename,
436 do_lintian(deb_filename))
438 foldable_output("contents of %s" % (filename), "binary-%s-contents"%packagename,
439 do_command("dpkg -c", deb_filename))
442 foldable_output("skipping copyright for udeb", "binary-%s-copyright"%packagename,
445 foldable_output("copyright of %s" % (filename), "binary-%s-copyright"%packagename,
446 get_copyright(deb_filename))
448 foldable_output("file listing of %s" % (filename), "binary-%s-file-listing"%packagename,
449 do_command("ls -l", deb_filename))
451 # Read a file, strip the signature and return the modified contents as
453 def strip_pgp_signature (filename):
454 inputfile = utils.open_file (filename)
458 for line in inputfile.readlines():
466 if line.startswith("-----BEGIN PGP SIGNED MESSAGE"):
469 if line.startswith("-----BEGIN PGP SIGNATURE"):
472 if line.startswith("-----END PGP SIGNATURE"):
479 def display_changes(suite, changes_filename):
480 changes = read_changes_or_dsc(suite, changes_filename)
481 foldable_output(changes_filename, "changes", changes, norow=True)
483 def check_changes (changes_filename):
485 changes = utils.parse_changes (changes_filename)
486 except ChangesUnicodeError:
487 utils.warn("Encoding problem with changes file %s" % (changes_filename))
488 display_changes(changes['distribution'], changes_filename)
490 files = utils.build_file_list(changes)
491 for f in files.keys():
492 if f.endswith(".deb") or f.endswith(".udeb"):
493 check_deb(changes['distribution'], f)
494 if f.endswith(".dsc"):
495 check_dsc(changes['distribution'], f)
499 global Cnf, projectB, db_files, waste, excluded
501 # Cnf = utils.get_conf()
503 Arguments = [('h',"help","Examine-Package::Options::Help"),
504 ('H',"html-output","Examine-Package::Options::Html-Output"),
506 for i in [ "Help", "Html-Output", "partial-html" ]:
507 if not Cnf.has_key("Examine-Package::Options::%s" % (i)):
508 Cnf["Examine-Package::Options::%s" % (i)] = ""
510 args = apt_pkg.ParseCommandLine(Cnf,Arguments,sys.argv)
511 Options = Cnf.SubTree("Examine-Package::Options")
516 stdout_fd = sys.stdout
520 if not Options["Html-Output"]:
521 # Pipe output for each argument through less
522 less_fd = os.popen("less -R -", 'w', 0)
523 # -R added to display raw control chars for colour
526 if f.endswith(".changes"):
528 elif f.endswith(".deb") or f.endswith(".udeb"):
529 # default to unstable when we don't have a .changes file
530 # perhaps this should be a command line option?
531 check_deb('unstable', file)
532 elif f.endswith(".dsc"):
533 check_dsc('unstable', f)
535 utils.fubar("Unrecognised file type: '%s'." % (f))
537 if not Options["Html-Output"]:
538 # Reset stdout here so future less invocations aren't FUBAR
540 sys.stdout = stdout_fd
542 if errno.errorcode[e.errno] == 'EPIPE':
543 utils.warn("[examine-package] Caught EPIPE; skipping.")
547 except KeyboardInterrupt:
548 utils.warn("[examine-package] Caught C-c; skipping.")
551 #######################################################################################
553 if __name__ == '__main__':