[X2Go-Commits] [maintenancescripts] 01/01: killstalevms.bash: don't store cmdline in temporary variable (might drop NULL characters).

[git-admin at x2go.org]

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

x2go pushed a commit to branch master
in repository maintenancescripts.

commit 5129eb5d8f97611b81593b41d8dd9202ff70ab83
Author: Mihai Moldovan <ionic at ionic.de>
Date:   Thu Feb 12 00:25:46 2015 +0100

    killstalevms.bash: don't store cmdline in temporary variable (might drop NULL characters).
---
 killstalevms.bash |   14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/killstalevms.bash b/killstalevms.bash
index 5e40e4a..63b36de 100644
--- a/killstalevms.bash
+++ b/killstalevms.bash
@@ -20,11 +20,11 @@ done
 typeset -a COMPONENT_LIST BRANCH_LIST SYSTEM_LIST SYSTEM_VERSION_LIST ARCH_LIST VERSION_LIST
 
 for ((i = 0; i < ${#BUILDER_LIST[@]}; ++i)); do
-  TMP_CMDLINE="$(< /proc/${BUILDER_LIST[$i]}/cmdline)"
-  BRANCH_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/(.*?)/.*#\1#' <<< "${TMP_CMDLINE}")"
-  COMPONENT_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/(.*?)/.*#\1#' <<< "${TMP_CMDLINE}")"
-  SYSTEM_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/(.*?)/.*#\1#' <<< "${TMP_CMDLINE}")"
-  SYSTEM_VERSION_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/.*?/(.*?)/.*#\1#' <<< "${TMP_CMDLINE}")"
-  ARCH_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/.*?/.*?/(.*?)\0.*#\1#' <<< "${TMP_CMDLINE}")"
-  VERSION_LIST[$i]="$(perl -pe \"s#.*?${COMPONENT_LIST}_([\d.]+)-.*#\1#\" <<< "${TMP_CMDLINE}")"
+  TMP_CMDLINE="/proc/${BUILDER_LIST[$i]}/cmdline"
+  BRANCH_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/(.*?)/.*#\1#' "${TMP_CMDLINE}")"
+  COMPONENT_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/(.*?)/.*#\1#' "${TMP_CMDLINE}")"
+  SYSTEM_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/(.*?)/.*#\1#' "${TMP_CMDLINE}")"
+  SYSTEM_VERSION_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/.*?/(.*?)/.*#\1#' "${TMP_CMDLINE}")"
+  ARCH_LIST[$i]="$(perl -pe 's#.*?/pkg-dist/.*?/.*?/.*?/.*?/(.*?)\0.*#\1#' "${TMP_CMDLINE}")"
+  VERSION_LIST[$i]="$(perl -pe "s#.*?${COMPONENT_LIST}_([\d.]+)-.*#\1#" <<< "${TMP_CMDLINE}")"
 done

--
Alioth's /srv/git/_hooks_/post-receive-email on /srv/git/code.x2go.org/maintenancescripts.git