aboutsummaryrefslogtreecommitdiff
path: root/bin/try.mi5
blob: ea39d7173553385d6a31831c0749df07e55be8b8 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
# Attempt a certain number of times to perform a task, buffer stderr unless and
# until all command attempts fail
self=try

# Parse options
while getopts 's:n:' opt ; do
    case $opt in
        n)
            attn=$OPTARG
            ;;
        s)
            sleep=$OPTARG
            ;;
        \?)
            printf >&2 '%s: Unknown option\n' "$self"
            exit 2
            ;;
    esac
done
shift "$((OPTIND-1))"

# Check we have at least one argument left (the command to run)
if [ "$#" -eq 0 ] ; then
    printf >&2 '%s: Need a command to run\n' "$self"
    exit 2
fi

<%
include(`include/mktd.m4')
%>

# Open a filehandle to the error buffer, just to save on file operations
errbuff=$td/errbuff
exec 3>"$errbuff"

# Keep trying the command, writing error output to the buffer file, and exit
# if we succeed on any of them
attc=1
: "${attn:=3}" "${sleep:=0}"
while [ "$attc" -le "$attn" ] ; do

    # Try running the command; if it succeeds, we're done, and any previous
    # failures get their errors discarded
    if "$@" 2>&3 ; then
        exit

    # If the command failed, record the exit value
    else
        ex=$?
    fi

    # If this isn't the last run, have a sleep
    if [ "$attc" -lt "$attn" ] ; then
        sleep "${sleep:=0}"
    fi

    # Increment the attempt count
    attc=$((attc + 1))
done

# Attempts were exhausted, and all failed; print the error output from all of
# the failures and exit with the non-zero exit value of the most recent one
exec 3>&-
cat -- "$td"/errbuff >&2
exit "$ex"