Initial version.

[dak.git] / andrea

diff --git a/andrea b/andrea
new file mode 100755 (executable)
index 0000000..618188a
--- /dev/null
+++ b/andrea
@@ -0,0 +1,94 @@
+#!/usr/bin/env python
+
+# Check for fixable discrepancies between stable and unstable
+# Copyright (C) 2000  James Troup <james@nocrew.org>
+# $Id: andrea,v 1.1 2001-02-12 03:29:52 troup Exp $
+
+# This program is free software; you can redistribute it and/or modify
+# it under the terms of the GNU General Public License as published by
+# the Free Software Foundation; either version 2 of the License, or
+# (at your option) any later version.
+
+# This program is distributed in the hope that it will be useful,
+# but WITHOUT ANY WARRANTY; without even the implied warranty of
+# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+# GNU General Public License for more details.
+
+# You should have received a copy of the GNU General Public License
+# along with this program; if not, write to the Free Software
+# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
+
+
+################################################################################
+
+import pg, sys
+import utils, db_access
+import apt_pkg;
+
+################################################################################
+
+Cnf = None;
+projectB = None;
+
+################################################################################
+
+def main ():
+    global Cnf, projectB;
+
+    apt_pkg.init();
+    
+    Cnf = apt_pkg.newConfiguration();
+    apt_pkg.ReadConfigFileISC(Cnf,utils.which_conf_file());
+
+    Arguments = [('D',"debug","Catherine::Options::Debug", "IntVal"),
+                 ('h',"help","Catherine::Options::Help"),
+                 ('V',"version","Catherine::Options::Version")]
+
+    apt_pkg.ParseCommandLine(Cnf,Arguments,sys.argv);
+
+    projectB = pg.connect('projectb', 'localhost');
+    db_access.init(Cnf, projectB);
+
+    src_suite = "stable";
+    dst_suite = "unstable";
+
+    src_suite_id = db_access.get_suite_id(src_suite);
+    dst_suite_id = db_access.get_suite_id(dst_suite);
+    arch_all_id = db_access.get_architecture_id("all");
+    dsc_type_id = db_access.get_override_type_id("dsc");
+
+    for arch in Cnf.SubTree("Suite::%s::Architectures" % (src_suite)).List():
+        if arch == "source":
+            continue;
+
+        # Arch: all doesn't work; consider packages which go from
+        # arch: all to arch: any, e.g. debconf... needs more checks
+        # and thought later.
+
+        if arch == "all":
+            continue;
+        arch_id = db_access.get_architecture_id(arch);
+        q = projectB.query("""
+SELECT b_src.package, b_src.version AS stable_version
+  FROM binaries b_src, bin_associations ba, override o 
+  WHERE ba.bin = b_src.id AND ba.suite = %s AND b_src.architecture = %s
+        AND o.package = b_src.package AND o.suite = %s AND o.type != %s AND NOT EXISTS 
+    (SELECT b_dst.id FROM bin_associations ba2, binaries b_dst 
+       WHERE ba2.bin = b_dst.id AND b_dst.package = b_src.package 
+             AND (b_dst.architecture = %s OR b_dst.architecture = %s) 
+             AND ba2.suite = %s AND EXISTS 
+               (SELECT b2.id FROM bin_associations ba3, binaries b2 
+                  WHERE ba3.bin = b2.id AND ba3.suite = %s AND b2.package = b_dst.package))
+ORDER BY b_src.package;"""
+                           % (src_suite_id, arch_id, dst_suite_id, dsc_type_id, arch_id, arch_all_id, dst_suite_id, dst_suite_id));
+        print
+        print arch
+        print "======"
+        print q
+        
+
+#######################################################################################
+
+if __name__ == '__main__':
+    main()
+