From 0eaf07b89956169ff54bc9f5aea0dd9fef92a8d6 Mon Sep 17 00:00:00 2001 From: Erich Eckner Date: Fri, 16 Jun 2017 10:21:48 +0200 Subject: rename why_dont_you_build -> why_dont_you: can now also tell why something is not unstaged --- bin/why_dont_you | 133 +++++++++++++++++++++++++++++++++++++++++++++++++++++++ 1 file changed, 133 insertions(+) create mode 100755 bin/why_dont_you (limited to 'bin/why_dont_you') diff --git a/bin/why_dont_you b/bin/why_dont_you new file mode 100755 index 0000000..596b6d9 --- /dev/null +++ b/bin/why_dont_you @@ -0,0 +1,133 @@ +#!/bin/sh + +# usage: why_dont_you $action $package1 $package2 ... + +# investigate, why a certain option is not done with a certain package + +. "${0%/*}/../conf/default.conf" + +action="$1" +shift + +case "${action}" in + + 'build') + + for pkg in "$@"; do + grep "^$(str_to_regex "${pkg}") " "${work_dir}/build-list" | \ + while read -r package git_revision mod_git_revision repository; do + + if [ -f "${work_dir}/${package}.${git_revision}.${mod_git_revision}.${repository}.done" ] || + [ -f "${work_dir}/${package}.${git_revision}.${mod_git_revision}.${repository}.testing" ]; then + echo 'has been built' + continue + fi + + if package_locked_broken_or_blocked "${package}" "${git_revision}" "${mod_git_revision}" "${repository}"; then + echo 'is locked, broken or blocked' + continue + fi + + if [ -n "$( + ( + cat "${work_dir}/package-infos/${package}.${git_revision}.${mod_git_revision}.needs" + awk '{print $1 "." $2 "." $3}' "${work_dir}/build-list" | \ + sed " + s|^|${work_dir}/package-infos/| + s|\$|\.builds| + " | \ + xargs -r cat | \ + sort -u + ) | \ + sort | \ + uniq -d + )" ]; then + echo 'has unmet dependencies:' + ( + cat "${work_dir}/package-infos/${package}.${git_revision}.${mod_git_revision}.needs" + awk '{print $1 "." $2 "." $3}' "${work_dir}/build-list" | \ + sed " + s|^|${work_dir}/package-infos/| + s|\$|\.builds| + " | \ + xargs -r cat | \ + sort -u + ) | \ + sort | \ + uniq -d | \ + while read -r dep; do + grep -Fx "${dep}" "${work_dir}/package-infos/"*".builds" | \ + cut -d: -f1 | \ + xargs -rn1 basename | \ + cut -d. -f1 + done | \ + sort -u + + continue + fi + + echo 'would be built' + done + + done + + ;; + + 'unstage') + + for pkg in "$@"; do + + if ! ls -1 "${work_dir}/package-states" | \ + grep -q "^$(str_to_regex "${pkg}")\(\.[^.]\+\)\{3\}\.done\$"; then + printf 'Package "%s" is not in staging!' "${pkg}" + continue + fi + + dependent_packages="$( + grep -xF "${pkg}" "${work_dir}/package-infos/"*".depends" | \ + cut -d: -f1 | \ + sed ' + s|^.*/|| + s|\.depends$|| + ' + )" + + build_list_items_file="$(mktemp)" + dependent_packages_file="$(mktemp)" + + awk '{print $1 "." $2 "." $3 " " $4}' "${work_dir}/build-list" | \ + sort -u > \ + "${build_list_items_file}" + + printf '%s\n' "${dependent_packages}" | \ + sort -u > \ + "${dependent_packages_file}" + + dependent_still_on_build_list="$( + join -1 1 -2 1 -o 1.1,1.2 \ + "${build_list_items_file}" \ + "${dependent_packages_file}" + )" + + rm -f \ + "${build_list_items_file}" \ + "${dependent_packages_file}" + + if [ -n "${dependent_still_on_build_list}" ]; then + printf 'The following packages are dependent on "%s", but still on the build list:\n' "${pkg}" + echo "${dependent_still_on_build_list}" + continue + fi + + echo 'No dependencies left on build list.' + echo "${dependent_packages}" + + done + + ;; + + *) + >&2 printf 'unknown action "%s"' "${action}" + exit 1 + +esac -- cgit v1.2.3-54-g00ecf