Yann Autissier
084a25c627
- hooks load the _stack files of every directory between the stack path root and the stack, outermost first: make included both $(dir)/*.mk and $(dir)/*/*.mk, so a stack in a subdirectory saw its parent's settings - a group may be declared in <group>/<group>.env, where the stack lives - MYOS_STACK_DIR lets a hook read a file it ships next to itself - myos_filter no longer confuses a literal * in a make pattern with a wildcard, and the list helpers no longer let the shell expand a * into filenames - MACHINE, SYSTEM, HOST and DOMAINNAME join the framework variables a hook sees - the make shim gains $(call myos-var,NAME), so a .mk target can read a setting that now lives in a hook, and it picks up the .mk of every stack directory rather than only the project's
136 lines
4.5 KiB
Bash
136 lines
4.5 KiB
Bash
#shellcheck shell=sh
|
|
# str: string helpers ported from make/utils.mk and make/def.mk.
|
|
|
|
# myos_lower STRING / myos_upper STRING
|
|
myos_lower() { printf '%s' "$1" | tr '[:upper:]' '[:lower:]'; }
|
|
myos_upper() { printf '%s' "$1" | tr '[:lower:]-.' '[:upper:]__'; }
|
|
|
|
# myos_name STRING compose-project-safe name: lowercase, no . - _
|
|
# (make: $(subst _,,$(subst -,,$(subst .,,$(call LOWERCASE,$(1))))))
|
|
myos_name() { printf '%s' "$1" | tr '[:upper:]' '[:lower:]' | tr -d '._-'; }
|
|
|
|
# myos_slugify STRING keep [a-z0-9_], everything else becomes _
|
|
myos_slugify() { printf '%s' "$1" | tr '[:upper:]' '[:lower:]' | sed 's/[^a-z0-9_]/_/g'; }
|
|
|
|
# myos_reverse WORDS... reverse the order of space separated words
|
|
myos_reverse() {
|
|
set -f # a word may be a pattern such as *.example.org, do not glob it
|
|
_out=
|
|
for _w in $1; do _out="$_w${_out:+ }$_out"; done
|
|
set +f
|
|
printf '%s' "$_out"
|
|
}
|
|
|
|
# myos_verle A B true when version A <= B (make: verle)
|
|
myos_verle() {
|
|
[ -n "$1" ] || return 1
|
|
[ -n "$2" ] || return 1
|
|
[ "$1" = "$(printf '%s\n%s\n' "$1" "$2" | sort -V | head -n1)" ]
|
|
}
|
|
|
|
# myos_verlt A B true when version A < B
|
|
myos_verlt() {
|
|
[ "$1" = "$2" ] && return 1
|
|
myos_verle "$1" "$2"
|
|
}
|
|
|
|
# The make list functions the catalogue uses, on space separated words.
|
|
|
|
# myos_firstword LIST / myos_lastword LIST
|
|
myos_firstword() { set -f; for _w in $1; do set +f; printf '%s' "$_w"; return 0; done; set +f; }
|
|
myos_lastword() { _l=; for _w in $1; do _l=$_w; done; printf '%s' "$_l"; }
|
|
|
|
# myos_or A B... the first argument that is not empty
|
|
myos_or() { for _a in "$@"; do [ -n "$_a" ] && { printf '%s' "$_a"; return 0; }; done; }
|
|
|
|
# myos_patsubst PATTERN REPLACEMENT LIST
|
|
# The pattern holds one %, standing for any text; the replacement puts it back.
|
|
myos_patsubst() {
|
|
set -f # a word may be a pattern such as *.example.org, do not glob it
|
|
_pre=${1%%%*}; _suf=${1#*%}
|
|
_rpre=${2%%%*}; _rsuf=${2#*%}
|
|
_out=
|
|
for _w in $3; do
|
|
case $_w in
|
|
"$_pre"*"$_suf")
|
|
_stem=${_w#"$_pre"}; _stem=${_stem%"$_suf"}
|
|
_out="${_out:+$_out }$_rpre$_stem$_rsuf" ;;
|
|
*) _out="${_out:+$_out }$_w" ;;
|
|
esac
|
|
done
|
|
set +f
|
|
printf '%s' "$_out"
|
|
}
|
|
|
|
# myos_pattern MAKE_PATTERN the shell pattern matching a make pattern.
|
|
# In make only % is a wildcard, so a literal *, ? or [ has to be protected
|
|
# before % becomes *: "*.%" means "starts with a star and a dot", not
|
|
# "anything".
|
|
myos_pattern() {
|
|
printf '%s' "$1" | sed -e 's/[][*?]/\\&/g' -e 's/%/*/g'
|
|
}
|
|
|
|
# myos_filter PATTERNS LIST / myos_filter_out PATTERNS LIST
|
|
myos_filter() {
|
|
set -f # a word may itself be a pattern, do not glob it
|
|
_out=
|
|
for _w in $2; do
|
|
for _raw in $1; do
|
|
_p=$(myos_pattern "$_raw")
|
|
# shellcheck disable=SC2254 # the pattern is meant to match, not to glob
|
|
case $_w in $_p) _out="${_out:+$_out }$_w"; break ;; esac
|
|
done
|
|
done
|
|
set +f
|
|
printf '%s' "$_out"
|
|
}
|
|
myos_filter_out() {
|
|
set -f
|
|
_out=
|
|
for _w in $2; do
|
|
_keep=yes
|
|
for _raw in $1; do
|
|
_p=$(myos_pattern "$_raw")
|
|
# shellcheck disable=SC2254 # the pattern is meant to match, not to glob
|
|
case $_w in $_p) _keep=no; break ;; esac
|
|
done
|
|
[ "$_keep" = yes ] && _out="${_out:+$_out }$_w"
|
|
done
|
|
set +f
|
|
printf '%s' "$_out"
|
|
}
|
|
|
|
# myos_addprefix PREFIX LIST / myos_addsuffix SUFFIX LIST
|
|
myos_addprefix() { set -f; _out=; for _w in $2; do _out="${_out:+$_out }$1$_w"; done; set +f; printf '%s' "$_out"; }
|
|
myos_addsuffix() { set -f; _out=; for _w in $2; do _out="${_out:+$_out }$_w$1"; done; set +f; printf '%s' "$_out"; }
|
|
|
|
# myos_b64url read stdin, write url-safe base64 without padding
|
|
myos_b64url() { openssl enc -A -base64 | tr '+/' '-_' | tr -d '='; }
|
|
|
|
# myos_jwt HEADER PAYLOAD SECRET a HS256 JSON web token
|
|
# Ported from the JWT macro of make/def.mk, which supabase uses to derive its
|
|
# anon and service keys from one secret. The make macro split on the commas of
|
|
# the payload; this one does not.
|
|
myos_jwt() {
|
|
_h=${1:-'{"alg":"HS256","typ":"JWT"}'}
|
|
_p=$2
|
|
_s=$3
|
|
_hb=$(printf '%s' "$_h" | myos_b64url)
|
|
_pb=$(printf '%s' "$_p" | myos_b64url)
|
|
_sig=$(printf '%s' "$_hb.$_pb" | openssl dgst -sha256 -binary -hmac "$_s" | myos_b64url)
|
|
printf '%s.%s.%s' "$_hb" "$_pb" "$_sig"
|
|
}
|
|
|
|
# myos_patsublist PATTERN REPLACEMENT LIST
|
|
# patsubst over a list, joined by commas. The fabio tags are built this way:
|
|
# one route per uri, in a single label.
|
|
myos_patsublist() {
|
|
set -f # a word may be a pattern such as *.example.org, do not glob it
|
|
_out=
|
|
for _w in $3; do
|
|
_out="${_out:+$_out,}$(myos_patsubst "$1" "$2" "$_w")"
|
|
done
|
|
set +f
|
|
printf '%s' "$_out"
|
|
}
|