3 files changed, 65 insertions, 0 deletions
diff --git a/scripts/check-hafas-urls b/scripts/check-hafas-urls
new file mode 100755
index 0000000..9c77e37
--- /dev/null
+++ b/scripts/check-hafas-urls
@@ -0,0 +1,20 @@
+#!/usr/bin/env zsh
+
+export PERL5LIB=lib
+
+checks="DB Berlin Jannowitzbrücke
+NAHSH Flensburg Solitüde
+NASA Wernigerode Hbf
+NVV Kassel Hbf
+ÖBB Wien Praterstern
+RSAG Rostock Hbf
+VBB Berlin Jannowitzbrücke
+VBN Diepholz"
+
+echo $checks | while read service stop; do
+        echo -n "${service} ... "
+        if bin/hafas-m -s $service $stop > /dev/null; then
+                echo OK
+        fi
+done
+
diff --git a/scripts/makedeb-docker b/scripts/makedeb-docker
new file mode 100755
index 0000000..6c06971
--- /dev/null
+++ b/scripts/makedeb-docker
@@ -0,0 +1,11 @@
+#!/bin/sh
+
+mkdir -p out
+
+docker run --rm -v "${PWD}:/orig:ro" -v "${PWD}/scripts:/scripts:ro" \
+	-v "${PWD}/out:/out" -e USER=$(id -u) -e GROUP=$(id -g) \
+	-e "DEBEMAIL=${DEBEMAIL}" -e "DEBFULLNAME=${DEBFULLNAME}" \
+	-e "LOGNAME=${LOGNAME}" -e "VERSION=$(git describe --dirty)-1" \
+	debian:buster /scripts/makedeb-docker-helper
+
+echo "Debian package has been written to $(pwd)/out"
diff --git a/scripts/makedeb-docker-helper b/scripts/makedeb-docker-helper
new file mode 100755
index 0000000..970a9a0
--- /dev/null
+++ b/scripts/makedeb-docker-helper
@@ -0,0 +1,34 @@
+#!/bin/sh
+
+set -e
+
+export DEBIAN_FRONTEND=noninteractive
+export APT_LISTCHANGES_FRONTEND=none
+
+apt-get update
+apt-get -y install \
+	apt-file dh-make-perl libmodule-build-perl \
+	libclass-accessor-perl libdatetime-perl libdatetime-format-strptime-perl \
+	liblwp-protocol-https-perl libjson-perl libjson-xs-perl \
+	liblist-moreutils-perl \
+	libwww-perl libxml-libxml-perl \
+	libtest-compile-perl libtest-pod-perl \
+	libtest-simple-perl
+
+apt-file update
+apt-cache dumpavail | dpkg --merge-avail
+
+mkdir -p /src/app
+cp -a /orig/Build.PL /orig/Changelog /orig/README /src/app
+cp -a /orig/bin /orig/lib /orig/t /src/app
+cd /src/app
+
+sed -i 's/sign *=> *1/sign => 0/' Build.PL
+perl Build.PL
+perl Build
+perl Build manifest
+perl Build dist
+mv Travel-Status-DE-DeutscheBahn-*.tar.gz ../app.tar.gz
+dh-make-perl --build --version "${VERSION}"
+chown ${USER}:${GROUP} ../*.deb
+mv -v ../*.deb /out