bryson/pacman
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

libmakepkg: improve validity checking of arch array

Browse source 
Only a subset of checks were being performed on the overridden arch
arrays in package functions. Refactor checking such that all checks
are perform on all arch arrays.

Signed-off-by: Allan McRae <allan@archlinux.org>
This commit is contained in:
Allan McRae 2024-12-20 14:21:32 +10:00
parent 62d3192126
commit 5e2a763e4a
1 changed files with 40 additions and 29 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

69
scripts/libmakepkg/lint_pkgbuild/arch.sh.in
View file

@ -30,40 +30,51 @@ source "$MAKEPKG_LIBRARY/util/pkgbuild.sh"
lint_pkgbuild_functions+=('lint_arch') lint_pkgbuild_functions+=('lint_arch')
lint_arch() { validate_arch() {
local a name list ret=0 local n="$1"; shift
local a=("$@")
if in_array "any" "${arch[@]}"; then if (( ${#a[@]} == 0 )); then
if (( ${#arch[@]} == 1 )); then error "$(gettext "%s is not allowed to be empty.")" "arch"
return 0; ret=1
else
if in_array "any" "${a[@]}"; then
if (( ${#a[@]} != 1 )); then
error "$(gettext "Can not use '%s' architecture with other architectures")" "any"
ret=1
fi
else else
error "$(gettext "Can not use '%s' architecture with other architectures")" "any" if ! in_array "$CARCH" "${a[@]}"; then
return 1; error "$(gettext "%s is not available for the '%s' architecture.")" "$n" "$CARCH"
fi
fi
for a in "${arch[@]}"; do
if [[ $a = *[![:alnum:]_]* ]]; then
error "$(gettext "%s contains invalid characters: '%s'")" \
'arch' "${a//[[:alnum:]_]}"
ret=1
fi
done
if (( ! IGNOREARCH )) && ! in_array "$CARCH" "${arch[@]}"; then
error "$(gettext "%s is not available for the '%s' architecture.")" "$pkgbase" "$CARCH"
return 1
fi
for name in "${pkgname[@]}"; do
get_pkgbuild_attribute "$name" 'arch' 1 list
if [[ $list && $list != 'any' ]] && ! in_array $CARCH "${list[@]}"; then
if (( ! IGNOREARCH )); then
error "$(gettext "%s is not available for the '%s' architecture.")" "$name" "$CARCH"
ret=1 ret=1
fi fi
fi fi
done
for a in "${arch[@]}"; do
if [[ $a = *[![:alnum:]_]* ]]; then
error "$(gettext "%s contains invalid characters: '%s'")" \
'arch' "${a//[[:alnum:]_]}"
ret=1
fi
done
fi
}
lint_arch() {
local name list ret=0
if (( IGNOREARCH )); then
return 0;
fi
validate_arch "$pkgbase" "${arch[@]}"
if (( ret == 0 )); then
for name in "${pkgname[@]}"; do
get_pkgbuild_attribute "$name" 'arch' 1 list
validate_arch "$name" "${list[@]}"
done
fi
return $ret return $ret
} }