3 # General purpose package removal tool for ftpmaster
4 # Copyright (C) 2000, 2001 James Troup <james@nocrew.org>
5 # $Id: melanie,v 1.22 2002-02-12 22:14:38 troup Exp $
7 # This program is free software; you can redistribute it and/or modify
8 # it under the terms of the GNU General Public License as published by
9 # the Free Software Foundation; either version 2 of the License, or
10 # (at your option) any later version.
12 # This program is distributed in the hope that it will be useful,
13 # but WITHOUT ANY WARRANTY; without even the implied warranty of
14 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
15 # GNU General Public License for more details.
17 # You should have received a copy of the GNU General Public License
18 # along with this program; if not, write to the Free Software
19 # Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA
21 ################################################################################
23 # o OpenBSD team wants to get changes incorporated into IPF. Darren no
25 # o Ask again -> No respond. Darren coder supreme.
26 # o OpenBSD decide to make changes, but only in OpenBSD source
27 # tree. Darren hears, gets angry! Decides: "LICENSE NO ALLOW!"
29 # o OpenBSD team decide to switch to different packet filter under BSD
30 # license. Because Project Goal: Every user should be able to make
31 # changes to source tree. IPF license bad!!
32 # o Darren try get back: says, NetBSD, FreeBSD allowed! MUAHAHAHAH!!!
33 # o Theo say: no care, pf much better than ipf!
34 # o Darren changes mind: changes license. But OpenBSD will not change
35 # back to ipf. Darren even much more bitter.
36 # o Darren so bitterbitter. Decides: I'LL GET BACK BY FORKING OPENBSD AND
37 # RELEASING MY OWN VERSION. HEHEHEHEHE.
39 # http://slashdot.org/comments.pl?sid=26697&cid=2883271
41 ################################################################################
43 import commands, os, pg, re, string, sys, tempfile
44 import utils, db_access
45 import apt_pkg, apt_inst;
47 ################################################################################
49 re_strip_source_version = re.compile (r'\s+.*$');
51 ################################################################################
56 ################################################################################
58 def usage (exit_code=0):
59 print """Usage: melanie [OPTIONS] PACKAGE[...]
60 Remove PACKAGE(s) from suite(s).
62 -a, --architecture=ARCH only act on this architecture
63 -b, --binary remove binaries only
64 -c, --component=COMPONENT act on this component
65 -C, --carbon-copy=EMAIL send a CC of removal message to EMAIL
66 -d, --done=BUG# send removal message as closure to bug#
67 -m, --reason=MSG reason for removal
68 -n, --no-action don't do anything
69 -p, --partial don't affect override files
70 -s, --suite=SUITE act on this suite
71 -S, --source-only remove source only
72 -h, --help show this help and exit
74 ARCH, BUG#, COMPONENT and SUITE can be space seperated lists, e.g.
75 --architecture=\"m68k i386\""""
79 ################################################################################
81 # "That's just fucking great! Game over, man! What the fuck are we
85 print "Continue (y/N)? ",
86 answer = string.lower(utils.our_raw_input());
91 ################################################################################
96 Cnf = utils.get_conf()
98 Arguments = [('h',"help","Melanie::Options::Help"),
99 ('a',"architecture","Melanie::Options::Architecture", "HasArg"),
100 ('b',"binary", "Melanie::Options::Binary-Only"),
101 ('c',"component", "Melanie::Options::Component", "HasArg"),
102 ('C',"carbon-copy", "Melanie::Options::Carbon-Copy", "HasArg"), # Bugs to Cc
103 ('d',"done","Melanie::Options::Done", "HasArg"), # Bugs fixed
104 ('m',"reason", "Melanie::Options::Reason", "HasArg"), # Hysterical raisins; -m is old-dinstall option for rejection reason
105 ('n',"no-action","Melanie::Options::No-Action"),
106 ('p',"partial", "Melanie::Options::Partial"),
107 ('s',"suite","Melanie::Options::Suite", "HasArg"),
108 ('S',"source-only", "Melanie::Options::Source-Only"),
111 for i in ["help", "architecture", "binary-only", "component", "carbon-copy", "done", "reason", "no-action", "partial", "source-only" ]:
112 if not Cnf.has_key("Melanie::Options::%s" % (i)):
113 Cnf["Melanie::Options::%s" % (i)] = "";
114 if not Cnf.has_key("Melanie::Options::Suite"):
115 Cnf["Melanie::Options::Suite"] = "unstable";
117 arguments = apt_pkg.ParseCommandLine(Cnf,Arguments,sys.argv);
118 Options = Cnf.SubTree("Melanie::Options")
123 projectB = pg.connect(Cnf["DB::Name"], Cnf["DB::Host"], int(Cnf["DB::Port"]));
124 db_access.init(Cnf, projectB);
126 # Sanity check options
128 utils.fubar("need at least one package name as an argument.");
129 if Options["Architecture"] and Options["Source-Only"]:
130 utils.fubar("can't use -a/--architecutre and -S/--source-only options simultaneously.");
131 if Options["Binary-Only"] and Options["Source-Only"]:
132 utils.fubar("can't use -b/--binary-only and -S/--source-only options simultaneously.");
133 if Options.has_key("Carbon-Copy") and not Options.has_key("Done"):
134 utils.fubar("can't use -C/--carbon-copy without also using -d/--done option.");
135 if Options["Architecture"] and not Options["Partial"]:
136 utils.warn("-a/--architecture implies -p/--partial.");
137 Options["Partial"] = "true";
139 # Process -C/--carbon-copy
141 # Accept 3 types of arguments (space separated):
142 # 1) a number - assumed to be a bug number, i.e. nnnnn@bugs.debian.org
143 # 2) the keyword 'package' - cc's $package@packages.debian.org for every argument
144 # 3) contains a '@' - assumed to be an email address, used unmofidied
147 for copy_to in string.split(Options.get("Carbon-Copy")):
148 if utils.str_isnum(copy_to):
149 carbon_copy.append(copy_to + "@" + Cnf["Dinstall::BugServer"]);
150 elif copy_to == 'package':
151 for package in arguments:
152 carbon_copy.append(package + "@" + Cnf["Dinstall::PackagesServer"]);
153 if Cnf.has_key("Dinstall::TrackingServer"):
154 carbon_copy.append(package + "@" + Cnf["Dinstall::TrackingServer"]);
156 carbon_copy.append(copy_to);
158 utils.fubar("Invalid -C/--carbon-copy argument '%s'; not a bug number, 'package' or email address." % (copy_to));
161 if Options["Binary-Only"]:
165 quoted_packages_list = []
166 for package in arguments:
167 quoted_packages_list.append("'%s'" % package)
168 packages[package] = "";
169 con_packages = "AND %s IN (%s)" % (field, string.join(quoted_packages_list, ", "));
172 for suite in string.split(Options["Suite"]):
174 if not Options["No-Action"] and suite == "stable":
175 print "**WARNING** About to remove from the stable suite!"
176 print "This should only be done just prior to a (point) release and not at"
177 print "any other time."
179 elif not Options["No-Action"] and suite == "testing":
180 print "**WARNING About to remove from the testing suite!"
181 print "There's no need to do this normally as removals from unstable will"
182 print "propogate to testing automagically."
185 suite_id = db_access.get_suite_id(suite);
187 utils.warn("suite '%s' not recognised." % (suite));
189 suites.append(suite);
190 suite_ids_list.append(suite_id);
192 suites_list = string.join(suites, ", ")
193 con_suites = "AND su.id IN (%s)" % string.join(map(str, suite_ids_list), ", ");
195 utils.fubar("No correct suite given.");
196 if Options["Component"]:
197 components_ids_list = [];
198 for component in string.split(Options["Component"]):
199 component_id = db_access.get_component_id(component);
200 if component_id == -1:
201 utils.warn("component '%s' not recognised." % (component));
203 components_ids_list.append(component_id);
204 con_components = "AND c.id IN (%s)" % string.join(map(str, components_ids_list), ", ");
205 over_con_components = "AND component IN (%s)" % string.join(map(str, components_ids_list), ", ");
208 over_con_components = "";
210 if Options["Architecture"]:
212 for architecture in string.split(Options["Architecture"]):
213 architecture_id = db_access.get_architecture_id(architecture);
214 if architecture_id == -1:
215 utils.warn("architecture '%s' not recognised." % (architecture));
217 arch_ids_list.append(architecture_id);
219 con_architectures = "AND a.id IN (%s)" % string.join(map(str, arch_ids_list), ", ");
221 utils.fubar("No correct architecture given");
223 con_architectures = "";
231 # We have 3 modes of package selection: binary-only, source-only
232 # and source+binary. The first two are trivial and obvious; the
233 # latter is a nasty mess, but very nice from a UI perspective so
234 # we try to support it.
236 if Options["Binary-Only"]:
238 q = projectB.query("SELECT b.package, b.version, a.arch_string, b.id, b.maintainer FROM binaries b, bin_associations ba, architecture a, suite su, files f, location l, component c WHERE ba.bin = b.id AND ba.suite = su.id AND b.architecture = a.id AND b.file = f.id AND f.location = l.id AND l.component = c.id %s %s %s %s" % (con_packages, con_suites, con_components, con_architectures));
239 for i in q.getresult():
243 source_packages = {};
244 q = projectB.query("SELECT l.path, f.filename, s.source, s.version, 'source', s.id, s.maintainer FROM source s, src_associations sa, suite su, files f, location l, component c WHERE sa.source = s.id AND sa.suite = su.id AND s.file = f.id AND f.location = l.id AND l.component = c.id %s %s %s" % (con_packages, con_suites, con_components));
245 for i in q.getresult():
246 source_packages[i[2]] = i[:2];
247 to_remove.append(i[2:]);
248 if not Options["Source-Only"]:
250 binary_packages = {};
251 # First get a list of binary package names we suspect are linked to the source
252 q = projectB.query("SELECT DISTINCT package FROM binaries WHERE EXISTS (SELECT s.source, s.version, l.path, f.filename FROM source s, src_associations sa, suite su, files f, location l, component c WHERE binaries.source = s.id AND sa.source = s.id AND sa.suite = su.id AND s.file = f.id AND f.location = l.id AND l.component = c.id %s %s %s)" % (con_packages, con_suites, con_components));
253 for i in q.getresult():
254 binary_packages[i[0]] = "";
255 # Then parse each .dsc that we found earlier to see what binary packages it thinks it produces
256 for i in source_packages.keys():
257 filename = string.join(source_packages[i], '/');
259 dsc = utils.parse_changes(filename, 0);
260 except utils.cant_open_exc:
261 utils.warn("couldn't open '%s'." % (filename));
263 for package in string.split(dsc.get("binary"), ','):
264 package = string.strip(package);
265 binary_packages[package] = "";
266 # Then for each binary package: find any version in
267 # unstable, check the Source: field in the deb matches our
268 # source package and if so add it to the list of packages
270 for package in binary_packages.keys():
271 q = projectB.query("SELECT l.path, f.filename, b.package, b.version, a.arch_string, b.id, b.maintainer FROM binaries b, bin_associations ba, architecture a, suite su, files f, location l, component c WHERE ba.bin = b.id AND ba.suite = su.id AND b.architecture = a.id AND b.file = f.id AND f.location = l.id AND l.component = c.id %s %s %s AND b.package = '%s'" % (con_suites, con_components, con_architectures, package));
272 for i in q.getresult():
273 filename = string.join(i[:2], '/');
274 control = apt_pkg.ParseSection(apt_inst.debExtractControl(utils.open_file(filename)))
275 source = control.Find("Source", control.Find("Package"));
276 source = re_strip_source_version.sub('', source);
277 if source_packages.has_key(source):
278 to_remove.append(i[2:]);
281 # If we don't have a reason; spawn an editor so the user can add one
282 # Write the rejection email out as the <foo>.reason file
283 if not Options["Reason"] and not Options["No-Action"]:
284 temp_filename = tempfile.mktemp();
285 fd = os.open(temp_filename, os.O_RDWR|os.O_CREAT|os.O_EXCL, 0700);
287 editor = os.environ.get("EDITOR","vi")
288 result = os.system("%s %s" % (editor, temp_filename))
290 utils.fubar ("vi invocation failed for `%s'!" % (temp_filename), result)
291 file = utils.open_file(temp_filename);
292 for line in file.readlines():
293 Options["Reason"] = Options["Reason"] + line;
294 os.unlink(temp_filename);
296 # Generate the summary of what's to be removed
303 maintainers[maintainer] = "";
304 if not d.has_key(package):
306 if not d[package].has_key(version):
307 d[package][version] = [];
308 if architecture not in d[package][version]:
309 d[package][version].append(architecture);
311 maintainer_list = [];
312 for maintainer_id in maintainers.keys():
313 maintainer_list.append(db_access.get_maintainer(maintainer_id));
317 for package in packages:
318 versions = d[package].keys();
320 for version in versions:
321 summary = summary + "%10s | %10s | %s\n" % (package, version, string.join(d[package][version], ", "));
322 print "Will remove the following packages from %s:" % (suites_list);
325 print "Maintainer: %s" % string.join(maintainer_list, ", ")
327 print "Will also close bugs: "+Options["Done"];
329 print "Will also send CCs to:" + string.join(carbon_copy, ", ")
331 print "------------------- Reason -------------------"
332 print Options["Reason"];
333 print "----------------------------------------------"
336 # If -n/--no-action, drop out here
337 if Options["No-Action"]:
342 whoami = utils.whoami();
343 date = commands.getoutput('date -R');
345 # Log first; if it all falls apart I want a record that we at least tried.
346 logfile = utils.open_file(Cnf["Melanie::LogFile"], 'a');
347 logfile.write("=========================================================================\n");
348 logfile.write("[Date: %s] [ftpmaster: %s]\n" % (date, whoami));
349 logfile.write("Removed the following packages from %s:\n\n%s" % (suites_list, summary));
351 logfile.write("Closed bugs: %s\n" % (Options["Done"]));
352 logfile.write("\n------------------- Reason -------------------\n%s\n" % (Options["Reason"]));
353 logfile.write("----------------------------------------------\n");
356 dsc_type_id = db_access.get_override_type_id('dsc');
357 deb_type_id = db_access.get_override_type_id('deb');
359 # Do the actual deletion
362 projectB.query("BEGIN WORK");
367 for suite_id in suite_ids_list:
368 if architecture == "source":
369 projectB.query("DELETE FROM src_associations WHERE source = %s AND suite = %s" % (package_id, suite_id));
370 #print "DELETE FROM src_associations WHERE source = %s AND suite = %s" % (package_id, suite_id);
372 projectB.query("DELETE FROM bin_associations WHERE bin = %s AND suite = %s" % (package_id, suite_id));
373 #print "DELETE FROM bin_associations WHERE bin = %s AND suite = %s" % (package_id, suite_id);
374 # Delete from the override file
375 if not Options["Partial"]:
376 if architecture == "source":
377 type_id = dsc_type_id;
379 type_id = deb_type_id;
380 projectB.query("DELETE FROM override WHERE package = '%s' AND type = %s AND suite = %s %s" % (package, type_id, suite_id, over_con_components));
381 projectB.query("COMMIT WORK");
384 # Send the bug closing messages
387 Subst["__MELANIE_ADDRESS__"] = Cnf["Melanie::MyEmailAddress"];
388 Subst["__BUG_SERVER__"] = Cnf["Dinstall::BugServer"];
390 if Cnf.Find("Dinstall::Bcc") != "":
391 bcc.append(Cnf["Dinstall::Bcc"]);
392 if Cnf.Find("Melanie::Bcc") != "":
393 bcc.append(Cnf["Melanie::Bcc"]);
395 Subst["__BCC__"] = "Bcc: " + string.join(bcc, ", ");
397 Subst["__BCC__"] = "X-Filler: 42";
398 Subst["__CC__"] = "X-Melanie: $Revision: 1.22 $";
400 Subst["__CC__"] = Subst["__CC__"] + "\nCc: " + string.join(carbon_copy, ", ");
401 Subst["__SUITE_LIST__"] = suites_list;
402 Subst["__SUMMARY__"] = summary;
403 Subst["__ADMIN_ADDRESS__"] = Cnf["Dinstall::MyAdminAddress"];
404 Subst["__DISTRO__"] = Cnf["Dinstall::MyDistribution"];
405 Subst["__WHOAMI__"] = whoami;
406 whereami = utils.where_am_i();
407 Archive = Cnf.SubTree("Archive::%s" % (whereami));
408 Subst["__MASTER_ARCHIVE__"] = Archive["OriginServer"];
409 Subst["__PRIMARY_MIRROR__"] = Archive["PrimaryMirror"];
410 for bug in string.split(Options["Done"]):
411 Subst["__BUG_NUMBER__"] = bug;
412 mail_message = utils.TemplateSubst(Subst,open(Cnf["Dir::TemplatesDir"]+"/melanie.bug-close","r").read());
413 utils.send_mail (mail_message, "")
415 logfile.write("=========================================================================\n");
418 #######################################################################################
420 if __name__ == '__main__':