src

sauce
got clone ssh://anon@src.dalliard.ch/src
log | files | refs

commit 1d284483254b06d4b687b6ad23c89aa37c86fc58
parent 26089bd447a7a80d144be5c2669d8ed8ba0c33e9
author: nathanael <nathanael@dalliard.ch>
date:   Sat, 18 Oct 2025 21:59:14 +0000

s2: rm hp

diffstat:
Ds2/dotfiles/bin/hp | 58----------------------------------------------------------
1 file changed, 0 insertions(+), 58 deletions(-)

diff --git a/s2/dotfiles/bin/hp b/s2/dotfiles/bin/hp @@ -1,58 +0,0 @@ -#!/bin/sh -e - -delay=3660 - -main() { - test -z "$2" && { echo "usage: ${0##*/} url string log"; exit 1; } - url="$1" - string="$2" - log="$3" - - if up - then was_up || say 'up' - else - was_down && has_been_for_long && say 'still down' - was_down || say 'down' - fi - -} - -up() { - ftp -MVo - "$url" 2>/dev/null| grep -Eq "$string" -} - -was_up() { - test -f "$log" && - tail -n 1 "$log" | - grep -qE 'up$' -} - -was_down() { - test -f "$log" && - tail -n 1 "$log" | - grep -qE 'down$' -} - -has_been_for_long() { - last=$(tail -n 1 "$log" | cut -f1 -d' ') - now=$(date +%s) - test "$((now - last))" -gt $delay -} - -say() { - test -f "$log" && - tail -n 1 "$log" >&2 - message "$1" >&2 - log "$1" -} - -log() { - message "$1" >> "$log" - exit 0 -} - -message() { - printf '%s %s is %s\n' "$(date '+%s %F %T' )" "$url" "$1" -} - -main "$@"