bin/wanna-build: keep binNMU info in case package is rebuilt for an binnmu

[wannabuild.git] / bin / wb-edos-builddebcheck

diff --git a/bin/wb-edos-builddebcheck b/bin/wb-edos-builddebcheck
index 0cec41ceae960ee882ff61420803b80d2be2d953..0562a95d3be189c47a308239a15a0dbbaea22f79 100755 (executable)
--- a/bin/wb-edos-builddebcheck
+++ b/bin/wb-edos-builddebcheck
@@ -12,7 +12,7 @@ $sourceprefix="source---";
 
 $architecture="";
 $binexplain=0;
-$edosoptions = "-failures -explain";
+$edosoptions = "-failures -explain -quiet";
 while ( $arg = shift @ARGV ) {
     if ( $arg eq '-a' || $arg eq '--architecture' ) {
        if ($#ARGV == -1) {
@@ -43,6 +43,8 @@ if ($debug) {
     print "Edos options: $edosoptions\n";
 }
 
+# check that all stanzas in the binary package file have the same
+# architecture.
 $packagearch="";
 open(P,$packagefile);
 while (<P>) {
@@ -71,22 +73,18 @@ if ( $architecture eq "" ) {
     }
 }
 
-open(RESULT,"add-sources.py ".
-     "--prefix \"$sourceprefix\" < $packagefile $sourcesfile $architecture ".
-     "| edos-debcheck $edosoptions|");
+open(RESULT,"cat $sourcesfile".
+     "| edos-debcheck $edosoptions '-base FILE' $packagefile |");
 
 $sourcestanza=0;
 $explanation="";
 $binpackage="";
 
 while (<RESULT>) {
-    if (/^The following constraints cannot be satisfied:/) {
-       next
-    } elsif (/^\s+/) {
+    if (/^\s+/) {
        if ($sourcestanza) {
-           s/^(\s*)$sourceprefix(.*)(depends on|conflicts with)/$1$2build-$3/o;
-           s/&gt;/>/;
-           s/&lt;/</;
+           s/^(\s*)$sourceprefix(.*)depends on/$1$2build-depends on/o;
+           s/^(\s*)$sourceprefix(.*) and (.*) conflict/$1$2 build-conflicts with $3/o;
            print;
            if (/depends on ([^\s]*) .*\{.*\}/) {
                push(@binqueue,$1);
@@ -95,7 +93,7 @@ while (<RESULT>) {
            $explanation .= $_;
        }
     } else {
-       if ($sourcestanza) {
+       if ($sourcestanza) {
            print "\n";
            $sourcestanza=0;
        }