From 4aba78da3d59d7f35ff10c799ab7d15b3ceba902 Mon Sep 17 00:00:00 2001
From: Laurent Mazet <laurent.mazet@thalesgroup.com>
Date: Fri, 28 Nov 2014 17:56:51 +0100
Subject: [PATCH] add some scripts

---
 master/root/bin/cpumon_lite  | 20 ++++++++++
 master/root/bin/monitor_cmd  | 70 ++++++++++++++++++++++++++++++++
 master/root/bin/monitor_proc | 77 ++++++++++++++++++++++++++++++++++++
 3 files changed, 167 insertions(+)
 create mode 100755 master/root/bin/cpumon_lite
 create mode 100755 master/root/bin/monitor_cmd
 create mode 100755 master/root/bin/monitor_proc

diff --git a/master/root/bin/cpumon_lite b/master/root/bin/cpumon_lite
new file mode 100755
index 0000000..d9919a4
--- /dev/null
+++ b/master/root/bin/cpumon_lite
@@ -0,0 +1,20 @@
+#!/bin/sh
+
+INSTALL_DIR=$(dirname $0)
+
+$INSTALL_DIR/monitor_proc -s /proc/stat
+while true; do
+	sleep 1
+	$INSTALL_DIR/monitor_proc /proc/stat | \
+		awk '
+BEGIN { printf "cpu:" }
+/cpu[0-9]/ {
+	idle=$5
+	sum=0; for (i=2;i<=NF;i++) sum+=$(i)
+	load=(sum-idle)*100/sum
+	tot+=load
+	if (not_first) not_first=1; else printf " +"
+    	printf " % 5.1f%%", load
+}
+END { printf " = % 6.1f%%\n", tot }'
+done
diff --git a/master/root/bin/monitor_cmd b/master/root/bin/monitor_cmd
new file mode 100755
index 0000000..9681684
--- /dev/null
+++ b/master/root/bin/monitor_cmd
@@ -0,0 +1,70 @@
+#!/bin/bash
+
+# default values
+PROGNAME=$(basename $0)
+FULLPROG=$0
+
+# usage
+function usage () {
+    echo "usage: $PROGNAME [-h] [-r] cmd"
+    echo " -h: help message"
+    echo " -s: set stats"
+    echo " -r: reset stats"
+    echo "cmd: shell command"
+}
+
+# reset
+function reset () {
+    echo "reseting stats"
+    [ -f $resource ] && rm $resource
+}
+
+# variables
+set=
+cmd=
+resource=$HOME/.$PROGNAME
+
+# parameter processing
+while [ $# -gt 0 ]; do
+    if [ "$cmd" ]; then
+        cmd="$cmd $1"
+    else
+        case "$1" in
+        -h) usage; exit 0;;
+        -s) set="yes";;
+        -r) reset; exit 0;;
+        *) cmd="$1";;
+        esac
+    fi
+    shift
+done
+
+# check arguments
+[ "$cmd" ] || { echo "no command specified"; exit 1; }
+[ "$(which ${cmd/ *})" ] || { echo "command not found '$cmd'"; exit 1; }
+ 
+# read old values
+[ -f $resource ] && source $resource
+
+# main
+var=$(echo _$cmd | sed 's/[^A-Za-z0-9]/_/g;s/__*/_/g')
+newvar=($(eval $cmd | awk '{ for (i = 1; i <= NF; i++) if ($(i) ~ /^[-+0-9][0-9]*$/) printf " %s", $(i) }'))
+eval oldvar=(\${$var[@]})
+
+# compute diff
+for ((i=0; i<${#newvar[@]}; i++)); do
+    [ "${oldvar[$i]}" ] && v[$i]=$((newvar[i] - oldvar[i])) || v[$i]=${newvar[$i]}
+done
+
+# ouput
+if [ "$set" = "yes" ]; then
+    echo "$var=(${newvar[@]})" >>$resource
+    awk -F= '{ a[$1]=$2 } END { for (i in a) print i "=" a[i] }' $resource > $resource.n
+    mv -f $resource.n $resource
+else
+    str=""
+    for ((i=0; i<${#v[@]}; i++)); do
+        str="$str; v[$i]=${v[$i]}"
+    done
+    eval $cmd | gawk 'BEGIN { k=0 '"$str"' } { n = 1; for (i=1; i<=NF; i++) if ($(i) ~ /^[-+0-9][0-9]*$/) { if ((i == 1) && ! ($0 ~ /^ /)) $(i) = v[k]; else $0 = gensub(/ [-+0-9][0-9]*/, " " v[k], n); k++; n++ } print }'
+fi
diff --git a/master/root/bin/monitor_proc b/master/root/bin/monitor_proc
new file mode 100755
index 0000000..c2b1ab7
--- /dev/null
+++ b/master/root/bin/monitor_proc
@@ -0,0 +1,77 @@
+#!/bin/bash
+
+# default values
+PROGNAME=$(basename $0)
+FULLPROG=$0
+
+# usage
+function usage () {
+    echo "usage: $PROGNAME [-h] [-r] file"
+    echo " -h: help message"
+    echo " -s: set stats"
+    echo " -r: reset stats"
+    echo " file: data to monitor"
+}
+
+# reset
+function reset () {
+    echo "reseting stats"
+    [ -f $resource ] && rm $resource
+}
+
+# variables
+set=
+files=
+resource=$HOME/.$PROGNAME
+
+# parameter processing
+while [ $# -gt 0 ]; do
+    case "$1" in
+    -h) usage; exit 0;;
+    -s) set="yes";;
+    -r) reset; exit 0;;
+    *) files="$files $1";;
+    esac
+    shift
+done
+
+# check arguments
+[ "$files" ] || { echo "no file specified"; exit 1; }
+
+# read old values
+[ -f $resource ] && source $resource
+
+for f in $files; do
+
+    # check file
+    f=$(echo $f | sed 's,//*,/,g')
+    [ -f $f ] || { echo "can't find file '$f'"; exit 1; }
+
+    # main
+    var=${f//\//_}
+    newvar=($(awk '{ for (i = 1; i <= NF; i++) if ($(i) ~ /^[-+0-9][0-9]*$/) printf " %s", $(i) }' $f))
+    eval oldvar=(\${$var[@]})
+
+    # compute diff
+    for ((i=0; i<${#newvar[@]}; i++)); do
+        [ "${oldvar[$i]}" ] && v[$i]=$((newvar[i] - oldvar[i])) || v[$i]=${newvar[$i]}
+    done
+
+    # ouput
+    if [ "$set" = "yes" ]; then
+        echo "$var=(${newvar[@]})" >>$resource
+    else
+        str=""
+        for ((i=0; i<${#v[@]}; i++)); do
+            str="$str; v[$i]=${v[$i]}"
+        done
+        awk 'BEGIN { k=0 '"$str"' } { for (i=1; i<=NF; i++) if ($(i) ~ /^[-+0-9][0-9]*$/) $(i)=v[k++]; print }' $f
+    fi
+
+done
+
+# clean resource file
+if [ "$set" = "yes" ]; then
+    awk -F= '{ a[$1]=$2 } END { for (i in a) print i "=" a[i] }' $resource > $resource.n
+    mv -f $resource.n $resource
+fi
\ No newline at end of file
-- 
2.30.2