From 3504cff5369a1d22fecd91ef897a4972ac2f0fe3 Mon Sep 17 00:00:00 2001
From: Santiago Garcia Mantinan <manty@debian.org>
Date: Sun, 9 May 2004 23:12:24 +0000
Subject: [PATCH] Make fast_sums ignore md5sums of files not in the pool
 directory.

---
 debian/changelog |  2 ++
 tools/fast_sums  | 12 ++++++------
 2 files changed, 8 insertions(+), 6 deletions(-)

diff --git a/debian/changelog b/debian/changelog
index 543aa732..c5bf13b2 100644
--- a/debian/changelog
+++ b/debian/changelog
@@ -60,6 +60,8 @@ debian-cd (2.2.18) UNRELEASED; urgency=low
     - Add support for booting 2.6 as well as 2.4 to the first i386 cd.
     - Add dirty temporal workaround for saving space on netinst images.
       This should be fixed in a proper way when time permits.
+    - Make fast_sums ignore md5sums of files not in the pool directory.
+      Closes: #247889
   * Bdale Garbee
     - shorten the command line in post-boot-hppa for sarge, as palo can't
       handle a command line longer than 127 chars right now
diff --git a/tools/fast_sums b/tools/fast_sums
index f2ac49f6..70dbf8ef 100755
--- a/tools/fast_sums
+++ b/tools/fast_sums
@@ -12,7 +12,8 @@
 use strict;
 use Digest::MD5;
 
-# load up all the md5sums we need
+# We load the md5sums of all the files in the pool dir, we don't want to use
+# the others because the files on the cds can be different (like README.html)
 my %md5 ;
 my $BDIR = shift @ARGV ;
 
@@ -20,12 +21,11 @@ foreach my $sumsfile ($BDIR . "/indices/md5sums", $BDIR . "/indices-non-US/md5su
   if (open(MD5SUMS, $sumsfile)) {
     while (<MD5SUMS>) {
       chomp;
-      next if /Packages/ ;
-      next if /Sources/ ;
-      next if /Release/ ;
       my ( $sum, $name ) = split(' ') ;
-      # printf "[%s] [%s]\n", $sum, $name ;
-      $md5{$name} = $sum ;
+      if ($name =~ /^pool/) {
+        # printf "[%s] [%s]\n", $sum, $name ;
+        $md5{$name} = $sum ;
+      }
     }
     close(MD5SUMS);
   } else {