From d926f217a7843c6745cbbe0190b34d7e3bf1b288 Mon Sep 17 00:00:00 2001
From: Andrew Benson <abenson+void@gmail.com>
Date: Wed, 4 May 2022 22:06:14 -0500
Subject: [PATCH] hooks/post-install: check for dangling symlinks

---
 common/hooks/post-install/10-check-symlinks.sh | 10 ++++++++++
 1 file changed, 10 insertions(+)
 create mode 100644 common/hooks/post-install/10-check-symlinks.sh

diff --git a/common/hooks/post-install/10-check-symlinks.sh b/common/hooks/post-install/10-check-symlinks.sh
new file mode 100644
index 000000000000..b4bb29e19f43
--- /dev/null
+++ b/common/hooks/post-install/10-check-symlinks.sh
@@ -0,0 +1,10 @@
+# This hook checks for broken symlinks.
+
+hook() {
+	local dest target f
+	dest=$(readlink -f ${PKGDESTDIR})
+	while read -r f; do
+		target=$(readlink -m $f)
+		printf "   Symlink missing target: ${f#${PKGDESTDIR}} -> ${target#${dest}}\n"
+	done < <(find ${PKGDESTDIR} -type l -follow -not -path "${PKGDESTDIR}/etc/sv/*")
+}