contrib: rename scripts

FossilOrigin-Name: d35a756a5d603ac894873aeb0a30826cb4b3fe9e257ecf21298225e07f517ddd

1 files changed, 13 insertions, 0 deletions

diff --git a/contrib/cpt-cat b/contrib/cpt-cat
new file mode 100755
index 0000000..7f21760
--- /dev/null
+++ b/contrib/cpt-cat
@@ -0,0 +1,13 @@
+#!/bin/sh -e
+# Concatanate package files in the installed package database
+# File names are printed to stderr.
+case "$1" in ''|--help|-h) printf '\033[1;33m-> \033[musage: %s [pkg] [file...]\n' "${0##*/}" ; exit 0; esac
+
+kiss l "${pkg:=$1}" >/dev/null ; shift
+
+for file in ${*:-build depends sources version} ; do
+    [ -f "/var/db/kiss/installed/$pkg/$file" ] && {
+        printf '\033[1m%s:\033[m\n' "$file" >&2
+        cat "/var/db/kiss/installed/$pkg/$file"
+    }
+done