# vim: ft=sh

function _systemctl () {

    test -n "$1" || return

    eval $(systemctl show $1 | egrep '^(ExecMainStatus|Result|ActiveState|SubState|Type)=')

    if test -n "$Type"; then

           test $ExecMainStatus -eq 0 \

        && test $Result = 'success' \

        && test $ActiveState = 'active' \

        && [[ ( $Type =~ ^(simple|forking|notify)$ && $SubState = 'running' ) || ( $Type = 'oneshot' && $SubState = 'exited' ) ]] \

        || echo "état du service anormal"

    else

        echo "service $1 inexistant"

    fi

}

function sys_state () {

    local failed_units=

    eval $(systemctl show | egrep '^(SystemState|NFailedUnits)=')

    if test $SystemState != "running" -o $NFailedUnits -ne 0; then

        echo "$SystemState mode ($NFailedUnits units failed):"

        echo "$(systemctl --failed --no-legend | awk '

            {

                split($1, units, ".")

                failed[units[2]][units[1]]=1

                numfailed[units[2]]++

            }

            END {

                for (ut in failed) { 

                    print ut

                    for (un in failed[ut]) {

                        last = --numfailed[ut] == 0 ? 1 : 0

                        print last ? "└─" : "├─", un

                    }

                }

            }')"

    fi

}

function restart_needed () {

    _turn 24 || return

    needrestart -m a -r l -bkl | awk -F': ' '{

        if ($1 == "NEEDRESTART-SVC")

            needrestart[gensub("NEEDRESTART-", "", "1", $1)][gensub(".service", "", "1", $2)]++

        else

            needrestart[gensub("NEEDRESTART-", "", "1", $1)] = $2

        }

        END {

            if (needrestart["KSTA"] > 1

            && gensub("-v[78]\\+$", "", "1", needrestart["KCUR"]) != gensub("-v[78]\\+$", "", "1", needrestart["KEXP"])) {

                print "kernel:"

                print needrestart["KCUR"] " -> " needrestart["KEXP"]

            }

            if (length(needrestart["SVC"])) {

                print "services:"

                for (svc in needrestart["SVC"])

                    print "- " svc

            }

        }'

}

function autotest () {

    local testfile=/dev/shm/monitoring.autotest

    test -e $testfile && echo "it works" && rm -f $testfile

}

function swap () {

    _turn 24 || return

    awk '/^\//{if ($1 !~ "zram") { p=$4/$3*100; if (p > 10) printf("%s (%.1f%%)\n", $1, p)}}' /proc/swaps

}

function certificates () {

    _turn 24 || return

    for domain in /etc/letsencrypt/live/*.*; do

        local notAfter="$(openssl x509 -enddate -noout -in $domain/fullchain.pem)"

        local enddate=$(date +%s -d"${notAfter#*=}")

        local delay=$(date +%_j -d@$(($enddate - $now)))

        if test $delay -lt 10; then

            echo "${domain##*/} expire dans $delay jours"

        fi

    done

}

function load_avg () {

    local procs=$(grep -c "^processor" /proc/cpuinfo)

    local load=($(</proc/loadavg))

    local avg=(1 5 15)

    for ((i=0; i<${#avg[@]}; i++)); do

        test ${load[i]%.*} -ge $procs && echo "charge moyenne à ${avg[i]}min = ${load[i]}"

    done

}

function upgrades () {

    local log="/var/log/unattended-upgrades/unattended-upgrades.log"

    test -r $log || return

    local lastline=$(tail -1 $log)

    local lastentry=$(date +%s -d "$(cut -f1,2 -d' ' <<< $lastline)")

    test -n "$lastentry" || return

    local status=$(cut -f3 -d' ' <<< $lastline)

    test $(($lastentry + 86400)) -lt $now && echo "pas de mise à jour depuis le ${lastline%% *}"

}