diff options
author | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-05-16 23:23:37 +0100 |
---|---|---|
committer | Ian Jackson <ijackson@chiark.greenend.org.uk> | 2015-05-31 11:54:12 +0100 |
commit | 9eb0e2a413a683eed5993523f5baedf00fa73467 (patch) | |
tree | b3da9bb01703fec7845c6323ef633d5ddc51e11a /infra/dgit-repos-policy-debian | |
parent | ca52f4f5f98de5f94128a75a4ae9079fa725e803 (diff) |
dgit-repos-policy-debian: Fix taint overrides sql (and print it out for debugging)
Diffstat (limited to 'infra/dgit-repos-policy-debian')
-rwxr-xr-x | infra/dgit-repos-policy-debian | 7 |
1 files changed, 5 insertions, 2 deletions
diff --git a/infra/dgit-repos-policy-debian b/infra/dgit-repos-policy-debian index 1e32d39..88759f7 100755 --- a/infra/dgit-repos-policy-debian +++ b/infra/dgit-repos-policy-debian @@ -302,10 +302,11 @@ END my ($taintinfoq,$overridesanyq,$untaintq,$overridesq); my $overridesstmt = <<END; - SELECT deliberately FROM taintoverrides WHERE ( 1 + SELECT deliberately FROM taintoverrides WHERE ( + 1=0 END my @overridesv = sort keys %deliberately; - $overridesstmt .= join '', (<<END x @overridesv); + $overridesstmt .= <<END foreach @overridesv; OR deliberately = ? END $overridesstmt .= <<END; @@ -351,6 +352,8 @@ Taint recorded$timeshow for $pkgshow Reason: $ti->{comment} END + printdebug "SQL overrides: @overridesv $taintid /\n$overridesstmt\n"; + $overridesq ||= $poldbh->prepare($overridesstmt); $overridesq->execute(@overridesv, $taintid); my ($ovwhy) = $overridesq->fetchrow_array(); |