[Reproducible-commits] [misc] 01/03: Drop sort-logs - we have a better framework these days

Chris Lamb lamby at moszumanska.debian.org
Thu Jul 9 14:14:29 UTC 2015


This is an automated email from the git hooks/post-receive script.

lamby pushed a commit to branch master
in repository misc.

commit e82437d80243807c248de3e226f0d8f2f97772b3
Author: Chris Lamb <lamby at debian.org>
Date:   Thu Jul 9 15:10:48 2015 +0100

    Drop sort-logs - we have a better framework these days
---
 sort-logs/README              |  11 ---
 sort-logs/get-popcon.sh       |   5 --
 sort-logs/get-reproducible.sh |   7 --
 sort-logs/get-sources.rb      |  10 ---
 sort-logs/guess-why.rb        | 197 ------------------------------------------
 5 files changed, 230 deletions(-)

diff --git a/sort-logs/README b/sort-logs/README
deleted file mode 100644
index 79f4f9c..0000000
--- a/sort-logs/README
+++ /dev/null
@@ -1,11 +0,0 @@
-Tools to sort the massive rebuild of 2014-01-26
-===============================================
-
-./get-sources.rb ../../logs-20140126 > sources
-
-./get-popcon.sh sources
-
-./get-reproducible ../../logs-20140126 > reproducible
-./get-popcon.sh reproducible
-
-./guess-why.rb ../../logs-20140126/9mount_1.3-10_unstable_build.diffp
diff --git a/sort-logs/get-popcon.sh b/sort-logs/get-popcon.sh
deleted file mode 100755
index d844003..0000000
--- a/sort-logs/get-popcon.sh
+++ /dev/null
@@ -1,5 +0,0 @@
-#!/bin/sh
-
-scp "$1" ullmann.debian.org:sources
-ssh ullmann.debian.org './get-popcon.rb < sources | sort -n -k2 -r | column -t > popcon-insts'
-scp ullmann.debian.org:popcon-insts "$1.popcon-insts"
diff --git a/sort-logs/get-reproducible.sh b/sort-logs/get-reproducible.sh
deleted file mode 100755
index 39fcc3e..0000000
--- a/sort-logs/get-reproducible.sh
+++ /dev/null
@@ -1,7 +0,0 @@
-#!/bin/sh
-
-LOG_DIR="$1"
-
-(
-echo "||'''Source''' ||'''Tested version''' ||'''Time''' ||'''Build path''' ||'''Hostname''' ||'''Username''' ||'''Uname'''||'''Filesystem''' ||"
-find "$LOG_DIR" -maxdepth 1 -type f -name '*.diffp' -print0 | xargs -0 grep --files-without-match '^-' | sed -E 's/^.*\/([^_]+)_([^_]+).*$/||DebianPts:\1 ||\2 || {*} || {*} || {o} || {o} || {o} || {o} ||/' | sort ) | column -t
diff --git a/sort-logs/get-sources.rb b/sort-logs/get-sources.rb
deleted file mode 100755
index 52dc584..0000000
--- a/sort-logs/get-sources.rb
+++ /dev/null
@@ -1,10 +0,0 @@
-#!/usr/bin/ruby
-#
-# -*- coding: utf-8 -*-
-
-LOG_DIR = ARGV[0]
-
-sources = Dir.glob("#{LOG_DIR}/*.diffp").each do |log|
-  # zoneminder_1.26.5-2_unstable_build.diffp → zoneminder
-  puts log.gsub(/\A.*\/([^_]+)_.*\z/, '\1')
-end
diff --git a/sort-logs/guess-why.rb b/sort-logs/guess-why.rb
deleted file mode 100755
index 127135b..0000000
--- a/sort-logs/guess-why.rb
+++ /dev/null
@@ -1,197 +0,0 @@
-#!/usr/bin/ruby
-
-SPECIFIC = <<END_OF_SPECIFIC.split("\n").collect { |l| l.gsub(/ .*/, '') }
-aft # aft-compiler
-ardour # mo files
-auto-07p # varying .o
-babelfish # same content different order in entry_points.txt
-castle-game-engine # fpunits.cfg
-colord # icc profiles
-gcl # multiple things, it's a LISP compiler
-gdbm # .a issue
-geoclue # encode buildpath in example makefile
-graphviz # pdfs in doc
-gtkdataboxmm # encode build path in example
-hershey-fonts # .a issue
-quickfix # encode build path in examples
-gnutls26 # weird binaries
-goffice # .a issues
-hdf-eos4 # encode build path in examples
-ikarus # weird binary ikarus.boot
-lacheck # encode timestamp in README.Debian
-libphone-ui-shr # mo files
-libterm-readline-zoid-perl # encode build path
-libterm-size-perl-perl # timestamp in ./usr/share/perl5/Term/Size/Perl/Params.pm
-libunwind # .a issues
-miaviewit # .a issues
-microbiomeutil # data file
-nagios-plugins # weird binaries
-netxx # timestamp in file autogerated genconfig
-papyrus # .a issues
-pear-channels # php registry shit
-plinth # timestamp in generated file
-pppconfig # .mo files
-probabel # pdf file
-retext # png files
-xscreensaver # weird binaries
-skycat # encode build path in shell scripts
-tcl8.6-tdbc # encode build path in config script
-ui-auto # timestamp in manpages
-vit # timestamp in main script
-xen # .a issues
-END_OF_SPECIFIC
-
-FALSE_NEGATIVE = <<END_OF_FALSE_NEGATIVE.split("\n").collect { |l| l.gsub(/ .*/, '') }
-ekiga # libnss changed in between the builds
-mate-desktop # different version for libglib2.0-0
-rlvm # libglib2.0-0 changed
-x42-plugins # libglib2.0-0 changed
-END_OF_FALSE_NEGATIVE
-
-require 'set'
-
-diffp = File.read(ARGV[0])
-source = ARGV[0].gsub(/\A.*\/([^_]+)_.*\z/, '\1')
-
-print "#{source}: "
-
-if diffp !~ /^-/ || FALSE_NEGATIVE.include?(source)
-  puts 'reproducible'
-  exit 0
-end
-
-reasons = Set.new
-
-if SPECIFIC.include?(source)
-  reasons << 'specific'
-end
-
-lines = diffp.lines
-i = 0
-loop do
-  break if i > 1000
-  line = lines.next.strip
-  i += 1
-
-  if line =~ /\ABinary file .*\.jar differ\z/
-    reasons << 'jar-file'
-  end
-
-  if line =~ /\A-    Build ID:/
-    reasons << 'build-id-mismatch'
-    lines.next
-  end
-
-  if line =~ /\A-    <.*>   DW_.* : \(indirect string, offset:/
-    reasons << 'do-not-use-dpkg-buildflags'
-  end
-
-  if line =~ /\A-    <.*>   DW_AT_.* : [^(]*\/.*/
-    reasons << 'debugedit-not-run-or-failed'
-  end
-
-  if line =~ /\A-(.*)gzip compressed data(, was ".*", from Unix, last modified: )([^,]+)(,?.*)\z/
-    before = $1; filename = $2; last_modified = $3; after = $4
-    other = lines.next.strip
-    if other =~ /\A\+(.*)gzip compressed data(, was ".*", from Unix, last modified: )([^,]+)(,?.*)\z/
-      if before == $1 && filename == $2 && after == $4
-        if last_modified != $3
-          reasons << 'gzip-timestamp'
-        end
-      end
-    end
-  end
-
-  if line =~ /\A----- .*\.html\z/
-    reasons << 'html-mismatch'
-  end
-
-  if line =~ /\A----- .\/usr\/share\/php\/.registry\//
-    reasons << 'php-registry'
-  end
-
-  if line =~ /\ABinary file .*\.zip differ\z/
-    reasons << 'zip-file'
-  end
-
-  if line =~ /\A----- .\/usr\/lib\/.*\.dll\z/
-    reasons << 'mono'
-  end
-
-  if line =~ /\ABinary file .\/usr\/share\/doc\/kde\/.*\/index.cache.bz2 differ\z/
-    reasons << 'kde-doc-index'
-  end
-
-  if line =~ /\A-Depends: (.*)\z/
-    deps = $1.split(',').collect { |d| d.strip }.sort
-    other = lines.next.strip
-    if other =~ /\A\+Depends: (.*)\z/
-      other_deps = $1.split(',').collect { |d| d.strip }.sort
-      if deps == other_deps
-        reasons << 'same-depends-different-order'
-      end
-    end
-  end
-
-  if line =~ /\A-.*created by instant \/ docbook-to-man/
-    reasons << 'docbook-to-man-timestamp'
-  end
-
-  if line =~ /\A-.*Generated from file .* by tcllib\/doctools/
-    reasons << 'tcllib-doctool-build-path'
-  end
-
-  if line =~ /\ABinary file .\/usr\/lib\/erlang\/.*\.beam differ\z/
-    reasons << 'erlang'
-  end
-
-  if line =~ /\ABinary file .*\.[ot]tf differ\z/
-    reasons << 'fonts'
-  end
-
-  if line =~ /\ABinary file .\/usr\/lib\/girepository-1.0\/.*\.typelib differ\z/
-    reasons << 'gir-typelib'
-  end
-
-  if line =~ /\A-[^ ]*  libghc-.*-prof_.*\.deb\z/
-    reasons << 'haskell-prof'
-  end
-
-  if line =~ /\A-[^ ]*  libghc-.*-dev_.*\.deb\z/
-    reasons << 'haskell-dev'
-  end
-
-  if line =~ /\ABinary file .\/usr\/share\/man\/man.*pm.gz differ\z/
-    reasons << 'perl-manpage'
-  end
-
-  if line =~ /\A----- .\/usr\/share\/perl5\/.*\/ConfigData\.pm\z/
-    reasons << 'perl-configdata'
-  end
-
-  if line =~ /\ABinary file .*\.oct differ\z/
-    reasons << 'octave'
-  end
-
-  if line =~ /\A----- .\/var\/lib\/ocaml\/md5sums\/.*\.md5sums\z/
-    reasons << 'ocaml-md5sums'
-  end
-
-  if line =~ /\A----- .*\.pd_linux\z/
-    reasons << 'puredata'
-  end
-
-  if line =~ /\ABinary file .\/usr\/lib\/R\/site-library\/.*\.rds differ\z/
-    reasons << 'r-rds'
-  end
-
-  if line =~ /\A----- .\/usr\/share\/doc\/.*\/created.rid\z/
-    reasons << 'rdoc-timestamp'
-  end
-end
-
-if reasons.empty?
-  puts 'unknown'
-else
-  puts reasons.to_a.join(' ')
-end

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/reproducible/misc.git



More information about the Reproducible-commits mailing list