Scripts for collecting data on Gnucomo clients.

[gnucomo.git] / scripts / package-debian

diff --git a/scripts/package-debian b/scripts/package-debian
new file mode 100755 (executable)
index 0000000..445de50
--- /dev/null
+++ b/scripts/package-debian
@@ -0,0 +1,39 @@
+#!/bin/sh
+#
+# Gnucomo package parameter report.
+#
+# Create a list of packages and patches on a Debian Linux system
+# that can be read by the Gnucomo input program, gcm_input.
+# 
+
+
+HOST=`hostname --fqdn`
+TIME=`date`
+
+echo "<?xml version='1.0'?>"
+echo "<gcmt:message xmlns:gcmt='http://gnucomo.org/transport/'>"
+echo "  <gcmt:header>"
+echo "      <gcmt:messagetype>package list</gcmt:messagetype>"
+echo "      <gcmt:hostname>$HOST</gcmt:hostname>"
+echo "      <gcmt:time>$TIME</gcmt:time>"
+echo "   </gcmt:header>"
+echo "   <gcmt:data>"
+
+echo "   <gcmt:parameters gcmt:class='package'>"
+
+COLUMNS=180
+export COLUMNS
+
+dpkg -l | grep '^ii' | sed -e 's/&/&amp;/' | while read FLAGS PACKAGE VERSION DESCRIPTION
+do
+      echo "<gcmt:parameter name='$PACKAGE'>"
+      echo "   <gcmt:description>$DESCRIPTION</gcmt:description>"
+      echo "   <gcmt:property name='version'>$VERSION</gcmt:property>"
+      echo "</gcmt:parameter>"
+done
+
+
+echo "    </gcmt:parameters>"
+echo "   </gcmt:data>"
+echo "</gcmt:message>"
+