diff options
| -rwxr-xr-x | bin/show-dependencies | 338 |
1 files changed, 0 insertions, 338 deletions
diff --git a/bin/show-dependencies b/bin/show-dependencies deleted file mode 100755 index a413152..0000000 --- a/bin/show-dependencies +++ /dev/null @@ -1,338 +0,0 @@ -#!/bin/sh - -# shellcheck disable=SC2119,SC2120 - -# shellcheck source=../lib/load-configuration -. "${0%/*}/../lib/load-configuration" - -# TODO: can this be faster? - -# Create a lock file. - -if [ $# -eq 0 ]; then - broken=$( - printf 'CALL show_broken_packages_and_dependencies;\n' | \ - mysql_run_query | \ - sed ' - s/\s.*$// - ' | \ - sort -u - printf 'ALL\n' - ) - # shellcheck disable=SC2086 - "$0" ${broken} - { - find "${webserver_directory}/graphs" -maxdepth 1 -name '*.png' - # shellcheck disable=SC2086 - printf "${webserver_directory}"'/graphs/%s.png\n' ${broken} ${broken} - } | \ - sort | \ - uniq -u | \ - xargs -r rm - exit -fi - -if pgrep -f '^\S+ '"$0"'.' | \ - grep -vxF "$$" >&2; then - - >&2 echo $$ - >&2 echo 'I was running already.' - exit -fi - -exec 9> "${work_dir}/${0##*/}.lock" -if ! verbose_flock -n 9; then - >&2 echo 'Cannot get show-dependencies lock.' - exit -fi - -exec 8> "${sanity_check_lock_file}" -if ! verbose_flock -s -n 8; then - >&2 echo 'Cannot get sanity-check lock.' - exit -fi - -tmp_dir=$(mktemp -d 'tmp.show-dependencies.1.XXXXXXXXXX' --tmpdir) -trap 'rm -rf --one-file-system "${tmp_dir}"' EXIT - -for target_package in "$@"; do - - output="${webserver_directory}/graphs/${target_package}.png" - - # shellcheck disable=SC2016 - { - printf 'CREATE TEMPORARY TABLE `relevant_binary_packages` (`id` BIGINT, UNIQUE KEY (`id`));\n' - printf 'CREATE TEMPORARY TABLE `relevant_binary_packages_copy` (`id` BIGINT, UNIQUE KEY (`id`));\n' - printf 'CREATE TEMPORARY TABLE `relevant_install_targets` (`id` BIGINT, UNIQUE KEY (`id`));\n' - - if [ "${target_package}" = 'ALL' ]; then - - printf 'INSERT IGNORE INTO `relevant_binary_packages` (`id`)' - printf ' SELECT DISTINCT `binary_packages`.`id`' - printf ' FROM `repositories`' - mysql_join_repositories_repository_stabilities - printf ' AND `repository_stabilities`.`name` IN ("unbuilt","staging")' - mysql_join_repositories_binary_packages_in_repositories - mysql_join_binary_packages_in_repositories_binary_packages - printf ';\n' - - else - - printf 'CALL calculate_dependencies_of_package_upto_first_built_one(from_base64("%s"));\n' \ - "$( - printf '%s' "${target_package}" | \ - base64 -w0 - )" - - fi - - printf 'INSERT IGNORE INTO `relevant_binary_packages_copy` (`id`)' - printf ' SELECT `relevant_binary_packages`.`id` FROM `relevant_binary_packages`' - printf ';\n' - printf 'INSERT IGNORE INTO `relevant_install_targets` (`id`)' - printf ' SELECT DISTINCT `install_target_providers`.`install_target`' - printf ' FROM `relevant_binary_packages`' - mysql_join_binary_packages_install_target_providers 'relevant_binary_packages' - mysql_join_install_target_providers_dependencies - mysql_join_dependencies_dependency_types - printf ' AND `dependency_types`.`relevant_for_building`' - printf ' JOIN `relevant_binary_packages_copy` ON `relevant_binary_packages_copy`.`id`=`dependencies`.`dependent`' - printf ';\n' - - # we return lines with either: - # "knot" $type $identifier $label - # or - # "edge" $type $from_knot $to_knot - printf 'SELECT DISTINCT' - printf ' "knot",' - printf 'IF(`build_assignments`.`is_%s`,"%s-build-list-pkgbase",' \ - 'blocked' 'broken' \ - 'broken' 'broken' - printf '"build-list-pkgbase"' - printf ')),' - printf 'CONCAT("pkgbase:",`package_sources`.`id`),' - printf '`package_sources`.`pkgbase`' - printf ' FROM `relevant_binary_packages`' - printf ' JOIN `binary_packages` ON `relevant_binary_packages`.`id`=`binary_packages`.`id`' - mysql_join_binary_packages_binary_packages_in_repositories - mysql_join_binary_packages_in_repositories_repositories - mysql_join_repositories_repository_stabilities - printf ' AND `repository_stabilities`.`name`="unbuilt"' - mysql_join_binary_packages_build_assignments - mysql_join_build_assignments_package_sources - printf ';\n' - - printf 'SELECT DISTINCT' - printf ' "knot",' - printf 'CONCAT("pkgname-",`repository_stabilities`.`name`),' - printf 'CONCAT("pkgname:",`binary_packages`.`id`),' - printf '`binary_packages`.`pkgname`' - printf ' FROM `relevant_binary_packages`' - printf ' JOIN `binary_packages` ON `relevant_binary_packages`.`id`=`binary_packages`.`id`' - mysql_join_binary_packages_binary_packages_in_repositories - mysql_join_binary_packages_in_repositories_repositories - mysql_join_repositories_repository_stabilities - printf ';\n' - - printf 'SELECT DISTINCT' - printf ' "knot","install-target",' - printf 'CONCAT("install-target:",`install_targets`.`id`),' - printf '`install_targets`.`name`' - printf ' FROM `relevant_install_targets`' - printf ' JOIN `install_targets` ON `install_targets`.`id`=`relevant_install_targets`.`id`' - printf ';\n' - - printf 'SELECT DISTINCT' - printf ' "edge","builds"' - printf ',CONCAT("%s:",`%s`.`id`)' \ - 'pkgbase' 'package_sources' \ - 'pkgname' 'binary_packages' - printf ' FROM `relevant_binary_packages`' - printf ' JOIN `binary_packages` ON `relevant_binary_packages`.`id`=`binary_packages`.`id`' - mysql_join_binary_packages_binary_packages_in_repositories - mysql_join_binary_packages_in_repositories_repositories - mysql_join_repositories_repository_stabilities - printf ' AND `repository_stabilities`.`name`="unbuilt"' - mysql_join_binary_packages_build_assignments - mysql_join_build_assignments_package_sources - printf ';\n' - - printf 'SELECT DISTINCT' - printf ' "edge","provides"' - printf ',CONCAT("%s:",`%s`.`id`)' \ - 'pkgname' 'binary_packages' \ - 'install-target' 'install_targets' - printf ' FROM `relevant_binary_packages`' - printf ' JOIN `binary_packages` ON `relevant_binary_packages`.`id`=`binary_packages`.`id`' - mysql_join_binary_packages_install_target_providers - printf ' JOIN `relevant_install_targets` ON `relevant_install_targets`.`id`=`install_target_providers`.`install_target`' - mysql_join_install_target_providers_install_targets - printf ';\n' - - printf 'SELECT DISTINCT' - printf ' "edge",CONCAT("depends:",`dependency_types`.`name`)' - printf ',CONCAT("%s:",`%s`.`id`)' \ - 'install-target' 'install_targets' \ - 'pkgname' 'binary_packages' - printf ' FROM `relevant_binary_packages`' - printf ' JOIN `binary_packages` ON `relevant_binary_packages`.`id`=`binary_packages`.`id`' - mysql_join_binary_packages_dependencies - printf ' JOIN `relevant_install_targets` ON `relevant_install_targets`.`id`=`dependencies`.`depending_on`' - mysql_join_dependencies_dependency_types - printf ' AND `dependency_types`.`relevant_for_building`' - mysql_join_dependencies_install_targets - printf ';\n' - } | \ - mysql_run_query | \ - sed ' - y/\t/ / - /^knot /{ - s/^\S\+ // - w '"${tmp_dir}"'/knots - d - } - /^edge /{ - s/^\S\+ // - w '"${tmp_dir}"'/edges - d - } - ' >&2 - - mkdir "${tmp_dir}/find-identical" - - awk '{ - print $1 >> "'"${tmp_dir}"'/find-identical/characteristics-"$2 - }' < \ - "${tmp_dir}/knots" - awk '{ - print $1 " X " $3 >> "'"${tmp_dir}"'/find-identical/characteristics-"$2 - print $1 " " $2 " X" >> "'"${tmp_dir}"'/find-identical/characteristics-"$3 - }' < \ - "${tmp_dir}/edges" - - modifier=$( - find "${tmp_dir}/find-identical" -maxdepth 1 \ - -type f \ - -name 'characteristics-*' | \ - while read -r file; do - printf '%s ' "${file##*/}" - sort -u "${file}" | \ - sha512sum | \ - awk '{print $1}' - done | \ - sort -k2,2 | \ - uniq -Df1 | \ - sed 's,^characteristics-,,' | \ - sed ' - :a - $!N - s/^\(\S\+\) \(\S\+\)\n\(\S\+ \)\2$/\1+\3\2/ - ta - P - D - ' | \ - cut -d' ' -f1 | \ - sed ' - s/^/s,\\(/ - s/+\([^+[:space:]]\+\)$/\\)\\(\\s\\|$\\),\1\\2,g;/ - s/+/\\|/g - ' - ) - rm -rf --one-file-system "${tmp_dir}/find-identical" - - sed "${modifier}" "${tmp_dir}/knots" | \ - sort -k2,2 -k1,1 | \ - sed ' - :a - $!N - s/^\(\S\+ \S\+ \)\(\S\+\)\n\1\(\S\+\)$/\1\2<nl>\3/ - ta - P - D - ' | \ - sponge "${tmp_dir}/knots" - - sed "${modifier}" "${tmp_dir}/edges" | \ - sort -u | \ - sponge "${tmp_dir}/edges" - - { - printf '%s\n' \ - 'digraph dependencies {' \ - ' fontname=dejavu;' - - # knots: $type $identifier $label - # edges: $type $from_knot $to_knot - - while read -r type id label; do - case "${type}" in - 'broken-build-list-pkgbase') - color='#ff0000' - ;; - 'blocked-build-list-pkgbase') - color='#d00000' - ;; - 'build-list-pkgbase') - color='#800000' - ;; - 'pkgname-unbuilt') - color='#800000' - ;; - 'pkgname-staging') - color='#008000' - ;; - 'pkgname-stable'|'pkgname-testing'|'pkgname-standalone') - color='#000000' - ;; - 'install-target') - color='#000080' - ;; - *) - color='#ff80ff' - label="${label} (${type})" - ;; - esac - printf ' "%s" [label="%s", fontcolor="%s"];\n' "${id}" "${label}" "${color}" - done < \ - "${tmp_dir}/knots" - - while read -r type from_knot to_knot; do - printf '"%s" -> "%s";\n' \ - "${from_knot}" "${to_knot}" - done < \ - "${tmp_dir}/edges" - - printf '%s\n' \ - '}' - - } > \ - "${tmp_dir}/input" - - sed -i ' - s|<nl>|,\\n|g - s|<sp>|, |g - ' "${tmp_dir}/input" - - line_count=$(wc -l < "${tmp_dir}/input") - if [ "${target_package}" != 'ALL' ] && [ "${line_count}" -gt 1000 ]; then - rm -f "${output}" - >&2 printf 'Skipping graph for "%s" - would be too big (%d).\n' \ - "${target_package}" \ - "${line_count}" - continue - fi - printf 'small enough (%s): %d\n' \ - "${target_package}" \ - "${line_count}" - - touch "${output}" - chmod 644 "${output}" - - if ! dot -Tpng -o "${output}" "${tmp_dir}/input"; then - rm -f "${output}" - continue - fi - -done - -rm "${work_dir}/${0##*/}.lock" |