efelon/rdlink
1
0
Fork 0
Code Issues Pull Requests Projects Releases 3 Wiki Activity

Fixing shellcheck errors and prepare for build.sh

Browse Source
This commit is contained in:
Martin Winkler
2022-03-22 10:20:42 +01:00
parent 5cea7b4198
commit 571791fd5c
1 changed files with 51 additions and 54 deletions
Download Patch File Download Diff File Expand all files Collapse all files

105
rdlink.sh
View File

@@ -16,12 +16,33 @@ set -o pipefail
LOG_LEVEL="${LOG_LEVEL:-1}" # 7 = debug -> 0 = emergency LOG_LEVEL="${LOG_LEVEL:-1}" # 7 = debug -> 0 = emergency
function rl::log () {
local log_level="${1:-${LOG_LEVEL}}"
shift
# all remaining arguments are to be printed
local log_line=""
while IFS=$'\n' read -r log_line; do
printf "%s [%9s] %s\n" "$(date -u +"%Y-%m-%d %H:%M:%S UTC")" "${log_level}" "${log_line}" 1>&2
done <<< "${@:-}"
}
emergency() { rl::log emergency "${@}"; exit 1; }
alarm() { [[ "${LOG_LEVEL:-0}" -ge 1 ]] && rl::log alert "${@}"; true; }
critical() { [[ "${LOG_LEVEL:-0}" -ge 2 ]] && rl::log critical "${@}"; true; }
error() { [[ "${LOG_LEVEL:-0}" -ge 3 ]] && rl::log error "${@}"; true; }
warning() { [[ "${LOG_LEVEL:-0}" -ge 4 ]] && rl::log warning "${@}"; true; }
notice() { [[ "${LOG_LEVEL:-0}" -ge 5 ]] && rl::log notice "${@}"; true; }
info() { [[ "${LOG_LEVEL:-0}" -ge 6 ]] && rl::log info "${@}"; true; }
debug() { [[ "${LOG_LEVEL:-0}" -ge 7 ]] && rl::log debug "${@}"; true; }
msg() { echo "$@"; true; }
### Script
rl::rdlink() { rl::rdlink() {
local subject= local subject=
local work= local work=
local resolved=0
info "Processing: $@" info "Processing: $*"
info " with pwd: $(pwd)" info " with pwd: $(pwd)"
subject="$(rl::cleanpath "${1:-}")" || true subject="$(rl::cleanpath "${1:-}")" || true
@@ -29,8 +50,8 @@ rl::rdlink() {
# Follow multiple symlinks # Follow multiple symlinks
while subject="$(rl::quicklink "${subject}")" ; do while subject="$(rl::quicklink "${subject}")" ; do
# A link was resolved at least once # A link was resolved at least once
info "rl::rdlink - Link found: $subject" :
resolved=1 info " rl::rdlink - Link found: $subject"
done done
# Special cases handling # Special cases handling
@@ -39,7 +60,7 @@ rl::rdlink() {
# current user has no permission to access the link itself # current user has no permission to access the link itself
# (e.g. /proc/**/cwd) # (e.g. /proc/**/cwd)
if [ -L "${subject}" ] ; then if [ -L "${subject}" ] ; then
info "rl::rdlink exit - can't access link ${subject}" info " rl::rdlink exit - can't access link ${subject}"
printf "\n" printf "\n"
return 1 return 1
fi fi
@@ -47,19 +68,14 @@ rl::rdlink() {
# Empty output if (dirname $subject) is not a valid path # Empty output if (dirname $subject) is not a valid path
if ! work="$(rl::canon "${subject}")" ; then if ! work="$(rl::canon "${subject}")" ; then
# Special: Links resolved to something like: /proc/2267178/fd/pipe:[22306727] info " rl::rdlink exit - invalid path ${work}"
# are not existing files but `readlink -f` prints result anyway printf "\n"
# Printing result if a link was resolved at least once return 1
#if (( ! resolved )); then
info "rl::rdlink exit - invalid path ${work}"
printf "\n"
return 1
#fi
else else
subject="${work}" subject="${work}"
fi fi
printf "${subject}\n" printf "%s\n" "${subject}"
} }
rl::quicklink() { rl::quicklink() {
@@ -70,19 +86,19 @@ rl::quicklink() {
# Check if current candidate is a symlink # Check if current candidate is a symlink
if ! subject=$(readlink -- "${1:-}"); then if ! subject=$(readlink -- "${1:-}"); then
printf -- "${1:-}\n" printf -- "%s\n" "${1:-}"
return 1 return 1
fi fi
info " - symlink ${1} -> ${subject}" info " rl::quicklink symlink ${1} -> ${subject}"
# relative symlink target; prepend its parent direcotry # relative symlink target; prepend its parent direcotry
if [[ "${subject}" != "/"* ]]; then if [[ "${subject}" != "/"* ]]; then
work="$(rl::canon "$(dirname -- "${1:-}")")" work="$(rl::canon "$(dirname -- "${1:-}")")"
subject="${work}/${subject}" subject="${work}/${subject}"
info " - relative link resolved: ${subject}" info " rl::quicklink relative link resolved: ${subject}"
fi fi
printf "${subject}\n" printf "%s\n" "${subject}"
return 0 return 0
} }
@@ -103,7 +119,7 @@ rl::canon() {
# e.g. $(readlink /proc/self/root) == "/" # e.g. $(readlink /proc/self/root) == "/"
# $(cd /proc/self/root/mnt && pwd -P) == "//mnt" # $(cd /proc/self/root/mnt && pwd -P) == "//mnt"
subject="$(rl::normalize "${work}")" subject="$(rl::normalize "${work}")"
info "rl::canon valid directory: ${subject}" info " rl::canon valid directory: ${subject}"
run=0 run=0
elif work="$(cd "$(dirname -- "${start}")" >/dev/null 2>&1 && pwd -P)" ; then elif work="$(cd "$(dirname -- "${start}")" >/dev/null 2>&1 && pwd -P)" ; then
bname="$(basename -- "${start}")" bname="$(basename -- "${start}")"
@@ -112,12 +128,12 @@ rl::canon() {
[[ "${work}" == "/" ]] && work= [[ "${work}" == "/" ]] && work=
subject="${work}${bname:+"/${bname}"}" subject="${work}${bname:+"/${bname}"}"
info "rl::canon valid parent: ${subject}" info " rl::canon valid parent: ${subject}"
# Special: Succeed with valid element after second run; see special below # Special: Succeed with valid element after second run; see special below
# e.g. /root/. # e.g. /root/.
# * /root is valid but not accessible # * /root is valid but not accessible
if (( retval )) && [ -e "${subject}" ] ;then if (( retval )) && [ -e "${subject}" ] ;then
info "rl::canon valid element" info " rl::canon valid element"
retval=0 retval=0
fi fi
run=0 run=0
@@ -129,18 +145,18 @@ rl::canon() {
# * resolves to pwd but fails by readlink -f # * resolves to pwd but fails by readlink -f
work="$(rl::normalize "${start}")" work="$(rl::normalize "${start}")"
if [[ "${work}" != "${start}" ]] ; then if [[ "${work}" != "${start}" ]] ; then
info "rl::canon retry with: ${work}" info " rl::canon retry with: ${work}"
start="${work}" start="${work}"
retval=1 retval=1
continue continue
fi fi
info "rl::canon invalid path: ${work}" info " rl::canon invalid path: ${work}"
subject="${work}" subject="${work}"
run=0 && retval=1 run=0 && retval=1
fi fi
done done
printf -- "${subject}\n" printf -- "%s\n" "${subject}"
return ${retval} return ${retval}
} }
@@ -149,15 +165,15 @@ rl::cleanpath() {
local rex_tmp= local rex_tmp=
info "Cleaning path... ${1:-}" info "Cleaning path... ${1:-}"
work="${1:-}" work="${1:-}"
# Remove multiple / # Remove multiple /
while [[ "${work:-}" = *"//"* ]]; do while [[ "${work:-}" = *"//"* ]]; do
work="${work//'//'/'/'}" work="${work//'//'/'/'}"
done done
info "rl::cleanpath result: ${work}" info " rl::cleanpath result: ${work}"
printf -- "${work}\n" printf -- "%s\n" "${work}"
} }
rl::normalize() { rl::normalize() {
@@ -187,8 +203,8 @@ rl::normalize() {
work="${BASH_REMATCH[1]}" work="${BASH_REMATCH[1]}"
fi fi
info "rl::normalize result: ${work}" info " rl::normalize result: ${work}"
printf -- "${work}\n" printf -- "%s\n" "${work}"
} }
rl::main() { rl::main() {
@@ -218,31 +234,9 @@ rl::main() {
done done
} }
function rl::log () {
local log_level="${1:-${LOG_LEVEL}}"
shift
# all remaining arguments are to be printed
local log_line=""
while IFS=$'\n' read -r log_line; do
printf "%s [%9s] %s\n" "$(date -u +"%Y-%m-%d %H:%M:%S UTC")" "${log_level}" "${log_line}" 1>&2
done <<< "${@:-}"
}
emergency() { rl::log emergency "${@}"; exit 1; }
alarm() { [[ "${LOG_LEVEL:-0}" -ge 1 ]] && rl::log alert "${@}"; true; }
critical() { [[ "${LOG_LEVEL:-0}" -ge 2 ]] && rl::log critical "${@}"; true; }
error() { [[ "${LOG_LEVEL:-0}" -ge 3 ]] && rl::log error "${@}"; true; }
warning() { [[ "${LOG_LEVEL:-0}" -ge 4 ]] && rl::log warning "${@}"; true; }
notice() { [[ "${LOG_LEVEL:-0}" -ge 5 ]] && rl::log notice "${@}"; true; }
info() { [[ "${LOG_LEVEL:-0}" -ge 6 ]] && rl::log info "${@}"; true; }
debug() { [[ "${LOG_LEVEL:-0}" -ge 7 ]] && rl::log debug "${@}"; true; }
msg() { echo "$@"; true; }
# Provide as function to be called when sourced # Provide as function to be called when sourced
rdlink() { rdlink() {
rl::rdlink "$@" rl::main "$@"
} }
### Check if script is _sourced ### Check if script is _sourced
@@ -251,7 +245,8 @@ _sourced=0
if [ -n "${ZSH_EVAL_CONTEXT:-}" ]; then if [ -n "${ZSH_EVAL_CONTEXT:-}" ]; then
case ${ZSH_EVAL_CONTEXT:-} in *:file) _sourced=1;; esac case ${ZSH_EVAL_CONTEXT:-} in *:file) _sourced=1;; esac
elif [ -n "${KSH_VERSION:-}" ]; then elif [ -n "${KSH_VERSION:-}" ]; then
[ "$(cd $(dirname -- $0) && pwd -P)/$(basename -- $0)" != "$(cd $(dirname -- ${.sh.file}) && pwd -P)/$(basename -- ${.sh.file})" ] && _sourced=1 [ "$(cd "$(dirname -- "$0")" && pwd -P)/$(basename -- "$0")" \
!= "$(cd "$(dirname -- "${.sh.file}")" && pwd -P)/$(basename -- "${.sh.file}")" ] && _sourced=1
elif [ -n "${BASH_VERSION:-}" ]; then elif [ -n "${BASH_VERSION:-}" ]; then
(return 0 2>/dev/null) && _sourced=1 (return 0 2>/dev/null) && _sourced=1
else # All other shells: examine $0 for known shell binary filenames else # All other shells: examine $0 for known shell binary filenames
@@ -264,3 +259,5 @@ if (( ! _sourced )); then
rl::main "$@" rl::main "$@"
fi fi
### Script EOF