[T16199] Adds a verify-packages script
authorMoritz Angermann <moritz.angermann@gmail.com>
Sun, 20 Jan 2019 10:24:21 +0000 (05:24 -0500)
committerMarge Bot <ben+marge-bot@smart-cactus.org>
Sun, 20 Jan 2019 10:24:21 +0000 (05:24 -0500)
utils/verify-release/verify-packages.sh [new file with mode: 0755]

diff --git a/utils/verify-release/verify-packages.sh b/utils/verify-release/verify-packages.sh
new file mode 100755 (executable)
index 0000000..d5c6bf1
--- /dev/null
@@ -0,0 +1,20 @@
+#!/bin/bash
+#
+# This script will verify that the packages in ghc,
+# correspond to packages on hackage.
+rm -fR ghc-packages hackage-packages package-diffs
+mkdir -p ghc-packages hackage-packages package-diffs
+# We'll skip Cabal and tarballs, while looking only at packages in libraries
+# that we reference as gitmodules.
+for lib in $(git submodule status|grep libraries|grep -v tarballs|grep -v Cabal|awk -F\  '{ print $2 }'); do
+    (cd $lib && cabal new-sdist -o ../../ghc-packages);
+done
+
+for pkg in $(cd ghc-packages && ls *.tar.gz); do
+    PKG=${pkg%%.tar.gz}
+    (cd hackage-packages && cabal get --pristine ${PKG})
+    (cd hackage-packages/${PKG} && git init && git add . && git commit -q -m "hackage packages" && rm -fR *)
+    (cd hackage-packages && tar xzf ../ghc-packages/$pkg)
+    (cd hackage-packages/${PKG} && git -c core.fileMode=false diff > ../$PKG.patch)
+done
+find hackage-packages -name "*.patch" -not -empty -type f -print -exec false {} +