os-autoinst-testapi-usage

#!/bin/bash -e

get_function_list() {
    grep -P '^sub \w+\s*[({:]' "$testapi_path" | cut -f2 -d' ' | grep -v ^_ | sort
}

rgg() {
    # needs ripgrep with pcre2
    rg --engine pcre2 --stats "(?<!_)${1}" "${2}" || :
}

[ "$#" -ne 0 ] || {
    echo "Usage: $0 path_to_testapi path_to_code_repository [path_to_another_repository] [...]"
    exit 1
}
which rg &> /dev/null || {
    echo "rg (ripgrep) not found, please install it first" >&2
    exit 2
}

if [ -f "$1" ]; then
    testapi_path=$1
else
    testapi_path=$1/testapi.pm
fi
shift

[ -r "$testapi_path" ] || {
    echo "$testapi_path not found" >&2
    exit 1
}
grep -q 'package testapi' "$testapi_path" || echo "Warning: provided file does not look like testapi.pm" >&2

while (($#)); do
    get_function_list | while read -r; do
        echo "$1 - ${REPLY} : $(rgg "${REPLY}" "$1" | tail -8 | head -n1)"
    done
    shift
done